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  <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 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