2010-07-17 Mikael Morin <mikael@gcc.gnu.org>
authormikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 17 Jul 2010 09:57:19 +0000 (09:57 +0000)
committermikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Sat, 17 Jul 2010 09:57:19 +0000 (09:57 +0000)
commit540a8975b511546901446f43b79d46e52690b4f3
treedfe040e3cb597dd59cec2457c3fe5d55ccaf1d5a
parentcb885d9b457451ef64ec3dc093ef6c78545fb199
2010-07-17  Mikael Morin  <mikael@gcc.gnu.org>

* trans-array.c (gfc_free_ss): Don't free beyond ss rank.
Access subscript through the "dim" field index.
(gfc_trans_create_temp_array): Access ss info through the "dim" field
index.
(gfc_conv_array_index_offset): Ditto.
(gfc_conv_loop_setup): Ditto.
(gfc_conv_expr_descriptor): Ditto.
(gfc_conv_ss_startstride): Ditto.  Update call to
gfc_conv_section_startstride.
(gfc_conv_section_startstride): Set values along the array dimension.
Get array dimension directly from the argument.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@162276 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-array.c
gcc/fortran/trans.h