diff --git a/code/exports.lisp b/code/exports.lisp
index 354ba4e519a2dd258cd86b235f6d1025badd775d..9ab4283f89e5a1de682fa4eff0044007b1e6e4b7 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.124 1997/08/30 18:21:34 dtc Exp $")
+  "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.125 1997/09/04 13:10:01 dtc Exp $")
 ;;;
 ;;; **********************************************************************
 ;;;
@@ -595,7 +595,7 @@
 (dolist
     (name
      '("%ARRAY-TYPEP" "%ASET" "%BITSET" "%CHARSET" "%PUT" "%RPLACA" "%RPLACD"
-       "%SBITSET" "%SCHARSET" "%SET-DOCUMENTATION" "%SET-FDEFINITION"
+       "%SBITSET" "%SCHARSET" "%SET-FDEFINITION"
        "%SET-FILL-POINTER" "%SET-ROW-MAJOR-AREF" "%SETELT" "%SETNTH"
        "%SP-STRING-COMPARE" "%SVSET" "%TYPEP" "*READ-ONLY-SPACE-FREE-POINTER*"
        "*STATIC-SPACE-FREE-POINTER*" "CURRENT-DYNAMIC-SPACE-START"
@@ -619,7 +619,7 @@
 			#+sgi "OLD-SGI")
             (:import-from "LISP" "%ARRAY-TYPEP" "%ASET" "%BITSET" "%CHARSET"
              "%PUT" "%RPLACA" "%RPLACD" "%SBITSET" "%SCHARSET"
-             "%SET-DOCUMENTATION" "%SET-FDEFINITION" "%SET-FILL-POINTER"
+             "%SET-FDEFINITION" "%SET-FILL-POINTER"
              "%SET-ROW-MAJOR-AREF" "%SETELT" "%SETNTH" "%SP-STRING-COMPARE"
              "%SVSET" "%TYPEP" "*READ-ONLY-SPACE-FREE-POINTER*"
              "*STATIC-SPACE-FREE-POINTER*" "CURRENT-DYNAMIC-SPACE-START"
@@ -1031,7 +1031,7 @@
 (dolist
     (name
      '("%ARRAY-TYPEP" "%ASET" "%BITSET" "%CHARSET" "%PUT"
-       "%RPLACA" "%RPLACD" "%SBITSET" "%SCHARSET" "%SET-DOCUMENTATION"
+       "%RPLACA" "%RPLACD" "%SBITSET" "%SCHARSET"
        "%SET-FDEFINITION" "%SET-FILL-POINTER" "%SET-ROW-MAJOR-AREF"
        "%SET-SAP-REF-DESCRIPTOR" "%SETELT" "%SETNTH" "%SP-STRING-COMPARE"
        "%SVSET" "%TYPEP" "LONG-FLOAT-P" "SHORT-FLOAT-P"
@@ -1042,7 +1042,7 @@
   (:nicknames "OLD-C")
   (:import-from "LISP" "%ARRAY-TYPEP" "%ASET"
 		"%BITSET" "%CHARSET" "%PUT" "%RPLACA" "%RPLACD" "%SBITSET"
-		"%SCHARSET" "%SET-DOCUMENTATION" "%SET-FDEFINITION"
+		"%SCHARSET" "%SET-FDEFINITION"
 		"%SET-FILL-POINTER" "%SET-ROW-MAJOR-AREF"
 		"%SET-SAP-REF-DESCRIPTOR" "%SETELT" "%SETNTH"
 		"%SP-STRING-COMPARE"