Permalink
Switch branches/tags
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
19 lines (14 sloc) 549 Bytes
-- {-# LANGUAGE FlexibleInstances #-}
-- module ApplicativeParsec (
-- module Control.Applicative,
-- module Text.ParserCombinators.Parsec
-- ) where
-- import Control.Applicative
-- import Control.Monad (MonadPlus(..), ap)
-- import Text.ParserCombinators.Parsec hiding (many, optional, (<|>))
-- instance Applicative (GenParser s a) where
-- pure = return
-- (<*>) = ap
-- instance Alternative (GenParser s a) where
-- empty = mzero
-- (<|>) = mplus