MatCat.OpenSource/8sa1-gcc
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fortran: Fix argument types in derived types procedures

Browse Source 
gcc/fortran/ChangeLog

	* trans-types.c (gfc_get_derived_type): Fix argument types.
This commit is contained in:
Francois-Xavier Coudert 2020-09-07 09:38:25 +02:00
parent a502683de1
commit d30869a8d4
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gcc/fortran/trans-types.c
View File

@ -2716,7 +2716,7 @@ gfc_get_derived_type (gfc_symbol * derived, int codimen)
field_type = gfc_get_ppc_type (c);
else if (c->attr.proc_pointer && derived->backend_decl)
{
tmp = build_function_type_list (derived->backend_decl, NULL_TREE);
tmp = build_function_type (derived->backend_decl, NULL_TREE);
field_type = build_pointer_type (tmp);
}
else if (c->ts.type == BT_DERIVED || c->ts.type == BT_CLASS)