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-cl/source/program.lux | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lux-cl')

diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index ff6aff2e5..033141d55 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/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)]]]
@@ -153,7 +153,8 @@
   (getValue [] java/lang/Object))
 
 (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