forked from enlightenment/efl
49 lines
970 B
C
49 lines
970 B
C
#ifdef HAVE_CONFIG_H
|
|
# include "elementary_config.h"
|
|
#endif
|
|
|
|
#define EFL_ACCESS_OBJECT_BETA
|
|
#include <Elementary.h>
|
|
#include "elm_suite.h"
|
|
|
|
EFL_START_TEST(elm_frame_legacy_type_check)
|
|
{
|
|
Evas_Object *win, *frame;
|
|
const char *type;
|
|
|
|
win = win_add(NULL, "frame", ELM_WIN_BASIC);
|
|
|
|
frame = elm_frame_add(win);
|
|
|
|
type = elm_object_widget_type_get(frame);
|
|
ck_assert(type != NULL);
|
|
ck_assert(!strcmp(type, "Elm_Frame"));
|
|
|
|
type = evas_object_type_get(frame);
|
|
ck_assert(type != NULL);
|
|
ck_assert(!strcmp(type, "elm_frame"));
|
|
|
|
}
|
|
EFL_END_TEST
|
|
|
|
EFL_START_TEST(elm_atspi_role_get)
|
|
{
|
|
Evas_Object *win, *frame;
|
|
Efl_Access_Role role;
|
|
|
|
win = win_add(NULL, "frame", ELM_WIN_BASIC);
|
|
|
|
frame = elm_frame_add(win);
|
|
role = efl_access_object_role_get(frame);
|
|
|
|
ck_assert(role == EFL_ACCESS_ROLE_FRAME);
|
|
|
|
}
|
|
EFL_END_TEST
|
|
|
|
void elm_test_frame(TCase *tc)
|
|
{
|
|
tcase_add_test(tc, elm_frame_legacy_type_check);
|
|
tcase_add_test(tc, elm_atspi_role_get);
|
|
}
|