Fix build with new gtk.

git-svn-id: svn://creme-brulee.marcuscom.com/ports/trunk@13051 df743ca5-7f9a-e211-a948-0013205c9059

6 files changed, 152 insertions, 0 deletions

diff --git a/x11-toolkits/gauche-gtk/Makefile b/x11-toolkits/gauche-gtk/Makefile
new file mode 100644
index 000000000..ca9be29fb
--- /dev/null
+++ b/x11-toolkits/gauche-gtk/Makefile
@@ -0,0 +1,55 @@
+# New ports collection makefile for:	Gauche-gtk
+# Date created:			3 November 2002
+# Whom:				Kimura Fuyuki <fuyuki@hadaly.org>
+#
+# $FreeBSD: ports/x11-toolkits/gauche-gtk/Makefile,v 1.35 2009/08/22 00:39:22 amdmi3 Exp $
+#
+
+PORTNAME=	gauche
+PORTVERSION=	0.4.1
+PORTREVISION=	10
+CATEGORIES=	x11-toolkits scheme
+MASTER_SITES=	SF/${PORTNAME}/Gauche-gtk/${PORTVERSION}
+PKGNAMESUFFIX=	-gtk
+DISTNAME=	Gauche${PKGNAMESUFFIX}-${PORTVERSION}
+EXTRACT_SUFX=	.tgz
+
+MAINTAINER=	erik@smluc.org
+COMMENT=	GTK2 binding for Gauche
+
+BUILD_DEPENDS=	gosh:${PORTSDIR}/lang/gauche
+RUN_DEPENDS=	${BUILD_DEPENDS}
+
+USE_GNOME=	gtk20 # this alters CONFIGURE_TARGET!
+GNU_CONFIGURE=	yes
+EXAMPLESDIR=	${PREFIX}/share/examples/${PORTNAME}/gtk
+DOCSDIR=	${PREFIX}/share/doc/${PORTNAME}/gtk
+PLIST_SUB=	VERSION="`gauche-config -V`" \
+		TARGET="${MACHINE_ARCH}-portbld-freebsd${OSREL}"
+CFLAGS+=	-fPIC
+
+.if defined(WITH_GTKGLEXT)
+LIB_DEPENDS+=	gtkglext-x11-1.0.0:${PORTSDIR}/x11-toolkits/gtkglext
+CONFIGURE_ARGS=	--enable-gtkgl
+PLIST_SUB+=	GTKGLEXT=""
+.else
+PLIST_SUB+=	GTKGLEXT="@comment "
+.endif
+
+post-patch:
+	@${REINPLACE_CMD} -e 's|n-bytes|x-n-bytes|g' -e 's|text-size|x-text-size|g' \
+		${WRKSRC}/src/gtkentry.stub
+
+post-install:
+.if !defined(NOPORTDOCS)
+	${MKDIR} ${EXAMPLESDIR}
+	${INSTALL_DATA} ${WRKSRC}/examples/*.scm ${EXAMPLESDIR}
+	${CP} -R ${WRKSRC}/examples/gtk-tutorial ${EXAMPLESDIR}
+.if defined(WITH_GTKGLEXT)
+	${CP} -R ${WRKSRC}/examples/gtkglext ${EXAMPLESDIR}
+.endif
+	${MKDIR} ${DOCSDIR}
+	${INSTALL_DATA} ${WRKSRC}/README ${DOCSDIR}
+.endif
+
+.include <bsd.port.mk>
diff --git a/x11-toolkits/gauche-gtk/distinfo b/x11-toolkits/gauche-gtk/distinfo
new file mode 100644
index 000000000..1958a0554
--- /dev/null
+++ b/x11-toolkits/gauche-gtk/distinfo
@@ -0,0 +1,3 @@
+MD5 (Gauche-gtk-0.4.1.tgz) = 18356efab446b9524be8371a3b852a6a
+SHA256 (Gauche-gtk-0.4.1.tgz) = 5f600214b04ce4090ca6aa63f9344a0c6ec9a2462e4106b53a7a44514d4a73db
+SIZE (Gauche-gtk-0.4.1.tgz) = 324945
diff --git a/x11-toolkits/gauche-gtk/files/patch-src_gtktexttag.stub b/x11-toolkits/gauche-gtk/files/patch-src_gtktexttag.stub
new file mode 100644
index 000000000..03d0ba0d4
--- /dev/null
+++ b/x11-toolkits/gauche-gtk/files/patch-src_gtktexttag.stub
@@ -0,0 +1,29 @@
+--- src/gtktexttag.stub.orig	2004-06-26 23:59:48.000000000 -0400
++++ src/gtktexttag.stub	2007-10-24 15:07:15.000000000 -0400
+@@ -35,8 +35,6 @@
+    (editable-set :type <uint>)
+    (language-set :type <uint>)
+    (pad1 :type <uint>)
+-   (pad2 :type <uint>)
+-   (pad3 :type <uint>)
+    )
+ (allocator (c "Scm_GtkObjectAllocate"))
+   )
+@@ -85,8 +83,6 @@
+    (is-text :type <uint>)
+    (pad1 :type <uint>)
+    (pad2 :type <uint>)
+-   (pad3 :type <uint>)
+-   (pad4 :type <uint>)
+    )
+   (allocator "return Scm_MakeGtkTextAppearance(NULL);")
+   )
+@@ -128,8 +124,6 @@
+    (realized :type <uint>)
+    (pad1 :type <uint>)
+    (pad2 :type <uint>)
+-   (pad3 :type <uint>)
+-   (pad4 :type <uint>)
+    )
+   (allocator "return Scm_MakeGtkTextAttributes(NULL);")
+   )
diff --git a/x11-toolkits/gauche-gtk/files/patch-src_gtktoolbar.stub b/x11-toolkits/gauche-gtk/files/patch-src_gtktoolbar.stub
new file mode 100644
index 000000000..2ccba5efa
--- /dev/null
+++ b/x11-toolkits/gauche-gtk/files/patch-src_gtktoolbar.stub
@@ -0,0 +1,11 @@
+--- src/gtktoolbar.stub.orig	Sat Dec 10 22:36:08 2005
++++ src/gtktoolbar.stub	Sat Dec 10 22:36:31 2005
+@@ -51,8 +51,6 @@
+    (tooltips :type <gtk-tooltips>)
+    (button-maxw :type <int>)
+    (button-maxh :type <int>)
+-   (style-set-connection :type <uint>)
+-   (icon-size-connection :type <uint>)
+    (style-set :type <uint>)
+    (icon-size-set :type <uint>)
+    )
diff --git a/x11-toolkits/gauche-gtk/pkg-descr b/x11-toolkits/gauche-gtk/pkg-descr
new file mode 100644
index 000000000..ea8a3724c
--- /dev/null
+++ b/x11-toolkits/gauche-gtk/pkg-descr
@@ -0,0 +1,3 @@
+This is a Gauche extension module to use GTK.
+
+WWW: http://www.shiro.dreamhost.com/scheme/gauche/index.html
diff --git a/x11-toolkits/gauche-gtk/pkg-plist b/x11-toolkits/gauche-gtk/pkg-plist
new file mode 100644
index 000000000..522e2eb04
--- /dev/null
+++ b/x11-toolkits/gauche-gtk/pkg-plist
@@ -0,0 +1,51 @@
+lib/gauche/%%VERSION%%/%%TARGET%%/gauche-gtk.so
+%%GTKGLEXT%%lib/gauche/%%VERSION%%/%%TARGET%%/gauche-gtkgl.so
+share/gauche/%%VERSION%%/lib/gtk.scm
+share/gauche/%%VERSION%%/lib/gtk/error-dialog.scm
+share/gauche/%%VERSION%%/lib/gtk/gdkkeysyms.scm
+share/gauche/%%VERSION%%/lib/gtk/gtkaux.scm
+share/gauche/%%VERSION%%/lib/.packages/Gauche-gtk.gpd
+%%GTKGLEXT%%share/gauche/%%VERSION%%/lib/gtk/gtkgl.scm
+share/gauche/%%VERSION%%/lib/gtk/listener.scm
+@dirrm share/gauche/%%VERSION%%/lib/gtk
+%%PORTDOCS%%%%EXAMPLESDIR%%/error-dialog.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gdk-animation.scm
+%%PORTDOCS%%%%GTKGLEXT%%%%EXAMPLESDIR%%/gtkglext/README
+%%PORTDOCS%%%%GTKGLEXT%%%%EXAMPLESDIR%%/gtkglext/font.scm
+%%PORTDOCS%%%%GTKGLEXT%%%%EXAMPLESDIR%%/gtkglext/gears.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/COPYING
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/README
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/arrow.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/aspectframe.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/base.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/buttonbox.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/buttons.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/entry.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/eventbox.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/filesel.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/fixed.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/frame.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/helloworld.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/helloworld2.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/info.xpm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/label.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/list.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/menu.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/notebook.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/packbox.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/paned.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/pixmap.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/progressbar.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/radiobuttons.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/rangewidgets.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/scrolledwin.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/spinbutton.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/statusbar.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/table.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/gtk-tutorial/wheelbarrow.scm
+%%PORTDOCS%%%%EXAMPLESDIR%%/listener.scm
+%%PORTDOCS%%%%GTKGLEXT%%@dirrm %%EXAMPLESDIR%%/gtkglext
+%%PORTDOCS%%@dirrm %%EXAMPLESDIR%%/gtk-tutorial
+%%PORTDOCS%%@dirrm %%EXAMPLESDIR%%
+%%PORTDOCS%%%%DOCSDIR%%/README
+%%PORTDOCS%%@dirrm %%DOCSDIR%%