absyntax_utils/search_var_instance_decl.cc
changeset 718 a9f8cc778444
parent 625 c0bda77b37a0
child 793 268bf4ca5fa1
equal deleted inserted replaced
717:44f74fad2cc0 718:a9f8cc778444
   130  * we generate C code, this function will no longer be needed!
   130  * we generate C code, this function will no longer be needed!
   131  */
   131  */
   132 #include <typeinfo>  /* required for typeid() */
   132 #include <typeinfo>  /* required for typeid() */
   133 bool search_var_instance_decl_c::type_is_complex(symbol_c *symbol) {
   133 bool search_var_instance_decl_c::type_is_complex(symbol_c *symbol) {
   134   symbol_c *decl;
   134   symbol_c *decl;
   135   search_base_type_c search_base_type;
       
   136   
   135   
   137   decl = this->get_decl(symbol);
   136   decl = this->get_decl(symbol);
   138   if (NULL == decl) ERROR;
   137   if (NULL == decl) ERROR;
   139   decl = search_base_type.get_basetype_decl(decl);
   138   decl = search_base_type_c::get_basetype_decl(decl);
   140   if (NULL == decl) ERROR;
   139   if (NULL == decl) ERROR;
   141   
   140   
   142   return ((typeid( *(decl) ) == typeid( array_specification_c                )) ||
   141   return ((typeid( *(decl) ) == typeid( array_specification_c                )) ||
   143 //        (typeid( *(decl) ) == typeid( array_spec_init_c                    )) ||  /* does not seem to be necessary */
   142 //        (typeid( *(decl) ) == typeid( array_spec_init_c                    )) ||  /* does not seem to be necessary */
   144           (typeid( *(decl) ) == typeid( structure_type_declaration_c         )) ||  
   143           (typeid( *(decl) ) == typeid( structure_type_declaration_c         )) ||