Fixed macroExpand so that the source (file/module) is set on the macr…

…o-expansion in addition to the lineNumber.
briantrice · Dec 11, 2011 · c3c2b73 · c3c2b73
1 parent 1a8fdde
commit c3c2b73
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/src/syntax/macro.slate b/src/syntax/macro.slate
@@ -36,8 +36,11 @@ inherit the macro node's debugging information."
         macroExpand &environment: env.
   macro lineNumber ifNotNilDo:
     [| :lineNumber |
+     source ::= macro source.
      expansion walk:
-       [| :child | child lineNumber `defaultsTo: lineNumber]].
+       [| :child |
+        child lineNumber `defaultsTo: lineNumber.
+        child source `defaultsTo: source]].
   expansion
 ].