aboutsummaryrefslogtreecommitdiff
path: root/lux-r/source
diff options
context:
space:
mode:
authorEduardo Julian2022-08-11 16:50:42 -0400
committerEduardo Julian2022-08-11 16:50:42 -0400
commite5625dd840a8b8adc76987f649da254335d3d93a (patch)
treefb672669383525d90d462edf8c141f98bc953894 /lux-r/source
parent065e8a4d8122d4616b570496915d2c0e2c78cd6b (diff)
Improved exception-definition macro.
Diffstat (limited to 'lux-r/source')
-rw-r--r--lux-r/source/program.lux5
1 files changed, 3 insertions, 2 deletions
diff --git a/lux-r/source/program.lux b/lux-r/source/program.lux
index ab60ff510..5962ac1bd 100644
--- a/lux-r/source/program.lux
+++ b/lux-r/source/program.lux
@@ -9,7 +9,7 @@
["[0]" pipe]
["[0]" maybe]
["[0]" try (.only Try)]
- ["[0]" exception (.only exception)]
+ ["[0]" exception (.only Exception)]
["[0]" io (.only IO io)]
[concurrency
["[0]" promise (.only Promise)]]]
@@ -171,7 +171,8 @@
(getScriptEngine [] org/renjin/script/RenjinScriptEngine))
(with_template [<name>]
- [(exception (<name> [object java/lang/Object])
+ [(exception.def (<name> object)
+ (Exception java/lang/Object)
(exception.report
(list ["Class" (java/lang/Object::toString (java/lang/Object::getClass object))]
["Object" (java/lang/Object::toString object)])))]