aboutsummaryrefslogtreecommitdiff
path: root/lux-r/source/program.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-07-06 16:25:43 -0400
committerEduardo Julian2022-07-06 16:25:43 -0400
commit5270f301eba5237feebc8eca14aee6b7a992a819 (patch)
treea1adb545189f4db807d712a1fcc7d20048c11222 /lux-r/source/program.lux
parent0c32c7f03ad1f8f0db54b623dc407713bbf8cacd (diff)
Made exception.report a function.
Diffstat (limited to 'lux-r/source/program.lux')
-rw-r--r--lux-r/source/program.lux10
1 files changed, 5 insertions, 5 deletions
diff --git a/lux-r/source/program.lux b/lux-r/source/program.lux
index c021c1908..7cb8645f7 100644
--- a/lux-r/source/program.lux
+++ b/lux-r/source/program.lux
@@ -173,8 +173,8 @@
(with_template [<name>]
[(exception (<name> [object java/lang/Object])
(exception.report
- "Class" (java/lang/Object::toString (java/lang/Object::getClass object))
- "Object" (java/lang/Object::toString object)))]
+ (list ["Class" (java/lang/Object::toString (java/lang/Object::getClass object))]
+ ["Object" (java/lang/Object::toString object)])))]
[unknown_kind_of_object]
[cannot_apply_a_non_function]
@@ -233,9 +233,9 @@
... org/renjin/sexp/SEXP
... (exec
... ("lux io log" (exception.report
- ... "@@" "eval"
- ... "context" (debug.inspect context)
- ... "environment" (debug.inspect environment)))
+ ... (list ["@@" "eval"]
+ ... ["context" (debug.inspect context)]
+ ... ["environment" (debug.inspect environment)])))
... self))
... (org/renjin/sexp/AbstractSEXP