@@ -3,7 +3,7 @@ module Parse.Parse (program, parse) where
33
44import qualified Data.Map as Map
55import qualified Data.Traversable as T
6−import Text.Parsec (char, eof, letter, many, optional, putState, (<|>))
6+import Text.Parsec (char, eof, letter, many, putState, (<|>))
77import qualified Text.Parsec.Error as Parsec
88
99import qualified AST.Declaration as D
@@ -47,7 +47,7 @@ programParser :: Package.Name -> IParser M.SourceModule
4747programParser pkgName =
4848 do (M.Header name docs exports imports) <- Module.header
4949 decls <- declarations
50− many (spaces <|> newline)
50+ _ <- many (spaces <|> newline)
5151 eof
5252
5353 let canonicalName =