re PR fortran/13490 (Compiler rejects valid constant -2147483648 for 32-bit int)

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.

From-SVN: r89806

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 7667f42d1d27fcfdeed6f360ee53bd480559c5c9..1e061f4ec9a38d0a0e3c7c689ae1b716ee46cee8 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 219cffa8bde23eac369ca8c6a79787329d39c407..2f44a405872807a771887f161315fa14ec0b194f 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 4e143e44cf475cb2528655ae6492cadf40d23112..1a60f47b443839a4068266f240ab067dc00426c5 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.