dev-haskell/wxcore: Needed by some reverse deps

Package-Manager: portage-2.3.0_rc1

4 files changed, 95 insertions, 0 deletions

diff --git a/dev-haskell/wxcore/files/wxcore-0.13.2.3-ghc-7.6.patch b/dev-haskell/wxcore/files/wxcore-0.13.2.3-ghc-7.6.patch
new file mode 100644
index 000000000000..3d5adbea0904
--- /dev/null
+++ b/dev-haskell/wxcore/files/wxcore-0.13.2.3-ghc-7.6.patch
@@ -0,0 +1,42 @@
+--- wxcore-0.13.2.3-orig/src/haskell/Graphics/UI/WXCore/Events.hs	2012-09-30 19:56:52.000000000 +1000
++++ wxcore-0.13.2.3/src/haskell/Graphics/UI/WXCore/Events.hs	2013-01-13 10:08:50.415293002 +1100
+@@ -1,4 +1,4 @@
+-{-# LANGUAGE ForeignFunctionInterface #-}
++{-# LANGUAGE CPP, ForeignFunctionInterface #-}
+ -----------------------------------------------------------------------------------------
+ {-|	Module      :  Events
+ 	Copyright   :  (c) Daan Leijen 2003
+@@ -241,6 +241,9 @@
+ import Foreign.Marshal.Alloc
+ import Foreign.Marshal.Array
+ import Foreign.Marshal.Utils
++#if (__GLASGOW_HASKELL__>=705)
++import Foreign.C.Types(CInt(..))
++#endif
+ 
+ import Data.Char ( chr ) -- used in stc
+ import Data.Maybe ( fromMaybe, fromJust )
+--- wxcore-0.13.2.3-orig/src/haskell/Graphics/UI/WXCore/WxcTypes.hs	2012-09-30 19:56:52.000000000 +1000
++++ wxcore-0.13.2.3/src/haskell/Graphics/UI/WXCore/WxcTypes.hs	2013-01-13 10:08:50.420293137 +1100
+@@ -142,7 +142,12 @@
+ 
+ import Data.Int
+ import Data.Word
++#ifdef MIN_VERSION_base(4,5,0)
++import Debug.Trace (traceIO)
++#else
+ import Debug.Trace (putTraceMsg)
++#define traceIO putTraceMsg
++#endif
+ 
+ import Graphics.UI.WXCore.WxcObject
+ import Graphics.UI.WXCore.WxcClassTypes
+@@ -853,7 +858,7 @@
+ withCharResult io
+   = do x <- io
+        if (x < 0)
+-          then do putTraceMsg ("Recieved negative unicode: " ++ (show x))
++          then do traceIO ("Recieved negative unicode: " ++ (show x))
+                   return '\n'
+           else return (fromCWchar x)
+ 
diff --git a/dev-haskell/wxcore/files/wxcore-0.13.2.3-stdcpp.patch b/dev-haskell/wxcore/files/wxcore-0.13.2.3-stdcpp.patch
new file mode 100644
index 000000000000..e09f9fa5594a
--- /dev/null
+++ b/dev-haskell/wxcore/files/wxcore-0.13.2.3-stdcpp.patch
@@ -0,0 +1,6 @@
+diff --git a/wxcore.cabal b/wxcore.cabal
+index 886c77d..e1bfeb6 100644
+--- a/wxcore.cabal
++++ b/wxcore.cabal
+@@ -173,0 +174 @@ library
++  extra-libraries: stdc++
diff --git a/dev-haskell/wxcore/files/wxcore-0.90.0.1-ghc-7.5.patch b/dev-haskell/wxcore/files/wxcore-0.90.0.1-ghc-7.5.patch
new file mode 100644
index 000000000000..08f0f5bc27d2
--- /dev/null
+++ b/dev-haskell/wxcore/files/wxcore-0.90.0.1-ghc-7.5.patch
@@ -0,0 +1,29 @@
+--- wxcore-0.90.0.1-orig/wxcore.cabal	2012-05-15 06:26:55.000000000 +1000
++++ wxcore-0.90.0.1/wxcore.cabal	2012-05-19 21:32:01.230849131 +1000
+@@ -80,7 +80,7 @@
+     build-depends:
+       array >= 0.2 && < 0.5,
+       base >= 4 && < 5,
+-      containers >= 0.2 && < 0.5
++      containers >= 0.2 && < 0.6
+   else
+     build-depends:
+       array >= 0.1 && < 0.3,
+--- wxcore-0.90.0.1-orig/src/haskell/Graphics/UI/WXCore/Events.hs	2012-05-15 06:26:55.000000000 +1000
++++ wxcore-0.90.0.1/src/haskell/Graphics/UI/WXCore/Events.hs	2012-05-19 21:44:09.457185166 +1000
+@@ -1,4 +1,4 @@
+-{-# LANGUAGE ForeignFunctionInterface #-}
++{-# LANGUAGE CPP, ForeignFunctionInterface #-}
+ -----------------------------------------------------------------------------------------
+ {-|	Module      :  Events
+ 	Copyright   :  (c) Daan Leijen 2003
+@@ -245,6 +245,9 @@
+ import Foreign.Marshal.Alloc
+ import Foreign.Marshal.Array
+ import Foreign.Marshal.Utils
++#if (__GLASGOW_HASKELL__>=705)
++import Foreign.C.Types(CInt(..))
++#endif
+ 
+ import Data.Char ( chr ) -- used in stc
+ import Data.Maybe ( fromMaybe, fromJust )
diff --git a/dev-haskell/wxcore/files/wxcore-0.90.1.1-ghc-7.5.patch b/dev-haskell/wxcore/files/wxcore-0.90.1.1-ghc-7.5.patch
new file mode 100644
index 000000000000..ee2405dce90e
--- /dev/null
+++ b/dev-haskell/wxcore/files/wxcore-0.90.1.1-ghc-7.5.patch
@@ -0,0 +1,18 @@
+--- wxcore-0.90.1.1-orig/src/haskell/Graphics/UI/WXCore/Events.hs	2014-03-23 08:01:17.000000000 +1100
++++ wxcore-0.90.1.1/src/haskell/Graphics/UI/WXCore/Events.hs	2014-03-23 17:05:26.428738461 +1100
+@@ -1,4 +1,4 @@
+-{-# LANGUAGE ForeignFunctionInterface #-}
++{-# LANGUAGE CPP, ForeignFunctionInterface #-}
+ -----------------------------------------------------------------------------------------
+ {-|	Module      :  Events
+ 	Copyright   :  (c) Daan Leijen 2003
+@@ -248,6 +248,9 @@
+ import Foreign.Marshal.Alloc
+ import Foreign.Marshal.Array
+ import Foreign.Marshal.Utils
++#if (__GLASGOW_HASKELL__>=705)
++import Foreign.C.Types(CInt(..))
++#endif
+ 
+ import Data.Char ( chr ) -- used in stc
+ import Data.Maybe ( fromMaybe, fromJust )