Comment 1 for bug 1489590

Revision history for this message
Attila Lendvai (attila-lendvai) wrote :

it seems to be a recent regression.

CL-USER> (labels ((foo ()
                    (declare (optimize speed))
                    (sb-ext:get-time-of-day)))
           (multiple-value-list (multiple-value-prog1
                                    (apply #'values (list 1))
                                  (foo))))
(1)
CL-USER> (lisp-implementation-version)
"1.2.13.90.hu.dwim.2-43e2c8b"