diff --git a/cyclone.scm b/cyclone.scm index 979e4b51..e0df686f 100644 --- a/cyclone.scm +++ b/cyclone.scm @@ -89,8 +89,10 @@ (set! imported-vars (lib:resolve-imports imports)) (trace:info "resolved imports:") (trace:info imported-vars) - (trace:info "resolved macros:") - (trace:info (lib:resolve-meta imports)) + (let ((meta (lib:resolve-meta imports))) + (set! *defined-macros* (append meta *defined-macros*)) + (trace:info "resolved macros:") + (trace:info meta)) ;; TODO: how to handle stdlib when compiling a library?? ;; either need to keep track of what was actually used, diff --git a/scheme/cyclone/transforms.sld b/scheme/cyclone/transforms.sld index 4d874417..526f58d4 100644 --- a/scheme/cyclone/transforms.sld +++ b/scheme/cyclone/transforms.sld @@ -20,7 +20,7 @@ (scheme cyclone macros) ) (export - ;*defined-macros* + *defined-macros* *do-code-gen* *trace-level* *primitives*