diff options
Diffstat (limited to '')
| -rw-r--r-- | src/lux/type.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lux/type.clj b/src/lux/type.clj index caa210d2a..766e28a39 100644 --- a/src/lux/type.clj +++ b/src/lux/type.clj @@ -813,7 +813,7 @@ [["lux;VariantT" ?cases]] (if-let [case-type (&/|get case ?cases)] (return case-type) - (fail (str "[Type Error] Variant lacks case: " case))) + (fail (str "[Type Error] Variant lacks case: " case " | " (show-type type)))) [_] (fail (str "[Type Error] Type is not a variant: " (show-type type))))) |