Can't SET-INFO-VALUE on PCL-internal function
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
SBCL |
New
|
Undecided
|
Unassigned |
Bug Description
(LAMBDA (x) (DEFMETHOD CLOSE :AFTER ((X (EQL X)) CLASS-OF (&REST JUNK))))
==>
Can't SET-INFO-VALUE on PCL-internal function
[Condition of type SIMPLE-ERROR]
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 {10488B6C33}>)
Backtrace:
0: (SB-INT:
1: (SB-C::IR1-FINALIZE #<SB-C:COMPONENT :NAME (LAMBDA (X)) {1048962D73}>)
2: (SB-C::IR1-PHASES #<SB-C:COMPONENT :NAME (LAMBDA (X)) {1048962D73}>)
3: (SB-C::
4: (SB-C::%COMPILE (LAMBDA (X) (DEFMETHOD CLOSE :AFTER (# CLASS-OF #))) #<SB-C::CORE-OBJECT {10488D6623}> :NAME NIL :PATH (SB-C::
[...]
well, the syntax there is bad, so this isn't a failure to compile correct code.
The CLOSE method ought to have a keyword arg, but this looks like three positional args the third of which is suspiciously named &REST and whose class is named JUNK.
It should have hit the error about mismatched signatures.