From 5e5f74caed0439c7a241b22c2ba0724ace210bc7 Mon Sep 17 00:00:00 2001
From: dtc <dtc>
Date: Fri, 27 Oct 2000 19:42:31 +0000
Subject: [PATCH] Update register names and BOXED_REGISTERS for the moving of
 NFP and CFUNC.  From Raymond Toy.

---
 lisp/sparc-lispregs.h | 17 ++++++++---------
 1 file changed, 8 insertions(+), 9 deletions(-)

diff --git a/lisp/sparc-lispregs.h b/lisp/sparc-lispregs.h
index 60b9af3a8..a8ad17c7f 100644
--- a/lisp/sparc-lispregs.h
+++ b/lisp/sparc-lispregs.h
@@ -1,4 +1,4 @@
-/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/sparc-lispregs.h,v 1.4 1997/04/21 00:52:24 dtc Exp $ */
+/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/sparc-lispregs.h,v 1.5 2000/10/27 19:42:31 dtc Exp $ */
 
 
 
@@ -40,8 +40,7 @@
 #define reg_CSP		GREG(3)
 #define reg_CFP		GREG(4)
 #define reg_BSP		GREG(5)
-#define reg_NFP		GREG(6)
-#define reg_CFUNC	GREG(7)
+/* %g6 and %g7 are supposed to be reserved for the system */
 
 #define reg_NL0		OREG(0)
 #define reg_NL1		OREG(1)
@@ -64,24 +63,24 @@
 #define reg_FDEFN	IREG(0)
 #define reg_LEXENV	IREG(1)
 #define reg_L0		IREG(2)
-#define reg_L1		IREG(3)
-#define reg_L2		IREG(4)
+#define reg_NFP		IREG(3)
+#define reg_CFUNC	IREG(4)
 #define reg_CODE	IREG(5)
 #define reg_LIP		IREG(7)
 
 #define REGNAMES \
 	"ZERO",		"ALLOC",	"NULL",		"CSP", \
-	"CFP",		"BSP",		"NFP",		"CFUNC", \
+	"CFP",		"BSP",		"%g6",		"%g7", \
         "NL0",		"NL1",		"NL2",		"NL3", \
         "NL4",		"NL5",		"NSP",		"NARGS", \
         "A0",		"A1",		"A2",		"A3", \
         "A4",		"A5",		"OCFP",		"LRA", \
-        "FDEFN",	"LEXENV",	"L0",		"L1", \
-        "L2",		"CODE",		"???",		"LIP"
+        "FDEFN",	"LEXENV",	"L0",		"NFP", \
+        "CFUNC",	"CODE",		"???",		"LIP"
 
 #define BOXED_REGISTERS { \
     reg_A0, reg_A1, reg_A2, reg_A3, reg_A4, reg_A5, reg_FDEFN, reg_LEXENV, \
-    reg_OCFP, reg_LRA, reg_L0, reg_L1, reg_L2, reg_CODE \
+    reg_OCFP, reg_LRA, reg_L0, reg_CODE \
 }
 
 #ifndef LANGUAGE_ASSEMBLY
-- 
GitLab