2004-10-29 David Billinghurst <David.Billinghurst@riotinto.com>

	PR fortran/13490
	* gfortran.dg/g77/20030326-1.f: Change xfail on error to warning.
	* gfortran.dg/g77/README: Update.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@89806 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 7667f42..1e061f4 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,4 +1,10 @@
-1004-10-28  Matt Austern  <austern@apple.com>
+2004-10-29  David Billinghurst <David.Billinghurst@riotinto.com>
+
+       PR fortran/13490
+       * gfortran.dg/g77/20030326-1.f: Change xfail on error to warning.
+       * gfortran.dg/g77/README: Update.
+
+2004-10-28  Matt Austern  <austern@apple.com>
 
        PR c++/14124
        * g++.dg/ext/packed7.C: New test.

diff --git a/gcc/testsuite/gfortran.dg/g77/20030326-1.f b/gcc/testsuite/gfortran.dg/g77/20030326-1.f
index 219cffa..2f44a40 100644 (file)
--- a/gcc/testsuite/gfortran.dg/g77/20030326-1.f
+++ b/gcc/testsuite/gfortran.dg/g77/20030326-1.f
@@ -4,7 +4,7 @@ C      larson@w6yx.stanford.edu
 C
        integer a, b, c
 
-       c = -2147483648 / -1 ! { dg-bogus "Arithmetic overflow" "Arithmetic overflow" { xfail *-*-* } } PR 16512
+       c = -2147483648 / -1 ! { dg-warning "outside symmetric range" "" }
 
        a = 1
        b = 0

diff --git a/gcc/testsuite/gfortran.dg/g77/README b/gcc/testsuite/gfortran.dg/g77/README
index 4e143e4..1a60f47 100755 (executable)
--- a/gcc/testsuite/gfortran.dg/g77/README
+++ b/gcc/testsuite/gfortran.dg/g77/README
@@ -90,7 +90,7 @@ Directory g77.f-torture/compile
 20010519-1.f                   Y  Add dg-warnings for ASSIGN
 20020307-1.f                   Y
 20030115-1.f                   Y  Add dg-warnings for ASSIGN
-20030326-1.f                   Y  XFAIL PR 16512
+20030326-1.f                   Y
 8485.f                         Y
 960317-1.f                     Y
 970125-0.f                     Y  Add dg-excess-errors. Investigate.later.