Tobias, I have not tried this patch, but will it actually fix it? The error is real_kinds(3) is outside the array bounds. Your patch fixes addresses a runtime problem, not a compile-time problem, if I understand correctly.
/nasfarm/dje/src/src/gcc/testsuite/gfortran.dg/quad_3.f90:17.47: if (size (real_kinds) >= 4 .and. real_kinds(3) == 10 .and. qp == 16) then 1 Warning: Array reference at (1) is out of bounds (3 > 2) in dimension 1 /nasfarm/dje/src/src/gcc/testsuite/gfortran.dg/quad_3.f90:17.47: if (size (real_kinds) >= 4 .and. real_kinds(3) == 10 .and. qp == 16) then 1 Error: Index in dimension 1 is out of bounds at (1) I do not think that you patch will affect the compile-time error. thanks, David On Tue, Dec 4, 2012 at 11:03 AM, Tobias Burnus <bur...@net-b.de> wrote: > David Edelsohn: > >> The quad_3.f90 testcase fails on AIX, which does not have quad math >> enabled. I do not understand how the following line can be correct. > > > Well, obviously, it is not correct - otherwise you wouldn't see a failure > :-) > Corrected by the attached patch (Rev. 194155). > > Sorry for the mistake. > > >> Fortran does not have early exit > > > Not yet. (It has been proposed for F2003 but specifying the exact > semantics/syntax was that difficult that it has been postponed until some > future revision.) > > Tobias