From 67ddf3177d8c21b7b368768ea7f13ce0999d32f6 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Thu, 29 Nov 1990 01:17:49 +0000 Subject: [PATCH] When we see a package frobber, we need to compile pending top-leve forms *before* we eval it, not after. --- compiler/main.lisp | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/compiler/main.lisp b/compiler/main.lisp index a5d619dd3..3a808eba5 100644 --- a/compiler/main.lisp +++ b/compiler/main.lisp @@ -897,10 +897,12 @@ (case (car form) ((make-package in-package shadow shadowing-import export unexport use-package unuse-package import) + (typecase object + (fasl-file + (compile-top-level-lambdas () t object))) (eval form) (etypecase object (fasl-file - (compile-top-level-lambdas () t object) (fasl-dump-cold-load-form form object)) ((or null core-object) (convert-and-maybe-compile form path object)))) -- GitLab