diff options
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.lux | 12 |
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) |