diff options
author | Tobias Burnus <burnus@net-b.de> | 2008-09-06 20:27:17 +0200 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2008-09-06 20:27:17 +0200 |
commit | 1b1f56cf4ded44b75c93b8285a66ec34e5c1316c (patch) | |
tree | c7b2d506936220fb999b8b74c30a57a749e7fd81 | |
parent | b91bc3493e27d85f69ec4374db5b50656974573f (diff) | |
download | gcc-1b1f56cf4ded44b75c93b8285a66ec34e5c1316c.zip gcc-1b1f56cf4ded44b75c93b8285a66ec34e5c1316c.tar.gz gcc-1b1f56cf4ded44b75c93b8285a66ec34e5c1316c.tar.bz2 |
re PR fortran/37399 (gfortran.dg/size_kind.f90 doesn't work)
2008-09-06 Tobias Burnus <burnus@net-b.de>
PR fortran/37399
* gfortran.dg/size_kind.f90: Remove allocate statement
as it overflows at compile time on 32bit systems.
From-SVN: r140070
-rw-r--r-- | gcc/testsuite/ChangeLog | 6 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/size_kind.f90 | 4 |
2 files changed, 9 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 3185f30..0ae92eb 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2008-09-06 Tobias Burnus <burnus@net-b.de> + + 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 <jh@suse.cz> * 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 5ec6f7e..ee9cb8f 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 |