This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
[patch, committed] Fix error in test case
- From: Thomas Koenig <tkoenig at alice-dsl dot net>
- To: fortran at gcc dot gnu dot org
- Cc: gcc-patches at gcc dot gnu dot org
- Date: Mon, 30 Jul 2007 23:10:49 +0200
- Subject: [patch, committed] Fix error in test case
Committed as obvious. This is one of the easier cases of testsuite
failures with -fdefault-integer-8 :-)
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.
Index: gfortran.dg/array_constructor_12.f90
===================================================================
--- gfortran.dg/array_constructor_12.f90 (revision 127044)
+++ gfortran.dg/array_constructor_12.f90 (working copy)
@@ -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)