#467 (coerce 1 '(double-float 0d0)) fails

[Raymond Toy]

(coerce 1 'double-float) -> 1d0.

(coerce 1 '(double-float 0d0)) produces an error.

(coerce 1 '(double-float * *)) also produces an error, even though

(subtypep 'double-float '(double-float * *)) -> T, T
(subtypep '(double-float * *) 'double-float) -> T, T

I believe these are all valid uses of coerce.

Oh, this is clisp 2.44.1 on Sparc/solaris, if that matters.

[Sam Steingold]

Logged In: YES
user_id=5735
Originator: NO

thank you for your bug report.
the bug has been fixed in the CVS tree.
you can either wait for the next release (recommended)
or check out the current CVS tree (see http://clisp.cons.org\)
and build CLISP from the sources (be advised that between
releases the CVS tree is very unstable and may not even build
on your platform).