diff mbox

[Fortran,committed] CO_MIN/MAX/SUM fixes

Message ID 53A3C75B.8080404@net-b.de
State New
Headers show

Commit Message

Tobias Burnus June 20, 2014, 5:32 a.m. UTC 
Tobias Burnus wrote:
> This patches fixes a few bugs related to CO_MIN/MAX/SUM:
> Committed as Rev. 211816.

That patch required also the attached testsuite changes, committed as 
Rev. 211833.

Tobias
diff mbox

Patch

Index: gcc/testsuite/ChangeLog
===================================================================
--- gcc/testsuite/ChangeLog	(Revision 211832)
+++ gcc/testsuite/ChangeLog	(Arbeitskopie)
@@ -1,3 +1,10 @@ 
+2014-06-20  Tobias Burnus  <burnus@net-b.de>
+
+	PR testsuite/61567
+	* gfortran.dg/coarray_collectives_5.f90: Update
+	dg-final scan-tree-dump-times.
+	* gfortran.dg/coarray_collectives_6.f90: Ditto.
+
 2014-06-20 Hale Wang <hale.wang@arm.com>
 
 	* gcc.target/arm/lto/: New folder to verify the LTO option.
Index: gcc/testsuite/gfortran.dg/coarray_collectives_5.f90
===================================================================
--- gcc/testsuite/gfortran.dg/coarray_collectives_5.f90	(Revision 211832)
+++ gcc/testsuite/gfortran.dg/coarray_collectives_5.f90	(Arbeitskopie)
@@ -13,7 +13,7 @@  program test
   call co_sum(val, stat=stat3)
 end program test
 
-! { dg-final { scan-tree-dump-times "_gfortran_caf_co_max \\(&desc.., 0B, 0, &stat1, 0B, 0, 0\\);" 1 "original" } }
-! { dg-final { scan-tree-dump-times "_gfortran_caf_co_min \\(&desc.., 0B, 0, &stat2, 0B, 0, 0\\);" 1 "original" } }
-! { dg-final { scan-tree-dump-times "_gfortran_caf_co_sum \\(&desc.., 0B, 0, &stat3, 0B, 0\\);" 1 "original" } }
+! { dg-final { scan-tree-dump-times "_gfortran_caf_co_max \\(&desc.., 0, &stat1, 0B, 0, 0\\);" 1 "original" } }
+! { dg-final { scan-tree-dump-times "_gfortran_caf_co_min \\(&desc.., 0, &stat2, 0B, 0, 0\\);" 1 "original" } }
+! { dg-final { scan-tree-dump-times "_gfortran_caf_co_sum \\(&desc.., 0, &stat3, 0B, 0\\);" 1 "original" } }
 ! { dg-final { cleanup-tree-dump "original" } }
Index: gcc/testsuite/gfortran.dg/coarray_collectives_6.f90
===================================================================
--- gcc/testsuite/gfortran.dg/coarray_collectives_6.f90	(Revision 211832)
+++ gcc/testsuite/gfortran.dg/coarray_collectives_6.f90	(Arbeitskopie)
@@ -20,7 +20,7 @@  program test
   call co_min(val3, result_image=res,stat=stat3, errmsg=errmesg3)
 end program test
 
-! { dg-final { scan-tree-dump-times "_gfortran_caf_co_max \\(&desc.., 0B, 0, &stat1, errmesg1, 0, 6\\);" 1 "original" } }
-! { dg-final { scan-tree-dump-times "_gfortran_caf_co_sum \\(&val2, 0B, 4, &stat2, errmesg2, 7\\);" 1 "original" } }
-! { dg-final { scan-tree-dump-times "_gfortran_caf_co_min \\(&desc.., 0B, res, &stat3, errmesg3, 99, 8\\);" 1 "original" } }
+! { dg-final { scan-tree-dump-times "_gfortran_caf_co_max \\(&desc.., 0, &stat1, errmesg1, 0, 6\\);" 1 "original" } }
+! { dg-final { scan-tree-dump-times "_gfortran_caf_co_sum \\(&val2, 4, &stat2, errmesg2, 7\\);" 1 "original" } }
+! { dg-final { scan-tree-dump-times "_gfortran_caf_co_min \\(&desc.., res, &stat3, errmesg3, 99, 8\\);" 1 "original" } }
 ! { dg-final { cleanup-tree-dump "original" } }