optima 0.3 → 0.3.0.1

raw patch · 3 files changed

+6/−2 lines, 3 files

Files

demo/Main.hs +3/−1
library/Optima.hs +2/−0
optima.cabal +1/−1

demo/Main.hs view

@@ -3,6 +3,7 @@ import Prelude import qualified Optima import qualified Attoparsec.Data as Attoparsec+import qualified Data.Text as Text   main = parseOpts >>= print where@@ -29,7 +30,8 @@             Optima.member "e" textParam,             Optima.subgroup "subgroup" (asum [                 Optima.member "f" textParam,-                Optima.member "g" (flag $> "slkdfjsdkj")+                Optima.member "g" (flag $> "slkdfjsdkj"),+                Text.concat <$> some (Optima.member "h" textParam)               ])             ])))     where

library/Optima.hs view

@@ -93,6 +93,8 @@ instance Alternative ParamGroup where   empty = ParamGroup (\ _ -> empty)   (<|>) (ParamGroup left) (ParamGroup right) = ParamGroup (\ prefix -> left prefix <|> right prefix)+  many (ParamGroup parser) = ParamGroup (\ prefix -> many (parser prefix))+  some (ParamGroup parser) = ParamGroup (\ prefix -> some (parser prefix))  deriving instance Functor Param

optima.cabal view

@@ -1,5 +1,5 @@ name: optima-version: 0.3+version: 0.3.0.1 category: CLI, Parsing, Options synopsis: Simple command line interface arguments parser homepage: https://github.com/metrix-ai/optima