diff options
Diffstat (limited to 'lux-scheme/source/program.lux')
| -rw-r--r-- | lux-scheme/source/program.lux | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lux-scheme/source/program.lux b/lux-scheme/source/program.lux index ff51d1b45..0792c9747 100644 --- a/lux-scheme/source/program.lux +++ b/lux-scheme/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)]]] @@ -236,12 +236,14 @@ (undefined)) )) -(exception (unknown_kind_of_host_object [object java/lang/Object]) +(exception.def (unknown_kind_of_host_object object) + (Exception java/lang/Object) (exception.report (list ["Class" (java/lang/Object::toString (java/lang/Object::getClass object))] ["Object" (java/lang/Object::toString object)]))) -(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 ["Class" (java/lang/Object::toString (java/lang/Object::getClass object))] ["Object" (java/lang/Object::toString object)]))) |