[movitz-devel] Aref compilation problem with CMU-cl

[Elliott]

Frode,

I guess I'm gonna make you work for that vacation time :)  I 
grabbed the latest from CVS and ran into some trouble with AREF.  
It has a problem with an etypecase keyform.  I have trouble 
following it, but it seems to be at line 248 of 
movitz/losp/muerte/arrays.lisp
	
	(() () '(:sub-program (unknown) (:int 100)))
	 
Here is the error I get:

('UNKNOWN) fell through ETYPECASE expression.
Wanted one of (IA-X86:INSTRUCTION IA-X86::INLINE-DATA IA-X86::ALIGNMENT SYMBOL).
   [Condition of type CONDITIONS::CASE-FAILURE]

Heres the first couple of backtrace lines:

0: (IA-X86::PROGLIST-ENCODE-INTERNAL (#<asm SHRL 8 ECX> #<asm ANDL 7 ECX> #<asm JMP [(+ 26 BASIC-VECTOR-DISPATCHER)+%ESI+%ECX*4]> MUERTE::NOT-VECTOR 
#<asm MOVL EAX EBX> ...) #S(IA-X86::ASSEMBLE-ENV :SYMTAB (# # #) :CURRENT-PC 88) (<unresolved: (#1=cond-skip-0-52747)> <unresolved: (#1#)> <unresolved: 
(NOT-TWO-ARGS)>) (#C(16733702 3) #C(9138941 3) #C(9131614 3) #C(9127486 3) #C(9133556 3) ...) ...)
1: (IA-X86::PROGLIST-ENCODE-INTERNAL (#<asm TESTB 3 BL> #<asm JNZ (QUOTE ILLEGAL-INDEX)> #<asm SHRL 8 ECX> #<asm ANDL 7 ECX> #<asm JMP [(+ 26 
BASIC-VECTOR-DIPATCHER)+%ESI+%ECX*4]> ...) #S(IA-X86::ASSEMBLE-ENV :SYMTAB (#) :CURRENT-PC 47) (<unresolved: (NOT-VECTOR)> <unresolved: 
(#1=cond-skip-0-52747)> <unresolved: (#1#)> <unresolved: (NOT-TWO-ARGS)>) (#C(29979 2) #C(16171779 3) #C(29967 2) #C(8452386 3) #C(9128186 3) ...) ...)

-Elliott