~mdw
/
clg
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Updated dialog class
[clg]
/
gtk
/
gtkglue.c
diff --git
a/gtk/gtkglue.c
b/gtk/gtkglue.c
index
a496866
..
1c129c7
100644
(file)
--- a/
gtk/gtkglue.c
+++ b/
gtk/gtkglue.c
@@
-1,5
+1,5
@@
/* Common Lisp bindings for GTK+ v2.0
/* Common Lisp bindings for GTK+ v2.0
- * Copyright (C) 1999-200
0 Espen S. Johnsen <esj@stud.cs.uit.no
>
+ * Copyright (C) 1999-200
2 Espen S. Johnsen <espen@users.sourceforge.net
>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
@@
-16,7
+16,7
@@
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
-/* $Id: gtkglue.c,v 1.
8 2001/12/12 20:24:41
espen Exp $ */
+/* $Id: gtkglue.c,v 1.
10 2002/03/24 13:01:12
espen Exp $ */
#include <gtk/gtk.h>
#include <gtk/gtk.h>
@@
-37,15
+37,15
@@
gtk_query_version (guint *major, guint *minor, guint *micro)
}
}
-/* Is this necessary? */
-
-GtkType
-gtk_object_type (GtkObject *obj)
+void gtk_callback_marshal (GtkWidget *widget, gpointer data)
{
{
- return GTK_OBJECT_TYPE (obj);
-}
-
+ GValue arg;
+ memset (&arg, 0, sizeof (GValue));
+ g_value_init (&arg, gtk_widget_get_type ());
+ g_value_set_object (&arg, widget);
+ callback_marshal ((guint)data, NULL, 1, &arg);
+}
/* Widget */
/* Widget */
@@
-68,7
+68,7
@@
gtk_widget_mapped_p (GtkWidget *widget)
}
void
}
void
-gtk_widget_allocation (GtkWidget *widget, int *width, int *height)
+gtk_widget_
get_size_
allocation (GtkWidget *widget, int *width, int *height)
{
*width = widget->allocation.width;
*height = widget->allocation.height;
{
*width = widget->allocation.width;
*height = widget->allocation.height;