Macroexpand per parenscript

Question

Esiste un equivalente a macroexpand o macroexpand-1 per macro parenscript? Fare (ps (some macro expression)) mostrerà il javascript generato, ma ci sono momenti in cui sarebbe bello vedere il parenscript appena prima che venga convertito in javascript.

Answer 1

In File di parenscript compiler.lisp, ci sono le funzioni ps-macroexpand-1 e ps-macroexpand. Sfortunatamente, non vengono esportati dal pacchetto Parenscript. Puoi chiamarli comunque usando un doppio colon.

Ad esempio,

(defpsmacro aif (test true &rest false) 
    `(let ((it ,test)) 
    (if it ,true ,@false))) 

(ps::ps-macroexpand-1 '(aif 3 it)) 
;;=> 
(LET ((IT 3)) 
    (IF IT 
     IT)) 
T