From 07350627b62718cd76f10fa50e8533005577d7bc Mon Sep 17 00:00:00 2001 From: Alan Lawrence Date: Fri, 11 Mar 2016 12:27:58 +0000 Subject: [PATCH] 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_. From-SVN: r234139 --- gcc/testsuite/ChangeLog | 4 ++++ gcc/testsuite/gfortran.dg/unconstrained_commons.f | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index a945aa2ed5e..cc3ad502c12 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2016-03-11 Alan Lawrence + + * gfortran.dg/unconstrained_commons.f: Widen regexp to match j_. + 2016-03-11 Alan Lawrence * 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 f9fc471e55a..bee67ab7d5b 100644 --- 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" } } -- 2.30.2