aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/compiler
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--new-luxc/source/luxc/compiler.lux14
1 files changed, 7 insertions, 7 deletions
diff --git a/new-luxc/source/luxc/compiler.lux b/new-luxc/source/luxc/compiler.lux
index 4ac865786..12966ba00 100644
--- a/new-luxc/source/luxc/compiler.lux
+++ b/new-luxc/source/luxc/compiler.lux
@@ -17,15 +17,15 @@
(def: (compile ast)
(-> AST (Lux Unit))
(case ast
- (^ [_ (#;FormS (list [_ (#;SymbolS ["" "_lux_def"])]
- [_ (#;SymbolS ["" def-name])]
- def-value
- def-meta))])
+ (^ [_ (#;Form (list [_ (#;Symbol ["" "_lux_def"])]
+ [_ (#;Symbol ["" def-name])]
+ def-value
+ def-meta))])
(&&statement;compile-def def-name def-value def-meta)
- (^ [_ (#;FormS (list [_ (#;SymbolS ["" "_lux_program"])]
- [_ (#;SymbolS ["" prog-args])]
- prog-body))])
+ (^ [_ (#;Form (list [_ (#;Symbol ["" "_lux_program"])]
+ [_ (#;Symbol ["" prog-args])]
+ prog-body))])
(&&statement;compile-program prog-args prog-body)
_