From: Mark Eggleston <markeggleston@gcc.gnu.org>
Date: Mon, 20 Jan 2020 13:29:33 +0000 (+0000)
Subject: [PATCH] PR Fortran/93263 Correct test case
X-Git-Tag: releases/gcc-9.3.0~213
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=42066149461d7e6951d61c341954b0ed77c08d34;p=thirdparty%2Fgcc.git

[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 47dd30618ec4..adcef9e4c6b8 100644
--- 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 f96b35894114..3fa22476053d 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" } }