aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/tool
diff options
context:
space:
mode:
authorEduardo Julian2020-08-09 18:38:17 -0400
committerEduardo Julian2020-08-09 18:38:17 -0400
commitf79e39de3f605695a33acadf751be498f552930b (patch)
tree0fe49686a72fef910f7a861229826139e8bc1fd6 /stdlib/source/lux/tool
parentb2cec28f75239fd11ab13a6ff896fb0bf0f7a19c (diff)
Allow "#io" outputs for JS imports.
Diffstat (limited to 'stdlib/source/lux/tool')
-rw-r--r--stdlib/source/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux8
-rw-r--r--stdlib/source/lux/tool/compiler/language/lux/phase/synthesis/function.lux5
2 files changed, 8 insertions, 5 deletions
diff --git a/stdlib/source/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux b/stdlib/source/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
index 945a8d03c..0df1a5812 100644
--- a/stdlib/source/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
+++ b/stdlib/source/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux
@@ -1,7 +1,8 @@
(.module:
[lux (#- Type Definition case log! false true)
[abstract
- ["." monad (#+ do)]]
+ ["." monad (#+ do)]
+ ["." enum]]
[control
["." try]]
[data
@@ -534,8 +535,9 @@
(def: generate-function
(Operation Any)
- (let [apply::method+ (|> (list.n/range (inc //function/arity.minimum)
- //function/arity.maximum)
+ (let [apply::method+ (|> (enum.range n.enum
+ (inc //function/arity.minimum)
+ //function/arity.maximum)
(list@map (function (_ arity)
(method.method method.public ..apply::name (..apply::type arity)
(list)
diff --git a/stdlib/source/lux/tool/compiler/language/lux/phase/synthesis/function.lux b/stdlib/source/lux/tool/compiler/language/lux/phase/synthesis/function.lux
index ea15e4b24..4f510e1b6 100644
--- a/stdlib/source/lux/tool/compiler/language/lux/phase/synthesis/function.lux
+++ b/stdlib/source/lux/tool/compiler/language/lux/phase/synthesis/function.lux
@@ -1,7 +1,8 @@
(.module:
[lux #*
[abstract
- ["." monad (#+ do)]]
+ ["." monad (#+ do)]
+ ["." enum]]
[control
[pipe (#+ case>)]
["." exception (#+ exception:)]]
@@ -32,7 +33,7 @@
(def: arity-arguments
(-> Arity (List Synthesis))
(|>> dec
- (list.n/range 1)
+ (enum.range n.enum 1)
(list@map (|>> /.variable/local))))
(template: #export (self-reference)