From e5625dd840a8b8adc76987f649da254335d3d93a Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 11 Aug 2022 16:50:42 -0400
Subject: Improved exception-definition macro.

---
 lux-r/source/program.lux | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lux-r/source/program.lux')

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)])))]
-- 
cgit v1.2.3