aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/macro.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/macro.lux')
-rw-r--r--stdlib/source/lux/macro.lux8
1 files changed, 7 insertions, 1 deletions
diff --git a/stdlib/source/lux/macro.lux b/stdlib/source/lux/macro.lux
index 0b0c59623..4277745f9 100644
--- a/stdlib/source/lux/macro.lux
+++ b/stdlib/source/lux/macro.lux
@@ -651,7 +651,13 @@
(fail ($_ text@compose "Cannot access tag: " (name@encode tag) " from module " this-module-name)))
_
- (fail ($_ text@compose "Unknown tag: " (name@encode tag))))))
+ (fail ($_ text@compose
+ "Unknown tag: " (name@encode tag) text.new-line
+ " Known tags: " (|> =module
+ (get@ #.tags)
+ (list@map (|>> product.left [module] name@encode (text.prefix text.new-line)))
+ (text.join-with ""))
+ )))))
(def: #export (tag-lists module)
{#.doc "All the tag-lists defined in a module, with their associated types."}