>From 1ded9f737d258afbb53f2f2fcfde6766da23bbb6 Mon Sep 17 00:00:00 2001 From: David PIROTTE Date: Thu, 15 May 2014 11:33:13 -0300 Subject: [PATCH 6/6] fix scm_c_gparam_construct * glib/gnome/gobject/gparameter.c: argument 4 of g_param_spec_gtyped must be a GType, not a SCM type. --- glib/gnome/gobject/gparameter.c | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/glib/gnome/gobject/gparameter.c b/glib/gnome/gobject/gparameter.c index 52d1700..d2a24ce 100644 --- a/glib/gnome/gobject/gparameter.c +++ b/glib/gnome/gobject/gparameter.c @@ -242,7 +242,7 @@ scm_c_gparam_construct (SCM instance, SCM initargs) { GParamSpec *pspec = NULL; GParamFlags flags; - GType param_type; + GType param_type, param_gtype; char *name, *nick, *blurb; param_type = scm_c_gtype_class_to_gtype (scm_class_of (instance)); @@ -402,8 +402,10 @@ scm_c_gparam_construct (SCM instance, SCM initargs) else if (param_type == G_TYPE_PARAM_GTYPE) { SCM type = REF (is_a_type); if (scm_is_true (type)) - type = scm_c_gtype_class_to_gtype (type); - pspec = g_param_spec_gtype (name, nick, blurb, type, flags); + param_gtype = scm_c_gtype_class_to_gtype (type); + else + param_gtype = G_TYPE_NONE; + pspec = g_param_spec_gtype (name, nick, blurb, param_gtype, flags); } else { scm_c_gruntime_error ("%gparam-construct", -- 2.0.0.rc0