aboutsummaryrefslogtreecommitdiff
path: root/licentia/source
diff options
context:
space:
mode:
authorEduardo Julian2022-07-06 16:25:43 -0400
committerEduardo Julian2022-07-06 16:25:43 -0400
commit5270f301eba5237feebc8eca14aee6b7a992a819 (patch)
treea1adb545189f4db807d712a1fcc7d20048c11222 /licentia/source
parent0c32c7f03ad1f8f0db54b623dc407713bbf8cacd (diff)
Made exception.report a function.
Diffstat (limited to 'licentia/source')
-rw-r--r--licentia/source/program/licentia/input.lux8
1 files changed, 4 insertions, 4 deletions
diff --git a/licentia/source/program/licentia/input.lux b/licentia/source/program/licentia/input.lux
index 437675acd..afc723656 100644
--- a/licentia/source/program/licentia/input.lux
+++ b/licentia/source/program/licentia/input.lux
@@ -40,11 +40,11 @@
(exception .public (cannot_use_fractional_amount [amount Frac])
(exception.report
- "Amount" (%.frac amount)))
+ (list ["Amount" (%.frac amount)])))
(exception .public (cannot_use_negative_amount [amount Int])
(exception.report
- "Amount" (%.int amount)))
+ (list ["Amount" (%.int amount)])))
(def amount
(Parser Nat)
@@ -60,8 +60,8 @@
(exception .public (invalid_period [period (Period Nat)])
(exception.report
- "Start" (%.nat (the time.#start period))
- "End" (%.nat (the time.#end period))))
+ (list ["Start" (%.nat (the time.#start period))]
+ ["End" (%.nat (the time.#end period))])))
(def period
(Parser (Period Nat))