Uncaught error in MEMBER-IF with improper list argument
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
SBCL |
Fix Released
|
Undecided
|
Unassigned |
Bug Description
(lambda () (member-if #'(lambda (x) (evenp x)) '(1 2 3 . 4)))
==>
The value
4
is not of type
LIST
[Condition of type TYPE-ERROR]
Restarts:
0: [ABORT] Exit debugger, returning to top level.
Backtrace:
0: ((FLET SB-IMPL:
1: (SB-C::
2: ((SB-C:DEFTRANSFORM MEMBER-IF) #<SB-C::COMBINATION :FUN #<SB-C::REF :LEAF #<SB-C::GLOBAL-VAR :%SOURCE-NAME MEMBER-IF :TYPE #1=#<SB-
3: (SB-C::
MEMBER-IF-NOT shows the same bug on the same arguments.
Changed in sbcl: | |
status: | Fix Committed → Fix Released |
17871fbbfdcadf8 9bd33b42d285d67 cef806b162