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
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
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
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
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
Mikael Morin
1fb35a9015
trans-array.c (gfc_trans_preloop_setup): Move array reference initialisation earlier.
...
* trans-array.c (gfc_trans_preloop_setup): Move array reference
initialisation earlier. Factor subsequent array references.
From-SVN: r180842
2011-11-03 20:28:58 +00:00
Mikael Morin
6b81e94de1
re PR fortran/50420 ([Coarray] lcobound doesn't accept coarray subcomponents)
...
PR fortran/50420
* trans-array.c (gfc_walk_array_ref): Allow zero rank arrays
if they are coarrays.
From-SVN: r180145
2011-10-18 14:55:48 +00:00
Mikael Morin
42ac5ee128
trans-array.h (gfc_walk_array_ref): New prototype.
...
* trans-array.h (gfc_walk_array_ref): New prototype.
* trans-array.c (gfc_walk_array_ref): New function, containing
all but the beginning of gfc_walk_variable_expr's code.
(gfc_walk_variable_expr): Use gfc_walk_array_ref.
From-SVN: r180144
2011-10-18 14:53:43 +00:00
Mikael Morin
700535b75f
re PR fortran/50420 ([Coarray] lcobound doesn't accept coarray subcomponents)
...
PR fortran/50420
* trans-array.c (gfc_conv_expr_descriptor): Use loop.dimen instead of
ndim for the descriptor's rank.
From-SVN: r180143
2011-10-18 14:45:46 +00:00
Mikael Morin
a04b23d8a4
re PR fortran/50420 ([Coarray] lcobound doesn't accept coarray subcomponents)
...
PR fortran/50420
* trans-array.c (gfc_conv_expr_descriptor): Count codimensions starting
from zero, and add then the relevant offset (either ndim or loop.dimen)
depending on context.
From-SVN: r180142
2011-10-18 14:42:21 +00:00
Mikael Morin
7c5950bd7f
trans-array.c (gfc_conv_expr_descriptor): Save some horizontal space.
...
* trans-array.c (gfc_conv_expr_descriptor): Save some horizontal space.
From-SVN: r180141
2011-10-18 14:37:39 +00:00
Mikael Morin
c2558afc97
trans-array.c (gfc_conv_expr_descriptor): Move ndim initialization earlier.
...
* trans-array.c (gfc_conv_expr_descriptor): Move ndim initialization
earlier.
From-SVN: r180140
2011-10-18 14:32:03 +00:00
Michael Meissner
e79983f458
Convert standard builtin functions from being arrays to using a functional interface
...
From-SVN: r179820
2011-10-11 19:55:09 +00:00
Paul Thomas
30a390c810
re PR fortran/47844 (Array stride ignored for pointer-valued function results)
...
2011-10-08 Paul Thomas <pault@gcc.gnu.org>
PR fortran/47844
* trans-array.c (gfc_conv_array_index_offset): Use descriptor
stride for pointer function results.
2011-10-08 Paul Thomas <pault@gcc.gnu.org>
PR fortran/47844
* gfortran.dg/pointer_function_result_1.f90 : New test.
From-SVN: r179710
2011-10-08 10:18:51 +00:00
Mikael Morin
621babd8d0
trans-array.c (gfc_conv_expr_descriptor): Remove trailing whitespace.
...
* trans-array.c (gfc_conv_expr_descriptor): Remove trailing whitespace.
From-SVN: r179695
2011-10-07 20:56:31 +00:00