http://gcc.gnu.org/bugzilla/show_bug.cgi?id=53685
--- Comment #3 from Tobias Burnus <burnus at gcc dot gnu.org> 2012-06-16
10:50:48 UTC ---
That patch of comment 2 fails for:
testsuite/gfortran.dg/string_3.f90:16.15:
print *, len(s(2_8**32_8+3_8:1))
1
Error: Result of LEN overflows its kind at (1)
It also fails for "if (len(t(8:4)) /= 0) call abort" in gfortran.dg/substr_2.f.
And for gfortran.dg/widechar_IO_4.f90 (rt, line 16),
gfortran.dg/widechar_compare_1.f90 (line 9), and
gfortran.dg/widechar_intrinsics_8.f90 (line 24).
