git.iko.soy/elk
on master help sign in
Show indented types in type errors
6ecd0beEvan Czaplicki
src/Reporting/Error/Type.hs+2−1
compare with master
unifiedsplit
@@ -28,6 +28,7 @@ import qualified Elm.Name as N
28import qualified Reporting.Helpers as H
28import qualified Reporting.Helpers as H
29import qualified Reporting.Region as R
29import qualified Reporting.Region as R
30import qualified Reporting.Render.Code as Code
30import qualified Reporting.Render.Code as Code
31+import qualified Reporting.Render.Type as RT
31import qualified Reporting.Report as Report
32import qualified Reporting.Report as Report
32import qualified Type.Error as T
33import qualified Type.Error as T
33
34
@@ -1091,5 +1092,5 @@ typeComparison localizer actual expected ( iAmSeeing, insteadOf, soHereAreSomeTh
1091
1092
1092indentType :: T.Localizer -> T.Type -> H.Doc
1093indentType :: T.Localizer -> T.Type -> H.Doc
1093indentType localizer tipe =
1094indentType localizer tipe =
1094− H.indent 4 (H.dullyellow (error "TODO Type.toDoc" localizer tipe))
1095+ H.indent 4 (H.dullyellow (T.toDoc localizer RT.None tipe))
1095
1096