This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/41850] Wrong-code with optional allocatable arrays
- From: "burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 30 Oct 2009 10:16:08 -0000
- Subject: [Bug fortran/41850] Wrong-code with optional allocatable arrays
- References: <bug-41850-13404@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- 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