ECL has the same issue that was resolved in 463522d for CCL and SBCL.
This commit is contained in:
parent
b15b0b1e75
commit
277eb3f980
@ -373,7 +373,7 @@
|
||||
(with-absm (dgop gmsm) absm
|
||||
(multiple-value-bind (dgop2 1dlop) (1dlop-dgop indx dgop)
|
||||
(declare (fixnum dgop2)
|
||||
#-(or ccl lispworks sbcl)
|
||||
#-(or ccl ecl lispworks sbcl)
|
||||
(type (or fixnum nil) 1dlop))
|
||||
;; Bug LispWorks if this or-type defined
|
||||
(unless 1dlop
|
||||
|
||||
Loading…
Reference in New Issue
Block a user