diff options
| author | Eduardo Julian | 2017-10-25 20:23:10 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2017-10-25 20:23:10 -0400 |
| commit | 40e9eae7468af9b03f6c684171d83a521dd90e82 (patch) | |
| tree | 0110ff38c31823ac052bce4cf244f0bf4fd6ec16 /stdlib/source/lux/meta/syntax/common/reader.lux | |
| parent | 097b4f312b7426cc9064e5f7b28bea3deb60fe63 (diff) | |
- Changed the way some special forms work.
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/meta/syntax/common/reader.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/meta/syntax/common/reader.lux b/stdlib/source/lux/meta/syntax/common/reader.lux index 579cf0273..83fdadc18 100644 --- a/stdlib/source/lux/meta/syntax/common/reader.lux +++ b/stdlib/source/lux/meta/syntax/common/reader.lux @@ -42,7 +42,7 @@ (def: check^ (Syntax [(Maybe Code) Code]) (p;either (s;form (do p;Monad<Parser> - [_ (s;this (' lux;_lux_:)) + [_ (s;this (' "lux check")) type s;any value s;any] (wrap [(#;Some type) value]))) @@ -112,7 +112,7 @@ (meta;expand-all definition-raw))] (s;local me-definition-raw (s;form (do @ - [_ (s;this (' lux;_lux_def)) + [_ (s;this (' "lux def")) definition-name s;local-symbol [?definition-type definition-value] check^ definition-anns s;any |