aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/host/jvm/inst.lux
diff options
context:
space:
mode:
Diffstat (limited to 'new-luxc/source/luxc/lang/host/jvm/inst.lux')
-rw-r--r--new-luxc/source/luxc/lang/host/jvm/inst.lux9
1 files changed, 5 insertions, 4 deletions
diff --git a/new-luxc/source/luxc/lang/host/jvm/inst.lux b/new-luxc/source/luxc/lang/host/jvm/inst.lux
index d8360d4d7..7329dec1a 100644
--- a/new-luxc/source/luxc/lang/host/jvm/inst.lux
+++ b/new-luxc/source/luxc/lang/host/jvm/inst.lux
@@ -4,18 +4,19 @@
[monad (#+ do)]]
[control
["." function]
- ["p" parser]]
+ ["p" parser
+ ["s" code]]]
[data
["." maybe]
["." error]
[text
format]
[collection
- ["." list ("#/." functor)]]]
+ ["." list ("#@." functor)]]]
["." host (#+ import: do-to)]
[macro
["." code]
- ["s" syntax (#+ syntax:)]]
+ [syntax (#+ syntax:)]]
[tool
[compiler
[phase (#+ Operation)]]]]
@@ -28,7 +29,7 @@
(syntax: (declare {codes (p.many s.local-identifier)})
(|> codes
- (list/map (function (_ code) (` ((~' #static) (~ (code.local-identifier code)) (~' int)))))
+ (list@map (function (_ code) (` ((~' #static) (~ (code.local-identifier code)) (~' int)))))
wrap))
(`` (import: org/objectweb/asm/Opcodes