Invalid type error on complex number and EQL/MEMBER types
Bug #1838981 reported by
Paul F. Dietz
This bug report is a duplicate of:
Bug #1734959: COMPLEX on union types gets incorrectly broken up.
Edit
Remove
This bug affects 1 person
Affects | Status | Importance | Assigned to | Milestone | |
---|---|---|---|---|---|
SBCL |
New
|
Undecided
|
Unassigned |
Bug Description
(defun f383 (p2 q)
(declare (type (eql #c(-0.10169491 -45424.293)) p2))
(= #c(135273078387
(the (member #c(-0.10169491 -45424.293)
(flet ((%f (x) (the (complex single-float) x)))
(if q
(%f p2)
(%f '#c(-43690.79 -51535.13)))))
-2))
(f383 #c(-0.10169491 -45424.293) t) ==> type error
To post a comment you must log in.