blob: b38607b0856e07e0bf122636bc2cdea8f34ec4e4 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
--- guile-gtk.c.orig Wed Apr 30 23:26:36 2003
+++ guile-gtk.c Wed Apr 30 23:27:57 2003
@@ -19,6 +19,7 @@
#include <string.h>
#include <config.h>
#include <assert.h>
+#include <sys/types.h>
#ifdef GTK_2_0
#include <gtk-2.0/gtk/gtk.h>
#include <gtk-2.0/gdk/gdkprivate.h>
@@ -44,6 +45,8 @@
#ifndef SCM_VECTOR_SET
#define SCM_VECTOR_SET(obj,i,v) (SCM_VELTS(obj)[i]=(v))
#endif
+
+typedef unsigned long ulong;
static SCM
sgtk_make_cell (scm_t_bits word0, scm_t_bits word1)
|