1 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
3 * trans.h (struct gfc_ss): New field nested_ss.
4 * trans-expr.c (gfc_advance_se_ss_chain): Update assertion.
6 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
8 * trans-array.c (set_vector_loop_bounds): Loop over the parents.
10 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
12 * trans-array.c (gfc_trans_array_constructor): Loop over the parents.
14 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
16 * trans-array.c (gfc_set_loop_bounds_from_array_spec): Loop over the
19 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
21 * trans.h (struct gfc_ss): New field parent.
22 * trans-array.c (gfc_trans_scalarizing_loops): Skip clearing if a
24 * trans-expr.c (gfc_advance_se_ss_chain): Move to parent ss at the
27 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
29 * trans-array.h (gfc_trans_create_temp_array): Remove loop argument.
30 * trans-array.c (gfc_trans_create_temp_array): Ditto. Get loop from ss.
31 Update reference to loop. Remove loop argument.
32 (gfc_trans_array_constructor, gfc_conv_loop_setup): Update calls to
33 gfc_trans_create_temp_array.
34 * trans-expr.c (gfc_conv_procedure_call): Ditto.
35 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
36 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
37 Set loop before calling gfc_trans_create_temp_array.
39 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
41 * trans-array.c (gfc_trans_create_temp_array): New variable total_dim.
42 Set total_dim to loop's rank. Replace usages of loop's rank.
44 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
46 * trans-array.c (gfc_trans_array_constructor, trans_array_constructor):
47 Rename the former to the later. Get loop from ss.
49 (gfc_add_loop_ss_code): Update call.
51 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
53 * trans-array.c (gfc_set_vector_loop_bounds): Get loop from ss.
55 (gfc_add_loop_ss_code): Update call.
57 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
59 * trans.h (struct gfc_ss): New field loop.
60 * trans-array.c (set_ss_loop): New function.
61 (gfc_add_ss_to_loop): Call set_ss_loop.
63 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
65 * trans.h (struct gfc_ss_info): New field refcount.
66 * trans-array.c (free_ss_info): Decrement refcount. Return early if
68 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss): Increment
71 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
73 * trans-array.c (gfc_trans_create_temp_array): Move invariant condition
74 out of the containing loop.
76 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
78 * trans-array.c (gfc_conv_loop_setup, gfc_trans_create_temp_array):
79 Move specloop arrays clearing from the former to the latter.
81 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
83 * trans-array.c (set_loop_bounds): Separate the beginning of
84 gfc_conv_loop_setup into a function of its own.
85 (set_delta): Separate the end of gfc_conv_loop_setup into a function
87 (gfc_conv_loop_setup): Call set_loop_bounds and set delta.
88 (set_loop_bounds, set_delta, gfc_conv_loop_setup): Make loopspec a
89 pointer to the specloop field from the loop struct.
91 2011-11-03 Tobias Burnus <burnus@net-b.de>
94 * interface.c (gfc_compare_derived_types): Fix check for BIND(C).
96 2011-11-03 Tobias Burnus <burnus@net-b.de>
99 * trans-decl.c (gfc_finish_var_decl): Mark PARAMETER as TREE_READONLY.
101 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
103 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
104 gfc_ss::where into gfc_ss_info.
105 * trans-array.c (gfc_add_loop_ss_code):
106 Update reference chains.
107 * trans-stmt.c (gfc_trans_where_assign, gfc_trans_where_3): Ditto.
109 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
111 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
112 gfc_ss::useflags into gfc_ss_info.
113 * trans-array.c (gfc_mark_ss_chain_used, gfc_trans_preloop_setup,
114 gfc_trans_scalarizing_loops, gfc_trans_scalarized_boundary):
115 Update reference chains.
116 * trans-expr.c (gfc_conv_procedure_call): Ditto.
117 * trans-intrinsic.c (gfc_conv_intrinsic_function): Ditto.
119 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
121 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
122 gfc_ss::data::info into gfc_ss_info::data and remove empty union
124 * trans-array.c (gfc_free_ss, gfc_trans_create_temp_array,
125 gfc_trans_constant_array_constructor, gfc_trans_array_constructor,
126 gfc_set_vector_loop_bounds, gfc_add_loop_ss_code,
127 gfc_conv_ss_descriptor, gfc_trans_array_bound_check,
128 gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
129 add_array_offset, gfc_trans_preloop_setup,
130 gfc_trans_scalarized_boundary, gfc_conv_section_startstride,
131 gfc_conv_ss_startstride, gfc_could_be_alias,
132 gfc_conv_loop_setup, gfc_conv_expr_descriptor,
133 gfc_alloc_allocatable_for_assignment, gfc_walk_array_ref):
134 Update reference chains and factor them where possible.
135 * trans-expr.c (gfc_conv_variable, gfc_conv_subref_array_arg,
136 gfc_conv_procedure_call, gfc_trans_subarray_assign): Updata reference
138 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
139 * trans-io.c (transfer_array_component): Ditto.
140 * trans-stmt.c (gfc_conv_elemental_dependencies,
141 gfc_trans_pointer_assign_need_temp): Ditto.
143 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
145 * trans.h (struct gfc_ss, struct gfc_ss_info): Move member struct
146 gfc_ss::data::temp into gfc_ss_info::data.
147 * trans-array.c (gfc_get_temp_ss, gfc_conv_loop_setup): Update reference
150 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
152 * trans.h (struct gfc_ss, struct gfc_ss_info): Move member struct
153 gfc_ss::data::scalar into newly created union gfc_ss_info::data,
154 and rename subfield expr to value.
155 * trans-array.c (gfc_add_loop_ss_code, gfc_conv_array_index_offset,
156 gfc_conv_expr_descriptor): Update reference chains.
157 * trans-const.c (gfc_conv_constant): Ditto.
158 * trans-expr.c (gfc_conv_expr): Ditto.
160 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
162 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
163 string_length from the former struct to the latter.
165 (gfc_get_temp_ss, gfc_trans_array_constructor, gfc_add_loop_ss_code,
166 gfc_conv_ss_descriptor, gfc_conv_scalarized_array_ref,
167 gfc_conv_resolve_dependencies, gfc_conv_loop_setup,
168 gfc_conv_expr_descriptor): Update references to string_length and
169 factor common reference chains where possible.
170 * trans-const.c (gfc_conv_constant): Ditto.
171 * trans-expr.c (gfc_conv_variable, gfc_conv_subref_array_arg,
172 gfc_conv_expr): Ditto.
174 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
176 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field expr from
177 the former struct to the latter.
179 (gfc_get_array_ss, gfc_get_scalar_ss,
180 gfc_trans_constant_array_constructor, gfc_trans_array_constructor,
181 gfc_add_loop_ss_code, gfc_conv_ss_descriptor,
182 gfc_trans_array_bound_check, gfc_conv_array_index_offset,
183 gfc_conv_scalarized_array_ref, gfc_conv_ss_startstride,
184 gfc_could_be_alias, gfc_conv_resolve_dependencies,
185 gfc_conv_loop_setup, gfc_conv_expr_descriptor,
186 gfc_alloc_allocatable_for_assignment): Update references to expr and
187 factor common reference chains where possible.
188 * trans-const.c (gfc_conv_constant): Ditto.
189 * trans-expr.c (gfc_conv_variable, gfc_conv_procedure_call,
190 gfc_conv_array_constructor_expr, gfc_conv_expr,
191 gfc_conv_expr_reference): Ditto.
192 * trans-intrinsic.c (trans_this_image, gfc_conv_intrinsic_bound,
193 gfc_conv_intrinsic_cobound, gfc_conv_intrinsic_funcall,
194 gfc_add_intrinsic_ss_code): Ditto.
195 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
197 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
199 * trans.h (struct gfc_ss_info): New struct.
200 (gfc_get_ss_info): New macro.
201 (struct gfc_ss): Move type field to struct gfc_ss_info.
202 Add an info field of type gfc_ss_info.
203 * trans-array.c (free_ss_info): New function.
204 (gfc_free_ss): Call free_ss_info.
205 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss):
206 Allocate gfc_ss_info field.
207 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss,
208 gfc_set_vector_loop_bounds, gfc_add_loop_ss_code,
209 gfc_conv_array_index_offset, gfc_trans_preloop_setup,
210 gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
211 gfc_conv_ss_startstride, gfc_conv_resolve_dependencies,
212 gfc_conv_loop_setup, transposed_dims, gfc_conv_expr_descriptor,
213 gfc_walk_elemental_function_args): Update references to type.
214 * trans-const.c (gfc_conv_constant): Factor common reference chains
215 and update reference to type.
216 * trans-expr.c (gfc_conv_procedure_call, gfc_trans_assignment_1):
217 Update reference to type.
218 (gfc_conv_array_constructor_expr, gfc_conv_expr,
219 gfc_conv_expr_reference): Ditto. Factor common reference chains.
220 * trans-intrinsic.c (walk_inline_intrinsic_transpose): Update references
222 * trans-stmt.c (gfc_trans_where_assign): Ditto.
224 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
226 * trans.h (struct gfc_ss, struct gfc_array_info): Move shape field
227 from the former struct to the latter.
228 * trans-array.c (gfc_conv_ss_startstride, gfc_conv_loop_setup):
229 Update field references.
230 * trans-expr.c (gfc_trans_subarray_assign): Update field references
231 and factor common reference chains.
232 * trans-io.c (transfer_array_component): Ditto.
234 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
236 * trans.h (struct gfc_array_info): Move dim and dimen fields...
237 (struct gfc_ss): ... here. Remove gfc_ss::data::temp::dimen field.
238 * trans-array.c (gfc_conv_loop_setup): Remove temp_ss dim array
240 (gfc_get_temp_ss): Initialize dim and dimen.
241 (gfc_free_ss, gfc_get_array_ss, gfc_get_temp_ss,
242 gfc_set_loop_bounds_from_array_spec, get_array_ref_dim,
243 gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
244 gfc_set_vector_loop_bounds, gfc_conv_scalarized_array_ref,
245 gfc_trans_preloop_setup, gfc_conv_ss_startstride,
246 gfc_conv_resolve_dependencies, gfc_conv_loop_setup, transposed_dims,
247 gfc_conv_expr_descriptor, gfc_alloc_allocatable_for_assignment,
248 gfc_walk_array_ref): Update field references.
249 * trans-expr.c (gfc_conv_subref_array_arg, gfc_conv_procedure_call):
251 * trans-intrinsic.c (walk_inline_intrinsic_transpose): Ditto.
252 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
254 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
256 * trans.h (struct gfc_ss_info, struct gfc_array_info):
257 Rename the former to the latter.
258 * trans-array.c (gfc_get_array_ss, gfc_trans_allocate_array_storage,
259 get_array_ref_dim, gfc_trans_create_temp_array,
260 gfc_trans_constant_array_constructor, gfc_set_vector_loop_bounds,
261 gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
262 add_array_offset, gfc_trans_preloop_setup, gfc_conv_section_startstride,
263 gfc_conv_ss_startstride, gfc_conv_loop_setup, transposed_dims,
264 gfc_conv_expr_descriptor): Update all uses.
265 * trans-expr.c (gfc_conv_subref_array_arg, gfc_conv_procedure_call):
267 * trans-intrinsic.c (gfc_conv_intrinsic_transfer,
268 walk_inline_intrinsic_transpose): Ditto.
269 * trans-stmt.c (gfc_conv_elemental_dependencies,
270 gfc_trans_pointer_assign_need_temp): Ditto.
272 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
274 * trans-array.c (dim_ok, transposed_dims): Rename the former to the
275 latter. Change argument type. Invert return value.
276 (gfc_conv_expr_descriptor): Update calls.
278 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
280 * trans-array.c (get_array_ref_dim): Change argument type and name.
281 Obtain previous argument from the new argument in the body.
282 (gfc_trans_create_temp_arry, gfc_conv_loop_setup): Update calls.
284 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
286 * trans-array.c (gfc_set_vector_loop_bounds, set_vector_loop_bounds):
287 Rename the former to the latter. Change type and name of argument.
288 Get previous argument from the new one.
289 (gfc_add_loop_ss_code): Update call.
291 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
293 * trans-array.h (gfc_trans_create_temp_array): Replace info argument
295 * trans-array.c (gfc_trans_create_temp_array): Ditto. Get info from ss.
296 (gfc_trans_array_constructor, gfc_conv_loop_setup): Update call to
297 gfc_trans_create_temp_array.
298 * trans-expr.c (gfc_conv_procedure_call): Ditto.
299 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
300 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
302 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
304 * trans-array.c (gfc_trans_array_bound_check): Use ss argument
307 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
309 * trans-array.c (gfc_trans_array_bound_check,
310 trans_array_bound_check): Rename the former to the latter.
311 Replace descriptor argument with ss argument. Get descriptor from ss.
312 (gfc_conv_array_index_offset, conv_array_index_offset): Rename the
313 former to the latter. Update call to trans_array_bound_check.
314 Replace info argument with ss argument. Get info from ss.
315 (gfc_conv_scalarized_array_ref): Update call to conv_array_index_offset.
316 (add_array_offset): Ditto
318 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
320 * trans-array.c (gfc_trans_constant_array_constructor,
321 trans_constant_array_constructor): Rename the former to the latter.
322 Don't set the rank of the temporary for the loop. Remove then unused
324 (gfc_trans_array_constructor): Update call.
326 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
328 * trans-array.c (gfc_trans_scalarizing_loops): Stop loop before end
329 marker, not after it.
331 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
333 * trans-array.c (gfc_conv_loop_setup): Also skip temporary arrays.
335 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
337 * trans-array.c (gfc_conv_ss_startstride): Access array bounds along
338 array dimensions instead of loop dimensions.
340 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
342 * trans-array.c (gfc_trans_preloop_setup): Assertify one condition.
344 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
346 * trans-array.c (gfc_walk_array_ref): Skip coarray dimensions.
348 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
350 * trans-array.c (get_array_ref_dim): Remove redundant condition.
352 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
354 * trans-array.c (gfc_trans_preloop_setup): Move common code...
355 (add_array_offset): ...into that new function.
357 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
359 * trans-array.c (gfc_trans_preloop_setup): Use loop's dimension instead
360 of array's dimention. Check that it is indeed the same.
362 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
364 * trans-array.c (gfc_trans_preloop_setup): Remove redundant assertion.
365 Special case outermost loop.
367 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
369 * trans-array.c (gfc_trans_preloop_setup): Factor loop index
372 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
374 * trans-array.c (gfc_trans_preloop_setup): Move code earlier.
376 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
378 * trans-array.c (gfc_trans_preloop_setup): Move array reference
379 initialisation earlier. Factor subsequent array references.
381 2011-11-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
383 * Makef-lang.in (gfortranspec.o): Pass SHLIB instead of SHLIB_LINK.
385 2011-10-30 Steven G. Kargl <kargl@gcc.gnu.org>
388 * check.c (gfc_check_dshift): Update argument checking for BOZ.
389 Update checking SHIFT against BITSIZE of I or J.
390 * intrinsic.texi: Update docs for DSHIFTL and DSHIFTR.
392 2011-10-28 Steven G. Kargl <kargl@gcc.gnu.org>
394 * check.c (gfc_check_atan_2): Typo in comment.
395 (gfc_check_nearest): If 's' is constant, check that it is not 0.
396 * simplify.c (simplify_dshift, gfc_simplify_ibclr, gfc_simplify_ibits,
397 gfc_simplify_ibset, simplify_shift, gfc_simplify_ishftc,
398 gfc_simplify_nearest): Remove dead code.
400 2011-10-23 Steven G. Kargl <kargl@gcc.gnu.org>
402 * simplify.c (simplify_transformation_to_array): Fix memory leak.
404 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
407 * check.c (gfc_check_ishftc): Check args are constant before
408 extracting the integer.
410 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
413 * check.c (less_than_bitsize1): Check |shift| <= bit_size(i).
414 (gfc_check_ishftc): Check |shift| <= bit_size(i) and check
415 that size is positive.
417 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
420 * resolve.c (resolve_ref): Check return value of resolve_substring().
422 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
424 * io.c (match_dt_format): Match a user-defined operator or a kind
425 type prefixed string.
427 2011-10-19 Janus Weil <janus@gcc.gnu.org>
430 * check.c (gfc_check_sizeof): Reject procedures as argument of SIZEOF.
431 * intrinsinc.texi (SIZEOF): Document it.
432 (STORAGE_SIZE): Fix special characters. Fix line breaks.
434 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
437 * trans.c (gfc_build_array_ref): If type is not an array, check that
438 there is nothing to do, and do nothing.
440 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
443 * trans-types.c (gfc_build_array_type): Don't force lower bound to one
444 in the deferred case.
446 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
449 * simplify.c (simplify_cobound): Accept non-last-in-ref-chain coarrays.
450 Don't set already set array ref.
452 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
454 * array.c (gfc_find_array_ref): Remove coarray-specific handling.
456 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
459 * check.c (dim_corank_check): Use gfc_get_corank to get corank.
461 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
464 * trans-intrinsic.c (walk_coarray): Change AR_ELEMENT to AR_SECTION.
467 * trans-intrinsic.c (walk_coarray): Use gfc_walk_array_ref for
468 the scalarization chain initialization.
470 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
473 * trans-intrinsic.c (walk_coarray): Allow subreferences after a
474 coarray object reference.
476 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
479 * trans-array.c (gfc_walk_array_ref): Allow zero rank arrays
480 if they are coarrays.
482 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
484 * trans-array.h (gfc_walk_array_ref): New prototype.
485 * trans-array.c (gfc_walk_array_ref): New function, containing
486 all but the beginning of gfc_walk_variable_expr's code.
487 (gfc_walk_variable_expr): Use gfc_walk_array_ref.
489 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
492 * trans-array.c (gfc_conv_expr_descriptor): Use loop.dimen instead of
493 ndim for the descriptor's rank.
495 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
498 * trans-array.c (gfc_conv_expr_descriptor): Count codimensions starting
499 from zero, and add then the relevant offset (either ndim or loop.dimen)
500 depending on context.
502 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
504 * trans-array.c (gfc_conv_expr_descriptor): Save some horizontal space.
506 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
508 * trans-array.c (gfc_conv_expr_descriptor): Move ndim initialization
511 2011-10-18 Janus Weil <janus@gcc.gnu.org>
514 * decl.c (verify_c_interop_param): Renamed to
515 'gfc_verify_c_interop_param'. Add error message for polymorphic
517 (verify_c_interop): Renamed to 'gfc_verify_c_interop'. Reject
518 polymorphic variables.
519 (verify_bind_c_sym): Renamed 'verify_c_interop'.
520 * gfortran.h (verify_c_interop,verify_c_interop_param): Renamed.
521 * check.c (gfc_check_sizeof): Ditto.
522 * resolve.c (gfc_iso_c_func_interface,resolve_fl_procedure): Ditto.
523 * symbol.c (verify_bind_c_derived_type): Ditto.
525 2011-10-15 Tom Tromey <tromey@redhat.com>
526 Dodji Seketeli <dodji@redhat.com>
528 * cpp.c (print_line, cb_define): Adjust to avoid using internals
529 of struct line_map. Use the public API instead.
531 2011-10-17 Janus Weil <janus@gcc.gnu.org>
535 * primary.c (match_kind_param): Avoid segfault.
537 2011-10-16 Thomas Koenig <tkoenig@gcc.gnu.org>
539 * frontend-passes.c (current_ns): Make static.
540 (create_var): Note parent of newly created namespace.
541 (optimize_namespace): Don't wak sibling namespaces
542 if they are EXEC_BLOCK because this is handled...
543 (gfc_code_walker): ... here. Also walk ASSOCIATE lists.
545 2011-10-16 Janus Weil <janus@gcc.gnu.org>
548 * primary.c (match_kind_param): Detect ISO_C_BINDING kinds.
549 (get_kind): Pass on 'is_iso_c' flag.
550 (match_integer_constant,match_real_constant,match_logical_constant):
551 Set 'ts.is_c_interop'.
553 2011-10-16 Janus Weil <janus@gcc.gnu.org>
556 * resolve.c (resolve_formal_arglist): Remove unneeded error message.
559 2011-10-15 Tobias Burnus <burnus@net-b.de>
561 * gfortran.texi (Fortran 2008 status, TS 29113 status,
562 Further Interoperability of Fortran with C): Update implementation
563 status, change references from TR 29113 to TS 29113.
564 * intrinsic.texi (RANK): Change TR 29113 to TS 29113.
565 * invoke.text (-std=): Ditto, change -std=f2008tr to -std=f2008ts.
566 * lang.opt (std=): Ditto.
567 * options.c (gfc_handle_option, set_default_std_flags): Ditto and
568 change GFC_STD_F2008_TR to GFC_STD_F2008_TS.
569 * libgfortran.h: Ditto.
570 * intrinsic.c (add_functions, gfc_check_intrinsic_standard): Ditto.
571 * decl.c (verify_c_interop_param): Ditto.
573 2011-10-14 Janus Weil <janus@gcc.gnu.org>
576 * expr.c (gfc_check_vardef_context): Don't throw an error on
577 non-pointer assignments involving an intent(in) pointer dummy.
579 2011-10-14 Tobias Burnus <burnus@net-b.de>
582 * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
583 for dummy arguments with VALUE attribute.
585 2011-10-11 Tobias Burnus <burnus@net-b.de>
586 Janus Weil <janus@gcc.gnu.org>
588 * invoke.texi (-fwhole-file): Update wording since -fwhole-file
589 is now enabled by default.
591 2011-10-11 Michael Meissner <meissner@linux.vnet.ibm.com>
593 * trans-expr.c (gfc_conv_power_op): Delete old interface with two
594 parallel arrays to hold standard builtin declarations, and replace
595 it with a function based interface that can support creating
596 builtins on the fly in the future. Change all uses, and poison
597 the old names. Make sure 0 is not a legitimate builtin index.
598 (fill_with_spaces): Ditto.
599 (gfc_trans_string_copy): Ditto.
600 (gfc_trans_zero_assign): Ditto.
601 (gfc_build_memcpy_call): Ditto.
602 (alloc_scalar_allocatable_for_assignment): Ditto.
603 * trans-array.c (gfc_trans_array_constructor_value): Ditto.
604 (duplicate_allocatable): Ditto.
605 (gfc_alloc_allocatable_for_assignment): Ditto.
606 * trans-openmp.c (gfc_omp_clause_copy_ctor): Ditto.
607 (gfc_omp_clause_assign_op): Ditto.
608 (gfc_trans_omp_atomic): Ditto.
609 (gfc_trans_omp_do): Ditto.
610 (gfc_trans_omp_task): Ditto.
611 * trans-stmt.c (gfc_trans_stop): Ditto.
612 (gfc_trans_sync): Ditto.
613 (gfc_trans_allocate): Ditto.
614 (gfc_trans_deallocate): Ditto.
615 * trans.c (gfc_call_malloc): Ditto.
616 (gfc_allocate_using_malloc): Ditto.
617 (gfc_call_free): Ditto.
618 (gfc_deallocate_with_status): Ditto.
619 (gfc_deallocate_scalar_with_status): Ditto.
620 * f95-lang.c (gfc_define_builtin): Ditto.
621 (gfc_init_builtin_functions): Ditto.
622 * trans-decl.c (create_main_function): Ditto.
623 * trans-intrinsic.c (builtin_decl_for_precision): Ditto.
625 2011-10-10 Thomas Koenig <tkoenig@gcc.gnu.org>
628 * frontend-passes (forall_level): New variable.
629 (cfe_register_funcs): Don't register functions if we
630 are within a forall loop.
631 (optimize_namespace): Set forall_level to 0 before entry.
632 (gfc_code_walker): Increase/decrease forall_level.
634 2011-10-09 Tobias Burnus <burnus@net-b.de>
637 * trans-common.c (translate_common): Fix -Walign-commons check.
639 2011-10-09 Mikael Morin <mikael.morin@sfr.fr>
641 * interface.c (check_dummy_characteristics): Count dimensions starting
642 from one in diagnostic.
644 2011-10-09 Tobias Burnus <burnus@net-b.de>
646 * Make-lang.in (F95_PARSER_OBJS, GFORTRAN_TRANS_DEPS): Add
647 dependency on iso-c-binding.def and iso-fortran-env.def.
648 * module.c (import_iso_c_binding_module): Add error when
649 explicitly importing a nonstandard symbol; extend standard-
651 * iso-c-binding.def: Add c_float128 and c_float128_complex
652 integer parameters (for -std=gnu).
653 * intrinsic.texi (ISO_C_Binding): Document them.
654 * symbol.c (generate_isocbinding_symbol): Change macros
655 to ignore GFC_STD_* data.
656 * trans-types.c (gfc_init_c_interop_kinds): Ditto; make
657 nonstatic and renamed from "init_c_interop_kinds".
658 (gfc_init_kinds): Don't call it
659 * trans-types.h (gfc_init_c_interop_kinds): Add prototype.
660 * f95-lang.c (gfc_init_decl_processing): Call it.
662 2011-10-09 Janus Weil <janus@gcc.gnu.org>
665 * expr.c (replace_symbol): Only do replacement if the symbol is a dummy.
667 2011-10-08 Paul Thomas <pault@gcc.gnu.org>
670 * trans-array.c (gfc_conv_array_index_offset): Use descriptor
671 stride for pointer function results.
673 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
675 * trans-array.c (gfc_conv_expr_descriptor): Remove trailing whitespace.
677 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
679 * trans-array.c (gfc_conv_ss_startstride): Merge two switch cases.
681 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
683 * trans-array.c (gfc_conv_section_startstride): Remove coarray argument.
684 Remove conditions on coarray.
685 (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.
686 (gfc_conv_expr_descriptor): Ditto. Add assertions before the call.
688 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
690 * trans-array.c (gfc_conv_section_startstride): Remove coarray_last
691 argument. Remove condition on coarray_last.
692 (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.
693 (gfc_conv_expr_descriptor): Ditto.
695 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
697 * trans-array.c (gfc_walk_variable_expr): Remove scalar coarray
698 handling. Don't reset array ref's corank and codimensions' types
699 in the full array ref case. Update loop upper limit.
700 Remove DIMEN_THIS_IMAGE case. Remove unnecessary conditions.
702 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
704 * trans.h (gfc_ss_info): Remove codimen field.
705 * trans-array.c (gfc_get_array_ss): Don't set codimen field.
706 (gfc_trans_create_temp_array): Don't set descriptor's cobounds.
707 (gfc_trans_constant_array_constructor): Update loop upper limit.
708 (gfc_conv_ss_startstride): Don't set codimen field.
709 Don't get descriptor's cobounds.
710 (gfc_walk_variable_expr): Update dimension index.
711 * trans-intrinsic.c (trans_this_image, trans_image_index,
712 conv_intrinsic_cobound): Don't set codimen field
714 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
716 * trans.h (gfc_loopinfo): Remove codimen field.
717 * trans-array.c (gfc_set_vector_loop_bounds,
718 gfc_trans_scalarizing_loops, gfc_conv_loop_setup): Update loop upper
720 (gfc_set_loop_bounds_from_array_spec): Ditto. Remove skip on last
722 (gfc_start_scalarized_body): Update loop lower limit.
723 (gfc_conv_ss_startstride): Don't set loop's codimen field.
724 (gfc_conv_loop_setup): Remove unnecessary condition.
725 (gfc_conv_expr_descriptor): Don't use loop's codimen field as corank.
727 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
729 * trans.h (gfc_ss): Remove data.temp.codimen field.
730 * trans-array.c (gfc_conv_resolve_dependencies,
731 gfc_conv_expr_descriptor): Don't set temp's codimen field.
733 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
735 * resolve.c (resolve_array_ref): Set array_ref's dimen field (and the
736 associated dimen_type) in the full array ref case.
738 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
740 * trans-intrinsic.c (walk_coarray): New function.
741 (convert_element_to_coarray_ref): Move code to walk_coarray. Remove.
742 (trans-this_image, trans_image_index, conv_intrinsic_cobound):
745 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
747 * trans-array.c (gfc_conv_expr_descriptor): Add out-of-the-scalarizer
750 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
752 * trans-array.c (gfc_conv_ss_startstride): Support zero rank loop.
754 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
756 * trans-array.c (gfc_conv_section_startstride): Move code to
757 evaluate_bound. Use evaluate_bound.
758 (evaluate_bound): New function.
760 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
762 * trans-array.c (gfc_conv_section_startstride): Update assertion to
763 also accept coarrays.
765 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
767 * trans-array.c (gfc_conv_section_startstride): Factor common
768 array ref references.
770 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
772 * trans-array.c (gfc_conv_expr_descriptor): Use codim instead of
773 loop.codimen as argument to gfc_get_array_type_bounds.
775 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
777 * trans-array.h (struct gfc_se): New flag want_coarray.
778 * trans-intrinsic.c (trans_this_image, trans_image_index,
779 conv_intrinsic_cobound): Set want_coarray.
780 * trans_array.c (gfc_conv_expr_descriptor): Evaluate codimension
781 earlier and without relying on the scalarizer.
783 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
785 * expr.c (gfc_get_corank): Return 0 if input expression is not a
788 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
790 * trans-array.c (gfc_conv_expr_descriptor): Simplify coarray
791 descriptor setup code.
793 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
795 * resolve.c (compare_spec_to_ref): Move coarray ref initialization
797 (resolve_array_ref): ... here.
799 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
801 * check.c (is_coarray): Remove.
802 (coarray_check): Use gfc_is_coarray.
804 2011-10-07 Janus Weil <janus@gcc.gnu.org>
807 * class.c (gfc_build_class_symbol): Fix whitespace.
808 * module.c (mio_symbol): Set 'class_ok' attribute.
809 * trans-decl.c (gfc_get_symbol_decl): Make sure the backend_decl has
810 been built for class symbols.
812 2011-10-04 Janus Weil <janus@gcc.gnu.org>
815 * interface.c (check_dummy_characteristics): Check the array shape.
817 2011-10-01 Janus Weil <janus@gcc.gnu.org>
820 * interface.c (get_expr_storage_size): Check if 'length' component is
823 2011-09-29 Janus Weil <janus@gcc.gnu.org>
826 * resolve.c (resolve_formal_arglist): Fix pureness check for dummy
830 * symbol.c (check_conflict): Forbid TARGET attribute for statement
833 2011-09-27 Jakub Jelinek <jakub@redhat.com>
835 * trans-types.c (gfc_type_for_size): Return wider type
836 if no suitable narrower type has been found.
837 (gfc_type_for_mode): Return NULL_TREE if gfc_type_for_size
838 returned type doesn't have expected TYPE_MODE.
840 2011-09-26 Janus Weil <janus@gcc.gnu.org>
843 * resolve.c (resolve_common_blocks): Check for EXTERNAL attribute.
846 * interface.c (gfc_compare_interfaces): Bugfix in check for result type.
848 2011-09-22 Janus Weil <janus@gcc.gnu.org>
851 * expr.c (gfc_check_pointer_assign): Check for nonintrinsic elemental
853 * interface.c (gfc_compare_interfaces): Rename 'intent_flag'. Check
854 for PURE and ELEMENTAL attributes.
855 (compare_actual_formal): Remove pureness check here.
857 2011-09-20 Steven G. Kargl <kargl@gcc.gnu.org>
859 * check.c (gfc_check_c_sizeof): Remove redundant word.
861 2011-09-20 Simon Baldwin <simonb@google.com>
863 * module.c (gfc_dump_module): Omit timestamp from output.
865 2011-09-17 Janus Weil <janus@gcc.gnu.org>
868 * symbol.c (gfc_use_derived): Fix coding style.
870 2011-09-15 Janus Weil <janus@gcc.gnu.org>
873 * resolve.c (resolve_transfer): Check if component 'ref' is defined.
876 * symbol.c (gfc_use_derived): Check if argument 'sym' is defined.
878 2011-09-14 Tobias Burnus <burnus@net-b.de>
882 * check.c (gfc_check_null): Allow allocatables as MOLD to NULL.
883 * resolve.c (resolve_transfer): Reject NULL without MOLD.
884 * interface.c (gfc_procedure_use): Reject NULL without MOLD
885 if no explicit interface is known.
886 (gfc_search_interface): Reject NULL without MOLD if it would
889 2011-09-13 Janus Weil <janus@gcc.gnu.org>
892 * symbol.c (check_conflict): Check conflict between GENERIC and RESULT
895 2011-09-11 Thomas Koenig <tkoenig@gcc.gnu.org>
898 * frontend-passes.c (dummy_expr_callback): New function.
899 (convert_do_while): New function.
900 (optimize_namespace): Call code walker to convert do while loops.
902 2011-09-11 Janus Weil <janus@gcc.gnu.org>
906 * interface.c (check_dummy_characteristics): New function to check the
907 characteristics of dummy arguments.
908 (gfc_compare_interfaces,gfc_check_typebound_override): Call it here.
910 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
912 * trans-array.c (gfc_trans_constant_array_constructor): Remove
913 superfluous initialisation of DIM field.
914 (gfc_trans_array_constructor): Assert that DIMEN field is properly set.
915 (gfc_conv_expr_descriptor): Ditto.
916 * trans-expr.c (gfc_conv_procedure_call): Ditto.
918 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
920 * trans-array.h (gfc_get_scalar_ss): New prototype.
921 * trans-array.c (gfc_get_scalar_ss): New function.
922 (gfc_walk_variable_expr, gfc_walk_op_expr,
923 gfc_walk_elemental_function_args): Re-use gfc_get_scalar_ss.
924 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
925 (gfc_trans_assignment_1): Ditto.
926 * trans-stmt.c (compute_inner_temp_size, gfc_trans_where_assign,
927 gfc_trans_where_3): Ditto.
929 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
931 * trans-array.h (gfc_get_temp_ss): New prototype.
932 * trans-array.c (gfc_get_temp_ss): New function.
933 (gfc_conv_resolve_dependencies): Re-use gfc_get_temp_ss.
934 (gfc_conv_expr_descriptor): Ditto.
935 * trans-expr.c (gfc_conv_subref_array_arg): Ditto.
937 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
939 * trans-array.h (gfc_get_array_ss): New prototype.
940 * trans-array.c (gfc_get_array_ss): New function.
941 (gfc_walk_variable_expr, gfc_walk_function_expr,
942 gfc_walk_array_constructor): Re-use gfc_get_array_ss.
943 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
944 * trans-intrinsic.c (gfc_walk_intrinsic_bound,
945 gfc_walk_intrinsic_libfunc): Ditto.
946 * trans-io.c (transfer_array_component): Ditto.
948 2011-09-08 Tobias Burnus <burnus@net-b.de>
951 * decl.c (gfc_match_entry, gfc_match_end): Handle COMP_DO_CONCURRENT.
952 * dump-parse-tree.c (show_code_node): Handle EXEC_DO_CONCURRENT.
953 * gfortran.h (gfc_exec_op): Add EXEC_DO_CONCURRENT.
954 * match.c (gfc_match_critical, match_exit_cycle, gfc_match_stopcode,
955 lock_unlock_statement, sync_statement, gfc_match_allocate,
956 gfc_match_deallocate, gfc_match_return): Add DO CONCURRENT diagnostic.
957 (gfc_match_do): Match DO CONCURRENT.
958 (match_derived_type_spec, match_type_spec, gfc_free_forall_iterator,
959 match_forall_iterator, match_forall_header, match_simple_forall,
960 gfc_match_forall): Move up in the file.
961 * parse.c (check_do_closure, parse_do_block): Handle do concurrent.
962 * parse.h (gfc_compile_state): Add COMP_DO_CONCURRENT.
963 * resolve.c (do_concurrent_flag): New global variable.
964 (resolve_function, pure_subroutine, resolve_branch,
965 gfc_resolve_blocks, resolve_code, resolve_types): Add do concurrent
967 * st.c (gfc_free_statement): Handle EXEC_DO_CONCURRENT.
968 * trans-stmt.c (gfc_trans_do_concurrent): New function.
969 (gfc_trans_forall_1): Handle do concurrent.
970 * trans-stmt.h (gfc_trans_do_concurrent): New function prototype.
971 * trans.c (trans_code): Call it.
972 * frontend-passes.c (gfc_code_walker): Handle EXEC_DO_CONCURRENT.
974 2011-09-07 Janus Weil <janus@gcc.gnu.org>
977 * primary.c (gfc_match_structure_constructor): Handle parsing of
978 procedure pointers components in structure constructors.
979 * resolve.c (resolve_structure_cons): Check interface of procedure
980 pointer components. Changed wording of some error messages.
982 2011-09-04 Janus Weil <janus@gcc.gnu.org>
985 * trans-types.c (gfc_sym_type): Check for proc_name.
987 2011-08-30 Tobias Burnus <burnus@net-b.de>
990 * trans-common.c (build_common_decl): Warn if named common
991 block's size is not everywhere the same.
993 2011-08-30 Steven G. Kargl <kargl@gcc.gnu.org>
996 * trans-stmt.c (gfc_trans_allocate): Evaluate the substring.
998 2011-08-29 Janus Weil <janus@gcc.gnu.org>
1001 * trans-decl.c (gfc_generate_function_code): Nullify polymorphic
1002 allocatable function results.
1004 2011-08-29 Tobias Burnus <burnus@net-b.de>
1006 * trans-decl.c (generate_coarray_sym_init): Use
1007 GFC_CAF_COARRAY_STATIC for static coarrays.
1009 2011-08-28 Dodji Seketeli <dodji@redhat.com>
1011 * scanner.c (load_file): Don't abuse LC_RENAME reason while
1012 (indirectly) calling linemap_add.
1014 2011-08-26 Jakub Jelinek <jakub@redhat.com>
1016 * trans-decl.c (get_proc_pointer_decl): Set DECL_TLS_MODEL
1018 * symbol.c (check_conflict): Allow threadprivate attribute with
1019 FL_PROCEDURE if proc_pointer.
1021 2011-08-25 Mikael Morin <mikael@gcc.gnu.org>
1024 * expr.c (gfc_free_shape): Do nothing if shape is NULL.
1025 (free_expr0): Remove redundant NULL shape check.
1026 * resolve.c (check_host_association): Ditto.
1027 * trans-expr.c (gfc_trans_subarray_assign): Assert that shape is
1029 * trans-io.c (transfer_array_component): Ditto.
1031 2011-08-25 Tobias Burnus <burnus@net-b.de>
1033 * trans-array.c (gfc_conv_descriptor_token): Add assert.
1034 * trans-decl.c (gfc_build_qualified_array,
1035 create_function_arglist): Handle assumed-shape arrays.
1036 * trans-expr.c (gfc_conv_procedure_call): Ditto.
1037 * trans-types.c (gfc_get_array_descriptor_base): Ditto, don't
1038 add "caf_token" to assumed-shape descriptors, new akind argument.
1039 (gfc_get_array_type_bounds): Pass akind.
1040 * trans.h (lang_decl): New elements caf_offset and token.
1041 (GFC_DECL_TOKEN, GFC_DECL_CAF_OFFSET): New macros.
1043 2011-08-25 Tobias Burnus <burnus@net-b.de>
1045 * trans-array.c (structure_alloc_comps): Fix for allocatable
1046 scalar coarray components.
1047 * trans-expr.c (gfc_conv_component_ref): Ditto.
1048 * trans-type.c (gfc_get_derived_type): Ditto.
1050 2011-08-24 Tobias Burnus <burnus@net-b.de>
1053 * expr.c (check_init_expr): Return when an error occured.
1055 2011-08-24 Joseph Myers <joseph@codesourcery.com>
1057 * Make-lang.in (fortran/cpp.o): Remove explicit compilation rule.
1059 2011-08-23 Tobias Burnus <burnus@net-b.de>
1062 * symbol.c (gfc_add_type): Better diagnostic if redefining
1063 use-associated symbol.
1064 * module.c (gfc_use_module): Use module name as locus.
1066 2011-08-22 Gabriel Charette <gchare@google.com>
1068 * cpp.c (gfc_cpp_init): Force BUILTINS_LOCATION for tokens
1069 defined in cpp_define_builtins.
1071 2011-08-22 Mikael Morin <mikael@gcc.gnu.org>
1074 * gfortran.h (gfc_clear_shape, gfc_free_shape): New prototypes.
1075 * expr.c (gfc_clear_shape, gfc_free_shape): New functions.
1076 (free_expr0): Re-use gfc_free_shape.
1077 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
1078 * trans-io.c (transfer_array_component): Ditto.
1079 * resolve.c (check_host_association): Ditto.
1080 (gfc_expr_to_initialize): Don't force the rank value and free the shape
1081 after updating the expression. Recalculate shape and rank.
1082 (resolve_where_shape): Re-use gfc_clear_shape.
1083 * array.c (gfc_array_ref_shape): Ditto.
1085 2011-08-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1088 * expr.c (gfc_check_assign): Check for type conversions when the
1089 right-hand side is a constant REAL/COMPLEX contstant the left-hand
1090 side is also REAL/COMPLEX. Don't warn when a narrowing conversion
1091 for REAL does not change the value of the constant.
1093 2011-08-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1096 * resolve.c (resolve_array_ref): Don't calculate upper bound
1097 if the stride is zero.
1099 2011-08-20 Janus Weil <janus@gcc.gnu.org>
1102 * dependency.c (gfc_dep_compare_expr): Add new result value "-3".
1103 (gfc_check_element_vs_section,gfc_check_element_vs_element): Handle
1105 * frontend-passes.c (optimize_comparison): Ditto.
1106 * interface.c (gfc_check_typebound_override): Ditto.
1108 2011-08-19 Mikael Morin <mikael.morin@sfr.fr>
1111 * parse.c (parse_where): Undo changes after emitting an error.
1113 2011-08-19 Jakub Jelinek <jakub@redhat.com>
1116 * trans-expr.c (gfc_trans_assignment_1): Set OMPWS_SCALARIZER_WS
1117 bit in ompws_flags only if loop.temp_ss is NULL, and clear it if
1118 lhs needs reallocation.
1119 * trans-openmp.c (gfc_trans_omp_workshare): Don't return early if
1120 code is NULL, emit a barrier if workshare emitted no code at all
1121 and NOWAIT clause isn't present.
1123 2011-08-19 Mikael Morin <mikael.morin@sfr.fr>
1126 * gfortran.h (gfc_exec_op): New constant EXEC_END_NESTED_BLOCK.
1127 * parse.c (check_statement_label): Accept ST_END_BLOCK and
1128 ST_END_ASSOCIATE as valid branch target.
1129 (accept_statement): Change EXEC_END_BLOCK to EXEC_END_NESTED_BLOCK.
1130 Add EXEC_END_BLOCK code in the ST_END_BLOCK and ST_END_ASSOCIATE cases.
1131 * resolve.c (find_reachable_labels): Change EXEC_END_BLOCK to
1132 EXEC_END_NESTED_BLOCK.
1133 (resolve_branch): Ditto.
1134 (resolve_code): Add EXEC_END_NESTED_BLOCK case.
1135 * st.c (gfc_free_statement): Ditto.
1136 * trans.c (trans_code): Ditto.
1138 2011-08-18 Mikael Morin <mikael.morin@sfr.fr>
1141 * symbol.c (gfc_get_st_label): Use the derived type namespace when
1142 we are parsing a derived type definition.
1144 2011-08-18 Tobias Burnus <burnus@net-b.de>
1147 * parse.c (parse_derived): Add lock_type
1148 checks, improve coarray_comp handling.
1149 * resolve.c (resolve_allocate_expr,
1150 resolve_lock_unlock, resolve_symbol): Fix lock_type
1153 2011-08-17 Tobias Burnus <burnus@net-b.de>
1156 * trans-decl.c (generate_local_decl): Warn about
1157 unused explicitly imported module variables/parameters.
1159 2011-08-17 Janus Weil <janus@gcc.gnu.org>
1162 * resolve.c (resolve_fl_variable): Reject non-constant character lengths
1163 in COMMON variables.
1165 2011-08-16 Tobias Burnus <burnus@net-b.de>
1166 Dominique Dhumieres <dominiq@lps.ens.fr>
1169 * resolve.c (resolve_symbol): Fix stupid typo.
1171 2011-08-15 Tobias Burnus <burnus@net-b.de>
1173 * resolve.c (resolve_symbol): Fix coarray result-var check.
1175 2011-08-14 Steven G. Kargl <kargl@gcc.gnu.org>
1177 * module.c (use_iso_fortran_env_module): Spell 'referrenced' correctly.
1179 2011-08-14 Janus Weil <janus@gcc.gnu.org>
1182 * decl.c (check_function_name): New function, separated off from
1183 'variable_decl' and slightly extended.
1184 (variable_decl,attr_decl1): Call it.
1186 2011-08-08 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
1188 * Make-lang.in (gfortran$(exeext)): Add $(EXTRA_GCC_LIBS).
1190 2011-08-07 Janus Weil <janus@gcc.gnu.org>
1191 Thomas Koenig <tkoenig@gcc.gnu.org>
1194 * dependency.c (are_identical_variables): For dummy arguments only
1195 check for equal names, not equal symbols.
1196 * interface.c (gfc_check_typebound_override): Add checking for rank
1197 and character length.
1199 2011-08-07 Janus Weil <janus@gcc.gnu.org>
1202 * dependency.h (gfc_is_same_range,gfc_are_identical_variables): Remove
1204 * dependency.c (gfc_are_identical_variables,are_identical_variables):
1205 Renamed the former to the latter and made static.
1206 (gfc_dep_compare_expr): Renamed 'gfc_are_identical_variables', handle
1207 commutativity of multiplication.
1208 (gfc_is_same_range,is_same_range): Renamed the former to the latter,
1209 made static and removed argument 'def'.
1210 (check_section_vs_section): Renamed 'gfc_is_same_range'.
1211 * gfortran.h (gfc_check_typebound_override): New prototype.
1212 * interface.c (gfc_check_typebound_override): Moved here from ...
1213 * resolve.c (check_typebound_override): ... here (and renamed).
1214 (resolve_typebound_procedure): Renamed 'check_typebound_override'.
1216 2011-08-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1219 * target-memory.c (gfc_target_expr-size): Don't clobber typespec
1221 * simplify.c (gfc_simplify_transfer): Don't calculate source_size
1224 2011-08-05 Thomas Koenig <tkoenig@gcc.gnu.org>
1227 * gfortran.h (gfc_calculate_transfer_sizes): Add prototype.
1228 * target-memory.h (gfc_target_interpret_expr): Add boolean
1229 argument wether to convert wide characters.
1230 * target-memory.c (gfc_target_expr_size): Also return length
1231 of characters for non-constant expressions if these can be
1232 determined from the cl.
1233 (interpret_array): Add argument for gfc_target_interpret_expr.
1234 (gfc_interpret_derived): Likewise.
1235 (gfc_target_interpret_expr): Likewise.
1236 * check.c: Include target-memory.h.
1237 (gfc_calculate_transfer_sizes): New function.
1238 (gfc_check_transfer): When -Wsurprising is in force, calculate
1239 sizes and warn if result is larger than size (check moved from
1240 gfc_simplify_transfer).
1241 * simplify.c (gfc_simplify_transfer): Use
1242 gfc_calculate_transfer_sizes. Remove warning.
1244 2011-08-04 Richard Guenther <rguenther@suse.de>
1247 * trans-array.c (add_to_offset): New function.
1248 (gfc_conv_array_ref): Build the array index expression in optimally
1250 (gfc_walk_variable_expr): Adjust for the backward walk.
1252 2011-08-02 Daniel Kraft <d@domob.eu>
1255 * trans-array.c (gfc_trans_auto_array_allocation): Change
1256 gfc_start_block to gfc_init_block to avoid spurious extra-scope.
1258 2011-08-02 Tobias Burnus <burnus@net-b.de>
1260 * trans-array.c (gfc_array_allocate): Pass token to
1261 gfc_allocate_allocatable for -fcoarray=lib.
1262 * trans-stmt.c (gfc_trans_allocate): Update
1263 gfc_allocate_allocatable call.
1264 * trans.h (gfc_allocate_allocatable): Update prototype.
1265 (gfc_allocate_using_lib): Remove.
1266 * trans.c (gfc_allocate_using_lib): Make static, handle token.
1267 (gfc_allocate_allocatable): Ditto.
1269 2011-08-02 Jakub Jelinek <jakub@redhat.com>
1272 * cpp.c (cpp_define_builtins): Change _OPENMP to 201107.
1273 * openmp.c (gfc_free_omp_clauses): Free also final_expr.
1274 (OMP_CLAUSE_FINAL, OMP_CLAUSE_MERGEABLE): Define.
1275 (gfc_match_omp_clauses): Handle parsing final and mergeable
1277 (OMP_TASK_CLAUSES): Allow final and mergeable clauses.
1278 (gfc_match_omp_taskyield): New function.
1279 (resolve_omp_clauses): Resolve final clause. Allow POINTERs and
1280 Cray pointers in clauses other than REDUCTION.
1281 (gfc_match_omp_atomic): Match optional
1282 read/write/update/capture keywords after !$omp atomic.
1283 (resolve_omp_atomic): Handle all OpenMP 3.1 atomic forms.
1284 * dump-parse-tree.c (show_omp_node): Handle EXEC_OMP_TASKYIELD,
1285 print final and mergeable clauses.
1286 (show_code_node): Handle EXEC_OMP_TASKYIELD.
1287 * trans-openmp.c (gfc_trans_omp_clauses): Handle final and
1289 (gfc_trans_omp_taskyield): New function.
1290 (gfc_trans_omp_directive): Handle EXEC_OMP_TASKYIELD.
1291 (gfc_trans_omp_atomic): Handle all OpenMP 3.1 atomic forms.
1292 (gfc_omp_clause_copy_ctor): Handle non-allocated allocatable.
1293 (gfc_omp_predetermined_sharing): Adjust comment.
1294 * gfortran.h (gfc_statement): Add ST_OMP_TASKYIELD and
1296 (gfc_omp_clauses): Add final_expr and mergeable fields.
1297 (gfc_exec_op): Add EXEC_OMP_TASKYIELD.
1298 (gfc_omp_atomic_op): New enum typedef.
1299 (struct gfc_code): Add ext.omp_atomic.
1300 * trans.c (trans_code): Handle EXEC_OMP_TASKYIELD.
1301 * frontend-passes.c (gfc_code_walker): Also walk final_expr.
1302 * resolve.c (gfc_resolve_blocks, resolve_code): Handle
1304 * st.c (gfc_free_statement): Likewise.
1305 * match.h (gfc_match_omp_taskyield): New prototype.
1306 * parse.c (decode_omp_directive): Handle taskyield directive.
1307 Handle !$omp end atomic.
1308 (case_executable): Add ST_OMP_TASKYIELD case.
1309 (gfc_ascii_statement): Handle ST_OMP_TASKYIELD.
1310 (parse_omp_atomic): Return gfc_statement instead of void.
1311 For !$omp atomic capture parse two assignments instead of
1312 just one and require !$omp end atomic afterwards, for
1313 other !$omp atomic forms just allow !$omp end atomic at the
1315 (parse_omp_structured_block, parse_executable): Adjust
1316 parse_omp_atomic callers.
1318 2011-08-02 Tobias Burnus <burnus@net-b.de>
1320 * intrinsic.c (OMP_LIB): Updated openmp_version's
1322 * gfortran.texi (OpenMP): Update ref to OpenMP 3.1.
1323 * intrinsic.texi (OpenMP Modules): Update ref to OpenMP 3.1;
1324 remove deleted omp_integer_kind and omp_logical_kind constants.
1326 2011-07-31 Janus Weil <janus@gcc.gnu.org>
1329 * resolve.c (resolve_structure_cons): Don't do the full dt resolution,
1330 only call 'resolve_fl_derived0'.
1331 (resolve_typebound_procedures): Resolve typebound procedures of
1333 (resolve_fl_derived0): New function, which does a part of the work
1334 for 'resolve_fl_derived'.
1335 (resolve_fl_derived): Call 'resolve_fl_derived0' and do some additional
1338 2011-07-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1341 * expr.c (gfc_simplify_expr): If end of a string is less
1342 than zero, set it to zero.
1344 2011-07-28 Jakub Jelinek <jakub@redhat.com>
1347 * frontend-passes.c (optimize_minmaxloc): New function.
1348 (optimize_expr): Call it.
1350 2011-07-27 Tobias Burnus <burnus@net-b.de>
1353 * trans-types.c (gfc_get_derived_type): Ensure that pointer
1354 component types are marked as nonrestricted.
1356 2011-07-27 Daniel Carrera <dcarrera@gmail.com>
1359 * trans.c (gfc_allocate_using_malloc): Change function signature.
1360 Return nothing. New parameter "pointer". Eliminate temorary variables.
1361 (gfc_allocate_using_lib): Ditto.
1362 (gfc_allocate_allocatable): Ditto. Update call to gfc_allocate_using_lib
1363 and gfc_allocate_using_malloc. Do not free and then reallocate a
1364 variable that is already allocated.
1365 (gfc_likely): New function. Basedon gfc_unlikely.
1366 * trans-array.c (gfc_array_init_size): New parameter "descriptor_block".
1367 Instructions to modify the array descriptor are stored in this block
1368 while other instructions continue to be stored in "pblock".
1369 (gfc_array_allocate): Update call to gfc_array_init_size. Move the
1370 descriptor_block so that the array descriptor is only updated if
1371 the array was allocated successfully.
1372 Update calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
1373 * trans.h (gfc_allocate_allocatable): Change function signature.
1374 Function now returns void.
1375 (gfc_allocate_using_lib): Ditto, and new function parameter.
1376 (gfc_allocate_using_malloc): Ditto.
1377 * trans-openmp.c (gfc_omp_clause_default_ctor,
1378 gfc_omp_clause_copy_ctor,gfc_trans_omp_array_reduction): Replace a call
1379 to gfc_allocate_allocatable with gfc_allocate_using_malloc.
1380 * trans-stmt.c (gfc_trans_allocate): Update function calls for
1381 gfc_allocate_allocatable and gfc_allocate_using_malloc.
1383 2011-07-26 Tobias Burnus <burnus@net-b.de>
1385 * trans-array.c (CAF_TOKEN_FIELD): New macro constant.
1386 (gfc_conv_descriptor_token): New function.
1387 * trans-array.h (gfc_conv_descriptor_token): New prototype.
1388 * trans-types.c (gfc_get_array_descriptor_base): For coarrays
1389 with -fcoarray=lib, append "void *token" to the array descriptor.
1390 (gfc_array_descriptor_base_caf): New static variable.
1391 * trans-expr.c (gfc_conv_procedure_call): Handle token and offset
1392 when passing a descriptor coarray to a nondescriptor dummy.
1394 2011-07-23 Tobias Burnus <burnus@net-b.de>
1396 * resolve.c (resolve_symbol): Fix coarray var decl check.
1398 2011-07-21 Daniel Carrera <dcarrera@gmail.com>
1400 * trans.c (gfc_allocate_with_status): Split into two functions
1401 gfc_allocate_using_malloc and gfc_allocate_usig_lib.
1402 (gfc_allocate_using_malloc): The status parameter is now the
1403 actual status rather than a pointer. Code cleanup.
1404 (gfc_allocate_using_lib): Ditto. Add new parametrs errmsg and
1405 errlen. Pass these to the coarray lib.
1406 * trans-openmp.c (gfc_omp_clause_default_ctor): Update calls to
1407 gfc_allocate_allocatable.
1408 (gfc_omp_clause_copy_ctor): Ditto.
1409 (gfc_trans_omp_array_reduction): Ditto.
1410 * trans-stmt.c (gfc_trans_allocate): Ditto. Update call to
1411 gfc_allocate_using_malloc. Pass stat rather than pstat to the allocate
1412 fuctions. If using coarray lib, pass errmsg and errlen to the allocate
1413 functions. Move error checking outside the if (!gfc_array_allocate)
1414 block so that it also affects trees produced by gfc_array_allocate.
1415 * trans-array.c (gfc_array_allocate): Add new parameters errmsg
1416 and errlen. Replace parameter pstat by status. Code cleanup. Update
1417 calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
1418 * trans-array.h (gfc_array_allocate): Update signature of
1421 2011-07-21 Steven G. Kargl <kargl@gcc.gnu.org>
1423 * gfortran.texi: Remove a duplicate word.
1425 2011-07-21 Tobias Burnus <burnus@net-b.de>
1427 * check.c (gfc_check_present): Allow coarrays.
1428 * trans-array.c (gfc_conv_array_ref): Avoid casting
1429 when a pointer is wanted.
1430 * trans-decl.c (create_function_arglist): For -fcoarray=lib,
1431 handle hidden token and offset arguments for nondescriptor
1433 * trans-expr.c (get_tree_for_caf_expr): New function.
1434 (gfc_conv_procedure_call): For -fcoarray=lib pass the
1435 token and offset for nondescriptor coarray dummies.
1436 * trans.h (lang_type): Add caf_offset tree.
1437 (GFC_TYPE_ARRAY_CAF_OFFSET): New macro.
1439 2011-07-19 Tobias Burnus <burnus@net-b.de>
1441 * expr.c (gfc_is_coarray): New function.
1442 * gfortran.h (gfc_is_coarray): New prototype.
1443 * interface.c (compare_parameter): Use it.
1445 2011-07-19 Richard Guenther <rguenther@suse.de>
1447 * trans-expr.c (fill_with_spaces): Use fold_build_pointer_plus.
1448 (gfc_trans_string_copy): Likewise.
1449 * trans-intrinsic.c (gfc_conv_intrinsic_repeat): Likewise.
1450 * trans-types.c (gfc_get_array_descr_info): Likewise.
1451 * trans.c (gfc_build_array_ref): Likewise.
1453 2011-07-19 Janus Weil <janus@gcc.gnu.org>
1456 * resolve.c (resolve_allocate_expr): Fix diagnostics for pointers.
1458 2011-07-18 Tobias Burnus <burnus@net-b.de>
1460 * trans-decl.c (gfc_build_qualified_array): Make coarray's
1461 token TYPE_QUAL_RESTRICT.
1463 2011-07-18 Tobias Burnus <burnus@net-b.de>
1465 * resolve.c (resolve_transfer): Mention defined I/O
1466 in the diagnostic for alloc_comp/pointer_comp.
1468 2011-07-17 Tobias Burnus <burnus@net-b.de>
1471 * module.c (check_for_ambiguous): Check whether the name is matches
1472 the current program unit.
1474 2011-07-17 Tobias Burnus <burnus@net-b.de>
1477 * expr.c (gfc_check_pointer_assign): Fix checking for invalid
1480 2011-07-16 Tobias Burnus <burnus@net-b.de>
1482 * expr.c (gfc_ref_this_image): New function.
1483 (gfc_is_coindexed): Use it.
1484 * gfortran.h (gfc_ref_this_image): New prototype.
1485 * resolve.c (resolve_deallocate_expr,
1486 resolve_allocate_expr): Support alloc scalar coarrays.
1487 * trans-array.c (gfc_conv_array_ref, gfc_array_init_size,
1488 gfc_conv_descriptor_cosize, gfc_array_allocate,
1489 gfc_trans_deferred_array): Ditto.
1490 * trans-expr.c (gfc_conv_variable) Ditto.:
1491 * trans-stmt.c (gfc_trans_deallocate): Ditto.
1492 * trans-types.c (gfc_get_element_type, gfc_get_array_type_bounds
1493 gfc_get_array_descr_info): Ditto.
1494 * trans-decl.c (gfc_get_symbol_decl): Ditto.
1496 2011-07-11 Jakub Jelinek <jakub@redhat.com>
1499 * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Initialize
1500 inner_size to gfc_index_one_node instead of integer_one_node.
1502 2011-07-10 Tobias Burnus <burnus@net-b.de>
1505 * intrinsic.c (add_functions): Use BT_VOID for 2nd argument of SIGNAL.
1507 2011-07-09 Uros Bizjak <ubizjak@gmail.com>
1510 * expr.c (gfc_get_corank): Change return value to int.
1511 * gfortran.h (gfc_get_corank): Update function prototype.
1513 2011-07-07 Mikael Morin <mikael.morin@sfr.fr>
1516 * resolve.c (resolve_symbol): Force resolution of function result's
1517 array specification.
1519 2011-07-07 Tobias Burnus <burnus@net-b.de>
1521 * trans.c (gfc_allocate_with_status): Call _gfortran_caf_register
1522 with NULL arguments for (new) stat=/errmsg= arguments.
1524 2011-07-06 Daniel Carrera <dcarrera@gmail.com>
1526 * trans-array.c (gfc_array_allocate): Rename allocatable_array to
1527 allocatable. Rename function gfc_allocate_array_with_status to
1528 gfc_allocate_allocatable_with_status. Update function call for
1529 gfc_allocate_with_status.
1530 * trans-opemp.c (gfc_omp_clause_default_ctor): Rename function
1531 gfc_allocate_array_with_status to gfc_allocate_allocatable_with_status.
1532 * trans-stmt.c (gfc_trans_allocate): Update function call for
1533 gfc_allocate_with_status. Rename function gfc_allocate_array_with_status
1534 to gfc_allocate_allocatable_with_status.
1535 * trans.c (gfc_call_malloc): Add new parameter gfc_allocate_with_status
1536 so it uses the library for memory allocation when -fcoarray=lib.
1537 (gfc_allocate_allocatable_with_status): Renamed from
1538 gfc_allocate_array_with_status.
1539 (gfc_allocate_allocatable_with_status): Update function call for
1540 gfc_allocate_with_status.
1541 * trans.h (gfc_coarray_type): New enum.
1542 (gfc_allocate_with_status): Update prototype.
1543 (gfc_allocate_allocatable_with_status): Renamed from
1544 gfc_allocate_array_with_status.
1545 * trans-decl.c (generate_coarray_sym_init): Use the new constant
1546 GFC_CAF_COARRAY_ALLOC in the call to gfor_fndecl_caf_register.
1548 2011-07-06 Richard Guenther <rguenther@suse.de>
1550 * f95-lang.c (gfc_init_decl_processing):
1551 Merge calls to build_common_tree_nodes and build_common_tree_nodes_2.
1553 2011-07-04 Jakub Jelinek <jakub@redhat.com>
1556 * gfortranspec.c (lang_specific_driver): Ignore options with
1557 CL_ERR_MISSING_ARG errors.
1559 2011-07-02 Janus Weil <janus@gcc.gnu.org>
1562 * expr.c (gfc_check_vardef_context): Handle type-bound procedures.
1564 2011-06-30 Jakub Jelinek <jakub@redhat.com>
1567 * gfortran.h (gfc_constructor): Add repeat field.
1568 * trans-array.c (gfc_conv_array_initializer): Handle repeat > 1.
1569 * array.c (current_expand): Add repeat field.
1570 (expand_constructor): Copy repeat.
1571 * constructor.c (node_free, node_copy, gfc_constructor_get,
1572 gfc_constructor_lookup): Handle repeat field.
1573 (gfc_constructor_lookup_next, gfc_constructor_remove): New functions.
1574 * data.h (gfc_assign_data_value): Add mpz_t * argument.
1575 (gfc_assign_data_value_range): Removed.
1576 * constructor.h (gfc_constructor_advance): Removed.
1577 (gfc_constructor_lookup_next, gfc_constructor_remove): New prototypes.
1578 * data.c (gfc_assign_data_value): Add REPEAT argument, handle it and
1579 also handle overwriting a range with a single entry.
1580 (gfc_assign_data_value_range): Removed.
1581 * resolve.c (check_data_variable): Adjust gfc_assign_data_value
1582 call. Use gfc_assign_data_value instead of
1583 gfc_assign_data_value_expr.
1585 2011-06-27 Janus Weil <janus@gcc.gnu.org>
1588 * trans-array.c (structure_alloc_comps): Make sure sub-components
1589 and extended types are correctly deallocated.
1591 2011-06-21 Andrew MacLeod <amacleod@redhat.com>
1593 * trans-openmp.c: Add sync_ or SYNC__ to builtin names.
1594 * trans-stmt.c: Add sync_ or SYNC__ to builtin names.
1595 * trans-decl.c: Add sync_ or SYNC__ to builtin names.
1597 2011-06-21 Janus Weil <janus@gcc.gnu.org>
1600 * class.c (gfc_find_derived_vtab): Make vtab and default initialization
1601 symbols SAVE_IMPLICIT.
1603 2011-06-20 Tobias Burnus <burnus@net-b.de>
1606 * gfortran.h (gfc_check_vardef_context): Update prototype.
1607 (iso_fortran_env_symbol): Handle derived types.
1608 (symbol_attribute): Add lock_comp.
1609 * expr.c (gfc_check_vardef_context): Add LOCK_TYPE check.
1610 * interface.c (compare_parameter, gfc_procedure_use): Handle
1612 (compare_actual_formal): Update
1613 gfc_check_vardef_context call.
1614 * check.c (gfc_check_atomic_def, gfc_check_atomic_ref): Ditto.
1615 * intrinsic.c (check_arglist): Ditto.
1616 * io.c (resolve_tag, gfc_resolve_dt, gfc_resolve_inquire): Ditto.
1617 * iso-fortran-env.def (ISOFORTRAN_LOCK_TYPE): Add.
1618 * intrinsic.texi (ISO_FORTRAN_ENV): Document LOCK_TYPE.
1619 * module.c (mio_symbol_attribute): Handle lock_comp.
1620 (create_derived_type): New function.
1621 (use_iso_fortran_env_module): Call it to handle LOCK_TYPE.
1622 * parse.c (parse_derived): Add constraint check for LOCK_TYPE.
1623 * resolve.c (resolve_symbol, resolve_lock_unlock): Add constraint
1624 checks for LOCK_TYPE.
1625 (gfc_resolve_iterator, resolve_deallocate_expr,
1626 resolve_allocate_expr, resolve_code, resolve_transfer): Update
1627 gfc_check_vardef_context call.
1628 * trans-stmt.h (gfc_trans_lock_unlock): New prototype.
1629 * trans-stmt.c (gfc_trans_lock_unlock): New function.
1630 * trans.c (trans_code): Handle LOCK and UNLOCK.
1632 2011-06-18 Janus Weil <janus@gcc.gnu.org>
1635 * decl.c (gfc_match_procedure): Allow PROCEDURE declarations inside
1638 2011-06-17 Janus Weil <janus@gcc.gnu.org>
1641 * check.c (gfc_check_move_alloc): If 'TO' argument is polymorphic,
1642 make sure the vtab is present.
1644 2011-06-16 Janus Weil <janus@gcc.gnu.org>
1647 * interface.c (gfc_extend_assign): Propagate the locus from the
1648 assignment to the type-bound procedure call.
1650 2011-06-16 Janus Weil <janus@gcc.gnu.org>
1653 * module.c (mio_component): Make sure the 'class_ok' attribute is set
1654 for use-associated CLASS components.
1655 * parse.c (parse_derived): Check for 'class_ok' attribute.
1656 * resolve.c (resolve_fl_derived): Ditto.
1658 2011-06-13 Thomas Koenig <tkoenig@gcc.gnu.org>
1660 * frontend-passes.c (remove_trim): New function.
1661 (optimize_assignment): Use it.
1662 (optimize_comparison): Likewise. Return correct status
1663 for previous change.
1665 2011-06-12 Tobias Burnus
1668 * trans-expr.c (gfc_trans_assignment_1): Tell
1669 gfc_trans_scalar_assign to also deep-copy RHS nonvariables
1670 with allocatable components.
1671 * trans-array.c (gfc_conv_expr_descriptor): Ditto.
1673 2011-05-11 Thomas Koenig <tkoenig@gcc.gnu.org>
1675 * frontend-passes.c (optimize_assignment): Follow chains
1676 of concatenation operators to the end for removing trailing
1677 TRIMS for assignments.
1679 2011-06-10 Daniel Carrera <dcarrera@gmail.com>
1681 * trans-decl.c (gfc_build_builtin_function_decls):
1682 Updated declaration of caf_sync_all and caf_sync_images.
1683 * trans-stmt.c (gfc_trans_sync): Function
1684 can now handle a "stat" variable that has an integer type
1685 different from integer_type_node.
1687 2011-06-09 Richard Guenther <rguenther@suse.de>
1689 * trans.c (gfc_allocate_array_with_status): Mark error path
1692 2011-06-08 Tobias Burnus <burnus@net-b.de>
1695 * gfortran.h (gfc_statement): Add ST_LOCK and ST_UNLOCK.
1696 (gfc_exec_op): Add EXEC_LOCK and EXEC_UNLOCK.
1697 (gfc_code): Add expr4.
1698 * match.h (gfc_match_lock, gfc_match_unlock): New prototypes.
1699 * match.c (gfc_match_lock, gfc_match_unlock,
1700 lock_unlock_statement): New functions.
1701 (sync_statement): Bug fix, avoiding double freeing.
1702 (gfc_match_if): Handle LOCK/UNLOCK statement.
1703 * parse.c (decode_statement, next_statement,
1704 gfc_ascii_statement): Ditto.
1705 * st.c (gfc_free_statement): Handle LOCK and UNLOCK.
1706 * resolve.c (resolve_lock_unlock): New function.
1707 (resolve_code): Call it.
1708 * dump-parse-tree.c (show_code_node): Handle LOCK/UNLOCK.
1710 2011-06-07 Richard Guenther <rguenther@suse.de>
1712 * f95-lang.c (gfc_init_decl_processing): Do not set
1713 size_type_node or call set_sizetype.
1715 2011-06-05 Tobias Burnus <burnus@net-b.de>
1718 * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
1721 2011-06-05 Andreas Schmidt <andreas.schmidt.42@gmx.net>
1722 Thomas Koenig <tkoenig@gcc.gnu.org>
1724 * dump-parse-tree.c (show_symbol): Don't dump namespace
1725 for ENTRY to avoid infinite recursion.
1727 2011-06-02 Asher Langton <langton2@llnl.gov>
1730 * trans-decl.c (gfc_trans_deferred_vars): Treat assumed-size Cray
1731 pointees as AS_EXPLICIT.
1733 2011-06-02 Asher Langton <langton2@llnl.gov>
1736 * decl.c (variable_decl): Merge current_as before copying to cp_as.
1738 2011-06-02 Steven G. Kargl <kargl@gcc.gnu.org>
1741 * decl.c (gfc_match_modproc): Allow for a double colon in a module
1742 procedure statement.
1743 * parse.c ( decode_statement): Deal with whitespace around :: in
1746 2011-05-31 Tobias Burnus <burnus@net-b.de>
1749 * intrinsic.c (klass): Add CLASS_ATOMIC.
1750 (add_subroutines): Add atomic_ref/atomic_define.
1751 * intrinsic.texi (ATOMIC_REF, ATOMIC_DEFINE): Document.
1752 * intrinsic.h (gfc_check_atomic_def, gfc_check_atomic_ref,
1753 gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New prototypes.
1754 * gfortran.h (gfc_isym_id): Add GFC_ISYM_ATOMIC_DEF
1755 and GFC_ISYM_ATOMIC_REF.
1756 (gfc_atomic_int_kind, gfc_atomic_logical_kind): New global vars.
1757 * iresolve.c (gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New
1759 * check.c (gfc_check_atomic, gfc_check_atomic_def,
1760 gfc_check_atomic_ref): New functions.
1761 * iso-fortran-env.def (ISOFORTRANENV_FILE_ATOMIC_INT_KIND,
1762 ISOFORTRANENV_FILE_ATOMIC_LOGICAL_KIND): Change kind value.
1763 * trans-intrinsic.c (conv_intrinsic_atomic_def,
1764 conv_intrinsic_atomic_ref, gfc_conv_intrinsic_subroutine): New
1766 (conv_intrinsic_move_alloc) Renamed from
1767 gfc_conv_intrinsic_move_alloc - and made static.
1768 * trans.h (gfc_conv_intrinsic_move_alloc): Remove.
1769 (gfc_conv_intrinsic_subroutine) Add prototype.
1770 * trans.c (trans_code): Call gfc_conv_intrinsic_subroutine.
1771 * trans-types (gfc_atomic_int_kind, gfc_atomic_logical_kind): New
1773 (gfc_init_kinds): Set them.
1775 2011-05-31 Tobias Burnus <burnus@net-b.de>
1778 * trans-array.c (gfc_trans_dummy_array_bias): Handle
1779 cobounds of assumed-shape arrays.
1781 2011-05-31 Tobias Burnus <burnus@net-b.de>
1784 * resolve.c (resolve_fl_variable): Handle static coarrays
1785 with non-constant cobounds.
1787 2011-05-29 Janus Weil <janus@gcc.gnu.org>
1790 * module.c (mio_component_ref): Handle components of extended types.
1791 * symbol.c (gfc_find_component): Return is sym is NULL.
1793 2011-05-29 Tobias Burnus <burnus@net-b.de>
1796 * interface.c (compare_parameter): Add check for passing coarray
1797 to allocatable noncoarray dummy.
1799 2011-05-29 Tobias Burnus <burnus@net-b.de>
1800 Richard Guenther <rguenther@suse.de>
1803 * trans-types.c (gfc_get_nodesc_array_type): Don't mess with
1804 the type's TREE_TYPE.
1805 * trans-array.c (gfc_conv_array_ref): Use TYPE_MAIN_VARIANT.
1806 * trans.c (gfc_build_array_ref): Ditto.
1808 2011-05-27 Tobias Burnus <burnus@net-b.de>
1811 * check.c (gfc_check_associated, gfc_check_null): Add coindexed check.
1812 * match.c (gfc_match_nullify): Ditto.
1813 * resolve.c (resolve_deallocate_expr): Ditto.
1814 * trans-types.c (gfc_get_nodesc_array_type): Don't set restricted
1817 2011-05-27 Tobias Burnus <burnus@net-b.de>
1820 * gfortran.h (gfc_isym_id): Add GFC_ISYM_RANK.
1821 * intrinsic.c (add_functions): Add rank intrinsic.
1822 (gfc_check_intrinsic_standard): Handle GFC_STD_F2008_TR.
1823 * intrinsic.h (gfc_simplify_rank, gfc_check_rank): Add prototypes.
1824 * simplify.c (gfc_simplify_rank): New function.
1825 * intrinsic.texi (RANK): Add description for rank intrinsic.
1826 * check.c (gfc_check_rank): New function.
1828 2011-05-26 Paul Thomas <pault@gcc.gnu.org>
1829 Thomas Koenig <tkoenig@gcc.gnu.org>
1832 * trans-expr.c (gfc_trans_assignment_1): GFC_REVERSE_NOT_SET
1833 changed to GFC_ENABLE_REVERSE.
1834 * trans-array.c (gfc_init_loopinfo): GFC_CANNOT_REVERSE changed
1835 to GFC_INHIBIT_REVERSE.
1836 * gfortran.h : Enum gfc_reverse is now GFC_ENABLE_REVERSE,
1837 GFC_FORWARD_SET, GFC_REVERSE_SET and GFC_INHIBIT_REVERSE.
1838 * dependency.c (gfc_dep_resolver): Change names for elements of
1839 gfc_reverse as necessary. Change the logic so that forward
1840 dependences are remembered as well as backward ones. When both
1841 have appeared, force a temporary.
1843 2011-05-26 Tobias Burnus <burnus@net-b.de>
1846 * trans-array.c (gfc_conv_array_ref): Handle pointer coarrays.
1847 * trans-decl.c (has_coarray_vars, caf_init_block,
1848 gfor_fndecl_caf_register): New file-global variables.
1849 (gfc_finish_var_decl): Make sure that coarrays in main are static.
1850 (gfc_build_qualified_array): Generate coarray token variable.
1851 (gfc_get_symbol_decl): Don't use a static initializer for coarrays.
1852 (gfc_build_builtin_function_decls): Set gfor_fndecl_caf_register.
1853 (gfc_trans_deferred_vars, gfc_emit_parameter_debug_info): Skip for
1855 (generate_local_decl): Check for local coarrays.
1856 (create_main_function): SYNC ALL before calling MAIN.
1857 (generate_coarray_sym_init): Register static coarray.
1858 (generate_coarray_init): Generate CAF registering constructor
1860 (gfc_generate_function_code): Call it, if needed, do not create
1862 (gfc_generate_module_vars, gfc_process_block_locals): Call
1863 generate_coarray_init.
1864 * trans-types.c (gfc_get_nodesc_array_type): Generate pointers for
1866 * trans.h (gfor_fndecl_caf_register): New variable.
1867 (lang_type): New element caf_token.
1868 (GFC_TYPE_ARRAY_CAF_TOKEN): New macro.
1870 2011-05-24 Joseph Myers <joseph@codesourcery.com>
1872 * Make-lang.in (GFORTRAN_D_OBJS): Remove prefix.o.
1873 (gfortran$(exeext)): Use libcommon-target.a.
1875 2011-05-22 Thomas Koenig <tkoenig@gcc.gnu.org>
1877 * frontend-passes.c (cfe_register_funcs): Also register
1878 character functions if their charlens are known and constant.
1879 Also register allocatable functions.
1881 2011-05-21 Janus Weil <janus@gcc.gnu.org>
1884 * match.c (select_type_set_tmp): Make the temporary ALLOCATABLE if the
1885 selector is ALLOCATABLE.
1887 2011-05-20 Janus Weil <janus@gcc.gnu.org>
1890 * module.c (write_dt_extensions): Do not write extended types which
1891 are local to a subroutine.
1893 2011-05-20 Joseph Myers <joseph@codesourcery.com>
1895 * Make-lang.in (GFORTRAN_D_OBJS): Remove version.o and intl.o.
1897 2011-05-20 Janne Blomqvist <jb@gcc.gnu.org>
1899 * gfortran.texi (set_fpe): Update documentation.
1900 * invoke.texi (-ffpe-trap): Likewise.
1901 * libgfortran.h (GFC_FPE_PRECISION): Rename to GFC_FPE_INEXACT.
1902 * options.c (gfc_handle_fpe_trap_option): Handle inexact and make
1903 precision an alias for it.
1905 2011-05-19 Tobias Burnus <burnus@net-b.de>
1908 * trans-types.c (gfc_get_element_type): Handle scalar coarrays.
1909 (gfc_get_nodesc_array_type): Make a variant-type copy for scalar
1911 * trans.c (gfc_build_array_ref): Return original type not variant
1912 copy for scalar coarrays.
1913 * trans-array.c (gfc_conv_array_ref): Ditto.
1915 2011-05-18 Janus Weil <janus@gcc.gnu.org>
1918 * trans-intrinsic.c (gfc_conv_intrinsic_move_alloc): Deallocate 'TO'
1919 argument to avoid memory leaks.
1921 2011-05-16 Tobias Burnus <burnus@net-b.de>
1923 * gfortran.texi (_gfortran_set_options): Add GFC_STD_F2008_TR.
1924 (Fortran 2008 status): Multi-image support for coarrays.
1925 (TR 19113 status): New section.
1927 2011-05-15 Tobias Burnus <burnus@net-b.de>
1930 actual argument is not an array; rank mismatch is diagnosted later.
1931 * trans-decl.c (gfc_get_symbol_decl, gfc_trans_deferred_vars): Handle
1933 * trans-types.c (gfc_get_array_type_bounds): Ditto.
1935 2011-05-15 Joern Rennecke <amylaar@spamcop.net>
1938 * trans-types.c: Include "tm.h".
1939 [0] (c_size_t_size): Remove.
1941 2011-05-15 Janne Blomqvist <jb@gcc.gnu.org>
1944 * gfortran.texi (_gfortran_set_options): Even though -fbacktrace
1945 is now the default, the library defaults to backtracing disabled.
1947 2011-05-14 Tobias Burnus <burnus@net-b.de>
1949 * lang.opt (fdump-core): Re-add as ignored option
1950 for backward compatibility.
1952 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1955 * gfortran.texi: Update mixed-language programming section
1956 reflecting the removal of the fdump-core option, and that
1957 -fbacktrace is now enabled by default.
1959 2011-05-14 Thomas Koenig <tkoenig@gcc.gnu.org>
1962 * frontend-passes.c (cfe_register_funcs): Also register functions
1963 for potential elimination if the rank is > 0, the shape is unknown
1964 and reallocate on assignment is active.
1965 (create_var): For rank > 0 functions with unknown shape, create
1966 an allocatable temporary.
1968 2011-05-14 Tobias Burnus <burnus@net-b.de>
1971 * interface.c (compare_parameter): Skip diagnostic if
1972 actual argument is not an array; rank mismatch is diagnosted later.
1974 2011-05-14 Tobias Burnus <burnus@net-b.de>
1976 * options.c (gfc_init_options, gfc_post_options): Enable
1977 -fstack-arrays by default if -Ofast is used.
1978 * invoke.texi (-fstack-arrays): Document this.
1980 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1983 * gfortran.h (gfc_option_t): Remove flag_dump_core.
1984 * gfortran.texi (GFORTRAN_ERROR_DUMPCORE): Remove section.
1985 (GFORTRAN_ERROR_BACKTRACE): Document that it's enabled by default.
1986 * intrinsic.texi (ABORT): Remove explanation of -fdump-core.
1987 * invoke.texi: Remove -fdump-core, document that -fbacktrace is
1989 * lang.opt: Remove -fdump-core.
1990 * options.c (gfc_init_options): Make backtrace default to enabled,
1992 (gfc_handle_option): Remove OPT_fdump-core.
1993 * trans-decl.c: Pass a 0 to preserve ABI.
1995 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1997 * gfortran.texi: Remove GFORTRAN_USE_STDERR documentation.
1999 2011-05-13 Tobias Burnus <burnus@net-b.de>
2002 * io.c (resolve_tag_format, resolve_tag): Make sure
2003 that the string is of default kind.
2004 (gfc_resolve_inquire): Also resolve decimal tag.
2006 2011-05-12 Tobias Burnus <burnus@net-b.de>
2009 * resolve.c (resolve_intrinsic): Don't resolve module
2010 intrinsics multiple times.
2012 2011-05-11 Tobias Burnus <burnus@net-b.de>
2015 * expr.c (gfc_is_constant_expr): Use e->value.function.esym
2016 instead of e->symtree->n.sym, if available.
2018 2011-05-07 Eric Botcazou <ebotcazou@adacore.com>
2020 * f95-lang.c (global_bindings_p): Return bool and simplify.
2022 2011-05-07 Tobias Burnus <burnus@net-b.de>
2026 * trans.h: Move gfc_init_coarray_decl prototype ...
2027 * gfortran.h: ... to here.
2028 * parse.c (translate_all_program_units): Call gfc_init_coarray_decl.
2029 (gfc_parse_file): Update translate_all_program_units call.
2030 * trans-decl.c (gfc_init_coarray_decl): Fix variable declaration,
2031 new argument whether DECL_EXTERNAL should be used.
2032 (create_main_function): Update gfc_init_coarray_decl call.
2033 * trans-intrinsic.c (trans_this_image, trans_image_index,
2034 conv_intrinsic_cobound): Ditto.
2036 2011-05-06 Tobias Burnus <burnus@net-b.de>
2039 * trans-array.c (gfc_walk_variable_expr): Continue walking
2040 for scalar coarrays.
2041 * trans-intrinsic.c (convert_element_to_coarray_ref): New function.
2042 (trans_this_image, trans_image_index, conv_intrinsic_cobound): Use it.
2043 (trans_this_image): Fix algorithm.
2044 * trans-types.c (gfc_get_element_type, gfc_get_array_descriptor_base,
2045 gfc_sym_type): Handle scalar coarrays.
2047 2011-05-06 Tobias Burnus <burnus@net-b.de>
2051 * lang.opt (std=f2008tr): New.
2052 * libgfortran.h (GFC_STD_F2008_TR): New macro constant.
2053 * decl.c (verify_c_interop_param): Allow OPTIONAL in BIND(C)
2054 procedures for -std=f2008tr/gnu/legacy.
2055 (gfc_match_import): Set sym to NULL.
2056 * options.c (set_default_std_flags,gfc_handle_option): Handle
2058 * invoke.texi (-std=): Document -std=f2008tr.
2060 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
2062 * trans-decl.c (gfc_trans_entry_master_switch): Call build_case_label.
2063 * trans-io.c (add_case): Likewise.
2064 * trans-stmt.c (gfc_trans_integer_select): Likewise.
2065 (gfc_trans_character_select): Likewise.
2067 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
2069 * trans-decl.c (trans_function_start): Do not set
2070 dont_save_pending_sizes_p.
2072 2011-05-04 Nathan Froyd <froydnj@codesourcery.com>
2074 * trans.h (gfc_chainon_list): Delete.
2075 * trans.c (gfc_chainon_list): Delete.
2077 2011-05-04 Tobias Burnus <burnus@net-b.de>
2080 * invoke.texi (fno-protect-parens): Document
2081 that -Ofast implies -fno-protect-parens.
2082 * options.c (gfc_init_options, gfc_post_options):
2083 Make -Ofast imply -fno-protect-parens.
2085 2011-05-04 Nathan Froyd <froydnj@codesourcery.com>
2087 * trans-decl.c (build_library_function_decl_1): Call
2088 build_function_type_vec. Adjust argument list building accordingly.
2089 * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl): Likewise.
2090 * trans-types.c (gfc_get_function_type): Likewise.
2092 2011-05-04 Richard Guenther <rguenther@suse.de>
2094 * trans-array.c (gfc_trans_array_constructor_value): Use
2095 size_int for bounds of range types.
2096 (gfc_trans_array_constructor_value): Use size_type_node
2097 for memcpy argument.
2098 * trans-common.c (build_field): Use gfc_charlen_type_node
2100 * trans-openmp.c (gfc_trans_omp_clauses): Do not pass NULL
2101 as type to build_int_cst.
2102 * trans-const.c (gfc_build_string_const): Use size_int
2103 for bounds of range types.
2104 (gfc_build_wide_string_const): Likewise.
2105 * trans-stmt.c (gfc_trans_label_assign): Use gfc_charlen_type_node
2107 (gfc_trans_character_select): Likewise.
2108 (gfc_trans_character_select): Do not pass NULL
2109 as type to build_int_cst.
2110 (gfc_trans_character_select): Use size_int for bounds of range types.
2111 * trans-io.c (gfc_build_io_library_fndecls): Likewise.
2112 (add_case): Do not pass NULL as type to build_int_cst.
2113 (transfer_expr): Likewise.
2114 (transfer_array_desc): Likewise.
2115 * trans-decl.c (gfc_add_assign_aux_vars): Use gfc_charlen_type_node
2117 (gfc_trans_assign_aux_var): Likewise.
2118 (create_main_function): Use size_int for bounds of range types.
2119 * trans-intrinsic.c (gfc_conv_intrinsic_minmax_char): Do not pass
2120 NULL as type to build_int_cst.
2121 (gfc_conv_intrinsic_spacing): Likewise.
2122 (gfc_conv_intrinsic_rrspacing): Likewise.
2123 (gfc_conv_intrinsic_len): Use gfc_charlen_type_node for lengths.
2125 2011-05-04 Richard Guenther <rguenther@suse.de>
2127 * trans-types.c (gfc_get_array_type_bounds): Remove zero notrunc
2128 argument to int_const_binop.
2130 2011-05-03 Tobias Burnus <burnus@net-b.de>
2133 * trans-intrinsic.c (trans_this_image): Implement version with
2135 (conv_intrinsic_cobound): Simplify code.
2136 (gfc_conv_intrinsic_function): Call trans_this_image for
2137 this_image(coarray) except for -fcoarray=single.
2139 2011-05-02 Steven G. Kargl <kargl@gcc.gnu.org>
2142 * gfortran.texi: Document the 'Q' exponent-letter extension.
2143 * invoke.texi: Document -Wreal-q-constant.
2144 * lang.opt: Add -Wreal-q-constant option.
2145 * gfortran.h: Add warn_real_q_constant to option struct.
2146 * primary.c (match_real_constant): Use it. Accept 'Q' as
2147 exponent-letter for REAL(16) real-literal-constant with a
2148 fallback to REAL(10) or error if REAL(10) is not available.
2149 * options.c (gfc_init_options, set_Wall) Set it.
2150 (gfc_handle_option): Handle new option.
2152 2011-04-30 Thomas Koenig <tkoenig@gcc.gnu.org>
2154 * dump-prase-tree.c (show_code_node): Set the current
2155 namespace to the BLOCK before displaying it; restore
2158 2011-04-30 Tobias Burnus <burnus@net-b.de>
2161 * decl.c (gfc_match_import): Don't try to find the
2162 symbol if already found.
2164 2011-04-30 Paul Thomas <pault@gcc.gnu.org>
2167 * trans-expr.c (fcncall_realloc_result): Set the bounds and the
2168 offset so that the lbounds are one.
2169 (gfc_trans_arrayfunc_assign): Add rank to arguments of above.
2171 2011-04-29 Paul Thomas <pault@gcc.gnu.org>
2174 * trans-expr.c (arrayfunc_assign_needs_temporary): Deal with
2175 automatic reallocation when the lhs is a target.
2178 * trans-expr.c (fcncall_realloc_result): Make sure that the
2179 result dtype field is set before the function call.
2181 2011-04-29 Tobias Burnus <burnus@net-b.de>
2184 * resolve.c (resolve_typebound_generic_call): Don't check access
2185 flags of the specific function.
2188 * resolve.c (resolve_formal_arglist): Don't change AS_DEFERRED
2189 to AS_ASSUMED_SHAPE for function results.
2190 (resolve_fl_var_and_proc): Print also for function results with
2191 AS_DEFERRED an error, if they are not a pointer or allocatable.
2192 (resolve_types): Make sure arguments of procedures in interface
2193 blocks are resolved.
2195 2011-04-29 Michael Matz <matz@suse.de>
2197 * options.c (options.c): Set warn_maybe_uninitialized.
2199 2011-04-28 Tobias Burnus <burnus@net-b.de>
2202 * resolve.c (resolve_fl_var_and_proc): Print diagnostic of
2203 function results only once.
2204 (resolve_symbol): Always resolve function results.
2207 * expr.c (gfc_check_vardef_context): Fix handling of generic
2209 * interface.c (check_interface0): Reject internal functions
2210 in generic interfaces, unless -std=gnu.
2212 2011-04-27 Tobias Burnus <burnus@net-b.de>
2215 * resolve.c (resolve_global_procedure): Error recovery -
2216 avoid segfault for (non)character-returning functions.
2218 2011-04-26 Thomas Koenig <tkoenig@gcc.gnu.org>
2220 * decl.c (gfc_match_end): Check that the block name starts
2222 * parse.c (gfc_build_block_ns): Make block names unique by
2225 2011-04-26 Thomas Koenig <tkoenig@gcc.gnu.org>
2227 * frontend-passes.c (inserted_block): New variable.
2228 (changed_statement): Likewise.
2229 (create_var): Encase statement to be operated on in a BLOCK.
2230 Adjust code insertion for BLOCK.
2231 (cfe_code): Set inserted_block and changed_statement to NULL.
2233 2011-04-23 Tobias Burnus <burnus@net-b.de>
2236 * module.c (mio_array_spec): Set as->cotype on reading.
2237 * resolve.c (resolve_allocate_expr): Fix allocating coarray
2240 2011-04-21 Thomas Koenig <tkoenig@gcc.gnu.org>
2243 * frontend_passes (cfe_register_funcs): Remove workaround for DO
2245 (gfc_code_walker): Make sure the pointer to the current
2246 statement doen't change when other statements are inserted.
2248 2011-04-21 Tobias Burnus <burnus@net-b.de>
2251 * array.c (gfc_match_array_spec): Fix maximal rank(+corank) check.
2253 2011-04-20 Jim Meyering <meyering@redhat.com>
2255 * expr.c (free_expr0): Remove useless if-before-free.
2256 * gfortranspec.c (lang_specific_pre_link): Likewise.
2257 * interface.c (gfc_extend_expr): Likewise.
2258 * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
2260 2011-04-19 Tobias Burnus <burnus@net-b.de>
2265 * module.c (fix_mio_expr): Commit created symbol.
2267 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2269 * scanner.c (load_file): Use XCNEWVAR instead of xcalloc.
2271 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2273 * frontend-passes.c (gfc_run_passes): Use XDELETEVEC instead of
2276 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2278 * misc.c (gfc_getmem): Remove function.
2279 * gfortran.h: Remove gfc_getmem prototype. Replace gfc_getmem
2280 usage with XCNEW or XCNEWVEC.
2281 * expr.c (gfc_check_assign_symbol): Replace gfc_getmem usage with
2283 * options.c (gfc_handle_module_path_options)
2284 (gfc_get_option_string): Likewise.
2285 * resolve.c (gfc_resolve_forall): Likewise.
2286 * simplify.c (simplify_transformation_to_array): Likewise.
2287 * target-memory.c (gfc_target_interpret_expr): Likewise.
2288 * trans-common.c (get_segment_info, copy_equiv_list_to_ns)
2289 (get_init_field): Likewise.
2290 * trans-expr.c (gfc_conv_statement_function): Likewise.
2291 * trans-io.c (nml_full_name): Likewise.
2292 * trans-stmt.c (gfc_trans_forall_1): Likewise.
2293 * scanner.c (load_file): Replace gfc_getmem usage with xcalloc.
2295 2011-04-19 Tobias Burnus <burnus@net-b.de>
2298 * parse.c (resolve_all_program_units): Skip modules.
2299 (translate_all_program_units): Handle modules.
2300 (gfc_parse_file): Defer code generation for modules.
2302 2011-04-19 Martin Jambor <mjambor@suse.cz>
2304 * trans-decl.c (gfc_generate_function_code): Call cgraph_create_node
2305 instead of cgraph_get_create_node.
2307 2011-04-18 Jim Meyering <meyering@redhat.com>
2309 remove now-unused definition of gfc_free
2310 * misc.c (gfc_free): Remove function.
2311 * gfortran.h (gfc_free): Remove its prototype.
2313 2011-04-18 Jim Meyering <meyering@redhat.com>
2315 convert each use of gfc_free (p) to free (p)
2316 Do that by running this command:
2317 perl -pi -e 's/\bgfc_free ?\(/free (/' \
2318 $(git grep -El '\bgfc_free ?\(')
2319 which also corrects the few uses that lacked a space between
2320 the function name and the open parenthesis.
2321 Manually undo the change to the function definition itself
2322 and its prototype. They'll be removed next.
2323 * array.c (gfc_free_array_spec, gfc_set_array_spec): s/gfc_free/free/
2324 * constructor.c (node_free): Likewise.
2325 * cpp.c (dump_queued_macros): Likewise.
2326 * data.c (gfc_assign_data_value): Likewise.
2327 * decl.c (free_variable, free_value, gfc_free_data): Likewise.
2328 (gfc_free_data_all, match_old_style_init): Likewise.
2329 (gfc_set_constant_character_len, gfc_free_enum_history, NUM_DECL):
2331 (gfc_match_modproc): Likewise.
2332 * dependency.c (check_section_vs_section): Likewise.
2333 * error.c (gfc_pop_error, gfc_free_error): Likewise.
2334 * expr.c (free_expr0, gfc_free_expr, gfc_free_actual_arglist): Likewise.
2335 (gfc_free_ref_list, gfc_replace_expr, gfc_copy_ref): Likewise.
2336 (find_substring_ref, gfc_simplify_expr, gfc_check_assign_symbol):
2338 * frontend-passes.c (gfc_run_passes, cfe_expr_0): Likewise.
2339 (strip_function_call, optimize_comparison): Likewise.
2340 * interface.c (gfc_free_interface, arginfo, check_interface0): Likewise.
2341 (CHECK_OS_COMPARISON, gfc_extend_assign, gfc_free_formal_arglist):
2343 * intrinsic.c (gfc_intrinsic_done_1, gfc_convert_type_warn): Likewise.
2344 (gfc_convert_chartype): Likewise.
2345 * io.c (gfc_free_open, compare_to_allowed_values, gfc_free_close):
2347 (gfc_free_filepos, gfc_free_dt, gfc_free_inquire): Likewise.
2348 * match.c (gfc_free_iterator, gfc_match_associate): Likewise.
2349 (gfc_free_alloc_list, gfc_free_namelist, gfc_free_equiv_until):
2351 (free_case, gfc_free_forall_iterator): Likewise.
2353 * module.c (free_pi_tree, resolve_fixups, free_rename): Likewise.
2354 (free_true_name, peek_atom, mio_allocated_wide_string): Likewise.
2355 (mio_pool_string, mio_internal_string, mio_gmp_integer): Likewise.
2356 (mio_gmp_real, mio_expr, mio_typebound_proc): Likewise.
2357 (mio_full_typebound_tree, skip_list, load_equiv): Likewise.
2358 (free_written_common, gfc_use_module, gfc_free_use_stmts): Likewise.
2359 * openmp.c (gfc_free_omp_clauses): Likewise.
2360 * options.c (gfc_post_options): Likewise.
2361 * parse.c (select_type_pop, parse_omp_structured_block): Likewise.
2362 * primary.c (gfc_free_structure_ctor_component): Likewise.
2363 * resolve.c (resolve_structure_cons, check_host_association): Likewise.
2364 (gfc_resolve_forall, resolve_equivalence): Likewise.
2365 * scanner.c (gfc_scanner_done_1, gfc_release_include_path): Likewise.
2366 (gfc_define_undef_line, preprocessor_line, include_line): Likewise.
2367 (load_file, gfc_read_orig_filename): Likewise.
2368 * simplify.c (simplify_transformation_to_array): Likewise.
2369 (gfc_simplify_ibits, simplify_shift, gfc_simplify_ishftc, STRING):
2371 (gfc_simplify_compiler_options): Likewise.
2372 * st.c (gfc_free_statement, gfc_free_statements): Likewise.
2373 (gfc_free_association_list): Likewise.
2374 * symbol.c (free_components, gfc_free_st_label, free_st_labels):
2376 (gfc_delete_symtree, gfc_free_symbol, gfc_undo_symbols): Likewise.
2377 (free_old_symbol, gfc_commit_symbols, free_tb_tree): Likewise.
2378 (free_common_tree, free_uop_tree, free_sym_tree): Likewise.
2379 (gfc_free_dt_list, gfc_free_equiv_infos, gfc_free_equiv_lists):
2381 (gfc_free_finalizer, gfc_free_charlen, free_entry_list): Likewise.
2382 (gfc_free_namespace): Likewise.
2383 * trans-array.c (gfc_free_ss, gfc_trans_array_bound_check): Likewise.
2384 (gfc_conv_array_ref, gfc_conv_ss_startstride): Likewise.
2385 (gfc_trans_dummy_array_bias, gfc_conv_array_parameter): Likewise.
2386 * trans-common.c (get_init_field, create_common): Likewise.
2387 * trans-const.c (gfc_build_wide_string_const): Likewise.
2388 (gfc_conv_string_init): Likewise.
2389 * trans-decl.c (gfc_generate_function_code): Likewise.
2390 * trans-expr.c (gfc_conv_substring, gfc_free_interface_mapping):
2392 (SCALAR_POINTER, gfc_conv_statement_function): Likewise.
2393 (gfc_trans_subarray_assign): Likewise.
2394 * trans-intrinsic.c (conv_generic_with_optional_char_arg): Likewise.
2395 * trans-io.c (gfc_trans_io_runtime_check, set_string): Likewise.
2396 (transfer_namelist_element, transfer_array_component): Likewise.
2397 * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
2398 * trans-stmt.c (cleanup_forall_symtrees, gfc_trans_forall_1): Likewise.
2399 * trans.c (trans_runtime_error_vararg, gfc_restore_backend_locus):
2402 2011-04-15 Jim Meyering <meyering@redhat.com>
2404 gfortran: remove cpp definition of free, ...
2405 in preparation for the s/gfc_free/free/ transformation.
2406 * gfortran.h (free): Remove macro definition that would otherwise
2407 prevent direct use of the function.
2409 2011-04-18 Tobias Burnus <burnus@net-b.de>
2412 * array.c (gfc_match_array_ref): Check for too many codimensions.
2413 * check.c (gfc_check_image_index): Check number of elements
2415 * simplify.c (gfc_simplify_image_index): Remove unreachable checks.
2417 2011-04-18 Tobias Burnus <burnus@net-b.de>
2420 * iresolve.c (gfc_resolve_image_index): Set ts.type.
2421 * simplify.c (gfc_simplify_image_index): Don't abort if the bounds
2422 are not known at compile time and handle -fcoarray=lib.
2423 * trans-intrinsics.c (gfc_conv_intrinsic_function): Handle
2425 (conv_intrinsic_cobound): Fix comment typo.
2426 (trans_this_image): New function.
2427 * trans-array.c (gfc_unlikely): Move to trans.c.
2428 * trans.c (gfc_unlikely): Function moved from trans-array.c.
2429 (gfc_trans_runtime_check): Use it.
2430 * trans-io.c (gfc_trans_io_runtime_check): Ditto.
2431 * trans.h (gfc_unlikely): Add prototype.
2433 2011-04-18 Paul Thomas <pault@gcc.gnu.org>
2436 * trans-expr.c (fcncall_realloc_result): Renamed version of
2437 realloc_lhs_bounds_for_intrinsic_call that does not touch the
2438 descriptor bounds anymore but makes a temporary descriptor to
2440 (gfc_trans_arrayfunc_assign): Modify the reference to above
2443 2011-05-17 Tobias Burnus <burnus@net-b.de>
2446 * trans-decl.c (gfc_get_extern_function_decl): Fix decl
2447 for external procedures with proc arguments.
2449 2011-04-15 Michael Matz <matz@suse.de>
2451 * trans-array.c (toplevel): Include gimple.h.
2452 (gfc_trans_allocate_array_storage): Check flag_stack_arrays,
2453 properly expand variable length arrays.
2454 (gfc_trans_auto_array_allocation): If flag_stack_arrays create
2455 variable length decls and associate them with their scope.
2456 * gfortran.h (gfc_option_t): Add flag_stack_arrays member.
2457 * options.c (gfc_init_options): Handle -fstack_arrays option.
2458 * lang.opt (fstack-arrays): Add option.
2459 * invoke.texi (Code Gen Options): Document it.
2460 * Make-lang.in (trans-array.o): Depend on GIMPLE_H.
2462 2011-04-15 Tobias Burnus <burnus@net-b.de>
2465 * trans-intrinsic.c (conv_intrinsic_cobound): Remove unused
2466 code which is also causing an ICE.
2468 2011-04-14 Nathan Froyd <froydnj@codesourcery.com>
2470 * f95-lang.c (poplevel): Use BLOCK_CHAIN and block_chainon.
2472 2011-04-12 Nathan Froyd <froydnj@codesourcery.com>
2474 * f95-lang.c (union lang_tree_node): Check for TS_COMMON before
2477 2011-04-12 Paul Thomas <pault@gcc.gnu.org>
2481 * trans-array.c (get_std_lbound): For derived type variables
2482 return array valued component lbound.
2484 2011-04-12 Martin Jambor <mjambor@suse.cz>
2486 * trans-decl.c (gfc_generate_function_code): Call
2487 cgraph_get_create_node instead of cgraph_node.
2489 2011-04-11 Tobias Burnus <burnus@net-b.de>
2492 * simplify.c (simplify_bound_dim): Exit for
2493 ucobound's last dimension unless -fcoarray=single.
2494 * trans-array (gfc_conv_descriptor_size_1): Renamed from
2495 gfc_conv_descriptor_size, made static, has now from_dim and
2497 (gfc_conv_descriptor_size): Call gfc_conv_descriptor_size.
2498 (gfc_conv_descriptor_cosize): New function.
2499 * trans-array.h (gfc_conv_descriptor_cosize): New prototype.
2500 * trans-intrinsic.c (conv_intrinsic_cobound): Add input_location
2501 and handle last codim of ucobound for when -fcoarray is not "single".
2503 2011-04-08 Thomas Koenig <tkoenig@gcc.gnu.org>
2506 * gfortran.h (gfc_option_t): Add warn_function_elimination and
2507 flag_frontend_optimize.
2508 * lang.opt (Wfunction-elimination): Add.
2509 (ffrontend-optimize): Add.
2510 * invoke.texi: Add documentation for -Wfunction-elimination
2511 and -ffrontend-optimize. Add -faggressive-function-elimination
2512 to list of code generation options.
2513 * frontend-passes.c (gfc_run_passes): Run optimizations if
2514 flag_frontend_optimize is set.
2515 (warn_function_elimination): New function.
2516 (cfe_expr_0): Call it if requested to do so.
2517 * options.c (gfc_init_options): Initiate warn_function_elimination
2518 and flag_frontend_optimize.
2519 (gfc_post_options): Set flag_frontend_optimize if not specified
2520 by user, depending on the optimization level.
2521 (gfc_handle_option): Handle -Wfunction-elimination and
2522 -ffrontend-optimize.
2524 2011-04-06 Tobias Burnus <burnus@net-b.de>
2527 * trans-intrinsic.c (gfc_conv_intrinsic_function): Fix
2528 call for this_image.
2530 2011-04-05 Nathan Froyd <froydnj@codesourcery.com>
2532 * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Use
2533 build_function_type_list instead of build_function_type. Correct
2534 argument order for func_frexp and func_scalbn.
2536 2011-04-05 Duncan Sands <baldrick@free.fr>
2538 * f95-lang.c (build_builtin_fntypes): Swap frexp parameter types.
2540 2011-04-04 Thomas Koenig <tkoenig@gcc.gnu.org>
2542 * frontend-passes: (optimize_lexical_comparison): New function.
2543 (optimize_expr): Call it.
2544 (optimize_comparison): Also handle lexical comparison functions.
2545 Return false instad of -2 for unequal comparison.
2547 2011-04-04 Thomas Koenig <tkoenig@gcc.gnu.org>
2550 * frontend-passes (cfe_expr_0): Reverse the order of going
2553 2011-04-04 Tobias Burnus <burnus@net-b.de>
2554 Mikael Morin <mikael.morin@sfr.fr>
2557 * check.c (is_coarray): Update - because of DIMEN_THIS_IMAGE.
2558 * expr.c (gfc_is_coindexed): Ditto.
2559 * gfortran.h (gfc_array_ref_dimen_type): Add DIMEN_THIS_IMAGE.
2560 * interface.c (compare_parameter): Use gfc_expr_attr and
2562 * resolve.c (check_dimension, compare_spec_to_ref,
2563 resolve_allocate_expr, check_data_variable): Update for
2565 * simplify.c (gfc_simplify_lcobound, gfc_simplify_this_image,
2566 gfc_simplify_ucobound): Allow non-constant bounds.
2567 * trans-array.c (gfc_set_loop_bounds_from_array_spec,
2568 gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
2569 gfc_set_vector_loop_bounds, gfc_conv_array_index_offset,
2570 gfc_start_scalarized_body, gfc_trans_scalarizing_loops,
2571 gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
2572 gfc_conv_ss_startstride, gfc_conv_loop_setup,
2573 gfc_trans_array_bounds, gfc_conv_expr_descriptor,
2574 gfc_walk_variable_expr): Handle codimen.
2575 * trans-decl.c (gfc_build_qualified_array): Save cobounds.
2576 * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use arg2.
2577 (conv_intrinsic_cobound): New function.
2578 (gfc_conv_intrinsic_function): Call it.
2579 (gfc_walk_intrinsic_function, gfc_add_intrinsic_ss_code): Handle
2580 ucobound, lcobound, this_image.
2581 * fortran/trans-types.c (gfc_build_array_type): Save cobounds.
2582 (gfc_get_dtype): Honour corank.
2583 (gfc_get_nodesc_array_type): Save corank and codimensions.
2584 (gfc_get_array_type_bounds): Save cobound.
2585 * fortran/trans.h (gfc_ss_info,gfc_loopinfo): Add codimen item.
2586 (gfc_array_kind): Add corank item.
2587 (GFC_TYPE_ARRAY_CORANK): New macro.
2589 2011-04-03 Kai Tietz <ktietz@redhat.com>
2592 * Make-lang.in (f95-lang.o): Add some missing dependencies.
2594 2011-04-01 Thomas Koenig <tkoenig@gcc.gnu.org>
2597 * frontend-passes (cfe_register_funcs): Don't
2598 register functions if they appear as iterators in DO loops.
2600 2011-03-30 Michael Matz <matz@suse.de>
2603 * trans-expr.c (realloc_lhs_loop_for_fcn_call): Take loop as parameter,
2604 don't use local variable.
2605 (gfc_trans_arrayfunc_assign): Adjust caller.
2607 2011-03-29 Janus Weil <janus@gcc.gnu.org>
2610 * decl.c (match_procedure_decl,match_ppc_decl): Set flavor of interface.
2611 * module.c (MOD_VERSION): Bump.
2612 (mio_typespec): Read/write 'interface' field.
2613 * primary.c (match_string_constant,match_logical_constant): Remove
2615 (match_complex_constant): Make sure to clear the typespec.
2617 2011-03-29 Thomas Koenig <tkoenig@gcc.gnu.org>
2619 * frontend-passes.c (create_var): Warn about creating an
2620 array temporary if requested.
2622 2011-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
2625 * frontend-passes.c (optimize_trim): Also follow references, except
2626 when they are substring references or array references.
2628 2011-03-27 Tobias Burnus <burnus@net-b.de>
2631 * gfortran.h (gfc_isym_id): Rename GFC_ISYM_NUMIMAGES to
2632 GFC_ISYM_NUM_IMAGES.
2633 (gfc_fcoarray): Add GFC_FCOARRAY_LIB.
2634 * intrinsic.c (add_functions): Update due to GFC_ISYM_NUM_IMAGES
2636 * invoke.texi (-fcoarray=): Document "lib" argument.
2637 * iresolve.c (gfc_resolve_this_image): Fix THIS IMAGE().
2638 * libgfortran.h (libgfortran_stat_codes): Add comments.
2639 * options.c (gfc_handle_coarray_option): Add -fcoarray=lib.
2640 * simplify.c (gfc_simplify_num_images, gfc_simplify_this_image):
2641 Handle GFC_FCOARRAY_LIB.
2642 * trans.h (gfc_init_coarray_decl): New prototype.
2643 (gfor_fndecl_caf_init, gfor_fndecl_caf_finalize,
2644 gfor_fndecl_caf_critical, gfor_fndecl_caf_end_critical,
2645 gfor_fndecl_caf_sync_all, gfor_fndecl_caf_sync_images,
2646 gfor_fndecl_caf_error_stop, gfor_fndecl_caf_error_stop_str,
2647 gfort_gvar_caf_num_images, gfort_gvar_caf_this_image):
2648 New global variables.
2649 * trans-decl.c: Declare several CAF functions (cf. above).
2650 (gfc_build_builtin_function_decls): Initialize those.
2651 (gfc_init_coarray_decl): New function.
2652 (create_main_function): Call CAF init/finalize functions.
2653 * trans-intrinsic.c (trans_this_image, trans_num_images): New.
2654 (gfc_conv_intrinsic_function): Call those.
2655 * trans-stmt.c (gfc_trans_stop, gfc_trans_sync, gfc_trans_critical):
2656 Add code for GFC_FCOARRAY_LIB.
2658 2011-03-26 Janus Weil <janus@gcc.gnu.org>
2661 * class.c (get_unique_hashed_string): Adjust maximum allowable length
2662 for unique type string.
2664 2011-03-25 Kai Tietz <ktietz@redhat.com>
2666 * scanner.c (preprocessor_line): Use filename_cmp
2669 2011-03-25 Tobias Burnus <burnus@net-b.de>
2673 * trans-types.c (gfc_get_function_type): Don't use varargs if the
2674 procedure is known to have no arguments.
2676 2011-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
2679 * gfortran.h (gfc_option_t) : Add
2680 flag_aggressive_function_elimination.
2681 (gfc_dep_compare_functions): Add prototype.
2682 * lang.opt: Add faggressive-function-elimination.
2683 * invoke.texi: Document -faggressive-function-elimination.
2684 * frontend_passes (expr_array): New static variable.
2685 (expr_size): Likewise.
2686 (expr_count): Likewise.
2687 (current_code): Likewise.
2688 (current_ns): Likewise.
2689 (gfc_run_passes): Allocate and free space for expressions.
2690 (cfe_register_funcs): New function.
2691 (create_var): New function.
2692 (cfc_expr_0): New function.
2693 (cfe_code): New function.
2694 (optimize_namespace): Invoke gfc_code_walker with cfe_code
2696 * dependency.c (gfc_dep_compare_functions): New function.
2697 (gfc_dep_compare_expr): Use it.
2698 * options.c (gfc_init_options): Handle
2699 flag_aggressive_function_elimination.
2700 (gfc_handle_option): Likewise.
2702 2011-03-15 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2704 * arith.c (arith_power): Plug memory leak.
2706 2011-03-12 Janus Weil <janus@gcc.gnu.org>
2709 * trans-expr.c (gfc_apply_interface_mapping_to_expr): Replace base type
2710 for polymorphic arguments.
2712 2011-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2715 * intrinsic.texi: Clarify doc of logarithm functions.
2717 2011-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2720 * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Fix type of
2721 the string length variable.
2723 2011-03-11 Janus Weil <janus@gcc.gnu.org>
2726 * module.c (ab_attribute,attr_bits): Add AB_PROC_POINTER_COMP.
2727 (mio_symbol_attribute): Handle attribute 'proc_pointer_comp'.
2729 2011-03-06 Paul Thomas <pault@gcc.gnu.org>
2730 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2733 * expr.c (gfc_is_constant_expr): Only use gfc_constant_ac if
2734 the expression has an iterator. Otherwise, iterate through the
2735 array, checking for constant expressions for each element.
2737 2011-03-04 Janne Blomqvist <jb@gcc.gnu.org>
2740 * intrinsic.texi: Update CTIME and FDATE documentation.
2742 2011-03-03 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2744 * invoke.texi (Option Summary, Fortran Dialect Options)
2745 (Preprocessing Options, Runtime Options, Code Gen Options):
2746 Fix vertical list spacing by using @itemx for additinoal
2747 items, empty line before @table. Fix typos.
2749 2011-02-28 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2752 * intrinsic.texi: Fix doc of the VERIFY intrinsic.
2754 2011-02-26 Tobias Burnus <burnus@net-b.de>
2757 * trans-stmt.c (gfc_trans_allocate): Fix allocation with
2758 type-spec of deferred-length strings.
2760 2011-02-26 Tobias Burnus <burnus@net-b.de>
2763 * openmp.c (gfc_resolve_omp_directive): Resolve if()
2764 condition of OpenMP's task.
2766 2011-02-26 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2769 * intrinsic.texi: Fix doc of the VERIFY intrinsic.
2771 2011-02-24 Tobias Burnus <burnus@net-b.de>
2774 * intrinsic.texi (ALLOCATED, ATAN, BESSEL_JN, BESSEL_YN): Add
2775 multitable for linebreak between different syntax variants.
2777 2011-02-24 Richard Guenther <rguenther@suse.de>
2780 * f95-lang.c (pushdecl): For externs in non-global scope push
2781 a copy of the decl into the BLOCK.
2783 2011-02-23 Mikael Morin <mikael@gcc.gnu.org>
2786 * trans.c (gfc_prepend_expr_to_block): New function.
2787 * trans.h (gfc_prepend_expr_to_block): Declare.
2788 * trans-array.c (gfc_conv_array_parameter): Replace
2789 gfc_add_expr_to_block with gfc_prepend_expr_to_block.
2791 2011-02-22 Paul Thomas <pault@gcc.gnu.org>
2794 * trans-decl.c (gfc_get_extern_function_decl): Don't use the
2795 gsymbol backend_decl if the procedure has a formal argument
2796 that is a procedure.
2798 2011-02-22 Tobias Burnus <burnus@net-b.de>
2801 * trans-stmt.c (gfc_trans_if_1): Use correct line for
2802 expressions in the if condition.
2804 2011-02-20 Tobias Burnus <burnus@net-b.de>
2807 * trans-decl.c (gfc_trans_deferred_vars): Use gfc_set_backend_locus and
2808 gfc_restore_backend_locus to have better debug locations.
2809 * trans-array.c (gfc_trans_deferred_array): Ditto.
2811 2011-02-20 Paul Thomas <pault@gcc.gnu.org>
2815 * trans-types.c (gfc_get_derived_type): Remove code that looks
2816 for decls in gsym and add call to gfc_get_module_backend_decl.
2817 * trans.h : Add prototype for gfc_get_module_backend_decl.
2818 * trans-decl.c (gfc_get_module_backend_decl): New function.
2819 (gfc_get_symbol_decl): Call it.
2821 2011-02-19 Paul Thomas <pault@gcc.gnu.org>
2824 * trans-array.c (get_array_ctor_all_strlen): Move up in file.
2825 (get_array_ctor_var_strlen): Add block dummy and add call to
2826 get_array_ctor_all_strlen instead of giving up on substrings.
2827 Call gcc_unreachable for default case.
2828 (get_array_ctor_strlen): Add extra argument to in call to
2829 get_array_ctor_var_strlen.
2831 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2834 * primary.c (gfc_match_structure_constructor): Handle empty parent
2837 2011-02-18 Tobias Burnus
2840 * trans-expr.c (arrayfunc_assign_needs_temporary): Use
2841 esym to check whether the specific procedure returns an
2842 allocatable or pointer.
2844 2011-02-18 Michael Matz <matz@suse.de>
2847 * gfortran.h (struct gfc_component): Add norestrict_decl member.
2848 * trans.h (struct lang_type): Add nonrestricted_type member.
2849 * trans-expr.c (gfc_conv_component_ref): Search fields with correct
2851 * trans-types.c (mirror_fields, gfc_nonrestricted_type): New.
2852 (gfc_sym_type): Use it.
2854 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2857 * resolve.c (resolve_transfer): Reject variables with procedure pointer
2860 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2863 * gfortran.h (gfc_check_access): Removed prototype.
2864 (gfc_check_symbol_access): Added prototype.
2865 * module.c (gfc_check_access): Renamed to 'check_access', made static.
2866 (gfc_check_symbol_access): New function, basically a shortcut for
2868 (write_dt_extensions,write_symbol0,write_generic,write_symtree): Use
2869 'gfc_check_symbol_access'.
2870 (write_operator,write_module): Renamed 'gfc_check_access'.
2871 * resolve.c (resolve_fl_procedure,resolve_fl_derived,
2872 resolve_fl_namelist,resolve_symbol,resolve_fntype): Use
2873 'gfc_check_symbol_access'.
2875 2011-02-16 Janus Weil <janus@gcc.gnu.org>
2878 * class.c (gfc_build_class_symbol): Set 'class_ok' attribute.
2879 * decl.c (build_sym,attr_decl1): Move setting of 'class_ok' into
2880 'gfc_build_class_symbol'.
2881 (gfc_match_decl_type_spec): Reject unlimited polymorphism.
2882 * interface.c (matching_typebound_op): Check for 'class_ok' attribute.
2883 * match.c (select_type_set_tmp): Move setting of 'class_ok' into
2884 'gfc_build_class_symbol'.
2885 * primary.c (gfc_variable_attr): Check for 'class_ok' attribute.
2887 2011-02-15 Steven G. Kargl <kargl@gcc.gnu.org>
2890 . simplify.c (gfc_simplify_compiler_version): Fix off-by-one issue.
2892 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2895 * parse.c (gfc_build_block_ns): Commit 'block@' symbol.
2897 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2900 * class.c (gfc_build_class_symbol): Give a fatal error on polymorphic
2902 * primary.c (gfc_match_varspec): Avoid ICE for invalid class
2905 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2908 * interface.c (get_expr_storage_size): Handle derived-type components.
2910 2011-02-13 Tobias Burnus <burnus@net-b.de>
2913 * interface.c (compare_parameter): Avoid ICE with
2914 character components.
2916 2011-02-12 Janus Weil <janus@gcc.gnu.org>
2918 * class.c (gfc_build_class_symbol): Reject polymorphic arrays.
2919 * decl.c (build_sym,build_struct,attr_decl1): Use return value of
2920 'gfc_build_class_symbol'.
2922 2011-02-12 Michael Matz <matz@suse.de>
2923 Janus Weil <janus@gcc.gnu.org>
2924 Tobias Burnus <burnus@net-b.de>
2927 * trans-expr.c (conv_parent_component_references): Avoid unintendent
2928 skipping of parent compounds.
2930 2011-02-11 Tobias Burnus <burnus@net-b.de>
2933 * resolve.c (resolve_formal_arglist): PURE with VALUE
2934 and no INTENT: Add -std= diagnostics.
2936 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2939 * resolve.c (resolve_procedure_interface): If interface has a result
2940 variable, copy the typespec and set result pointer to self.
2942 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2945 * resolve.c (resolve_typebound_subroutine): Remove erroneous line.
2947 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2950 * trans-decl.c (init_intent_out_dt): Handle CLASS arguments.
2952 2011-02-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2954 * io.c (match_io_element): Do not set dt if not inquire.
2956 2011-02-08 Janus Weil <janus@gcc.gnu.org>
2959 * expr.c (gfc_check_assign_symbol): Reject pointers as pointer
2960 initialization target.
2962 2011-02-07 Janne Blomqvist <jb@gcc.gnu.org>
2963 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2965 * gfortran.texi (Thread-safety): texinfo styling fixes.
2966 * intrinsic.texi: Likewise.
2968 2011-02-06 Janne Blomqvist <jb@gcc.gnu.org>
2970 * gfortran.texi (Compiler Characteristics): Add reference to
2971 thread-safety section.
2973 2011-02-06 Janne Blomqvist <jb@gcc.gnu.org>
2975 * gfortran.texi (Thread-safety): New section.
2976 * intrinsic.texi (EXECUTE_COMMAND_LINE): Mention thread-safety.
2978 (GET_ENVIRONMENT_VARIABLE): Likewise.
2981 2011-02-06 Paul Thomas <pault@gcc.gnu.org>
2984 * trans-stmt.c (gfc_trans_allocate): For deferred character
2985 length allocations with SOURCE, store to the values and string
2986 length to avoid calculating twice. Replace gfc_start_block
2987 with gfc_init_block to avoid unnecessary contexts and to keep
2988 declarations of temporaries where they should be. Tidy up the
2991 2011-02-05 Janne Blomqvist <jb@gcc.gnu.org>
2994 * intrinsic.texi (SYSTEM_CLOCK): Update documentation.
2996 2011-02-02 Janus Weil <janus@gcc.gnu.org>
2997 Paul Thomas <pault@gcc.gnu.org>
3000 * trans-expr.c (gfc_trans_class_init_assign): Add call to
3001 gfc_get_derived_type.
3002 * module.c (read_cleanup): Do not use unique_symtrees for vtabs
3005 2011-02-02 Janus Weil <janus@gcc.gnu.org>
3008 * resolve.c (resolve_fl_variable): Handle polymorphic allocatables.
3010 2011-02-01 Janus Weil <janus@gcc.gnu.org>
3013 * trans-expr.c (gfc_conv_structure): Handle constructors for procedure
3014 pointer components with allocatable result.
3016 2011-01-31 Janus Weil <janus@gcc.gnu.org>
3019 * trans-expr.c (gfc_conv_procedure_call): Handle procedure pointers
3020 with pointer or allocatable result.
3022 2011-01-31 Paul Thomas <pault@gcc.gnu.org>
3025 * trans-stmt.c (gfc_trans_allocate): Improve handling of
3026 deferred character lengths with SOURCE.
3027 * iresolve.c (gfc_resolve_repeat): Calculate character
3028 length from source length and ncopies.
3029 * dump-parse-tree.c (show_code_node): Show MOLD and SOURCE
3030 expressions for ALLOCATE.
3032 2011-01-31 Janus Weil <janus@gcc.gnu.org>
3035 * resolve.c (resolve_typebound_subroutine): Bug fix for the case of
3036 an argument of a typebound assignment being a component.
3038 2011-01-31 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
3040 * gfortranspec.c (add_arg_libgfortran) [HAVE_LD_STATIC_DYNAMIC] Use
3041 LD_STATIC_OPTION, LD_DYNAMIC_OPTION.
3043 2011-01-31 Tobias Burnus <burnus@net-b.de>
3046 * resolve.c (resolve_fl_procedure): Reject stmt functions
3047 with pointer/allocatable attribute.
3049 2011-01-31 Tobias Burnus <burnus@net-b.de>
3052 * interface.c (gfc_procedure_use): Add explicit interface check for
3053 pointer/allocatable functions.
3055 2011-01-30 Paul Thomas <pault@gcc.gnu.org>
3058 * trans-expr.c (gfc_trans_assignment_1): If the rhs is an op
3059 expr and is assigned to a deferred character length scalar,
3060 make sure that the function is called before reallocation,
3061 so that the length is available. Include procedure pointer
3062 and procedure pointer component rhs as well.
3067 * gfortran.dg/allocatable_function_5.f90: New test not added by
3068 mistake on 2011-01-28.
3070 2011-01-29 Tobias Burnus <burnus@net-b.de>
3073 * check.c (gfc_check_shape): Support kind argument in SHAPE.
3074 * intrinsic.c (add_functions): Ditto.
3075 * resolve.c (gfc_resolve_shape): Ditto.
3076 * simplify.c (gfc_simplify_shape): Ditto.
3077 * intrinsic.h (gfc_check_shape, gfc_resolve_shape,
3078 gfc_simplify_shape): Update prototypes.
3079 * intrinisc.text (SHAPE): Document kind argument.
3081 2011-01-28 Tobias Burnus <burnus@net-b.de>
3084 * resolve.c (resolve_formal_arglist): Allow arguments with VALUE
3085 attribute also without INTENT.
3087 2011-01-28 Tobias Burnus <burnus@net-b.de>
3089 * gfortran.texi (Fortran 2003 status): Mention support for
3090 nonconstant namelist variables.
3092 2011-01-28 Paul Thomas <pault@gcc.gnu.org>
3093 Tobias Burnus <burnus@gcc.gnu.org>
3098 * interface.c (compare_actual_formal): An allocatable or pointer
3099 deferred length actual is only allowed if the formal argument
3100 is also deferred length. Clean up whitespace.
3101 * trans-expr.c (gfc_conv_procedure_call): Pass string length for
3102 deferred character length formal arguments by reference. Do the
3103 same for function results.
3104 (gfc_trans_pointer_assignment): Do not do runtime check of lhs
3105 and rhs character lengths, if deferred length lhs. In this case
3106 set the lhs character length to that of the rhs.
3107 (gfc_conv_string_parameter): Remove assert that string length is
3109 (is_scalar_reallocatable_lhs): New function.
3110 (alloc_scalar_allocatable_for_assignment): New function.
3111 (gfc_trans_assignment_1): Call above new function. If the rhs is
3112 a deferred character length itself, makes ure that the function
3113 is called before reallocation, so that the length is available.
3114 (gfc_trans_asssignment): Remove error about assignment to
3115 deferred length character variables.
3116 * gfortran.texi : Update entry about (re)allocation on
3118 * trans-stmt.c (gfc_trans_allocate): Add code to handle deferred
3119 length character variables.
3120 * module.c (mio_typespec): Transfer deferred characteristic.
3121 * trans-types.c (gfc_get_function_type): New code to generate
3122 hidden typelist, so that those character lengths that are
3123 passed by reference get the right type.
3124 * resolve.c (resolve_contained_fntype): Supress error for
3125 deferred character length functions.
3126 (resolve_function, resolve_fl_procedure) The same.
3127 (check_symbols): Remove the error that support for
3128 entity with deferred type parameter is not yet implemented.
3129 (resolve_fl_derived): The same.
3130 match.c (alloc_opt_list): Allow MOLD for deferred length object.
3131 * trans-decl.c (gfc_get_symbol_decl): For deferred character
3132 length dummies, generate a local variable for string length.
3133 (create_function_arglist): Hidden length can be a pointer.
3134 (gfc_trans_deferred_vars): For deferred character length
3135 results and dummies, assign the string length to the local
3136 variable from the hidden argument on entry and the other way
3137 round on exit, as appropriate.
3139 2011-01-27 Tobias Burnus <burnus@net-b.de>
3142 * trans-decl.c (gfc_generate_function_code): Fix init
3143 of allocatable result variable with allocatable components.
3145 2011-01-27 Tobias Burnus <burnus@net-b.de>
3148 * options.c (gfc_handle_module_path_options): Save
3149 module path without trailing slash as include path.
3151 2011-01-25 Tobias Burnus <burnus@net-b.de>
3154 * interface.c (gfc_check_operator_interface): Fix
3155 defined-assignment check.
3157 2011-01-23 Tobias Burnus <burnus@net-b.de>
3160 * trans-decl.c (gfc_trans_deferred_vars): Do not nullify
3161 scalar allocatable dummy arguments.
3163 2011-01-22 Thomas Koenig <tkoenig@gcc.gnu.org>
3166 * resolve.c (gfc_iso_c_func_interface): For C_LOC,
3167 check for array sections followed by component references
3168 which are illegal. Also check for coindexed arguments.
3170 2011-01-22 Tobias Burnus <burnus@net-b.de>
3173 * primary.c (gfc_match_varspec): Relax gcc_assert to allow for
3176 2011-01-21 Tobias Burnus <burnus@net-b.de>
3179 * error.c (gfc_error_now, gfc_fatal_error, gfc_error_check):
3180 Use defined instead of magic number exit status codes.
3181 * scanner.c (include_line, gfc_new_file): Ditto.
3183 2011-01-21 Tobias Burnus <burnus@net-b.de>
3186 * expr.c (gfc_check_pointer_assign): Reject expr data-targets
3187 without pointer attribute.
3189 2011-01-18 Janus Weil <janus@gcc.gnu.org>
3192 * resolve.c (expression_rank): Fix rank of procedure poiner components.
3193 * trans-expr.c (gfc_conv_procedure_call): Take care of procedure
3194 pointer components as actual arguments.
3196 2011-01-17 Jakub Jelinek <jakub@redhat.com>
3199 * gfortran.h (struct gfc_omp_saved_state): New type.
3200 (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New prototypes.
3201 * resolve.c (resolve_global_procedure): Call it around gfc_resolve
3203 * openmp.c (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New
3206 2011-01-17 Tobias Burnus <burnus@net-b.de>
3209 * invoke.texi (Options to request or suppress errors
3210 and warnings): Fix cross link.
3212 2011-01-15 Tobias Burnus <burnus@net-b.de>
3214 * gfortran.texi: Update Fortran 2003 Status section.
3217 * invoke.texi: Add missing "-E" to the -dM example.
3219 2011-01-13 Tobias Burnus <burnus@net-b.de>
3222 * intrinsic.texi (get_command_argument, get_environment_variable):
3223 Mark arguments as optional in the Arguments section.
3225 2011-01-13 Kai Tietz <kai.tietz@onevision.com>
3226 Tobias Burnus <burnus@net-b.de>
3229 * trans-decl.c (gfc_get_extern_function_decl,
3230 build_function_decl): Set TREE_PUBLIC/TREE_EXTERNAL before
3231 calling decl_attributes.
3233 2011-01-13 Tobias Burnus <burnus@net-b.de>
3234 Mikael Morin <mikael@gcc.gnu.org>
3238 * gfortran.h (gfc_code): Move union ext's case_list into
3240 * dump-parse-tree.c (show_code_node): Adapt by prefixing case_list
3242 * frontend-passes.c (gfc_code_walker): Ditto.
3243 * match.c (gfc_match_goto, gfc_match_call, gfc_match_case,
3244 gfc_match_type_is, gfc_match_class_is): Ditto.
3245 * resolve.c (resolve_select, resolve_select_type): Ditto.
3246 * st.c (gfc_free_statement): Ditto.
3247 * trans-stmt.c (gfc_trans_integer_select, gfc_trans_logical_select,
3248 gfc_trans_character_select): Ditto.
3249 * parse.c (resolve_all_program_units): For error recovery, avoid
3250 segfault is proc_name is NULL.
3252 2011-01-11 Paul Thomas <pault@gcc.gnu.org>
3255 * trans-array.c (gfc_alloc_allocatable_for_assignment): Change
3256 to be standard compliant by testing for shape rather than size
3257 before skipping reallocation. Improve comments.
3259 2011-01-09 Janus Weil <janus@gcc.gnu.org>
3262 * resolve.c (resolve_actual_arglist): Remove unneeded and buggy piece
3265 2011-01-09 Thomas Koenig <tkoenig@gcc.gnu.org>
3268 * resolve.c (is_scalar_expr_ptr): For a substring reference,
3269 use gfc_dep_compare_expr to compare start and end expession.
3270 Add FIXME for using gfc_deb_compare_expr elsewhere.
3272 2011-01-09 Janus Weil <janus@gcc.gnu.org>
3275 * class.c (get_unique_type_string): Make type name start with upper
3278 2011-01-08 Thomas Koenig <tkoenig@gcc.gnu.org>
3281 * invoke.texi: Mention -ffree-line-length-none and
3282 -ffixed-line-length-none for preprocessing.
3284 2011-01-08 Paul Thomas <pault@gcc.gnu.org>
3287 * trans-expr.c (gfc_conv_procedure_call): With a non-copying
3288 procedure argument (eg TRANSPOSE) use a temporary if there is
3289 any chance of aliasing due to host or use association.
3290 (arrayfunc_assign_needs_temporary): Correct logic for function
3291 results and do not use a temporary for implicitly PURE
3292 variables. Use a temporary for Cray pointees.
3293 * symbol.c (gfc_add_save): Explicit SAVE not compatible with
3294 implicit pureness of containing procedure.
3295 * decl.c (match_old_style_init, gfc_match_data): Where decl
3296 would fail in PURE procedure, set implicit_pure to zero.
3297 * gfortran.h : Add implicit_pure to structure symbol_attr and
3298 add prototype for function gfc_implicit_pure.
3299 * expr.c (gfc_check_pointer_assign, gfc_check_vardef_context):
3300 Where decl would fail in PURE procedure, reset implicit_pure.
3301 * io.c (match_vtag, gfc_match_open, gfc_match_close,
3302 gfc_match_print, gfc_match_inquire, gfc_match_wait): The same.
3303 * match.c (gfc_match_critical, gfc_match_stopcode,
3304 sync_statement, gfc_match_allocate, gfc_match_deallocate): The
3306 * parse.c (decode_omp_directive): The same.
3307 (parse_contained): If not PURE, set implicit pure attribute.
3308 * resolve.c (resolve_formal_arglist, resolve_structure_cons,
3309 resolve_function, resolve_ordinary_assign) : The same.
3310 (gfc_implicit_pure): New function.
3311 * module.c (mio_symbol_attribute): Introduce AB_IMPLICIT_PURE
3312 to ab_attribute enum and use it in this function.
3314 2011-01-08 Thomas Koenig <tkoenig@gcc.gnu.org>
3317 * symbol.c (gfc_symbols_could_alias): Strip gfc_ prefix,
3318 make static and move in front of its only caller, to ...
3319 * trans-array.c (symbols_could_alias): ... here.
3320 Pass information about pointer and target status as
3321 arguments. Allocatable arrays don't alias anything
3322 unless they have the POINTER attribute.
3323 (gfc_could_be_alias): Keep track of pointer and target
3324 status when following references. Also check if typespecs
3325 of components match those of other components or symbols.
3327 2011-01-07 Tobias Burnus <burnus@net-b.de>
3330 * class.c (gfc_build_class_symbol): Mark __vtab as attr.vtab.
3331 * intrinsic.c (add_functions): Use simplify functions for
3332 EXTENDS_TYPE_OF and SAME_TYPE_AS.
3333 * intrinsic.h (gfc_simplify_extends_type_of,
3334 gfc_simplify_same_type_as): New prototypes.
3335 * simplify.c (is_last_ref_vtab, gfc_simplify_extends_type_of,
3336 gfc_simplify_same_type_as): New functions.
3338 2011-01-07 Janus Weil <janus@gcc.gnu.org>
3342 * gfortran.h (gfc_lval_expr_from_sym): Moved prototype.
3343 * class.c (gfc_class_null_initializer): Initialize _vptr to declared
3345 * expr.c (gfc_lval_expr_from_sym): Moved here from symbol.c.
3346 * resolve.c (resolve_deallocate_expr): _data component will be added
3347 at translation stage.
3348 * symbol.c (gfc_lval_expr_from_sym): Moved to expr.c.
3349 * trans-stmt.c (gfc_trans_deallocate): Reset _vptr to declared type.
3351 2011-01-06 Daniel Franke <franke.daniel@gmail.com>
3355 * parse.c (parse_interface): Remove check for procedure types.
3356 * interface.c (check_interface0): Verify that procedures are
3357 either all SUBROUTINEs or all FUNCTIONs.
3359 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3362 * trans-expr.c (gfc_trans_class_assign): Bugfix for r168524 (make sure
3363 'vtab' is initialized).
3365 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3368 * trans-expr.c (gfc_trans_class_assign): For a polymorphic NULL pointer
3369 assignment, set the _vptr component to the declared type.
3371 2011-01-05 Thomas Koenig <tkoenig@gcc.gnu.org>
3374 * resolve.c (resolve_allocate_deallocate): Follow references to
3375 check for duplicate occurence of allocation/deallocation objects.
3377 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3380 * trans-decl.c (gfc_trans_deferred_vars): Initialize the _vpr component
3381 of polymorphic allocatables according to their declared type.
3383 2011-01-04 Janus Weil <janus@gcc.gnu.org>
3386 * class.c (gfc_find_derived_vtab): Set the module field for the copying
3387 routine to make sure it receives module name mangling.
3389 2011-01-03 Jakub Jelinek <jakub@redhat.com>
3391 * gfortranspec.c (lang_specific_driver): Update copyright notice
3394 2011-01-03 Janus Weil <janus@gcc.gnu.org>
3396 * intrinsic.texi (LEADZ): Fix example.
3398 2011-01-02 Janus Weil <janus@gcc.gnu.org>
3401 * class.c (gfc_find_derived_vtab): Use EXEC_INIT_ASSIGN for __copy_
3405 Copyright (C) 2011 Free Software Foundation, Inc.
3407 Copying and distribution of this file, with or without modification,
3408 are permitted in any medium without royalty provided the copyright
3409 notice and this notice are preserved.