[Openmcl-devel] BUG: SETF ELT crashes on badly formed input

[Eric Marsden]

Hi,

Current CVS on Linux/AMD64 crashes on the following code:

,----
| ? (setf (elt '(0 1 . 2) 2) 42)
| Unhandled exception 11 at 0x40eae3, context->regs at #x40230728
| ? for help
| [16699] OpenMCL kernel debugger: B
| current thread: tcr = 0x402317c0, native thread ID = 0x413b, interrupts enabled
| (#x00002AAAAACBBB68) #x00003000404D6AA4 : #<Function CALL-CHECK-REGS #x00003000404D69BF> + 229
| (#x00002AAAAACBBBA0) #x00003000404CE55C : #<Function TOPLEVEL-EVAL #x00003000404CE3AF> + 429
| (#x00002AAAAACBBBF0) #x00003000404D03C4 : #<Function READ-LOOP #x00003000404CFC5F> + 1893
| (#x00002AAAAACBBDF8) #x00003000404D6374 : #<Function TOPLEVEL-LOOP #x00003000404D62EF> + 133
| (#x00002AAAAACBBE28) #x0000300040425C64 : #<Anonymous Function #x0000300040425BDF> + 133
| (#x00002AAAAACBBE40) #x000030004056E9E4 : #<Anonymous Function #x000030004056E6DF> + 773
| (#x00002AAAAACBBEC8) #x0000300040439C2C : #<Function RUN-PROCESS-INITIAL-FORM #x000030004043996F> + 701
| (#x00002AAAAACBBF48) #x000030004043A5AC : #<Anonymous Function #x000030004043A41F> + 397
| (#x00002AAAAACBBF98) #x000030004041B5AC : #<Anonymous Function #x000030004041B43F> + 365
`----

-- 
Eric Marsden