symbol/package conflicts in code/export.lisp

Hello


While do-worldbuild.sh was loading code/exports.lisp for a
preliminary worldbuild, I got the following error:

---
Error in batch processing:
Importing these symbols into the X86 package causes a name conflict:
(LISP::%ARRAY-TYPEP)
---

This is because of the (:import-from "LISP" "%ARRAY-TYPEP" ...) at line 871
of of code/exports.lisp


I can't seem to figure out what more is leading to the conflict, though. I'm
hoping someone here might know, so that the file can be fixed so that this
error won't come up during the world-build.


I know that a simple 

  (:shadowing-import-from "LISP" "%ARRAY-TYPEP")

..added to the defpackage form at line 862 of code/exports.lisp, should take
care of it, but I'm not sure about stumbling along to try that.




The following shows some info about "%ARRAY-TYPEP" by the time of the
'problematic' defpackage form:


---
* (find-symbol "%ARRAY-TYPEP" "X86")

COMMON-LISP::%ARRAY-TYPEP
:INTERNAL

* <load everything up to line 861 of code/exports.lisp>
;; that includes the form (in-package "LISP")
;; and does not include the 'problematic' redefinition of the X86 package.

* (find-symbol "%ARRAY-TYPEP" "X86")

%ARRAY-TYPEP
:INTERNAL

* *package*

#<The COMMON-LISP package, 1679/2369 internal, 978/1227 external>
---




Finally, here's some of what the x86 package looks like, , by line 861 of 
code/exports.lisp, for the cmucl image that i'm building this with:



---
* (describe (find-package :x86))

#<The X86 package, 1703/2012 internal, 326/410 external> is a structure of type 
PACKAGE.
TABLES: (NIL #<Package-Hashtable: Size = 1227, Free = 249, Deleted = 0>
         #<Package-Hashtable: Size = 1574, Free = 596, Deleted = 0>
         #<Package-Hashtable: Size = 44, Free = 13, Deleted = 0>
         #<Package-Hashtable: Size = 381, Free = 77, Deleted = 0> ...).
%NAME: "X86".
%NICKNAMES: ("VM").
%USE-LIST: (#<The LISP package, 30/610 internal, 978/1574 external>
            #<The NEW-ASSEM package, 197/390 internal, 31/44 external>
            #<The ALIEN-INTERNALS package, 0/4 internal, 91/95 external>
            #<The C-CALL package, 17/19 internal, 12/17 external>
            #<The ALIEN package, 380/467 internal, 34/44 external> ...).
%USED-BY-LIST: NIL.
INTERNAL-SYMBOLS: #<Package-Hashtable: Size = 2127, Free = 309, Deleted = 115>.
EXTERNAL-SYMBOLS: #<Package-Hashtable: Size = 410, Free = 84, Deleted = 0>.
%SHADOWING-SYMBOLS: NIL.
DOC-STRING: NIL.
2144 symbols total: 1818 internal and 326 external.
---



Does any of this help?



Thank you

--
sean champ