Comment 2 for bug 1888384

Revision history for this message
Paul F. Dietz (paul-f-dietz) wrote :

Another example, with yet another error message. Probably the same bug.

(defun bug020 ()
  (logbitp 20 (the (or (foo) (bar)) 1)))

==>

SB-VM::IMMEDIATE-CONSTANT fell through ECASE expression.
Wanted one of (SB-VM::STACK SB-KERNEL:CONSTANT).
   [Condition of type SB-KERNEL:CASE-FAILURE]

Restarts:
 0: [RETRY] Retry SLIME REPL evaluation request.
 1: [*ABORT] Return to SLIME's top level.
 2: [ABORT] abort thread (#<THREAD "new-repl-thread" RUNNING {103DDEC393}>)

Backtrace:
  0: (SB-X86-64-ASM::EMIT-EA #<SB-ASSEM:SEGMENT {103DF94D53}> #<SB-C:TN '1!1 :CONSTANT> 4 :REMAINING-BYTES 0 :XMM-INDEX NIL)
  1: ((FLET SB-X86-64-ASM::EMIT* :IN "SYS:SRC;COMPILER;X86-64;INSTS.LISP") #<SB-ASSEM:SEGMENT {103DF94D53}> :DWORD #<SB-C:TN '1!1 :CONSTANT> 20 NIL 4)
  2: (SB-ASSEM::%ASSEMBLE #<SB-ASSEM:SEGMENT {103DF94D53}> (#<SB-ASSEM::STMT IGNORE {103DF92543}> . #<SB-ASSEM::STMT .ALIGN {103DF94F13}>))