@@ -7,7 +7,7 @@ import qualified Data.Binary as Binary
77import qualified Build.Print as Print
88import qualified Elm.Internal.Version as Version
99import System.Directory (doesFileExist)
10−import AST.Module
10+import AST.Module as Module
1111
1212load :: Binary.Binary a => FilePath -> IO a
1313load filePath =
@@ -28,7 +28,7 @@ load filePath =
2828 , " Please remove the file and try again."
2929 ]
3030
31−isValid :: FilePath -> (String, ModuleInterface) -> Either String (String, ModuleInterface)
31+isValid :: FilePath -> (String, Module.Interface) -> Either String (String, Module.Interface)
3232isValid filePath (name, interface) =
3333 let version = iVersion interface in
3434 if version == Version.elmVersion