aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/tool/compiler/phase/extension/analysis/jvm.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/tool/compiler/phase/extension/analysis/jvm.lux')
-rw-r--r--stdlib/source/lux/tool/compiler/phase/extension/analysis/jvm.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/lux/tool/compiler/phase/extension/analysis/jvm.lux b/stdlib/source/lux/tool/compiler/phase/extension/analysis/jvm.lux
index 998590d1c..14a77c65c 100644
--- a/stdlib/source/lux/tool/compiler/phase/extension/analysis/jvm.lux
+++ b/stdlib/source/lux/tool/compiler/phase/extension/analysis/jvm.lux
@@ -3,7 +3,8 @@
[abstract
["." monad (#+ do)]]
[control
- ["p" parser]
+ ["p" parser
+ ["s" code (#+ Parser)]]
["." exception (#+ exception:)]
pipe]
[data
@@ -18,8 +19,7 @@
["." dictionary (#+ Dictionary)]]]
["." type
["." check]]
- ["." macro
- ["s" syntax (#+ Syntax)]]
+ ["." macro]
["." host (#+ import:)]]
["." // #_
["#." common]
@@ -35,7 +35,7 @@
(def: (custom [syntax handler])
(All [s]
- (-> [(Syntax s)
+ (-> [(Parser s)
(-> Text Phase s (Operation Analysis))]
Handler))
(function (_ extension-name analyse args)
@@ -51,7 +51,7 @@
#member Text})
(def: member
- (Syntax Member)
+ (Parser Member)
($_ p.and s.text s.text))
(type: Method-Signature
@@ -1180,7 +1180,7 @@
(/////analysis.throw too-many-candidates [class-name ..constructor-method candidates]))))
(def: typed-input
- (Syntax [Text Code])
+ (Parser [Text Code])
(s.tuple (p.and s.text s.any)))
(def: (decorate-inputs typesT inputsA)