diff options
| author | Tobias Burnus <burnus@net-b.de> | 2014-07-13 10:10:40 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2014-07-13 10:10:40 +0200 |
| commit | 4a05a9a8d264103cbcccdd62c6fcd3a3059c0efd (patch) | |
| tree | 29595debf742b8d37e1519261020cbab165c5826 | |
| parent | 60ab4b449cb264d77015b6657085a413050843c9 (diff) | |
| download | gcc-4a05a9a8d264103cbcccdd62c6fcd3a3059c0efd.zip gcc-4a05a9a8d264103cbcccdd62c6fcd3a3059c0efd.tar.gz gcc-4a05a9a8d264103cbcccdd62c6fcd3a3059c0efd.tar.bz2 | |
coarray_atomic_4.f90: Avoid using a kind=16 integer.
2014-07-13 Tobias Burnus <burnus@net-b.de>
* gfortran.dg/coarray_atomic_4.f90: Avoid using a kind=16
integer.
From-SVN: r212491
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/coarray_atomic_4.f90 | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 48a6bb7..42e4079 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2014-07-13 Tobias Burnus <burnus@net-b.de> + + * gfortran.dg/coarray_atomic_4.f90: Avoid using a kind=16 + integer. + 2014-07-12 Paul Thomas <pault@gcc.gnu.org> PR fortran/61780 diff --git a/gcc/testsuite/gfortran.dg/coarray_atomic_4.f90 b/gcc/testsuite/gfortran.dg/coarray_atomic_4.f90 index 663a6c8..be91a9f 100644 --- a/gcc/testsuite/gfortran.dg/coarray_atomic_4.f90 +++ b/gcc/testsuite/gfortran.dg/coarray_atomic_4.f90 @@ -37,7 +37,7 @@ call atomic_or(caf, 101, stat=stat) call atomic_xor(caf, 105_2, stat=stat) call atomic_fetch_add(caf, var3, var, stat=stat) -call atomic_fetch_and(caf, 22_16, var, stat=stat) +call atomic_fetch_and(caf, 22_1, var, stat=stat) call atomic_fetch_or(caf, var3, var, stat=stat) call atomic_fetch_xor(caf, 47_2, var, stat=stat) |