------- Comment #4 from burnus at gcc dot gnu dot org 2009-10-30 10:16 ------- (In reply to comment #3) > Anything else?
Seemingly yes: gfortran.dg/optional_dim_3.f90 gfortran.dg/random_4.f90 gfortran.dg/random_7.f90 For optional_dim_3.f90, one has: - D.1516 = n2 != 0B ? (integer(kind=4)) *n2 : 1; - _gfortran_cshift1_4 (&atmp.38, &parm.34, &atmp.35, &D.1516); + _gfortran_cshift1_4 (&atmp.38, &parm.34, &atmp.35, n2); which leads to: Fortran runtime error: Argument 'DIM' is out of range in call to 'CSHIFT' And for random*.f90 Fortran runtime error: RANDOM_SEED should have at most one argument present. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41850
