+ return TRUE;
+}
+
+
+bool extl_iter_objlist(ExtlFn fn, ObjList *list)
+{
+ ObjListIterTmp tmp;
+
+ objlist_iter_init(&tmp, list);
+
+ return extl_iter_objlist_(fn, (ObjIterator*)objlist_iter, &tmp);
+}
+
+
+bool extl_iter_obj(ExtlFn fn, Obj *obj)
+{
+ bool ret1, ret2=FALSE;
+
+ extl_protect(NULL);
+
+ ret1=extl_call(fn, "o", "b", obj, &ret2);
+
+ extl_unprotect(NULL);
+
+ return (ret1 && ret2);