aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/tool/compiler/phase/generation/scheme/runtime.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/tool/compiler/phase/generation/scheme/runtime.lux')
-rw-r--r--stdlib/source/lux/tool/compiler/phase/generation/scheme/runtime.lux7
1 files changed, 4 insertions, 3 deletions
diff --git a/stdlib/source/lux/tool/compiler/phase/generation/scheme/runtime.lux b/stdlib/source/lux/tool/compiler/phase/generation/scheme/runtime.lux
index b66b7abaf..bda2f7783 100644
--- a/stdlib/source/lux/tool/compiler/phase/generation/scheme/runtime.lux
+++ b/stdlib/source/lux/tool/compiler/phase/generation/scheme/runtime.lux
@@ -4,7 +4,8 @@
[monad (#+ do)]]
[control
["." function]
- ["p" parser ("#;." monad)]]
+ ["p" parser ("#;." monad)
+ ["s" code (#+ Parser)]]]
[data
[number (#+ hex)]
[text
@@ -13,7 +14,7 @@
["." list ("#;." monad)]]]
[macro
["." code]
- ["s" syntax (#+ syntax:)]]
+ [syntax (#+ syntax:)]]
[host
["_" scheme (#+ Expression Computation Var)]]]
["." ///
@@ -73,7 +74,7 @@
(|>> [0 #1] ..variant))
(def: declaration
- (s.Syntax [Text (List Text)])
+ (Parser [Text (List Text)])
(p.either (p.and s.local-identifier (p;wrap (list)))
(s.form (p.and s.local-identifier (p.some s.local-identifier)))))