From: Michael Mair-Keimberger (asterix) <m.mairkeimberger@gmail.com>
Date: Mon, 25 Jul 2016 18:33:01 +0000 (+0200)
Subject: dev-haskell/alex: remove unused patch
X-Git-Url: http://git.tremily.us/gitweb.cgi?a=commitdiff_plain;h=57548c7a0f1c62964f82ab53b7549c63334bb2ad;p=gentoo.git

dev-haskell/alex: remove unused patch

Closes: https://github.com/gentoo/gentoo/pull/1984

Signed-off-by: Patrice Clement <monsieurp@gentoo.org>
---

diff --git a/dev-haskell/alex/files/alex-3.1.4-ghc-7.10.patch b/dev-haskell/alex/files/alex-3.1.4-ghc-7.10.patch
deleted file mode 100644
index cb422b60d7c5..000000000000
--- a/dev-haskell/alex/files/alex-3.1.4-ghc-7.10.patch
+++ /dev/null
@@ -1,24 +0,0 @@
-diff --git a/templates/wrappers.hs b/templates/wrappers.hs
-index a1a1a6d..c020cc7 100644
---- a/templates/wrappers.hs
-+++ b/templates/wrappers.hs
-@@ -284,6 +284,19 @@ runAlex input (Alex f)
- 
- newtype Alex a = Alex { unAlex :: AlexState -> Either String (AlexState, a) }
- 
-+instance Functor Alex where
-+  fmap f a = Alex $ \s -> case unAlex a s of
-+                            Left msg -> Left msg
-+                            Right (s', a') -> Right (s', f a')
-+
-+instance Applicative Alex where
-+  pure a   = Alex $ \s -> Right (s, a)
-+  fa <*> a = Alex $ \s -> case unAlex fa s of
-+                            Left msg -> Left msg
-+                            Right (s', f) -> case unAlex a s' of
-+                                               Left msg -> Left msg
-+                                               Right (s'', b) -> Right (s'', f b)
-+
- instance Monad Alex where
-   m >>= k  = Alex $ \s -> case unAlex m s of 
-                                 Left msg -> Left msg