re PR fortran/32770 ([Meta-bug] -fdefault-integer-8 issues)

2007-07-30  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/32770
	* gfortran.dg/array_constructor_12.f90:  Adjust argument
	of huge() to correct kind.

From-SVN: r127071

gcc/testsuite/ChangeLog

+2007-07-30  Thomas Koenig  <tkoenig@gcc.gnu.org>
+
+	PR fortran/32770
+	* gfortran.dg/array_constructor_12.f90:  Adjust argument
+	of huge() to correct kind.
+
 2007-07-30  Ollie Wild  <aaw@google.com>
 
 	* gcc.dg/cpp/counter-2.c: New test.

gcc/testsuite/gfortran.dg/array_constructor_12.f90

@@ -5,7 +5,7 @@ program main
   integer (kind = 4) :: l4, step4
   integer (kind = 8), parameter :: big = 10000000000_8
 
-  l4 = huge (1)
+  l4 = huge (l4)
   u8 = l4 + 10_8
   step4 = 2
   call test ((/ (i, i = l4, u8, step4) /), l4 + 0_8, u8, step4 + 0_8)