[Sbcl-devel] weird compilation error

[Nathan F. <fr...@ro...>]

So I've been hacking out SB-ITERATE from the code (and it's done!  with
a reduction of 150K in sbcl.core) lately.  Except this evening, I ran
into the follow problem while recompiling with my FMAKUNBOUND patch
posted earlier.

Since I was fooling around with PCL stuff, I kept running
make-target-2.sh until I got everything to work -- then I ran a full
make.sh.  This worked earlier today.  Tonight I get the following:

; /home/nathan/lisp/sbcl/src/assembly/target/alloc.fasl written
; compilation finished in 0:00:00

debugger invoked on condition of type SIMPLE-ERROR:
  #S(SIMPLE-ERROR
     :ACTUAL-INITARGS (FORMAT-CONTROL A package named ~S already exists.
                       FORMAT-ARGUMENTS #)
     :ASSIGNED-SLOTS NIL)

Within the debugger, you can type HELP for help. At any command prompt
(within
the debugger or not) you can type (SB-EXT:QUIT) to terminate the SBCL
executable. The condition which caused the debugger to be entered is
bound to
*DEBUG-CONDITION*. You can suppress this message by clearing
*DEBUG-BEGINNER-HELP-P*.

restarts:
  0: [ABORT   ] #S(RESTART
                   :NAME ABORT
                   :FUNCTION #<FUNCTION "CLOSURE" {ADCFEAD}>
                   :REPORT-FUNCTION #<FUNCTION "<unknown>" {90A5FA5}>
                   :INTERACTIVE-FUNCTION NIL
                   :TEST-FUNCTION #<FUNCTION "<unknown>" {908BF1D}>)
  1: [TOPLEVEL] #S(RESTART
                   :NAME TOPLEVEL
                   :FUNCTION #<FUNCTION "CLOSURE" {ADCFE5D}>
                   :REPORT-FUNCTION #<FUNCTION "<unknown>" {90A5E1D}>
                   :INTERACTIVE-FUNCTION NIL
                   :TEST-FUNCTION #<FUNCTION "<unknown>" {908BF1D}>)
("locall COMMON-LISP:RENAME-PACKAGE"
 #S(PACKAGE
    :%NAME "SB!KERNEL"
    :%NICKNAMES NIL
    :%USE-LIST #
    :TABLES #
    :%USED-BY-LIST #
    ...)
 "SB-KERNEL"
 NIL)
0] backtrace 20

0: ("locall COMMON-LISP:RENAME-PACKAGE"
    #S(PACKAGE
       :%NAME "SB!KERNEL"
       :%NICKNAMES NIL
       :%USE-LIST #
       :TABLES #
       :%USED-BY-LIST #
       ...)
    "SB-KERNEL"
    NIL)
1: (#:EVAL-TMPFUN-4 0)[:EXTERNAL]
2: (SB-FASL::LOAD-AS-SOURCE
    3
    #S(SB-SYS:FD-STREAM :IN-BUFFER # :IN-INDEX 57 :IN # :BIN # :N-BIN #
...)
    NIL
    NIL)[:EXTERNAL]
3: ("locall SB!FASL::INTERNAL-LOAD"
    #S(PATHNAME :HOST # :DEVICE NIL :DIRECTORY # :NAME "warm" :TYPE
"lisp" ...)
    #S(PATHNAME :HOST # :DEVICE NIL :DIRECTORY # :NAME "warm" :TYPE
"lisp" ...)
    :ERROR
    NIL
    NIL
    :SOURCE)
4: ("locall SB!FASL::INTERNAL-LOAD"
    #S(PATHNAME :HOST # :DEVICE NIL :DIRECTORY # :NAME "warm" :TYPE
"lisp" ...)
    #S(PATHNAME :HOST # :DEVICE NIL :DIRECTORY # :NAME "warm" :TYPE
"lisp" ...)
    :ERROR
    NIL
    NIL
    NIL)
5: (LOAD 1 "src/cold/warm.lisp")[:EXTERNAL]
6: (INTERACTIVE-EVAL 1 (LOAD "src/cold/warm.lisp"))[:EXTERNAL]
7: (SB-IMPL::TOPLEVEL-REPL 1 NIL)[:EXTERNAL]
8: (SB!KERNEL:!COLD-INIT 0)[:EXTERNAL]

0] 

Besides the obvious unhappiness of SIMPLE-ERROR not printing correctly,
this seems a little unusual.  I'm attempting to rebuild with the
FMAKUNBOUND patch now, but I'm going to bed, so I won't get to see the
results until tomorrow morning.  This is with 0.pre7.85 (I haven't
updated to the newest CVS version yet because I've heard of some trouble
with it).
-- 
Nathan  |  http://www.rose-hulman.edu/~froydnj/  |  veritas aeterna

       Yes, God had a deadline.  So He wrote it all in Lisp.
          Lisp.  Everything else is just Turing complete.