@@ -23,14 +23,6 @@ import Text.ParserCombinators.Parsec.Combinator hiding (optional)
23import Text.ParserCombinators.Parsec.Error
23import Text.ParserCombinators.Parsec.Error
24import Text.ParserCombinators.Parsec.Prim hiding ((<|>), many)
24import Text.ParserCombinators.Parsec.Prim hiding ((<|>), many)
26−instance Applicative (GenParser s a) where
30−instance Alternative (GenParser s a) where
34unichar :: Parser Char
26unichar :: Parser Char
35unichar = chr . fst . head . readHex <$> many1 hexDigit
27unichar = chr . fst . head . readHex <$> many1 hexDigit