mirror of
https://github.com/github/semantic.git
synced 2024-11-28 10:15:55 +03:00
Parse finite lists.
This commit is contained in:
parent
5926ff63ff
commit
cb67d79dea
@ -39,6 +39,7 @@ private let source: Madness.Parser<[String], Source>.Function =
|
||||
let argumentsParser: Madness.Parser<[String], Argument>.Function = fix { rest in
|
||||
(curry(Argument.OutputFlag) <^> flag <|> curry(Argument.File) <^> source)
|
||||
<*> rest
|
||||
<|> pure(Argument.End)
|
||||
}
|
||||
|
||||
import Madness
|
||||
|
Loading…
Reference in New Issue
Block a user