From e94d758027e5aa4c49af10985928f1714c66bab5 Mon Sep 17 00:00:00 2001
From: David du Colombier <0intro@gmail.com>
Date: Mon, 26 Apr 1999 00:00:00 +0000
Subject: [PATCH] Plan 9 from Bell Labs 1999-04-26

---
 alphapc/l.s | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/alphapc/l.s b/alphapc/l.s
index d0db93c613de94607a01943252c67bebc6f8832b..fdbd43d42e5ec2cbaa5059f3c48fd500fdd2184d 100644
--- a/alphapc/l.s
+++ b/alphapc/l.s
@@ -151,6 +151,15 @@ TEXT	fpenab(SB), $-8
 	CALL_PAL $PALwrfen
 	RET
 
+TEXT rpcc(SB), $0
+	MOVL	R0, R1
+	MOVL	$0, R0
+	WORD	$0x6000C000		/* RPCC R0 */
+	BEQ	R1, _ret
+	MOVQ	R0, (R1)
+_ret:
+	RET
+
 /*
  *	Exception handlers.  The stack frame looks like this:
  *