X-Git-Url: http://git.code-monkey.de/?a=blobdiff_plain;f=src%2Fecore%2Frb_ecore.h;h=95cbde4c7bab2bea284f9901cefa056470a0b355;hb=4f7cb64bdabb4d2c060644301bacf3fd3f46f053;hp=899dea8c5104148e5c1b10853841dae428a6e4f0;hpb=627a83d5b49b1abd92bd73a10a56042a6d202dfa;p=ruby-ecore.git diff --git a/src/ecore/rb_ecore.h b/src/ecore/rb_ecore.h index 899dea8..95cbde4 100644 --- a/src/ecore/rb_ecore.h +++ b/src/ecore/rb_ecore.h @@ -1,7 +1,7 @@ /* - * $Id$ + * $Id: rb_ecore.h 109 2004-09-01 20:33:15Z tilman $ * - * Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de) + * Copyright (C) 2004 ruby-ecore team (see AUTHORS) * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public @@ -21,6 +21,45 @@ #ifndef __RB_ECORE_H #define __RB_ECORE_H +#define GET_OBJ(obj, type, o) \ + type *(o) = NULL; \ +\ + Data_Get_Struct ((obj), type, (o)); + +#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; \ + } + +#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->real); \ +\ + return rb_str_new2 (buf); + +#define DEF_CONST(mod, prefix, name) \ + rb_define_const ((mod), #name, \ + INT2FIX (prefix##name)); + +#ifndef __RB_ECORE_C VALUE mEcore; +#endif #endif