diff options
Diffstat (limited to '')
-rw-r--r-- | lux-ruby/source/program.lux | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux index a221e6529..2e77c85f4 100644 --- a/lux-ruby/source/program.lux +++ b/lux-ruby/source/program.lux @@ -623,8 +623,9 @@ (def: execute! run!) - (def: (define! context input) - (let [global (reference.artifact context) + (def: (define! context custom input) + (let [global (maybe.default (reference.artifact context) + custom) @global (_.global global)] (do try.monad [#let [definition (_.set (list @global) input)] @@ -637,10 +638,10 @@ try.assume (:as _.Statement))) - (def: (re_learn context content) + (def: (re_learn context custom content) (run! content)) - (def: (re_load context content) + (def: (re_load context custom content) (do try.monad [_ (run! content)] (run! (_.global (reference.artifact context)))))))))) |