aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/library/lux/meta/macro
diff options
context:
space:
mode:
authorEduardo Julian2022-07-06 16:25:43 -0400
committerEduardo Julian2022-07-06 16:25:43 -0400
commit5270f301eba5237feebc8eca14aee6b7a992a819 (patch)
treea1adb545189f4db807d712a1fcc7d20048c11222 /stdlib/source/library/lux/meta/macro
parent0c32c7f03ad1f8f0db54b623dc407713bbf8cacd (diff)
Made exception.report a function.
Diffstat (limited to 'stdlib/source/library/lux/meta/macro')
-rw-r--r--stdlib/source/library/lux/meta/macro/context.lux2
-rw-r--r--stdlib/source/library/lux/meta/macro/local.lux6
-rw-r--r--stdlib/source/library/lux/meta/macro/syntax/definition.lux2
-rw-r--r--stdlib/source/library/lux/meta/macro/template.lux4
4 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/library/lux/meta/macro/context.lux b/stdlib/source/library/lux/meta/macro/context.lux
index 464d0cfea..0cf61b454 100644
--- a/stdlib/source/library/lux/meta/macro/context.lux
+++ b/stdlib/source/library/lux/meta/macro/context.lux
@@ -27,7 +27,7 @@
(exception .public (no_definition [it Symbol])
(exception.report
- "Definition" (symbol#encoded it)))
+ (list ["Definition" (symbol#encoded it)])))
(.def (global it)
(-> Symbol (Meta Any))
diff --git a/stdlib/source/library/lux/meta/macro/local.lux b/stdlib/source/library/lux/meta/macro/local.lux
index 9b2ec3156..8e0d8d709 100644
--- a/stdlib/source/library/lux/meta/macro/local.lux
+++ b/stdlib/source/library/lux/meta/macro/local.lux
@@ -21,14 +21,14 @@
(exception .public (unknown_module [module Text])
(exception.report
- "Module" (text.format module)))
+ (list ["Module" (text.format module)])))
(with_template [<name>]
[(exception .public (<name> [module Text
definition Text])
(exception.report
- "Module" (text.format module)
- "Definition" (text.format definition)))]
+ (list ["Module" (text.format module)]
+ ["Definition" (text.format definition)])))]
[cannot_shadow_definition]
[unknown_definition]
diff --git a/stdlib/source/library/lux/meta/macro/syntax/definition.lux b/stdlib/source/library/lux/meta/macro/syntax/definition.lux
index 750c94d60..44030c108 100644
--- a/stdlib/source/library/lux/meta/macro/syntax/definition.lux
+++ b/stdlib/source/library/lux/meta/macro/syntax/definition.lux
@@ -82,7 +82,7 @@
(exception .public (lacks_type [definition Definition])
(exception.report
- "Definition" (%.code (..format definition))))
+ (list ["Definition" (%.code (..format definition))])))
(def .public (typed compiler)
(-> Lux (Parser Definition))
diff --git a/stdlib/source/library/lux/meta/macro/template.lux b/stdlib/source/library/lux/meta/macro/template.lux
index 20cd85f2b..cb6acd2d5 100644
--- a/stdlib/source/library/lux/meta/macro/template.lux
+++ b/stdlib/source/library/lux/meta/macro/template.lux
@@ -130,8 +130,8 @@
(exception .public (irregular_arguments [expected Nat
actual Nat])
(exception.report
- "Expected" (at nat.decimal encoded expected)
- "Actual" (at nat.decimal encoded actual)))
+ (list ["Expected" (at nat.decimal encoded expected)]
+ ["Actual" (at nat.decimal encoded actual)])))
(def (macro (open "_[0]"))
(-> Local Macro)