From bce203e0a413e2b813034dd32674bc8e8ca1d37e Mon Sep 17 00:00:00 2001 From: dtc <dtc> Date: Tue, 23 May 2000 05:45:32 +0000 Subject: [PATCH] Add %defpackage to the magic top-level forms handled by process-form so that the package definition is not delayed; fixes a problem noted by Sam Steingold. --- compiler/main.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/compiler/main.lisp b/compiler/main.lisp index 0189b1bd7..c5b890378 100644 --- a/compiler/main.lisp +++ b/compiler/main.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/compiler/main.lisp,v 1.116 2000/04/06 11:05:53 pw Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/main.lisp,v 1.117 2000/05/23 05:45:32 dtc Exp $") ;;; ;;; ********************************************************************** ;;; @@ -1081,7 +1081,7 @@ (case (car form) ((make-package shadow shadowing-import export unexport use-package unuse-package import - old-in-package %in-package) + old-in-package %in-package %defpackage) (process-cold-load-form form path t)) ((error cerror break signal) (process-cold-load-form form path nil)) -- GitLab