summaryrefslogtreecommitdiff
path: root/lib/CommandLine.hs
diff options
context:
space:
mode:
authorjoe <joe@jerkface.net>2016-04-30 10:44:13 -0400
committerjoe <joe@jerkface.net>2016-04-30 10:44:13 -0400
commitb71913df7945838de8526f4019ecdcba6afe6d28 (patch)
tree96b36fb961405469f553b3b544a71386f49f649f /lib/CommandLine.hs
parente69a1a1f1991c2ce879aaba187002a7b5a5f6827 (diff)
jessie build fixes
Diffstat (limited to 'lib/CommandLine.hs')
-rw-r--r--lib/CommandLine.hs8
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/CommandLine.hs b/lib/CommandLine.hs
index 62f0315..55b77b3 100644
--- a/lib/CommandLine.hs
+++ b/lib/CommandLine.hs
@@ -48,7 +48,7 @@ type MergeData = [(Int,Ordering)]
48-- | Expr a 48-- | Expr a
49-- 49--
50data Expr a where 50data Expr a where
51 -- | Prim 51 -- Prim
52 -- 52 --
53 -- Takes a function from the option arguments and unamed arguments repsectively to 53 -- Takes a function from the option arguments and unamed arguments repsectively to
54 -- a value of type a, usually IO (), and gives you an expression tree. As one 54 -- a value of type a, usually IO (), and gives you an expression tree. As one
@@ -57,13 +57,13 @@ data Expr a where
57 -- where we are in the tree. 57 -- where we are in the tree.
58 -- 58 --
59 Prim :: ([[String]] -> [String] -> a) -> Interval (SuperOrd Int) -> Expr a 59 Prim :: ([[String]] -> [String] -> a) -> Interval (SuperOrd Int) -> Expr a
60 -- | Star 60 -- Star
61 -- Applicative '<*>' 61 -- Applicative '<*>'
62 Star :: MergeData -> Expr (b -> a) -> (Expr b) -> Expr a 62 Star :: MergeData -> Expr (b -> a) -> (Expr b) -> Expr a
63 -- | Or 63 -- Or
64 -- Alternative '<|>' 64 -- Alternative '<|>'
65 Or :: MergeData -> Expr a -> Expr a -> Expr a 65 Or :: MergeData -> Expr a -> Expr a -> Expr a
66 -- | Empty 66 -- Empty
67 -- Alternative empty 67 -- Alternative empty
68 Empty :: Expr a 68 Empty :: Expr a
69 69