@@ -7,7 +7,7 @@ module AST.Source
7 , Type, Type_(..)
7 , Type, Type_(..)
8 , Module(..)
8 , Module(..)
10− , getImport
10+ , getImportName
11 , Import(..)
11 , Import(..)
12 , Value(..)
12 , Value(..)
13 , Union(..)
13 , Union(..)
@@ -140,8 +140,8 @@ getName (Module maybeName _ _ _ _ _ _ _) =
140 Nothing -> "Main"
140 Nothing -> "Main"
143−getImport :: Import -> Name
143+getImportName :: Import -> Name
144−getImport (Import (A.At _ name) _ _) =
144+getImportName (Import (A.At _ name) _ _) =