From c81356e2ecf06fc76f28897e8c1679b2d81f9cf7 Mon Sep 17 00:00:00 2001
From: Daniel Kolesa <d.kolesa@samsung.com>
Date: Tue, 12 Aug 2014 16:46:53 +0100
Subject: [PATCH] eolian: working more in-depth enum test

---
 src/tests/eolian/data/enum.eo     |  3 +-
 src/tests/eolian/eolian_parsing.c | 63 +++++++++++++++++++++++++++++++
 2 files changed, 65 insertions(+), 1 deletion(-)

diff --git a/src/tests/eolian/data/enum.eo b/src/tests/eolian/data/enum.eo
index 6a538e9210..43592f7d5f 100644
--- a/src/tests/eolian/data/enum.eo
+++ b/src/tests/eolian/data/enum.eo
@@ -1,5 +1,6 @@
 // regular named enum
 enum Foo {
+    first,
     bar,
     baz = 5 * 3
 }
@@ -14,7 +15,7 @@ type Baz: enum _Baz {
     flag3 = 1 << 2
 };
 
-const foo: int = Baz.flag1;
+const Bah: int = Baz.flag1;
 
 class Enum {
     methods {
diff --git a/src/tests/eolian/eolian_parsing.c b/src/tests/eolian/eolian_parsing.c
index 5e4856ca5b..c1a9c7d3e5 100644
--- a/src/tests/eolian/eolian_parsing.c
+++ b/src/tests/eolian/eolian_parsing.c
@@ -721,8 +721,13 @@ END_TEST
 
 START_TEST(eolian_enum)
 {
+   const Eolian_Variable *var = NULL;
    const Eolian_Type *type = NULL;
    const Eolian_Class *class;
+   const Eolian_Expression *exp;
+   const char *name;
+   Eina_Value *v = NULL;
+   int i = 0;
 
    eolian_init();
 
@@ -733,6 +738,64 @@ START_TEST(eolian_enum)
    fail_if(!(class = eolian_class_get_by_name("Enum")));
    fail_if(!eolian_class_function_get_by_name(class, "foo", EOLIAN_METHOD));
 
+   fail_if(!(type = eolian_type_enum_get_by_name("Foo")));
+
+   fail_if(!(eolian_type_enum_field_exists(type, "first")));
+   fail_if(!(exp = eolian_type_enum_field_get(type, "first")));
+   fail_if(eolian_expression_eval(exp, EOLIAN_MASK_ALL, &v) != EOLIAN_EXPR_INT);
+   eina_value_get(v, &i);
+   fail_if(i != 0);
+
+   fail_if(!(eolian_type_enum_field_exists(type, "bar")));
+   fail_if(eolian_type_enum_field_get(type, "bar"));
+
+   fail_if(!(eolian_type_enum_field_exists(type, "baz")));
+   fail_if(!(exp = eolian_type_enum_field_get(type, "baz")));
+   fail_if(eolian_expression_eval(exp, EOLIAN_MASK_ALL, &v) != EOLIAN_EXPR_INT);
+   eina_value_get(v, &i);
+   fail_if(i != 15);
+
+   fail_if(!(type = eolian_type_enum_get_by_name("Bar")));
+
+   fail_if(!(eolian_type_enum_field_exists(type, "foo")));
+   fail_if(!(exp = eolian_type_enum_field_get(type, "foo")));
+   fail_if(eolian_expression_eval(exp, EOLIAN_MASK_ALL, &v) != EOLIAN_EXPR_INT);
+   eina_value_get(v, &i);
+   fail_if(i != 15);
+
+   fail_if(!(type = eolian_type_alias_get_by_name("Baz")));
+   fail_if(!(type = eolian_type_base_type_get(type)));
+
+   fail_if(!(eolian_type_enum_field_exists(type, "flag1")));
+   fail_if(!(exp = eolian_type_enum_field_get(type, "flag1")));
+   fail_if(eolian_expression_eval(exp, EOLIAN_MASK_ALL, &v) != EOLIAN_EXPR_INT);
+   eina_value_get(v, &i);
+   fail_if(i != (1 << 0));
+
+   fail_if(!(eolian_type_enum_field_exists(type, "flag2")));
+   fail_if(!(exp = eolian_type_enum_field_get(type, "flag2")));
+   fail_if(eolian_expression_eval(exp, EOLIAN_MASK_ALL, &v) != EOLIAN_EXPR_INT);
+   eina_value_get(v, &i);
+   fail_if(i != (1 << 1));
+
+   fail_if(!(eolian_type_enum_field_exists(type, "flag3")));
+   fail_if(!(exp = eolian_type_enum_field_get(type, "flag3")));
+   fail_if(eolian_expression_eval(exp, EOLIAN_MASK_ALL, &v) != EOLIAN_EXPR_INT);
+   eina_value_get(v, &i);
+   fail_if(i != (1 << 2));
+
+   fail_if(!(var = eolian_variable_constant_get_by_name("Bah")));
+   fail_if(eolian_variable_type_get(var) != EOLIAN_VAR_CONSTANT);
+   fail_if(eolian_variable_is_extern(var));
+   fail_if(!(type = eolian_variable_base_type_get(var)));
+   fail_if(!(name = eolian_type_name_get(type)));
+   fail_if(strcmp(name, "int"));
+   eina_stringshare_del(name);
+   fail_if(!(exp = eolian_variable_value_get(var)));
+   fail_if(eolian_expression_eval_type(exp, type, &v) != EOLIAN_EXPR_INT);
+   eina_value_get(v, &i);
+   fail_if(i != (1 << 0));
+
    eolian_shutdown();
 }
 END_TEST
-- 
2.34.1