dev-haskell/c2hs: remove unused patch
authorMichael Mair-Keimberger (asterix) <m.mairkeimberger@gmail.com>
Mon, 25 Jul 2016 18:37:56 +0000 (20:37 +0200)
committerPatrice Clement <monsieurp@gentoo.org>
Wed, 3 Aug 2016 07:21:54 +0000 (09:21 +0200)
Signed-off-by: Patrice Clement <monsieurp@gentoo.org>
dev-haskell/c2hs/files/c2hs-0.16.3-ghc-7.6.patch [deleted file]

diff --git a/dev-haskell/c2hs/files/c2hs-0.16.3-ghc-7.6.patch b/dev-haskell/c2hs/files/c2hs-0.16.3-ghc-7.6.patch
deleted file mode 100644 (file)
index 2b6adb2..0000000
+++ /dev/null
@@ -1,45 +0,0 @@
---- c2hs-0.16.3-orig/src/C2HS/Config.hs        2011-03-25 00:04:59.000000000 +1100
-+++ c2hs-0.16.3/src/C2HS/Config.hs     2012-09-16 10:57:54.514595408 +1000
-@@ -1,3 +1,4 @@
-+{-# LANGUAGE CPP #-}
- --                                                                -*-haskell-*-
- --  ** @configure_input@ **
- --  ===========================================================================
-@@ -38,6 +39,10 @@
- 
- import Foreign  (toBool)
- import Foreign.C (CInt)
-+#if (__GLASGOW_HASKELL__>=705)
-+import Foreign.C.Types(CInt(..))
-+#endif
-+
- import System.Info (arch, os)
- 
- -- program settings
---- c2hs-0.16.3-orig/src/Control/StateTrans.hs 2011-03-25 00:04:59.000000000 +1100
-+++ c2hs-0.16.3/src/Control/StateTrans.hs      2012-09-16 10:56:52.470863551 +1000
-@@ -1,3 +1,4 @@
-+{-# LANGUAGE CPP, ScopedTypeVariables #-}
- --  The HiPar Toolkit: state transformer routines
- --
- --  Author : Manuel M. T. Chakravarty
-@@ -73,6 +74,10 @@
-                    throwExc, fatal, catchExc, fatalsHandledBy)
- where
- 
-+#if !MIN_VERSION_base(4,6,0)
-+import Prelude hiding (catch)
-+#endif
-+import Control.Exception (catch, IOException)
- 
- -- BEWARE! You enter monad country. Read any of Wadler's or
- -- Launchbury/Peyton-Jones' texts before entering. Otherwise,
-@@ -296,7 +301,7 @@
-                                   ioError err
-               Right _a         -> return state
-             )
--            `catch` (\err -> let
-+            `catch` (\(err :: IOException) -> let
-                                STB handler' = handler err
-                              in
-                              handler' bs gs)