diff options
| author | Alessandro Fanfarillo <fanfarillo.gcc@gmail.com> | 2016-07-05 09:33:06 -0600 |
|---|---|---|
| committer | Alessandro Fanfarillo <afanfa@gcc.gnu.org> | 2016-07-05 09:33:06 -0600 |
| commit | 20d0bfcefd6caf09c23113732edd98241a46af56 (patch) | |
| tree | ec27aaef1b5d3d90fcdc003d50d5ed2169894af8 /gcc/fortran/trans-decl.c | |
| parent | 1174b21b388ba06e8cebfaa2d0a4cc7a026475ad (diff) | |
| download | gcc-20d0bfcefd6caf09c23113732edd98241a46af56.zip gcc-20d0bfcefd6caf09c23113732edd98241a46af56.tar.gz gcc-20d0bfcefd6caf09c23113732edd98241a46af56.tar.bz2 | |
Second review of STAT= patch + tests
From-SVN: r238007
Diffstat (limited to 'gcc/fortran/trans-decl.c')
| -rw-r--r-- | gcc/fortran/trans-decl.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index 5626753..f026bea 100644 --- a/gcc/fortran/trans-decl.c +++ b/gcc/fortran/trans-decl.c @@ -3526,16 +3526,16 @@ gfc_build_builtin_function_decls (void) ppvoid_type_node, pint_type, pchar_type_node, integer_type_node); gfor_fndecl_caf_get = gfc_build_library_function_decl_with_spec ( - get_identifier (PREFIX("caf_get")), ".R.RRRW", void_type_node, 9, + get_identifier (PREFIX("caf_get")), ".R.RRRWW", void_type_node, 10, pvoid_type_node, size_type_node, integer_type_node, pvoid_type_node, pvoid_type_node, pvoid_type_node, integer_type_node, integer_type_node, - boolean_type_node); + boolean_type_node, pint_type); gfor_fndecl_caf_send = gfc_build_library_function_decl_with_spec ( - get_identifier (PREFIX("caf_send")), ".R.RRRR", void_type_node, 9, + get_identifier (PREFIX("caf_send")), ".R.RRRRW", void_type_node, 10, pvoid_type_node, size_type_node, integer_type_node, pvoid_type_node, pvoid_type_node, pvoid_type_node, integer_type_node, integer_type_node, - boolean_type_node); + boolean_type_node, pint_type); gfor_fndecl_caf_sendget = gfc_build_library_function_decl_with_spec ( get_identifier (PREFIX("caf_sendget")), ".R.RRRR.RRR", void_type_node, |