diff --git a/code/exports.lisp b/code/exports.lisp
index 7bca6a76ac0b79db89233cd750a353996313f5b7..f0d74a0c7c196276b82cac6d85d52cdcfd2557d2 100644
--- a/code/exports.lisp
+++ b/code/exports.lisp
@@ -5,7 +5,7 @@
 ;;; Carnegie Mellon University, and has been placed in the public domain.
 ;;;
 (ext:file-comment
-  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.145 1998/03/10 18:23:59 dtc Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.146 1998/03/10 18:26:05 dtc Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -1241,12 +1241,14 @@
              "REMOVE-FD-HANDLER" "REMOVE-PORT-DEATH-HANDLER"
              "REMOVE-PORT-OBJECT" "REMOVE-XWINDOW-OBJECT"
              "RESOLVE-LOADED-ASSEMBLER-REFERENCES" "SAP+" "SAP-" "SAP-INT"
-             "SAP-REF-16" "SAP-REF-32" "SAP-REF-8" "SAP-REF-DESCRIPTOR"
+	     "SAP-REF-16" "SAP-REF-32" "SAP-REF-64" "SAP-REF-8"
+	     "SAP-REF-DESCRIPTOR"
              "SAP-REF-DOUBLE" "SAP-REF-LONG" "SAP-REF-SAP" "SAP-REF-SINGLE"
 	     "SAP<" "SAP<=" "SAP=" "SAP>" "SAP>="
 	     "SCRUB-CONTROL-STACK" "SERVE-ALL-EVENTS"
              "SERVE-EVENT" "SERVER" "SERVER-MESSAGE" "SHORT-FLOAT-RADIX"
-             "SIGNED-SAP-REF-16" "SIGNED-SAP-REF-32" "SIGNED-SAP-REF-8"
+             "SIGNED-SAP-REF-16" "SIGNED-SAP-REF-32"
+	     "SIGNED-SAP-REF-64" "SIGNED-SAP-REF-8"
              "SINGLE-FLOAT-RADIX" "SYMBOL-MACRO-LET" "SYSTEM-AREA-POINTER"
              "SYSTEM-AREA-POINTER-P" "VECTOR-SAP"
              "WAIT-UNTIL-FD-USABLE" "WITH-ENABLED-INTERRUPTS" "WITH-FD-HANDLER"
@@ -1408,10 +1410,13 @@
 	   "%RAW-REF-DOUBLE" "%RAW-REF-SINGLE" "%RAW-SET-COMPLEX-DOUBLE"
 	   "%RAW-SET-COMPLEX-SINGLE" "%RAW-SET-DOUBLE" "%RAW-SET-SINGLE"
 	   "%SCALB" "%SCALBN" "%SET-FUNCALLABLE-INSTANCE-FUNCTION"
-	   "%SET-FUNCALLABLE-INSTANCE-INFO" "%SET-RAW-BITS" "%SET-SAP-REF-16"
-	   "%SET-SAP-REF-32" "%SET-SAP-REF-8" "%SET-SAP-REF-DOUBLE"
-	   "%SET-SAP-REF-SAP" "%SET-SAP-REF-SINGLE" "%SET-STACK-REF" "%SIN"
-	   "%SIN-QUICK"
+	   "%SET-FUNCALLABLE-INSTANCE-INFO" "%SET-RAW-BITS"
+	   "%SET-SAP-REF-16" "%SET-SAP-REF-32" "%SET-SAP-REF-64"
+	   "%SET-SAP-REF-8" "%SET-SAP-REF-DOUBLE"
+	   "%SET-SAP-REF-SAP" "%SET-SAP-REF-SINGLE"
+	   "%SET-SIGNED-SAP-REF-16" "%SET-SIGNED-SAP-REF-32"
+	   "%SET-SIGNED-SAP-REF-64" "%SET-SIGNED-SAP-REF-8" 
+	   "%SET-STACK-REF" "%SIN" "%SIN-QUICK"
 	   "%SINGLE-FLOAT" "%SINH" "%SP-SET-DEFINITION" "%SP-SET-PLIST"
 	   "%SQRT" "%SXHASH-SIMPLE-STRING" "%SXHASH-SIMPLE-SUBSTRING" "%TAN"
 	   "%TAN-QUICK"
@@ -1558,10 +1563,10 @@
 	   "FDEFN" "MAKE-FDEFN" "FDEFN-P" "FDEFN-NAME" "FDEFN-FUNCTION"
 	   "FDEFN-MAKUNBOUND" "%COERCE-TO-FUNCTION" "FUNCTION-SUBTYPE"
 	   "*MAXIMUM-ERROR-DEPTH*" "%SET-SYMBOL-PLIST"
-	   "INFINITE-ERROR-PROTECT" "%SET-SIGNED-SAP-REF-8"
-	   "%SET-SIGNED-SAP-REF-16" "FIND-CALLER-NAME" "OLD-IN-PACKAGE"
+	   "INFINITE-ERROR-PROTECT"
+	   "FIND-CALLER-NAME" "OLD-IN-PACKAGE"
 	   "%SET-SYMBOL-VALUE" "%SET-SYMBOL-PACKAGE" "OUTPUT-SYMBOL-NAME"
-	   "FSET" "RAW-DEFINITION" "%IN-PACKAGE" "%SET-SIGNED-SAP-REF-32"
+	   "FSET" "RAW-DEFINITION" "%IN-PACKAGE" 
 	   "INVOKE-MACROEXPAND-HOOK" "TYPEDEF-INIT" "DEFAULT-STRUCTURE-PRINT"
 	   "LAYOUT" "LAYOUT-LENGTH" "RATIOP" "FIXNUMP"
 	   "LAMBDA-WITH-ENVIRONMENT" "LAYOUT-PURE" "DSD-RAW-TYPE"