Set STUB_DECL for unique types
This commit is contained in:
@ -45,6 +45,7 @@ namespace elna::gcc
|
||||
gcc_assert(TYPE_P(type));
|
||||
|
||||
tree unqualified_type = get_qualified_type(type, TYPE_UNQUALIFIED);
|
||||
tree_code code = TREE_CODE(type);
|
||||
|
||||
if (unqualified_type == elna_int_type_node)
|
||||
{
|
||||
@ -91,7 +92,7 @@ namespace elna::gcc
|
||||
return std::string("^" + print_type(pointer_target_type));
|
||||
}
|
||||
}
|
||||
else if (TREE_CODE(type) == FUNCTION_TYPE)
|
||||
else if (code == FUNCTION_TYPE)
|
||||
{
|
||||
std::string output = "proc(";
|
||||
tree parameter_type = TYPE_ARG_TYPES(type);
|
||||
@ -117,19 +118,19 @@ namespace elna::gcc
|
||||
}
|
||||
return output;
|
||||
}
|
||||
else if (is_array_type(unqualified_type))
|
||||
else if (code == ARRAY_TYPE)
|
||||
{
|
||||
return "array";
|
||||
}
|
||||
else if (TREE_CODE(type) == RECORD_TYPE)
|
||||
else if (code == RECORD_TYPE)
|
||||
{
|
||||
return print_aggregate_name(unqualified_type, "record");
|
||||
}
|
||||
else if (TREE_CODE(type) == UNION_TYPE)
|
||||
else if (code == UNION_TYPE)
|
||||
{
|
||||
return print_aggregate_name(unqualified_type, "union");
|
||||
}
|
||||
else if (TREE_CODE(type) == ENUMERAL_TYPE)
|
||||
else if (code == ENUMERAL_TYPE)
|
||||
{
|
||||
return print_aggregate_name(unqualified_type, "enumeration");
|
||||
}
|
||||
|
Reference in New Issue
Block a user