[elephant-devel] Bug on SBCL 1.16.11

[Leonardo Varuzza]

I have this bug when compiling elephant on SBCL 1.16.11 (latest
version) runing on Ubuntu 8.04 x86-64:

no :MOVE-ARG VOP defined to move #<SB-C:TN t1> (SC SB-VM::SINGLE-REG)
to #<SB-C:TN t2> (SC SB-VM::ANY-REG)
   [Condition of type SIMPLE-ERROR]

Restarts:
  0: [RETRY] Retry performing #<ASDF:COMPILE-OP NIL {10027184C1}> on
#<ASDF:CL-SOURCE-FILE "serializer1" {1003F29981}>.
  1: [ACCEPT] Continue, treating #<ASDF:COMPILE-OP NIL {10027184C1}>
on #<ASDF:CL-SOURCE-FILE "serializer1" {1003F29981}> as having been
successful.
  2: [ABORT] Abort SLIME compilation.
  3: [ABORT-REQUEST] Abort handling SLIME request.
  4: [TERMINATE-THREAD] Terminate this thread (#<THREAD "repl-thread"
{10034B8391}>)

Backtrace:
  0: (SB-C::BAD-MOVE-ARG-ERROR #<SB-C:TN t1> #<SB-C:TN t2>)
  1: (SB-C::BAD-MOVE-ARG-ERROR #<SB-C:TN t1> #<SB-C:TN t2>)[:EXTERNAL]
  2: (SB-C::EMIT-ARG-MOVES #<SB-C::VOP :INFO SB-C:CALL-LOCAL :ARGS
#<SB-C:TN-REF :TN #<SB-C:TN t3> :WRITE-P NIL :VOP SB-C:CALL-LOCAL>
:RESULTS NIL :CODEGEN-INFO ((#<SB-C:TN t2> #<SB-C:TN t4> #<SB-C:TN
t5>) #<SB-C::IR2-PHYSENV :CLOSURE # :OLD-FP #<SB-C:TN t6[S0]>
:RETURN-PC #<SB-C:TN t7[S1]> :RETURN-PC-PASS #<SB-C:TN t8[S1]>>
#<SB-ASSEM:LABEL 1> 0)>)
  3: (SB-C::EMIT-MOVES-AND-COERCIONS #<SB-C::IR2-BLOCK  :START-VOP
#<SB-C::VOP :INFO SB-C:FAST-SYMBOL-VALUE :ARGS #<SB-C:TN-REF :TN
#<SB-C:TN 'ELEPHANT-SERIALIZER1::*LISP-OBJ-ID*!9[Const6]> :WRITE-P NIL
:VOP SB-C:FAST-SYMBOL-VALUE> :RESULTS #<SB-C:TN-REF :TN #<SB-C:TN t10>
:WRITE-P T :VOP SB-C:FAST-SYMBOL-VALUE>> :LAST-VOP #<SB-C::VOP :INFO
SB-C:CALL-LOCAL :ARGS #<SB-C:TN-REF :TN #<SB-C:TN t11> :WRITE-P NIL
:VOP SB-C:CALL-LOCAL> :RESULTS NIL :CODEGEN-INFO (# # #<SB-ASSEM:LABEL
1> 0)>>)
  4: (SB-C::SELECT-REPRESENTATIONS #<SB-C:COMPONENT :NAME (FLET
#:|CLEANUP-FUN-[ELEPHANT-MEMUTIL::%COPY-STR-TO-BUF]24|) {10035874E1}>)
  5: (SB-C::%COMPILE-COMPONENT #<SB-C:COMPONENT :NAME (FLET
#:|CLEANUP-FUN-[ELEPHANT-MEMUTIL::%COPY-STR-TO-BUF]24|) {10035874E1}>)
  6: (SB-C::COMPILE-COMPONENT #<SB-C:COMPONENT :NAME (FLET
#:|CLEANUP-FUN-[ELEPHANT-MEMUTIL::%COPY-STR-TO-BUF]24|) {10035874E1}>)
  7: (SB-C::%COMPILE (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE (ELEPHANT-SERIALIZER1::FROB
ELEPHANT-SERIALIZER1::BS ELEPHANT-SERIALIZER1::SC) (DECLARE (OPTIMIZE
# #) (TYPE ELEPHANT-MEMUTIL:BUFFER-STREAM ELEPHANT-SERIALIZER1::BS)
(IGNORE ELEPHANT-SERIALIZER1::SC)) (BLOCK
ELEPHANT-SERIALIZER1::SERIALIZE (SETQ
ELEPHANT-SERIALIZER1::*LISP-OBJ-ID* 0)
(ELEPHANT-SERIALIZER1::CLEAR-CIRCULARITY-HASH) (LABELS # #
ELEPHANT-SERIALIZER1::BS))) #<SB-FASL:FASL-OUTPUT
"/home/varuzza/lisp/prog/elephant/src/elephant/serializer1.fasl">)[:EXTERNAL]
  8: (SB-C::FOPCOMPILE-FUNCTION (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE (ELEPHANT-SERIALIZER1::FROB
ELEPHANT-SERIALIZER1::BS ELEPHANT-SERIALIZER1::SC) (DECLARE (OPTIMIZE
# #) (TYPE ELEPHANT-MEMUTIL:BUFFER-STREAM ELEPHANT-SERIALIZER1::BS)
(IGNORE ELEPHANT-SERIALIZER1::SC)) (BLOCK
ELEPHANT-SERIALIZER1::SERIALIZE (SETQ
ELEPHANT-SERIALIZER1::*LISP-OBJ-ID* 0)
(ELEPHANT-SERIALIZER1::CLEAR-CIRCULARITY-HASH) (LABELS # #
ELEPHANT-SERIALIZER1::BS))) (#1=(SB-IMPL::%DEFUN (QUOTE
ELEPHANT-SERIALIZER1::SERIALIZE) (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE # # #) "Serialize a lisp value into a
buffer-stream." (QUOTE #) (SB-C:SOURCE-LOCATION)) #2=(EVAL-WHEN
(:LOAD-TOPLEVEL :EXECUTE) #1#) (PROGN (EVAL-WHEN # #) #2#)
SB-C::ORIGINAL-SOURCE-START 0 33) T)
  9: (SB-C::FOPCOMPILE (SB-IMPL::%DEFUN (QUOTE
ELEPHANT-SERIALIZER1::SERIALIZE) (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE . #1=(# # #)) "Serialize a lisp value
into a buffer-stream." (QUOTE (SB-C:LAMBDA-WITH-LEXENV NIL NIL NIL .
#1#)) (SB-C:SOURCE-LOCATION)) (#1=(SB-IMPL::%DEFUN (QUOTE
ELEPHANT-SERIALIZER1::SERIALIZE) (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE # # #) "Serialize a lisp value into a
buffer-stream." (QUOTE #) (SB-C:SOURCE-LOCATION)) #2=(EVAL-WHEN
(:LOAD-TOPLEVEL :EXECUTE) #1#) (PROGN (EVAL-WHEN # #) #2#)
SB-C::ORIGINAL-SOURCE-START 0 33) NIL)
 10: (SB-C::CONVERT-AND-MAYBE-COMPILE (SB-IMPL::%DEFUN (QUOTE
ELEPHANT-SERIALIZER1::SERIALIZE) (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE . #1=(# # #)) "Serialize a lisp value
into a buffer-stream." (QUOTE (SB-C:LAMBDA-WITH-LEXENV NIL NIL NIL .
#1#)) (SB-C:SOURCE-LOCATION)) (#1=(SB-IMPL::%DEFUN (QUOTE
ELEPHANT-SERIALIZER1::SERIALIZE) (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE # # #) "Serialize a lisp value into a
buffer-stream." (QUOTE #) (SB-C:SOURCE-LOCATION)) #2=(EVAL-WHEN
(:LOAD-TOPLEVEL :EXECUTE) #1#) (PROGN (EVAL-WHEN # #) #2#)
SB-C::ORIGINAL-SOURCE-START 0 33))
 11: ((FLET SB-C::DEFAULT-PROCESSOR) (SB-IMPL::%DEFUN (QUOTE
ELEPHANT-SERIALIZER1::SERIALIZE) (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE . #1=(# # #)) "Serialize a lisp value
into a buffer-stream." (QUOTE (SB-C:LAMBDA-WITH-LEXENV NIL NIL NIL .
#1#)) (SB-C:SOURCE-LOCATION)))
 12: (SB-C::PROCESS-TOPLEVEL-FORM (SB-IMPL::%DEFUN (QUOTE
ELEPHANT-SERIALIZER1::SERIALIZE) (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE . #1=(# # #)) "Serialize a lisp value
into a buffer-stream." (QUOTE (SB-C:LAMBDA-WITH-LEXENV NIL NIL NIL .
#1#)) (SB-C:SOURCE-LOCATION)) (#1=(EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE)
(SB-IMPL::%DEFUN # # "Serialize a lisp value into a buffer-stream." #
#)) (PROGN (EVAL-WHEN # #) #1#) SB-C::ORIGINAL-SOURCE-START 0 33) NIL)
 13: (SB-C::PROCESS-TOPLEVEL-PROGN ((SB-IMPL::%DEFUN (QUOTE
ELEPHANT-SERIALIZER1::SERIALIZE) (SB-INT:NAMED-LAMBDA
ELEPHANT-SERIALIZER1::SERIALIZE # # #) "Serialize a lisp value into a
buffer-stream." (QUOTE #) (SB-C:SOURCE-LOCATION))) (#1=(EVAL-WHEN
(:LOAD-TOPLEVEL :EXECUTE) (SB-IMPL::%DEFUN # # "Serialize a lisp value
into a buffer-stream." # #)) (PROGN (EVAL-WHEN # #) #1#)
SB-C::ORIGINAL-SOURCE-START 0 33) NIL)
 14: (SB-C::PROCESS-TOPLEVEL-FORM (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE)
(SB-IMPL::%DEFUN (QUOTE ELEPHANT-SERIALIZER1::SERIALIZE)
(SB-INT:NAMED-LAMBDA ELEPHANT-SERIALIZER1::SERIALIZE # # #) "Serialize
a lisp value into a buffer-stream." (QUOTE #) (SB-C:SOURCE-LOCATION)))
((PROGN (EVAL-WHEN # #) (EVAL-WHEN # #)) SB-C::ORIGINAL-SOURCE-START 0
33) NIL)
 15: (SB-C::PROCESS-TOPLEVEL-PROGN ((EVAL-WHEN (:COMPILE-TOPLEVEL)
(SB-C:%COMPILER-DEFUN # # T)) (EVAL-WHEN (:LOAD-TOPLEVEL :EXECUTE)
(SB-IMPL::%DEFUN # # "Serialize a lisp value into a buffer-stream." #
#))) ((PROGN (EVAL-WHEN # #) (EVAL-WHEN # #))
SB-C::ORIGINAL-SOURCE-START 0 33) NIL)
 16: (SB-C::PROCESS-TOPLEVEL-FORM (PROGN (EVAL-WHEN
(:COMPILE-TOPLEVEL) (SB-C:%COMPILER-DEFUN # # T)) (EVAL-WHEN
(:LOAD-TOPLEVEL :EXECUTE) (SB-IMPL::%DEFUN # # "Serialize a lisp value
into a buffer-stream." # #))) (SB-C::ORIGINAL-SOURCE-START 0 33) NIL)
 17: ((FLET SB-C::DEFAULT-PROCESSOR) (DEFUN
ELEPHANT-SERIALIZER1::SERIALIZE (ELEPHANT-SERIALIZER1::FROB
ELEPHANT-SERIALIZER1::BS ELEPHANT-SERIALIZER1::SC) "Serialize a lisp
value into a buffer-stream." (DECLARE (OPTIMIZE # #) (TYPE
ELEPHANT-MEMUTIL:BUFFER-STREAM ELEPHANT-SERIALIZER1::BS) (IGNORE
ELEPHANT-SERIALIZER1::SC)) (SETQ ELEPHANT-SERIALIZER1::*LISP-OBJ-ID*
0) (ELEPHANT-SERIALIZER1::CLEAR-CIRCULARITY-HASH) (LABELS (#)
(ELEPHANT-SERIALIZER1::%SERIALIZE ELEPHANT-SERIALIZER1::FROB)
ELEPHANT-SERIALIZER1::BS)))
 18: (SB-C::PROCESS-TOPLEVEL-FORM (DEFUN
ELEPHANT-SERIALIZER1::SERIALIZE (ELEPHANT-SERIALIZER1::FROB
ELEPHANT-SERIALIZER1::BS ELEPHANT-SERIALIZER1::SC) "Serialize a lisp
value into a buffer-stream." (DECLARE (OPTIMIZE # #) (TYPE
ELEPHANT-MEMUTIL:BUFFER-STREAM ELEPHANT-SERIALIZER1::BS) (IGNORE
ELEPHANT-SERIALIZER1::SC)) (SETQ ELEPHANT-SERIALIZER1::*LISP-OBJ-ID*
0) (ELEPHANT-SERIALIZER1::CLEAR-CIRCULARITY-HASH) (LABELS (#)
(ELEPHANT-SERIALIZER1::%SERIALIZE ELEPHANT-SERIALIZER1::FROB)
ELEPHANT-SERIALIZER1::BS)) (SB-C::ORIGINAL-SOURCE-START 0 33) NIL)
 19: (SB-C::SUB-SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >)
 20: ((LAMBDA NIL))
 21: (SB-C::%WITH-COMPILATION-UNIT #<CLOSURE (LAMBDA NIL)
{1003C9F409}>)[:EXTERNAL]
 22: (SB-C::SUB-COMPILE-FILE #<SB-C::SOURCE-INFO >)
 23: (COMPILE-FILE
#P"/home/varuzza/lisp/prog/elephant/src/elephant/serializer1.lisp")[:EXTERNAL]


-- 
The most fundamental particles in this product are held together by a
"gluing" force about which little is currently known and whose
adhesive power can therefore not be permanently guaranteed.