@@ -135,7 +135,7 @@ resolveImports env (Module ss coms currentModule decls exps) =
136 updateImportRef :: Declaration -> m Declaration
136 updateImportRef :: Declaration -> m Declaration
137 updateImportRef (PositionedDeclaration pos com d) =
137 updateImportRef (PositionedDeclaration pos com d) =
138− warnWithPosition pos $ PositionedDeclaration pos com <$> updateImportRef d
138+ warnAndRethrowWithPosition pos $ PositionedDeclaration pos com <$> updateImportRef d
139 updateImportRef (ImportDeclaration mn typ qual isOldSyntax) = do
139 updateImportRef (ImportDeclaration mn typ qual isOldSyntax) = do
140 modExports <- getExports env mn
140 modExports <- getExports env mn
141 typ' <- case typ of
141 typ' <- case typ of