1 files changed, 2 insertions, 0 deletions

diff --git a/lib/CommandLine.hs b/lib/CommandLine.hs
index 55b77b3..ea5d6b8 100644
--- a/lib/CommandLine.hs
+++ b/lib/CommandLine.hs
@@ -286,6 +286,7 @@ vanilla flags  = ArgsStyle { parseInvocation = parse flags }
 --
 --   * default polyvariadic - Implicit polyvariadic option if no other option is specified.
 --
+fancy :: [([Char], Int)] -> [[Char]] -> [Char] -> ArgsStyle
 fancy sargspsec polyVariadicArgs defaultPoly = ArgsStyle
     { parseInvocation = parse sargspsec polyVariadicArgs defaultPoly }
  where
@@ -436,6 +437,7 @@ sortOn f =
 #endif
 #endif
 
+removeIntersection :: Ord a => [a] -> [a] -> ([a], [a])
 removeIntersection (x:xs) (y:ys)
     | x == y = removeIntersection xs ys
     | x < y  = first (x :) $ removeIntersection xs (y:ys)