From 3e90ac4e45e9533d84d9835a7e440321d305d442 Mon Sep 17 00:00:00 2001 From: Brooks Moses Date: Tue, 29 May 2007 03:40:00 +0000 Subject: * trans-array.c (gfc_conv_expr_descriptor): Edit comment. From-SVN: r125159 --- gcc/fortran/ChangeLog | 4 ++++ gcc/fortran/trans-array.c | 6 +++--- 2 files changed, 7 insertions(+), 3 deletions(-) (limited to 'gcc/fortran') diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 7258d30..8f0422e 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,9 @@ 2007-05-28 Brooks Moses + * trans-array.c (gfc_conv_expr_descriptor): Edit comment. + +2007-05-28 Brooks Moses + PR fortran/31972 * target-memory.c (gfc_target_expr_size): Add handling for size of BT_HOLLERITH variables. diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index cda9f93..c41c69a 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 -- cgit v1.1