Add infrastructure for wrappers for gtkmain.h.

lib/gtk/Makefile.am

@@ -9,6 +9,7 @@ gtk_la = gtk.la
 endif
 
 libelk_gtk_la_SOURCES = \
+	gtkmain.c \
 	$(NULL)
 libelk_gtk_la_CFLAGS = @GTK_CFLAGS@
 libelk_gtk_la_LDFLAGS = -no-undefined

lib/gtk/gtk.h

@@ -31,3 +31,5 @@
 #include <scheme.h>
 #include <gtk/gtk.h>
 #include "config.h"
+
+extern void elk_init_gtk_gtkmain (void);

lib/gtk/gtkmain.c

@@ -0,0 +1,34 @@
+/* gtkmain.c
+ *
+ * $Id$
+ *
+ * Copyright 1990, 1991, 1992, 1993, 1994, 1995, Oliver Laumann, Berlin
+ * Copyright 2002, 2003 Sam Hocevar <sam@hocevar.net>, Paris
+ *
+ * This software was derived from Elk 1.2, which was Copyright 1987, 1988,
+ * 1989, Nixdorf Computer AG and TELES GmbH, Berlin (Elk 1.2 has been written
+ * by Oliver Laumann for TELES Telematic Services, Berlin, in a joint project
+ * between TELES and Nixdorf Microprocessor Engineering, Berlin).
+ *
+ * Oliver Laumann, TELES GmbH, Nixdorf Computer AG and Sam Hocevar, as co-
+ * owners or individual owners of copyright in this software, grant to any
+ * person or company a worldwide, royalty free, license to
+ *
+ *    i) copy this software,
+ *   ii) prepare derivative works based on this software,
+ *  iii) distribute copies of this software or derivative works,
+ *   iv) perform this software, or
+ *    v) display this software,
+ *
+ * provided that this notice is not removed and that neither Oliver Laumann
+ * nor Teles nor Nixdorf are deemed to have made any representations as to
+ * the suitability of this software for any purpose nor are held responsible
+ * for any defects of this software.
+ *
+ * THERE IS ABSOLUTELY NO WARRANTY FOR THIS SOFTWARE.
+ */
+
+#include "gtk.h"
+
+void elk_init_gtk_gtkmain () {
+}

lib/gtk/init.c

@@ -31,5 +31,6 @@
 #include "gtk.h"
 
 void elk_init_gtk_init () {
+    elk_init_gtk_gtkmain ();
     P_Provide (Intern ("gtk.la"));
 }