For everyone's reference, here's the definition of @:

(defpsmacro @ (obj &rest props) (if (null props) obj `(@ (slot-value ,(if (stringp obj) `($ ,obj) obj) ,(let ((prop (macroexpand (first props)))) (if (symbolp prop) `',prop prop))) ,@(cdr props))))

It's a macro whose idea Daniel borrowed from Peter Seibel's Lispscript Lisp-to-JavaScript compiler, and does things like (ps (@ foo "bar" 3 baz)) => foo['bar'][3].baz;. I will probably include it in the ParenScript helper library someday when I am unlazy enough to write the documentation.

That being said, the behavior demonstrated is a feature, not a bug. The macros are being expanded in the right order (that is, same order as Common Lisp does it). Consider the following Common Lisp code:

(defmacro foo (x) (format nil "~a" x))

(foo bar) => "BAR"

(symbol-macrolet ((bar 1)) (list (foo bar) bar)) => ("BAR" 1)

Vladimir

On 9/12/07, Daniel Gackle danielgackle@gmail.com wrote:

This works correctly:

(ps (symbol-macrolet ((blah "y")) (setf (aref x blah) 123)))

 => "x['y'] = 123;"

... while it appears this does not:

(ps (symbol-macrolet ((blah "y")) (setf (@ x blah) 123)))

=> "x.blah = 123;"

Daniel

---

parenscript-devel mailing list parenscript-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel