on master help sign in
Fix parser for "import List" which before was not importing anything.
9386751Evan Czaplicki
compiler/Parse/Module.hs+1−1
@@ -35,7 +35,7 @@ import' =
35 case open of
35 case open of
36 Just _ -> return (name, Hiding [])
36 Just _ -> return (name, Hiding [])
37 Nothing -> let how = try (whitespace >> (as' <|> importing'))
37 Nothing -> let how = try (whitespace >> (as' <|> importing'))
38− in (,) name <$> option (Importing []) how
38+ in (,) name <$> option (As name) how
39 where
39 where
40 as' :: IParser ImportMethod
40 as' :: IParser ImportMethod
41 as' = reserved "as" >> whitespace >> As <$> capVar <?> "alias for module"
41 as' = reserved "as" >> whitespace >> As <$> capVar <?> "alias for module"