From 1b1f56cf4ded44b75c93b8285a66ec34e5c1316c Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Sat, 6 Sep 2008 20:27:17 +0200 Subject: [PATCH] re PR fortran/37399 (gfortran.dg/size_kind.f90 doesn't work) 2008-09-06 Tobias Burnus PR fortran/37399 * gfortran.dg/size_kind.f90: Remove allocate statement as it overflows at compile time on 32bit systems. From-SVN: r140070 --- gcc/testsuite/ChangeLog | 6 ++++++ gcc/testsuite/gfortran.dg/size_kind.f90 | 4 +++- 2 files changed, 9 insertions(+), 1 deletion(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 3185f30b73b..0ae92eba799 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2008-09-06 Tobias Burnus + + PR fortran/37399 + * gfortran.dg/size_kind.f90: Remove allocate statement + as it overflows at compile time on 32bit systems. + 2008-09-06 Jan Hubicka * g++.dg/tree-ssa-pr14703.C: New testcase. diff --git a/gcc/testsuite/gfortran.dg/size_kind.f90 b/gcc/testsuite/gfortran.dg/size_kind.f90 index 5ec6f7efe14..ee9cb8f246f 100644 --- a/gcc/testsuite/gfortran.dg/size_kind.f90 +++ b/gcc/testsuite/gfortran.dg/size_kind.f90 @@ -19,7 +19,9 @@ program test_64 print *, "max_32 = ", max_32 print *, "big_sz = ", big_sz - allocate(array(big_sz)) +! Disabled as it overflows on 32bit systems (at compile time) +! (conversion of integer(8) to integer(4)) +! allocate(array(big_sz)) print *, "sz = ", size(array) print *, "sz = ", size(array, kind=long) end program