[Openmcl-devel] BUG: incorrect argument checking in CALL-CHECK-REGS

Eric Marsden eric.marsden at free.fr
Fri Oct 21 08:30:50 PDT 2011


Hi,

,----
| ? (lisp-implementation-version)
| "Version 1.8-dev-r15032M  (LinuxX8664)"
| ? (defun foo (x)
|   (let ((a (cons (setf x 42) x)))
|     (abs (cdr a))))
| FOO
| ? (funcall 'foo 666)
| > Error: value #1=(42 . #1#) is not of the expected type NUMBER.
`----

-- 
Eric Marsden




More information about the Openmcl-devel mailing list