/** * @brief Gets accessible parent of accessible. * * @param accessible an AtkObject * @return accessible parent */ static AtkObject * eail_hover_get_parent(AtkObject *accessible) { Evas_Object *hover = NULL; Evas_Object *hover_parent = NULL; AtkObject *parent = NULL; hover = eail_widget_get_widget(EAIL_WIDGET(accessible)); if (!hover) return NULL; hover_parent = elm_hover_parent_get(hover); if (!hover_parent) return NULL; parent = eail_factory_get_accessible(hover_parent); return parent; }
PREFIX value ml_elm_hover_parent_get(value v_obj) { Evas_Object* parent = elm_hover_parent_get(Evas_Object_val(v_obj)); if(parent == NULL) caml_failwith("elm_hover_parent_get"); return copy_Evas_Object(parent); }