Bring Arsec up to date
authorBryan O'Sullivan <bos@serpentine.com>
Sun, 1 Dec 2013 05:16:41 +0000 (21:16 -0800)
committerBryan O'Sullivan <bos@serpentine.com>
Sun, 1 Dec 2013 05:16:41 +0000 (21:16 -0800)
.hgignore
scripts/Arsec.hs

index 3550e5b..1cee0be 100644 (file)
--- a/.hgignore
+++ b/.hgignore
@@ -10,3 +10,5 @@ syntax: glob
 cabal-dev
 cabal.sandbox.config
 \.cabal-sandbox
+scripts/CaseFolding.txt
+scripts/SpecialCasing.txt
index 653c8e4..cf4f5ac 100644 (file)
@@ -23,14 +23,6 @@ import Text.ParserCombinators.Parsec.Combinator hiding (optional)
 import Text.ParserCombinators.Parsec.Error
 import Text.ParserCombinators.Parsec.Prim hiding ((<|>), many)
 
-instance Applicative (GenParser s a) where
-    pure = return
-    (<*>) = ap
-
-instance Alternative (GenParser s a) where
-    empty = mzero
-    (<|>) = mplus
-
 unichar :: Parser Char
 unichar = chr . fst . head . readHex <$> many1 hexDigit