Mikael Morin
06cd4e1b5a
trans-array.c (gfc_trans_create_temp_array): Loop over the parents.
...
* trans-array.c (gfc_trans_create_temp_array): Loop over the parents.
From-SVN: r180895
2011-11-03 23:37:24 +00:00
Mikael Morin
d6b3a0d72c
trans-array.c (get_array_ref_dim, [...]): Rename the former to the latter and loop over the parents.
...
* 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).
From-SVN: r180894
2011-11-03 23:34:53 +00:00
Mikael Morin
4d6a0e3637
trans.h (struct gfc_ss): New field nested_ss.
...
* trans.h (struct gfc_ss): New field nested_ss.
* trans-expr.c (gfc_advance_se_ss_chain): Update assertion.
From-SVN: r180893
2011-11-03 23:31:32 +00:00
Mikael Morin
f49afcb009
trans-array.c (set_vector_loop_bounds): Loop over the parents.
...
* trans-array.c (set_vector_loop_bounds): Loop over the parents.
From-SVN: r180892
2011-11-03 23:28:25 +00:00
Mikael Morin
fa168d9ff4
trans-array.c (gfc_trans_array_constructor): Loop over the parents.
...
* trans-array.c (gfc_trans_array_constructor): Loop over the parents.
From-SVN: r180891
2011-11-03 23:25:34 +00:00
Mikael Morin
5125d6d5d7
trans-array.c (gfc_set_loop_bounds_from_array_spec): Loop over the parents.
...
* trans-array.c (gfc_set_loop_bounds_from_array_spec): Loop over the
parents.
From-SVN: r180890
2011-11-03 23:22:13 +00:00
Mikael Morin
2eace29ac3
trans.h (struct gfc_ss): New field parent.
...
* 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.
From-SVN: r180889
2011-11-03 23:17:08 +00:00
Mikael Morin
4164579308
trans-array.h (gfc_trans_create_temp_array): Remove loop argument.
...
* 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.
From-SVN: r180888
2011-11-03 23:06:22 +00:00
Mikael Morin
d35335e315
trans-array.c (gfc_trans_create_temp_array): New variable total_dim.
...
* 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.
From-SVN: r180887
2011-11-03 23:02:03 +00:00
Mikael Morin
6adbe65465
trans-array.c (gfc_trans_array_constructor, [...]): Rename the former to the later.
...
* 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.
From-SVN: r180886
2011-11-03 22:59:29 +00:00
Mikael Morin
84952a4e31
trans-array.c (gfc_set_vector_loop_bounds): Get loop from ss.
...
* trans-array.c (gfc_set_vector_loop_bounds): Get loop from ss.
Remove loop argument.
(gfc_add_loop_ss_code): Update call.
From-SVN: r180885
2011-11-03 22:56:12 +00:00
Mikael Morin
4615abe856
trans.h (struct gfc_ss): New field loop.
...
* 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.
From-SVN: r180884
2011-11-03 22:54:37 +00:00
Mikael Morin
c7bf4f1e64
trans.h (struct gfc_ss_info): New field refcount.
...
* trans.h (struct gfc_ss_info): New field refcount.
* trans-array.c (free_ss_info): Decrement refcount. Return early if
still non-zero.
(gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss): Increment
refcount.
From-SVN: r180883
2011-11-03 22:50:06 +00:00
Mikael Morin
f28cd38e36
trans-array.c (gfc_trans_create_temp_array): Move invariant condition out of the containing loop.
...
* trans-array.c (gfc_trans_create_temp_array): Move invariant condition
out of the containing loop.
From-SVN: r180882
2011-11-03 22:45:41 +00:00
Mikael Morin
b2028d0b94
trans-array.c (gfc_conv_loop_setup, [...]): Move specloop arrays clearing from the former to the latter.
...
* trans-array.c (gfc_conv_loop_setup, gfc_trans_create_temp_array):
Move specloop arrays clearing from the former to the latter.
From-SVN: r180881
2011-11-03 22:42:58 +00:00
Mikael Morin
1d9370e909
trans-array.c (set_loop_bounds): Separate the beginning of gfc_conv_loop_setup into a function of its own.
...
* trans-array.c (set_loop_bounds): Separate the beginning of
gfc_conv_loop_setup into a function of its own.
(set_delta): Separate the end of gfc_conv_loop_setup into a function
of its own.
(gfc_conv_loop_setup): Call set_loop_bounds and set delta.
(set_loop_bounds, set_delta, gfc_conv_loop_setup): Make loopspec a
pointer to the specloop field from the loop struct.
From-SVN: r180880
2011-11-03 22:40:55 +00:00
Tobias Burnus
a9e88ec6fe
re PR fortran/50933 (Wrongly regards BIND(C) types as incompatible)
...
2011-11-03 Tobias Burnus <burnus@net-b.de>
PR fortran/50933
* interface.c (gfc_compare_derived_types): Fix check for
* BIND(C).
2011-11-03 Tobias Burnus <burnus@net-b.de>
PR fortran/50933
* gfortran.dg/bind_c_dts_5.f90: New.
From-SVN: r180879
2011-11-03 23:36:11 +01:00
Tobias Burnus
1e4b137661
re PR fortran/50960 ([OOP] vtables not marked as constant)
...
2011-11-03 Tobias Burnus <burnus@net-b.de>
PR fortran/50960
* trans-decl.c (gfc_finish_var_decl): Mark PARAMETER as
* TREE_READONLY.
2011-11-03 Tobias Burnus <burnus@net-b.de>
PR fortran/50960
* gfortran.dg/module_parameter_array_refs_2.f90: New.
From-SVN: r180878
2011-11-03 23:32:37 +01:00
Mikael Morin
42d0058e49
trans.h (struct gfc_ss, [...]): Move field gfc_ss::where into gfc_ss_info.
...
* trans.h (struct gfc_ss, struct gfc_ss_info): Move field
gfc_ss::where into gfc_ss_info.
* trans-array.c (gfc_add_loop_ss_code):
Update reference chains.
* trans-stmt.c (gfc_trans_where_assign, gfc_trans_where_3): Ditto.
From-SVN: r180877
2011-11-03 22:29:25 +00:00
Mikael Morin
7a412892a6
trans.h (struct gfc_ss, [...]): Move field gfc_ss::useflags into gfc_ss_info.
...
* trans.h (struct gfc_ss, struct gfc_ss_info): Move field
gfc_ss::useflags into gfc_ss_info.
* trans-array.c (gfc_mark_ss_chain_used, gfc_trans_preloop_setup,
gfc_trans_scalarizing_loops, gfc_trans_scalarized_boundary):
Update reference chains.
* trans-expr.c (gfc_conv_procedure_call): Ditto.
* trans-intrinsic.c (gfc_conv_intrinsic_function): Ditto.
From-SVN: r180875
2011-11-03 22:24:37 +00:00
Benjamin Kosnik
c3b0bfe175
doxygroups.cc: Add markup for namespace tr2.
...
2011-11-03 Benjamin Kosnik <bkoz@redhat.com>
* doc/doxygen/doxygroups.cc: Add markup for namespace tr2.
* include/tr2/bool_set: Adjust doxygen markup.
* include/tr2/dynamic_bitset: Same.
* include/tr2/type_traits: Same.
From-SVN: r180874
2011-11-03 22:23:35 +00:00
Mikael Morin
1838afec3e
trans.h (struct gfc_ss, [...]): Move field gfc_ss::data::info into gfc_ss_info::data and remove empty union...
...
* trans.h (struct gfc_ss, struct gfc_ss_info): Move field
gfc_ss::data::info into gfc_ss_info::data and remove empty union
gfc_ss::data.
* trans-array.c (gfc_free_ss, gfc_trans_create_temp_array,
gfc_trans_constant_array_constructor, gfc_trans_array_constructor,
gfc_set_vector_loop_bounds, gfc_add_loop_ss_code,
gfc_conv_ss_descriptor, gfc_trans_array_bound_check,
gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
add_array_offset, gfc_trans_preloop_setup,
gfc_trans_scalarized_boundary, gfc_conv_section_startstride,
gfc_conv_ss_startstride, gfc_could_be_alias,
gfc_conv_loop_setup, gfc_conv_expr_descriptor,
gfc_alloc_allocatable_for_assignment, gfc_walk_array_ref):
Update reference chains and factor them where possible.
* trans-expr.c (gfc_conv_variable, gfc_conv_subref_array_arg,
gfc_conv_procedure_call, gfc_trans_subarray_assign): Updata reference
chains.
* trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
* trans-io.c (transfer_array_component): Ditto.
* trans-stmt.c (gfc_conv_elemental_dependencies,
gfc_trans_pointer_assign_need_temp): Ditto.
From-SVN: r180873
2011-11-03 22:21:36 +00:00
Mikael Morin
961e73ace2
trans.h (struct gfc_ss, [...]): Move member struct gfc_ss::data::temp into gfc_ss_info::data.
...
* trans.h (struct gfc_ss, struct gfc_ss_info): Move member struct
gfc_ss::data::temp into gfc_ss_info::data.
* trans-array.c (gfc_get_temp_ss, gfc_conv_loop_setup): Update reference
chains.
From-SVN: r180872
2011-11-03 22:16:29 +00:00
Mikael Morin
99dd5a2990
trans.h (struct gfc_ss, [...]): Move member struct gfc_ss::data::scalar into newly created union...
...
* trans.h (struct gfc_ss, struct gfc_ss_info): Move member struct
gfc_ss::data::scalar into newly created union gfc_ss_info::data,
and rename subfield expr to value.
* trans-array.c (gfc_add_loop_ss_code, gfc_conv_array_index_offset,
gfc_conv_expr_descriptor): Update reference chains.
* trans-const.c (gfc_conv_constant): Ditto.
* trans-expr.c (gfc_conv_expr): Ditto.
From-SVN: r180870
2011-11-03 22:10:25 +00:00
Mikael Morin
a0add3be3e
trans.h (struct gfc_ss, [...]): Move field string_length from the former struct to the latter.
...
* trans.h (struct gfc_ss, struct gfc_ss_info): Move field
string_length from the former struct to the latter.
* trans-array.c
(gfc_get_temp_ss, gfc_trans_array_constructor, gfc_add_loop_ss_code,
gfc_conv_ss_descriptor, gfc_conv_scalarized_array_ref,
gfc_conv_resolve_dependencies, gfc_conv_loop_setup,
gfc_conv_expr_descriptor): Update references to string_length and
factor common reference chains where possible.
* trans-const.c (gfc_conv_constant): Ditto.
* trans-expr.c (gfc_conv_variable, gfc_conv_subref_array_arg,
gfc_conv_expr): Ditto.
From-SVN: r180869
2011-11-03 22:04:50 +00:00
Mikael Morin
f98cfd3c42
trans.h (struct gfc_ss, [...]): Move field expr from the former struct to the latter.
...
* trans.h (struct gfc_ss, struct gfc_ss_info): Move field expr from
the former struct to the latter.
* trans-array.c
(gfc_get_array_ss, gfc_get_scalar_ss,
gfc_trans_constant_array_constructor, gfc_trans_array_constructor,
gfc_add_loop_ss_code, gfc_conv_ss_descriptor,
gfc_trans_array_bound_check, gfc_conv_array_index_offset,
gfc_conv_scalarized_array_ref, gfc_conv_ss_startstride,
gfc_could_be_alias, gfc_conv_resolve_dependencies,
gfc_conv_loop_setup, gfc_conv_expr_descriptor,
gfc_alloc_allocatable_for_assignment): Update references to expr and
factor common reference chains where possible.
* trans-const.c (gfc_conv_constant): Ditto.
* trans-expr.c (gfc_conv_variable, gfc_conv_procedure_call,
gfc_conv_array_constructor_expr, gfc_conv_expr,
gfc_conv_expr_reference): Ditto.
* trans-intrinsic.c (trans_this_image, gfc_conv_intrinsic_bound,
gfc_conv_intrinsic_cobound, gfc_conv_intrinsic_funcall,
gfc_add_intrinsic_ss_code): Ditto.
* trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
From-SVN: r180868
2011-11-03 22:01:46 +00:00
Mikael Morin
bcc4d4e089
trans.h (struct gfc_ss_info): New struct.
...
* trans.h (struct gfc_ss_info): New struct.
(gfc_get_ss_info): New macro.
(struct gfc_ss): Move type field to struct gfc_ss_info.
Add an info field of type gfc_ss_info.
* trans-array.c (free_ss_info): New function.
(gfc_free_ss): Call free_ss_info.
(gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss):
Allocate gfc_ss_info field.
(gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss,
gfc_set_vector_loop_bounds, gfc_add_loop_ss_code,
gfc_conv_array_index_offset, gfc_trans_preloop_setup,
gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
gfc_conv_ss_startstride, gfc_conv_resolve_dependencies,
gfc_conv_loop_setup, transposed_dims, gfc_conv_expr_descriptor,
gfc_walk_elemental_function_args): Update references to type.
* trans-const.c (gfc_conv_constant): Factor common reference chains
and update reference to type.
* trans-expr.c (gfc_conv_procedure_call, gfc_trans_assignment_1):
Update reference to type.
(gfc_conv_array_constructor_expr, gfc_conv_expr,
gfc_conv_expr_reference): Ditto. Factor common reference chains.
* trans-intrinsic.c (walk_inline_intrinsic_transpose): Update references
to type
* trans-stmt.c (gfc_trans_where_assign): Ditto.
From-SVN: r180867
2011-11-03 21:55:48 +00:00
Mikael Morin
08dcec6137
trans.h (struct gfc_ss, [...]): Move shape field from the former struct to the latter.
...
* trans.h (struct gfc_ss, struct gfc_array_info): Move shape field
from the former struct to the latter.
* trans-array.c (gfc_conv_ss_startstride, gfc_conv_loop_setup):
Update field references.
* trans-expr.c (gfc_trans_subarray_assign): Update field references
and factor common reference chains.
* trans-io.c (transfer_array_component): Ditto.
From-SVN: r180866
2011-11-03 21:47:49 +00:00
Mikael Morin
cb4b9eaebe
trans.h (struct gfc_array_info): Move dim and dimen fields...
...
* trans.h (struct gfc_array_info): Move dim and dimen fields...
(struct gfc_ss): ... here. Remove gfc_ss::data::temp::dimen field.
* trans-array.c (gfc_conv_loop_setup): Remove temp_ss dim array
initialization.
(gfc_get_temp_ss): Initialize dim and dimen.
(gfc_free_ss, gfc_get_array_ss, gfc_get_temp_ss,
gfc_set_loop_bounds_from_array_spec, get_array_ref_dim,
gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
gfc_set_vector_loop_bounds, gfc_conv_scalarized_array_ref,
gfc_trans_preloop_setup, gfc_conv_ss_startstride,
gfc_conv_resolve_dependencies, gfc_conv_loop_setup, transposed_dims,
gfc_conv_expr_descriptor, gfc_alloc_allocatable_for_assignment,
gfc_walk_array_ref): Update field references.
* trans-expr.c (gfc_conv_subref_array_arg, gfc_conv_procedure_call):
Ditto.
* trans-intrinsic.c (walk_inline_intrinsic_transpose): Ditto.
* trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
From-SVN: r180865
2011-11-03 21:44:56 +00:00
Mikael Morin
6d63e468a3
trans.h (struct gfc_ss_info, [...]): Rename the former to the latter.
...
* trans.h (struct gfc_ss_info, struct gfc_array_info):
Rename the former to the latter.
* trans-array.c (gfc_get_array_ss, gfc_trans_allocate_array_storage,
get_array_ref_dim, gfc_trans_create_temp_array,
gfc_trans_constant_array_constructor, gfc_set_vector_loop_bounds,
gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
add_array_offset, gfc_trans_preloop_setup, gfc_conv_section_startstride,
gfc_conv_ss_startstride, gfc_conv_loop_setup, transposed_dims,
gfc_conv_expr_descriptor): Update all uses.
* trans-expr.c (gfc_conv_subref_array_arg, gfc_conv_procedure_call):
Ditto.
* trans-intrinsic.c (gfc_conv_intrinsic_transfer,
walk_inline_intrinsic_transpose): Ditto.
* trans-stmt.c (gfc_conv_elemental_dependencies,
gfc_trans_pointer_assign_need_temp): Ditto.
From-SVN: r180864
2011-11-03 21:39:11 +00:00
Mikael Morin
a7fb208d57
trans-array.c (dim_ok, [...]): Rename the former to the latter.
...
* trans-array.c (dim_ok, transposed_dims): Rename the former to the
latter. Change argument type. Invert return value.
(gfc_conv_expr_descriptor): Update calls.
From-SVN: r180862
2011-11-03 21:35:35 +00:00
Mikael Morin
820d5e68fb
trans-array.c (get_array_ref_dim): Change argument type and name.
...
* trans-array.c (get_array_ref_dim): Change argument type and name.
Obtain previous argument from the new argument in the body.
(gfc_trans_create_temp_arry, gfc_conv_loop_setup): Update calls.
From-SVN: r180861
2011-11-03 21:33:28 +00:00
Mikael Morin
43e7d60bc6
trans-array.c (gfc_set_vector_loop_bounds, [...]): Rename the former to the latter.
...
* trans-array.c (gfc_set_vector_loop_bounds, set_vector_loop_bounds):
Rename the former to the latter. Change type and name of argument.
Get previous argument from the new one.
(gfc_add_loop_ss_code): Update call.
From-SVN: r180860
2011-11-03 21:31:12 +00:00
Mikael Morin
f44d227711
trans-array.h (gfc_trans_create_temp_array): Replace info argument with ss argument.
...
* trans-array.h (gfc_trans_create_temp_array): Replace info argument
with ss argument.
* trans-array.c (gfc_trans_create_temp_array): Ditto. Get info from ss.
(gfc_trans_array_constructor, gfc_conv_loop_setup): Update call 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.
From-SVN: r180859
2011-11-03 21:28:26 +00:00
Mikael Morin
14bf3267a6
trans-array.c (gfc_trans_array_bound_check): Use ss argument to get name.
...
* trans-array.c (gfc_trans_array_bound_check): Use ss argument
to get name.
From-SVN: r180858
2011-11-03 21:24:24 +00:00
Mikael Morin
36e783e382
trans-array.c (gfc_trans_array_bound_check, [...]): Rename the former to the latter.
...
* trans-array.c (gfc_trans_array_bound_check,
trans_array_bound_check): Rename the former to the latter.
Replace descriptor argument with ss argument. Get descriptor from ss.
(gfc_conv_array_index_offset, conv_array_index_offset): Rename the
former to the latter. Update call to trans_array_bound_check.
Replace info argument with ss argument. Get info from ss.
(gfc_conv_scalarized_array_ref): Update call to conv_array_index_offset.
(add_array_offset): Ditto
From-SVN: r180857
2011-11-03 21:21:30 +00:00
Mikael Morin
a13d9afef7
trans-array.c (gfc_trans_constant_array_constructor, [...]): Rename the former to the latter.
...
* trans-array.c (gfc_trans_constant_array_constructor,
trans_constant_array_constructor): Rename the former to the latter.
Don't set the rank of the temporary for the loop. Remove then unused
loop argument.
(gfc_trans_array_constructor): Update call.
From-SVN: r180856
2011-11-03 21:19:27 +00:00
Mikael Morin
39abb03c4b
trans-array.c (gfc_trans_scalarizing_loops): Stop loop before end marker, not after it.
...
* trans-array.c (gfc_trans_scalarizing_loops): Stop loop before end
marker, not after it.
From-SVN: r180855
2011-11-03 21:16:54 +00:00
Hans-Peter Nilsson
bf86b0671b
config.host (crisv32-*-none, [...]): Remove.
...
* config.host (crisv32-*-none, cris-*-none): Remove.
(crisv32-*-elf): Append to tmake_file, don't just set it.
(cris-*-elf): Add missing t-fdpbit to tmake_file.
From-SVN: r180854
2011-11-03 21:16:07 +00:00
Mikael Morin
596a95799c
trans-array.c (gfc_conv_loop_setup): Also skip temporary arrays.
...
* trans-array.c (gfc_conv_loop_setup): Also skip temporary arrays.
From-SVN: r180853
2011-11-03 21:14:19 +00:00
Mikael Morin
ae9054ba25
trans-array.c (gfc_conv_ss_startstride): Access array bounds along array dimensions instead of loop dimensions.
...
* trans-array.c (gfc_conv_ss_startstride): Access array bounds along
array dimensions instead of loop dimensions.
From-SVN: r180852
2011-11-03 21:12:33 +00:00
Mikael Morin
1e633e4fe1
trans-array.c (gfc_trans_preloop_setup): Assertify one condition.
...
* trans-array.c (gfc_trans_preloop_setup): Assertify one condition.
From-SVN: r180851
2011-11-03 21:09:58 +00:00
Mikael Morin
a7c6141677
trans-array.c (gfc_walk_array_ref): Skip coarray dimensions.
...
* trans-array.c (gfc_walk_array_ref): Skip coarray dimensions.
From-SVN: r180850
2011-11-03 21:08:25 +00:00
Mikael Morin
37f1447217
trans-array.c (get_array_ref_dim): Remove redundant condition.
...
* trans-array.c (get_array_ref_dim): Remove redundant condition.
From-SVN: r180849
2011-11-03 21:03:56 +00:00
Mikael Morin
1190b61129
trans-array.c (gfc_trans_preloop_setup): Move common code...
...
* trans-array.c (gfc_trans_preloop_setup): Move common code...
(add_array_offset): ...into that new function.
From-SVN: r180848
2011-11-03 21:00:41 +00:00
Mikael Morin
e2b3e6bdd6
trans-array.c (gfc_trans_preloop_setup): Use loop's dimension instead of array's dimention.
...
* trans-array.c (gfc_trans_preloop_setup): Use loop's dimension instead
of array's dimention. Check that it is indeed the same.
From-SVN: r180847
2011-11-03 20:56:19 +00:00
Mikael Morin
4f9a70fa31
trans-array.c (gfc_trans_preloop_setup): Remove redundant assertion.
...
* trans-array.c (gfc_trans_preloop_setup): Remove redundant assertion.
Special case outermost loop.
From-SVN: r180846
2011-11-03 20:52:14 +00:00
Uros Bizjak
95d93adb49
sched-vis.c (print_value): Handle STRICT_LOW_PART.
...
* sched-vis.c (print_value): Handle STRICT_LOW_PART.
From-SVN: r180845
2011-11-03 21:49:36 +01:00
Mikael Morin
7f6d568e74
trans-array.c (gfc_trans_preloop_setup): Factor loop index initialization.
...
* trans-array.c (gfc_trans_preloop_setup): Factor loop index
initialization.
From-SVN: r180844
2011-11-03 20:49:14 +00:00
Mikael Morin
bee1695c21
trans-array.c (gfc_trans_preloop_setup): Move code earlier.
...
* trans-array.c (gfc_trans_preloop_setup): Move code earlier.
From-SVN: r180843
2011-11-03 20:46:00 +00:00