"WhnfErr" ⇒ "WhnfError"

This commit is contained in:
rhiannon morris 2023-03-13 19:39:29 +01:00
parent 765c62866a
commit ecd3be8bda
3 changed files with 8 additions and 10 deletions

View file

@ -9,7 +9,7 @@ import Derive.Prelude
%language ElabReflection
%runElab derive "WhnfErr" [Show]
%runElab derive "Reduce.WhnfError" [Show]
%runElab deriveIndexed "DimEq" [Show]
@ -22,7 +22,7 @@ showTypingError : (PrettyHL q, Show q) => Show (Error q)
showTypingError = deriveShow
export
ToInfo WhnfErr where
ToInfo WhnfError where
toInfo (MissingEnumArm t ts) =
[("type", "MissingEnumArm"),
("tag", show t),