@@ -19,7 +19,7 @@ newtype Raw = Raw String
20data TopLevelVar =
20data TopLevelVar =
21 TopLevelVar
21 TopLevelVar
22− { topVarModule :: [String]
22+ { topVarModule :: ModuleName.Canonical
23 , topVarName :: String
23 , topVarName :: String
24 } deriving (Eq, Ord, Show)
24 } deriving (Eq, Ord, Show)