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-python/source/program.lux | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'lux-python') diff --git a/lux-python/source/program.lux b/lux-python/source/program.lux index 389e8251a..f3dbc436c 100644 --- a/lux-python/source/program.lux +++ b/lux-python/source/program.lux @@ -10,7 +10,7 @@ ["[0]" pipe] ["[0]" maybe] ["[0]" try (.only Try) (.use "[1]#[0]" monad)] - ["[0]" exception (.only exception)] + ["[0]" exception (.only Exception)] ["[0]" io (.only IO io)] ["[0]" function] [concurrency @@ -167,7 +167,8 @@ failure) {try.#Success output})))) - (exception (unknown_kind_of_object [object java/lang/Object]) + (exception.def (unknown_kind_of_object object) + (Exception java/lang/Object) (exception.report (list ["Object" (ffi.of_string (java/lang/Object::toString object))]))) @@ -374,7 +375,8 @@ (|>> (as java/lang/Object) (ffi.as org/python/core/PyFunction))) - (exception (cannot_apply_a_non_function [object java/lang/Object]) + (exception.def (cannot_apply_a_non_function object) + (Exception java/lang/Object) (exception.report (list ["Object" (ffi.of_string (java/lang/Object::toString object))] ["Class" (ffi.of_string (java/lang/Class::getName (java/lang/Object::getClass object)))]))) -- cgit v1.2.3