aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorFrancois-Xavier Coudert <fxcoudert@gcc.gnu.org>2020-09-06 18:33:04 +0200
committerFrancois-Xavier Coudert <fxcoudert@gcc.gnu.org>2020-09-06 18:33:43 +0200
commit7c72651a937533cb67360a6faca05e5603a65865 (patch)
tree2c7c1be0cedbef25fb6ec5067066978a6aa12e7d /gcc
parent3489d80fee42764460cb06f7a2e9f126c18602b4 (diff)
downloadgcc-7c72651a937533cb67360a6faca05e5603a65865.zip
gcc-7c72651a937533cb67360a6faca05e5603a65865.tar.gz
gcc-7c72651a937533cb67360a6faca05e5603a65865.tar.bz2
fortran: Fix function arg types for class objects
gcc/fortran/ChangeLog * trans-types.c (gfc_get_ppc_type): Fix function arg types.
Diffstat (limited to 'gcc')
-rw-r--r--gcc/fortran/trans-types.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-types.c b/gcc/fortran/trans-types.c
index d38aa28..a05633e 100644
--- a/gcc/fortran/trans-types.c
+++ b/gcc/fortran/trans-types.c
@@ -2435,7 +2435,7 @@ gfc_get_ppc_type (gfc_component* c)
else
t = void_type_node;
- return build_pointer_type (build_function_type_list (t, NULL_TREE));
+ return build_pointer_type (build_function_type (t, NULL_TREE));
}