changeset 414 | b6a522b762c9 |
parent 390 | 9cf96d45853d |
child 399 | 55b074ea7255 |
--- a/stage3/visit_expression_type.hh Fri Nov 04 19:16:29 2011 +0000 +++ b/stage3/visit_expression_type.hh Sun Nov 20 19:36:48 2011 +0000 @@ -137,6 +137,8 @@ bool is_literal_real_type (symbol_c *type_symbol); bool is_literal_bool_type (symbol_c *type_symbol); + bool is_ANY_ELEMENTARY_OR_ENUMERATED_compatible (symbol_c *type_symbol); + /* Determine the common data type between two data types. * If no common data type found, return NULL. *