remove universe type

2023-03-05 16:48:29 +01:00 · 2023-03-05 16:48:29 +01:00 · b7acf39c39
commit b7acf39c39
parent 0cae84c75b
8 changed files with 21 additions and 44 deletions
--- a/tests/TypingImpls.idr
+++ b/tests/TypingImpls.idr
@ -63,8 +63,8 @@ PrettyHL q => ToInfo (Error q) where
  toInfo (ClashU mode k l) =
    [("type",  "ClashU"),
     ("mode",  show mode),
-     ("left",  prettyStr True k),
-     ("right", prettyStr True l)]
+     ("left",  show k),
+     ("right", show l)]
  toInfo (ClashQ pi rh) =
    [("type",  "ClashQ"),
     ("left",  prettyStr True pi),