Commit d3fb59c4 by Kaz Kojima

re PR testsuite/64850 (FAIL: gfortran.dg/goacc/acc_on_device-1.f95 -O …

re PR testsuite/64850 (FAIL: gfortran.dg/goacc/acc_on_device-1.f95   -O   scan-rtl-dump-times expand "\\(call [^\\n]*\\"acc_on_device" 4)

PR testsuite/64850
Tweak acc_on_device* tests.

From-SVN: r220711
parent cf3648f2
2015--02-14 Kaz Kojima <kkojima@gcc.gnu.org>
PR testsuite/64850
* gcc.dg/goacc/acc_on_device-1.c: Use a space instead of \\\" in
the expression to find calls.
* c-c++-common/goacc/acc_on_device-2.c: Likewise.
* c-c++-common/goacc/acc_on_device-2-off.c: Likewise.
* gfortran.dg/goacc/acc_on_device-1.f95: Likewise.
* gfortran.dg/goacc/acc_on_device-2.f95: Likewise.
* gfortran.dg/goacc/acc_on_device-2-off.f95: Likewise.
2015-02-14 Marek Polacek <polacek@redhat.com>
PR c/64768
......
......@@ -20,6 +20,6 @@ f (void)
}
/* Without -fopenacc, we're expecting one call.
{ dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]*\\\"acc_on_device" 1 "expand" } } */
{ dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]* acc_on_device" 1 "expand" } } */
/* { dg-final { cleanup-rtl-dump "expand" } } */
......@@ -24,6 +24,6 @@ f (void)
perturbs expansion as a builtin, which expects an int parameter. It's fine
when changing acc_device_t to plain int, but that's not what we're doing in
<openacc.h>.
{ dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]*\\\"acc_on_device" 0 "expand" { xfail c++ } } } */
{ dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]* acc_on_device" 0 "expand" { xfail c++ } } } */
/* { dg-final { cleanup-rtl-dump "expand" } } */
......@@ -15,6 +15,6 @@ f (void)
}
/* Unsuitable to be handled as a builtin, so we're expecting four calls.
{ dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]*\\\"acc_on_device" 4 "expand" } } */
{ dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]* acc_on_device" 4 "expand" } } */
/* { dg-final { cleanup-rtl-dump "expand" } } */
......@@ -17,6 +17,6 @@ logical function f ()
end function f
! Unsuitable to be handled as a builtin, so we're expecting four calls.
! { dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]*\\\"acc_on_device" 4 "expand" } }
! { dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]* acc_on_device" 4 "expand" } }
! { dg-final { cleanup-rtl-dump "expand" } }
......@@ -34,6 +34,6 @@ logical (4) function f ()
end function f
! Without -fopenacc, we're expecting one call.
! { dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]*\\\"acc_on_device" 1 "expand" } }
! { dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]* acc_on_device" 1 "expand" } }
! { dg-final { cleanup-rtl-dump "expand" } }
......@@ -35,6 +35,6 @@ end function f
! With -fopenacc, we're expecting the builtin to be expanded, so no calls.
! TODO: not working.
! { dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]*\\\"acc_on_device" 0 "expand" { xfail *-*-* } } }
! { dg-final { scan-rtl-dump-times "\\\(call \[^\\n\]* acc_on_device" 0 "expand" { xfail *-*-* } } }
! { dg-final { cleanup-rtl-dump "expand" } }
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment