From c645eb0f7894314776c080aeebffcf9aac1e6344 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Fri, 8 Jun 1990 15:06:50 +0000 Subject: [PATCH] Imported many internal routines from the lisp package into the c package. These should really be part of the kernel package. --- code/exports.lisp | 44 +++++++++++++++++++++++++++++++++++++++++++- 1 file changed, 43 insertions(+), 1 deletion(-) diff --git a/code/exports.lisp b/code/exports.lisp index 2eb30a565..d842e68be 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") -- GitLab