+static VALUE c_get_clip (VALUE self)
+{
+ GET_OBJ (self, RbEvasObject, e);
+
+ return TO_EVAS_OBJECT (evas_object_clip_get (e->real));
+}
+
+static VALUE c_set_clip (VALUE self, VALUE clip)
+{
+ GET_OBJ (self, RbEvasObject, e);
+ GET_OBJ (clip, RbEvasObject, e2);
+
+ evas_object_clip_set (e->real, e2->real);
+
+ return Qnil;
+}
+