@@ -47,7 +47,7 @@ import Reporting.Doc ((<>))
47import qualified Reporting.Doc as D
47import qualified Reporting.Doc as D
48import qualified Reporting.Error.Json as Json
48import qualified Reporting.Error.Json as Json
49import qualified Reporting.Exit.Help as Help
49import qualified Reporting.Exit.Help as Help
50−import qualified Reporting.Problem as Problem
50+import qualified Reporting.Error as Error
@@ -373,7 +373,7 @@ data Make
375data BuildProblem
375data BuildProblem
376− = BuildModuleProblems Problem.Problem [Problem.Problem]
376+ = BuildModuleProblems Error.Module [Error.Module]
377 | BuildProjectProblem BuildProjectProblem
377 | BuildProjectProblem BuildProjectProblem
@@ -804,7 +804,7 @@ makeToReport make =
806 BuildModuleProblems p ps ->
806 BuildModuleProblems p ps ->
807− error "TODO MakeCannotBuild" p ps
807+ Help.compilerReport p ps
809 MakeCannotLoadArtifacts ->
809 MakeCannotLoadArtifacts ->
810 error "TODO MakeCannotLoadArtifacts"
810 error "TODO MakeCannotLoadArtifacts"