From c79ff02d2250246c16fa4103e43fb5a0abf28ebf Mon Sep 17 00:00:00 2001 From: dtc <dtc> Date: Tue, 23 May 2000 05:43:14 +0000 Subject: [PATCH] Move the symbol %defpackage from the LISP to the KERNEL package and export it. --- code/exports.lisp | 4 ++-- code/package.lisp | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/code/exports.lisp b/code/exports.lisp index 16e0e27e3..5d351dcdc 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.168 2000/05/02 04:44:03 dtc Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.169 2000/05/23 05:43:14 dtc Exp $") ;;; ;;; ********************************************************************** ;;; @@ -1622,7 +1622,7 @@ "INFINITE-ERROR-PROTECT" "FIND-CALLER-NAME" "OLD-IN-PACKAGE" "%SET-SYMBOL-VALUE" "%SET-SYMBOL-PACKAGE" "OUTPUT-SYMBOL-NAME" - "FSET" "RAW-DEFINITION" "%IN-PACKAGE" + "FSET" "RAW-DEFINITION" "%IN-PACKAGE" "%DEFPACKAGE" "INVOKE-MACROEXPAND-HOOK" "TYPEDEF-INIT" "DEFAULT-STRUCTURE-PRINT" "LAYOUT" "LAYOUT-LENGTH" "RATIOP" "FIXNUMP" "LAMBDA-WITH-ENVIRONMENT" "LAYOUT-PURE" "DSD-RAW-TYPE" diff --git a/code/package.lisp b/code/package.lisp index 39c580edb..c2123e98d 100644 --- a/code/package.lisp +++ b/code/package.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/package.lisp,v 1.52 1999/05/04 13:11:59 pw Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/package.lisp,v 1.53 2000/05/23 05:43:14 dtc Exp $") ;;; ;;; ********************************************************************** ;;; @@ -30,7 +30,7 @@ map-apropos)) (in-package "KERNEL") -(export '(%in-package old-in-package)) +(export '(%in-package old-in-package %defpackage)) (in-package "LISP") -- GitLab