Esempio n. 1
0
char fortran_is_scalar_type(type_t* t)
{
    return (!is_pointer_type(t)
            && !is_pointer_to_member_type(t)
            && !is_array_type(t)
            && !is_lvalue_reference_type(t)
            && !is_rvalue_reference_type(t)
            && !is_function_type(t)
            && !is_vector_type(t));
}
 bool Type::is_pointer_to_member() const
 {
     return is_pointer_to_member_type(_type_info);
 }