Hi, This is on Linux/armel (current SVN). ,---- | ? (lisp-implementation-version) | "Version 1.8-dev (LinuxARM32)" | ? (defun foo (p1) | (declare (type double-float p1)) | (symbolp p1)) | FOO | ? (foo 1.0d0) | T `---- -- Eric Marsden