GtkSharp/glue/type.c
Mike Kestner 4baa6d76e0 2004-01-20 John D. Hardin <jhardin@impsec.org>
* glue/type.c : ansi-c-ify some late var decls.

svn path=/trunk/gtk-sharp/; revision=22303
2004-01-20 16:06:19 +00:00

81 lines
1.7 KiB
C

/* type.c : GType utilities
*
* Author: Mike Kestner <mkestner@speakeasy.net>
*
* <c> 2002 Mike Kestner
*/
#include <glib-object.h>
#include <stdio.h>
/* Forward declarations */
G_CONST_RETURN gchar *gtksharp_get_type_name (GObject *obj);
gboolean gtksharp_is_object (gpointer obj);
GType gtksharp_get_type_id (GObject *obj);
GType gtksharp_get_parent_type (GType typ);
G_CONST_RETURN gchar *gtksharp_get_type_name_for_id (GType typ);
GType gtksharp_register_type (gchar *name, GType parent);
void gtksharp_override_virtual_method (GType g_type, const gchar *name, GCallback callback);
/* */
G_CONST_RETURN gchar *
gtksharp_get_type_name (GObject *obj)
{
return G_OBJECT_TYPE_NAME (obj);
}
gboolean
gtksharp_is_object (gpointer obj)
{
return G_IS_OBJECT (obj);
}
GType
gtksharp_get_type_id (GObject *obj)
{
return G_TYPE_FROM_INSTANCE (obj);
}
GType
gtksharp_get_parent_type (GType typ)
{
return g_type_parent (typ);
}
G_CONST_RETURN gchar *
gtksharp_get_type_name_for_id (GType typ)
{
return g_type_name (typ);
}
GType
gtksharp_register_type (gchar *name, GType parent)
{
GTypeQuery query;
GTypeInfo info = {0, NULL, NULL, NULL, NULL, NULL, 0, 0, NULL, NULL };
g_type_query (parent, &query);
info.class_size = query.class_size;
info.instance_size = query.instance_size;
return g_type_register_static (parent, name, &info, 0);
}
void
gtksharp_override_virtual_method (GType g_type, const gchar *name, GCallback callback)
{
guint id;
GClosure *closure;
if (g_type_class_peek (g_type) == NULL)
g_type_class_ref (g_type);
id = g_signal_lookup (name, g_type);
closure = g_cclosure_new (callback, NULL, NULL);
g_signal_override_class_closure (id, g_type, closure);
}