summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
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.patch24
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)