From 4d4bd1ed1690ad258bb0a4dccd9cf30d7f60115e Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@jjgr-2.local>
Date: Fri, 19 Jun 2009 11:24:01 +0200
Subject: [PATCH] The compiler now also uses the cl_core.*_package constants

---
 src/cmp/cmpct.lsp | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/src/cmp/cmpct.lsp b/src/cmp/cmpct.lsp
index b8accff8c..c44cbffcf 100644
--- a/src/cmp/cmpct.lsp
+++ b/src/cmp/cmpct.lsp
@@ -108,6 +108,13 @@
 
    (#.(si::standard-readtable) "cl_core.standard_readtable")
 
+   (#.(find-package :cl) "cl_core.lisp_package")
+   (#.(find-package :cl-user) "cl_core.user_package")
+   (#.(find-package :keyword) "cl_core.keyword_package")
+   (#.(find-package :clos) "cl_core.clos_package")
+   #+threads
+   (#.(find-package :mp) "cl_core.mp_package")
+
    #+long-float
    ,@'(
     (MOST-POSITIVE-LONG-FLOAT "LDBL_MAX")