From 496ca25659180bb29cc5fea2f3c0337695d742d3 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sat, 1 Oct 2011 22:21:23 +0000
Subject: 	* boot/parser.boot (bpImport): Accept long names for used
 namespaces. 	* boot/translator.boot (packageBody): Tidy. 
 (translateToplevel): Likewise. 	(getIntermediateLispFile): Likewise. 
 * interp/sys-os.boot: Import System.Foreign.

---
 src/boot/strap/utility.clisp | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'src/boot/strap/utility.clisp')

diff --git a/src/boot/strap/utility.clisp b/src/boot/strap/utility.clisp
index 7137a1c6..8a06ff0c 100644
--- a/src/boot/strap/utility.clisp
+++ b/src/boot/strap/utility.clisp
@@ -1,6 +1,5 @@
 (PROCLAIM '(OPTIMIZE SPEED))
-(EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE)
-  (UNLESS (FIND-PACKAGE #1="BOOTTRAN") (MAKE-PACKAGE #1#)))
+(DEFPACKAGE "BOOTTRAN")
 
 (EVAL-WHEN (:COMPILE-TOPLEVEL :LOAD-TOPLEVEL :EXECUTE)
   (PROGN
-- 
cgit v1.2.3