[PATCH] PR Fortran/93263 Correct test case

Should've have checked for the existance of a non static integer
using scan-tree-dump instead of scan-tree-dump-not. A cut and paste
error.

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 47dd30618ec4d0161523f97ac323ea4ca56dbf1a..adcef9e4c6b89d2ffb200513f446d685b955f8ef 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2020-01-20  Mark Eggleston  <mark.eggleston@codethink.com>
+
+       Backport from mainline
+       * gfortran.dg/pr93263_1.f90: Change scan-tree-dump-not to
+       scan-tree-dump.
+
 2020-01-20  Richard Biener  <rguenther@suse.de>
 
        Backport from mainline

diff --git a/gcc/testsuite/gfortran.dg/pr93263_1.f90 b/gcc/testsuite/gfortran.dg/pr93263_1.f90
index f96b35894114f5ae1cedfe87b0e7811ecca5b08b..3fa22476053d8eb1a057021d185733d2375e93ec 100644 (file)
--- a/gcc/testsuite/gfortran.dg/pr93263_1.f90
+++ b/gcc/testsuite/gfortran.dg/pr93263_1.f90
@@ -25,5 +25,5 @@ recursive subroutine check(n)
 end 
 
 ! { dg-final { scan-tree-dump-not "static integer\\(kind=4\\) a" "original" } }
-! { dg-final { scan-tree-dump-not "integer\\(kind=4\\) a" "original" } }
+! { dg-final { scan-tree-dump "integer\\(kind=4\\) a" "original" } }