diff options
| author | mezz <mezz@df743ca5-7f9a-e211-a948-0013205c9059> | 2006-09-05 11:44:48 +0800 |
|---|---|---|
| committer | mezz <mezz@df743ca5-7f9a-e211-a948-0013205c9059> | 2006-09-05 11:44:48 +0800 |
| commit | 08a258425849ca85c509b62b387ebdc8cf4f5fe2 (patch) | |
| tree | f01c7b8bb78be1df054f3a15a5a21a2bf4e8bf38 /x11-toolkits/hs-gtk2hs | |
| parent | e20b94a0f3fcbcaa9a60a78a5de60475e7777d53 (diff) | |
| download | marcuscom-ports-08a258425849ca85c509b62b387ebdc8cf4f5fe2.tar marcuscom-ports-08a258425849ca85c509b62b387ebdc8cf4f5fe2.tar.gz marcuscom-ports-08a258425849ca85c509b62b387ebdc8cf4f5fe2.tar.bz2 marcuscom-ports-08a258425849ca85c509b62b387ebdc8cf4f5fe2.tar.lz marcuscom-ports-08a258425849ca85c509b62b387ebdc8cf4f5fe2.tar.xz marcuscom-ports-08a258425849ca85c509b62b387ebdc8cf4f5fe2.tar.zst marcuscom-ports-08a258425849ca85c509b62b387ebdc8cf4f5fe2.zip | |
Sync w/ FreeBSD ports tree.
git-svn-id: svn://creme-brulee.marcuscom.com/ports/trunk@7244 df743ca5-7f9a-e211-a948-0013205c9059
Diffstat (limited to 'x11-toolkits/hs-gtk2hs')
| -rw-r--r-- | x11-toolkits/hs-gtk2hs/Makefile | 2 | ||||
| -rw-r--r-- | x11-toolkits/hs-gtk2hs/files/patch-glib-System-Glib-GValue.chs | 11 |
2 files changed, 12 insertions, 1 deletions
diff --git a/x11-toolkits/hs-gtk2hs/Makefile b/x11-toolkits/hs-gtk2hs/Makefile index b7f701fc9..107c6f8a9 100644 --- a/x11-toolkits/hs-gtk2hs/Makefile +++ b/x11-toolkits/hs-gtk2hs/Makefile @@ -7,7 +7,7 @@ PORTNAME= gtk2hs PORTVERSION= 0.9.10 -PORTREVISION= 3 +PORTREVISION= 4 PORTEPOCH= 1 CATEGORIES= x11-toolkits haskell MASTER_SITES= ${MASTER_SITE_SOURCEFORGE} diff --git a/x11-toolkits/hs-gtk2hs/files/patch-glib-System-Glib-GValue.chs b/x11-toolkits/hs-gtk2hs/files/patch-glib-System-Glib-GValue.chs new file mode 100644 index 000000000..b41da0907 --- /dev/null +++ b/x11-toolkits/hs-gtk2hs/files/patch-glib-System-Glib-GValue.chs @@ -0,0 +1,11 @@ +--- glib/System/Glib/GValue.chs.orig 2005-04-18 22:04:08.000000000 -0400 ++++ glib/System/Glib/GValue.chs 2006-03-05 14:53:20.000000000 -0400 +@@ -68,7 +68,7 @@ valueGetType (GValue gvPtr) = {# get GVa + -- + allocaGValue :: (GValue -> IO b) -> IO b + allocaGValue body = +- allocaBytes {# sizeof GValue #} $ \gvPtr -> do ++ allocaBytes ({# sizeof GType #}+ 2* {# sizeof guint64 #}) $ \gvPtr -> do + -- The g_type field of the value must be zero or g_value_init will fail. + {# set GValue->g_type #} gvPtr (0 :: GType) + result <- body (GValue gvPtr) |