Minor doc improvements.

[ruby-ecore.git] / src / ecore_evas / rb_gl_x11.c

diff --git a/src/ecore_evas/rb_gl_x11.c b/src/ecore_evas/rb_gl_x11.c
index de65a7313ff8884eab6c36ef54da730bb28b7e3f..c5375888259f0b4d56e4be6151ec132c2a20a65d 100644 (file)
--- a/src/ecore_evas/rb_gl_x11.c
+++ b/src/ecore_evas/rb_gl_x11.c
@@ -1,5 +1,5 @@
 /*
- * $Id: rb_gl_x11.c 27 2004-07-08 18:25:05Z tilman $
+ * $Id: rb_gl_x11.c 60 2004-08-10 14:12:36Z tilman $
  *
  * Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de)
  *
@@ -26,15 +26,26 @@
 #include "rb_ecore_evas_main.h"
 #include "rb_ecore_evas.h"
 
+static void c_free (RbEcoreEvas *ee)
+{
+       c_ecore_evas_free (ee, true);
+}
+
+/*
+ * call-seq:
+ *  Ecore::Evas::GlX11.new([display, parent, x, y, w, h]) => glx11
+ *
+ * Creates an Ecore::Evas::GlX11 object.
+ */
 static VALUE c_new (int argc, VALUE *argv, VALUE klass)
 {
        VALUE self, disp, parent, geom[4];
-       Ecore_Evas **ee = NULL;
+       RbEcoreEvas *ee = NULL;
        char *cdisp = NULL;
        int i, igeom[4] = {0, 0, 0, 0};
 
-       self = Data_Make_Struct (klass, Ecore_Evas *,
-                                NULL, c_ecore_evas_free, ee);
+       self = Data_Make_Struct (klass, RbEcoreEvas,
+                                c_ecore_evas_mark, c_free, ee);
 
        rb_scan_args (argc, argv, "06", &disp, &parent,
                      &geom[0], &geom[1], &geom[2], &geom[3]);
@@ -47,15 +58,15 @@ static VALUE c_new (int argc, VALUE *argv, VALUE klass)
        for (i = 0; i < 4; i++)
                if (!NIL_P (geom[i])) {
                        Check_Type (geom[i], T_FIXNUM);
-                       igeom[i] = NUM2INT (geom[i]);
+                       igeom[i] = FIX2INT (geom[i]);
                }
 
        ecore_init ();
        ecore_evas_init ();
 
-       *ee = ecore_evas_gl_x11_new (cdisp, 0,
-                                    igeom[0], igeom[1],
-                                    igeom[2], igeom[3]);
+       ee->real = ecore_evas_gl_x11_new (cdisp, 0,
+                                         igeom[0], igeom[1],
+                                         igeom[2], igeom[3]);
 
        rb_obj_call_init (self, 0, NULL);
 
@@ -64,7 +75,7 @@ static VALUE c_new (int argc, VALUE *argv, VALUE klass)
 
 void Init_GlX11 (void)
 {
-       VALUE cGlX11 = rb_define_class_under (mEvas, "GlX11", cEcoreEvas);
+       VALUE c = rb_define_class_under (mEvas, "GlX11", cEcoreEvas);
 
-       rb_define_singleton_method (cGlX11, "new", c_new, -1);
+       rb_define_singleton_method (c, "new", c_new, -1);
 }