X-Git-Url: http://git.code-monkey.de/?a=blobdiff_plain;f=src%2Fecore_evas%2Frb_gl_x11.c;h=c5375888259f0b4d56e4be6151ec132c2a20a65d;hb=041804188a058aa7bbc76c81e4a816255a635f00;hp=274230e4cb01bfcf8ac9500071e7b8b8dafa744d;hpb=094fc971409b22abd413ed08935786dba73a9062;p=ruby-ecore.git diff --git a/src/ecore_evas/rb_gl_x11.c b/src/ecore_evas/rb_gl_x11.c index 274230e..c537588 100644 --- 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 40 2004-07-25 13:14:34Z 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);