stage4/generate_c/generate_c_inlinefcall.cc
changeset 693 51a2fa6441b9
parent 690 6156ee2b4e32
child 718 a9f8cc778444
equal deleted inserted replaced
692:c3287ffaee8c 693:51a2fa6441b9
   230 
   230 
   231   private:
   231   private:
   232     /* a small helper function */
   232     /* a small helper function */
   233     symbol_c *default_literal_type(symbol_c *symbol) {
   233     symbol_c *default_literal_type(symbol_c *symbol) {
   234       if (get_datatype_info_c::is_ANY_INT_literal(symbol)) {
   234       if (get_datatype_info_c::is_ANY_INT_literal(symbol)) {
   235         return &search_constant_type_c::lint_type_name;
   235         return &get_datatype_info_c::lint_type_name;
   236       }
   236       }
   237       else if (get_datatype_info_c::is_ANY_REAL_literal(symbol)) {
   237       else if (get_datatype_info_c::is_ANY_REAL_literal(symbol)) {
   238         return &search_constant_type_c::lreal_type_name;
   238         return &get_datatype_info_c::lreal_type_name;
   239       }
   239       }
   240       return symbol;
   240       return symbol;
   241     }
   241     }
   242 
   242 
   243 
   243