Commit 44f18d70 by Mikael Morin

coarray_collectives_16.f90: Fix pattern as follow-up to r225930.


gcc/testsuite/
	* gfortran.dg/coarray_collectives_16.f90: Fix pattern
	as follow-up to r225930.

From-SVN: r225965
parent eb438073
2015-07-17 Mikael Morin <mikael@gcc.gnu.org>
* gfortran.dg/coarray_collectives_16.f90: Fix pattern
as follow-up to r225930.
2015-07-17 Paul Thomas <pault@gcc.gnu.org> 2015-07-17 Paul Thomas <pault@gcc.gnu.org>
PR fortran/52846 PR fortran/52846
......
...@@ -33,6 +33,6 @@ contains ...@@ -33,6 +33,6 @@ contains
end function hc end function hc
end program test end program test
! { dg-final { scan-tree-dump-times "_gfortran_caf_co_reduce \\(&desc.., &fr, 4, _gfortran_caf_num_images \\(0, -1\\), &stat1, errmesg1, 0, 6\\);" 1 "original" } } ! { dg-final { scan-tree-dump-times "_gfortran_caf_co_reduce \\(&desc.., fr, 4, _gfortran_caf_num_images \\(0, -1\\), &stat1, errmesg1, 0, 6\\);" 1 "original" } }
! { dg-final { scan-tree-dump-times "_gfortran_caf_co_reduce \\(&val2, &gz, 0, 4, &stat2, errmesg2, 0, 7\\);" 1 "original" } } ! { dg-final { scan-tree-dump-times "_gfortran_caf_co_reduce \\(&val2, gz, 0, 4, &stat2, errmesg2, 0, 7\\);" 1 "original" } }
! { dg-final { scan-tree-dump-times "_gfortran_caf_co_reduce \\(&desc.., &hc, 1, res, &stat3, errmesg3, 99, 8\\);" 1 "original" } } ! { dg-final { scan-tree-dump-times "_gfortran_caf_co_reduce \\(&desc.., hc, 1, res, &stat3, errmesg3, 99, 8\\);" 1 "original" } }
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