diff options
author | Tobias Burnus <burnus@gcc.gnu.org> | 2011-08-29 12:33:09 +0200 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2011-08-29 12:33:09 +0200 |
commit | 86187d0fe0984bc90f70b3742ef09b06e0bbb673 (patch) | |
tree | 53945bc4072488d8d24857a6fbc9d9459dfb6c2e /gcc | |
parent | d986066d17e534ec854499decc44436559a2db5d (diff) | |
download | gcc-86187d0fe0984bc90f70b3742ef09b06e0bbb673.zip gcc-86187d0fe0984bc90f70b3742ef09b06e0bbb673.tar.gz gcc-86187d0fe0984bc90f70b3742ef09b06e0bbb673.tar.bz2 |
trans-decl.c (generate_coarray_sym_init): Use GFC_CAF_COARRAY_STATIC for static coarrays.
gcc/fortran/
2011-08-29 Tobias Burnus <burnus@net-b.de>
* trans-decl.c (generate_coarray_sym_init): Use
GFC_CAF_COARRAY_STATIC for static coarrays.
libgfortan/
2011-08-29 Tobias Burnus <burnus@net-b.de>
* caf/libcaf.h (_gfortran_caf_deregister): Update prototype.
* caf/mpi.c (_gfortran_caf_deregister): Modify prototype,
actually free memory and add error diagnostic.
(_gfortran_caf_finalize): Add additional free calls.
* caf/single.c (_gfortran_caf_deregister): Modify prototype,
actually free memory and add error diagnostic.
(_gfortran_caf_finalize): Add additional free calls.
From-SVN: r178193
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/fortran/ChangeLog | 7 | ||||
-rw-r--r-- | gcc/fortran/trans-decl.c | 2 |
2 files changed, 7 insertions, 2 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index a9b85b2..a00723e 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,7 +1,12 @@ +2011-08-29 Tobias Burnus <burnus@net-b.de> + + * trans-decl.c (generate_coarray_sym_init): Use + GFC_CAF_COARRAY_STATIC for static coarrays. + 2011-08-28 Dodji Seketeli <dodji@redhat.com> * scanner.c (load_file): Don't abuse LC_RENAME reason while - (indirectly) calling linemap_add. + (indirectly) calling linemap_add. 2011-08-26 Jakub Jelinek <jakub@redhat.com> diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index c85e20c..ead8acf 100644 --- a/gcc/fortran/trans-decl.c +++ b/gcc/fortran/trans-decl.c @@ -4241,7 +4241,7 @@ generate_coarray_sym_init (gfc_symbol *sym) tmp = build_call_expr_loc (input_location, gfor_fndecl_caf_register, 6, size, build_int_cst (integer_type_node, - GFC_CAF_COARRAY_ALLOC), /* type. */ + GFC_CAF_COARRAY_STATIC), /* type. */ token, null_pointer_node, /* token, stat. */ null_pointer_node, /* errgmsg, errmsg_len. */ build_int_cst (integer_type_node, 0)); |