more build problems, STEP-FUN in LOOP must be a function



Maxima 5.12.0


I see code like this:


ratmac.lisp

(defmacro pt-red (terms) `(cddr ,terms))



rat3a.lisp

(defun pctimes1 (c terms)
  (loop for (exp coef) on terms by #'pt-red
    unless (pzerop (setq coef (ptimes c coef)))
    nconc (list exp coef)))



ANSI Common Lisp defines the STEP-FUN in LOOP
to be a function. We cannot use a macro here.



Probably there are more places where macros are
used like this?


Regards,

Rainer

-- 
http://lispm.dyndns.org