From f0aa35e864a9f4578bdc85189a72c922dd009918 Mon Sep 17 00:00:00 2001 From: jvdelisle Date: Mon, 19 Feb 2007 06:52:18 +0000 Subject: [PATCH] 2007-02-18 Jerry DeLisle PR fortran/30681 * gfortran.dg/pr17229.f: Change "Obsolete" to "Obsolescent". git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@122125 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/pr17229.f | 8 ++++---- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index bf4845f9c365..8540aaca729f 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-02-18 Jerry DeLisle + + PR fortran/30681 + * gfortran.dg/pr17229.f: Change "Obsolete" to "Obsolescent". + 2007-02-18 Roger Sayle PR rtl-optimization/28173 diff --git a/gcc/testsuite/gfortran.dg/pr17229.f b/gcc/testsuite/gfortran.dg/pr17229.f index 4e96d29921a4..da780d7feef9 100644 --- a/gcc/testsuite/gfortran.dg/pr17229.f +++ b/gcc/testsuite/gfortran.dg/pr17229.f @@ -5,18 +5,18 @@ l = .false. i = -1 - if (l) if (i) 999,999,999 ! { dg-warning "Obsolete: arithmetic IF statement" } + if (l) if (i) 999,999,999 ! { dg-warning "Obsolescent: arithmetic IF statement" } l = .true. - if (l) if (i) 10,999,999 ! { dg-warning "Obsolete: arithmetic IF statement" } + if (l) if (i) 10,999,999 ! { dg-warning "Obsolescent: arithmetic IF statement" } go to 999 10 i = 0 - if (l) if (i) 999,20,999 ! { dg-warning "Obsolete: arithmetic IF statement" } + if (l) if (i) 999,20,999 ! { dg-warning "Obsolescent: arithmetic IF statement" } go to 999 20 i = 1 - if (l) if (i) 999,999,30 ! { dg-warning "Obsolete: arithmetic IF statement" } + if (l) if (i) 999,999,30 ! { dg-warning "Obsolescent: arithmetic IF statement" } go to 999 999 call abort -- 2.47.3