8172 |
(dotimes (iv3 1 0) (logxor iv3 1285775))))) |
(dotimes (iv3 1 0) (logxor iv3 1285775))))) |
8173 |
0) |
0) |
8174 |
|
|
8175 |
|
;;; sbcl 0.8.15.13 |
8176 |
|
;;; NIL is not of type REAL |
8177 |
|
;;; (This appears to be related to DYNAMIC-EXTENT) |
8178 |
|
|
8179 |
|
(deftest misc.427 |
8180 |
|
(funcall |
8181 |
|
(compile |
8182 |
|
nil |
8183 |
|
'(lambda (a) |
8184 |
|
(declare (notinline list reduce logior)) |
8185 |
|
(declare (optimize (safety 2) (compilation-speed 1) |
8186 |
|
; #+sbcl (sb-c:insert-step-conditions 0) |
8187 |
|
(speed 3) (space 2) (debug 2))) |
8188 |
|
(logior |
8189 |
|
(let* ((v5 (reduce #'+ (list 0 a)))) |
8190 |
|
(declare (dynamic-extent v5)) |
8191 |
|
v5)))) |
8192 |
|
17) |
8193 |
|
17) |