diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 7258d304ef1..8f0422e882f 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2007-05-28 Brooks Moses + + * trans-array.c (gfc_conv_expr_descriptor): Edit comment. + 2007-05-28 Brooks Moses PR fortran/31972 diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index cda9f9317e1..c41c69a6c8a 100644 --- a/gcc/fortran/trans-array.c +++ b/gcc/fortran/trans-array.c @@ -4314,16 +4314,16 @@ gfc_trans_dummy_array_bias (gfc_symbol * sym, tree tmpdesc, tree body) This function is also used for array pointer assignments, and there are three cases: - - want_pointer && !se->direct_byref + - se->want_pointer && !se->direct_byref EXPR is an actual argument. On exit, se->expr contains a pointer to the array descriptor. - - !want_pointer && !se->direct_byref + - !se->want_pointer && !se->direct_byref EXPR is an actual argument to an intrinsic function or the left-hand side of a pointer assignment. On exit, se->expr contains the descriptor for EXPR. - - !want_pointer && se->direct_byref + - !se->want_pointer && se->direct_byref EXPR is the right-hand side of a pointer assignment and se->expr is the descriptor for the previously-evaluated left-hand side. The function creates an assignment from