From 056e1c5e2e0daf963e3bc89f1a8f9028251e2246 Mon Sep 17 00:00:00 2001 From: David Billinghurst Date: Fri, 29 Oct 2004 04:41:49 +0000 Subject: [PATCH] re PR fortran/13490 (Compiler rejects valid constant -2147483648 for 32-bit int) 2004-10-29 David Billinghurst PR fortran/13490 * gfortran.dg/g77/20030326-1.f: Change xfail on error to warning. * gfortran.dg/g77/README: Update. From-SVN: r89806 --- gcc/testsuite/ChangeLog | 8 +++++++- gcc/testsuite/gfortran.dg/g77/20030326-1.f | 2 +- gcc/testsuite/gfortran.dg/g77/README | 2 +- 3 files changed, 9 insertions(+), 3 deletions(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 7667f42d1d2..1e061f4ec9a 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,4 +1,10 @@ -1004-10-28 Matt Austern +2004-10-29 David Billinghurst + + 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 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 219cffa8bde..2f44a405872 100644 --- 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 4e143e44cf4..1a60f47b443 100755 --- 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. -- 2.30.2