char fortran_is_character_type(type_t* t) { t = no_ref(t); return (is_array_type(t) && is_character_type(array_type_get_element_type(t))); }
bool Grammar::is_object_type(const std::string& str) { return is_boolean_type(str) || is_character_type(str) || is_integer_type(str) || is_float_type(str) || is_string_type(str); }