From 42066149461d7e6951d61c341954b0ed77c08d34 Mon Sep 17 00:00:00 2001 From: Mark Eggleston Date: Mon, 20 Jan 2020 13:29:33 +0000 Subject: [PATCH] [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. --- gcc/testsuite/ChangeLog | 6 ++++++ gcc/testsuite/gfortran.dg/pr93263_1.f90 | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) 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 + + Backport from mainline + * gfortran.dg/pr93263_1.f90: Change scan-tree-dump-not to + scan-tree-dump. + 2020-01-20 Richard Biener 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" } } -- 2.47.3