Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-24 20:45:06 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Allow expansion of compiled and eval'd macros

Browse source
This commit is contained in:
Justin Ethier 2015-08-14 18:16:21 -04:00
parent 0e21a437c9
commit a5e1520137
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
scheme/cyclone/transforms.sld
View file

@ -1043,7 +1043,8 @@
;; (alpha, cps, closure, etc). otherwise code has to be interpreted during expansion ;; (alpha, cps, closure, etc). otherwise code has to be interpreted during expansion
;; ;;
`(define ,name ,(expand body)))) `(define ,name ,(expand body))))
((macro:macro? exp *defined-macros*) ((or (macro? exp)
(macro:macro? exp *defined-macros*))
(expand ;; Could expand into another macro (expand ;; Could expand into another macro
(macro:expand exp *defined-macros*))) (macro:expand exp *defined-macros*)))
(else (else