X-Git-Url: http://git.code-monkey.de/?a=blobdiff_plain;f=src%2Fecore%2Frb_ecore.h;h=2c5d8165dca4cb6905fbb389f679c48ea9ee4c30;hb=4f5c88b4cfae4d5fb177710b09624f2e229d6a1b;hp=8ce543209993ed987bdb79e57039bc4da12eb802;hpb=f007c429dfb7b76be36317212a0585401e13984a;p=ruby-ecore.git diff --git a/src/ecore/rb_ecore.h b/src/ecore/rb_ecore.h index 8ce5432..2c5d816 100644 --- a/src/ecore/rb_ecore.h +++ b/src/ecore/rb_ecore.h @@ -1,5 +1,5 @@ /* - * $Id: rb_ecore.h 9 2004-06-19 19:53:47Z tilman $ + * $Id: rb_ecore.h 45 2004-07-26 11:00:14Z tilman $ * * Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de) * @@ -21,6 +21,39 @@ #ifndef __RB_ECORE_H #define __RB_ECORE_H +#define GET_OBJ(obj, type, o) \ + type *(o) = NULL; \ +\ + Data_Get_Struct ((obj), type, (o)); \ +\ + if (!*(o)) { \ + rb_raise (rb_eException, \ + "%s destroyed already", \ + rb_obj_classname ((obj))); \ + return Qnil; \ + } + +#define CHECK_BOOL(val) \ + if (TYPE ((val)) != T_TRUE && TYPE ((val)) != T_FALSE) { \ + rb_raise (rb_eTypeError, \ + "wrong argument type %s (expected true or false)", \ + rb_obj_classname ((val))); \ + return Qnil; \ + } + +#define INSPECT(obj, type) \ + char buf[128]; \ +\ + GET_OBJ (obj, type, o); \ +\ + snprintf (buf, sizeof (buf), \ + "#<%s:%p ptr=%p>", rb_obj_classname ((obj)), \ + (void *) obj, *o); \ +\ + return rb_str_new2 (buf); + +#ifndef __RB_ECORE_C VALUE mEcore; +#endif #endif