errors with checks: bessel.lisp

Raymond Toy wrote:

>What version of clisp are you using?  I'm using 2.44.1.

I'm using 2.44:
GNU CLISP 2.44 (2008-02-02) (built 3416299861) (memory 3416300061)
Software: GNU-C 3.4.6 [FreeBSD] 20060305 
cc -O2 -fno-strict-aliasing -pipe -march=athlon64 -Igllib -W -Wswitch -Wcomment -Wpointer-arith -Wimplicit -Wreturn-type -Wmissing-declarations -Wno-sign-compare -O -DNO_MULTIMAP_SHM -DNO_MULTIMAP_FILE -DNO_SINGLEMAP -DNO_TRIVIALMAP -DUNICODE -DDYNAMIC_FFI -I. -L/usr/local/lib  -x none /usr/local/lib/libintl.so /usr/local/lib/libiconv.so -Wl,-rpath -Wl,/usr/local/lib /usr/local/lib/libreadline.so -Wl,-rpath -Wl,/usr/local/lib -lncurses /usr/local/lib/libavcall.a /usr/local/lib/libcallback.a /usr/local/lib/libiconv.so -Wl,-rpath -Wl,/usr/local/lib -L/usr/local/lib -lsigsegv -R/usr/local/lib -L/usr/local/lib -R/usr/local/lib
SAFETY=0 TYPECODES WIDE SPVW_PAGES SPVW_MIXED
libsigsegv 2.5
libiconv 1.11
libreadline 5.2
Features: 
(READLINE REGEXP SYSCALLS I18N LOOP COMPILER CLOS MOP CLISP ANSI-CL COMMON-LISP
 LISP=CL INTERPRETER SOCKETS GENERIC-STREAMS LOGICAL-PATHNAMES SCREEN FFI GETTEXT
 UNICODE BASE-CHAR=CHARACTER PC386 UNIX)
C Modules: (clisp i18n syscalls regexp readline)
Installation directory: /usr/local/lib/clisp/
User language: ENGLISH
Machine: AMD64 (AMD64) staffa.eder.local [192.168.0.22]

and indeed I see the same behaviour:

(coerce 42 '(double-float * 100d0))
(coerce 42 '(double-float 1d0))

both fail, but (coerce 42 'double-float) works.
I', not a language lawyer, but according to my reading of
http://www.lisp.org/HyperSpec/Body/typ_short-flo_m_long-float.html#double-float
that is an error of clisp.

Andreas