@@ -28,6 +28,7 @@ import qualified Elm.Name as N
2828import qualified Reporting.Helpers as H
2929import qualified Reporting.Region as R
3030import qualified Reporting.Render.Code as Code
31+import qualified Reporting.Render.Type as RT
3132import qualified Reporting.Report as Report
3233import qualified Type.Error as T
3334
@@ -1091,5 +1092,5 @@ typeComparison localizer actual expected ( iAmSeeing, insteadOf, soHereAreSomeTh
10911092
10921093indentType :: T.Localizer -> T.Type -> H.Doc
10931094indentType 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))
10951096