glib2 0.90.2-x86-mingw32

data/ext/glib2/rbgobj_param.c

@@ -0,0 +1,390 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/**********************************************************************
+
+  rbgobj_param.c -
+
+  $Author: ggc $
+  $Date: 2007/07/13 16:07:28 $
+  created at: Sun Jun  9 20:31:47 JST 2002
+
+  Copyright (C) 2002,2003  Masahiro Sakai
+
+**********************************************************************/
+
+#include "rbgprivate.h"
+
+VALUE rbgobj_cParam;
+static GQuark qparamspec;
+
+static VALUE pspec_s_allocate(VALUE klass);
+
+typedef struct {
+    GParamSpec* instance;
+    const RGObjClassInfo* cinfo;
+} pspec_holder;
+
+static void
+pspec_mark(holder)
+    pspec_holder* holder;
+{
+    if (holder->instance)
+        rbgobj_instance_call_cinfo_mark(holder->instance);
+}
+
+static void
+pspec_free(holder)
+    pspec_holder* holder;
+{
+    if (holder->instance){
+        rbgobj_instance_call_cinfo_free(holder->instance);
+        g_param_spec_set_qdata(holder->instance, qparamspec, NULL);
+        g_param_spec_unref(holder->instance);
+    }
+    free(holder);
+}
+
+GParamSpec*
+rbgobj_get_param_spec(VALUE obj)
+{
+    pspec_holder* holder;
+    Data_Get_Struct(obj, pspec_holder, holder);
+    return G_PARAM_SPEC(holder->instance);
+}
+
+void
+rbgobj_param_spec_initialize(self, pspec)
+    VALUE self;
+    GParamSpec* pspec;
+{
+    pspec_holder* holder;
+    Data_Get_Struct(self, pspec_holder, holder);
+
+    pspec = g_param_spec_ref(pspec);
+    g_param_spec_sink(pspec);
+
+    holder->instance = pspec;
+    holder->cinfo    = GTYPE2CINFO(G_PARAM_SPEC_TYPE(pspec));
+    g_param_spec_set_qdata(pspec, qparamspec, (gpointer)self);
+}
+
+VALUE
+rbgobj_get_ruby_object_from_param_spec(GParamSpec* pspec, gboolean alloc)
+{
+    gpointer data = g_param_spec_get_qdata(pspec, qparamspec);
+    if (data)
+        return (VALUE)data;
+    else if (alloc) {
+        VALUE result = pspec_s_allocate(GTYPE2CLASS(G_PARAM_SPEC_TYPE(pspec)));
+        rbgobj_param_spec_initialize(result, pspec);
+        return result;
+    } else
+        return Qnil;
+}
+
+/**********************************************************************/
+
+static VALUE
+pspec_s_allocate(VALUE klass)
+{
+    const RGObjClassInfo* cinfo = rbgobj_lookup_class(klass);
+    if (G_TYPE_IS_ABSTRACT(cinfo->gtype))
+        rb_raise(rb_eTypeError, "abstract class");
+
+    {
+        pspec_holder* holder;
+        VALUE result;
+
+        result = Data_Make_Struct(klass, pspec_holder, pspec_mark, pspec_free,
+                                  holder);
+        holder->instance = NULL;
+        holder->cinfo    = NULL;
+
+        return result;
+    }
+}
+
+static VALUE
+inspect(VALUE self)
+{
+    GParamSpec* pspec = rbgobj_get_param_spec(self);
+    VALUE v = rb_inspect(GTYPE2CLASS(pspec->owner_type));
+    gchar* str = g_strdup_printf("#<%s: %s#%s>",
+                                 rb_class2name(CLASS_OF(self)),
+                                 StringValuePtr(v),
+                                 g_param_spec_get_name(pspec));
+    VALUE result = rb_str_new2(str);
+    g_free(str);
+    return result;
+}
+
+static VALUE
+get_name(VALUE self)
+{
+    return rb_str_new2(g_param_spec_get_name(rbgobj_get_param_spec(self)));
+}
+
+static VALUE
+get_nick(VALUE self)
+{
+    const gchar* str = g_param_spec_get_nick(rbgobj_get_param_spec(self));
+    return str ? rb_str_new2(str) : Qnil;
+}
+
+static VALUE
+get_blurb(VALUE self)
+{
+    const gchar* str = g_param_spec_get_blurb(rbgobj_get_param_spec(self));
+    return str ? rb_str_new2(str) : Qnil;
+}
+
+static VALUE
+get_flags(VALUE self)
+{
+    return INT2NUM(rbgobj_get_param_spec(self)->flags);
+}
+
+static VALUE
+get_value_type(VALUE self)
+{
+    return rbgobj_gtype_new(G_PARAM_SPEC_VALUE_TYPE(rbgobj_get_param_spec(self)));
+}
+
+static VALUE
+get_owner_type(VALUE self)
+{
+    return rbgobj_gtype_new(rbgobj_get_param_spec(self)->owner_type);
+}
+
+static VALUE
+get_owner(VALUE self)
+{
+    return GTYPE2CLASS(rbgobj_get_param_spec(self)->owner_type);
+}
+
+static VALUE
+value_default(VALUE self)
+{
+    GValue tmp = {0,};
+    VALUE result;
+
+    g_value_init(&tmp,
+                 G_PARAM_SPEC_VALUE_TYPE(rbgobj_get_param_spec(self)));
+    g_param_value_set_default(rbgobj_get_param_spec(self), &tmp);
+    result = rbgobj_gvalue_to_rvalue(&tmp);
+    g_value_unset(&tmp);
+
+    return result;
+}
+
+#if 0
+static VALUE
+value_defaults(VALUE self, VALUE val)
+{
+    GValue tmp = {0,};
+    gboolean result;
+
+    /* FIXME: use rb_ensure to ensure following g_value_unset() call*/
+    g_value_init(&tmp,
+                 G_PARAM_SPEC_VALUE_TYPE(rbgobj_get_param_spec(self)));
+    rbgobj_rvalue_to_gvalue(val, &tmp);
+    result = g_param_value_defaults(rbgobj_get_param_spec(self), &tmp);
+    g_value_unset(&tmp);
+
+    return CBOOL2RVAL(result);
+}
+#endif
+
+
+struct validate_arg{
+    GParamSpec* pspec;
+    GValue* value;
+    VALUE obj;
+};
+
+static VALUE
+value_validate_body(struct validate_arg* arg)
+{
+    VALUE ret;
+    gboolean b;
+
+    rbgobj_rvalue_to_gvalue(arg->obj, arg->value);
+    b = g_param_value_validate(arg->pspec, arg->value);
+    ret = rbgobj_gvalue_to_rvalue(arg->value);
+    return rb_ary_new3(2, CBOOL2RVAL(b), ret);
+}
+
+static VALUE
+value_validate_ensure(struct validate_arg* arg)
+{
+    g_value_unset(arg->value);
+    return Qnil;
+}
+
+static VALUE
+value_validate(self, obj)
+    VALUE self, obj;
+{
+    struct validate_arg arg;
+    GValue value = {0,};
+
+    arg.pspec = rbgobj_get_param_spec(self);
+    arg.value = &value;
+    arg.obj = obj;
+
+    g_value_init(&value, G_PARAM_SPEC_VALUE_TYPE(arg.pspec));
+
+    return rb_ensure(value_validate_body, (VALUE)&arg,
+                     value_validate_ensure, (VALUE)&arg);
+}
+
+
+static VALUE
+value_convert(int argc, VALUE* argv, VALUE self)
+{
+    GParamSpec* pspec = rbgobj_get_param_spec(self);
+    VALUE src, strict_validation;
+    VALUE src_type;
+    VALUE result = Qnil;
+    GValue src_value = {0,};
+    GValue dest_value = {0,};
+    gboolean b;
+
+    rb_scan_args(argc, argv, "21", &src, &src_type, &strict_validation);
+
+    /* FIXME: use rb_ensure to ensure following g_value_unset() call*/
+    g_value_init(&src_value, rbgobj_gtype_get(src_type));
+    g_value_init(&dest_value, G_PARAM_SPEC_VALUE_TYPE(pspec));
+
+    rbgobj_rvalue_to_gvalue(src, &src_value);
+
+    b = g_param_value_convert(rbgobj_get_param_spec(self),
+                              &src_value, &dest_value,
+                              RVAL2CBOOL(strict_validation));
+
+    if (b)
+        result = rbgobj_gvalue_to_rvalue(&dest_value);
+
+    g_value_unset(&src_value);
+    g_value_unset(&dest_value);
+
+    if (b)
+        return result;
+    else
+        rb_raise(rb_eTypeError, "can't convert");
+}
+
+static VALUE
+values_compare(self, a, b)
+    VALUE self, a, b;
+{
+    GParamSpec* pspec = rbgobj_get_param_spec(self);
+    GType type = G_PARAM_SPEC_VALUE_TYPE(pspec);
+    GValue v1 = {0,};
+    GValue v2 = {0,};
+    gint result;
+
+    g_value_init(&v1, type);
+    g_value_init(&v2, type);
+
+    /* FIXME: use rb_ensure to ensure following g_value_unset() call*/
+    rbgobj_rvalue_to_gvalue(a, &v1);
+    rbgobj_rvalue_to_gvalue(b, &v2);
+
+    result = g_param_values_cmp(pspec, &v1, &v2);
+
+    g_value_unset(&v1);
+    g_value_unset(&v2);
+
+    return INT2NUM(result);
+}
+
+
+static VALUE
+get_ref_count(self)
+    VALUE self;
+{
+    return INT2NUM(G_PARAM_SPEC(rbgobj_get_param_spec(self))->ref_count);
+}
+
+
+#define param_is_flag(flag) \
+    static VALUE \
+    param_is_##flag(self) \
+        VALUE self; \
+    { \
+        GParamSpec* pspec = G_PARAM_SPEC(rbgobj_get_param_spec(self)); \
+        return CBOOL2RVAL(pspec->flags & flag); \
+    }
+
+param_is_flag(G_PARAM_READABLE)
+param_is_flag(G_PARAM_WRITABLE)
+param_is_flag(G_PARAM_CONSTRUCT)
+param_is_flag(G_PARAM_CONSTRUCT_ONLY)
+param_is_flag(G_PARAM_LAX_VALIDATION)
+param_is_flag(G_PARAM_PRIVATE)
+param_is_flag(G_PARAM_READWRITE)
+
+/**********************************************************************/
+
+static void
+Init_gobject_gparam_spec()
+{
+    VALUE cParamSpec;
+
+    qparamspec = g_quark_from_static_string("__ruby_gobject_param_spec__");
+    rbgobj_cParam = G_DEF_CLASS(G_TYPE_PARAM, "Param", mGLib);
+    cParamSpec = rbgobj_cParam;
+
+    /* GParamFlags */
+    rb_define_const(cParamSpec, "READABLE",       INT2FIX(G_PARAM_READABLE));
+    rb_define_const(cParamSpec, "WRITABLE",       INT2FIX(G_PARAM_WRITABLE));
+    rb_define_const(cParamSpec, "CONSTRUCT",      INT2FIX(G_PARAM_CONSTRUCT));
+    rb_define_const(cParamSpec, "CONSTRUCT_ONLY", INT2FIX(G_PARAM_CONSTRUCT_ONLY));
+    rb_define_const(cParamSpec, "LAX_VALIDATION", INT2FIX(G_PARAM_LAX_VALIDATION));
+    rb_define_const(cParamSpec, "PRIVATE",        INT2FIX(G_PARAM_PRIVATE));
+    rb_define_const(cParamSpec, "READWRITE",      INT2FIX(G_PARAM_READWRITE));
+    rb_define_const(cParamSpec, "MASK",           INT2FIX(G_PARAM_MASK));
+    rb_define_const(cParamSpec, "USER_SHIFT",     INT2FIX(G_PARAM_USER_SHIFT));
+
+    rb_define_alloc_func(cParamSpec, pspec_s_allocate);
+
+    rb_define_method(cParamSpec, "inspect", inspect, 0);
+
+    rb_define_method(cParamSpec, "name", get_name, 0);
+    rb_define_method(cParamSpec, "nick", get_nick, 0);
+    rb_define_method(cParamSpec, "blurb", get_blurb, 0);
+
+    rb_define_method(cParamSpec, "flags", get_flags, 0);
+    rb_define_method(cParamSpec, "value_type", get_value_type, 0);
+    rb_define_method(cParamSpec, "owner_type", get_owner_type, 0);
+    rb_define_method(cParamSpec, "owner", get_owner, 0);
+
+    rb_define_method(cParamSpec, "value_default", value_default, 0);
+    rb_define_alias(cParamSpec, "default", "value_default");
+
+    // FIXME: better name
+#if 0
+    rb_define_method(cParamSpec, "value_defaults?", value_defaults, 1);
+#endif
+    rb_define_method(cParamSpec, "value_validate", value_validate, 1);
+    rb_define_method(cParamSpec, "value_convert", value_convert, -1);
+    rb_define_method(cParamSpec, "value_compare", values_compare, 2);
+
+    /* for debugging */
+    rb_define_method(cParamSpec, "ref_count", get_ref_count, 0);
+
+    rb_define_method(cParamSpec, "readable?",       param_is_G_PARAM_READABLE, 0);
+    rb_define_method(cParamSpec, "writable?",       param_is_G_PARAM_WRITABLE, 0);
+    rb_define_method(cParamSpec, "construct?",      param_is_G_PARAM_CONSTRUCT, 0);
+    rb_define_method(cParamSpec, "construct_only?", param_is_G_PARAM_CONSTRUCT_ONLY, 0);
+    rb_define_method(cParamSpec, "lax_validation?", param_is_G_PARAM_LAX_VALIDATION, 0);
+    rb_define_method(cParamSpec, "private?",        param_is_G_PARAM_PRIVATE, 0);
+    rb_define_method(cParamSpec, "readwrite?",      param_is_G_PARAM_READWRITE, 0);
+}
+
+/**********************************************************************/
+
+void Init_gobject_gparam()
+{
+    Init_gobject_gparam_spec();
+}

