Re: [Maxima-commits] CVS: maxima-pre59/src trmode.lisp,1.3,1.4

James Amundson wrote:

> Update of /cvsroot/maxima/maxima-pre59/src
> In directory usw-pr-cvs1:/tmp/cvs-serv16373
>
> Modified Files:
>         trmode.lisp
> Log Message:
> funcall fix from Vadim V. Zhytnikov
>
> Index: trmode.lisp
> ===================================================================
> RCS file: /cvsroot/maxima/maxima-pre59/src/trmode.lisp,v
> retrieving revision 1.3
> retrieving revision 1.4
> diff -u -d -r1.3 -r1.4
> --- trmode.lisp 2001/11/25 07:38:18     1.3
> +++ trmode.lisp 2002/01/07 18:49:35     1.4
> @@ -220,12 +220,12 @@
>    (COND ((or val-givenp (not (eq v val)))
>          ; hack because macsyma PROG binds variable
>          ; to itself.
> -        (let ((CHECKER (ASSQ MODE `(($FLOAT . FLOATP)
> +        (let ((CHECKER (ASSQ MODE '(($FLOAT . FLOATP)
>                                      ($FIXNUM . INTEGERP)
>                                      ($NUMBER . NUMBERP)
>                                      ($LIST . $LISTP)
> -                                    ($BOOLEAN . ,#'(LAMBDA (U)
> -                                                     (MEMQ U '(T NIL)))))))
> +                                    ($BOOLEAN . (LAMBDA (U)
> +                                                  (MEMQ U '(T NIL)))))))
>                (nchecker (assq mode '(($float . $real)
>                                       ($fixnum . $integer)
>                                       ($complex . $complex))))
>
> _______________________________________________
> Maxima-commits mailing list
> Maxima-commits@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/maxima-commits

Hi James!

You just occasionally rolled back the fix 
I already made to trmode.lisp
in December
  define_variable(foo,true,boolean);
once again gives an error. ;-)

Vadim


--

[ Vadim V. Zhytnikov  <vvzhy@mail.ru>  <vvzhy@td.lpi.ac.ru> ]