X-Git-Url: http://git.code-monkey.de/?a=blobdiff_plain;ds=sidebyside;f=src%2Frb_evas_main.h;h=2180546681dbc592819b85d40cdf694180b14717;hb=ba05ccf5a7b503e2d9a58c1de4072312b5abfab7;hp=214a7a45a2fb1fdac0a9b803c2119b8b67f84a6f;hpb=2118372cfbb06b10e6254539b30887e0342650fd;p=ruby-evas.git

diff --git a/src/rb_evas_main.h b/src/rb_evas_main.h
index 214a7a4..2180546 100644
--- a/src/rb_evas_main.h
+++ b/src/rb_evas_main.h
@@ -1,5 +1,5 @@
 /*
- * $Id: rb_evas_main.h 20 2004-06-22 20:46:56Z tilman $
+ * $Id: rb_evas_main.h 23 2004-06-26 22:55:31Z tilman $
  *
  * Copyright (C) 2004 Tilman Sauerbeck (tilman at code-monkey de)
  *
@@ -21,6 +21,24 @@
 #ifndef __RB_EVAS_MAIN_H
 #define __RB_EVAS_MAIN_H
 
+#define GET_OBJ(obj, type, o, desc) \
+	type **(o) = NULL; \
+\
+	Data_Get_Struct ((obj), type *, (o)); \
+\
+	if (!*(o)) { \
+		rb_raise (rb_eException, desc " destroyed already"); \
+		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; \
+	}
+
 VALUE mEvas;
 
 #endif