data/ext/glib2/rbgobj_paramspecs.c

@@ -0,0 +1,305 @@
+/* -*- c-file-style: "ruby"; indent-tabs-mode: nil -*- */
+/**********************************************************************
+
+  rbgobj_paramspecs.c -
+
+  $Author: ggc $
+  $Date: 2007/07/13 16:07:28 $
+  created at: Sun Jul 26 14:31:33 JST 2002
+
+  Copyright (C) 2004       Ruby-GNOME2 Project Team
+  Copyright (C) 2002,2003  Masahiro Sakai
+
+**********************************************************************/
+
+#include "rbgprivate.h"
+
+#define DEF_NUMERIC_PSPEC_METHODS_FUNC(pspec_type, typename, from_ruby, to_ruby, pspec_cast) \
+static VALUE \
+typename##_initialize(self, name, nick, blurb, minimum, maximum, default_value, flags) \
+   VALUE self, name, nick, blurb, minimum, maximum, default_value, flags; \
+{ \
+    GParamSpec* pspec; \
+    pspec = g_param_spec_##typename(StringValuePtr(name), \
+                                    StringValuePtr(nick), \
+                                    StringValuePtr(blurb), \
+                                    from_ruby(minimum), \
+                                    from_ruby(maximum), \
+                                    from_ruby(default_value), \
+                                    NUM2UINT(flags)); \
+    rbgobj_param_spec_initialize(self, pspec); \
+    return Qnil; \
+} \
+\
+static \
+VALUE typename##_minimum(self) \
+{ \
+    return to_ruby(pspec_cast(RVAL2GOBJ(self))->minimum); \
+} \
+\
+static \
+VALUE typename##_maximum(self) \
+{ \
+    return to_ruby(pspec_cast(RVAL2GOBJ(self))->maximum); \
+} \
+\
+static \
+VALUE typename##_range(self) \
+{ \
+    pspec_type* pspec = pspec_cast(RVAL2GOBJ(self)); \
+    return rb_range_new(pspec->minimum, pspec->maximum, 0); \
+}
+
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecChar, char, NUM2INT, INT2FIX, G_PARAM_SPEC_CHAR)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecUChar, uchar, NUM2UINT, INT2FIX, G_PARAM_SPEC_UCHAR)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecInt, int, NUM2INT, INT2NUM, G_PARAM_SPEC_INT)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecUInt, uint, NUM2UINT, UINT2NUM, G_PARAM_SPEC_UINT)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecLong, long, NUM2LONG, INT2NUM, G_PARAM_SPEC_LONG)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecULong, ulong, NUM2ULONG, UINT2NUM, G_PARAM_SPEC_ULONG)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecInt64, int64, rbglib_num_to_int64, rbglib_int64_to_num, G_PARAM_SPEC_INT64)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecUInt64, uint64, rbglib_num_to_uint64, rbglib_uint64_to_num, G_PARAM_SPEC_UINT64)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecFloat, float, NUM2DBL, rb_float_new, G_PARAM_SPEC_FLOAT)
+DEF_NUMERIC_PSPEC_METHODS_FUNC(GParamSpecDouble, double, NUM2DBL, rb_float_new, G_PARAM_SPEC_DOUBLE)
+
+static VALUE
+float_epsilon(self)
+    VALUE self;
+{
+    return rb_float_new(G_PARAM_SPEC_FLOAT(RVAL2GOBJ(self))->epsilon);
+}
+
+static VALUE
+double_epsilon(self)
+    VALUE self;
+{
+    return rb_float_new(G_PARAM_SPEC_DOUBLE(RVAL2GOBJ(self))->epsilon);
+}
+
+
+static VALUE
+boolean_initialize(self, name, nick, blurb, default_value, flags)
+   VALUE self, name, nick, blurb, default_value, flags;
+{
+    GParamSpec* pspec;
+    pspec = g_param_spec_boolean(StringValuePtr(name),
+                                 StringValuePtr(nick),
+                                 StringValuePtr(blurb),
+                                 RVAL2CBOOL(default_value),
+                                 NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+unichar_initialize(self, name, nick, blurb, default_value, flags)
+   VALUE self, name, nick, blurb, default_value, flags;
+{
+    GParamSpec* pspec;
+    pspec = g_param_spec_unichar(StringValuePtr(name),
+                                 StringValuePtr(nick),
+                                 StringValuePtr(blurb),
+                                 NUM2UINT(default_value),
+                                 NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+enum_initialize(self, name, nick, blurb, enum_type, default_value, flags)
+   VALUE self, name, nick, blurb, enum_type, default_value, flags;
+{
+    GParamSpec* pspec;
+    GType gtype = rbgobj_gtype_get(enum_type);
+
+    pspec = g_param_spec_enum(StringValuePtr(name),
+                              StringValuePtr(nick),
+                              StringValuePtr(blurb),
+                              gtype,
+                              RVAL2GENUM(default_value, gtype),
+                              NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+flags_initialize(self, name, nick, blurb, flags_type, default_value, flags)
+   VALUE self, name, nick, blurb, flags_type, default_value, flags;
+{
+    GParamSpec* pspec;
+    GType gtype = rbgobj_gtype_get(flags_type);
+
+    pspec = g_param_spec_flags(StringValuePtr(name),
+                              StringValuePtr(nick),
+                              StringValuePtr(blurb),
+                              gtype,
+                              RVAL2GFLAGS(default_value, gtype),
+                              NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+string_initialize(self, name, nick, blurb, default_value, flags)
+   VALUE self, name, nick, blurb, default_value, flags;
+{
+    GParamSpec* pspec;
+    pspec = g_param_spec_string(StringValuePtr(name),
+                                StringValuePtr(nick),
+                                StringValuePtr(blurb),
+                                NIL_P(default_value) ? NULL : StringValuePtr(default_value),
+                                NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+param_initialize(self, name, nick, blurb, param_type, flags)
+   VALUE self, name, nick, blurb, param_type, flags;
+{
+    GParamSpec* pspec;
+    pspec = g_param_spec_param(StringValuePtr(name),
+                               StringValuePtr(nick),
+                               StringValuePtr(blurb),
+                               rbgobj_gtype_get(param_type),
+                               NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+boxed_initialize(self, name, nick, blurb, boxed_type, flags)
+   VALUE self, name, nick, blurb, boxed_type, flags;
+{
+    GParamSpec* pspec;
+    pspec = g_param_spec_boxed(StringValuePtr(name),
+                               StringValuePtr(nick),
+                               StringValuePtr(blurb),
+                               rbgobj_gtype_get(boxed_type),
+                               NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+pointer_initialize(self, name, nick, blurb, flags)
+   VALUE self, name, nick, blurb, flags;
+{
+    GParamSpec* pspec;
+    pspec = g_param_spec_pointer(StringValuePtr(name),
+                                 StringValuePtr(nick),
+                                 StringValuePtr(blurb),
+                                 NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+value_array_initialize(self, name, nick, blurb, element_spec, flags)
+   VALUE self, name, nick, blurb, element_spec, flags;
+{
+    GParamSpec* pspec;
+    pspec = g_param_spec_value_array(StringValuePtr(name),
+                                     StringValuePtr(nick),
+                                     StringValuePtr(blurb),
+                                     RVAL2GOBJ(element_spec),
+                                     NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+static VALUE
+object_initialize(self, name, nick, blurb, object_type, flags)
+   VALUE self, name, nick, blurb, object_type, flags;
+{
+    GParamSpec* pspec;
+    pspec = g_param_spec_object(StringValuePtr(name),
+                                StringValuePtr(nick),
+                                StringValuePtr(blurb),
+                                rbgobj_gtype_get(object_type),
+                                NUM2UINT(flags));
+    rbgobj_param_spec_initialize(self, pspec);
+    return Qnil;
+}
+
+void
+Init_gobject_gparamspecs()
+{
+    VALUE cParamSpec = GTYPE2CLASS(G_TYPE_PARAM);
+    VALUE c;
+
+#define DEF_NUMERIC_PSPEC_METHODS(c, typename) \
+  G_STMT_START {\
+    rb_define_method(c, "initialize", typename##_initialize, 7); \
+    rb_define_method(c, "minimum", typename##_minimum, 0); \
+    rb_define_method(c, "maximum", typename##_maximum, 0); \
+    rb_define_method(c, "range", typename##_range, 0); \
+  } G_STMT_END
+
+#if 0
+    rb_define_method(c, "default_value", typename##_default_value, 0); \
+    rb_define_alias(c, "default", "default_value"); \
+
+#endif
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_CHAR, "Char", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, char);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_UCHAR, "UChar", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, uchar);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_INT, "Int", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, int);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_UINT, "UInt", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, uint);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_LONG, "Long", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, long);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_ULONG, "ULong", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, ulong);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_INT64, "Int64", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, int64);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_UINT64, "UInt64", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, uint64);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_FLOAT, "Float", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, float);
+    rb_define_method(c, "epsilon", float_epsilon, 0);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_DOUBLE, "Double", cParamSpec);
+    DEF_NUMERIC_PSPEC_METHODS(c, double);
+    rb_define_method(c, "epsilon", double_epsilon, 0);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_BOOLEAN, "Boolean", cParamSpec);
+    rb_define_method(c, "initialize", boolean_initialize, 5);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_UNICHAR, "UniChar", cParamSpec);
+    rb_define_method(c, "initialize", unichar_initialize, 5);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_ENUM, "Enum", cParamSpec);
+    rb_define_method(c, "initialize", enum_initialize, 6);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_FLAGS, "Flags", cParamSpec);
+    rb_define_method(c, "initialize", flags_initialize, 6);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_STRING, "String", cParamSpec);
+    rb_define_method(c, "initialize", string_initialize, 5);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_PARAM, "Param", cParamSpec);
+    rb_define_method(c, "initialize", param_initialize, 5);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_BOXED, "Boxed", cParamSpec);
+    rb_define_method(c, "initialize", boxed_initialize, 5);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_POINTER, "Pointer", cParamSpec);
+    rb_define_method(c, "initialize", pointer_initialize, 4);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_VALUE_ARRAY, "ValueArray", cParamSpec);
+    rb_define_method(c, "initialize", value_array_initialize, 5);
+
+    c = G_DEF_CLASS(G_TYPE_PARAM_OBJECT, "Object", cParamSpec);
+    rb_define_method(c, "initialize", object_initialize, 5);
+}