[Openmcl-devel] BUG: bad negation of arguments declared as SHORT-FLOAT

[Pierpaolo Bernardi]

On Thu, Nov 17, 2011 at 17:27, Eric Marsden <eric.marsden at free.fr> wrote:
> Hi,
>
> This is on Linux/armel (current SVN).
>
> ,----
> | ? (lisp-implementation-version)
> | "Version 1.8-dev  (LinuxARM32)"
> | ? (defun foo (a)
> |     (declare (type short-float a))
> |     (- a))
> | FOO
> | ? (foo 0.0)
> | 1.0
> `----

Since you are passing an argument of the wrong type to FOO there's no
wonder the result is meaningless.

Or am I missing something?