Re: Add -funconstrained-commons to work around PR/69368 (and others) in SPEC2006

gcc/testsuite:

	* gfortran.dg/unconstrained_commons.f: Widen regexp to match j_<N>.

From-SVN: r234139

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index a945aa2ed5e88c52b65ee516c07a74cc0e0be4da..cc3ad502c127b70509c5887c548c2008a3acedda 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2016-03-11  Alan Lawrence  <alan.lawrence@arm.com>
+
+       * gfortran.dg/unconstrained_commons.f: Widen regexp to match j_<N>.
+
 2016-03-11  Alan Lawrence  <alan.lawrence@arm.com>
 
        * gcc.dg/tree-ssa/sra-20.c: New.

diff --git a/gcc/testsuite/gfortran.dg/unconstrained_commons.f b/gcc/testsuite/gfortran.dg/unconstrained_commons.f
index f9fc471e55ad4113519bafd16c1a3e348bf3d4c3..bee67ab7d5baef5a1fe1fed482686ea9c0965a18 100644 (file)
--- a/gcc/testsuite/gfortran.dg/unconstrained_commons.f
+++ b/gcc/testsuite/gfortran.dg/unconstrained_commons.f
@@ -17,4 +17,4 @@
 ! { dg-final { scan-tree-dump-not "FIND" "dom2" } }
 ! We should retain both a read and write of mycommon.x.
 ! { dg-final { scan-tree-dump-times "  _\[0-9\]+ = mycommon\\.x\\\[_\[0-9\]+\\\];" 1 "dom2" } }
-! { dg-final { scan-tree-dump-times "  mycommon\\.x\\\[_\[0-9\]+\\\] = _\[0-9\]+;" 1 "dom2" } }
+! { dg-final { scan-tree-dump-times "  mycommon\\.x\\\[j?_\[0-9\]+\\\] = _\[0-9\]+;" 1 "dom2" } }