diff options
author | Gary Funck <gary@intrepid.com> | 2016-07-16 17:57:33 +0000 |
---|---|---|
committer | Gary Funck <gary@intrepid.com> | 2016-07-16 17:57:33 +0000 |
commit | 3f0c687f86f0480fe042244ecbcadaa0a4f313fc (patch) | |
tree | 7a9c3e6b0cd8538944582828d38a3468032f9221 /gcc/testsuite/gfortran.dg/goacc/asyncwait-3.f95 | |
parent | b7c339a37ce3ab2ef8f2fef17d6c6e8779a866c2 (diff) | |
parent | b1a2f7b8ad5fa3d9916fbd0d8f5228abc8d9f279 (diff) |
Merge GCC 6.0 version 238402 into gupc-6-branch.gupc-6-branch
git-svn-id: https://gcc.gnu.org/svn/gcc/branches/gupc-6-branch@238415 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/gfortran.dg/goacc/asyncwait-3.f95')
-rw-r--r-- | gcc/testsuite/gfortran.dg/goacc/asyncwait-3.f95 | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/gcc/testsuite/gfortran.dg/goacc/asyncwait-3.f95 b/gcc/testsuite/gfortran.dg/goacc/asyncwait-3.f95 index 32c11def6f7..ed72a9ba28a 100644 --- a/gcc/testsuite/gfortran.dg/goacc/asyncwait-3.f95 +++ b/gcc/testsuite/gfortran.dg/goacc/asyncwait-3.f95 @@ -11,17 +11,17 @@ program asyncwait a(:) = 3.0 b(:) = 0.0 - !$acc wait (1 2) ! { dg-error "Unexpected junk in \\\!\\\$ACC WAIT at" } + !$acc wait (1 2) ! { dg-error "Syntax error in OpenACC expression list at" } - !$acc wait (1,) ! { dg-error "Unexpected junk in \\\!\\\$ACC WAIT at" } + !$acc wait (1,) ! { dg-error "Syntax error in OpenACC expression list at" } - !$acc wait (,1) ! { dg-error "Unexpected junk in \\\!\\\$ACC WAIT at" } + !$acc wait (,1) ! { dg-error "Syntax error in OpenACC expression list at" } - !$acc wait (1, 2, ) ! { dg-error "Unexpected junk in \\\!\\\$ACC WAIT at" } + !$acc wait (1, 2, ) ! { dg-error "Syntax error in OpenACC expression list at" } - !$acc wait (1, 2, ,) ! { dg-error "Unexpected junk in \\\!\\\$ACC WAIT at" } + !$acc wait (1, 2, ,) ! { dg-error "Syntax error in OpenACC expression list at" } - !$acc wait (1 ! { dg-error "Unexpected junk in \\\!\\\$ACC WAIT at" } + !$acc wait (1 ! { dg-error "Syntax error in OpenACC expression list at" } !$acc wait (1, *) ! { dg-error "Invalid argument to \\\$\\\!ACC WAIT" } @@ -33,9 +33,9 @@ program asyncwait !$acc wait (1.0) ! { dg-error "WAIT clause at \\\(1\\\) requires a scalar INTEGER expression" } - !$acc wait 1 ! { dg-error "Unexpected junk in \\\!\\\$ACC WAIT at" } + !$acc wait 1 ! { dg-error "Unclassifiable OpenACC directive" } - !$acc wait N ! { dg-error "Unexpected junk in \\\!\\\$ACC WAIT at" } + !$acc wait N ! { dg-error "Unclassifiable OpenACC directive" } !$acc wait (1) end program asyncwait |