This is the mail archive of the
gcc-cvs@gcc.gnu.org
mailing list for the GCC project.
r121235 - in /trunk/gcc: fortran/ChangeLog fort...
- From: pault at gcc dot gnu dot org
- To: gcc-cvs at gcc dot gnu dot org
- Date: Sat, 27 Jan 2007 18:23:15 -0000
- Subject: r121235 - in /trunk/gcc: fortran/ChangeLog fort...
Author: pault
Date: Sat Jan 27 18:23:14 2007
New Revision: 121235
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=121235
Log:
2007-01-27 Paul Thomas <pault@gcc.gnu.org>
PR fortran/30407
* trans-expr.c (gfc_conv_operator_assign): New function.
* trans.h : Add prototype for gfc_conv_operator_assign.
* trans-stmt.c (gfc_trans_where_assign): Add a gfc_symbol for
a potential operator assignment subroutine. If it is non-NULL
call gfc_conv_operator_assign instead of the first assignment.
( gfc_trans_where_2): In the case of an operator assignment,
extract the argument expressions from the code for the
subroutine call and pass the symbol to gfc_trans_where_assign.
resolve.c (resolve_where, gfc_resolve_where_code_in_forall,
gfc_resolve_forall_body): Resolve the subroutine call for
operator assignments.
2007-01-27 Paul Thomas <pault@gcc.gnu.org>
PR fortran/30407
* gfortran.dg/where_operator_assign_1.f90: New test.
* gfortran.dg/where_operator_assign_2.f90: New test.
* gfortran.dg/where_operator_assign_3.f90: New test.
Added:
trunk/gcc/testsuite/gfortran.dg/where_operator_assign_1.f90
trunk/gcc/testsuite/gfortran.dg/where_operator_assign_2.f90
trunk/gcc/testsuite/gfortran.dg/where_operator_assign_3.f90
Modified:
trunk/gcc/fortran/ChangeLog
trunk/gcc/fortran/resolve.c
trunk/gcc/fortran/trans-expr.c
trunk/gcc/fortran/trans-stmt.c
trunk/gcc/fortran/trans.h
trunk/gcc/testsuite/ChangeLog