aboutsummaryrefslogtreecommitdiff
path: root/lux-ruby/source
diff options
context:
space:
mode:
Diffstat (limited to 'lux-ruby/source')
-rw-r--r--lux-ruby/source/program.lux17
1 files changed, 4 insertions, 13 deletions
diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux
index f2e429d15..ee569e392 100644
--- a/lux-ruby/source/program.lux
+++ b/lux-ruby/source/program.lux
@@ -28,8 +28,7 @@
["[0]" list]]]
["[0]" macro
[syntax {"+" syntax:}]
- ["[0]" template]
- ["[0]" code]]
+ ["[0]" template]]
[math
[number {"+" hex}
["n" nat]
@@ -132,14 +131,6 @@
["[1]::[0]"
(getValue [] java/lang/Object)])
-(syntax: (method_inputs [input_classes (<code>.tuple (<>.some <code>.any))])
- (monad.each meta.monad
- (function (_ class)
- (do meta.monad
- [var (macro.symbol "input")]
- (in (code.record (list [var class])))))
- input_classes))
-
(import: org/jruby/runtime/JavaSites$CheckedSites)
(import: org/jruby/runtime/builtin/Variable)
(import: org/jruby/runtime/builtin/InstanceVariables)
@@ -609,12 +600,12 @@
output)))))]
(: (Host _.Expression _.Statement)
(implementation
- (def: (evaluate! context code)
+ (def: (evaluate context code)
(run! code))
- (def: execute! run!)
+ (def: execute run!)
- (def: (define! context custom input)
+ (def: (define context custom input)
(let [global (maybe.else (reference.artifact context)
custom)
@global (_.global global)]