On Sat, 14 Feb 2003, rif wrote:

> 
> 
> I spoke too soon.
> > (defun square-df (x)
> >   (declare (double-float x))
> >   (prog ((var 0.0d0))
> >      (setq var (* x x))
> >      var))
> 
> is faster because it doesn't work.  It returns NIL instead of the
> square of the number.  I don't understand why, and I'm still left with
> the question of is there any way to make this faster?

As far as I remember, PROG returned with value only when you use RETURN.
Try to check if this is true with ANSI CL --- maybe I'm wrong.

Zbyszek Jurkiewicz


Reply via email to