bug: sign(max(7,x) - max(6,x)) --> error



On 6/16/08, Barton Willis <willisb at unk.edu> wrote:

> It's OK with the cvs version of compar. I guess this bug is fixed:
>
>  (%i1) load("compar.lisp")$
>  (%i2) sign(max(7,x) - max(6,x));
>  (%o2) pnz

I don't think it is fixed. After updating from CVS and compiling,
the bug is there. But if I load compar.lisp by hand, it works.

(%i1) build_info();
Maxima version: 5.15.0cvs
Maxima build date: 19:58 6/16/2008
host type: i686-pc-linux-gnu
lisp-implementation-type: CLISP
lisp-implementation-version: 2.38 (2006-01-24) (built 3355931855)
(memory 3422656767)
(%i2) sign(max(7,x) - max(6,x));
Maxima encountered a Lisp error:
FUNCALL: DO-MERGE-ASYM is a macro, not a function
Automatically continuing.
To reenable the Lisp debugger set *debugger-hook* to nil.
(%i3) load ("src/compar.lisp");
(%o3)                    src/compar.lisp
(%i4) sign(max(7,x) - max(6,x));
(%o4)                          pnz

FWIW

Robert Dodier