[Bug fortran/41850] Wrong-code with optional allocatable arrays

2009-11-01 Thread burnus at gcc dot gnu dot org 


--- Comment #6 from burnus at gcc dot gnu dot org  2009-11-01 12:43 ---
Subject: Bug 41850

Author: burnus
Date: Sun Nov  1 12:43:42 2009
New Revision: 153793

URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=153793
Log:
2009-11-01  Tobias Burnus  bur...@net-b.de

PR fortran/41850
* trans-expr.c (gfc_conv_procedure_call): Deallocate intent-out
variables only when present. Remove unneccessary present check.

2009-11-01  Tobias Burnus  bur...@net-b.de

PR fortran/41850
* gfortran.dg/intent_out_6.f90: New testcase.


Added:
trunk/gcc/testsuite/gfortran.dg/intent_out_6.f90
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/trans-expr.c
trunk/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41850

[Bug fortran/41850] Wrong-code with optional allocatable arrays

2009-11-01 Thread burnus at gcc dot gnu dot org 


--- Comment #7 from burnus at gcc dot gnu dot org  2009-11-01 14:35 ---
Subject: Bug 41850

Author: burnus
Date: Sun Nov  1 14:35:40 2009
New Revision: 153794

URL: http://gcc.gnu.org/viewcvs?root=gccview=revrev=153794
Log:
2009-11-01  Tobias Burnus  bur...@net-b.de

PR fortran/41850
* trans-expr.c (gfc_conv_procedure_call): Deallocate intent-out
variables only when present.

2009-11-01  Tobias Burnus  bur...@net-b.de

PR fortran/41850
* gfortran.dg/intent_out_6.f90: New testcase.


Added:
branches/gcc-4_4-branch/gcc/testsuite/gfortran.dg/intent_out_6.f90
Modified:
branches/gcc-4_4-branch/gcc/fortran/ChangeLog
branches/gcc-4_4-branch/gcc/fortran/trans-expr.c
branches/gcc-4_4-branch/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41850

[Bug fortran/41850] Wrong-code with optional allocatable arrays

2009-11-01 Thread burnus at gcc dot gnu dot org 


--- Comment #8 from burnus at gcc dot gnu dot org  2009-11-01 14:36 ---
FIXED on the trunk (4.5) and on the 4.4 branch.


-- 

burnus at gcc dot gnu dot org changed:

   What|Removed |Added

 Status|ASSIGNED|RESOLVED
 Resolution||FIXED


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41850

[Bug fortran/41850] Wrong-code with optional allocatable arrays

2009-10-30 Thread burnus 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

[Bug fortran/41850] Wrong-code with optional allocatable arrays

2009-10-30 Thread burnus at gcc dot gnu dot org 


--- Comment #5 from burnus at gcc dot gnu dot org  2009-10-30 14:33 ---
Patch: http://gcc.gnu.org/ml/fortran/2009-10/msg00246.html


-- 

burnus at gcc dot gnu dot org changed:

   What|Removed |Added

URL||http://gcc.gnu.org/ml/fortra
   ||n/2009-10/msg00246.html


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41850