📝 the error case.

2024-11-25 11:04:00 +03:00 · 2019-10-08 15:41:20 -04:00 · 2019-10-08 15:41:20 -04:00 · 78cc4835fc
commit 78cc4835fc
parent 5d4317031a
1 changed files with 1 additions and 0 deletions
--- a/semantic-tags/src/AST/Element.hs
+++ b/semantic-tags/src/AST/Element.hs
@ -62,6 +62,7 @@ instance Element     t r
  prj' _      = Nothing


+-- | Error cases, with custom type errors.
 instance TypeError
           (     'ShowType t ':<>: 'Text " is not in"
           ':$$: ShowSum u)