From a44a987a6203b1176e9f592a830b600a8f4ed2fc Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Mon, 5 Mar 1990 17:07:36 +0000
Subject: [PATCH] Changed let of *ALIEN-EVAL-WHEN* to be (COMPILE EVAL) rather
 than just (COMPILE) so that stuff will get evaluated at least once in the
 bootstrap environment.

---
 tools/worldcom.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/worldcom.lisp b/tools/worldcom.lisp
index 838495b98..bee24ca05 100644
--- a/tools/worldcom.lisp
+++ b/tools/worldcom.lisp
@@ -104,7 +104,7 @@
 (comf "nicode:machdefs")
 (comf "nicode:netnamedefs")
 
-(let ((system:*alien-eval-when* '(compile)))
+(let ((system:*alien-eval-when* '(compile eval)))
   (unless (probe-file "nicode:machuser.nfasl")
     (load "nicode:machmsgdefs.lisp")
     (comf "nicode:machuser"))
-- 
GitLab