diff --git a/code/exports.lisp b/code/exports.lisp index 2eb30a5651ae5ba0e504d59dce7b1a9c682b4b16..d842e68bec4ab9c488e37e691de2c2665db5709a 100644 --- a/code/exports.lisp +++ b/code/exports.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman (FAHLMAN@CMUC). ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.30 1990/06/03 18:55:50 ch Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.31 1990/06/08 15:06:50 wlott Exp $ ;;; ;;; All the stuff necessary to export various symbols from various packages. ;;; @@ -519,6 +519,48 @@ lambda-eval-info-args-passed lambda-eval-info-entries lambda-eval-info-frame-size)) +(in-package "LISP") +(import '( + %aset + %bitset + %charset + %primitive + %put + %raw-bits + %rplaca + %rplacd + %sbitset + %scharset + %set-documentation + %set-fdefinition + %set-fill-pointer + %set-row-major-aref + %setelt + %setnth + %sp-set-definition + %sp-set-plist + %standard-char-p + %string-char-p + %svset + %typep + %array-typep + array-header-p + base-char-p + double-float-p + long-float-p + short-float-p + simple-array-p + single-float-p + string<* + string>* + string<=* + string>=* + string=* + string/=* + %sp-string-compare + ) + "C") + (in-package "ASSEM")