gentoo-mirror/gentoo
1
0
Fork 0
mirror of https://github.com/gentoo-mirror/gentoo.git synced 2026-08-05 12:38:09 -07:00
Code Issues Projects Releases Wiki Activity

dev-haskell/glib: remove unused patches

Browse Source 
Signed-off-by: Patrice Clement <monsieurp@gentoo.org>
This commit is contained in:
Michael Mair-Keimberger (asterix)
2016-07-26 18:44:07 +02:00
committed by Patrice Clement
parent bd6dcce12b
commit baa3f756a4
2 changed files with 0 additions and 42 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
dev-haskell/glib/files/glib-0.12.3.1-ghc-7.6.patch
View File

@@ -1,31 +0,0 @@
--- glib-0.12.3.1-orig/System/Glib/GObject.chs 2012-05-28 08:18:53.000000000 +1000
+++ glib-0.12.3.1/System/Glib/GObject.chs 2012-10-11 09:48:16.313701201 +1100
@@ -127,8 +127,6 @@
{#pointer GDestroyNotify as DestroyNotify#}
-foreign import ccall "wrapper" mkDestroyNotifyPtr :: IO () -> IO DestroyNotify
-
-- | This function wraps any newly created objects that derives from
-- GInitiallyUnowned also known as objects with
-- \"floating-references\". The object will be refSink (for glib
--- glib-0.12.3.1-orig/System/Glib/MainLoop.chs 2012-05-28 08:18:53.000000000 +1000
+++ glib-0.12.3.1/System/Glib/MainLoop.chs 2012-10-11 09:48:04.779383615 +1100
@@ -71,7 +71,7 @@
{#pointer SourceFunc#}
-foreign import ccall "wrapper" mkSourceFunc :: IO {#type gint#} -> IO SourceFunc
+foreign import ccall "wrapper" mkSourceFunc :: (Ptr () -> IO {#type gint#}) -> IO SourceFunc
type HandlerId = {#type guint#}
@@ -79,7 +79,7 @@
--
makeCallback :: IO {#type gint#} -> IO (SourceFunc, DestroyNotify)
makeCallback fun = do
- funPtr <- mkSourceFunc fun
+ funPtr <- mkSourceFunc (const fun)
return (funPtr, destroyFunPtr)
-- | Sets a function to be called at regular intervals, with the default

11
dev-haskell/glib/files/glib-0.13.0.7-ghc-7.10.patch
View File

@@ -1,11 +0,0 @@
--- glib-0.13.0.7-orig/SetupWrapper.hs 2014-12-24 20:57:16.000000000 +1100
+++ glib-0.13.0.7/SetupWrapper.hs 2015-01-03 17:39:42.464000600 +1100
@@ -18,7 +18,7 @@
import System.Environment
import System.Process
-import System.Exit
+import System.Exit (exitWith, ExitCode(..))
import System.FilePath
import System.Directory
import qualified Control.Exception as Exception