diff options
author | Tobias Burnus <burnus@net-b.de> | 2014-05-11 20:25:55 +0200 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2014-05-11 20:25:55 +0200 |
commit | a9fe68774e1d00071bb528d40f1bc2caf61c2e39 (patch) | |
tree | 269d35f8e79cb0c4b6e9b8322976743b544fef94 /gcc | |
parent | 3af89f8bdff9b012a3737c6b6dd5d7cd2de1a1b8 (diff) | |
download | gcc-a9fe68774e1d00071bb528d40f1bc2caf61c2e39.zip gcc-a9fe68774e1d00071bb528d40f1bc2caf61c2e39.tar.gz gcc-a9fe68774e1d00071bb528d40f1bc2caf61c2e39.tar.bz2 |
trans-intrinsic.c (gfc_build_builtin_function_decls): Change type of second argument to int.
2014-05-11 Tobias Burnus <burnus@net-b.de>
* trans-intrinsic.c (gfc_build_builtin_function_decls):
Change type of second argument to int.
2014-05-11 Tobias Burnus <burnus@net-b.de>
* caf/libcaf.h (_gfortran_caf_num_images): Change type of
second argument to int.
* caf/mpi.c (_gfortran_caf_num_images): Ditto.
* caf/single.c (_gfortran_caf_num_images): Ditto.
From-SVN: r210311
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
-rw-r--r-- | gcc/fortran/trans-decl.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 447ed78..182563c 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2014-05-11 Tobias Burnus <burnus@net-b.de> + + * trans-intrinsic.c (gfc_build_builtin_function_decls): + Change type of second argument to int. + 2014-05-09 Mike Stump <mikestump@comcast.net> PR fortran/61109 diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index 5dd5d2a..3972ed3 100644 --- a/gcc/fortran/trans-decl.c +++ b/gcc/fortran/trans-decl.c @@ -3264,7 +3264,7 @@ gfc_build_builtin_function_decls (void) gfor_fndecl_caf_num_images = gfc_build_library_function_decl ( get_identifier (PREFIX("caf_num_images")), integer_type_node, - 2, integer_type_node, boolean_type_node); + 2, integer_type_node, integer_type_node); gfor_fndecl_caf_register = gfc_build_library_function_decl_with_spec ( get_identifier (PREFIX("caf_register")), "...WWW", pvoid_type_node, 6, |