aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorTobias Burnus <burnus@gcc.gnu.org>2011-08-29 12:33:09 +0200
committerTobias Burnus <burnus@gcc.gnu.org>2011-08-29 12:33:09 +0200
commit86187d0fe0984bc90f70b3742ef09b06e0bbb673 (patch)
tree53945bc4072488d8d24857a6fbc9d9459dfb6c2e /gcc
parentd986066d17e534ec854499decc44436559a2db5d (diff)
downloadgcc-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/ChangeLog7
-rw-r--r--gcc/fortran/trans-decl.c2
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));