diff options
| author | brooks <brooks@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-05-29 03:40:00 +0000 |
|---|---|---|
| committer | brooks <brooks@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-05-29 03:40:00 +0000 |
| commit | e4fd77c7a21d6150d635afaa9690cde438350c73 (patch) | |
| tree | 143ede8538deb3ac64b852783d512eb28404bd78 /gcc/fortran | |
| parent | 99a75a59fce86443deed363d53083dde3cbe9669 (diff) | |
| download | gcc-e4fd77c7a21d6150d635afaa9690cde438350c73.tar.gz | |
* trans-array.c (gfc_conv_expr_descriptor): Edit comment.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@125159 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/fortran/trans-array.c | 6 |
2 files changed, 7 insertions, 3 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 7258d304ef1..8f0422e882f 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,9 @@ 2007-05-28 Brooks Moses <brooks.moses@codesourcery.com> + * trans-array.c (gfc_conv_expr_descriptor): Edit comment. + +2007-05-28 Brooks Moses <brooks.moses@codesourcery.com> + 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 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 |