[gcc r11-3024] fortran: Fix argument types in derived types procedures
Franथईois-Xavier Coudert
fxcoudert@gcc.gnu.org
Mon Sep 7 07:39:00 GMT 2020
https://gcc.gnu.org/g:d30869a8d4886aee4020be3b28b15b1b15c8d9ad
commit r11-3024-gd30869a8d4886aee4020be3b28b15b1b15c8d9ad
Author: Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
Date: Mon Sep 7 09:38:25 2020 +0200
fortran: Fix argument types in derived types procedures
gcc/fortran/ChangeLog
* trans-types.c (gfc_get_derived_type): Fix argument types.
Diff:
---
gcc/fortran/trans-types.c | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/gcc/fortran/trans-types.c b/gcc/fortran/trans-types.c
index ecc4454bb63..26fdb2803a7 100644
--- a/gcc/fortran/trans-types.c
+++ b/gcc/fortran/trans-types.c
@@ -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)
More information about the Gcc-cvs
mailing list