There is a reason why *loop-keywords* was declared with defvar<div>and not defparameter, but I can't remember what it was.</div><div><br></div><div>Daniel<br><br><div class="gmail_quote">On Sun, Jan 6, 2013 at 6:33 PM, Canhua <span dir="ltr"><<a href="mailto:dreameration@gmail.com" target="_blank">dreameration@gmail.com</a>></span> wrote:<br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">I find that it is because the parenscript's *loop-keyword* is not<br>
effective when macro expanding loop-case,<br>
it seems that the common lisp's loop keywords is effective. In the<br>
ps-loop.lisp source, changing<br>
<br>
(defvar *loop-keywords* ..)<br>
<br>
into<br>
<br>
(defparameter *loop-keywords* ...)<br>
<br>
would solve the problem.<br>
<div class="im HOEnZb"><br>
<br>
<br>
On Sat, Jan 5, 2013 at 6:33 PM, Canhua <<a href="mailto:dreameration@gmail.com">dreameration@gmail.com</a>> wrote:<br>
> Following is errors when loading ps-loop.lisp<br>
><br>
><br>
</div><div class="im HOEnZb">> ; file: /root/vendor-src/parenscript/src/lib/ps-loop.lisp<br>
> ; in: DEFUN FOR-CLAUSE<br>
> ;     (PARENSCRIPT::LOOP-CASE PARENSCRIPT::TERM<br>
> ;       (:FROM (PARENSCRIPT::FOR-FROM PARENSCRIPT::PLACE PARENSCRIPT::STATE))<br>
> ;       (:= (PARENSCRIPT::FOR-= PARENSCRIPT::PLACE PARENSCRIPT::STATE))<br>
> ;       ((:IN :ACROSS) (PARENSCRIPT:FOR-IN PARENSCRIPT::PLACE<br>
> PARENSCRIPT::STATE))<br>
> ;       (:ON (PARENSCRIPT::FOR-ON PARENSCRIPT::PLACE PARENSCRIPT::STATE))<br>
> ;       (:OF (PARENSCRIPT::FOR-KEYS-OF PARENSCRIPT::PLACE PARENSCRIPT::STATE))<br>
> ;       (OTHERWISE<br>
> ;        (ERROR "FOR ~s ~s is not valid in PS-LOOP." PARENSCRIPT::PLACE<br>
> ;               PARENSCRIPT::TERM)))<br>
> ;<br>
> ; caught ERROR:<br>
> ;   during macroexpansion of<br>
> ;   (LOOP-CASE TERM<br>
> ;     (:FROM #)<br>
> ;     ...).<br>
> ;   Use *BREAK-ON-SIGNALS* to intercept:<br>
> ;<br>
> ;    OF isn't a recognized loop keyword.<br>
><br>
<br>
</div><div class="HOEnZb"><div class="h5">_______________________________________________<br>
parenscript-devel mailing list<br>
<a href="mailto:parenscript-devel@common-lisp.net">parenscript-devel@common-lisp.net</a><br>
<a href="http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel" target="_blank">http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel</a><br>
</div></div></blockquote></div><br></div>