consistent indexing
This commit is contained in:
parent
7f46537cbc
commit
507eb79788
1 changed files with 1 additions and 1 deletions
|
@ -42,7 +42,7 @@ PrettyHL q => ToInfo (Error q) where
|
|||
("set", show $ SortedSet.toList ts)]
|
||||
toInfo (BadCaseQtys qouts) =
|
||||
("type", "BadCaseQtys") ::
|
||||
[(show i, prettyStr True q) | (i, q) <- zip [0 .. length qouts] qouts]
|
||||
[(show i, prettyStr True q) | (i, q) <- zip [1 .. length qouts] qouts]
|
||||
|
||||
toInfo (ClashT mode ty s t) =
|
||||
[("type", "ClashT"),
|
||||
|
|
Loading…
Reference in a new issue