diff -r 818c4ac5d64d -r 13d0b67de111 absyntax_utils/search_var_instance_decl.cc --- a/absyntax_utils/search_var_instance_decl.cc Fri Dec 20 11:44:38 2013 +0000 +++ b/absyntax_utils/search_var_instance_decl.cc Sun Dec 22 09:50:02 2013 +0000 @@ -129,33 +129,6 @@ -/* This is a temporary fix. Hopefully, once I clean up stage4 code, and I change the way - * we generate C code, this function will no longer be needed! - */ -#include /* required for typeid() */ -bool search_var_instance_decl_c::type_is_complex(symbol_c *symbol) { - symbol_c *decl; - - decl = symbol->datatype; - if (NULL == decl) ERROR; - return ((typeid( *(decl) ) == typeid( array_specification_c )) || -// (typeid( *(decl) ) == typeid( array_spec_init_c )) || /* does not seem to be necessary */ - (typeid( *(decl) ) == typeid( structure_type_declaration_c )) || - (typeid( *(decl) ) == typeid( structure_element_declaration_list_c )) || -// (typeid( *(decl) ) == typeid( structure_type_declaration_c )) || /* does not seem to be necessary */ - (typeid( *(decl) ) == typeid( initialized_structure_c )) || - (search_base_type_c::type_is_fb(decl) && current_vartype == external_vt) - ); -} - -bool search_var_instance_decl_c::type_is_fb(symbol_c *symbol) { - symbol_c *decl; - search_base_type_c search_base_type; - - decl = this->get_decl(symbol); - if (NULL == decl) ERROR; - return search_base_type.type_is_fb(decl); -} /***************************/ /* B 0 - Programming Model */