diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/goacc/parallel-tree.f95')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/goacc/parallel-tree.f95 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/goacc/parallel-tree.f95 b/gcc/testsuite/gfortran.dg/goacc/parallel-tree.f95 index 9037f6c895f..5b2e01d4878 100644 --- a/gcc/testsuite/gfortran.dg/goacc/parallel-tree.f95 +++ b/gcc/testsuite/gfortran.dg/goacc/parallel-tree.f95 @@ -6,7 +6,7 @@ program test implicit none integer :: q, i, j, k, m, n, o, p, r, s, t, u, v, w - logical :: l + logical :: l = .true. !$acc parallel if(l) async num_gangs(i) num_workers(i) vector_length(i) & !$acc reduction(max:q), copy(i), copyin(j), copyout(k), create(m) & |