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
This commit is contained in:
Mikael Morin 2015-07-17 20:02:38 +00:00
parent eb438073bf
commit 44f18d706a
2 changed files with 8 additions and 3 deletions

View File

@ -1,3 +1,8 @@
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

View File

@ -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" } }