Andreas Eder wrote:
> Update of /cvsroot/maxima/maxima/src
> In directory sc8-pr-cvs7.sourceforge.net:/tmp/cvs-serv7006
>
> Modified Files:
> mhayat.lisp
> Log Message:
> removed double definition of ezerop. (is defined in hayat).
>
>
> -#-mcl
> -(defmacro ezerop (e) `(zerop (car ,e)))
> -
>
I've noticed this before. The definition of ezerop in hayat is a
function and quite a bit different:
(defun ezerop (x) (and (not (infp x)) (signp e (car x))))
Are you sure this was the right thing to do?
Ray