Added Part object.
[ruby-edje.git] / src / rb_edje_main.h
index 0f9aa60029e9d87627e805872edb82e4b3e6e44a..9e8425c1311c93eeb4e0aa598d3397c52a698e0c 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * $Id: rb_edje_main.h 7 2004-06-19 19:32:33Z tilman $
+ * $Id: rb_edje_main.h 47 2004-07-26 13:24:50Z tilman $
  *
  * Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de)
  *
 #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