aboutsummaryrefslogtreecommitdiff
path: root/lux-python
diff options
context:
space:
mode:
Diffstat (limited to 'lux-python')
-rw-r--r--lux-python/source/program.lux9
1 files changed, 5 insertions, 4 deletions
diff --git a/lux-python/source/program.lux b/lux-python/source/program.lux
index f00594c99..f7c167368 100644
--- a/lux-python/source/program.lux
+++ b/lux-python/source/program.lux
@@ -276,8 +276,9 @@
(implementation
(def: evaluate! evaluate!)
(def: execute! execute!)
- (def: (define! context input)
- (let [global (reference.artifact context)
+ (def: (define! context custom input)
+ (let [global (maybe.default (reference.artifact context)
+ custom)
@global (_.var global)]
(do try.monad
[#let [definition (_.set (list @global) input)]
@@ -291,10 +292,10 @@
try.assume
(:as (_.Statement Any))))
- (def: (re_learn context content)
+ (def: (re_learn context custom content)
(execute! content))
- (def: (re_load context content)
+ (def: (re_load context custom content)
(do try.monad
[_ (execute! content)]
(evaluate! context (_.var (reference.artifact context))))))))))