------- Comment #2 from hjl dot tools at gmail dot com 2008-05-23 14:45 -------
I got different messages for 64bit and 32bit targets on Linux/Intel64:
[EMAIL PROTECTED] gfortran]$
/export/build/gnu/gcc/build-x86_64-linux/gcc/testsuite/gfortran/../../gfortran
-B/export/build/gnu/gcc/build-x86_64-linux/gcc/testsuite/gfortran/../../
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90
-Os -pedantic-errors -S
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:55.1:
(/3_k, 3_k/)))) call abort
1
Warning: Nonconforming tab character at (1)
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:60.1:
(/3_k, 3_k/)))) call abort
1
Warning: Nonconforming tab character at (1)
[EMAIL PROTECTED] gfortran]$
/export/build/gnu/gcc/build-x86_64-linux/gcc/testsuite/gfortran/../../gfortran
-B/export/build/gnu/gcc/build-x86_64-linux/gcc/testsuite/gfortran/../../
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90
-Os -pedantic-errors -S -m32
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:7.16:
integer(kind=k), dimension(3_k, 3_k) :: a
1
Error: Kind 16 not supported for type INTEGER at (1)
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:8.17:
integer(kind=k), dimension(3_k, 3_k, 2_k) :: b
1
Error: Kind 16 not supported for type INTEGER at (1)
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:9.17:
integer(kind=k), dimension(3_k) :: bo, sh
1
Error: Kind 16 not supported for type INTEGER at (1)
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:12.21:
a = reshape ((/1_k, 2_k, 3_k, 4_k, 5_k, 6_k, 7_k, 8_k, 9_k/), (/3_k, 3_k/))
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:13.22:
a = eoshift (a, 1_k, 99_k, 1_k)
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:14.33:
if (any (a .ne. reshape ((/2_k, 3_k, 99_k, 5_k, 6_k, 99_k, 8_k, 9_k, 99_k/),
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:17.21:
a = reshape ((/1_k, 2_k, 3_k, 4_k, 5_k, 6_k, 7_k, 8_k, 9_k/), (/3_k, 3_k/))
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:18.25:
a = eoshift (a, 9999_k, 99_k, 1_k)
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:19.23:
if (any (a .ne. 99_k)) call abort
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:21.21:
a = reshape ((/1_k, 2_k, 3_k, 4_k, 5_k, 6_k, 7_k, 8_k, 9_k/), (/3_k, 3_k/))
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:22.23:
a = eoshift (a, -2_k, dim = 2_k)
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:23.33:
if (any (a .ne. reshape ((/0_k, 0_k, 0_k, 0_k, 0_k, 0_k, 1_k, 2_k, 3_k/), (/
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:26.21:
a = reshape ((/1_k, 2_k, 3_k, 4_k, 5_k, 6_k, 7_k, 8_k, 9_k/), (/3_k, 3_k/))
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:27.26:
a = eoshift (a, -9999_k, 99_k, 1_k)
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:28.23:
if (any (a .ne. 99_k)) call abort
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:31.21:
a = reshape ((/1_k, 2_k, 3_k, 4_k, 5_k, 6_k, 7_k, 8_k, 9_k/), (/3_k, 3_k/))
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:32.24:
a = eoshift (a, (/1_k, 0_k, -1_k/), 99_k, 1_k)
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:33.33:
if (any (a .ne. reshape ((/2_k, 3_k, 99_k, 4_k, 5_k, 6_k, 99_k, 7_k, 8_k/),
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:36.21:
a = reshape ((/1_k, 2_k, 3_k, 4_k, 5_k, 6_k, 7_k, 8_k, 9_k/), (/3_k, 3_k/))
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:37.27:
a = eoshift (a, (/9999_k, 0_k, -9999_k/), 99_k, 1_k)
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:38.34:
if (any (a .ne. reshape ((/99_k, 99_k, 99_k, 4_k, 5_k, 6_k, 99_k, 99_k, 99_k
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:41.21:
a = reshape ((/1_k, 2_k, 3_k, 4_k, 5_k, 6_k, 7_k, 8_k, 9_k/), (/3_k, 3_k/))
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:42.24:
a = eoshift (a, (/2_k, -2_k, 0_k/), dim = 2_k)
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:43.33:
if (any (a .ne. reshape ((/7_k, 0_k, 3_k, 0_k, 0_k, 6_k, 0_k, 2_k, 9_k/), (/
1
Error: Integer kind 16 at (1) not available
/net/gnu-13/export/gnu/src/gcc/gcc/gcc/testsuite/gfortran.dg/eoshift_large_1.f90:47.21:
a = reshape ((/1_k, 2_k, 3_k, 4_k, 5_k, 6_k, 7_k, 8_k, 9_k/), (/3_k, 3_k/))
1
Error: Integer kind 16 at (1) not available
Fatal Error: Error count reached limit of 25.
[EMAIL PROTECTED] gfortran]$
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36314
