[gcc/devel/ranger] [PATCH] PR Fortran/93263 Correct test case

[Aldy Hernandez]

https://gcc.gnu.org/g:e82ba180d6641a1e2bad1ac327234fc1cda658ef

commit e82ba180d6641a1e2bad1ac327234fc1cda658ef
Author: Mark Eggleston <markeggleston@gcc.gnu.org>
Date:   Mon Jan 20 13:23:07 2020 +0000

    [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:
---
 gcc/testsuite/ChangeLog                 | 5 +++++
 gcc/testsuite/gfortran.dg/pr93263_1.f90 | 2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index d8bf3130048..a526e32ac89 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2020-01-20  Mark Eggleston  <mark.eggleston@codethink.com>
+
+	* gfortran.dg/pr93263_1.f90: Change scan-tree-dump-not to
+	scan-tree-dump.
+
 2020-01-20  H.J. Lu  <hongjiu.lu@intel.com>
 
 	PR target/93319
diff --git a/gcc/testsuite/gfortran.dg/pr93263_1.f90 b/gcc/testsuite/gfortran.dg/pr93263_1.f90
index f96b3589411..3fa22476053 100644
--- 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" } }