diff options
| author | Eduardo Julian | 2021-08-16 01:12:01 -0400 | 
|---|---|---|
| committer | Eduardo Julian | 2021-08-16 01:12:01 -0400 | 
| commit | 3289b9dcf9d5d1c1e5c380e3185065c8fd32535f (patch) | |
| tree | fc2f67581dd7b1d72c20217a95e031187a375bc5 /lux-r | |
| parent | 6fd22846f21b8b70b7867e989109d14a366c0a3e (diff) | |
Made extension-definition macros specify their bindings the same way as syntax:.
Diffstat (limited to '')
| -rw-r--r-- | lux-r/source/program.lux | 4 | ||||
| -rw-r--r-- | lux-ruby/source/program.lux | 8 | 
2 files changed, 6 insertions, 6 deletions
diff --git a/lux-r/source/program.lux b/lux-r/source/program.lux index ec796e0d2..969653315 100644 --- a/lux-r/source/program.lux +++ b/lux-r/source/program.lux @@ -526,7 +526,7 @@                     (wrap [global value definition]))))               (def: (ingest context content) -               (|> content (\ utf8.codec decode) try.assume (:as _.Expression))) +               (|> content (\ utf8.codec decode) try.trusted (:as _.Expression)))               (def: (re_learn context content)                 (run! content)) @@ -566,7 +566,7 @@              (:as Operation)              (function (@self state))              (:as Try) -            try.assume +            try.trusted              (:as Try)              (exec                ("lux io log" "TODO: Extender") diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux index 3e6a4d638..b54acaaa9 100644 --- a/lux-ruby/source/program.lux +++ b/lux-ruby/source/program.lux @@ -397,7 +397,7 @@                 (^ (static runtime.variant_tag_field))                 (|> value                     (array.read! 0) -                   maybe.assume +                   maybe.trusted                     (:as java/lang/Integer)                     java/lang/Integer::longValue                     (org/jruby/RubyFixnum::new ..initial_ruby_runtime)) @@ -636,7 +636,7 @@              (def: (ingest context content)                (|> content                    (\ utf8.codec decode) -                  try.assumed +                  try.trusted                    (:as _.Statement)))              (def: (re_learn context custom content) @@ -699,7 +699,7 @@                                         {inputs [org/jruby/runtime/builtin/IRubyObject]}                                         {_ org/jruby/runtime/Block})                                org/jruby/runtime/builtin/IRubyObject -                              (<| try.assumed +                              (<| try.trusted                                    (let [inputs (array.to_list inputs)])                                    (case inputs                                      (^ (list)) @@ -772,7 +772,7 @@                     (:as Operation)                     (function (@self state))                     (:as Try) -                   try.assumed +                   try.trusted                     (:as Try)                     (do try.monad                       [handler (try.of_maybe (..ensure_macro handler))  | 
