1 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
3 * trans-array.c (set_vector_loop_bounds): Loop over the parents.
5 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
7 * trans-array.c (gfc_trans_array_constructor): Loop over the parents.
9 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
11 * trans-array.c (gfc_set_loop_bounds_from_array_spec): Loop over the
14 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
16 * trans.h (struct gfc_ss): New field parent.
17 * trans-array.c (gfc_trans_scalarizing_loops): Skip clearing if a
19 * trans-expr.c (gfc_advance_se_ss_chain): Move to parent ss at the
22 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
24 * trans-array.h (gfc_trans_create_temp_array): Remove loop argument.
25 * trans-array.c (gfc_trans_create_temp_array): Ditto. Get loop from ss.
26 Update reference to loop. Remove loop argument.
27 (gfc_trans_array_constructor, gfc_conv_loop_setup): Update calls to
28 gfc_trans_create_temp_array.
29 * trans-expr.c (gfc_conv_procedure_call): Ditto.
30 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
31 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
32 Set loop before calling gfc_trans_create_temp_array.
34 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
36 * trans-array.c (gfc_trans_create_temp_array): New variable total_dim.
37 Set total_dim to loop's rank. Replace usages of loop's rank.
39 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
41 * trans-array.c (gfc_trans_array_constructor, trans_array_constructor):
42 Rename the former to the later. Get loop from ss.
44 (gfc_add_loop_ss_code): Update call.
46 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
48 * trans-array.c (gfc_set_vector_loop_bounds): Get loop from ss.
50 (gfc_add_loop_ss_code): Update call.
52 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
54 * trans.h (struct gfc_ss): New field loop.
55 * trans-array.c (set_ss_loop): New function.
56 (gfc_add_ss_to_loop): Call set_ss_loop.
58 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
60 * trans.h (struct gfc_ss_info): New field refcount.
61 * trans-array.c (free_ss_info): Decrement refcount. Return early if
63 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss): Increment
66 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
68 * trans-array.c (gfc_trans_create_temp_array): Move invariant condition
69 out of the containing loop.
71 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
73 * trans-array.c (gfc_conv_loop_setup, gfc_trans_create_temp_array):
74 Move specloop arrays clearing from the former to the latter.
76 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
78 * trans-array.c (set_loop_bounds): Separate the beginning of
79 gfc_conv_loop_setup into a function of its own.
80 (set_delta): Separate the end of gfc_conv_loop_setup into a function
82 (gfc_conv_loop_setup): Call set_loop_bounds and set delta.
83 (set_loop_bounds, set_delta, gfc_conv_loop_setup): Make loopspec a
84 pointer to the specloop field from the loop struct.
86 2011-11-03 Tobias Burnus <burnus@net-b.de>
89 * interface.c (gfc_compare_derived_types): Fix check for BIND(C).
91 2011-11-03 Tobias Burnus <burnus@net-b.de>
94 * trans-decl.c (gfc_finish_var_decl): Mark PARAMETER as TREE_READONLY.
96 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
98 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
99 gfc_ss::where into gfc_ss_info.
100 * trans-array.c (gfc_add_loop_ss_code):
101 Update reference chains.
102 * trans-stmt.c (gfc_trans_where_assign, gfc_trans_where_3): Ditto.
104 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
106 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
107 gfc_ss::useflags into gfc_ss_info.
108 * trans-array.c (gfc_mark_ss_chain_used, gfc_trans_preloop_setup,
109 gfc_trans_scalarizing_loops, gfc_trans_scalarized_boundary):
110 Update reference chains.
111 * trans-expr.c (gfc_conv_procedure_call): Ditto.
112 * trans-intrinsic.c (gfc_conv_intrinsic_function): Ditto.
114 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
116 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
117 gfc_ss::data::info into gfc_ss_info::data and remove empty union
119 * trans-array.c (gfc_free_ss, gfc_trans_create_temp_array,
120 gfc_trans_constant_array_constructor, gfc_trans_array_constructor,
121 gfc_set_vector_loop_bounds, gfc_add_loop_ss_code,
122 gfc_conv_ss_descriptor, gfc_trans_array_bound_check,
123 gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
124 add_array_offset, gfc_trans_preloop_setup,
125 gfc_trans_scalarized_boundary, gfc_conv_section_startstride,
126 gfc_conv_ss_startstride, gfc_could_be_alias,
127 gfc_conv_loop_setup, gfc_conv_expr_descriptor,
128 gfc_alloc_allocatable_for_assignment, gfc_walk_array_ref):
129 Update reference chains and factor them where possible.
130 * trans-expr.c (gfc_conv_variable, gfc_conv_subref_array_arg,
131 gfc_conv_procedure_call, gfc_trans_subarray_assign): Updata reference
133 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
134 * trans-io.c (transfer_array_component): Ditto.
135 * trans-stmt.c (gfc_conv_elemental_dependencies,
136 gfc_trans_pointer_assign_need_temp): Ditto.
138 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
140 * trans.h (struct gfc_ss, struct gfc_ss_info): Move member struct
141 gfc_ss::data::temp into gfc_ss_info::data.
142 * trans-array.c (gfc_get_temp_ss, gfc_conv_loop_setup): Update reference
145 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
147 * trans.h (struct gfc_ss, struct gfc_ss_info): Move member struct
148 gfc_ss::data::scalar into newly created union gfc_ss_info::data,
149 and rename subfield expr to value.
150 * trans-array.c (gfc_add_loop_ss_code, gfc_conv_array_index_offset,
151 gfc_conv_expr_descriptor): Update reference chains.
152 * trans-const.c (gfc_conv_constant): Ditto.
153 * trans-expr.c (gfc_conv_expr): Ditto.
155 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
157 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
158 string_length from the former struct to the latter.
160 (gfc_get_temp_ss, gfc_trans_array_constructor, gfc_add_loop_ss_code,
161 gfc_conv_ss_descriptor, gfc_conv_scalarized_array_ref,
162 gfc_conv_resolve_dependencies, gfc_conv_loop_setup,
163 gfc_conv_expr_descriptor): Update references to string_length and
164 factor common reference chains where possible.
165 * trans-const.c (gfc_conv_constant): Ditto.
166 * trans-expr.c (gfc_conv_variable, gfc_conv_subref_array_arg,
167 gfc_conv_expr): Ditto.
169 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
171 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field expr from
172 the former struct to the latter.
174 (gfc_get_array_ss, gfc_get_scalar_ss,
175 gfc_trans_constant_array_constructor, gfc_trans_array_constructor,
176 gfc_add_loop_ss_code, gfc_conv_ss_descriptor,
177 gfc_trans_array_bound_check, gfc_conv_array_index_offset,
178 gfc_conv_scalarized_array_ref, gfc_conv_ss_startstride,
179 gfc_could_be_alias, gfc_conv_resolve_dependencies,
180 gfc_conv_loop_setup, gfc_conv_expr_descriptor,
181 gfc_alloc_allocatable_for_assignment): Update references to expr and
182 factor common reference chains where possible.
183 * trans-const.c (gfc_conv_constant): Ditto.
184 * trans-expr.c (gfc_conv_variable, gfc_conv_procedure_call,
185 gfc_conv_array_constructor_expr, gfc_conv_expr,
186 gfc_conv_expr_reference): Ditto.
187 * trans-intrinsic.c (trans_this_image, gfc_conv_intrinsic_bound,
188 gfc_conv_intrinsic_cobound, gfc_conv_intrinsic_funcall,
189 gfc_add_intrinsic_ss_code): Ditto.
190 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
192 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
194 * trans.h (struct gfc_ss_info): New struct.
195 (gfc_get_ss_info): New macro.
196 (struct gfc_ss): Move type field to struct gfc_ss_info.
197 Add an info field of type gfc_ss_info.
198 * trans-array.c (free_ss_info): New function.
199 (gfc_free_ss): Call free_ss_info.
200 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss):
201 Allocate gfc_ss_info field.
202 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss,
203 gfc_set_vector_loop_bounds, gfc_add_loop_ss_code,
204 gfc_conv_array_index_offset, gfc_trans_preloop_setup,
205 gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
206 gfc_conv_ss_startstride, gfc_conv_resolve_dependencies,
207 gfc_conv_loop_setup, transposed_dims, gfc_conv_expr_descriptor,
208 gfc_walk_elemental_function_args): Update references to type.
209 * trans-const.c (gfc_conv_constant): Factor common reference chains
210 and update reference to type.
211 * trans-expr.c (gfc_conv_procedure_call, gfc_trans_assignment_1):
212 Update reference to type.
213 (gfc_conv_array_constructor_expr, gfc_conv_expr,
214 gfc_conv_expr_reference): Ditto. Factor common reference chains.
215 * trans-intrinsic.c (walk_inline_intrinsic_transpose): Update references
217 * trans-stmt.c (gfc_trans_where_assign): Ditto.
219 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
221 * trans.h (struct gfc_ss, struct gfc_array_info): Move shape field
222 from the former struct to the latter.
223 * trans-array.c (gfc_conv_ss_startstride, gfc_conv_loop_setup):
224 Update field references.
225 * trans-expr.c (gfc_trans_subarray_assign): Update field references
226 and factor common reference chains.
227 * trans-io.c (transfer_array_component): Ditto.
229 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
231 * trans.h (struct gfc_array_info): Move dim and dimen fields...
232 (struct gfc_ss): ... here. Remove gfc_ss::data::temp::dimen field.
233 * trans-array.c (gfc_conv_loop_setup): Remove temp_ss dim array
235 (gfc_get_temp_ss): Initialize dim and dimen.
236 (gfc_free_ss, gfc_get_array_ss, gfc_get_temp_ss,
237 gfc_set_loop_bounds_from_array_spec, get_array_ref_dim,
238 gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
239 gfc_set_vector_loop_bounds, gfc_conv_scalarized_array_ref,
240 gfc_trans_preloop_setup, gfc_conv_ss_startstride,
241 gfc_conv_resolve_dependencies, gfc_conv_loop_setup, transposed_dims,
242 gfc_conv_expr_descriptor, gfc_alloc_allocatable_for_assignment,
243 gfc_walk_array_ref): Update field references.
244 * trans-expr.c (gfc_conv_subref_array_arg, gfc_conv_procedure_call):
246 * trans-intrinsic.c (walk_inline_intrinsic_transpose): Ditto.
247 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
249 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
251 * trans.h (struct gfc_ss_info, struct gfc_array_info):
252 Rename the former to the latter.
253 * trans-array.c (gfc_get_array_ss, gfc_trans_allocate_array_storage,
254 get_array_ref_dim, gfc_trans_create_temp_array,
255 gfc_trans_constant_array_constructor, gfc_set_vector_loop_bounds,
256 gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
257 add_array_offset, gfc_trans_preloop_setup, gfc_conv_section_startstride,
258 gfc_conv_ss_startstride, gfc_conv_loop_setup, transposed_dims,
259 gfc_conv_expr_descriptor): Update all uses.
260 * trans-expr.c (gfc_conv_subref_array_arg, gfc_conv_procedure_call):
262 * trans-intrinsic.c (gfc_conv_intrinsic_transfer,
263 walk_inline_intrinsic_transpose): Ditto.
264 * trans-stmt.c (gfc_conv_elemental_dependencies,
265 gfc_trans_pointer_assign_need_temp): Ditto.
267 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
269 * trans-array.c (dim_ok, transposed_dims): Rename the former to the
270 latter. Change argument type. Invert return value.
271 (gfc_conv_expr_descriptor): Update calls.
273 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
275 * trans-array.c (get_array_ref_dim): Change argument type and name.
276 Obtain previous argument from the new argument in the body.
277 (gfc_trans_create_temp_arry, gfc_conv_loop_setup): Update calls.
279 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
281 * trans-array.c (gfc_set_vector_loop_bounds, set_vector_loop_bounds):
282 Rename the former to the latter. Change type and name of argument.
283 Get previous argument from the new one.
284 (gfc_add_loop_ss_code): Update call.
286 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
288 * trans-array.h (gfc_trans_create_temp_array): Replace info argument
290 * trans-array.c (gfc_trans_create_temp_array): Ditto. Get info from ss.
291 (gfc_trans_array_constructor, gfc_conv_loop_setup): Update call to
292 gfc_trans_create_temp_array.
293 * trans-expr.c (gfc_conv_procedure_call): Ditto.
294 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
295 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
297 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
299 * trans-array.c (gfc_trans_array_bound_check): Use ss argument
302 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
304 * trans-array.c (gfc_trans_array_bound_check,
305 trans_array_bound_check): Rename the former to the latter.
306 Replace descriptor argument with ss argument. Get descriptor from ss.
307 (gfc_conv_array_index_offset, conv_array_index_offset): Rename the
308 former to the latter. Update call to trans_array_bound_check.
309 Replace info argument with ss argument. Get info from ss.
310 (gfc_conv_scalarized_array_ref): Update call to conv_array_index_offset.
311 (add_array_offset): Ditto
313 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
315 * trans-array.c (gfc_trans_constant_array_constructor,
316 trans_constant_array_constructor): Rename the former to the latter.
317 Don't set the rank of the temporary for the loop. Remove then unused
319 (gfc_trans_array_constructor): Update call.
321 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
323 * trans-array.c (gfc_trans_scalarizing_loops): Stop loop before end
324 marker, not after it.
326 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
328 * trans-array.c (gfc_conv_loop_setup): Also skip temporary arrays.
330 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
332 * trans-array.c (gfc_conv_ss_startstride): Access array bounds along
333 array dimensions instead of loop dimensions.
335 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
337 * trans-array.c (gfc_trans_preloop_setup): Assertify one condition.
339 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
341 * trans-array.c (gfc_walk_array_ref): Skip coarray dimensions.
343 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
345 * trans-array.c (get_array_ref_dim): Remove redundant condition.
347 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
349 * trans-array.c (gfc_trans_preloop_setup): Move common code...
350 (add_array_offset): ...into that new function.
352 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
354 * trans-array.c (gfc_trans_preloop_setup): Use loop's dimension instead
355 of array's dimention. Check that it is indeed the same.
357 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
359 * trans-array.c (gfc_trans_preloop_setup): Remove redundant assertion.
360 Special case outermost loop.
362 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
364 * trans-array.c (gfc_trans_preloop_setup): Factor loop index
367 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
369 * trans-array.c (gfc_trans_preloop_setup): Move code earlier.
371 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
373 * trans-array.c (gfc_trans_preloop_setup): Move array reference
374 initialisation earlier. Factor subsequent array references.
376 2011-11-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
378 * Makef-lang.in (gfortranspec.o): Pass SHLIB instead of SHLIB_LINK.
380 2011-10-30 Steven G. Kargl <kargl@gcc.gnu.org>
383 * check.c (gfc_check_dshift): Update argument checking for BOZ.
384 Update checking SHIFT against BITSIZE of I or J.
385 * intrinsic.texi: Update docs for DSHIFTL and DSHIFTR.
387 2011-10-28 Steven G. Kargl <kargl@gcc.gnu.org>
389 * check.c (gfc_check_atan_2): Typo in comment.
390 (gfc_check_nearest): If 's' is constant, check that it is not 0.
391 * simplify.c (simplify_dshift, gfc_simplify_ibclr, gfc_simplify_ibits,
392 gfc_simplify_ibset, simplify_shift, gfc_simplify_ishftc,
393 gfc_simplify_nearest): Remove dead code.
395 2011-10-23 Steven G. Kargl <kargl@gcc.gnu.org>
397 * simplify.c (simplify_transformation_to_array): Fix memory leak.
399 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
402 * check.c (gfc_check_ishftc): Check args are constant before
403 extracting the integer.
405 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
408 * check.c (less_than_bitsize1): Check |shift| <= bit_size(i).
409 (gfc_check_ishftc): Check |shift| <= bit_size(i) and check
410 that size is positive.
412 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
415 * resolve.c (resolve_ref): Check return value of resolve_substring().
417 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
419 * io.c (match_dt_format): Match a user-defined operator or a kind
420 type prefixed string.
422 2011-10-19 Janus Weil <janus@gcc.gnu.org>
425 * check.c (gfc_check_sizeof): Reject procedures as argument of SIZEOF.
426 * intrinsinc.texi (SIZEOF): Document it.
427 (STORAGE_SIZE): Fix special characters. Fix line breaks.
429 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
432 * trans.c (gfc_build_array_ref): If type is not an array, check that
433 there is nothing to do, and do nothing.
435 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
438 * trans-types.c (gfc_build_array_type): Don't force lower bound to one
439 in the deferred case.
441 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
444 * simplify.c (simplify_cobound): Accept non-last-in-ref-chain coarrays.
445 Don't set already set array ref.
447 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
449 * array.c (gfc_find_array_ref): Remove coarray-specific handling.
451 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
454 * check.c (dim_corank_check): Use gfc_get_corank to get corank.
456 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
459 * trans-intrinsic.c (walk_coarray): Change AR_ELEMENT to AR_SECTION.
462 * trans-intrinsic.c (walk_coarray): Use gfc_walk_array_ref for
463 the scalarization chain initialization.
465 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
468 * trans-intrinsic.c (walk_coarray): Allow subreferences after a
469 coarray object reference.
471 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
474 * trans-array.c (gfc_walk_array_ref): Allow zero rank arrays
475 if they are coarrays.
477 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
479 * trans-array.h (gfc_walk_array_ref): New prototype.
480 * trans-array.c (gfc_walk_array_ref): New function, containing
481 all but the beginning of gfc_walk_variable_expr's code.
482 (gfc_walk_variable_expr): Use gfc_walk_array_ref.
484 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
487 * trans-array.c (gfc_conv_expr_descriptor): Use loop.dimen instead of
488 ndim for the descriptor's rank.
490 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
493 * trans-array.c (gfc_conv_expr_descriptor): Count codimensions starting
494 from zero, and add then the relevant offset (either ndim or loop.dimen)
495 depending on context.
497 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
499 * trans-array.c (gfc_conv_expr_descriptor): Save some horizontal space.
501 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
503 * trans-array.c (gfc_conv_expr_descriptor): Move ndim initialization
506 2011-10-18 Janus Weil <janus@gcc.gnu.org>
509 * decl.c (verify_c_interop_param): Renamed to
510 'gfc_verify_c_interop_param'. Add error message for polymorphic
512 (verify_c_interop): Renamed to 'gfc_verify_c_interop'. Reject
513 polymorphic variables.
514 (verify_bind_c_sym): Renamed 'verify_c_interop'.
515 * gfortran.h (verify_c_interop,verify_c_interop_param): Renamed.
516 * check.c (gfc_check_sizeof): Ditto.
517 * resolve.c (gfc_iso_c_func_interface,resolve_fl_procedure): Ditto.
518 * symbol.c (verify_bind_c_derived_type): Ditto.
520 2011-10-15 Tom Tromey <tromey@redhat.com>
521 Dodji Seketeli <dodji@redhat.com>
523 * cpp.c (print_line, cb_define): Adjust to avoid using internals
524 of struct line_map. Use the public API instead.
526 2011-10-17 Janus Weil <janus@gcc.gnu.org>
530 * primary.c (match_kind_param): Avoid segfault.
532 2011-10-16 Thomas Koenig <tkoenig@gcc.gnu.org>
534 * frontend-passes.c (current_ns): Make static.
535 (create_var): Note parent of newly created namespace.
536 (optimize_namespace): Don't wak sibling namespaces
537 if they are EXEC_BLOCK because this is handled...
538 (gfc_code_walker): ... here. Also walk ASSOCIATE lists.
540 2011-10-16 Janus Weil <janus@gcc.gnu.org>
543 * primary.c (match_kind_param): Detect ISO_C_BINDING kinds.
544 (get_kind): Pass on 'is_iso_c' flag.
545 (match_integer_constant,match_real_constant,match_logical_constant):
546 Set 'ts.is_c_interop'.
548 2011-10-16 Janus Weil <janus@gcc.gnu.org>
551 * resolve.c (resolve_formal_arglist): Remove unneeded error message.
554 2011-10-15 Tobias Burnus <burnus@net-b.de>
556 * gfortran.texi (Fortran 2008 status, TS 29113 status,
557 Further Interoperability of Fortran with C): Update implementation
558 status, change references from TR 29113 to TS 29113.
559 * intrinsic.texi (RANK): Change TR 29113 to TS 29113.
560 * invoke.text (-std=): Ditto, change -std=f2008tr to -std=f2008ts.
561 * lang.opt (std=): Ditto.
562 * options.c (gfc_handle_option, set_default_std_flags): Ditto and
563 change GFC_STD_F2008_TR to GFC_STD_F2008_TS.
564 * libgfortran.h: Ditto.
565 * intrinsic.c (add_functions, gfc_check_intrinsic_standard): Ditto.
566 * decl.c (verify_c_interop_param): Ditto.
568 2011-10-14 Janus Weil <janus@gcc.gnu.org>
571 * expr.c (gfc_check_vardef_context): Don't throw an error on
572 non-pointer assignments involving an intent(in) pointer dummy.
574 2011-10-14 Tobias Burnus <burnus@net-b.de>
577 * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
578 for dummy arguments with VALUE attribute.
580 2011-10-11 Tobias Burnus <burnus@net-b.de>
581 Janus Weil <janus@gcc.gnu.org>
583 * invoke.texi (-fwhole-file): Update wording since -fwhole-file
584 is now enabled by default.
586 2011-10-11 Michael Meissner <meissner@linux.vnet.ibm.com>
588 * trans-expr.c (gfc_conv_power_op): Delete old interface with two
589 parallel arrays to hold standard builtin declarations, and replace
590 it with a function based interface that can support creating
591 builtins on the fly in the future. Change all uses, and poison
592 the old names. Make sure 0 is not a legitimate builtin index.
593 (fill_with_spaces): Ditto.
594 (gfc_trans_string_copy): Ditto.
595 (gfc_trans_zero_assign): Ditto.
596 (gfc_build_memcpy_call): Ditto.
597 (alloc_scalar_allocatable_for_assignment): Ditto.
598 * trans-array.c (gfc_trans_array_constructor_value): Ditto.
599 (duplicate_allocatable): Ditto.
600 (gfc_alloc_allocatable_for_assignment): Ditto.
601 * trans-openmp.c (gfc_omp_clause_copy_ctor): Ditto.
602 (gfc_omp_clause_assign_op): Ditto.
603 (gfc_trans_omp_atomic): Ditto.
604 (gfc_trans_omp_do): Ditto.
605 (gfc_trans_omp_task): Ditto.
606 * trans-stmt.c (gfc_trans_stop): Ditto.
607 (gfc_trans_sync): Ditto.
608 (gfc_trans_allocate): Ditto.
609 (gfc_trans_deallocate): Ditto.
610 * trans.c (gfc_call_malloc): Ditto.
611 (gfc_allocate_using_malloc): Ditto.
612 (gfc_call_free): Ditto.
613 (gfc_deallocate_with_status): Ditto.
614 (gfc_deallocate_scalar_with_status): Ditto.
615 * f95-lang.c (gfc_define_builtin): Ditto.
616 (gfc_init_builtin_functions): Ditto.
617 * trans-decl.c (create_main_function): Ditto.
618 * trans-intrinsic.c (builtin_decl_for_precision): Ditto.
620 2011-10-10 Thomas Koenig <tkoenig@gcc.gnu.org>
623 * frontend-passes (forall_level): New variable.
624 (cfe_register_funcs): Don't register functions if we
625 are within a forall loop.
626 (optimize_namespace): Set forall_level to 0 before entry.
627 (gfc_code_walker): Increase/decrease forall_level.
629 2011-10-09 Tobias Burnus <burnus@net-b.de>
632 * trans-common.c (translate_common): Fix -Walign-commons check.
634 2011-10-09 Mikael Morin <mikael.morin@sfr.fr>
636 * interface.c (check_dummy_characteristics): Count dimensions starting
637 from one in diagnostic.
639 2011-10-09 Tobias Burnus <burnus@net-b.de>
641 * Make-lang.in (F95_PARSER_OBJS, GFORTRAN_TRANS_DEPS): Add
642 dependency on iso-c-binding.def and iso-fortran-env.def.
643 * module.c (import_iso_c_binding_module): Add error when
644 explicitly importing a nonstandard symbol; extend standard-
646 * iso-c-binding.def: Add c_float128 and c_float128_complex
647 integer parameters (for -std=gnu).
648 * intrinsic.texi (ISO_C_Binding): Document them.
649 * symbol.c (generate_isocbinding_symbol): Change macros
650 to ignore GFC_STD_* data.
651 * trans-types.c (gfc_init_c_interop_kinds): Ditto; make
652 nonstatic and renamed from "init_c_interop_kinds".
653 (gfc_init_kinds): Don't call it
654 * trans-types.h (gfc_init_c_interop_kinds): Add prototype.
655 * f95-lang.c (gfc_init_decl_processing): Call it.
657 2011-10-09 Janus Weil <janus@gcc.gnu.org>
660 * expr.c (replace_symbol): Only do replacement if the symbol is a dummy.
662 2011-10-08 Paul Thomas <pault@gcc.gnu.org>
665 * trans-array.c (gfc_conv_array_index_offset): Use descriptor
666 stride for pointer function results.
668 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
670 * trans-array.c (gfc_conv_expr_descriptor): Remove trailing whitespace.
672 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
674 * trans-array.c (gfc_conv_ss_startstride): Merge two switch cases.
676 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
678 * trans-array.c (gfc_conv_section_startstride): Remove coarray argument.
679 Remove conditions on coarray.
680 (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.
681 (gfc_conv_expr_descriptor): Ditto. Add assertions before the call.
683 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
685 * trans-array.c (gfc_conv_section_startstride): Remove coarray_last
686 argument. Remove condition on coarray_last.
687 (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.
688 (gfc_conv_expr_descriptor): Ditto.
690 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
692 * trans-array.c (gfc_walk_variable_expr): Remove scalar coarray
693 handling. Don't reset array ref's corank and codimensions' types
694 in the full array ref case. Update loop upper limit.
695 Remove DIMEN_THIS_IMAGE case. Remove unnecessary conditions.
697 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
699 * trans.h (gfc_ss_info): Remove codimen field.
700 * trans-array.c (gfc_get_array_ss): Don't set codimen field.
701 (gfc_trans_create_temp_array): Don't set descriptor's cobounds.
702 (gfc_trans_constant_array_constructor): Update loop upper limit.
703 (gfc_conv_ss_startstride): Don't set codimen field.
704 Don't get descriptor's cobounds.
705 (gfc_walk_variable_expr): Update dimension index.
706 * trans-intrinsic.c (trans_this_image, trans_image_index,
707 conv_intrinsic_cobound): Don't set codimen field
709 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
711 * trans.h (gfc_loopinfo): Remove codimen field.
712 * trans-array.c (gfc_set_vector_loop_bounds,
713 gfc_trans_scalarizing_loops, gfc_conv_loop_setup): Update loop upper
715 (gfc_set_loop_bounds_from_array_spec): Ditto. Remove skip on last
717 (gfc_start_scalarized_body): Update loop lower limit.
718 (gfc_conv_ss_startstride): Don't set loop's codimen field.
719 (gfc_conv_loop_setup): Remove unnecessary condition.
720 (gfc_conv_expr_descriptor): Don't use loop's codimen field as corank.
722 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
724 * trans.h (gfc_ss): Remove data.temp.codimen field.
725 * trans-array.c (gfc_conv_resolve_dependencies,
726 gfc_conv_expr_descriptor): Don't set temp's codimen field.
728 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
730 * resolve.c (resolve_array_ref): Set array_ref's dimen field (and the
731 associated dimen_type) in the full array ref case.
733 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
735 * trans-intrinsic.c (walk_coarray): New function.
736 (convert_element_to_coarray_ref): Move code to walk_coarray. Remove.
737 (trans-this_image, trans_image_index, conv_intrinsic_cobound):
740 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
742 * trans-array.c (gfc_conv_expr_descriptor): Add out-of-the-scalarizer
745 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
747 * trans-array.c (gfc_conv_ss_startstride): Support zero rank loop.
749 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
751 * trans-array.c (gfc_conv_section_startstride): Move code to
752 evaluate_bound. Use evaluate_bound.
753 (evaluate_bound): New function.
755 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
757 * trans-array.c (gfc_conv_section_startstride): Update assertion to
758 also accept coarrays.
760 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
762 * trans-array.c (gfc_conv_section_startstride): Factor common
763 array ref references.
765 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
767 * trans-array.c (gfc_conv_expr_descriptor): Use codim instead of
768 loop.codimen as argument to gfc_get_array_type_bounds.
770 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
772 * trans-array.h (struct gfc_se): New flag want_coarray.
773 * trans-intrinsic.c (trans_this_image, trans_image_index,
774 conv_intrinsic_cobound): Set want_coarray.
775 * trans_array.c (gfc_conv_expr_descriptor): Evaluate codimension
776 earlier and without relying on the scalarizer.
778 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
780 * expr.c (gfc_get_corank): Return 0 if input expression is not a
783 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
785 * trans-array.c (gfc_conv_expr_descriptor): Simplify coarray
786 descriptor setup code.
788 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
790 * resolve.c (compare_spec_to_ref): Move coarray ref initialization
792 (resolve_array_ref): ... here.
794 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
796 * check.c (is_coarray): Remove.
797 (coarray_check): Use gfc_is_coarray.
799 2011-10-07 Janus Weil <janus@gcc.gnu.org>
802 * class.c (gfc_build_class_symbol): Fix whitespace.
803 * module.c (mio_symbol): Set 'class_ok' attribute.
804 * trans-decl.c (gfc_get_symbol_decl): Make sure the backend_decl has
805 been built for class symbols.
807 2011-10-04 Janus Weil <janus@gcc.gnu.org>
810 * interface.c (check_dummy_characteristics): Check the array shape.
812 2011-10-01 Janus Weil <janus@gcc.gnu.org>
815 * interface.c (get_expr_storage_size): Check if 'length' component is
818 2011-09-29 Janus Weil <janus@gcc.gnu.org>
821 * resolve.c (resolve_formal_arglist): Fix pureness check for dummy
825 * symbol.c (check_conflict): Forbid TARGET attribute for statement
828 2011-09-27 Jakub Jelinek <jakub@redhat.com>
830 * trans-types.c (gfc_type_for_size): Return wider type
831 if no suitable narrower type has been found.
832 (gfc_type_for_mode): Return NULL_TREE if gfc_type_for_size
833 returned type doesn't have expected TYPE_MODE.
835 2011-09-26 Janus Weil <janus@gcc.gnu.org>
838 * resolve.c (resolve_common_blocks): Check for EXTERNAL attribute.
841 * interface.c (gfc_compare_interfaces): Bugfix in check for result type.
843 2011-09-22 Janus Weil <janus@gcc.gnu.org>
846 * expr.c (gfc_check_pointer_assign): Check for nonintrinsic elemental
848 * interface.c (gfc_compare_interfaces): Rename 'intent_flag'. Check
849 for PURE and ELEMENTAL attributes.
850 (compare_actual_formal): Remove pureness check here.
852 2011-09-20 Steven G. Kargl <kargl@gcc.gnu.org>
854 * check.c (gfc_check_c_sizeof): Remove redundant word.
856 2011-09-20 Simon Baldwin <simonb@google.com>
858 * module.c (gfc_dump_module): Omit timestamp from output.
860 2011-09-17 Janus Weil <janus@gcc.gnu.org>
863 * symbol.c (gfc_use_derived): Fix coding style.
865 2011-09-15 Janus Weil <janus@gcc.gnu.org>
868 * resolve.c (resolve_transfer): Check if component 'ref' is defined.
871 * symbol.c (gfc_use_derived): Check if argument 'sym' is defined.
873 2011-09-14 Tobias Burnus <burnus@net-b.de>
877 * check.c (gfc_check_null): Allow allocatables as MOLD to NULL.
878 * resolve.c (resolve_transfer): Reject NULL without MOLD.
879 * interface.c (gfc_procedure_use): Reject NULL without MOLD
880 if no explicit interface is known.
881 (gfc_search_interface): Reject NULL without MOLD if it would
884 2011-09-13 Janus Weil <janus@gcc.gnu.org>
887 * symbol.c (check_conflict): Check conflict between GENERIC and RESULT
890 2011-09-11 Thomas Koenig <tkoenig@gcc.gnu.org>
893 * frontend-passes.c (dummy_expr_callback): New function.
894 (convert_do_while): New function.
895 (optimize_namespace): Call code walker to convert do while loops.
897 2011-09-11 Janus Weil <janus@gcc.gnu.org>
901 * interface.c (check_dummy_characteristics): New function to check the
902 characteristics of dummy arguments.
903 (gfc_compare_interfaces,gfc_check_typebound_override): Call it here.
905 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
907 * trans-array.c (gfc_trans_constant_array_constructor): Remove
908 superfluous initialisation of DIM field.
909 (gfc_trans_array_constructor): Assert that DIMEN field is properly set.
910 (gfc_conv_expr_descriptor): Ditto.
911 * trans-expr.c (gfc_conv_procedure_call): Ditto.
913 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
915 * trans-array.h (gfc_get_scalar_ss): New prototype.
916 * trans-array.c (gfc_get_scalar_ss): New function.
917 (gfc_walk_variable_expr, gfc_walk_op_expr,
918 gfc_walk_elemental_function_args): Re-use gfc_get_scalar_ss.
919 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
920 (gfc_trans_assignment_1): Ditto.
921 * trans-stmt.c (compute_inner_temp_size, gfc_trans_where_assign,
922 gfc_trans_where_3): Ditto.
924 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
926 * trans-array.h (gfc_get_temp_ss): New prototype.
927 * trans-array.c (gfc_get_temp_ss): New function.
928 (gfc_conv_resolve_dependencies): Re-use gfc_get_temp_ss.
929 (gfc_conv_expr_descriptor): Ditto.
930 * trans-expr.c (gfc_conv_subref_array_arg): Ditto.
932 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
934 * trans-array.h (gfc_get_array_ss): New prototype.
935 * trans-array.c (gfc_get_array_ss): New function.
936 (gfc_walk_variable_expr, gfc_walk_function_expr,
937 gfc_walk_array_constructor): Re-use gfc_get_array_ss.
938 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
939 * trans-intrinsic.c (gfc_walk_intrinsic_bound,
940 gfc_walk_intrinsic_libfunc): Ditto.
941 * trans-io.c (transfer_array_component): Ditto.
943 2011-09-08 Tobias Burnus <burnus@net-b.de>
946 * decl.c (gfc_match_entry, gfc_match_end): Handle COMP_DO_CONCURRENT.
947 * dump-parse-tree.c (show_code_node): Handle EXEC_DO_CONCURRENT.
948 * gfortran.h (gfc_exec_op): Add EXEC_DO_CONCURRENT.
949 * match.c (gfc_match_critical, match_exit_cycle, gfc_match_stopcode,
950 lock_unlock_statement, sync_statement, gfc_match_allocate,
951 gfc_match_deallocate, gfc_match_return): Add DO CONCURRENT diagnostic.
952 (gfc_match_do): Match DO CONCURRENT.
953 (match_derived_type_spec, match_type_spec, gfc_free_forall_iterator,
954 match_forall_iterator, match_forall_header, match_simple_forall,
955 gfc_match_forall): Move up in the file.
956 * parse.c (check_do_closure, parse_do_block): Handle do concurrent.
957 * parse.h (gfc_compile_state): Add COMP_DO_CONCURRENT.
958 * resolve.c (do_concurrent_flag): New global variable.
959 (resolve_function, pure_subroutine, resolve_branch,
960 gfc_resolve_blocks, resolve_code, resolve_types): Add do concurrent
962 * st.c (gfc_free_statement): Handle EXEC_DO_CONCURRENT.
963 * trans-stmt.c (gfc_trans_do_concurrent): New function.
964 (gfc_trans_forall_1): Handle do concurrent.
965 * trans-stmt.h (gfc_trans_do_concurrent): New function prototype.
966 * trans.c (trans_code): Call it.
967 * frontend-passes.c (gfc_code_walker): Handle EXEC_DO_CONCURRENT.
969 2011-09-07 Janus Weil <janus@gcc.gnu.org>
972 * primary.c (gfc_match_structure_constructor): Handle parsing of
973 procedure pointers components in structure constructors.
974 * resolve.c (resolve_structure_cons): Check interface of procedure
975 pointer components. Changed wording of some error messages.
977 2011-09-04 Janus Weil <janus@gcc.gnu.org>
980 * trans-types.c (gfc_sym_type): Check for proc_name.
982 2011-08-30 Tobias Burnus <burnus@net-b.de>
985 * trans-common.c (build_common_decl): Warn if named common
986 block's size is not everywhere the same.
988 2011-08-30 Steven G. Kargl <kargl@gcc.gnu.org>
991 * trans-stmt.c (gfc_trans_allocate): Evaluate the substring.
993 2011-08-29 Janus Weil <janus@gcc.gnu.org>
996 * trans-decl.c (gfc_generate_function_code): Nullify polymorphic
997 allocatable function results.
999 2011-08-29 Tobias Burnus <burnus@net-b.de>
1001 * trans-decl.c (generate_coarray_sym_init): Use
1002 GFC_CAF_COARRAY_STATIC for static coarrays.
1004 2011-08-28 Dodji Seketeli <dodji@redhat.com>
1006 * scanner.c (load_file): Don't abuse LC_RENAME reason while
1007 (indirectly) calling linemap_add.
1009 2011-08-26 Jakub Jelinek <jakub@redhat.com>
1011 * trans-decl.c (get_proc_pointer_decl): Set DECL_TLS_MODEL
1013 * symbol.c (check_conflict): Allow threadprivate attribute with
1014 FL_PROCEDURE if proc_pointer.
1016 2011-08-25 Mikael Morin <mikael@gcc.gnu.org>
1019 * expr.c (gfc_free_shape): Do nothing if shape is NULL.
1020 (free_expr0): Remove redundant NULL shape check.
1021 * resolve.c (check_host_association): Ditto.
1022 * trans-expr.c (gfc_trans_subarray_assign): Assert that shape is
1024 * trans-io.c (transfer_array_component): Ditto.
1026 2011-08-25 Tobias Burnus <burnus@net-b.de>
1028 * trans-array.c (gfc_conv_descriptor_token): Add assert.
1029 * trans-decl.c (gfc_build_qualified_array,
1030 create_function_arglist): Handle assumed-shape arrays.
1031 * trans-expr.c (gfc_conv_procedure_call): Ditto.
1032 * trans-types.c (gfc_get_array_descriptor_base): Ditto, don't
1033 add "caf_token" to assumed-shape descriptors, new akind argument.
1034 (gfc_get_array_type_bounds): Pass akind.
1035 * trans.h (lang_decl): New elements caf_offset and token.
1036 (GFC_DECL_TOKEN, GFC_DECL_CAF_OFFSET): New macros.
1038 2011-08-25 Tobias Burnus <burnus@net-b.de>
1040 * trans-array.c (structure_alloc_comps): Fix for allocatable
1041 scalar coarray components.
1042 * trans-expr.c (gfc_conv_component_ref): Ditto.
1043 * trans-type.c (gfc_get_derived_type): Ditto.
1045 2011-08-24 Tobias Burnus <burnus@net-b.de>
1048 * expr.c (check_init_expr): Return when an error occured.
1050 2011-08-24 Joseph Myers <joseph@codesourcery.com>
1052 * Make-lang.in (fortran/cpp.o): Remove explicit compilation rule.
1054 2011-08-23 Tobias Burnus <burnus@net-b.de>
1057 * symbol.c (gfc_add_type): Better diagnostic if redefining
1058 use-associated symbol.
1059 * module.c (gfc_use_module): Use module name as locus.
1061 2011-08-22 Gabriel Charette <gchare@google.com>
1063 * cpp.c (gfc_cpp_init): Force BUILTINS_LOCATION for tokens
1064 defined in cpp_define_builtins.
1066 2011-08-22 Mikael Morin <mikael@gcc.gnu.org>
1069 * gfortran.h (gfc_clear_shape, gfc_free_shape): New prototypes.
1070 * expr.c (gfc_clear_shape, gfc_free_shape): New functions.
1071 (free_expr0): Re-use gfc_free_shape.
1072 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
1073 * trans-io.c (transfer_array_component): Ditto.
1074 * resolve.c (check_host_association): Ditto.
1075 (gfc_expr_to_initialize): Don't force the rank value and free the shape
1076 after updating the expression. Recalculate shape and rank.
1077 (resolve_where_shape): Re-use gfc_clear_shape.
1078 * array.c (gfc_array_ref_shape): Ditto.
1080 2011-08-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1083 * expr.c (gfc_check_assign): Check for type conversions when the
1084 right-hand side is a constant REAL/COMPLEX contstant the left-hand
1085 side is also REAL/COMPLEX. Don't warn when a narrowing conversion
1086 for REAL does not change the value of the constant.
1088 2011-08-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1091 * resolve.c (resolve_array_ref): Don't calculate upper bound
1092 if the stride is zero.
1094 2011-08-20 Janus Weil <janus@gcc.gnu.org>
1097 * dependency.c (gfc_dep_compare_expr): Add new result value "-3".
1098 (gfc_check_element_vs_section,gfc_check_element_vs_element): Handle
1100 * frontend-passes.c (optimize_comparison): Ditto.
1101 * interface.c (gfc_check_typebound_override): Ditto.
1103 2011-08-19 Mikael Morin <mikael.morin@sfr.fr>
1106 * parse.c (parse_where): Undo changes after emitting an error.
1108 2011-08-19 Jakub Jelinek <jakub@redhat.com>
1111 * trans-expr.c (gfc_trans_assignment_1): Set OMPWS_SCALARIZER_WS
1112 bit in ompws_flags only if loop.temp_ss is NULL, and clear it if
1113 lhs needs reallocation.
1114 * trans-openmp.c (gfc_trans_omp_workshare): Don't return early if
1115 code is NULL, emit a barrier if workshare emitted no code at all
1116 and NOWAIT clause isn't present.
1118 2011-08-19 Mikael Morin <mikael.morin@sfr.fr>
1121 * gfortran.h (gfc_exec_op): New constant EXEC_END_NESTED_BLOCK.
1122 * parse.c (check_statement_label): Accept ST_END_BLOCK and
1123 ST_END_ASSOCIATE as valid branch target.
1124 (accept_statement): Change EXEC_END_BLOCK to EXEC_END_NESTED_BLOCK.
1125 Add EXEC_END_BLOCK code in the ST_END_BLOCK and ST_END_ASSOCIATE cases.
1126 * resolve.c (find_reachable_labels): Change EXEC_END_BLOCK to
1127 EXEC_END_NESTED_BLOCK.
1128 (resolve_branch): Ditto.
1129 (resolve_code): Add EXEC_END_NESTED_BLOCK case.
1130 * st.c (gfc_free_statement): Ditto.
1131 * trans.c (trans_code): Ditto.
1133 2011-08-18 Mikael Morin <mikael.morin@sfr.fr>
1136 * symbol.c (gfc_get_st_label): Use the derived type namespace when
1137 we are parsing a derived type definition.
1139 2011-08-18 Tobias Burnus <burnus@net-b.de>
1142 * parse.c (parse_derived): Add lock_type
1143 checks, improve coarray_comp handling.
1144 * resolve.c (resolve_allocate_expr,
1145 resolve_lock_unlock, resolve_symbol): Fix lock_type
1148 2011-08-17 Tobias Burnus <burnus@net-b.de>
1151 * trans-decl.c (generate_local_decl): Warn about
1152 unused explicitly imported module variables/parameters.
1154 2011-08-17 Janus Weil <janus@gcc.gnu.org>
1157 * resolve.c (resolve_fl_variable): Reject non-constant character lengths
1158 in COMMON variables.
1160 2011-08-16 Tobias Burnus <burnus@net-b.de>
1161 Dominique Dhumieres <dominiq@lps.ens.fr>
1164 * resolve.c (resolve_symbol): Fix stupid typo.
1166 2011-08-15 Tobias Burnus <burnus@net-b.de>
1168 * resolve.c (resolve_symbol): Fix coarray result-var check.
1170 2011-08-14 Steven G. Kargl <kargl@gcc.gnu.org>
1172 * module.c (use_iso_fortran_env_module): Spell 'referrenced' correctly.
1174 2011-08-14 Janus Weil <janus@gcc.gnu.org>
1177 * decl.c (check_function_name): New function, separated off from
1178 'variable_decl' and slightly extended.
1179 (variable_decl,attr_decl1): Call it.
1181 2011-08-08 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
1183 * Make-lang.in (gfortran$(exeext)): Add $(EXTRA_GCC_LIBS).
1185 2011-08-07 Janus Weil <janus@gcc.gnu.org>
1186 Thomas Koenig <tkoenig@gcc.gnu.org>
1189 * dependency.c (are_identical_variables): For dummy arguments only
1190 check for equal names, not equal symbols.
1191 * interface.c (gfc_check_typebound_override): Add checking for rank
1192 and character length.
1194 2011-08-07 Janus Weil <janus@gcc.gnu.org>
1197 * dependency.h (gfc_is_same_range,gfc_are_identical_variables): Remove
1199 * dependency.c (gfc_are_identical_variables,are_identical_variables):
1200 Renamed the former to the latter and made static.
1201 (gfc_dep_compare_expr): Renamed 'gfc_are_identical_variables', handle
1202 commutativity of multiplication.
1203 (gfc_is_same_range,is_same_range): Renamed the former to the latter,
1204 made static and removed argument 'def'.
1205 (check_section_vs_section): Renamed 'gfc_is_same_range'.
1206 * gfortran.h (gfc_check_typebound_override): New prototype.
1207 * interface.c (gfc_check_typebound_override): Moved here from ...
1208 * resolve.c (check_typebound_override): ... here (and renamed).
1209 (resolve_typebound_procedure): Renamed 'check_typebound_override'.
1211 2011-08-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1214 * target-memory.c (gfc_target_expr-size): Don't clobber typespec
1216 * simplify.c (gfc_simplify_transfer): Don't calculate source_size
1219 2011-08-05 Thomas Koenig <tkoenig@gcc.gnu.org>
1222 * gfortran.h (gfc_calculate_transfer_sizes): Add prototype.
1223 * target-memory.h (gfc_target_interpret_expr): Add boolean
1224 argument wether to convert wide characters.
1225 * target-memory.c (gfc_target_expr_size): Also return length
1226 of characters for non-constant expressions if these can be
1227 determined from the cl.
1228 (interpret_array): Add argument for gfc_target_interpret_expr.
1229 (gfc_interpret_derived): Likewise.
1230 (gfc_target_interpret_expr): Likewise.
1231 * check.c: Include target-memory.h.
1232 (gfc_calculate_transfer_sizes): New function.
1233 (gfc_check_transfer): When -Wsurprising is in force, calculate
1234 sizes and warn if result is larger than size (check moved from
1235 gfc_simplify_transfer).
1236 * simplify.c (gfc_simplify_transfer): Use
1237 gfc_calculate_transfer_sizes. Remove warning.
1239 2011-08-04 Richard Guenther <rguenther@suse.de>
1242 * trans-array.c (add_to_offset): New function.
1243 (gfc_conv_array_ref): Build the array index expression in optimally
1245 (gfc_walk_variable_expr): Adjust for the backward walk.
1247 2011-08-02 Daniel Kraft <d@domob.eu>
1250 * trans-array.c (gfc_trans_auto_array_allocation): Change
1251 gfc_start_block to gfc_init_block to avoid spurious extra-scope.
1253 2011-08-02 Tobias Burnus <burnus@net-b.de>
1255 * trans-array.c (gfc_array_allocate): Pass token to
1256 gfc_allocate_allocatable for -fcoarray=lib.
1257 * trans-stmt.c (gfc_trans_allocate): Update
1258 gfc_allocate_allocatable call.
1259 * trans.h (gfc_allocate_allocatable): Update prototype.
1260 (gfc_allocate_using_lib): Remove.
1261 * trans.c (gfc_allocate_using_lib): Make static, handle token.
1262 (gfc_allocate_allocatable): Ditto.
1264 2011-08-02 Jakub Jelinek <jakub@redhat.com>
1267 * cpp.c (cpp_define_builtins): Change _OPENMP to 201107.
1268 * openmp.c (gfc_free_omp_clauses): Free also final_expr.
1269 (OMP_CLAUSE_FINAL, OMP_CLAUSE_MERGEABLE): Define.
1270 (gfc_match_omp_clauses): Handle parsing final and mergeable
1272 (OMP_TASK_CLAUSES): Allow final and mergeable clauses.
1273 (gfc_match_omp_taskyield): New function.
1274 (resolve_omp_clauses): Resolve final clause. Allow POINTERs and
1275 Cray pointers in clauses other than REDUCTION.
1276 (gfc_match_omp_atomic): Match optional
1277 read/write/update/capture keywords after !$omp atomic.
1278 (resolve_omp_atomic): Handle all OpenMP 3.1 atomic forms.
1279 * dump-parse-tree.c (show_omp_node): Handle EXEC_OMP_TASKYIELD,
1280 print final and mergeable clauses.
1281 (show_code_node): Handle EXEC_OMP_TASKYIELD.
1282 * trans-openmp.c (gfc_trans_omp_clauses): Handle final and
1284 (gfc_trans_omp_taskyield): New function.
1285 (gfc_trans_omp_directive): Handle EXEC_OMP_TASKYIELD.
1286 (gfc_trans_omp_atomic): Handle all OpenMP 3.1 atomic forms.
1287 (gfc_omp_clause_copy_ctor): Handle non-allocated allocatable.
1288 (gfc_omp_predetermined_sharing): Adjust comment.
1289 * gfortran.h (gfc_statement): Add ST_OMP_TASKYIELD and
1291 (gfc_omp_clauses): Add final_expr and mergeable fields.
1292 (gfc_exec_op): Add EXEC_OMP_TASKYIELD.
1293 (gfc_omp_atomic_op): New enum typedef.
1294 (struct gfc_code): Add ext.omp_atomic.
1295 * trans.c (trans_code): Handle EXEC_OMP_TASKYIELD.
1296 * frontend-passes.c (gfc_code_walker): Also walk final_expr.
1297 * resolve.c (gfc_resolve_blocks, resolve_code): Handle
1299 * st.c (gfc_free_statement): Likewise.
1300 * match.h (gfc_match_omp_taskyield): New prototype.
1301 * parse.c (decode_omp_directive): Handle taskyield directive.
1302 Handle !$omp end atomic.
1303 (case_executable): Add ST_OMP_TASKYIELD case.
1304 (gfc_ascii_statement): Handle ST_OMP_TASKYIELD.
1305 (parse_omp_atomic): Return gfc_statement instead of void.
1306 For !$omp atomic capture parse two assignments instead of
1307 just one and require !$omp end atomic afterwards, for
1308 other !$omp atomic forms just allow !$omp end atomic at the
1310 (parse_omp_structured_block, parse_executable): Adjust
1311 parse_omp_atomic callers.
1313 2011-08-02 Tobias Burnus <burnus@net-b.de>
1315 * intrinsic.c (OMP_LIB): Updated openmp_version's
1317 * gfortran.texi (OpenMP): Update ref to OpenMP 3.1.
1318 * intrinsic.texi (OpenMP Modules): Update ref to OpenMP 3.1;
1319 remove deleted omp_integer_kind and omp_logical_kind constants.
1321 2011-07-31 Janus Weil <janus@gcc.gnu.org>
1324 * resolve.c (resolve_structure_cons): Don't do the full dt resolution,
1325 only call 'resolve_fl_derived0'.
1326 (resolve_typebound_procedures): Resolve typebound procedures of
1328 (resolve_fl_derived0): New function, which does a part of the work
1329 for 'resolve_fl_derived'.
1330 (resolve_fl_derived): Call 'resolve_fl_derived0' and do some additional
1333 2011-07-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1336 * expr.c (gfc_simplify_expr): If end of a string is less
1337 than zero, set it to zero.
1339 2011-07-28 Jakub Jelinek <jakub@redhat.com>
1342 * frontend-passes.c (optimize_minmaxloc): New function.
1343 (optimize_expr): Call it.
1345 2011-07-27 Tobias Burnus <burnus@net-b.de>
1348 * trans-types.c (gfc_get_derived_type): Ensure that pointer
1349 component types are marked as nonrestricted.
1351 2011-07-27 Daniel Carrera <dcarrera@gmail.com>
1354 * trans.c (gfc_allocate_using_malloc): Change function signature.
1355 Return nothing. New parameter "pointer". Eliminate temorary variables.
1356 (gfc_allocate_using_lib): Ditto.
1357 (gfc_allocate_allocatable): Ditto. Update call to gfc_allocate_using_lib
1358 and gfc_allocate_using_malloc. Do not free and then reallocate a
1359 variable that is already allocated.
1360 (gfc_likely): New function. Basedon gfc_unlikely.
1361 * trans-array.c (gfc_array_init_size): New parameter "descriptor_block".
1362 Instructions to modify the array descriptor are stored in this block
1363 while other instructions continue to be stored in "pblock".
1364 (gfc_array_allocate): Update call to gfc_array_init_size. Move the
1365 descriptor_block so that the array descriptor is only updated if
1366 the array was allocated successfully.
1367 Update calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
1368 * trans.h (gfc_allocate_allocatable): Change function signature.
1369 Function now returns void.
1370 (gfc_allocate_using_lib): Ditto, and new function parameter.
1371 (gfc_allocate_using_malloc): Ditto.
1372 * trans-openmp.c (gfc_omp_clause_default_ctor,
1373 gfc_omp_clause_copy_ctor,gfc_trans_omp_array_reduction): Replace a call
1374 to gfc_allocate_allocatable with gfc_allocate_using_malloc.
1375 * trans-stmt.c (gfc_trans_allocate): Update function calls for
1376 gfc_allocate_allocatable and gfc_allocate_using_malloc.
1378 2011-07-26 Tobias Burnus <burnus@net-b.de>
1380 * trans-array.c (CAF_TOKEN_FIELD): New macro constant.
1381 (gfc_conv_descriptor_token): New function.
1382 * trans-array.h (gfc_conv_descriptor_token): New prototype.
1383 * trans-types.c (gfc_get_array_descriptor_base): For coarrays
1384 with -fcoarray=lib, append "void *token" to the array descriptor.
1385 (gfc_array_descriptor_base_caf): New static variable.
1386 * trans-expr.c (gfc_conv_procedure_call): Handle token and offset
1387 when passing a descriptor coarray to a nondescriptor dummy.
1389 2011-07-23 Tobias Burnus <burnus@net-b.de>
1391 * resolve.c (resolve_symbol): Fix coarray var decl check.
1393 2011-07-21 Daniel Carrera <dcarrera@gmail.com>
1395 * trans.c (gfc_allocate_with_status): Split into two functions
1396 gfc_allocate_using_malloc and gfc_allocate_usig_lib.
1397 (gfc_allocate_using_malloc): The status parameter is now the
1398 actual status rather than a pointer. Code cleanup.
1399 (gfc_allocate_using_lib): Ditto. Add new parametrs errmsg and
1400 errlen. Pass these to the coarray lib.
1401 * trans-openmp.c (gfc_omp_clause_default_ctor): Update calls to
1402 gfc_allocate_allocatable.
1403 (gfc_omp_clause_copy_ctor): Ditto.
1404 (gfc_trans_omp_array_reduction): Ditto.
1405 * trans-stmt.c (gfc_trans_allocate): Ditto. Update call to
1406 gfc_allocate_using_malloc. Pass stat rather than pstat to the allocate
1407 fuctions. If using coarray lib, pass errmsg and errlen to the allocate
1408 functions. Move error checking outside the if (!gfc_array_allocate)
1409 block so that it also affects trees produced by gfc_array_allocate.
1410 * trans-array.c (gfc_array_allocate): Add new parameters errmsg
1411 and errlen. Replace parameter pstat by status. Code cleanup. Update
1412 calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
1413 * trans-array.h (gfc_array_allocate): Update signature of
1416 2011-07-21 Steven G. Kargl <kargl@gcc.gnu.org>
1418 * gfortran.texi: Remove a duplicate word.
1420 2011-07-21 Tobias Burnus <burnus@net-b.de>
1422 * check.c (gfc_check_present): Allow coarrays.
1423 * trans-array.c (gfc_conv_array_ref): Avoid casting
1424 when a pointer is wanted.
1425 * trans-decl.c (create_function_arglist): For -fcoarray=lib,
1426 handle hidden token and offset arguments for nondescriptor
1428 * trans-expr.c (get_tree_for_caf_expr): New function.
1429 (gfc_conv_procedure_call): For -fcoarray=lib pass the
1430 token and offset for nondescriptor coarray dummies.
1431 * trans.h (lang_type): Add caf_offset tree.
1432 (GFC_TYPE_ARRAY_CAF_OFFSET): New macro.
1434 2011-07-19 Tobias Burnus <burnus@net-b.de>
1436 * expr.c (gfc_is_coarray): New function.
1437 * gfortran.h (gfc_is_coarray): New prototype.
1438 * interface.c (compare_parameter): Use it.
1440 2011-07-19 Richard Guenther <rguenther@suse.de>
1442 * trans-expr.c (fill_with_spaces): Use fold_build_pointer_plus.
1443 (gfc_trans_string_copy): Likewise.
1444 * trans-intrinsic.c (gfc_conv_intrinsic_repeat): Likewise.
1445 * trans-types.c (gfc_get_array_descr_info): Likewise.
1446 * trans.c (gfc_build_array_ref): Likewise.
1448 2011-07-19 Janus Weil <janus@gcc.gnu.org>
1451 * resolve.c (resolve_allocate_expr): Fix diagnostics for pointers.
1453 2011-07-18 Tobias Burnus <burnus@net-b.de>
1455 * trans-decl.c (gfc_build_qualified_array): Make coarray's
1456 token TYPE_QUAL_RESTRICT.
1458 2011-07-18 Tobias Burnus <burnus@net-b.de>
1460 * resolve.c (resolve_transfer): Mention defined I/O
1461 in the diagnostic for alloc_comp/pointer_comp.
1463 2011-07-17 Tobias Burnus <burnus@net-b.de>
1466 * module.c (check_for_ambiguous): Check whether the name is matches
1467 the current program unit.
1469 2011-07-17 Tobias Burnus <burnus@net-b.de>
1472 * expr.c (gfc_check_pointer_assign): Fix checking for invalid
1475 2011-07-16 Tobias Burnus <burnus@net-b.de>
1477 * expr.c (gfc_ref_this_image): New function.
1478 (gfc_is_coindexed): Use it.
1479 * gfortran.h (gfc_ref_this_image): New prototype.
1480 * resolve.c (resolve_deallocate_expr,
1481 resolve_allocate_expr): Support alloc scalar coarrays.
1482 * trans-array.c (gfc_conv_array_ref, gfc_array_init_size,
1483 gfc_conv_descriptor_cosize, gfc_array_allocate,
1484 gfc_trans_deferred_array): Ditto.
1485 * trans-expr.c (gfc_conv_variable) Ditto.:
1486 * trans-stmt.c (gfc_trans_deallocate): Ditto.
1487 * trans-types.c (gfc_get_element_type, gfc_get_array_type_bounds
1488 gfc_get_array_descr_info): Ditto.
1489 * trans-decl.c (gfc_get_symbol_decl): Ditto.
1491 2011-07-11 Jakub Jelinek <jakub@redhat.com>
1494 * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Initialize
1495 inner_size to gfc_index_one_node instead of integer_one_node.
1497 2011-07-10 Tobias Burnus <burnus@net-b.de>
1500 * intrinsic.c (add_functions): Use BT_VOID for 2nd argument of SIGNAL.
1502 2011-07-09 Uros Bizjak <ubizjak@gmail.com>
1505 * expr.c (gfc_get_corank): Change return value to int.
1506 * gfortran.h (gfc_get_corank): Update function prototype.
1508 2011-07-07 Mikael Morin <mikael.morin@sfr.fr>
1511 * resolve.c (resolve_symbol): Force resolution of function result's
1512 array specification.
1514 2011-07-07 Tobias Burnus <burnus@net-b.de>
1516 * trans.c (gfc_allocate_with_status): Call _gfortran_caf_register
1517 with NULL arguments for (new) stat=/errmsg= arguments.
1519 2011-07-06 Daniel Carrera <dcarrera@gmail.com>
1521 * trans-array.c (gfc_array_allocate): Rename allocatable_array to
1522 allocatable. Rename function gfc_allocate_array_with_status to
1523 gfc_allocate_allocatable_with_status. Update function call for
1524 gfc_allocate_with_status.
1525 * trans-opemp.c (gfc_omp_clause_default_ctor): Rename function
1526 gfc_allocate_array_with_status to gfc_allocate_allocatable_with_status.
1527 * trans-stmt.c (gfc_trans_allocate): Update function call for
1528 gfc_allocate_with_status. Rename function gfc_allocate_array_with_status
1529 to gfc_allocate_allocatable_with_status.
1530 * trans.c (gfc_call_malloc): Add new parameter gfc_allocate_with_status
1531 so it uses the library for memory allocation when -fcoarray=lib.
1532 (gfc_allocate_allocatable_with_status): Renamed from
1533 gfc_allocate_array_with_status.
1534 (gfc_allocate_allocatable_with_status): Update function call for
1535 gfc_allocate_with_status.
1536 * trans.h (gfc_coarray_type): New enum.
1537 (gfc_allocate_with_status): Update prototype.
1538 (gfc_allocate_allocatable_with_status): Renamed from
1539 gfc_allocate_array_with_status.
1540 * trans-decl.c (generate_coarray_sym_init): Use the new constant
1541 GFC_CAF_COARRAY_ALLOC in the call to gfor_fndecl_caf_register.
1543 2011-07-06 Richard Guenther <rguenther@suse.de>
1545 * f95-lang.c (gfc_init_decl_processing):
1546 Merge calls to build_common_tree_nodes and build_common_tree_nodes_2.
1548 2011-07-04 Jakub Jelinek <jakub@redhat.com>
1551 * gfortranspec.c (lang_specific_driver): Ignore options with
1552 CL_ERR_MISSING_ARG errors.
1554 2011-07-02 Janus Weil <janus@gcc.gnu.org>
1557 * expr.c (gfc_check_vardef_context): Handle type-bound procedures.
1559 2011-06-30 Jakub Jelinek <jakub@redhat.com>
1562 * gfortran.h (gfc_constructor): Add repeat field.
1563 * trans-array.c (gfc_conv_array_initializer): Handle repeat > 1.
1564 * array.c (current_expand): Add repeat field.
1565 (expand_constructor): Copy repeat.
1566 * constructor.c (node_free, node_copy, gfc_constructor_get,
1567 gfc_constructor_lookup): Handle repeat field.
1568 (gfc_constructor_lookup_next, gfc_constructor_remove): New functions.
1569 * data.h (gfc_assign_data_value): Add mpz_t * argument.
1570 (gfc_assign_data_value_range): Removed.
1571 * constructor.h (gfc_constructor_advance): Removed.
1572 (gfc_constructor_lookup_next, gfc_constructor_remove): New prototypes.
1573 * data.c (gfc_assign_data_value): Add REPEAT argument, handle it and
1574 also handle overwriting a range with a single entry.
1575 (gfc_assign_data_value_range): Removed.
1576 * resolve.c (check_data_variable): Adjust gfc_assign_data_value
1577 call. Use gfc_assign_data_value instead of
1578 gfc_assign_data_value_expr.
1580 2011-06-27 Janus Weil <janus@gcc.gnu.org>
1583 * trans-array.c (structure_alloc_comps): Make sure sub-components
1584 and extended types are correctly deallocated.
1586 2011-06-21 Andrew MacLeod <amacleod@redhat.com>
1588 * trans-openmp.c: Add sync_ or SYNC__ to builtin names.
1589 * trans-stmt.c: Add sync_ or SYNC__ to builtin names.
1590 * trans-decl.c: Add sync_ or SYNC__ to builtin names.
1592 2011-06-21 Janus Weil <janus@gcc.gnu.org>
1595 * class.c (gfc_find_derived_vtab): Make vtab and default initialization
1596 symbols SAVE_IMPLICIT.
1598 2011-06-20 Tobias Burnus <burnus@net-b.de>
1601 * gfortran.h (gfc_check_vardef_context): Update prototype.
1602 (iso_fortran_env_symbol): Handle derived types.
1603 (symbol_attribute): Add lock_comp.
1604 * expr.c (gfc_check_vardef_context): Add LOCK_TYPE check.
1605 * interface.c (compare_parameter, gfc_procedure_use): Handle
1607 (compare_actual_formal): Update
1608 gfc_check_vardef_context call.
1609 * check.c (gfc_check_atomic_def, gfc_check_atomic_ref): Ditto.
1610 * intrinsic.c (check_arglist): Ditto.
1611 * io.c (resolve_tag, gfc_resolve_dt, gfc_resolve_inquire): Ditto.
1612 * iso-fortran-env.def (ISOFORTRAN_LOCK_TYPE): Add.
1613 * intrinsic.texi (ISO_FORTRAN_ENV): Document LOCK_TYPE.
1614 * module.c (mio_symbol_attribute): Handle lock_comp.
1615 (create_derived_type): New function.
1616 (use_iso_fortran_env_module): Call it to handle LOCK_TYPE.
1617 * parse.c (parse_derived): Add constraint check for LOCK_TYPE.
1618 * resolve.c (resolve_symbol, resolve_lock_unlock): Add constraint
1619 checks for LOCK_TYPE.
1620 (gfc_resolve_iterator, resolve_deallocate_expr,
1621 resolve_allocate_expr, resolve_code, resolve_transfer): Update
1622 gfc_check_vardef_context call.
1623 * trans-stmt.h (gfc_trans_lock_unlock): New prototype.
1624 * trans-stmt.c (gfc_trans_lock_unlock): New function.
1625 * trans.c (trans_code): Handle LOCK and UNLOCK.
1627 2011-06-18 Janus Weil <janus@gcc.gnu.org>
1630 * decl.c (gfc_match_procedure): Allow PROCEDURE declarations inside
1633 2011-06-17 Janus Weil <janus@gcc.gnu.org>
1636 * check.c (gfc_check_move_alloc): If 'TO' argument is polymorphic,
1637 make sure the vtab is present.
1639 2011-06-16 Janus Weil <janus@gcc.gnu.org>
1642 * interface.c (gfc_extend_assign): Propagate the locus from the
1643 assignment to the type-bound procedure call.
1645 2011-06-16 Janus Weil <janus@gcc.gnu.org>
1648 * module.c (mio_component): Make sure the 'class_ok' attribute is set
1649 for use-associated CLASS components.
1650 * parse.c (parse_derived): Check for 'class_ok' attribute.
1651 * resolve.c (resolve_fl_derived): Ditto.
1653 2011-06-13 Thomas Koenig <tkoenig@gcc.gnu.org>
1655 * frontend-passes.c (remove_trim): New function.
1656 (optimize_assignment): Use it.
1657 (optimize_comparison): Likewise. Return correct status
1658 for previous change.
1660 2011-06-12 Tobias Burnus
1663 * trans-expr.c (gfc_trans_assignment_1): Tell
1664 gfc_trans_scalar_assign to also deep-copy RHS nonvariables
1665 with allocatable components.
1666 * trans-array.c (gfc_conv_expr_descriptor): Ditto.
1668 2011-05-11 Thomas Koenig <tkoenig@gcc.gnu.org>
1670 * frontend-passes.c (optimize_assignment): Follow chains
1671 of concatenation operators to the end for removing trailing
1672 TRIMS for assignments.
1674 2011-06-10 Daniel Carrera <dcarrera@gmail.com>
1676 * trans-decl.c (gfc_build_builtin_function_decls):
1677 Updated declaration of caf_sync_all and caf_sync_images.
1678 * trans-stmt.c (gfc_trans_sync): Function
1679 can now handle a "stat" variable that has an integer type
1680 different from integer_type_node.
1682 2011-06-09 Richard Guenther <rguenther@suse.de>
1684 * trans.c (gfc_allocate_array_with_status): Mark error path
1687 2011-06-08 Tobias Burnus <burnus@net-b.de>
1690 * gfortran.h (gfc_statement): Add ST_LOCK and ST_UNLOCK.
1691 (gfc_exec_op): Add EXEC_LOCK and EXEC_UNLOCK.
1692 (gfc_code): Add expr4.
1693 * match.h (gfc_match_lock, gfc_match_unlock): New prototypes.
1694 * match.c (gfc_match_lock, gfc_match_unlock,
1695 lock_unlock_statement): New functions.
1696 (sync_statement): Bug fix, avoiding double freeing.
1697 (gfc_match_if): Handle LOCK/UNLOCK statement.
1698 * parse.c (decode_statement, next_statement,
1699 gfc_ascii_statement): Ditto.
1700 * st.c (gfc_free_statement): Handle LOCK and UNLOCK.
1701 * resolve.c (resolve_lock_unlock): New function.
1702 (resolve_code): Call it.
1703 * dump-parse-tree.c (show_code_node): Handle LOCK/UNLOCK.
1705 2011-06-07 Richard Guenther <rguenther@suse.de>
1707 * f95-lang.c (gfc_init_decl_processing): Do not set
1708 size_type_node or call set_sizetype.
1710 2011-06-05 Tobias Burnus <burnus@net-b.de>
1713 * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
1716 2011-06-05 Andreas Schmidt <andreas.schmidt.42@gmx.net>
1717 Thomas Koenig <tkoenig@gcc.gnu.org>
1719 * dump-parse-tree.c (show_symbol): Don't dump namespace
1720 for ENTRY to avoid infinite recursion.
1722 2011-06-02 Asher Langton <langton2@llnl.gov>
1725 * trans-decl.c (gfc_trans_deferred_vars): Treat assumed-size Cray
1726 pointees as AS_EXPLICIT.
1728 2011-06-02 Asher Langton <langton2@llnl.gov>
1731 * decl.c (variable_decl): Merge current_as before copying to cp_as.
1733 2011-06-02 Steven G. Kargl <kargl@gcc.gnu.org>
1736 * decl.c (gfc_match_modproc): Allow for a double colon in a module
1737 procedure statement.
1738 * parse.c ( decode_statement): Deal with whitespace around :: in
1741 2011-05-31 Tobias Burnus <burnus@net-b.de>
1744 * intrinsic.c (klass): Add CLASS_ATOMIC.
1745 (add_subroutines): Add atomic_ref/atomic_define.
1746 * intrinsic.texi (ATOMIC_REF, ATOMIC_DEFINE): Document.
1747 * intrinsic.h (gfc_check_atomic_def, gfc_check_atomic_ref,
1748 gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New prototypes.
1749 * gfortran.h (gfc_isym_id): Add GFC_ISYM_ATOMIC_DEF
1750 and GFC_ISYM_ATOMIC_REF.
1751 (gfc_atomic_int_kind, gfc_atomic_logical_kind): New global vars.
1752 * iresolve.c (gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New
1754 * check.c (gfc_check_atomic, gfc_check_atomic_def,
1755 gfc_check_atomic_ref): New functions.
1756 * iso-fortran-env.def (ISOFORTRANENV_FILE_ATOMIC_INT_KIND,
1757 ISOFORTRANENV_FILE_ATOMIC_LOGICAL_KIND): Change kind value.
1758 * trans-intrinsic.c (conv_intrinsic_atomic_def,
1759 conv_intrinsic_atomic_ref, gfc_conv_intrinsic_subroutine): New
1761 (conv_intrinsic_move_alloc) Renamed from
1762 gfc_conv_intrinsic_move_alloc - and made static.
1763 * trans.h (gfc_conv_intrinsic_move_alloc): Remove.
1764 (gfc_conv_intrinsic_subroutine) Add prototype.
1765 * trans.c (trans_code): Call gfc_conv_intrinsic_subroutine.
1766 * trans-types (gfc_atomic_int_kind, gfc_atomic_logical_kind): New
1768 (gfc_init_kinds): Set them.
1770 2011-05-31 Tobias Burnus <burnus@net-b.de>
1773 * trans-array.c (gfc_trans_dummy_array_bias): Handle
1774 cobounds of assumed-shape arrays.
1776 2011-05-31 Tobias Burnus <burnus@net-b.de>
1779 * resolve.c (resolve_fl_variable): Handle static coarrays
1780 with non-constant cobounds.
1782 2011-05-29 Janus Weil <janus@gcc.gnu.org>
1785 * module.c (mio_component_ref): Handle components of extended types.
1786 * symbol.c (gfc_find_component): Return is sym is NULL.
1788 2011-05-29 Tobias Burnus <burnus@net-b.de>
1791 * interface.c (compare_parameter): Add check for passing coarray
1792 to allocatable noncoarray dummy.
1794 2011-05-29 Tobias Burnus <burnus@net-b.de>
1795 Richard Guenther <rguenther@suse.de>
1798 * trans-types.c (gfc_get_nodesc_array_type): Don't mess with
1799 the type's TREE_TYPE.
1800 * trans-array.c (gfc_conv_array_ref): Use TYPE_MAIN_VARIANT.
1801 * trans.c (gfc_build_array_ref): Ditto.
1803 2011-05-27 Tobias Burnus <burnus@net-b.de>
1806 * check.c (gfc_check_associated, gfc_check_null): Add coindexed check.
1807 * match.c (gfc_match_nullify): Ditto.
1808 * resolve.c (resolve_deallocate_expr): Ditto.
1809 * trans-types.c (gfc_get_nodesc_array_type): Don't set restricted
1812 2011-05-27 Tobias Burnus <burnus@net-b.de>
1815 * gfortran.h (gfc_isym_id): Add GFC_ISYM_RANK.
1816 * intrinsic.c (add_functions): Add rank intrinsic.
1817 (gfc_check_intrinsic_standard): Handle GFC_STD_F2008_TR.
1818 * intrinsic.h (gfc_simplify_rank, gfc_check_rank): Add prototypes.
1819 * simplify.c (gfc_simplify_rank): New function.
1820 * intrinsic.texi (RANK): Add description for rank intrinsic.
1821 * check.c (gfc_check_rank): New function.
1823 2011-05-26 Paul Thomas <pault@gcc.gnu.org>
1824 Thomas Koenig <tkoenig@gcc.gnu.org>
1827 * trans-expr.c (gfc_trans_assignment_1): GFC_REVERSE_NOT_SET
1828 changed to GFC_ENABLE_REVERSE.
1829 * trans-array.c (gfc_init_loopinfo): GFC_CANNOT_REVERSE changed
1830 to GFC_INHIBIT_REVERSE.
1831 * gfortran.h : Enum gfc_reverse is now GFC_ENABLE_REVERSE,
1832 GFC_FORWARD_SET, GFC_REVERSE_SET and GFC_INHIBIT_REVERSE.
1833 * dependency.c (gfc_dep_resolver): Change names for elements of
1834 gfc_reverse as necessary. Change the logic so that forward
1835 dependences are remembered as well as backward ones. When both
1836 have appeared, force a temporary.
1838 2011-05-26 Tobias Burnus <burnus@net-b.de>
1841 * trans-array.c (gfc_conv_array_ref): Handle pointer coarrays.
1842 * trans-decl.c (has_coarray_vars, caf_init_block,
1843 gfor_fndecl_caf_register): New file-global variables.
1844 (gfc_finish_var_decl): Make sure that coarrays in main are static.
1845 (gfc_build_qualified_array): Generate coarray token variable.
1846 (gfc_get_symbol_decl): Don't use a static initializer for coarrays.
1847 (gfc_build_builtin_function_decls): Set gfor_fndecl_caf_register.
1848 (gfc_trans_deferred_vars, gfc_emit_parameter_debug_info): Skip for
1850 (generate_local_decl): Check for local coarrays.
1851 (create_main_function): SYNC ALL before calling MAIN.
1852 (generate_coarray_sym_init): Register static coarray.
1853 (generate_coarray_init): Generate CAF registering constructor
1855 (gfc_generate_function_code): Call it, if needed, do not create
1857 (gfc_generate_module_vars, gfc_process_block_locals): Call
1858 generate_coarray_init.
1859 * trans-types.c (gfc_get_nodesc_array_type): Generate pointers for
1861 * trans.h (gfor_fndecl_caf_register): New variable.
1862 (lang_type): New element caf_token.
1863 (GFC_TYPE_ARRAY_CAF_TOKEN): New macro.
1865 2011-05-24 Joseph Myers <joseph@codesourcery.com>
1867 * Make-lang.in (GFORTRAN_D_OBJS): Remove prefix.o.
1868 (gfortran$(exeext)): Use libcommon-target.a.
1870 2011-05-22 Thomas Koenig <tkoenig@gcc.gnu.org>
1872 * frontend-passes.c (cfe_register_funcs): Also register
1873 character functions if their charlens are known and constant.
1874 Also register allocatable functions.
1876 2011-05-21 Janus Weil <janus@gcc.gnu.org>
1879 * match.c (select_type_set_tmp): Make the temporary ALLOCATABLE if the
1880 selector is ALLOCATABLE.
1882 2011-05-20 Janus Weil <janus@gcc.gnu.org>
1885 * module.c (write_dt_extensions): Do not write extended types which
1886 are local to a subroutine.
1888 2011-05-20 Joseph Myers <joseph@codesourcery.com>
1890 * Make-lang.in (GFORTRAN_D_OBJS): Remove version.o and intl.o.
1892 2011-05-20 Janne Blomqvist <jb@gcc.gnu.org>
1894 * gfortran.texi (set_fpe): Update documentation.
1895 * invoke.texi (-ffpe-trap): Likewise.
1896 * libgfortran.h (GFC_FPE_PRECISION): Rename to GFC_FPE_INEXACT.
1897 * options.c (gfc_handle_fpe_trap_option): Handle inexact and make
1898 precision an alias for it.
1900 2011-05-19 Tobias Burnus <burnus@net-b.de>
1903 * trans-types.c (gfc_get_element_type): Handle scalar coarrays.
1904 (gfc_get_nodesc_array_type): Make a variant-type copy for scalar
1906 * trans.c (gfc_build_array_ref): Return original type not variant
1907 copy for scalar coarrays.
1908 * trans-array.c (gfc_conv_array_ref): Ditto.
1910 2011-05-18 Janus Weil <janus@gcc.gnu.org>
1913 * trans-intrinsic.c (gfc_conv_intrinsic_move_alloc): Deallocate 'TO'
1914 argument to avoid memory leaks.
1916 2011-05-16 Tobias Burnus <burnus@net-b.de>
1918 * gfortran.texi (_gfortran_set_options): Add GFC_STD_F2008_TR.
1919 (Fortran 2008 status): Multi-image support for coarrays.
1920 (TR 19113 status): New section.
1922 2011-05-15 Tobias Burnus <burnus@net-b.de>
1925 actual argument is not an array; rank mismatch is diagnosted later.
1926 * trans-decl.c (gfc_get_symbol_decl, gfc_trans_deferred_vars): Handle
1928 * trans-types.c (gfc_get_array_type_bounds): Ditto.
1930 2011-05-15 Joern Rennecke <amylaar@spamcop.net>
1933 * trans-types.c: Include "tm.h".
1934 [0] (c_size_t_size): Remove.
1936 2011-05-15 Janne Blomqvist <jb@gcc.gnu.org>
1939 * gfortran.texi (_gfortran_set_options): Even though -fbacktrace
1940 is now the default, the library defaults to backtracing disabled.
1942 2011-05-14 Tobias Burnus <burnus@net-b.de>
1944 * lang.opt (fdump-core): Re-add as ignored option
1945 for backward compatibility.
1947 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1950 * gfortran.texi: Update mixed-language programming section
1951 reflecting the removal of the fdump-core option, and that
1952 -fbacktrace is now enabled by default.
1954 2011-05-14 Thomas Koenig <tkoenig@gcc.gnu.org>
1957 * frontend-passes.c (cfe_register_funcs): Also register functions
1958 for potential elimination if the rank is > 0, the shape is unknown
1959 and reallocate on assignment is active.
1960 (create_var): For rank > 0 functions with unknown shape, create
1961 an allocatable temporary.
1963 2011-05-14 Tobias Burnus <burnus@net-b.de>
1966 * interface.c (compare_parameter): Skip diagnostic if
1967 actual argument is not an array; rank mismatch is diagnosted later.
1969 2011-05-14 Tobias Burnus <burnus@net-b.de>
1971 * options.c (gfc_init_options, gfc_post_options): Enable
1972 -fstack-arrays by default if -Ofast is used.
1973 * invoke.texi (-fstack-arrays): Document this.
1975 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1978 * gfortran.h (gfc_option_t): Remove flag_dump_core.
1979 * gfortran.texi (GFORTRAN_ERROR_DUMPCORE): Remove section.
1980 (GFORTRAN_ERROR_BACKTRACE): Document that it's enabled by default.
1981 * intrinsic.texi (ABORT): Remove explanation of -fdump-core.
1982 * invoke.texi: Remove -fdump-core, document that -fbacktrace is
1984 * lang.opt: Remove -fdump-core.
1985 * options.c (gfc_init_options): Make backtrace default to enabled,
1987 (gfc_handle_option): Remove OPT_fdump-core.
1988 * trans-decl.c: Pass a 0 to preserve ABI.
1990 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1992 * gfortran.texi: Remove GFORTRAN_USE_STDERR documentation.
1994 2011-05-13 Tobias Burnus <burnus@net-b.de>
1997 * io.c (resolve_tag_format, resolve_tag): Make sure
1998 that the string is of default kind.
1999 (gfc_resolve_inquire): Also resolve decimal tag.
2001 2011-05-12 Tobias Burnus <burnus@net-b.de>
2004 * resolve.c (resolve_intrinsic): Don't resolve module
2005 intrinsics multiple times.
2007 2011-05-11 Tobias Burnus <burnus@net-b.de>
2010 * expr.c (gfc_is_constant_expr): Use e->value.function.esym
2011 instead of e->symtree->n.sym, if available.
2013 2011-05-07 Eric Botcazou <ebotcazou@adacore.com>
2015 * f95-lang.c (global_bindings_p): Return bool and simplify.
2017 2011-05-07 Tobias Burnus <burnus@net-b.de>
2021 * trans.h: Move gfc_init_coarray_decl prototype ...
2022 * gfortran.h: ... to here.
2023 * parse.c (translate_all_program_units): Call gfc_init_coarray_decl.
2024 (gfc_parse_file): Update translate_all_program_units call.
2025 * trans-decl.c (gfc_init_coarray_decl): Fix variable declaration,
2026 new argument whether DECL_EXTERNAL should be used.
2027 (create_main_function): Update gfc_init_coarray_decl call.
2028 * trans-intrinsic.c (trans_this_image, trans_image_index,
2029 conv_intrinsic_cobound): Ditto.
2031 2011-05-06 Tobias Burnus <burnus@net-b.de>
2034 * trans-array.c (gfc_walk_variable_expr): Continue walking
2035 for scalar coarrays.
2036 * trans-intrinsic.c (convert_element_to_coarray_ref): New function.
2037 (trans_this_image, trans_image_index, conv_intrinsic_cobound): Use it.
2038 (trans_this_image): Fix algorithm.
2039 * trans-types.c (gfc_get_element_type, gfc_get_array_descriptor_base,
2040 gfc_sym_type): Handle scalar coarrays.
2042 2011-05-06 Tobias Burnus <burnus@net-b.de>
2046 * lang.opt (std=f2008tr): New.
2047 * libgfortran.h (GFC_STD_F2008_TR): New macro constant.
2048 * decl.c (verify_c_interop_param): Allow OPTIONAL in BIND(C)
2049 procedures for -std=f2008tr/gnu/legacy.
2050 (gfc_match_import): Set sym to NULL.
2051 * options.c (set_default_std_flags,gfc_handle_option): Handle
2053 * invoke.texi (-std=): Document -std=f2008tr.
2055 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
2057 * trans-decl.c (gfc_trans_entry_master_switch): Call build_case_label.
2058 * trans-io.c (add_case): Likewise.
2059 * trans-stmt.c (gfc_trans_integer_select): Likewise.
2060 (gfc_trans_character_select): Likewise.
2062 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
2064 * trans-decl.c (trans_function_start): Do not set
2065 dont_save_pending_sizes_p.
2067 2011-05-04 Nathan Froyd <froydnj@codesourcery.com>
2069 * trans.h (gfc_chainon_list): Delete.
2070 * trans.c (gfc_chainon_list): Delete.
2072 2011-05-04 Tobias Burnus <burnus@net-b.de>
2075 * invoke.texi (fno-protect-parens): Document
2076 that -Ofast implies -fno-protect-parens.
2077 * options.c (gfc_init_options, gfc_post_options):
2078 Make -Ofast imply -fno-protect-parens.
2080 2011-05-04 Nathan Froyd <froydnj@codesourcery.com>
2082 * trans-decl.c (build_library_function_decl_1): Call
2083 build_function_type_vec. Adjust argument list building accordingly.
2084 * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl): Likewise.
2085 * trans-types.c (gfc_get_function_type): Likewise.
2087 2011-05-04 Richard Guenther <rguenther@suse.de>
2089 * trans-array.c (gfc_trans_array_constructor_value): Use
2090 size_int for bounds of range types.
2091 (gfc_trans_array_constructor_value): Use size_type_node
2092 for memcpy argument.
2093 * trans-common.c (build_field): Use gfc_charlen_type_node
2095 * trans-openmp.c (gfc_trans_omp_clauses): Do not pass NULL
2096 as type to build_int_cst.
2097 * trans-const.c (gfc_build_string_const): Use size_int
2098 for bounds of range types.
2099 (gfc_build_wide_string_const): Likewise.
2100 * trans-stmt.c (gfc_trans_label_assign): Use gfc_charlen_type_node
2102 (gfc_trans_character_select): Likewise.
2103 (gfc_trans_character_select): Do not pass NULL
2104 as type to build_int_cst.
2105 (gfc_trans_character_select): Use size_int for bounds of range types.
2106 * trans-io.c (gfc_build_io_library_fndecls): Likewise.
2107 (add_case): Do not pass NULL as type to build_int_cst.
2108 (transfer_expr): Likewise.
2109 (transfer_array_desc): Likewise.
2110 * trans-decl.c (gfc_add_assign_aux_vars): Use gfc_charlen_type_node
2112 (gfc_trans_assign_aux_var): Likewise.
2113 (create_main_function): Use size_int for bounds of range types.
2114 * trans-intrinsic.c (gfc_conv_intrinsic_minmax_char): Do not pass
2115 NULL as type to build_int_cst.
2116 (gfc_conv_intrinsic_spacing): Likewise.
2117 (gfc_conv_intrinsic_rrspacing): Likewise.
2118 (gfc_conv_intrinsic_len): Use gfc_charlen_type_node for lengths.
2120 2011-05-04 Richard Guenther <rguenther@suse.de>
2122 * trans-types.c (gfc_get_array_type_bounds): Remove zero notrunc
2123 argument to int_const_binop.
2125 2011-05-03 Tobias Burnus <burnus@net-b.de>
2128 * trans-intrinsic.c (trans_this_image): Implement version with
2130 (conv_intrinsic_cobound): Simplify code.
2131 (gfc_conv_intrinsic_function): Call trans_this_image for
2132 this_image(coarray) except for -fcoarray=single.
2134 2011-05-02 Steven G. Kargl <kargl@gcc.gnu.org>
2137 * gfortran.texi: Document the 'Q' exponent-letter extension.
2138 * invoke.texi: Document -Wreal-q-constant.
2139 * lang.opt: Add -Wreal-q-constant option.
2140 * gfortran.h: Add warn_real_q_constant to option struct.
2141 * primary.c (match_real_constant): Use it. Accept 'Q' as
2142 exponent-letter for REAL(16) real-literal-constant with a
2143 fallback to REAL(10) or error if REAL(10) is not available.
2144 * options.c (gfc_init_options, set_Wall) Set it.
2145 (gfc_handle_option): Handle new option.
2147 2011-04-30 Thomas Koenig <tkoenig@gcc.gnu.org>
2149 * dump-prase-tree.c (show_code_node): Set the current
2150 namespace to the BLOCK before displaying it; restore
2153 2011-04-30 Tobias Burnus <burnus@net-b.de>
2156 * decl.c (gfc_match_import): Don't try to find the
2157 symbol if already found.
2159 2011-04-30 Paul Thomas <pault@gcc.gnu.org>
2162 * trans-expr.c (fcncall_realloc_result): Set the bounds and the
2163 offset so that the lbounds are one.
2164 (gfc_trans_arrayfunc_assign): Add rank to arguments of above.
2166 2011-04-29 Paul Thomas <pault@gcc.gnu.org>
2169 * trans-expr.c (arrayfunc_assign_needs_temporary): Deal with
2170 automatic reallocation when the lhs is a target.
2173 * trans-expr.c (fcncall_realloc_result): Make sure that the
2174 result dtype field is set before the function call.
2176 2011-04-29 Tobias Burnus <burnus@net-b.de>
2179 * resolve.c (resolve_typebound_generic_call): Don't check access
2180 flags of the specific function.
2183 * resolve.c (resolve_formal_arglist): Don't change AS_DEFERRED
2184 to AS_ASSUMED_SHAPE for function results.
2185 (resolve_fl_var_and_proc): Print also for function results with
2186 AS_DEFERRED an error, if they are not a pointer or allocatable.
2187 (resolve_types): Make sure arguments of procedures in interface
2188 blocks are resolved.
2190 2011-04-29 Michael Matz <matz@suse.de>
2192 * options.c (options.c): Set warn_maybe_uninitialized.
2194 2011-04-28 Tobias Burnus <burnus@net-b.de>
2197 * resolve.c (resolve_fl_var_and_proc): Print diagnostic of
2198 function results only once.
2199 (resolve_symbol): Always resolve function results.
2202 * expr.c (gfc_check_vardef_context): Fix handling of generic
2204 * interface.c (check_interface0): Reject internal functions
2205 in generic interfaces, unless -std=gnu.
2207 2011-04-27 Tobias Burnus <burnus@net-b.de>
2210 * resolve.c (resolve_global_procedure): Error recovery -
2211 avoid segfault for (non)character-returning functions.
2213 2011-04-26 Thomas Koenig <tkoenig@gcc.gnu.org>
2215 * decl.c (gfc_match_end): Check that the block name starts
2217 * parse.c (gfc_build_block_ns): Make block names unique by
2220 2011-04-26 Thomas Koenig <tkoenig@gcc.gnu.org>
2222 * frontend-passes.c (inserted_block): New variable.
2223 (changed_statement): Likewise.
2224 (create_var): Encase statement to be operated on in a BLOCK.
2225 Adjust code insertion for BLOCK.
2226 (cfe_code): Set inserted_block and changed_statement to NULL.
2228 2011-04-23 Tobias Burnus <burnus@net-b.de>
2231 * module.c (mio_array_spec): Set as->cotype on reading.
2232 * resolve.c (resolve_allocate_expr): Fix allocating coarray
2235 2011-04-21 Thomas Koenig <tkoenig@gcc.gnu.org>
2238 * frontend_passes (cfe_register_funcs): Remove workaround for DO
2240 (gfc_code_walker): Make sure the pointer to the current
2241 statement doen't change when other statements are inserted.
2243 2011-04-21 Tobias Burnus <burnus@net-b.de>
2246 * array.c (gfc_match_array_spec): Fix maximal rank(+corank) check.
2248 2011-04-20 Jim Meyering <meyering@redhat.com>
2250 * expr.c (free_expr0): Remove useless if-before-free.
2251 * gfortranspec.c (lang_specific_pre_link): Likewise.
2252 * interface.c (gfc_extend_expr): Likewise.
2253 * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
2255 2011-04-19 Tobias Burnus <burnus@net-b.de>
2260 * module.c (fix_mio_expr): Commit created symbol.
2262 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2264 * scanner.c (load_file): Use XCNEWVAR instead of xcalloc.
2266 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2268 * frontend-passes.c (gfc_run_passes): Use XDELETEVEC instead of
2271 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2273 * misc.c (gfc_getmem): Remove function.
2274 * gfortran.h: Remove gfc_getmem prototype. Replace gfc_getmem
2275 usage with XCNEW or XCNEWVEC.
2276 * expr.c (gfc_check_assign_symbol): Replace gfc_getmem usage with
2278 * options.c (gfc_handle_module_path_options)
2279 (gfc_get_option_string): Likewise.
2280 * resolve.c (gfc_resolve_forall): Likewise.
2281 * simplify.c (simplify_transformation_to_array): Likewise.
2282 * target-memory.c (gfc_target_interpret_expr): Likewise.
2283 * trans-common.c (get_segment_info, copy_equiv_list_to_ns)
2284 (get_init_field): Likewise.
2285 * trans-expr.c (gfc_conv_statement_function): Likewise.
2286 * trans-io.c (nml_full_name): Likewise.
2287 * trans-stmt.c (gfc_trans_forall_1): Likewise.
2288 * scanner.c (load_file): Replace gfc_getmem usage with xcalloc.
2290 2011-04-19 Tobias Burnus <burnus@net-b.de>
2293 * parse.c (resolve_all_program_units): Skip modules.
2294 (translate_all_program_units): Handle modules.
2295 (gfc_parse_file): Defer code generation for modules.
2297 2011-04-19 Martin Jambor <mjambor@suse.cz>
2299 * trans-decl.c (gfc_generate_function_code): Call cgraph_create_node
2300 instead of cgraph_get_create_node.
2302 2011-04-18 Jim Meyering <meyering@redhat.com>
2304 remove now-unused definition of gfc_free
2305 * misc.c (gfc_free): Remove function.
2306 * gfortran.h (gfc_free): Remove its prototype.
2308 2011-04-18 Jim Meyering <meyering@redhat.com>
2310 convert each use of gfc_free (p) to free (p)
2311 Do that by running this command:
2312 perl -pi -e 's/\bgfc_free ?\(/free (/' \
2313 $(git grep -El '\bgfc_free ?\(')
2314 which also corrects the few uses that lacked a space between
2315 the function name and the open parenthesis.
2316 Manually undo the change to the function definition itself
2317 and its prototype. They'll be removed next.
2318 * array.c (gfc_free_array_spec, gfc_set_array_spec): s/gfc_free/free/
2319 * constructor.c (node_free): Likewise.
2320 * cpp.c (dump_queued_macros): Likewise.
2321 * data.c (gfc_assign_data_value): Likewise.
2322 * decl.c (free_variable, free_value, gfc_free_data): Likewise.
2323 (gfc_free_data_all, match_old_style_init): Likewise.
2324 (gfc_set_constant_character_len, gfc_free_enum_history, NUM_DECL):
2326 (gfc_match_modproc): Likewise.
2327 * dependency.c (check_section_vs_section): Likewise.
2328 * error.c (gfc_pop_error, gfc_free_error): Likewise.
2329 * expr.c (free_expr0, gfc_free_expr, gfc_free_actual_arglist): Likewise.
2330 (gfc_free_ref_list, gfc_replace_expr, gfc_copy_ref): Likewise.
2331 (find_substring_ref, gfc_simplify_expr, gfc_check_assign_symbol):
2333 * frontend-passes.c (gfc_run_passes, cfe_expr_0): Likewise.
2334 (strip_function_call, optimize_comparison): Likewise.
2335 * interface.c (gfc_free_interface, arginfo, check_interface0): Likewise.
2336 (CHECK_OS_COMPARISON, gfc_extend_assign, gfc_free_formal_arglist):
2338 * intrinsic.c (gfc_intrinsic_done_1, gfc_convert_type_warn): Likewise.
2339 (gfc_convert_chartype): Likewise.
2340 * io.c (gfc_free_open, compare_to_allowed_values, gfc_free_close):
2342 (gfc_free_filepos, gfc_free_dt, gfc_free_inquire): Likewise.
2343 * match.c (gfc_free_iterator, gfc_match_associate): Likewise.
2344 (gfc_free_alloc_list, gfc_free_namelist, gfc_free_equiv_until):
2346 (free_case, gfc_free_forall_iterator): Likewise.
2348 * module.c (free_pi_tree, resolve_fixups, free_rename): Likewise.
2349 (free_true_name, peek_atom, mio_allocated_wide_string): Likewise.
2350 (mio_pool_string, mio_internal_string, mio_gmp_integer): Likewise.
2351 (mio_gmp_real, mio_expr, mio_typebound_proc): Likewise.
2352 (mio_full_typebound_tree, skip_list, load_equiv): Likewise.
2353 (free_written_common, gfc_use_module, gfc_free_use_stmts): Likewise.
2354 * openmp.c (gfc_free_omp_clauses): Likewise.
2355 * options.c (gfc_post_options): Likewise.
2356 * parse.c (select_type_pop, parse_omp_structured_block): Likewise.
2357 * primary.c (gfc_free_structure_ctor_component): Likewise.
2358 * resolve.c (resolve_structure_cons, check_host_association): Likewise.
2359 (gfc_resolve_forall, resolve_equivalence): Likewise.
2360 * scanner.c (gfc_scanner_done_1, gfc_release_include_path): Likewise.
2361 (gfc_define_undef_line, preprocessor_line, include_line): Likewise.
2362 (load_file, gfc_read_orig_filename): Likewise.
2363 * simplify.c (simplify_transformation_to_array): Likewise.
2364 (gfc_simplify_ibits, simplify_shift, gfc_simplify_ishftc, STRING):
2366 (gfc_simplify_compiler_options): Likewise.
2367 * st.c (gfc_free_statement, gfc_free_statements): Likewise.
2368 (gfc_free_association_list): Likewise.
2369 * symbol.c (free_components, gfc_free_st_label, free_st_labels):
2371 (gfc_delete_symtree, gfc_free_symbol, gfc_undo_symbols): Likewise.
2372 (free_old_symbol, gfc_commit_symbols, free_tb_tree): Likewise.
2373 (free_common_tree, free_uop_tree, free_sym_tree): Likewise.
2374 (gfc_free_dt_list, gfc_free_equiv_infos, gfc_free_equiv_lists):
2376 (gfc_free_finalizer, gfc_free_charlen, free_entry_list): Likewise.
2377 (gfc_free_namespace): Likewise.
2378 * trans-array.c (gfc_free_ss, gfc_trans_array_bound_check): Likewise.
2379 (gfc_conv_array_ref, gfc_conv_ss_startstride): Likewise.
2380 (gfc_trans_dummy_array_bias, gfc_conv_array_parameter): Likewise.
2381 * trans-common.c (get_init_field, create_common): Likewise.
2382 * trans-const.c (gfc_build_wide_string_const): Likewise.
2383 (gfc_conv_string_init): Likewise.
2384 * trans-decl.c (gfc_generate_function_code): Likewise.
2385 * trans-expr.c (gfc_conv_substring, gfc_free_interface_mapping):
2387 (SCALAR_POINTER, gfc_conv_statement_function): Likewise.
2388 (gfc_trans_subarray_assign): Likewise.
2389 * trans-intrinsic.c (conv_generic_with_optional_char_arg): Likewise.
2390 * trans-io.c (gfc_trans_io_runtime_check, set_string): Likewise.
2391 (transfer_namelist_element, transfer_array_component): Likewise.
2392 * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
2393 * trans-stmt.c (cleanup_forall_symtrees, gfc_trans_forall_1): Likewise.
2394 * trans.c (trans_runtime_error_vararg, gfc_restore_backend_locus):
2397 2011-04-15 Jim Meyering <meyering@redhat.com>
2399 gfortran: remove cpp definition of free, ...
2400 in preparation for the s/gfc_free/free/ transformation.
2401 * gfortran.h (free): Remove macro definition that would otherwise
2402 prevent direct use of the function.
2404 2011-04-18 Tobias Burnus <burnus@net-b.de>
2407 * array.c (gfc_match_array_ref): Check for too many codimensions.
2408 * check.c (gfc_check_image_index): Check number of elements
2410 * simplify.c (gfc_simplify_image_index): Remove unreachable checks.
2412 2011-04-18 Tobias Burnus <burnus@net-b.de>
2415 * iresolve.c (gfc_resolve_image_index): Set ts.type.
2416 * simplify.c (gfc_simplify_image_index): Don't abort if the bounds
2417 are not known at compile time and handle -fcoarray=lib.
2418 * trans-intrinsics.c (gfc_conv_intrinsic_function): Handle
2420 (conv_intrinsic_cobound): Fix comment typo.
2421 (trans_this_image): New function.
2422 * trans-array.c (gfc_unlikely): Move to trans.c.
2423 * trans.c (gfc_unlikely): Function moved from trans-array.c.
2424 (gfc_trans_runtime_check): Use it.
2425 * trans-io.c (gfc_trans_io_runtime_check): Ditto.
2426 * trans.h (gfc_unlikely): Add prototype.
2428 2011-04-18 Paul Thomas <pault@gcc.gnu.org>
2431 * trans-expr.c (fcncall_realloc_result): Renamed version of
2432 realloc_lhs_bounds_for_intrinsic_call that does not touch the
2433 descriptor bounds anymore but makes a temporary descriptor to
2435 (gfc_trans_arrayfunc_assign): Modify the reference to above
2438 2011-05-17 Tobias Burnus <burnus@net-b.de>
2441 * trans-decl.c (gfc_get_extern_function_decl): Fix decl
2442 for external procedures with proc arguments.
2444 2011-04-15 Michael Matz <matz@suse.de>
2446 * trans-array.c (toplevel): Include gimple.h.
2447 (gfc_trans_allocate_array_storage): Check flag_stack_arrays,
2448 properly expand variable length arrays.
2449 (gfc_trans_auto_array_allocation): If flag_stack_arrays create
2450 variable length decls and associate them with their scope.
2451 * gfortran.h (gfc_option_t): Add flag_stack_arrays member.
2452 * options.c (gfc_init_options): Handle -fstack_arrays option.
2453 * lang.opt (fstack-arrays): Add option.
2454 * invoke.texi (Code Gen Options): Document it.
2455 * Make-lang.in (trans-array.o): Depend on GIMPLE_H.
2457 2011-04-15 Tobias Burnus <burnus@net-b.de>
2460 * trans-intrinsic.c (conv_intrinsic_cobound): Remove unused
2461 code which is also causing an ICE.
2463 2011-04-14 Nathan Froyd <froydnj@codesourcery.com>
2465 * f95-lang.c (poplevel): Use BLOCK_CHAIN and block_chainon.
2467 2011-04-12 Nathan Froyd <froydnj@codesourcery.com>
2469 * f95-lang.c (union lang_tree_node): Check for TS_COMMON before
2472 2011-04-12 Paul Thomas <pault@gcc.gnu.org>
2476 * trans-array.c (get_std_lbound): For derived type variables
2477 return array valued component lbound.
2479 2011-04-12 Martin Jambor <mjambor@suse.cz>
2481 * trans-decl.c (gfc_generate_function_code): Call
2482 cgraph_get_create_node instead of cgraph_node.
2484 2011-04-11 Tobias Burnus <burnus@net-b.de>
2487 * simplify.c (simplify_bound_dim): Exit for
2488 ucobound's last dimension unless -fcoarray=single.
2489 * trans-array (gfc_conv_descriptor_size_1): Renamed from
2490 gfc_conv_descriptor_size, made static, has now from_dim and
2492 (gfc_conv_descriptor_size): Call gfc_conv_descriptor_size.
2493 (gfc_conv_descriptor_cosize): New function.
2494 * trans-array.h (gfc_conv_descriptor_cosize): New prototype.
2495 * trans-intrinsic.c (conv_intrinsic_cobound): Add input_location
2496 and handle last codim of ucobound for when -fcoarray is not "single".
2498 2011-04-08 Thomas Koenig <tkoenig@gcc.gnu.org>
2501 * gfortran.h (gfc_option_t): Add warn_function_elimination and
2502 flag_frontend_optimize.
2503 * lang.opt (Wfunction-elimination): Add.
2504 (ffrontend-optimize): Add.
2505 * invoke.texi: Add documentation for -Wfunction-elimination
2506 and -ffrontend-optimize. Add -faggressive-function-elimination
2507 to list of code generation options.
2508 * frontend-passes.c (gfc_run_passes): Run optimizations if
2509 flag_frontend_optimize is set.
2510 (warn_function_elimination): New function.
2511 (cfe_expr_0): Call it if requested to do so.
2512 * options.c (gfc_init_options): Initiate warn_function_elimination
2513 and flag_frontend_optimize.
2514 (gfc_post_options): Set flag_frontend_optimize if not specified
2515 by user, depending on the optimization level.
2516 (gfc_handle_option): Handle -Wfunction-elimination and
2517 -ffrontend-optimize.
2519 2011-04-06 Tobias Burnus <burnus@net-b.de>
2522 * trans-intrinsic.c (gfc_conv_intrinsic_function): Fix
2523 call for this_image.
2525 2011-04-05 Nathan Froyd <froydnj@codesourcery.com>
2527 * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Use
2528 build_function_type_list instead of build_function_type. Correct
2529 argument order for func_frexp and func_scalbn.
2531 2011-04-05 Duncan Sands <baldrick@free.fr>
2533 * f95-lang.c (build_builtin_fntypes): Swap frexp parameter types.
2535 2011-04-04 Thomas Koenig <tkoenig@gcc.gnu.org>
2537 * frontend-passes: (optimize_lexical_comparison): New function.
2538 (optimize_expr): Call it.
2539 (optimize_comparison): Also handle lexical comparison functions.
2540 Return false instad of -2 for unequal comparison.
2542 2011-04-04 Thomas Koenig <tkoenig@gcc.gnu.org>
2545 * frontend-passes (cfe_expr_0): Reverse the order of going
2548 2011-04-04 Tobias Burnus <burnus@net-b.de>
2549 Mikael Morin <mikael.morin@sfr.fr>
2552 * check.c (is_coarray): Update - because of DIMEN_THIS_IMAGE.
2553 * expr.c (gfc_is_coindexed): Ditto.
2554 * gfortran.h (gfc_array_ref_dimen_type): Add DIMEN_THIS_IMAGE.
2555 * interface.c (compare_parameter): Use gfc_expr_attr and
2557 * resolve.c (check_dimension, compare_spec_to_ref,
2558 resolve_allocate_expr, check_data_variable): Update for
2560 * simplify.c (gfc_simplify_lcobound, gfc_simplify_this_image,
2561 gfc_simplify_ucobound): Allow non-constant bounds.
2562 * trans-array.c (gfc_set_loop_bounds_from_array_spec,
2563 gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
2564 gfc_set_vector_loop_bounds, gfc_conv_array_index_offset,
2565 gfc_start_scalarized_body, gfc_trans_scalarizing_loops,
2566 gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
2567 gfc_conv_ss_startstride, gfc_conv_loop_setup,
2568 gfc_trans_array_bounds, gfc_conv_expr_descriptor,
2569 gfc_walk_variable_expr): Handle codimen.
2570 * trans-decl.c (gfc_build_qualified_array): Save cobounds.
2571 * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use arg2.
2572 (conv_intrinsic_cobound): New function.
2573 (gfc_conv_intrinsic_function): Call it.
2574 (gfc_walk_intrinsic_function, gfc_add_intrinsic_ss_code): Handle
2575 ucobound, lcobound, this_image.
2576 * fortran/trans-types.c (gfc_build_array_type): Save cobounds.
2577 (gfc_get_dtype): Honour corank.
2578 (gfc_get_nodesc_array_type): Save corank and codimensions.
2579 (gfc_get_array_type_bounds): Save cobound.
2580 * fortran/trans.h (gfc_ss_info,gfc_loopinfo): Add codimen item.
2581 (gfc_array_kind): Add corank item.
2582 (GFC_TYPE_ARRAY_CORANK): New macro.
2584 2011-04-03 Kai Tietz <ktietz@redhat.com>
2587 * Make-lang.in (f95-lang.o): Add some missing dependencies.
2589 2011-04-01 Thomas Koenig <tkoenig@gcc.gnu.org>
2592 * frontend-passes (cfe_register_funcs): Don't
2593 register functions if they appear as iterators in DO loops.
2595 2011-03-30 Michael Matz <matz@suse.de>
2598 * trans-expr.c (realloc_lhs_loop_for_fcn_call): Take loop as parameter,
2599 don't use local variable.
2600 (gfc_trans_arrayfunc_assign): Adjust caller.
2602 2011-03-29 Janus Weil <janus@gcc.gnu.org>
2605 * decl.c (match_procedure_decl,match_ppc_decl): Set flavor of interface.
2606 * module.c (MOD_VERSION): Bump.
2607 (mio_typespec): Read/write 'interface' field.
2608 * primary.c (match_string_constant,match_logical_constant): Remove
2610 (match_complex_constant): Make sure to clear the typespec.
2612 2011-03-29 Thomas Koenig <tkoenig@gcc.gnu.org>
2614 * frontend-passes.c (create_var): Warn about creating an
2615 array temporary if requested.
2617 2011-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
2620 * frontend-passes.c (optimize_trim): Also follow references, except
2621 when they are substring references or array references.
2623 2011-03-27 Tobias Burnus <burnus@net-b.de>
2626 * gfortran.h (gfc_isym_id): Rename GFC_ISYM_NUMIMAGES to
2627 GFC_ISYM_NUM_IMAGES.
2628 (gfc_fcoarray): Add GFC_FCOARRAY_LIB.
2629 * intrinsic.c (add_functions): Update due to GFC_ISYM_NUM_IMAGES
2631 * invoke.texi (-fcoarray=): Document "lib" argument.
2632 * iresolve.c (gfc_resolve_this_image): Fix THIS IMAGE().
2633 * libgfortran.h (libgfortran_stat_codes): Add comments.
2634 * options.c (gfc_handle_coarray_option): Add -fcoarray=lib.
2635 * simplify.c (gfc_simplify_num_images, gfc_simplify_this_image):
2636 Handle GFC_FCOARRAY_LIB.
2637 * trans.h (gfc_init_coarray_decl): New prototype.
2638 (gfor_fndecl_caf_init, gfor_fndecl_caf_finalize,
2639 gfor_fndecl_caf_critical, gfor_fndecl_caf_end_critical,
2640 gfor_fndecl_caf_sync_all, gfor_fndecl_caf_sync_images,
2641 gfor_fndecl_caf_error_stop, gfor_fndecl_caf_error_stop_str,
2642 gfort_gvar_caf_num_images, gfort_gvar_caf_this_image):
2643 New global variables.
2644 * trans-decl.c: Declare several CAF functions (cf. above).
2645 (gfc_build_builtin_function_decls): Initialize those.
2646 (gfc_init_coarray_decl): New function.
2647 (create_main_function): Call CAF init/finalize functions.
2648 * trans-intrinsic.c (trans_this_image, trans_num_images): New.
2649 (gfc_conv_intrinsic_function): Call those.
2650 * trans-stmt.c (gfc_trans_stop, gfc_trans_sync, gfc_trans_critical):
2651 Add code for GFC_FCOARRAY_LIB.
2653 2011-03-26 Janus Weil <janus@gcc.gnu.org>
2656 * class.c (get_unique_hashed_string): Adjust maximum allowable length
2657 for unique type string.
2659 2011-03-25 Kai Tietz <ktietz@redhat.com>
2661 * scanner.c (preprocessor_line): Use filename_cmp
2664 2011-03-25 Tobias Burnus <burnus@net-b.de>
2668 * trans-types.c (gfc_get_function_type): Don't use varargs if the
2669 procedure is known to have no arguments.
2671 2011-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
2674 * gfortran.h (gfc_option_t) : Add
2675 flag_aggressive_function_elimination.
2676 (gfc_dep_compare_functions): Add prototype.
2677 * lang.opt: Add faggressive-function-elimination.
2678 * invoke.texi: Document -faggressive-function-elimination.
2679 * frontend_passes (expr_array): New static variable.
2680 (expr_size): Likewise.
2681 (expr_count): Likewise.
2682 (current_code): Likewise.
2683 (current_ns): Likewise.
2684 (gfc_run_passes): Allocate and free space for expressions.
2685 (cfe_register_funcs): New function.
2686 (create_var): New function.
2687 (cfc_expr_0): New function.
2688 (cfe_code): New function.
2689 (optimize_namespace): Invoke gfc_code_walker with cfe_code
2691 * dependency.c (gfc_dep_compare_functions): New function.
2692 (gfc_dep_compare_expr): Use it.
2693 * options.c (gfc_init_options): Handle
2694 flag_aggressive_function_elimination.
2695 (gfc_handle_option): Likewise.
2697 2011-03-15 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2699 * arith.c (arith_power): Plug memory leak.
2701 2011-03-12 Janus Weil <janus@gcc.gnu.org>
2704 * trans-expr.c (gfc_apply_interface_mapping_to_expr): Replace base type
2705 for polymorphic arguments.
2707 2011-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2710 * intrinsic.texi: Clarify doc of logarithm functions.
2712 2011-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2715 * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Fix type of
2716 the string length variable.
2718 2011-03-11 Janus Weil <janus@gcc.gnu.org>
2721 * module.c (ab_attribute,attr_bits): Add AB_PROC_POINTER_COMP.
2722 (mio_symbol_attribute): Handle attribute 'proc_pointer_comp'.
2724 2011-03-06 Paul Thomas <pault@gcc.gnu.org>
2725 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2728 * expr.c (gfc_is_constant_expr): Only use gfc_constant_ac if
2729 the expression has an iterator. Otherwise, iterate through the
2730 array, checking for constant expressions for each element.
2732 2011-03-04 Janne Blomqvist <jb@gcc.gnu.org>
2735 * intrinsic.texi: Update CTIME and FDATE documentation.
2737 2011-03-03 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2739 * invoke.texi (Option Summary, Fortran Dialect Options)
2740 (Preprocessing Options, Runtime Options, Code Gen Options):
2741 Fix vertical list spacing by using @itemx for additinoal
2742 items, empty line before @table. Fix typos.
2744 2011-02-28 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2747 * intrinsic.texi: Fix doc of the VERIFY intrinsic.
2749 2011-02-26 Tobias Burnus <burnus@net-b.de>
2752 * trans-stmt.c (gfc_trans_allocate): Fix allocation with
2753 type-spec of deferred-length strings.
2755 2011-02-26 Tobias Burnus <burnus@net-b.de>
2758 * openmp.c (gfc_resolve_omp_directive): Resolve if()
2759 condition of OpenMP's task.
2761 2011-02-26 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2764 * intrinsic.texi: Fix doc of the VERIFY intrinsic.
2766 2011-02-24 Tobias Burnus <burnus@net-b.de>
2769 * intrinsic.texi (ALLOCATED, ATAN, BESSEL_JN, BESSEL_YN): Add
2770 multitable for linebreak between different syntax variants.
2772 2011-02-24 Richard Guenther <rguenther@suse.de>
2775 * f95-lang.c (pushdecl): For externs in non-global scope push
2776 a copy of the decl into the BLOCK.
2778 2011-02-23 Mikael Morin <mikael@gcc.gnu.org>
2781 * trans.c (gfc_prepend_expr_to_block): New function.
2782 * trans.h (gfc_prepend_expr_to_block): Declare.
2783 * trans-array.c (gfc_conv_array_parameter): Replace
2784 gfc_add_expr_to_block with gfc_prepend_expr_to_block.
2786 2011-02-22 Paul Thomas <pault@gcc.gnu.org>
2789 * trans-decl.c (gfc_get_extern_function_decl): Don't use the
2790 gsymbol backend_decl if the procedure has a formal argument
2791 that is a procedure.
2793 2011-02-22 Tobias Burnus <burnus@net-b.de>
2796 * trans-stmt.c (gfc_trans_if_1): Use correct line for
2797 expressions in the if condition.
2799 2011-02-20 Tobias Burnus <burnus@net-b.de>
2802 * trans-decl.c (gfc_trans_deferred_vars): Use gfc_set_backend_locus and
2803 gfc_restore_backend_locus to have better debug locations.
2804 * trans-array.c (gfc_trans_deferred_array): Ditto.
2806 2011-02-20 Paul Thomas <pault@gcc.gnu.org>
2810 * trans-types.c (gfc_get_derived_type): Remove code that looks
2811 for decls in gsym and add call to gfc_get_module_backend_decl.
2812 * trans.h : Add prototype for gfc_get_module_backend_decl.
2813 * trans-decl.c (gfc_get_module_backend_decl): New function.
2814 (gfc_get_symbol_decl): Call it.
2816 2011-02-19 Paul Thomas <pault@gcc.gnu.org>
2819 * trans-array.c (get_array_ctor_all_strlen): Move up in file.
2820 (get_array_ctor_var_strlen): Add block dummy and add call to
2821 get_array_ctor_all_strlen instead of giving up on substrings.
2822 Call gcc_unreachable for default case.
2823 (get_array_ctor_strlen): Add extra argument to in call to
2824 get_array_ctor_var_strlen.
2826 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2829 * primary.c (gfc_match_structure_constructor): Handle empty parent
2832 2011-02-18 Tobias Burnus
2835 * trans-expr.c (arrayfunc_assign_needs_temporary): Use
2836 esym to check whether the specific procedure returns an
2837 allocatable or pointer.
2839 2011-02-18 Michael Matz <matz@suse.de>
2842 * gfortran.h (struct gfc_component): Add norestrict_decl member.
2843 * trans.h (struct lang_type): Add nonrestricted_type member.
2844 * trans-expr.c (gfc_conv_component_ref): Search fields with correct
2846 * trans-types.c (mirror_fields, gfc_nonrestricted_type): New.
2847 (gfc_sym_type): Use it.
2849 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2852 * resolve.c (resolve_transfer): Reject variables with procedure pointer
2855 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2858 * gfortran.h (gfc_check_access): Removed prototype.
2859 (gfc_check_symbol_access): Added prototype.
2860 * module.c (gfc_check_access): Renamed to 'check_access', made static.
2861 (gfc_check_symbol_access): New function, basically a shortcut for
2863 (write_dt_extensions,write_symbol0,write_generic,write_symtree): Use
2864 'gfc_check_symbol_access'.
2865 (write_operator,write_module): Renamed 'gfc_check_access'.
2866 * resolve.c (resolve_fl_procedure,resolve_fl_derived,
2867 resolve_fl_namelist,resolve_symbol,resolve_fntype): Use
2868 'gfc_check_symbol_access'.
2870 2011-02-16 Janus Weil <janus@gcc.gnu.org>
2873 * class.c (gfc_build_class_symbol): Set 'class_ok' attribute.
2874 * decl.c (build_sym,attr_decl1): Move setting of 'class_ok' into
2875 'gfc_build_class_symbol'.
2876 (gfc_match_decl_type_spec): Reject unlimited polymorphism.
2877 * interface.c (matching_typebound_op): Check for 'class_ok' attribute.
2878 * match.c (select_type_set_tmp): Move setting of 'class_ok' into
2879 'gfc_build_class_symbol'.
2880 * primary.c (gfc_variable_attr): Check for 'class_ok' attribute.
2882 2011-02-15 Steven G. Kargl <kargl@gcc.gnu.org>
2885 . simplify.c (gfc_simplify_compiler_version): Fix off-by-one issue.
2887 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2890 * parse.c (gfc_build_block_ns): Commit 'block@' symbol.
2892 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2895 * class.c (gfc_build_class_symbol): Give a fatal error on polymorphic
2897 * primary.c (gfc_match_varspec): Avoid ICE for invalid class
2900 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2903 * interface.c (get_expr_storage_size): Handle derived-type components.
2905 2011-02-13 Tobias Burnus <burnus@net-b.de>
2908 * interface.c (compare_parameter): Avoid ICE with
2909 character components.
2911 2011-02-12 Janus Weil <janus@gcc.gnu.org>
2913 * class.c (gfc_build_class_symbol): Reject polymorphic arrays.
2914 * decl.c (build_sym,build_struct,attr_decl1): Use return value of
2915 'gfc_build_class_symbol'.
2917 2011-02-12 Michael Matz <matz@suse.de>
2918 Janus Weil <janus@gcc.gnu.org>
2919 Tobias Burnus <burnus@net-b.de>
2922 * trans-expr.c (conv_parent_component_references): Avoid unintendent
2923 skipping of parent compounds.
2925 2011-02-11 Tobias Burnus <burnus@net-b.de>
2928 * resolve.c (resolve_formal_arglist): PURE with VALUE
2929 and no INTENT: Add -std= diagnostics.
2931 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2934 * resolve.c (resolve_procedure_interface): If interface has a result
2935 variable, copy the typespec and set result pointer to self.
2937 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2940 * resolve.c (resolve_typebound_subroutine): Remove erroneous line.
2942 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2945 * trans-decl.c (init_intent_out_dt): Handle CLASS arguments.
2947 2011-02-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2949 * io.c (match_io_element): Do not set dt if not inquire.
2951 2011-02-08 Janus Weil <janus@gcc.gnu.org>
2954 * expr.c (gfc_check_assign_symbol): Reject pointers as pointer
2955 initialization target.
2957 2011-02-07 Janne Blomqvist <jb@gcc.gnu.org>
2958 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2960 * gfortran.texi (Thread-safety): texinfo styling fixes.
2961 * intrinsic.texi: Likewise.
2963 2011-02-06 Janne Blomqvist <jb@gcc.gnu.org>
2965 * gfortran.texi (Compiler Characteristics): Add reference to
2966 thread-safety section.
2968 2011-02-06 Janne Blomqvist <jb@gcc.gnu.org>
2970 * gfortran.texi (Thread-safety): New section.
2971 * intrinsic.texi (EXECUTE_COMMAND_LINE): Mention thread-safety.
2973 (GET_ENVIRONMENT_VARIABLE): Likewise.
2976 2011-02-06 Paul Thomas <pault@gcc.gnu.org>
2979 * trans-stmt.c (gfc_trans_allocate): For deferred character
2980 length allocations with SOURCE, store to the values and string
2981 length to avoid calculating twice. Replace gfc_start_block
2982 with gfc_init_block to avoid unnecessary contexts and to keep
2983 declarations of temporaries where they should be. Tidy up the
2986 2011-02-05 Janne Blomqvist <jb@gcc.gnu.org>
2989 * intrinsic.texi (SYSTEM_CLOCK): Update documentation.
2991 2011-02-02 Janus Weil <janus@gcc.gnu.org>
2992 Paul Thomas <pault@gcc.gnu.org>
2995 * trans-expr.c (gfc_trans_class_init_assign): Add call to
2996 gfc_get_derived_type.
2997 * module.c (read_cleanup): Do not use unique_symtrees for vtabs
3000 2011-02-02 Janus Weil <janus@gcc.gnu.org>
3003 * resolve.c (resolve_fl_variable): Handle polymorphic allocatables.
3005 2011-02-01 Janus Weil <janus@gcc.gnu.org>
3008 * trans-expr.c (gfc_conv_structure): Handle constructors for procedure
3009 pointer components with allocatable result.
3011 2011-01-31 Janus Weil <janus@gcc.gnu.org>
3014 * trans-expr.c (gfc_conv_procedure_call): Handle procedure pointers
3015 with pointer or allocatable result.
3017 2011-01-31 Paul Thomas <pault@gcc.gnu.org>
3020 * trans-stmt.c (gfc_trans_allocate): Improve handling of
3021 deferred character lengths with SOURCE.
3022 * iresolve.c (gfc_resolve_repeat): Calculate character
3023 length from source length and ncopies.
3024 * dump-parse-tree.c (show_code_node): Show MOLD and SOURCE
3025 expressions for ALLOCATE.
3027 2011-01-31 Janus Weil <janus@gcc.gnu.org>
3030 * resolve.c (resolve_typebound_subroutine): Bug fix for the case of
3031 an argument of a typebound assignment being a component.
3033 2011-01-31 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
3035 * gfortranspec.c (add_arg_libgfortran) [HAVE_LD_STATIC_DYNAMIC] Use
3036 LD_STATIC_OPTION, LD_DYNAMIC_OPTION.
3038 2011-01-31 Tobias Burnus <burnus@net-b.de>
3041 * resolve.c (resolve_fl_procedure): Reject stmt functions
3042 with pointer/allocatable attribute.
3044 2011-01-31 Tobias Burnus <burnus@net-b.de>
3047 * interface.c (gfc_procedure_use): Add explicit interface check for
3048 pointer/allocatable functions.
3050 2011-01-30 Paul Thomas <pault@gcc.gnu.org>
3053 * trans-expr.c (gfc_trans_assignment_1): If the rhs is an op
3054 expr and is assigned to a deferred character length scalar,
3055 make sure that the function is called before reallocation,
3056 so that the length is available. Include procedure pointer
3057 and procedure pointer component rhs as well.
3062 * gfortran.dg/allocatable_function_5.f90: New test not added by
3063 mistake on 2011-01-28.
3065 2011-01-29 Tobias Burnus <burnus@net-b.de>
3068 * check.c (gfc_check_shape): Support kind argument in SHAPE.
3069 * intrinsic.c (add_functions): Ditto.
3070 * resolve.c (gfc_resolve_shape): Ditto.
3071 * simplify.c (gfc_simplify_shape): Ditto.
3072 * intrinsic.h (gfc_check_shape, gfc_resolve_shape,
3073 gfc_simplify_shape): Update prototypes.
3074 * intrinisc.text (SHAPE): Document kind argument.
3076 2011-01-28 Tobias Burnus <burnus@net-b.de>
3079 * resolve.c (resolve_formal_arglist): Allow arguments with VALUE
3080 attribute also without INTENT.
3082 2011-01-28 Tobias Burnus <burnus@net-b.de>
3084 * gfortran.texi (Fortran 2003 status): Mention support for
3085 nonconstant namelist variables.
3087 2011-01-28 Paul Thomas <pault@gcc.gnu.org>
3088 Tobias Burnus <burnus@gcc.gnu.org>
3093 * interface.c (compare_actual_formal): An allocatable or pointer
3094 deferred length actual is only allowed if the formal argument
3095 is also deferred length. Clean up whitespace.
3096 * trans-expr.c (gfc_conv_procedure_call): Pass string length for
3097 deferred character length formal arguments by reference. Do the
3098 same for function results.
3099 (gfc_trans_pointer_assignment): Do not do runtime check of lhs
3100 and rhs character lengths, if deferred length lhs. In this case
3101 set the lhs character length to that of the rhs.
3102 (gfc_conv_string_parameter): Remove assert that string length is
3104 (is_scalar_reallocatable_lhs): New function.
3105 (alloc_scalar_allocatable_for_assignment): New function.
3106 (gfc_trans_assignment_1): Call above new function. If the rhs is
3107 a deferred character length itself, makes ure that the function
3108 is called before reallocation, so that the length is available.
3109 (gfc_trans_asssignment): Remove error about assignment to
3110 deferred length character variables.
3111 * gfortran.texi : Update entry about (re)allocation on
3113 * trans-stmt.c (gfc_trans_allocate): Add code to handle deferred
3114 length character variables.
3115 * module.c (mio_typespec): Transfer deferred characteristic.
3116 * trans-types.c (gfc_get_function_type): New code to generate
3117 hidden typelist, so that those character lengths that are
3118 passed by reference get the right type.
3119 * resolve.c (resolve_contained_fntype): Supress error for
3120 deferred character length functions.
3121 (resolve_function, resolve_fl_procedure) The same.
3122 (check_symbols): Remove the error that support for
3123 entity with deferred type parameter is not yet implemented.
3124 (resolve_fl_derived): The same.
3125 match.c (alloc_opt_list): Allow MOLD for deferred length object.
3126 * trans-decl.c (gfc_get_symbol_decl): For deferred character
3127 length dummies, generate a local variable for string length.
3128 (create_function_arglist): Hidden length can be a pointer.
3129 (gfc_trans_deferred_vars): For deferred character length
3130 results and dummies, assign the string length to the local
3131 variable from the hidden argument on entry and the other way
3132 round on exit, as appropriate.
3134 2011-01-27 Tobias Burnus <burnus@net-b.de>
3137 * trans-decl.c (gfc_generate_function_code): Fix init
3138 of allocatable result variable with allocatable components.
3140 2011-01-27 Tobias Burnus <burnus@net-b.de>
3143 * options.c (gfc_handle_module_path_options): Save
3144 module path without trailing slash as include path.
3146 2011-01-25 Tobias Burnus <burnus@net-b.de>
3149 * interface.c (gfc_check_operator_interface): Fix
3150 defined-assignment check.
3152 2011-01-23 Tobias Burnus <burnus@net-b.de>
3155 * trans-decl.c (gfc_trans_deferred_vars): Do not nullify
3156 scalar allocatable dummy arguments.
3158 2011-01-22 Thomas Koenig <tkoenig@gcc.gnu.org>
3161 * resolve.c (gfc_iso_c_func_interface): For C_LOC,
3162 check for array sections followed by component references
3163 which are illegal. Also check for coindexed arguments.
3165 2011-01-22 Tobias Burnus <burnus@net-b.de>
3168 * primary.c (gfc_match_varspec): Relax gcc_assert to allow for
3171 2011-01-21 Tobias Burnus <burnus@net-b.de>
3174 * error.c (gfc_error_now, gfc_fatal_error, gfc_error_check):
3175 Use defined instead of magic number exit status codes.
3176 * scanner.c (include_line, gfc_new_file): Ditto.
3178 2011-01-21 Tobias Burnus <burnus@net-b.de>
3181 * expr.c (gfc_check_pointer_assign): Reject expr data-targets
3182 without pointer attribute.
3184 2011-01-18 Janus Weil <janus@gcc.gnu.org>
3187 * resolve.c (expression_rank): Fix rank of procedure poiner components.
3188 * trans-expr.c (gfc_conv_procedure_call): Take care of procedure
3189 pointer components as actual arguments.
3191 2011-01-17 Jakub Jelinek <jakub@redhat.com>
3194 * gfortran.h (struct gfc_omp_saved_state): New type.
3195 (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New prototypes.
3196 * resolve.c (resolve_global_procedure): Call it around gfc_resolve
3198 * openmp.c (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New
3201 2011-01-17 Tobias Burnus <burnus@net-b.de>
3204 * invoke.texi (Options to request or suppress errors
3205 and warnings): Fix cross link.
3207 2011-01-15 Tobias Burnus <burnus@net-b.de>
3209 * gfortran.texi: Update Fortran 2003 Status section.
3212 * invoke.texi: Add missing "-E" to the -dM example.
3214 2011-01-13 Tobias Burnus <burnus@net-b.de>
3217 * intrinsic.texi (get_command_argument, get_environment_variable):
3218 Mark arguments as optional in the Arguments section.
3220 2011-01-13 Kai Tietz <kai.tietz@onevision.com>
3221 Tobias Burnus <burnus@net-b.de>
3224 * trans-decl.c (gfc_get_extern_function_decl,
3225 build_function_decl): Set TREE_PUBLIC/TREE_EXTERNAL before
3226 calling decl_attributes.
3228 2011-01-13 Tobias Burnus <burnus@net-b.de>
3229 Mikael Morin <mikael@gcc.gnu.org>
3233 * gfortran.h (gfc_code): Move union ext's case_list into
3235 * dump-parse-tree.c (show_code_node): Adapt by prefixing case_list
3237 * frontend-passes.c (gfc_code_walker): Ditto.
3238 * match.c (gfc_match_goto, gfc_match_call, gfc_match_case,
3239 gfc_match_type_is, gfc_match_class_is): Ditto.
3240 * resolve.c (resolve_select, resolve_select_type): Ditto.
3241 * st.c (gfc_free_statement): Ditto.
3242 * trans-stmt.c (gfc_trans_integer_select, gfc_trans_logical_select,
3243 gfc_trans_character_select): Ditto.
3244 * parse.c (resolve_all_program_units): For error recovery, avoid
3245 segfault is proc_name is NULL.
3247 2011-01-11 Paul Thomas <pault@gcc.gnu.org>
3250 * trans-array.c (gfc_alloc_allocatable_for_assignment): Change
3251 to be standard compliant by testing for shape rather than size
3252 before skipping reallocation. Improve comments.
3254 2011-01-09 Janus Weil <janus@gcc.gnu.org>
3257 * resolve.c (resolve_actual_arglist): Remove unneeded and buggy piece
3260 2011-01-09 Thomas Koenig <tkoenig@gcc.gnu.org>
3263 * resolve.c (is_scalar_expr_ptr): For a substring reference,
3264 use gfc_dep_compare_expr to compare start and end expession.
3265 Add FIXME for using gfc_deb_compare_expr elsewhere.
3267 2011-01-09 Janus Weil <janus@gcc.gnu.org>
3270 * class.c (get_unique_type_string): Make type name start with upper
3273 2011-01-08 Thomas Koenig <tkoenig@gcc.gnu.org>
3276 * invoke.texi: Mention -ffree-line-length-none and
3277 -ffixed-line-length-none for preprocessing.
3279 2011-01-08 Paul Thomas <pault@gcc.gnu.org>
3282 * trans-expr.c (gfc_conv_procedure_call): With a non-copying
3283 procedure argument (eg TRANSPOSE) use a temporary if there is
3284 any chance of aliasing due to host or use association.
3285 (arrayfunc_assign_needs_temporary): Correct logic for function
3286 results and do not use a temporary for implicitly PURE
3287 variables. Use a temporary for Cray pointees.
3288 * symbol.c (gfc_add_save): Explicit SAVE not compatible with
3289 implicit pureness of containing procedure.
3290 * decl.c (match_old_style_init, gfc_match_data): Where decl
3291 would fail in PURE procedure, set implicit_pure to zero.
3292 * gfortran.h : Add implicit_pure to structure symbol_attr and
3293 add prototype for function gfc_implicit_pure.
3294 * expr.c (gfc_check_pointer_assign, gfc_check_vardef_context):
3295 Where decl would fail in PURE procedure, reset implicit_pure.
3296 * io.c (match_vtag, gfc_match_open, gfc_match_close,
3297 gfc_match_print, gfc_match_inquire, gfc_match_wait): The same.
3298 * match.c (gfc_match_critical, gfc_match_stopcode,
3299 sync_statement, gfc_match_allocate, gfc_match_deallocate): The
3301 * parse.c (decode_omp_directive): The same.
3302 (parse_contained): If not PURE, set implicit pure attribute.
3303 * resolve.c (resolve_formal_arglist, resolve_structure_cons,
3304 resolve_function, resolve_ordinary_assign) : The same.
3305 (gfc_implicit_pure): New function.
3306 * module.c (mio_symbol_attribute): Introduce AB_IMPLICIT_PURE
3307 to ab_attribute enum and use it in this function.
3309 2011-01-08 Thomas Koenig <tkoenig@gcc.gnu.org>
3312 * symbol.c (gfc_symbols_could_alias): Strip gfc_ prefix,
3313 make static and move in front of its only caller, to ...
3314 * trans-array.c (symbols_could_alias): ... here.
3315 Pass information about pointer and target status as
3316 arguments. Allocatable arrays don't alias anything
3317 unless they have the POINTER attribute.
3318 (gfc_could_be_alias): Keep track of pointer and target
3319 status when following references. Also check if typespecs
3320 of components match those of other components or symbols.
3322 2011-01-07 Tobias Burnus <burnus@net-b.de>
3325 * class.c (gfc_build_class_symbol): Mark __vtab as attr.vtab.
3326 * intrinsic.c (add_functions): Use simplify functions for
3327 EXTENDS_TYPE_OF and SAME_TYPE_AS.
3328 * intrinsic.h (gfc_simplify_extends_type_of,
3329 gfc_simplify_same_type_as): New prototypes.
3330 * simplify.c (is_last_ref_vtab, gfc_simplify_extends_type_of,
3331 gfc_simplify_same_type_as): New functions.
3333 2011-01-07 Janus Weil <janus@gcc.gnu.org>
3337 * gfortran.h (gfc_lval_expr_from_sym): Moved prototype.
3338 * class.c (gfc_class_null_initializer): Initialize _vptr to declared
3340 * expr.c (gfc_lval_expr_from_sym): Moved here from symbol.c.
3341 * resolve.c (resolve_deallocate_expr): _data component will be added
3342 at translation stage.
3343 * symbol.c (gfc_lval_expr_from_sym): Moved to expr.c.
3344 * trans-stmt.c (gfc_trans_deallocate): Reset _vptr to declared type.
3346 2011-01-06 Daniel Franke <franke.daniel@gmail.com>
3350 * parse.c (parse_interface): Remove check for procedure types.
3351 * interface.c (check_interface0): Verify that procedures are
3352 either all SUBROUTINEs or all FUNCTIONs.
3354 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3357 * trans-expr.c (gfc_trans_class_assign): Bugfix for r168524 (make sure
3358 'vtab' is initialized).
3360 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3363 * trans-expr.c (gfc_trans_class_assign): For a polymorphic NULL pointer
3364 assignment, set the _vptr component to the declared type.
3366 2011-01-05 Thomas Koenig <tkoenig@gcc.gnu.org>
3369 * resolve.c (resolve_allocate_deallocate): Follow references to
3370 check for duplicate occurence of allocation/deallocation objects.
3372 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3375 * trans-decl.c (gfc_trans_deferred_vars): Initialize the _vpr component
3376 of polymorphic allocatables according to their declared type.
3378 2011-01-04 Janus Weil <janus@gcc.gnu.org>
3381 * class.c (gfc_find_derived_vtab): Set the module field for the copying
3382 routine to make sure it receives module name mangling.
3384 2011-01-03 Jakub Jelinek <jakub@redhat.com>
3386 * gfortranspec.c (lang_specific_driver): Update copyright notice
3389 2011-01-03 Janus Weil <janus@gcc.gnu.org>
3391 * intrinsic.texi (LEADZ): Fix example.
3393 2011-01-02 Janus Weil <janus@gcc.gnu.org>
3396 * class.c (gfc_find_derived_vtab): Use EXEC_INIT_ASSIGN for __copy_
3400 Copyright (C) 2011 Free Software Foundation, Inc.
3402 Copying and distribution of this file, with or without modification,
3403 are permitted in any medium without royalty provided the copyright
3404 notice and this notice are preserved.