@@ -51,6 +51,7 @@ import qualified Data.Name as Name
51import Data.Word (Word16)
51import Data.Word (Word16)
52--import Numeric (showHex)
52--import Numeric (showHex)
54+import qualified Elm.ModuleName as ModuleName
54import Parse.Primitives (Row, Col)
55import Parse.Primitives (Row, Col)
55--import qualified Parse.Primitives as P
56--import qualified Parse.Primitives as P
56import qualified Reporting.Annotation as A
57import qualified Reporting.Annotation as A
@@ -64,7 +65,8 @@ import qualified Reporting.Render.Code as Code
67− = CommentOnNothing A.Region
68+ = ModuleNameUnspecified ModuleName.Raw
69+ | ModuleNameMismatch ModuleName.Raw ModuleName.Raw
68 | UnexpectedPort A.Region
70 | UnexpectedPort A.Region
69 | NoPorts A.Region
71 | NoPorts A.Region
70 | ParseError Module
72 | ParseError Module