[Ecls-list] Parenscript compile error (suspect loop problem)

[David Creelman]

Hi,
I just tried getting parenscript loaded via ECL, but ran into a problem in
js-html.lisp.
There is an error in process-html-forms something to do with a problem
with using the loop macro.

;;; Compiling (DEFUN OPTIMIZE-STRING-LIST ...).
;;; Compiling (DEFUN PROCESS-HTML-FORMS ...).
;;; Compiling (SI:FSET 'PROCESS-HTML-FORMS ...).
;;; Error: 
;;; The macro form (LOOP WITH ATTRS = (CDAR FORM) WHILE ATTRS FOR ATTR-NAME = (P
OP ATTRS) FOR ATTR-TEST = (WHEN (NOT (KEYWORDP ATTR-NAME)) (LET ((TEST ATTR-NAME
)) (SETF ATTR-NAME (POP ATTRS)) TEST)) FOR ATTR-VAL = (POP ATTRS) DO (IF ATTR-TE
ST (PUSH `(IF ,ATTR-TEST (+ ,(FORMAT NIL " ~A=\"" (STRING-DOWNCASE (SYMBOL-NAME 
ATTR-NAME))) ,ATTR-VAL "\"") "") RES) (PROGN (PUSH (FORMAT NIL " ~A=\"" (STRING-
DOWNCASE (SYMBOL-NAME ATTR-NAME))) RES) (PUSH ATTR-VAL RES) (PUSH "\"" RES)))) w
as not expanded successfully.
;;; You are recommended to compile again.

Is there something in there that SBCL loop lets through that ECL loop 
doesn't (assuming that it works in SBCL (I'll give it a go, don't know
at time of writing))?

Thanks
David