diff options
Diffstat (limited to 'lux-ruby/source/program.lux')
| -rw-r--r-- | lux-ruby/source/program.lux | 17 |
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)] |