X-Git-Url: http://git.code-monkey.de/?p=ruby-edje.git;a=blobdiff_plain;f=src%2Frb_edje_main.h;h=9e8425c1311c93eeb4e0aa598d3397c52a698e0c;hp=52e1663adb06a52a65e2dd25485e6021bd2561d1;hb=3f668760dde13be68327e243183007ba624e1e9a;hpb=4f42f11a79fd44fd647c213c1561beb9e1d199af diff --git a/src/rb_edje_main.h b/src/rb_edje_main.h index 52e1663..9e8425c 100644 --- a/src/rb_edje_main.h +++ b/src/rb_edje_main.h @@ -1,5 +1,5 @@ /* - * $Id$ + * $Id: rb_edje_main.h 47 2004-07-26 13:24:50Z tilman $ * * Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de) * @@ -21,6 +21,35 @@ #ifndef __RB_EDJE_MAIN_H #define __RB_EDJE_MAIN_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 CHECK_CLASS(val, klass) \ + if (!rb_obj_is_kind_of ((val), (klass))) { \ + rb_raise (rb_eTypeError, \ + "wrong argument type %s (expected %s)", \ + rb_obj_classname ((val)), \ + rb_class2name ((klass))); \ + return Qnil; \ + } + VALUE mEdje; #endif