2009/6/27 Leslie P. Polzer <sky@...>:
> This is a slightly modified version of Lars' test case
> with the keywords simply being replaced by symbols:
Thank you! Fixed in 184.108.40.206.
> I think the culprit is somewhere here:
> (let ((defaults (class-default-initargs class)))
> (when defaults
> (setf initargs (default-initargs initargs defaults)))
> `(lambda ,lambda-list
> (declare #.*optimize-speed*)
> (fast-make-instance ,class ,@initargs))))))
> DEFAULT-INITARGS evaluates the arguments; doesn't seem to
> be a good thing to pass that on to FAST-MAKE-INSTANCE.
FWIW this was a correct analysis.