diff options
author | V3n3RiX <venerix@redcorelinux.org> | 2018-07-14 20:57:42 +0100 |
---|---|---|
committer | V3n3RiX <venerix@redcorelinux.org> | 2018-07-14 20:57:42 +0100 |
commit | 1798c4aeca70ac8d0a243684d6a798fbc65735f8 (patch) | |
tree | e48e19cb6fa03de18e1c63e1a93371b7ebc4eb56 /dev-haskell/pcre-light/files/pcre-light-0.4-ghc-7.7.patch | |
parent | d87262dd706fec50cd150aab3e93883b6337466d (diff) |
gentoo resync : 14.07.2018
Diffstat (limited to 'dev-haskell/pcre-light/files/pcre-light-0.4-ghc-7.7.patch')
-rw-r--r-- | dev-haskell/pcre-light/files/pcre-light-0.4-ghc-7.7.patch | 39 |
1 files changed, 0 insertions, 39 deletions
diff --git a/dev-haskell/pcre-light/files/pcre-light-0.4-ghc-7.7.patch b/dev-haskell/pcre-light/files/pcre-light-0.4-ghc-7.7.patch deleted file mode 100644 index 2b4181929f60..000000000000 --- a/dev-haskell/pcre-light/files/pcre-light-0.4-ghc-7.7.patch +++ /dev/null @@ -1,39 +0,0 @@ -diff --git a/Text/Regex/PCRE/Light.hs b/Text/Regex/PCRE/Light.hs -index 80c28a0..7fc9581 100644 ---- a/Text/Regex/PCRE/Light.hs -+++ b/Text/Regex/PCRE/Light.hs -@@ -77,6 +77,7 @@ import qualified Data.ByteString as S - #if __GLASGOW_HASKELL__ >= 608 - import qualified Data.ByteString.Internal as S - import qualified Data.ByteString.Unsafe as S -+import qualified System.IO.Unsafe as U - #else - import qualified Data.ByteString.Base as S - #endif -@@ -193,7 +194,7 @@ compile s o = case compileM s o of - -- > Left "nothing to repeat" - -- - compileM :: S.ByteString -> [PCREOption] -> Either String Regex --compileM str os = unsafePerformIO $ -+compileM str os = U.unsafePerformIO $ - S.useAsCString str $ \pattern -> do - alloca $ \errptr -> do - alloca $ \erroffset -> do -@@ -263,7 +264,7 @@ compileM str os = unsafePerformIO $ - -- is returned. - -- - match :: Regex -> S.ByteString -> [PCREExecOption] -> Maybe [S.ByteString] --match (Regex pcre_fp _) subject os = unsafePerformIO $ do -+match (Regex pcre_fp _) subject os = U.unsafePerformIO $ do - withForeignPtr pcre_fp $ \pcre_ptr -> do - n_capt <- captureCount' pcre_ptr - -@@ -324,7 +325,7 @@ match (Regex pcre_fp _) subject os = unsafePerformIO $ do - - - captureCount :: Regex -> Int --captureCount (Regex pcre_fp _) = unsafePerformIO $ do -+captureCount (Regex pcre_fp _) = U.unsafePerformIO $ do - withForeignPtr pcre_fp $ \pcre_ptr -> do - captureCount' pcre_ptr - |