aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/aedifex/artifact/time
diff options
context:
space:
mode:
authorEduardo Julian2022-08-11 16:50:42 -0400
committerEduardo Julian2022-08-11 16:50:42 -0400
commite5625dd840a8b8adc76987f649da254335d3d93a (patch)
treefb672669383525d90d462edf8c141f98bc953894 /stdlib/source/program/aedifex/artifact/time
parent065e8a4d8122d4616b570496915d2c0e2c78cd6b (diff)
Improved exception-definition macro.
Diffstat (limited to 'stdlib/source/program/aedifex/artifact/time')
-rw-r--r--stdlib/source/program/aedifex/artifact/time/date.lux5
1 files changed, 3 insertions, 2 deletions
diff --git a/stdlib/source/program/aedifex/artifact/time/date.lux b/stdlib/source/program/aedifex/artifact/time/date.lux
index 84e33836a..d1f9a0899 100644
--- a/stdlib/source/program/aedifex/artifact/time/date.lux
+++ b/stdlib/source/program/aedifex/artifact/time/date.lux
@@ -7,7 +7,7 @@
[control
["<>" parser]
["[0]" try (.only Try)]
- ["[0]" exception (.only exception)]]
+ ["[0]" exception (.only Exception)]]
[data
["[0]" text
["%" \\format]
@@ -34,7 +34,8 @@
(def min_year +1,000)
(def max_year +9,999)
-(exception .public (year_is_out_of_range [year year.Year])
+(exception.def .public (year_is_out_of_range year)
+ (Exception year.Year)
(exception.report
(list ["Minimum" (%.int ..min_year)]
["Maximum" (%.int ..max_year)]