OSDN Git Service

* trans-array.c (gfc_trans_preloop_setup): New pointers to outer
[pf3gnuchains/gcc-fork.git] / gcc / fortran / ChangeLog
index d014b9d..f8a8366 100644 (file)
@@ -1,5 +1,125 @@
 2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
 
+       * trans-array.c (gfc_trans_preloop_setup): New pointers to outer
+       dimension's ss and loop. Use them.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (outermost_loop): New function.
+       (gfc_trans_array_constructor, gfc_set_vector_loop_bounds,
+       gfc_add_loop_ss_code): Put generated code out of the outermost loop.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (constant_array_constructor_loop_size):
+       Handle multiple loops.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (get_rank, get_loop_upper_bound_for_array):
+       New functions.
+       (gfc_trans_array_constructor): Handle multiple loops.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans.h (struct gfc_loopinfo): New field parent.
+       * trans-array.c (gfc_cleanup_loop): Free nested loops.
+       (gfc_add_ss_to_loop): Set nested_loop's parent loop.
+       (gfc_trans_array_constructor): Update assertion.
+       (gfc_conv_loop_setup): Ditto.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (gfc_add_loop_ss_code): Skip non-nestedmost ss.
+       Call recursively gfc_add_loop_ss_code for all the nested loops.
+       (gfc_conv_ss_startstride): Only get the descriptor for the outermost
+       ss. Call recursively gfc_conv_ss_startstride for all the nested loops.
+       (set_loop_bounds): Call recursively for all the nested loops.
+       (set_delta): Ditto.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans.h (struct gfc_loopinfo): New fields nested and next.
+       * trans-array.c (gfc_add_ss_to_loop): Update list of nested list if
+       ss has non-null nested_ss field.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (gfc_trans_create_temp_array): Loop over the parents.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (get_array_ref_dim, get_scalarizer_dim_for_array_dim): 
+       Rename the former to the latter and loop over the parents.
+       (innermost_ss): New function.
+       (get_array_ref_dim_for_loop_dim): New function.
+       (gfc_trans_create_temp_array): Use get_scalarizer_dim_for_array_dim.
+       (set_loop_bounds): Use get_array_dim_for_loop_dim).
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans.h (struct gfc_ss): New field nested_ss.
+       * trans-expr.c (gfc_advance_se_ss_chain): Update assertion.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (set_vector_loop_bounds): Loop over the parents.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (gfc_trans_array_constructor): Loop over the parents.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (gfc_set_loop_bounds_from_array_spec): Loop over the
+       parents.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans.h (struct gfc_ss): New field parent.
+       * trans-array.c (gfc_trans_scalarizing_loops): Skip clearing if a
+       parent exists.
+       * trans-expr.c (gfc_advance_se_ss_chain): Move to parent ss at the
+       end of the chain.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.h (gfc_trans_create_temp_array): Remove loop argument.
+       * trans-array.c (gfc_trans_create_temp_array): Ditto.  Get loop from ss.
+       Update reference to loop.  Remove loop argument.
+       (gfc_trans_array_constructor, gfc_conv_loop_setup): Update calls to
+       gfc_trans_create_temp_array.
+       * trans-expr.c (gfc_conv_procedure_call): Ditto.
+       * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
+       * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
+       Set loop before calling gfc_trans_create_temp_array.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (gfc_trans_create_temp_array): New variable total_dim.
+       Set total_dim to loop's rank. Replace usages of loop's rank.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (gfc_trans_array_constructor, trans_array_constructor):
+       Rename the former to the later.  Get loop from ss.
+       Remove loop argument.
+       (gfc_add_loop_ss_code): Update call.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans-array.c (gfc_set_vector_loop_bounds): Get loop from ss.
+       Remove loop argument.
+       (gfc_add_loop_ss_code): Update call.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
+       * trans.h (struct gfc_ss): New field loop.
+       * trans-array.c (set_ss_loop): New function.
+       (gfc_add_ss_to_loop): Call set_ss_loop.
+
+2011-11-03  Mikael Morin  <mikael@gcc.gnu.org>
+
        * trans.h (struct gfc_ss_info): New field refcount.
        * trans-array.c (free_ss_info): Decrement refcount. Return early if
        still non-zero.