diff options
| author | Tobias Burnus <burnus@net-b.de> | 2012-11-28 22:42:17 +0100 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2012-11-28 22:42:17 +0100 |
| commit | 74c49505d071e2d5d81a8b9e1708f35f81eab09d (patch) | |
| tree | c54635fb4a56ad48342b35f88e7c39076ad69adf /gcc/fortran | |
| parent | f4919e4a824372c70af64a80e16db4de995bdc3c (diff) | |
| download | gcc-74c49505d071e2d5d81a8b9e1708f35f81eab09d.zip gcc-74c49505d071e2d5d81a8b9e1708f35f81eab09d.tar.gz gcc-74c49505d071e2d5d81a8b9e1708f35f81eab09d.tar.bz2 | |
re PR fortran/52161 (Internal compiler errors with -fcheck=bounds in coarray tests)
2012-11-28 Tobias Burnus <burnus@net-b.de>
PR fortran/52161
* trans-stmt.c (gfc_trans_sync): Fix bound checking.
2012-11-28 Tobias Burnus <burnus@net-b.de>
PR fortran/52161
* coarray/sync_3.f90: New.
From-SVN: r193908
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/trans-stmt.c | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index bc8d0d8..cc996fe 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2012-11-28 Tobias Burnus <burnus@net-b.de> + + PR fortran/52161 + * trans-stmt.c (gfc_trans_sync): Fix bound checking. + 2012-11-27 Tobias Burnus <burnus@net-b.de> PR fortran/55476 diff --git a/gcc/fortran/trans-stmt.c b/gcc/fortran/trans-stmt.c index bdc559b..0c88c4a 100644 --- a/gcc/fortran/trans-stmt.c +++ b/gcc/fortran/trans-stmt.c @@ -795,7 +795,7 @@ gfc_trans_sync (gfc_code *code, gfc_exec_op type) gfc_trans_runtime_check (true, false, cond, &se.pre, &code->expr1->where, "Invalid image number " "%d in SYNC IMAGES", - fold_convert (integer_type_node, se.expr)); + fold_convert (integer_type_node, images)); } /* Per F2008, 8.5.1, a SYNC MEMORY is implied by calling the |