Incorrect value with nested ifs, equalp conditions
Bug #2055425 reported by
Paul F. Dietz
This bug affects 1 person
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
SBCL |
Fix Released
|
Undecided
|
Unassigned |
Bug Description
(defun f337 (p1 p2 p3)
(declare (type (member 0 #\p) p1))
(if (equalp p1 (the (member #\p #\P) p2))
:a
(if (equalp p1 p3)
:b
:c)))
(defun f337u (p1 p2 p3)
(if (equalp p1 p2)
:a
(if (equalp p1 p3)
:b
:c)))
(f337 #\p #\P nil) ==> :c
(f337u #\p #\P nil) ==> :a
x86-64, "2.4.2.7-e02bb68bd"
Changed in sbcl: | |
status: | New → Fix Committed |
Changed in sbcl: | |
status: | Fix Committed → Fix Released |
To post a comment you must log in.