lib: Hledger.Utils.Parse: restofline can go to eof also
This commit is contained in:
parent
8ad2ea2fb4
commit
c3680b868b
@ -127,7 +127,7 @@ spacenonewline :: (Stream s, Char ~ Token s) => ParsecT CustomErr s m Char
|
|||||||
spacenonewline = satisfy isNonNewlineSpace
|
spacenonewline = satisfy isNonNewlineSpace
|
||||||
|
|
||||||
restofline :: TextParser m String
|
restofline :: TextParser m String
|
||||||
restofline = anySingle `manyTill` newline
|
restofline = anySingle `manyTill` eolof
|
||||||
|
|
||||||
eolof :: TextParser m ()
|
eolof :: TextParser m ()
|
||||||
eolof = (newline >> return ()) <|> eof
|
eolof = (newline >> return ()) <|> eof
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user