Hi H.J.
I got
FAIL: gfortran.dg/warn_undefined_vars_6.f90 -O (test for excess errors)
Excess errors:
/export/gnu/import/git/sources/gcc/gcc/testsuite/gfortran.dg/warn_undefined_vars_6.f90:10:9:
Warning: Deleted feature: PAUSE statement at (1)
/export/gnu/import/git/sources/gcc/gcc/testsuite/gfortran.dg/warn_undefined_vars_6.f90:13:48:
Warning: Deleted feature: PAUSE statement at (1)
on Linux/x86-64.
Fixed as obvious and simple, shown below. Thanks for the heads-up!
Best regards
Thomas
commit 1d8f0366ddb84589f9d1d3f8fe65d9d2223f8cb6 (HEAD -> trunk,
origin/trunk)
Author: Thomas Koenig <[email protected]>
Date: Sun Jul 5 10:12:34 2026 +0200
Add warnings about deleted PAUSE feature to test case.
gcc/testsuite/ChangeLog:
PR fortran/126090
* gfortran.dg/warn_undefined_vars_6.f90: Add warnings
about deleted feature.
diff --git a/gcc/testsuite/gfortran.dg/warn_undefined_vars_6.f90
b/gcc/testsuite/gfortran.dg/warn_undefined_vars_6.f90
index 25e0c16def7..4709f085307 100644
--- a/gcc/testsuite/gfortran.dg/warn_undefined_vars_6.f90
+++ b/gcc/testsuite/gfortran.dg/warn_undefined_vars_6.f90
@@ -7,8 +7,9 @@ program memain
s = "abc"
error stop s
stop s
- pause s
+ pause s ! { dg-warning "Deleted feature" }
error stop s1 ! { dg-warning "Undefined variable" }
stop s2 ! { dg-warning "Undefined variable" }
pause s3 ! { dg-warning "Undefined variable" }
+ ! { dg-warning "Deleted feature" " " { target "*-*-*" } .-1 }
end program memain