diff options
Diffstat (limited to 'dev-haskell/options/files/options-1.2.1-ghc-7.10.patch')
-rw-r--r-- | dev-haskell/options/files/options-1.2.1-ghc-7.10.patch | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/dev-haskell/options/files/options-1.2.1-ghc-7.10.patch b/dev-haskell/options/files/options-1.2.1-ghc-7.10.patch new file mode 100644 index 000000000000..9578c926528e --- /dev/null +++ b/dev-haskell/options/files/options-1.2.1-ghc-7.10.patch @@ -0,0 +1,24 @@ +--- options-1.2.1-orig/lib/Options/Tokenize.hs 2014-12-14 16:34:53.000000000 +1100 ++++ options-1.2.1/lib/Options/Tokenize.hs 2015-01-02 00:14:05.390013340 +1100 +@@ -11,6 +11,7 @@ + , tokenize + ) where + ++import Control.Applicative + import Control.Monad.Error hiding (throwError) + import qualified Control.Monad.Error + import Control.Monad.State +@@ -53,6 +54,13 @@ + + newtype Tok a = Tok { unTok :: ErrorT String (StateT TokState Identity) a } + ++instance Functor Tok where ++ fmap = liftM ++ ++instance Applicative Tok where ++ pure = return ++ (<*>) = ap ++ + instance Monad Tok where + return = Tok . return + m >>= f = Tok (unTok m >>= unTok . f) |