diff options
| author | Paul Thomas <pault@gcc.gnu.org> | 2006-05-21 07:35:05 +0000 |
|---|---|---|
| committer | Paul Thomas <pault@gcc.gnu.org> | 2006-05-21 07:35:05 +0000 |
| commit | 476220e7ee32d83c829ec76b7dcf2ccd9000b3bf (patch) | |
| tree | 878bb615e69fdec9b7bc4f6adf7213bd3d53693f /gcc/fortran/st.c | |
| parent | 80980ba989e054549ac5172f1d95cd0d8c247ab6 (diff) | |
| download | gcc-476220e7ee32d83c829ec76b7dcf2ccd9000b3bf.tar.gz | |
re PR fortran/25746 (Elemental assignment gives wrong result)
2006-05-21 Paul Thomas <pault@gcc.gnu.org>
PR fortran/25746
* interface.c (gfc_extend_assign): Use new code EXEC_ASSIGN_CALL.
* gfortran.h : Put EXEC_ASSIGN_CALL in enum.
* trans-stmt.c (gfc_conv_elemental_dependencies): New function.
(gfc_trans_call): Call it. Add new boolian argument to flag
need for dependency checking. Assert intent OUT and IN for arg1
and arg2.
(gfc_trans_forall_1): Use new code EXEC_ASSIGN_CALL.
trans-stmt.h : Modify prototype of gfc_trans_call.
trans.c (gfc_trans_code): Add call for EXEC_ASSIGN_CALL.
st.c (gfc_free_statement): Free actual for EXEC_ASSIGN_CALL.
* dependency.c (gfc_check_fncall_dependency): Don't check other
against itself.
PR fortran/25090
* resolve.c : Remove resolving_index_expr.
(entry_parameter): Remove.
(gfc_resolve_expr, resolve_charlen, resolve_fl_variable): Remove
calls to entry_parameter and references to resolving_index_expr.
PR fortran/27584
* check.c (gfc_check_associated): Replace NULL assert with an
error message, since it is possible to generate bad code that
has us fall through to here..
PR fortran/19015
* iresolve.c (maxloc, minloc): If DIM is not present, pass the
rank of ARRAY as the shape of the result. Otherwise, pass the
shape of ARRAY, less the dimension DIM.
(maxval, minval): The same, when DIM is present, otherwise no
change.
2006-05-21 Paul Thomas <pault@gcc.gnu.org>
PR fortran/25746
* gfortran.dg/elemental_subroutine_3.f90: New test.
PR fortran/25090
* gfortran.dg/entry_dummy_ref_1.f90: Remove.
PR fortran/27584
* gfortran.dg/associated_target_1.f90: New test.
PR fortran/19015
* gfortran.dg/maxloc_shape_1.f90: New test.
From-SVN: r113949
Diffstat (limited to 'gcc/fortran/st.c')
| -rw-r--r-- | gcc/fortran/st.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/st.c b/gcc/fortran/st.c index e7461a70c5d..cc866872a08 100644 --- a/gcc/fortran/st.c +++ b/gcc/fortran/st.c @@ -112,6 +112,7 @@ gfc_free_statement (gfc_code * p) break; case EXEC_CALL: + case EXEC_ASSIGN_CALL: gfc_free_actual_arglist (p->ext.actual); break; |