From 87550f4fb35ad91323b166bca51a84f5e3100c36 Mon Sep 17 00:00:00 2001 From: burnus Date: Sat, 13 Sep 2014 08:33:32 +0000 Subject: [PATCH] 2014-09-13 Tobias Burnus PR fortran/63252 * trans-decl.c (gfc_build_builtin_function_decls): Fix caf_unlock declaration. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@215236 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/fortran/ChangeLog | 6 ++++++ gcc/fortran/trans-decl.c | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 5488371c4c6..0defd7f6a98 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,9 @@ +2014-09-13 Tobias Burnus + + PR fortran/63252 + * trans-decl.c (gfc_build_builtin_function_decls): Fix + caf_unlock declaration. + 2014-09-12 Joseph Myers * trans-types.c (gfc_init_kinds): Check diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index 6afa6f3b696..c0a5cc15d8f 100644 --- a/gcc/fortran/trans-decl.c +++ b/gcc/fortran/trans-decl.c @@ -3421,7 +3421,7 @@ gfc_build_builtin_function_decls (void) gfor_fndecl_caf_unlock = gfc_build_library_function_decl_with_spec ( get_identifier (PREFIX("caf_unlock")), "R..WW", - void_type_node, 7, pvoid_type_node, size_type_node, integer_type_node, + void_type_node, 6, pvoid_type_node, size_type_node, integer_type_node, pint_type, pchar_type_node, integer_type_node); gfor_fndecl_co_max = gfc_build_library_function_decl_with_spec ( -- 2.11.4.GIT