1 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
3 * trans-array.c (gfc_trans_array_constructor): Loop over the parents.
5 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
7 * trans-array.c (gfc_set_loop_bounds_from_array_spec): Loop over the
10 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
12 * trans.h (struct gfc_ss): New field parent.
13 * trans-array.c (gfc_trans_scalarizing_loops): Skip clearing if a
15 * trans-expr.c (gfc_advance_se_ss_chain): Move to parent ss at the
18 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
20 * trans-array.h (gfc_trans_create_temp_array): Remove loop argument.
21 * trans-array.c (gfc_trans_create_temp_array): Ditto. Get loop from ss.
22 Update reference to loop. Remove loop argument.
23 (gfc_trans_array_constructor, gfc_conv_loop_setup): Update calls to
24 gfc_trans_create_temp_array.
25 * trans-expr.c (gfc_conv_procedure_call): Ditto.
26 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
27 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
28 Set loop before calling gfc_trans_create_temp_array.
30 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
32 * trans-array.c (gfc_trans_create_temp_array): New variable total_dim.
33 Set total_dim to loop's rank. Replace usages of loop's rank.
35 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
37 * trans-array.c (gfc_trans_array_constructor, trans_array_constructor):
38 Rename the former to the later. Get loop from ss.
40 (gfc_add_loop_ss_code): Update call.
42 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
44 * trans-array.c (gfc_set_vector_loop_bounds): Get loop from ss.
46 (gfc_add_loop_ss_code): Update call.
48 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
50 * trans.h (struct gfc_ss): New field loop.
51 * trans-array.c (set_ss_loop): New function.
52 (gfc_add_ss_to_loop): Call set_ss_loop.
54 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
56 * trans.h (struct gfc_ss_info): New field refcount.
57 * trans-array.c (free_ss_info): Decrement refcount. Return early if
59 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss): Increment
62 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
64 * trans-array.c (gfc_trans_create_temp_array): Move invariant condition
65 out of the containing loop.
67 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
69 * trans-array.c (gfc_conv_loop_setup, gfc_trans_create_temp_array):
70 Move specloop arrays clearing from the former to the latter.
72 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
74 * trans-array.c (set_loop_bounds): Separate the beginning of
75 gfc_conv_loop_setup into a function of its own.
76 (set_delta): Separate the end of gfc_conv_loop_setup into a function
78 (gfc_conv_loop_setup): Call set_loop_bounds and set delta.
79 (set_loop_bounds, set_delta, gfc_conv_loop_setup): Make loopspec a
80 pointer to the specloop field from the loop struct.
82 2011-11-03 Tobias Burnus <burnus@net-b.de>
85 * interface.c (gfc_compare_derived_types): Fix check for BIND(C).
87 2011-11-03 Tobias Burnus <burnus@net-b.de>
90 * trans-decl.c (gfc_finish_var_decl): Mark PARAMETER as TREE_READONLY.
92 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
94 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
95 gfc_ss::where into gfc_ss_info.
96 * trans-array.c (gfc_add_loop_ss_code):
97 Update reference chains.
98 * trans-stmt.c (gfc_trans_where_assign, gfc_trans_where_3): Ditto.
100 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
102 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
103 gfc_ss::useflags into gfc_ss_info.
104 * trans-array.c (gfc_mark_ss_chain_used, gfc_trans_preloop_setup,
105 gfc_trans_scalarizing_loops, gfc_trans_scalarized_boundary):
106 Update reference chains.
107 * trans-expr.c (gfc_conv_procedure_call): Ditto.
108 * trans-intrinsic.c (gfc_conv_intrinsic_function): Ditto.
110 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
112 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
113 gfc_ss::data::info into gfc_ss_info::data and remove empty union
115 * trans-array.c (gfc_free_ss, gfc_trans_create_temp_array,
116 gfc_trans_constant_array_constructor, gfc_trans_array_constructor,
117 gfc_set_vector_loop_bounds, gfc_add_loop_ss_code,
118 gfc_conv_ss_descriptor, gfc_trans_array_bound_check,
119 gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
120 add_array_offset, gfc_trans_preloop_setup,
121 gfc_trans_scalarized_boundary, gfc_conv_section_startstride,
122 gfc_conv_ss_startstride, gfc_could_be_alias,
123 gfc_conv_loop_setup, gfc_conv_expr_descriptor,
124 gfc_alloc_allocatable_for_assignment, gfc_walk_array_ref):
125 Update reference chains and factor them where possible.
126 * trans-expr.c (gfc_conv_variable, gfc_conv_subref_array_arg,
127 gfc_conv_procedure_call, gfc_trans_subarray_assign): Updata reference
129 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
130 * trans-io.c (transfer_array_component): Ditto.
131 * trans-stmt.c (gfc_conv_elemental_dependencies,
132 gfc_trans_pointer_assign_need_temp): Ditto.
134 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
136 * trans.h (struct gfc_ss, struct gfc_ss_info): Move member struct
137 gfc_ss::data::temp into gfc_ss_info::data.
138 * trans-array.c (gfc_get_temp_ss, gfc_conv_loop_setup): Update reference
141 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
143 * trans.h (struct gfc_ss, struct gfc_ss_info): Move member struct
144 gfc_ss::data::scalar into newly created union gfc_ss_info::data,
145 and rename subfield expr to value.
146 * trans-array.c (gfc_add_loop_ss_code, gfc_conv_array_index_offset,
147 gfc_conv_expr_descriptor): Update reference chains.
148 * trans-const.c (gfc_conv_constant): Ditto.
149 * trans-expr.c (gfc_conv_expr): Ditto.
151 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
153 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field
154 string_length from the former struct to the latter.
156 (gfc_get_temp_ss, gfc_trans_array_constructor, gfc_add_loop_ss_code,
157 gfc_conv_ss_descriptor, gfc_conv_scalarized_array_ref,
158 gfc_conv_resolve_dependencies, gfc_conv_loop_setup,
159 gfc_conv_expr_descriptor): Update references to string_length and
160 factor common reference chains where possible.
161 * trans-const.c (gfc_conv_constant): Ditto.
162 * trans-expr.c (gfc_conv_variable, gfc_conv_subref_array_arg,
163 gfc_conv_expr): Ditto.
165 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
167 * trans.h (struct gfc_ss, struct gfc_ss_info): Move field expr from
168 the former struct to the latter.
170 (gfc_get_array_ss, gfc_get_scalar_ss,
171 gfc_trans_constant_array_constructor, gfc_trans_array_constructor,
172 gfc_add_loop_ss_code, gfc_conv_ss_descriptor,
173 gfc_trans_array_bound_check, gfc_conv_array_index_offset,
174 gfc_conv_scalarized_array_ref, gfc_conv_ss_startstride,
175 gfc_could_be_alias, gfc_conv_resolve_dependencies,
176 gfc_conv_loop_setup, gfc_conv_expr_descriptor,
177 gfc_alloc_allocatable_for_assignment): Update references to expr and
178 factor common reference chains where possible.
179 * trans-const.c (gfc_conv_constant): Ditto.
180 * trans-expr.c (gfc_conv_variable, gfc_conv_procedure_call,
181 gfc_conv_array_constructor_expr, gfc_conv_expr,
182 gfc_conv_expr_reference): Ditto.
183 * trans-intrinsic.c (trans_this_image, gfc_conv_intrinsic_bound,
184 gfc_conv_intrinsic_cobound, gfc_conv_intrinsic_funcall,
185 gfc_add_intrinsic_ss_code): Ditto.
186 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
188 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
190 * trans.h (struct gfc_ss_info): New struct.
191 (gfc_get_ss_info): New macro.
192 (struct gfc_ss): Move type field to struct gfc_ss_info.
193 Add an info field of type gfc_ss_info.
194 * trans-array.c (free_ss_info): New function.
195 (gfc_free_ss): Call free_ss_info.
196 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss):
197 Allocate gfc_ss_info field.
198 (gfc_get_array_ss, gfc_get_temp_ss, gfc_get_scalar_ss,
199 gfc_set_vector_loop_bounds, gfc_add_loop_ss_code,
200 gfc_conv_array_index_offset, gfc_trans_preloop_setup,
201 gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
202 gfc_conv_ss_startstride, gfc_conv_resolve_dependencies,
203 gfc_conv_loop_setup, transposed_dims, gfc_conv_expr_descriptor,
204 gfc_walk_elemental_function_args): Update references to type.
205 * trans-const.c (gfc_conv_constant): Factor common reference chains
206 and update reference to type.
207 * trans-expr.c (gfc_conv_procedure_call, gfc_trans_assignment_1):
208 Update reference to type.
209 (gfc_conv_array_constructor_expr, gfc_conv_expr,
210 gfc_conv_expr_reference): Ditto. Factor common reference chains.
211 * trans-intrinsic.c (walk_inline_intrinsic_transpose): Update references
213 * trans-stmt.c (gfc_trans_where_assign): Ditto.
215 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
217 * trans.h (struct gfc_ss, struct gfc_array_info): Move shape field
218 from the former struct to the latter.
219 * trans-array.c (gfc_conv_ss_startstride, gfc_conv_loop_setup):
220 Update field references.
221 * trans-expr.c (gfc_trans_subarray_assign): Update field references
222 and factor common reference chains.
223 * trans-io.c (transfer_array_component): Ditto.
225 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
227 * trans.h (struct gfc_array_info): Move dim and dimen fields...
228 (struct gfc_ss): ... here. Remove gfc_ss::data::temp::dimen field.
229 * trans-array.c (gfc_conv_loop_setup): Remove temp_ss dim array
231 (gfc_get_temp_ss): Initialize dim and dimen.
232 (gfc_free_ss, gfc_get_array_ss, gfc_get_temp_ss,
233 gfc_set_loop_bounds_from_array_spec, get_array_ref_dim,
234 gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
235 gfc_set_vector_loop_bounds, gfc_conv_scalarized_array_ref,
236 gfc_trans_preloop_setup, gfc_conv_ss_startstride,
237 gfc_conv_resolve_dependencies, gfc_conv_loop_setup, transposed_dims,
238 gfc_conv_expr_descriptor, gfc_alloc_allocatable_for_assignment,
239 gfc_walk_array_ref): Update field references.
240 * trans-expr.c (gfc_conv_subref_array_arg, gfc_conv_procedure_call):
242 * trans-intrinsic.c (walk_inline_intrinsic_transpose): Ditto.
243 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
245 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
247 * trans.h (struct gfc_ss_info, struct gfc_array_info):
248 Rename the former to the latter.
249 * trans-array.c (gfc_get_array_ss, gfc_trans_allocate_array_storage,
250 get_array_ref_dim, gfc_trans_create_temp_array,
251 gfc_trans_constant_array_constructor, gfc_set_vector_loop_bounds,
252 gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
253 add_array_offset, gfc_trans_preloop_setup, gfc_conv_section_startstride,
254 gfc_conv_ss_startstride, gfc_conv_loop_setup, transposed_dims,
255 gfc_conv_expr_descriptor): Update all uses.
256 * trans-expr.c (gfc_conv_subref_array_arg, gfc_conv_procedure_call):
258 * trans-intrinsic.c (gfc_conv_intrinsic_transfer,
259 walk_inline_intrinsic_transpose): Ditto.
260 * trans-stmt.c (gfc_conv_elemental_dependencies,
261 gfc_trans_pointer_assign_need_temp): Ditto.
263 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
265 * trans-array.c (dim_ok, transposed_dims): Rename the former to the
266 latter. Change argument type. Invert return value.
267 (gfc_conv_expr_descriptor): Update calls.
269 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
271 * trans-array.c (get_array_ref_dim): Change argument type and name.
272 Obtain previous argument from the new argument in the body.
273 (gfc_trans_create_temp_arry, gfc_conv_loop_setup): Update calls.
275 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
277 * trans-array.c (gfc_set_vector_loop_bounds, set_vector_loop_bounds):
278 Rename the former to the latter. Change type and name of argument.
279 Get previous argument from the new one.
280 (gfc_add_loop_ss_code): Update call.
282 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
284 * trans-array.h (gfc_trans_create_temp_array): Replace info argument
286 * trans-array.c (gfc_trans_create_temp_array): Ditto. Get info from ss.
287 (gfc_trans_array_constructor, gfc_conv_loop_setup): Update call to
288 gfc_trans_create_temp_array.
289 * trans-expr.c (gfc_conv_procedure_call): Ditto.
290 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto.
291 * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto.
293 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
295 * trans-array.c (gfc_trans_array_bound_check): Use ss argument
298 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
300 * trans-array.c (gfc_trans_array_bound_check,
301 trans_array_bound_check): Rename the former to the latter.
302 Replace descriptor argument with ss argument. Get descriptor from ss.
303 (gfc_conv_array_index_offset, conv_array_index_offset): Rename the
304 former to the latter. Update call to trans_array_bound_check.
305 Replace info argument with ss argument. Get info from ss.
306 (gfc_conv_scalarized_array_ref): Update call to conv_array_index_offset.
307 (add_array_offset): Ditto
309 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
311 * trans-array.c (gfc_trans_constant_array_constructor,
312 trans_constant_array_constructor): Rename the former to the latter.
313 Don't set the rank of the temporary for the loop. Remove then unused
315 (gfc_trans_array_constructor): Update call.
317 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
319 * trans-array.c (gfc_trans_scalarizing_loops): Stop loop before end
320 marker, not after it.
322 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
324 * trans-array.c (gfc_conv_loop_setup): Also skip temporary arrays.
326 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
328 * trans-array.c (gfc_conv_ss_startstride): Access array bounds along
329 array dimensions instead of loop dimensions.
331 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
333 * trans-array.c (gfc_trans_preloop_setup): Assertify one condition.
335 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
337 * trans-array.c (gfc_walk_array_ref): Skip coarray dimensions.
339 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
341 * trans-array.c (get_array_ref_dim): Remove redundant condition.
343 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
345 * trans-array.c (gfc_trans_preloop_setup): Move common code...
346 (add_array_offset): ...into that new function.
348 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
350 * trans-array.c (gfc_trans_preloop_setup): Use loop's dimension instead
351 of array's dimention. Check that it is indeed the same.
353 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
355 * trans-array.c (gfc_trans_preloop_setup): Remove redundant assertion.
356 Special case outermost loop.
358 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
360 * trans-array.c (gfc_trans_preloop_setup): Factor loop index
363 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
365 * trans-array.c (gfc_trans_preloop_setup): Move code earlier.
367 2011-11-03 Mikael Morin <mikael@gcc.gnu.org>
369 * trans-array.c (gfc_trans_preloop_setup): Move array reference
370 initialisation earlier. Factor subsequent array references.
372 2011-11-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
374 * Makef-lang.in (gfortranspec.o): Pass SHLIB instead of SHLIB_LINK.
376 2011-10-30 Steven G. Kargl <kargl@gcc.gnu.org>
379 * check.c (gfc_check_dshift): Update argument checking for BOZ.
380 Update checking SHIFT against BITSIZE of I or J.
381 * intrinsic.texi: Update docs for DSHIFTL and DSHIFTR.
383 2011-10-28 Steven G. Kargl <kargl@gcc.gnu.org>
385 * check.c (gfc_check_atan_2): Typo in comment.
386 (gfc_check_nearest): If 's' is constant, check that it is not 0.
387 * simplify.c (simplify_dshift, gfc_simplify_ibclr, gfc_simplify_ibits,
388 gfc_simplify_ibset, simplify_shift, gfc_simplify_ishftc,
389 gfc_simplify_nearest): Remove dead code.
391 2011-10-23 Steven G. Kargl <kargl@gcc.gnu.org>
393 * simplify.c (simplify_transformation_to_array): Fix memory leak.
395 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
398 * check.c (gfc_check_ishftc): Check args are constant before
399 extracting the integer.
401 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
404 * check.c (less_than_bitsize1): Check |shift| <= bit_size(i).
405 (gfc_check_ishftc): Check |shift| <= bit_size(i) and check
406 that size is positive.
408 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
411 * resolve.c (resolve_ref): Check return value of resolve_substring().
413 2011-10-20 Steven G. Kargl <kargl@gcc.gnu.org>
415 * io.c (match_dt_format): Match a user-defined operator or a kind
416 type prefixed string.
418 2011-10-19 Janus Weil <janus@gcc.gnu.org>
421 * check.c (gfc_check_sizeof): Reject procedures as argument of SIZEOF.
422 * intrinsinc.texi (SIZEOF): Document it.
423 (STORAGE_SIZE): Fix special characters. Fix line breaks.
425 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
428 * trans.c (gfc_build_array_ref): If type is not an array, check that
429 there is nothing to do, and do nothing.
431 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
434 * trans-types.c (gfc_build_array_type): Don't force lower bound to one
435 in the deferred case.
437 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
440 * simplify.c (simplify_cobound): Accept non-last-in-ref-chain coarrays.
441 Don't set already set array ref.
443 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
445 * array.c (gfc_find_array_ref): Remove coarray-specific handling.
447 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
450 * check.c (dim_corank_check): Use gfc_get_corank to get corank.
452 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
455 * trans-intrinsic.c (walk_coarray): Change AR_ELEMENT to AR_SECTION.
458 * trans-intrinsic.c (walk_coarray): Use gfc_walk_array_ref for
459 the scalarization chain initialization.
461 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
464 * trans-intrinsic.c (walk_coarray): Allow subreferences after a
465 coarray object reference.
467 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
470 * trans-array.c (gfc_walk_array_ref): Allow zero rank arrays
471 if they are coarrays.
473 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
475 * trans-array.h (gfc_walk_array_ref): New prototype.
476 * trans-array.c (gfc_walk_array_ref): New function, containing
477 all but the beginning of gfc_walk_variable_expr's code.
478 (gfc_walk_variable_expr): Use gfc_walk_array_ref.
480 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
483 * trans-array.c (gfc_conv_expr_descriptor): Use loop.dimen instead of
484 ndim for the descriptor's rank.
486 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
489 * trans-array.c (gfc_conv_expr_descriptor): Count codimensions starting
490 from zero, and add then the relevant offset (either ndim or loop.dimen)
491 depending on context.
493 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
495 * trans-array.c (gfc_conv_expr_descriptor): Save some horizontal space.
497 2011-10-18 Mikael Morin <mikael@gcc.gnu.org>
499 * trans-array.c (gfc_conv_expr_descriptor): Move ndim initialization
502 2011-10-18 Janus Weil <janus@gcc.gnu.org>
505 * decl.c (verify_c_interop_param): Renamed to
506 'gfc_verify_c_interop_param'. Add error message for polymorphic
508 (verify_c_interop): Renamed to 'gfc_verify_c_interop'. Reject
509 polymorphic variables.
510 (verify_bind_c_sym): Renamed 'verify_c_interop'.
511 * gfortran.h (verify_c_interop,verify_c_interop_param): Renamed.
512 * check.c (gfc_check_sizeof): Ditto.
513 * resolve.c (gfc_iso_c_func_interface,resolve_fl_procedure): Ditto.
514 * symbol.c (verify_bind_c_derived_type): Ditto.
516 2011-10-15 Tom Tromey <tromey@redhat.com>
517 Dodji Seketeli <dodji@redhat.com>
519 * cpp.c (print_line, cb_define): Adjust to avoid using internals
520 of struct line_map. Use the public API instead.
522 2011-10-17 Janus Weil <janus@gcc.gnu.org>
526 * primary.c (match_kind_param): Avoid segfault.
528 2011-10-16 Thomas Koenig <tkoenig@gcc.gnu.org>
530 * frontend-passes.c (current_ns): Make static.
531 (create_var): Note parent of newly created namespace.
532 (optimize_namespace): Don't wak sibling namespaces
533 if they are EXEC_BLOCK because this is handled...
534 (gfc_code_walker): ... here. Also walk ASSOCIATE lists.
536 2011-10-16 Janus Weil <janus@gcc.gnu.org>
539 * primary.c (match_kind_param): Detect ISO_C_BINDING kinds.
540 (get_kind): Pass on 'is_iso_c' flag.
541 (match_integer_constant,match_real_constant,match_logical_constant):
542 Set 'ts.is_c_interop'.
544 2011-10-16 Janus Weil <janus@gcc.gnu.org>
547 * resolve.c (resolve_formal_arglist): Remove unneeded error message.
550 2011-10-15 Tobias Burnus <burnus@net-b.de>
552 * gfortran.texi (Fortran 2008 status, TS 29113 status,
553 Further Interoperability of Fortran with C): Update implementation
554 status, change references from TR 29113 to TS 29113.
555 * intrinsic.texi (RANK): Change TR 29113 to TS 29113.
556 * invoke.text (-std=): Ditto, change -std=f2008tr to -std=f2008ts.
557 * lang.opt (std=): Ditto.
558 * options.c (gfc_handle_option, set_default_std_flags): Ditto and
559 change GFC_STD_F2008_TR to GFC_STD_F2008_TS.
560 * libgfortran.h: Ditto.
561 * intrinsic.c (add_functions, gfc_check_intrinsic_standard): Ditto.
562 * decl.c (verify_c_interop_param): Ditto.
564 2011-10-14 Janus Weil <janus@gcc.gnu.org>
567 * expr.c (gfc_check_vardef_context): Don't throw an error on
568 non-pointer assignments involving an intent(in) pointer dummy.
570 2011-10-14 Tobias Burnus <burnus@net-b.de>
573 * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
574 for dummy arguments with VALUE attribute.
576 2011-10-11 Tobias Burnus <burnus@net-b.de>
577 Janus Weil <janus@gcc.gnu.org>
579 * invoke.texi (-fwhole-file): Update wording since -fwhole-file
580 is now enabled by default.
582 2011-10-11 Michael Meissner <meissner@linux.vnet.ibm.com>
584 * trans-expr.c (gfc_conv_power_op): Delete old interface with two
585 parallel arrays to hold standard builtin declarations, and replace
586 it with a function based interface that can support creating
587 builtins on the fly in the future. Change all uses, and poison
588 the old names. Make sure 0 is not a legitimate builtin index.
589 (fill_with_spaces): Ditto.
590 (gfc_trans_string_copy): Ditto.
591 (gfc_trans_zero_assign): Ditto.
592 (gfc_build_memcpy_call): Ditto.
593 (alloc_scalar_allocatable_for_assignment): Ditto.
594 * trans-array.c (gfc_trans_array_constructor_value): Ditto.
595 (duplicate_allocatable): Ditto.
596 (gfc_alloc_allocatable_for_assignment): Ditto.
597 * trans-openmp.c (gfc_omp_clause_copy_ctor): Ditto.
598 (gfc_omp_clause_assign_op): Ditto.
599 (gfc_trans_omp_atomic): Ditto.
600 (gfc_trans_omp_do): Ditto.
601 (gfc_trans_omp_task): Ditto.
602 * trans-stmt.c (gfc_trans_stop): Ditto.
603 (gfc_trans_sync): Ditto.
604 (gfc_trans_allocate): Ditto.
605 (gfc_trans_deallocate): Ditto.
606 * trans.c (gfc_call_malloc): Ditto.
607 (gfc_allocate_using_malloc): Ditto.
608 (gfc_call_free): Ditto.
609 (gfc_deallocate_with_status): Ditto.
610 (gfc_deallocate_scalar_with_status): Ditto.
611 * f95-lang.c (gfc_define_builtin): Ditto.
612 (gfc_init_builtin_functions): Ditto.
613 * trans-decl.c (create_main_function): Ditto.
614 * trans-intrinsic.c (builtin_decl_for_precision): Ditto.
616 2011-10-10 Thomas Koenig <tkoenig@gcc.gnu.org>
619 * frontend-passes (forall_level): New variable.
620 (cfe_register_funcs): Don't register functions if we
621 are within a forall loop.
622 (optimize_namespace): Set forall_level to 0 before entry.
623 (gfc_code_walker): Increase/decrease forall_level.
625 2011-10-09 Tobias Burnus <burnus@net-b.de>
628 * trans-common.c (translate_common): Fix -Walign-commons check.
630 2011-10-09 Mikael Morin <mikael.morin@sfr.fr>
632 * interface.c (check_dummy_characteristics): Count dimensions starting
633 from one in diagnostic.
635 2011-10-09 Tobias Burnus <burnus@net-b.de>
637 * Make-lang.in (F95_PARSER_OBJS, GFORTRAN_TRANS_DEPS): Add
638 dependency on iso-c-binding.def and iso-fortran-env.def.
639 * module.c (import_iso_c_binding_module): Add error when
640 explicitly importing a nonstandard symbol; extend standard-
642 * iso-c-binding.def: Add c_float128 and c_float128_complex
643 integer parameters (for -std=gnu).
644 * intrinsic.texi (ISO_C_Binding): Document them.
645 * symbol.c (generate_isocbinding_symbol): Change macros
646 to ignore GFC_STD_* data.
647 * trans-types.c (gfc_init_c_interop_kinds): Ditto; make
648 nonstatic and renamed from "init_c_interop_kinds".
649 (gfc_init_kinds): Don't call it
650 * trans-types.h (gfc_init_c_interop_kinds): Add prototype.
651 * f95-lang.c (gfc_init_decl_processing): Call it.
653 2011-10-09 Janus Weil <janus@gcc.gnu.org>
656 * expr.c (replace_symbol): Only do replacement if the symbol is a dummy.
658 2011-10-08 Paul Thomas <pault@gcc.gnu.org>
661 * trans-array.c (gfc_conv_array_index_offset): Use descriptor
662 stride for pointer function results.
664 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
666 * trans-array.c (gfc_conv_expr_descriptor): Remove trailing whitespace.
668 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
670 * trans-array.c (gfc_conv_ss_startstride): Merge two switch cases.
672 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
674 * trans-array.c (gfc_conv_section_startstride): Remove coarray argument.
675 Remove conditions on coarray.
676 (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.
677 (gfc_conv_expr_descriptor): Ditto. Add assertions before the call.
679 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
681 * trans-array.c (gfc_conv_section_startstride): Remove coarray_last
682 argument. Remove condition on coarray_last.
683 (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.
684 (gfc_conv_expr_descriptor): Ditto.
686 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
688 * trans-array.c (gfc_walk_variable_expr): Remove scalar coarray
689 handling. Don't reset array ref's corank and codimensions' types
690 in the full array ref case. Update loop upper limit.
691 Remove DIMEN_THIS_IMAGE case. Remove unnecessary conditions.
693 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
695 * trans.h (gfc_ss_info): Remove codimen field.
696 * trans-array.c (gfc_get_array_ss): Don't set codimen field.
697 (gfc_trans_create_temp_array): Don't set descriptor's cobounds.
698 (gfc_trans_constant_array_constructor): Update loop upper limit.
699 (gfc_conv_ss_startstride): Don't set codimen field.
700 Don't get descriptor's cobounds.
701 (gfc_walk_variable_expr): Update dimension index.
702 * trans-intrinsic.c (trans_this_image, trans_image_index,
703 conv_intrinsic_cobound): Don't set codimen field
705 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
707 * trans.h (gfc_loopinfo): Remove codimen field.
708 * trans-array.c (gfc_set_vector_loop_bounds,
709 gfc_trans_scalarizing_loops, gfc_conv_loop_setup): Update loop upper
711 (gfc_set_loop_bounds_from_array_spec): Ditto. Remove skip on last
713 (gfc_start_scalarized_body): Update loop lower limit.
714 (gfc_conv_ss_startstride): Don't set loop's codimen field.
715 (gfc_conv_loop_setup): Remove unnecessary condition.
716 (gfc_conv_expr_descriptor): Don't use loop's codimen field as corank.
718 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
720 * trans.h (gfc_ss): Remove data.temp.codimen field.
721 * trans-array.c (gfc_conv_resolve_dependencies,
722 gfc_conv_expr_descriptor): Don't set temp's codimen field.
724 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
726 * resolve.c (resolve_array_ref): Set array_ref's dimen field (and the
727 associated dimen_type) in the full array ref case.
729 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
731 * trans-intrinsic.c (walk_coarray): New function.
732 (convert_element_to_coarray_ref): Move code to walk_coarray. Remove.
733 (trans-this_image, trans_image_index, conv_intrinsic_cobound):
736 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
738 * trans-array.c (gfc_conv_expr_descriptor): Add out-of-the-scalarizer
741 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
743 * trans-array.c (gfc_conv_ss_startstride): Support zero rank loop.
745 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
747 * trans-array.c (gfc_conv_section_startstride): Move code to
748 evaluate_bound. Use evaluate_bound.
749 (evaluate_bound): New function.
751 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
753 * trans-array.c (gfc_conv_section_startstride): Update assertion to
754 also accept coarrays.
756 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
758 * trans-array.c (gfc_conv_section_startstride): Factor common
759 array ref references.
761 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
763 * trans-array.c (gfc_conv_expr_descriptor): Use codim instead of
764 loop.codimen as argument to gfc_get_array_type_bounds.
766 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
768 * trans-array.h (struct gfc_se): New flag want_coarray.
769 * trans-intrinsic.c (trans_this_image, trans_image_index,
770 conv_intrinsic_cobound): Set want_coarray.
771 * trans_array.c (gfc_conv_expr_descriptor): Evaluate codimension
772 earlier and without relying on the scalarizer.
774 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
776 * expr.c (gfc_get_corank): Return 0 if input expression is not a
779 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
781 * trans-array.c (gfc_conv_expr_descriptor): Simplify coarray
782 descriptor setup code.
784 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
786 * resolve.c (compare_spec_to_ref): Move coarray ref initialization
788 (resolve_array_ref): ... here.
790 2011-10-07 Mikael Morin <mikael.morin@sfr.fr>
792 * check.c (is_coarray): Remove.
793 (coarray_check): Use gfc_is_coarray.
795 2011-10-07 Janus Weil <janus@gcc.gnu.org>
798 * class.c (gfc_build_class_symbol): Fix whitespace.
799 * module.c (mio_symbol): Set 'class_ok' attribute.
800 * trans-decl.c (gfc_get_symbol_decl): Make sure the backend_decl has
801 been built for class symbols.
803 2011-10-04 Janus Weil <janus@gcc.gnu.org>
806 * interface.c (check_dummy_characteristics): Check the array shape.
808 2011-10-01 Janus Weil <janus@gcc.gnu.org>
811 * interface.c (get_expr_storage_size): Check if 'length' component is
814 2011-09-29 Janus Weil <janus@gcc.gnu.org>
817 * resolve.c (resolve_formal_arglist): Fix pureness check for dummy
821 * symbol.c (check_conflict): Forbid TARGET attribute for statement
824 2011-09-27 Jakub Jelinek <jakub@redhat.com>
826 * trans-types.c (gfc_type_for_size): Return wider type
827 if no suitable narrower type has been found.
828 (gfc_type_for_mode): Return NULL_TREE if gfc_type_for_size
829 returned type doesn't have expected TYPE_MODE.
831 2011-09-26 Janus Weil <janus@gcc.gnu.org>
834 * resolve.c (resolve_common_blocks): Check for EXTERNAL attribute.
837 * interface.c (gfc_compare_interfaces): Bugfix in check for result type.
839 2011-09-22 Janus Weil <janus@gcc.gnu.org>
842 * expr.c (gfc_check_pointer_assign): Check for nonintrinsic elemental
844 * interface.c (gfc_compare_interfaces): Rename 'intent_flag'. Check
845 for PURE and ELEMENTAL attributes.
846 (compare_actual_formal): Remove pureness check here.
848 2011-09-20 Steven G. Kargl <kargl@gcc.gnu.org>
850 * check.c (gfc_check_c_sizeof): Remove redundant word.
852 2011-09-20 Simon Baldwin <simonb@google.com>
854 * module.c (gfc_dump_module): Omit timestamp from output.
856 2011-09-17 Janus Weil <janus@gcc.gnu.org>
859 * symbol.c (gfc_use_derived): Fix coding style.
861 2011-09-15 Janus Weil <janus@gcc.gnu.org>
864 * resolve.c (resolve_transfer): Check if component 'ref' is defined.
867 * symbol.c (gfc_use_derived): Check if argument 'sym' is defined.
869 2011-09-14 Tobias Burnus <burnus@net-b.de>
873 * check.c (gfc_check_null): Allow allocatables as MOLD to NULL.
874 * resolve.c (resolve_transfer): Reject NULL without MOLD.
875 * interface.c (gfc_procedure_use): Reject NULL without MOLD
876 if no explicit interface is known.
877 (gfc_search_interface): Reject NULL without MOLD if it would
880 2011-09-13 Janus Weil <janus@gcc.gnu.org>
883 * symbol.c (check_conflict): Check conflict between GENERIC and RESULT
886 2011-09-11 Thomas Koenig <tkoenig@gcc.gnu.org>
889 * frontend-passes.c (dummy_expr_callback): New function.
890 (convert_do_while): New function.
891 (optimize_namespace): Call code walker to convert do while loops.
893 2011-09-11 Janus Weil <janus@gcc.gnu.org>
897 * interface.c (check_dummy_characteristics): New function to check the
898 characteristics of dummy arguments.
899 (gfc_compare_interfaces,gfc_check_typebound_override): Call it here.
901 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
903 * trans-array.c (gfc_trans_constant_array_constructor): Remove
904 superfluous initialisation of DIM field.
905 (gfc_trans_array_constructor): Assert that DIMEN field is properly set.
906 (gfc_conv_expr_descriptor): Ditto.
907 * trans-expr.c (gfc_conv_procedure_call): Ditto.
909 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
911 * trans-array.h (gfc_get_scalar_ss): New prototype.
912 * trans-array.c (gfc_get_scalar_ss): New function.
913 (gfc_walk_variable_expr, gfc_walk_op_expr,
914 gfc_walk_elemental_function_args): Re-use gfc_get_scalar_ss.
915 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
916 (gfc_trans_assignment_1): Ditto.
917 * trans-stmt.c (compute_inner_temp_size, gfc_trans_where_assign,
918 gfc_trans_where_3): Ditto.
920 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
922 * trans-array.h (gfc_get_temp_ss): New prototype.
923 * trans-array.c (gfc_get_temp_ss): New function.
924 (gfc_conv_resolve_dependencies): Re-use gfc_get_temp_ss.
925 (gfc_conv_expr_descriptor): Ditto.
926 * trans-expr.c (gfc_conv_subref_array_arg): Ditto.
928 2011-09-08 Mikael Morin <mikael.morin@sfr.fr>
930 * trans-array.h (gfc_get_array_ss): New prototype.
931 * trans-array.c (gfc_get_array_ss): New function.
932 (gfc_walk_variable_expr, gfc_walk_function_expr,
933 gfc_walk_array_constructor): Re-use gfc_get_array_ss.
934 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
935 * trans-intrinsic.c (gfc_walk_intrinsic_bound,
936 gfc_walk_intrinsic_libfunc): Ditto.
937 * trans-io.c (transfer_array_component): Ditto.
939 2011-09-08 Tobias Burnus <burnus@net-b.de>
942 * decl.c (gfc_match_entry, gfc_match_end): Handle COMP_DO_CONCURRENT.
943 * dump-parse-tree.c (show_code_node): Handle EXEC_DO_CONCURRENT.
944 * gfortran.h (gfc_exec_op): Add EXEC_DO_CONCURRENT.
945 * match.c (gfc_match_critical, match_exit_cycle, gfc_match_stopcode,
946 lock_unlock_statement, sync_statement, gfc_match_allocate,
947 gfc_match_deallocate, gfc_match_return): Add DO CONCURRENT diagnostic.
948 (gfc_match_do): Match DO CONCURRENT.
949 (match_derived_type_spec, match_type_spec, gfc_free_forall_iterator,
950 match_forall_iterator, match_forall_header, match_simple_forall,
951 gfc_match_forall): Move up in the file.
952 * parse.c (check_do_closure, parse_do_block): Handle do concurrent.
953 * parse.h (gfc_compile_state): Add COMP_DO_CONCURRENT.
954 * resolve.c (do_concurrent_flag): New global variable.
955 (resolve_function, pure_subroutine, resolve_branch,
956 gfc_resolve_blocks, resolve_code, resolve_types): Add do concurrent
958 * st.c (gfc_free_statement): Handle EXEC_DO_CONCURRENT.
959 * trans-stmt.c (gfc_trans_do_concurrent): New function.
960 (gfc_trans_forall_1): Handle do concurrent.
961 * trans-stmt.h (gfc_trans_do_concurrent): New function prototype.
962 * trans.c (trans_code): Call it.
963 * frontend-passes.c (gfc_code_walker): Handle EXEC_DO_CONCURRENT.
965 2011-09-07 Janus Weil <janus@gcc.gnu.org>
968 * primary.c (gfc_match_structure_constructor): Handle parsing of
969 procedure pointers components in structure constructors.
970 * resolve.c (resolve_structure_cons): Check interface of procedure
971 pointer components. Changed wording of some error messages.
973 2011-09-04 Janus Weil <janus@gcc.gnu.org>
976 * trans-types.c (gfc_sym_type): Check for proc_name.
978 2011-08-30 Tobias Burnus <burnus@net-b.de>
981 * trans-common.c (build_common_decl): Warn if named common
982 block's size is not everywhere the same.
984 2011-08-30 Steven G. Kargl <kargl@gcc.gnu.org>
987 * trans-stmt.c (gfc_trans_allocate): Evaluate the substring.
989 2011-08-29 Janus Weil <janus@gcc.gnu.org>
992 * trans-decl.c (gfc_generate_function_code): Nullify polymorphic
993 allocatable function results.
995 2011-08-29 Tobias Burnus <burnus@net-b.de>
997 * trans-decl.c (generate_coarray_sym_init): Use
998 GFC_CAF_COARRAY_STATIC for static coarrays.
1000 2011-08-28 Dodji Seketeli <dodji@redhat.com>
1002 * scanner.c (load_file): Don't abuse LC_RENAME reason while
1003 (indirectly) calling linemap_add.
1005 2011-08-26 Jakub Jelinek <jakub@redhat.com>
1007 * trans-decl.c (get_proc_pointer_decl): Set DECL_TLS_MODEL
1009 * symbol.c (check_conflict): Allow threadprivate attribute with
1010 FL_PROCEDURE if proc_pointer.
1012 2011-08-25 Mikael Morin <mikael@gcc.gnu.org>
1015 * expr.c (gfc_free_shape): Do nothing if shape is NULL.
1016 (free_expr0): Remove redundant NULL shape check.
1017 * resolve.c (check_host_association): Ditto.
1018 * trans-expr.c (gfc_trans_subarray_assign): Assert that shape is
1020 * trans-io.c (transfer_array_component): Ditto.
1022 2011-08-25 Tobias Burnus <burnus@net-b.de>
1024 * trans-array.c (gfc_conv_descriptor_token): Add assert.
1025 * trans-decl.c (gfc_build_qualified_array,
1026 create_function_arglist): Handle assumed-shape arrays.
1027 * trans-expr.c (gfc_conv_procedure_call): Ditto.
1028 * trans-types.c (gfc_get_array_descriptor_base): Ditto, don't
1029 add "caf_token" to assumed-shape descriptors, new akind argument.
1030 (gfc_get_array_type_bounds): Pass akind.
1031 * trans.h (lang_decl): New elements caf_offset and token.
1032 (GFC_DECL_TOKEN, GFC_DECL_CAF_OFFSET): New macros.
1034 2011-08-25 Tobias Burnus <burnus@net-b.de>
1036 * trans-array.c (structure_alloc_comps): Fix for allocatable
1037 scalar coarray components.
1038 * trans-expr.c (gfc_conv_component_ref): Ditto.
1039 * trans-type.c (gfc_get_derived_type): Ditto.
1041 2011-08-24 Tobias Burnus <burnus@net-b.de>
1044 * expr.c (check_init_expr): Return when an error occured.
1046 2011-08-24 Joseph Myers <joseph@codesourcery.com>
1048 * Make-lang.in (fortran/cpp.o): Remove explicit compilation rule.
1050 2011-08-23 Tobias Burnus <burnus@net-b.de>
1053 * symbol.c (gfc_add_type): Better diagnostic if redefining
1054 use-associated symbol.
1055 * module.c (gfc_use_module): Use module name as locus.
1057 2011-08-22 Gabriel Charette <gchare@google.com>
1059 * cpp.c (gfc_cpp_init): Force BUILTINS_LOCATION for tokens
1060 defined in cpp_define_builtins.
1062 2011-08-22 Mikael Morin <mikael@gcc.gnu.org>
1065 * gfortran.h (gfc_clear_shape, gfc_free_shape): New prototypes.
1066 * expr.c (gfc_clear_shape, gfc_free_shape): New functions.
1067 (free_expr0): Re-use gfc_free_shape.
1068 * trans-expr.c (gfc_trans_subarray_assign): Ditto.
1069 * trans-io.c (transfer_array_component): Ditto.
1070 * resolve.c (check_host_association): Ditto.
1071 (gfc_expr_to_initialize): Don't force the rank value and free the shape
1072 after updating the expression. Recalculate shape and rank.
1073 (resolve_where_shape): Re-use gfc_clear_shape.
1074 * array.c (gfc_array_ref_shape): Ditto.
1076 2011-08-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1079 * expr.c (gfc_check_assign): Check for type conversions when the
1080 right-hand side is a constant REAL/COMPLEX contstant the left-hand
1081 side is also REAL/COMPLEX. Don't warn when a narrowing conversion
1082 for REAL does not change the value of the constant.
1084 2011-08-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1087 * resolve.c (resolve_array_ref): Don't calculate upper bound
1088 if the stride is zero.
1090 2011-08-20 Janus Weil <janus@gcc.gnu.org>
1093 * dependency.c (gfc_dep_compare_expr): Add new result value "-3".
1094 (gfc_check_element_vs_section,gfc_check_element_vs_element): Handle
1096 * frontend-passes.c (optimize_comparison): Ditto.
1097 * interface.c (gfc_check_typebound_override): Ditto.
1099 2011-08-19 Mikael Morin <mikael.morin@sfr.fr>
1102 * parse.c (parse_where): Undo changes after emitting an error.
1104 2011-08-19 Jakub Jelinek <jakub@redhat.com>
1107 * trans-expr.c (gfc_trans_assignment_1): Set OMPWS_SCALARIZER_WS
1108 bit in ompws_flags only if loop.temp_ss is NULL, and clear it if
1109 lhs needs reallocation.
1110 * trans-openmp.c (gfc_trans_omp_workshare): Don't return early if
1111 code is NULL, emit a barrier if workshare emitted no code at all
1112 and NOWAIT clause isn't present.
1114 2011-08-19 Mikael Morin <mikael.morin@sfr.fr>
1117 * gfortran.h (gfc_exec_op): New constant EXEC_END_NESTED_BLOCK.
1118 * parse.c (check_statement_label): Accept ST_END_BLOCK and
1119 ST_END_ASSOCIATE as valid branch target.
1120 (accept_statement): Change EXEC_END_BLOCK to EXEC_END_NESTED_BLOCK.
1121 Add EXEC_END_BLOCK code in the ST_END_BLOCK and ST_END_ASSOCIATE cases.
1122 * resolve.c (find_reachable_labels): Change EXEC_END_BLOCK to
1123 EXEC_END_NESTED_BLOCK.
1124 (resolve_branch): Ditto.
1125 (resolve_code): Add EXEC_END_NESTED_BLOCK case.
1126 * st.c (gfc_free_statement): Ditto.
1127 * trans.c (trans_code): Ditto.
1129 2011-08-18 Mikael Morin <mikael.morin@sfr.fr>
1132 * symbol.c (gfc_get_st_label): Use the derived type namespace when
1133 we are parsing a derived type definition.
1135 2011-08-18 Tobias Burnus <burnus@net-b.de>
1138 * parse.c (parse_derived): Add lock_type
1139 checks, improve coarray_comp handling.
1140 * resolve.c (resolve_allocate_expr,
1141 resolve_lock_unlock, resolve_symbol): Fix lock_type
1144 2011-08-17 Tobias Burnus <burnus@net-b.de>
1147 * trans-decl.c (generate_local_decl): Warn about
1148 unused explicitly imported module variables/parameters.
1150 2011-08-17 Janus Weil <janus@gcc.gnu.org>
1153 * resolve.c (resolve_fl_variable): Reject non-constant character lengths
1154 in COMMON variables.
1156 2011-08-16 Tobias Burnus <burnus@net-b.de>
1157 Dominique Dhumieres <dominiq@lps.ens.fr>
1160 * resolve.c (resolve_symbol): Fix stupid typo.
1162 2011-08-15 Tobias Burnus <burnus@net-b.de>
1164 * resolve.c (resolve_symbol): Fix coarray result-var check.
1166 2011-08-14 Steven G. Kargl <kargl@gcc.gnu.org>
1168 * module.c (use_iso_fortran_env_module): Spell 'referrenced' correctly.
1170 2011-08-14 Janus Weil <janus@gcc.gnu.org>
1173 * decl.c (check_function_name): New function, separated off from
1174 'variable_decl' and slightly extended.
1175 (variable_decl,attr_decl1): Call it.
1177 2011-08-08 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
1179 * Make-lang.in (gfortran$(exeext)): Add $(EXTRA_GCC_LIBS).
1181 2011-08-07 Janus Weil <janus@gcc.gnu.org>
1182 Thomas Koenig <tkoenig@gcc.gnu.org>
1185 * dependency.c (are_identical_variables): For dummy arguments only
1186 check for equal names, not equal symbols.
1187 * interface.c (gfc_check_typebound_override): Add checking for rank
1188 and character length.
1190 2011-08-07 Janus Weil <janus@gcc.gnu.org>
1193 * dependency.h (gfc_is_same_range,gfc_are_identical_variables): Remove
1195 * dependency.c (gfc_are_identical_variables,are_identical_variables):
1196 Renamed the former to the latter and made static.
1197 (gfc_dep_compare_expr): Renamed 'gfc_are_identical_variables', handle
1198 commutativity of multiplication.
1199 (gfc_is_same_range,is_same_range): Renamed the former to the latter,
1200 made static and removed argument 'def'.
1201 (check_section_vs_section): Renamed 'gfc_is_same_range'.
1202 * gfortran.h (gfc_check_typebound_override): New prototype.
1203 * interface.c (gfc_check_typebound_override): Moved here from ...
1204 * resolve.c (check_typebound_override): ... here (and renamed).
1205 (resolve_typebound_procedure): Renamed 'check_typebound_override'.
1207 2011-08-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1210 * target-memory.c (gfc_target_expr-size): Don't clobber typespec
1212 * simplify.c (gfc_simplify_transfer): Don't calculate source_size
1215 2011-08-05 Thomas Koenig <tkoenig@gcc.gnu.org>
1218 * gfortran.h (gfc_calculate_transfer_sizes): Add prototype.
1219 * target-memory.h (gfc_target_interpret_expr): Add boolean
1220 argument wether to convert wide characters.
1221 * target-memory.c (gfc_target_expr_size): Also return length
1222 of characters for non-constant expressions if these can be
1223 determined from the cl.
1224 (interpret_array): Add argument for gfc_target_interpret_expr.
1225 (gfc_interpret_derived): Likewise.
1226 (gfc_target_interpret_expr): Likewise.
1227 * check.c: Include target-memory.h.
1228 (gfc_calculate_transfer_sizes): New function.
1229 (gfc_check_transfer): When -Wsurprising is in force, calculate
1230 sizes and warn if result is larger than size (check moved from
1231 gfc_simplify_transfer).
1232 * simplify.c (gfc_simplify_transfer): Use
1233 gfc_calculate_transfer_sizes. Remove warning.
1235 2011-08-04 Richard Guenther <rguenther@suse.de>
1238 * trans-array.c (add_to_offset): New function.
1239 (gfc_conv_array_ref): Build the array index expression in optimally
1241 (gfc_walk_variable_expr): Adjust for the backward walk.
1243 2011-08-02 Daniel Kraft <d@domob.eu>
1246 * trans-array.c (gfc_trans_auto_array_allocation): Change
1247 gfc_start_block to gfc_init_block to avoid spurious extra-scope.
1249 2011-08-02 Tobias Burnus <burnus@net-b.de>
1251 * trans-array.c (gfc_array_allocate): Pass token to
1252 gfc_allocate_allocatable for -fcoarray=lib.
1253 * trans-stmt.c (gfc_trans_allocate): Update
1254 gfc_allocate_allocatable call.
1255 * trans.h (gfc_allocate_allocatable): Update prototype.
1256 (gfc_allocate_using_lib): Remove.
1257 * trans.c (gfc_allocate_using_lib): Make static, handle token.
1258 (gfc_allocate_allocatable): Ditto.
1260 2011-08-02 Jakub Jelinek <jakub@redhat.com>
1263 * cpp.c (cpp_define_builtins): Change _OPENMP to 201107.
1264 * openmp.c (gfc_free_omp_clauses): Free also final_expr.
1265 (OMP_CLAUSE_FINAL, OMP_CLAUSE_MERGEABLE): Define.
1266 (gfc_match_omp_clauses): Handle parsing final and mergeable
1268 (OMP_TASK_CLAUSES): Allow final and mergeable clauses.
1269 (gfc_match_omp_taskyield): New function.
1270 (resolve_omp_clauses): Resolve final clause. Allow POINTERs and
1271 Cray pointers in clauses other than REDUCTION.
1272 (gfc_match_omp_atomic): Match optional
1273 read/write/update/capture keywords after !$omp atomic.
1274 (resolve_omp_atomic): Handle all OpenMP 3.1 atomic forms.
1275 * dump-parse-tree.c (show_omp_node): Handle EXEC_OMP_TASKYIELD,
1276 print final and mergeable clauses.
1277 (show_code_node): Handle EXEC_OMP_TASKYIELD.
1278 * trans-openmp.c (gfc_trans_omp_clauses): Handle final and
1280 (gfc_trans_omp_taskyield): New function.
1281 (gfc_trans_omp_directive): Handle EXEC_OMP_TASKYIELD.
1282 (gfc_trans_omp_atomic): Handle all OpenMP 3.1 atomic forms.
1283 (gfc_omp_clause_copy_ctor): Handle non-allocated allocatable.
1284 (gfc_omp_predetermined_sharing): Adjust comment.
1285 * gfortran.h (gfc_statement): Add ST_OMP_TASKYIELD and
1287 (gfc_omp_clauses): Add final_expr and mergeable fields.
1288 (gfc_exec_op): Add EXEC_OMP_TASKYIELD.
1289 (gfc_omp_atomic_op): New enum typedef.
1290 (struct gfc_code): Add ext.omp_atomic.
1291 * trans.c (trans_code): Handle EXEC_OMP_TASKYIELD.
1292 * frontend-passes.c (gfc_code_walker): Also walk final_expr.
1293 * resolve.c (gfc_resolve_blocks, resolve_code): Handle
1295 * st.c (gfc_free_statement): Likewise.
1296 * match.h (gfc_match_omp_taskyield): New prototype.
1297 * parse.c (decode_omp_directive): Handle taskyield directive.
1298 Handle !$omp end atomic.
1299 (case_executable): Add ST_OMP_TASKYIELD case.
1300 (gfc_ascii_statement): Handle ST_OMP_TASKYIELD.
1301 (parse_omp_atomic): Return gfc_statement instead of void.
1302 For !$omp atomic capture parse two assignments instead of
1303 just one and require !$omp end atomic afterwards, for
1304 other !$omp atomic forms just allow !$omp end atomic at the
1306 (parse_omp_structured_block, parse_executable): Adjust
1307 parse_omp_atomic callers.
1309 2011-08-02 Tobias Burnus <burnus@net-b.de>
1311 * intrinsic.c (OMP_LIB): Updated openmp_version's
1313 * gfortran.texi (OpenMP): Update ref to OpenMP 3.1.
1314 * intrinsic.texi (OpenMP Modules): Update ref to OpenMP 3.1;
1315 remove deleted omp_integer_kind and omp_logical_kind constants.
1317 2011-07-31 Janus Weil <janus@gcc.gnu.org>
1320 * resolve.c (resolve_structure_cons): Don't do the full dt resolution,
1321 only call 'resolve_fl_derived0'.
1322 (resolve_typebound_procedures): Resolve typebound procedures of
1324 (resolve_fl_derived0): New function, which does a part of the work
1325 for 'resolve_fl_derived'.
1326 (resolve_fl_derived): Call 'resolve_fl_derived0' and do some additional
1329 2011-07-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1332 * expr.c (gfc_simplify_expr): If end of a string is less
1333 than zero, set it to zero.
1335 2011-07-28 Jakub Jelinek <jakub@redhat.com>
1338 * frontend-passes.c (optimize_minmaxloc): New function.
1339 (optimize_expr): Call it.
1341 2011-07-27 Tobias Burnus <burnus@net-b.de>
1344 * trans-types.c (gfc_get_derived_type): Ensure that pointer
1345 component types are marked as nonrestricted.
1347 2011-07-27 Daniel Carrera <dcarrera@gmail.com>
1350 * trans.c (gfc_allocate_using_malloc): Change function signature.
1351 Return nothing. New parameter "pointer". Eliminate temorary variables.
1352 (gfc_allocate_using_lib): Ditto.
1353 (gfc_allocate_allocatable): Ditto. Update call to gfc_allocate_using_lib
1354 and gfc_allocate_using_malloc. Do not free and then reallocate a
1355 variable that is already allocated.
1356 (gfc_likely): New function. Basedon gfc_unlikely.
1357 * trans-array.c (gfc_array_init_size): New parameter "descriptor_block".
1358 Instructions to modify the array descriptor are stored in this block
1359 while other instructions continue to be stored in "pblock".
1360 (gfc_array_allocate): Update call to gfc_array_init_size. Move the
1361 descriptor_block so that the array descriptor is only updated if
1362 the array was allocated successfully.
1363 Update calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
1364 * trans.h (gfc_allocate_allocatable): Change function signature.
1365 Function now returns void.
1366 (gfc_allocate_using_lib): Ditto, and new function parameter.
1367 (gfc_allocate_using_malloc): Ditto.
1368 * trans-openmp.c (gfc_omp_clause_default_ctor,
1369 gfc_omp_clause_copy_ctor,gfc_trans_omp_array_reduction): Replace a call
1370 to gfc_allocate_allocatable with gfc_allocate_using_malloc.
1371 * trans-stmt.c (gfc_trans_allocate): Update function calls for
1372 gfc_allocate_allocatable and gfc_allocate_using_malloc.
1374 2011-07-26 Tobias Burnus <burnus@net-b.de>
1376 * trans-array.c (CAF_TOKEN_FIELD): New macro constant.
1377 (gfc_conv_descriptor_token): New function.
1378 * trans-array.h (gfc_conv_descriptor_token): New prototype.
1379 * trans-types.c (gfc_get_array_descriptor_base): For coarrays
1380 with -fcoarray=lib, append "void *token" to the array descriptor.
1381 (gfc_array_descriptor_base_caf): New static variable.
1382 * trans-expr.c (gfc_conv_procedure_call): Handle token and offset
1383 when passing a descriptor coarray to a nondescriptor dummy.
1385 2011-07-23 Tobias Burnus <burnus@net-b.de>
1387 * resolve.c (resolve_symbol): Fix coarray var decl check.
1389 2011-07-21 Daniel Carrera <dcarrera@gmail.com>
1391 * trans.c (gfc_allocate_with_status): Split into two functions
1392 gfc_allocate_using_malloc and gfc_allocate_usig_lib.
1393 (gfc_allocate_using_malloc): The status parameter is now the
1394 actual status rather than a pointer. Code cleanup.
1395 (gfc_allocate_using_lib): Ditto. Add new parametrs errmsg and
1396 errlen. Pass these to the coarray lib.
1397 * trans-openmp.c (gfc_omp_clause_default_ctor): Update calls to
1398 gfc_allocate_allocatable.
1399 (gfc_omp_clause_copy_ctor): Ditto.
1400 (gfc_trans_omp_array_reduction): Ditto.
1401 * trans-stmt.c (gfc_trans_allocate): Ditto. Update call to
1402 gfc_allocate_using_malloc. Pass stat rather than pstat to the allocate
1403 fuctions. If using coarray lib, pass errmsg and errlen to the allocate
1404 functions. Move error checking outside the if (!gfc_array_allocate)
1405 block so that it also affects trees produced by gfc_array_allocate.
1406 * trans-array.c (gfc_array_allocate): Add new parameters errmsg
1407 and errlen. Replace parameter pstat by status. Code cleanup. Update
1408 calls to gfc_allocate_allocatable and gfc_allocate_using_malloc.
1409 * trans-array.h (gfc_array_allocate): Update signature of
1412 2011-07-21 Steven G. Kargl <kargl@gcc.gnu.org>
1414 * gfortran.texi: Remove a duplicate word.
1416 2011-07-21 Tobias Burnus <burnus@net-b.de>
1418 * check.c (gfc_check_present): Allow coarrays.
1419 * trans-array.c (gfc_conv_array_ref): Avoid casting
1420 when a pointer is wanted.
1421 * trans-decl.c (create_function_arglist): For -fcoarray=lib,
1422 handle hidden token and offset arguments for nondescriptor
1424 * trans-expr.c (get_tree_for_caf_expr): New function.
1425 (gfc_conv_procedure_call): For -fcoarray=lib pass the
1426 token and offset for nondescriptor coarray dummies.
1427 * trans.h (lang_type): Add caf_offset tree.
1428 (GFC_TYPE_ARRAY_CAF_OFFSET): New macro.
1430 2011-07-19 Tobias Burnus <burnus@net-b.de>
1432 * expr.c (gfc_is_coarray): New function.
1433 * gfortran.h (gfc_is_coarray): New prototype.
1434 * interface.c (compare_parameter): Use it.
1436 2011-07-19 Richard Guenther <rguenther@suse.de>
1438 * trans-expr.c (fill_with_spaces): Use fold_build_pointer_plus.
1439 (gfc_trans_string_copy): Likewise.
1440 * trans-intrinsic.c (gfc_conv_intrinsic_repeat): Likewise.
1441 * trans-types.c (gfc_get_array_descr_info): Likewise.
1442 * trans.c (gfc_build_array_ref): Likewise.
1444 2011-07-19 Janus Weil <janus@gcc.gnu.org>
1447 * resolve.c (resolve_allocate_expr): Fix diagnostics for pointers.
1449 2011-07-18 Tobias Burnus <burnus@net-b.de>
1451 * trans-decl.c (gfc_build_qualified_array): Make coarray's
1452 token TYPE_QUAL_RESTRICT.
1454 2011-07-18 Tobias Burnus <burnus@net-b.de>
1456 * resolve.c (resolve_transfer): Mention defined I/O
1457 in the diagnostic for alloc_comp/pointer_comp.
1459 2011-07-17 Tobias Burnus <burnus@net-b.de>
1462 * module.c (check_for_ambiguous): Check whether the name is matches
1463 the current program unit.
1465 2011-07-17 Tobias Burnus <burnus@net-b.de>
1468 * expr.c (gfc_check_pointer_assign): Fix checking for invalid
1471 2011-07-16 Tobias Burnus <burnus@net-b.de>
1473 * expr.c (gfc_ref_this_image): New function.
1474 (gfc_is_coindexed): Use it.
1475 * gfortran.h (gfc_ref_this_image): New prototype.
1476 * resolve.c (resolve_deallocate_expr,
1477 resolve_allocate_expr): Support alloc scalar coarrays.
1478 * trans-array.c (gfc_conv_array_ref, gfc_array_init_size,
1479 gfc_conv_descriptor_cosize, gfc_array_allocate,
1480 gfc_trans_deferred_array): Ditto.
1481 * trans-expr.c (gfc_conv_variable) Ditto.:
1482 * trans-stmt.c (gfc_trans_deallocate): Ditto.
1483 * trans-types.c (gfc_get_element_type, gfc_get_array_type_bounds
1484 gfc_get_array_descr_info): Ditto.
1485 * trans-decl.c (gfc_get_symbol_decl): Ditto.
1487 2011-07-11 Jakub Jelinek <jakub@redhat.com>
1490 * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Initialize
1491 inner_size to gfc_index_one_node instead of integer_one_node.
1493 2011-07-10 Tobias Burnus <burnus@net-b.de>
1496 * intrinsic.c (add_functions): Use BT_VOID for 2nd argument of SIGNAL.
1498 2011-07-09 Uros Bizjak <ubizjak@gmail.com>
1501 * expr.c (gfc_get_corank): Change return value to int.
1502 * gfortran.h (gfc_get_corank): Update function prototype.
1504 2011-07-07 Mikael Morin <mikael.morin@sfr.fr>
1507 * resolve.c (resolve_symbol): Force resolution of function result's
1508 array specification.
1510 2011-07-07 Tobias Burnus <burnus@net-b.de>
1512 * trans.c (gfc_allocate_with_status): Call _gfortran_caf_register
1513 with NULL arguments for (new) stat=/errmsg= arguments.
1515 2011-07-06 Daniel Carrera <dcarrera@gmail.com>
1517 * trans-array.c (gfc_array_allocate): Rename allocatable_array to
1518 allocatable. Rename function gfc_allocate_array_with_status to
1519 gfc_allocate_allocatable_with_status. Update function call for
1520 gfc_allocate_with_status.
1521 * trans-opemp.c (gfc_omp_clause_default_ctor): Rename function
1522 gfc_allocate_array_with_status to gfc_allocate_allocatable_with_status.
1523 * trans-stmt.c (gfc_trans_allocate): Update function call for
1524 gfc_allocate_with_status. Rename function gfc_allocate_array_with_status
1525 to gfc_allocate_allocatable_with_status.
1526 * trans.c (gfc_call_malloc): Add new parameter gfc_allocate_with_status
1527 so it uses the library for memory allocation when -fcoarray=lib.
1528 (gfc_allocate_allocatable_with_status): Renamed from
1529 gfc_allocate_array_with_status.
1530 (gfc_allocate_allocatable_with_status): Update function call for
1531 gfc_allocate_with_status.
1532 * trans.h (gfc_coarray_type): New enum.
1533 (gfc_allocate_with_status): Update prototype.
1534 (gfc_allocate_allocatable_with_status): Renamed from
1535 gfc_allocate_array_with_status.
1536 * trans-decl.c (generate_coarray_sym_init): Use the new constant
1537 GFC_CAF_COARRAY_ALLOC in the call to gfor_fndecl_caf_register.
1539 2011-07-06 Richard Guenther <rguenther@suse.de>
1541 * f95-lang.c (gfc_init_decl_processing):
1542 Merge calls to build_common_tree_nodes and build_common_tree_nodes_2.
1544 2011-07-04 Jakub Jelinek <jakub@redhat.com>
1547 * gfortranspec.c (lang_specific_driver): Ignore options with
1548 CL_ERR_MISSING_ARG errors.
1550 2011-07-02 Janus Weil <janus@gcc.gnu.org>
1553 * expr.c (gfc_check_vardef_context): Handle type-bound procedures.
1555 2011-06-30 Jakub Jelinek <jakub@redhat.com>
1558 * gfortran.h (gfc_constructor): Add repeat field.
1559 * trans-array.c (gfc_conv_array_initializer): Handle repeat > 1.
1560 * array.c (current_expand): Add repeat field.
1561 (expand_constructor): Copy repeat.
1562 * constructor.c (node_free, node_copy, gfc_constructor_get,
1563 gfc_constructor_lookup): Handle repeat field.
1564 (gfc_constructor_lookup_next, gfc_constructor_remove): New functions.
1565 * data.h (gfc_assign_data_value): Add mpz_t * argument.
1566 (gfc_assign_data_value_range): Removed.
1567 * constructor.h (gfc_constructor_advance): Removed.
1568 (gfc_constructor_lookup_next, gfc_constructor_remove): New prototypes.
1569 * data.c (gfc_assign_data_value): Add REPEAT argument, handle it and
1570 also handle overwriting a range with a single entry.
1571 (gfc_assign_data_value_range): Removed.
1572 * resolve.c (check_data_variable): Adjust gfc_assign_data_value
1573 call. Use gfc_assign_data_value instead of
1574 gfc_assign_data_value_expr.
1576 2011-06-27 Janus Weil <janus@gcc.gnu.org>
1579 * trans-array.c (structure_alloc_comps): Make sure sub-components
1580 and extended types are correctly deallocated.
1582 2011-06-21 Andrew MacLeod <amacleod@redhat.com>
1584 * trans-openmp.c: Add sync_ or SYNC__ to builtin names.
1585 * trans-stmt.c: Add sync_ or SYNC__ to builtin names.
1586 * trans-decl.c: Add sync_ or SYNC__ to builtin names.
1588 2011-06-21 Janus Weil <janus@gcc.gnu.org>
1591 * class.c (gfc_find_derived_vtab): Make vtab and default initialization
1592 symbols SAVE_IMPLICIT.
1594 2011-06-20 Tobias Burnus <burnus@net-b.de>
1597 * gfortran.h (gfc_check_vardef_context): Update prototype.
1598 (iso_fortran_env_symbol): Handle derived types.
1599 (symbol_attribute): Add lock_comp.
1600 * expr.c (gfc_check_vardef_context): Add LOCK_TYPE check.
1601 * interface.c (compare_parameter, gfc_procedure_use): Handle
1603 (compare_actual_formal): Update
1604 gfc_check_vardef_context call.
1605 * check.c (gfc_check_atomic_def, gfc_check_atomic_ref): Ditto.
1606 * intrinsic.c (check_arglist): Ditto.
1607 * io.c (resolve_tag, gfc_resolve_dt, gfc_resolve_inquire): Ditto.
1608 * iso-fortran-env.def (ISOFORTRAN_LOCK_TYPE): Add.
1609 * intrinsic.texi (ISO_FORTRAN_ENV): Document LOCK_TYPE.
1610 * module.c (mio_symbol_attribute): Handle lock_comp.
1611 (create_derived_type): New function.
1612 (use_iso_fortran_env_module): Call it to handle LOCK_TYPE.
1613 * parse.c (parse_derived): Add constraint check for LOCK_TYPE.
1614 * resolve.c (resolve_symbol, resolve_lock_unlock): Add constraint
1615 checks for LOCK_TYPE.
1616 (gfc_resolve_iterator, resolve_deallocate_expr,
1617 resolve_allocate_expr, resolve_code, resolve_transfer): Update
1618 gfc_check_vardef_context call.
1619 * trans-stmt.h (gfc_trans_lock_unlock): New prototype.
1620 * trans-stmt.c (gfc_trans_lock_unlock): New function.
1621 * trans.c (trans_code): Handle LOCK and UNLOCK.
1623 2011-06-18 Janus Weil <janus@gcc.gnu.org>
1626 * decl.c (gfc_match_procedure): Allow PROCEDURE declarations inside
1629 2011-06-17 Janus Weil <janus@gcc.gnu.org>
1632 * check.c (gfc_check_move_alloc): If 'TO' argument is polymorphic,
1633 make sure the vtab is present.
1635 2011-06-16 Janus Weil <janus@gcc.gnu.org>
1638 * interface.c (gfc_extend_assign): Propagate the locus from the
1639 assignment to the type-bound procedure call.
1641 2011-06-16 Janus Weil <janus@gcc.gnu.org>
1644 * module.c (mio_component): Make sure the 'class_ok' attribute is set
1645 for use-associated CLASS components.
1646 * parse.c (parse_derived): Check for 'class_ok' attribute.
1647 * resolve.c (resolve_fl_derived): Ditto.
1649 2011-06-13 Thomas Koenig <tkoenig@gcc.gnu.org>
1651 * frontend-passes.c (remove_trim): New function.
1652 (optimize_assignment): Use it.
1653 (optimize_comparison): Likewise. Return correct status
1654 for previous change.
1656 2011-06-12 Tobias Burnus
1659 * trans-expr.c (gfc_trans_assignment_1): Tell
1660 gfc_trans_scalar_assign to also deep-copy RHS nonvariables
1661 with allocatable components.
1662 * trans-array.c (gfc_conv_expr_descriptor): Ditto.
1664 2011-05-11 Thomas Koenig <tkoenig@gcc.gnu.org>
1666 * frontend-passes.c (optimize_assignment): Follow chains
1667 of concatenation operators to the end for removing trailing
1668 TRIMS for assignments.
1670 2011-06-10 Daniel Carrera <dcarrera@gmail.com>
1672 * trans-decl.c (gfc_build_builtin_function_decls):
1673 Updated declaration of caf_sync_all and caf_sync_images.
1674 * trans-stmt.c (gfc_trans_sync): Function
1675 can now handle a "stat" variable that has an integer type
1676 different from integer_type_node.
1678 2011-06-09 Richard Guenther <rguenther@suse.de>
1680 * trans.c (gfc_allocate_array_with_status): Mark error path
1683 2011-06-08 Tobias Burnus <burnus@net-b.de>
1686 * gfortran.h (gfc_statement): Add ST_LOCK and ST_UNLOCK.
1687 (gfc_exec_op): Add EXEC_LOCK and EXEC_UNLOCK.
1688 (gfc_code): Add expr4.
1689 * match.h (gfc_match_lock, gfc_match_unlock): New prototypes.
1690 * match.c (gfc_match_lock, gfc_match_unlock,
1691 lock_unlock_statement): New functions.
1692 (sync_statement): Bug fix, avoiding double freeing.
1693 (gfc_match_if): Handle LOCK/UNLOCK statement.
1694 * parse.c (decode_statement, next_statement,
1695 gfc_ascii_statement): Ditto.
1696 * st.c (gfc_free_statement): Handle LOCK and UNLOCK.
1697 * resolve.c (resolve_lock_unlock): New function.
1698 (resolve_code): Call it.
1699 * dump-parse-tree.c (show_code_node): Handle LOCK/UNLOCK.
1701 2011-06-07 Richard Guenther <rguenther@suse.de>
1703 * f95-lang.c (gfc_init_decl_processing): Do not set
1704 size_type_node or call set_sizetype.
1706 2011-06-05 Tobias Burnus <burnus@net-b.de>
1709 * trans-expr.c (gfc_conv_procedure_call): Fix -fcheck=pointer
1712 2011-06-05 Andreas Schmidt <andreas.schmidt.42@gmx.net>
1713 Thomas Koenig <tkoenig@gcc.gnu.org>
1715 * dump-parse-tree.c (show_symbol): Don't dump namespace
1716 for ENTRY to avoid infinite recursion.
1718 2011-06-02 Asher Langton <langton2@llnl.gov>
1721 * trans-decl.c (gfc_trans_deferred_vars): Treat assumed-size Cray
1722 pointees as AS_EXPLICIT.
1724 2011-06-02 Asher Langton <langton2@llnl.gov>
1727 * decl.c (variable_decl): Merge current_as before copying to cp_as.
1729 2011-06-02 Steven G. Kargl <kargl@gcc.gnu.org>
1732 * decl.c (gfc_match_modproc): Allow for a double colon in a module
1733 procedure statement.
1734 * parse.c ( decode_statement): Deal with whitespace around :: in
1737 2011-05-31 Tobias Burnus <burnus@net-b.de>
1740 * intrinsic.c (klass): Add CLASS_ATOMIC.
1741 (add_subroutines): Add atomic_ref/atomic_define.
1742 * intrinsic.texi (ATOMIC_REF, ATOMIC_DEFINE): Document.
1743 * intrinsic.h (gfc_check_atomic_def, gfc_check_atomic_ref,
1744 gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New prototypes.
1745 * gfortran.h (gfc_isym_id): Add GFC_ISYM_ATOMIC_DEF
1746 and GFC_ISYM_ATOMIC_REF.
1747 (gfc_atomic_int_kind, gfc_atomic_logical_kind): New global vars.
1748 * iresolve.c (gfc_resolve_atomic_def, gfc_resolve_atomic_ref): New
1750 * check.c (gfc_check_atomic, gfc_check_atomic_def,
1751 gfc_check_atomic_ref): New functions.
1752 * iso-fortran-env.def (ISOFORTRANENV_FILE_ATOMIC_INT_KIND,
1753 ISOFORTRANENV_FILE_ATOMIC_LOGICAL_KIND): Change kind value.
1754 * trans-intrinsic.c (conv_intrinsic_atomic_def,
1755 conv_intrinsic_atomic_ref, gfc_conv_intrinsic_subroutine): New
1757 (conv_intrinsic_move_alloc) Renamed from
1758 gfc_conv_intrinsic_move_alloc - and made static.
1759 * trans.h (gfc_conv_intrinsic_move_alloc): Remove.
1760 (gfc_conv_intrinsic_subroutine) Add prototype.
1761 * trans.c (trans_code): Call gfc_conv_intrinsic_subroutine.
1762 * trans-types (gfc_atomic_int_kind, gfc_atomic_logical_kind): New
1764 (gfc_init_kinds): Set them.
1766 2011-05-31 Tobias Burnus <burnus@net-b.de>
1769 * trans-array.c (gfc_trans_dummy_array_bias): Handle
1770 cobounds of assumed-shape arrays.
1772 2011-05-31 Tobias Burnus <burnus@net-b.de>
1775 * resolve.c (resolve_fl_variable): Handle static coarrays
1776 with non-constant cobounds.
1778 2011-05-29 Janus Weil <janus@gcc.gnu.org>
1781 * module.c (mio_component_ref): Handle components of extended types.
1782 * symbol.c (gfc_find_component): Return is sym is NULL.
1784 2011-05-29 Tobias Burnus <burnus@net-b.de>
1787 * interface.c (compare_parameter): Add check for passing coarray
1788 to allocatable noncoarray dummy.
1790 2011-05-29 Tobias Burnus <burnus@net-b.de>
1791 Richard Guenther <rguenther@suse.de>
1794 * trans-types.c (gfc_get_nodesc_array_type): Don't mess with
1795 the type's TREE_TYPE.
1796 * trans-array.c (gfc_conv_array_ref): Use TYPE_MAIN_VARIANT.
1797 * trans.c (gfc_build_array_ref): Ditto.
1799 2011-05-27 Tobias Burnus <burnus@net-b.de>
1802 * check.c (gfc_check_associated, gfc_check_null): Add coindexed check.
1803 * match.c (gfc_match_nullify): Ditto.
1804 * resolve.c (resolve_deallocate_expr): Ditto.
1805 * trans-types.c (gfc_get_nodesc_array_type): Don't set restricted
1808 2011-05-27 Tobias Burnus <burnus@net-b.de>
1811 * gfortran.h (gfc_isym_id): Add GFC_ISYM_RANK.
1812 * intrinsic.c (add_functions): Add rank intrinsic.
1813 (gfc_check_intrinsic_standard): Handle GFC_STD_F2008_TR.
1814 * intrinsic.h (gfc_simplify_rank, gfc_check_rank): Add prototypes.
1815 * simplify.c (gfc_simplify_rank): New function.
1816 * intrinsic.texi (RANK): Add description for rank intrinsic.
1817 * check.c (gfc_check_rank): New function.
1819 2011-05-26 Paul Thomas <pault@gcc.gnu.org>
1820 Thomas Koenig <tkoenig@gcc.gnu.org>
1823 * trans-expr.c (gfc_trans_assignment_1): GFC_REVERSE_NOT_SET
1824 changed to GFC_ENABLE_REVERSE.
1825 * trans-array.c (gfc_init_loopinfo): GFC_CANNOT_REVERSE changed
1826 to GFC_INHIBIT_REVERSE.
1827 * gfortran.h : Enum gfc_reverse is now GFC_ENABLE_REVERSE,
1828 GFC_FORWARD_SET, GFC_REVERSE_SET and GFC_INHIBIT_REVERSE.
1829 * dependency.c (gfc_dep_resolver): Change names for elements of
1830 gfc_reverse as necessary. Change the logic so that forward
1831 dependences are remembered as well as backward ones. When both
1832 have appeared, force a temporary.
1834 2011-05-26 Tobias Burnus <burnus@net-b.de>
1837 * trans-array.c (gfc_conv_array_ref): Handle pointer coarrays.
1838 * trans-decl.c (has_coarray_vars, caf_init_block,
1839 gfor_fndecl_caf_register): New file-global variables.
1840 (gfc_finish_var_decl): Make sure that coarrays in main are static.
1841 (gfc_build_qualified_array): Generate coarray token variable.
1842 (gfc_get_symbol_decl): Don't use a static initializer for coarrays.
1843 (gfc_build_builtin_function_decls): Set gfor_fndecl_caf_register.
1844 (gfc_trans_deferred_vars, gfc_emit_parameter_debug_info): Skip for
1846 (generate_local_decl): Check for local coarrays.
1847 (create_main_function): SYNC ALL before calling MAIN.
1848 (generate_coarray_sym_init): Register static coarray.
1849 (generate_coarray_init): Generate CAF registering constructor
1851 (gfc_generate_function_code): Call it, if needed, do not create
1853 (gfc_generate_module_vars, gfc_process_block_locals): Call
1854 generate_coarray_init.
1855 * trans-types.c (gfc_get_nodesc_array_type): Generate pointers for
1857 * trans.h (gfor_fndecl_caf_register): New variable.
1858 (lang_type): New element caf_token.
1859 (GFC_TYPE_ARRAY_CAF_TOKEN): New macro.
1861 2011-05-24 Joseph Myers <joseph@codesourcery.com>
1863 * Make-lang.in (GFORTRAN_D_OBJS): Remove prefix.o.
1864 (gfortran$(exeext)): Use libcommon-target.a.
1866 2011-05-22 Thomas Koenig <tkoenig@gcc.gnu.org>
1868 * frontend-passes.c (cfe_register_funcs): Also register
1869 character functions if their charlens are known and constant.
1870 Also register allocatable functions.
1872 2011-05-21 Janus Weil <janus@gcc.gnu.org>
1875 * match.c (select_type_set_tmp): Make the temporary ALLOCATABLE if the
1876 selector is ALLOCATABLE.
1878 2011-05-20 Janus Weil <janus@gcc.gnu.org>
1881 * module.c (write_dt_extensions): Do not write extended types which
1882 are local to a subroutine.
1884 2011-05-20 Joseph Myers <joseph@codesourcery.com>
1886 * Make-lang.in (GFORTRAN_D_OBJS): Remove version.o and intl.o.
1888 2011-05-20 Janne Blomqvist <jb@gcc.gnu.org>
1890 * gfortran.texi (set_fpe): Update documentation.
1891 * invoke.texi (-ffpe-trap): Likewise.
1892 * libgfortran.h (GFC_FPE_PRECISION): Rename to GFC_FPE_INEXACT.
1893 * options.c (gfc_handle_fpe_trap_option): Handle inexact and make
1894 precision an alias for it.
1896 2011-05-19 Tobias Burnus <burnus@net-b.de>
1899 * trans-types.c (gfc_get_element_type): Handle scalar coarrays.
1900 (gfc_get_nodesc_array_type): Make a variant-type copy for scalar
1902 * trans.c (gfc_build_array_ref): Return original type not variant
1903 copy for scalar coarrays.
1904 * trans-array.c (gfc_conv_array_ref): Ditto.
1906 2011-05-18 Janus Weil <janus@gcc.gnu.org>
1909 * trans-intrinsic.c (gfc_conv_intrinsic_move_alloc): Deallocate 'TO'
1910 argument to avoid memory leaks.
1912 2011-05-16 Tobias Burnus <burnus@net-b.de>
1914 * gfortran.texi (_gfortran_set_options): Add GFC_STD_F2008_TR.
1915 (Fortran 2008 status): Multi-image support for coarrays.
1916 (TR 19113 status): New section.
1918 2011-05-15 Tobias Burnus <burnus@net-b.de>
1921 actual argument is not an array; rank mismatch is diagnosted later.
1922 * trans-decl.c (gfc_get_symbol_decl, gfc_trans_deferred_vars): Handle
1924 * trans-types.c (gfc_get_array_type_bounds): Ditto.
1926 2011-05-15 Joern Rennecke <amylaar@spamcop.net>
1929 * trans-types.c: Include "tm.h".
1930 [0] (c_size_t_size): Remove.
1932 2011-05-15 Janne Blomqvist <jb@gcc.gnu.org>
1935 * gfortran.texi (_gfortran_set_options): Even though -fbacktrace
1936 is now the default, the library defaults to backtracing disabled.
1938 2011-05-14 Tobias Burnus <burnus@net-b.de>
1940 * lang.opt (fdump-core): Re-add as ignored option
1941 for backward compatibility.
1943 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1946 * gfortran.texi: Update mixed-language programming section
1947 reflecting the removal of the fdump-core option, and that
1948 -fbacktrace is now enabled by default.
1950 2011-05-14 Thomas Koenig <tkoenig@gcc.gnu.org>
1953 * frontend-passes.c (cfe_register_funcs): Also register functions
1954 for potential elimination if the rank is > 0, the shape is unknown
1955 and reallocate on assignment is active.
1956 (create_var): For rank > 0 functions with unknown shape, create
1957 an allocatable temporary.
1959 2011-05-14 Tobias Burnus <burnus@net-b.de>
1962 * interface.c (compare_parameter): Skip diagnostic if
1963 actual argument is not an array; rank mismatch is diagnosted later.
1965 2011-05-14 Tobias Burnus <burnus@net-b.de>
1967 * options.c (gfc_init_options, gfc_post_options): Enable
1968 -fstack-arrays by default if -Ofast is used.
1969 * invoke.texi (-fstack-arrays): Document this.
1971 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1974 * gfortran.h (gfc_option_t): Remove flag_dump_core.
1975 * gfortran.texi (GFORTRAN_ERROR_DUMPCORE): Remove section.
1976 (GFORTRAN_ERROR_BACKTRACE): Document that it's enabled by default.
1977 * intrinsic.texi (ABORT): Remove explanation of -fdump-core.
1978 * invoke.texi: Remove -fdump-core, document that -fbacktrace is
1980 * lang.opt: Remove -fdump-core.
1981 * options.c (gfc_init_options): Make backtrace default to enabled,
1983 (gfc_handle_option): Remove OPT_fdump-core.
1984 * trans-decl.c: Pass a 0 to preserve ABI.
1986 2011-05-14 Janne Blomqvist <jb@gcc.gnu.org>
1988 * gfortran.texi: Remove GFORTRAN_USE_STDERR documentation.
1990 2011-05-13 Tobias Burnus <burnus@net-b.de>
1993 * io.c (resolve_tag_format, resolve_tag): Make sure
1994 that the string is of default kind.
1995 (gfc_resolve_inquire): Also resolve decimal tag.
1997 2011-05-12 Tobias Burnus <burnus@net-b.de>
2000 * resolve.c (resolve_intrinsic): Don't resolve module
2001 intrinsics multiple times.
2003 2011-05-11 Tobias Burnus <burnus@net-b.de>
2006 * expr.c (gfc_is_constant_expr): Use e->value.function.esym
2007 instead of e->symtree->n.sym, if available.
2009 2011-05-07 Eric Botcazou <ebotcazou@adacore.com>
2011 * f95-lang.c (global_bindings_p): Return bool and simplify.
2013 2011-05-07 Tobias Burnus <burnus@net-b.de>
2017 * trans.h: Move gfc_init_coarray_decl prototype ...
2018 * gfortran.h: ... to here.
2019 * parse.c (translate_all_program_units): Call gfc_init_coarray_decl.
2020 (gfc_parse_file): Update translate_all_program_units call.
2021 * trans-decl.c (gfc_init_coarray_decl): Fix variable declaration,
2022 new argument whether DECL_EXTERNAL should be used.
2023 (create_main_function): Update gfc_init_coarray_decl call.
2024 * trans-intrinsic.c (trans_this_image, trans_image_index,
2025 conv_intrinsic_cobound): Ditto.
2027 2011-05-06 Tobias Burnus <burnus@net-b.de>
2030 * trans-array.c (gfc_walk_variable_expr): Continue walking
2031 for scalar coarrays.
2032 * trans-intrinsic.c (convert_element_to_coarray_ref): New function.
2033 (trans_this_image, trans_image_index, conv_intrinsic_cobound): Use it.
2034 (trans_this_image): Fix algorithm.
2035 * trans-types.c (gfc_get_element_type, gfc_get_array_descriptor_base,
2036 gfc_sym_type): Handle scalar coarrays.
2038 2011-05-06 Tobias Burnus <burnus@net-b.de>
2042 * lang.opt (std=f2008tr): New.
2043 * libgfortran.h (GFC_STD_F2008_TR): New macro constant.
2044 * decl.c (verify_c_interop_param): Allow OPTIONAL in BIND(C)
2045 procedures for -std=f2008tr/gnu/legacy.
2046 (gfc_match_import): Set sym to NULL.
2047 * options.c (set_default_std_flags,gfc_handle_option): Handle
2049 * invoke.texi (-std=): Document -std=f2008tr.
2051 2011-05-05 Nathan Froyd <froydnj@codesourcery.com>
2053 * trans-decl.c (gfc_trans_entry_master_switch): Call build_case_label.
2054 * trans-io.c (add_case): Likewise.
2055 * trans-stmt.c (gfc_trans_integer_select): Likewise.
2056 (gfc_trans_character_select): Likewise.
2058 2011-05-05 Eric Botcazou <ebotcazou@adacore.com>
2060 * trans-decl.c (trans_function_start): Do not set
2061 dont_save_pending_sizes_p.
2063 2011-05-04 Nathan Froyd <froydnj@codesourcery.com>
2065 * trans.h (gfc_chainon_list): Delete.
2066 * trans.c (gfc_chainon_list): Delete.
2068 2011-05-04 Tobias Burnus <burnus@net-b.de>
2071 * invoke.texi (fno-protect-parens): Document
2072 that -Ofast implies -fno-protect-parens.
2073 * options.c (gfc_init_options, gfc_post_options):
2074 Make -Ofast imply -fno-protect-parens.
2076 2011-05-04 Nathan Froyd <froydnj@codesourcery.com>
2078 * trans-decl.c (build_library_function_decl_1): Call
2079 build_function_type_vec. Adjust argument list building accordingly.
2080 * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl): Likewise.
2081 * trans-types.c (gfc_get_function_type): Likewise.
2083 2011-05-04 Richard Guenther <rguenther@suse.de>
2085 * trans-array.c (gfc_trans_array_constructor_value): Use
2086 size_int for bounds of range types.
2087 (gfc_trans_array_constructor_value): Use size_type_node
2088 for memcpy argument.
2089 * trans-common.c (build_field): Use gfc_charlen_type_node
2091 * trans-openmp.c (gfc_trans_omp_clauses): Do not pass NULL
2092 as type to build_int_cst.
2093 * trans-const.c (gfc_build_string_const): Use size_int
2094 for bounds of range types.
2095 (gfc_build_wide_string_const): Likewise.
2096 * trans-stmt.c (gfc_trans_label_assign): Use gfc_charlen_type_node
2098 (gfc_trans_character_select): Likewise.
2099 (gfc_trans_character_select): Do not pass NULL
2100 as type to build_int_cst.
2101 (gfc_trans_character_select): Use size_int for bounds of range types.
2102 * trans-io.c (gfc_build_io_library_fndecls): Likewise.
2103 (add_case): Do not pass NULL as type to build_int_cst.
2104 (transfer_expr): Likewise.
2105 (transfer_array_desc): Likewise.
2106 * trans-decl.c (gfc_add_assign_aux_vars): Use gfc_charlen_type_node
2108 (gfc_trans_assign_aux_var): Likewise.
2109 (create_main_function): Use size_int for bounds of range types.
2110 * trans-intrinsic.c (gfc_conv_intrinsic_minmax_char): Do not pass
2111 NULL as type to build_int_cst.
2112 (gfc_conv_intrinsic_spacing): Likewise.
2113 (gfc_conv_intrinsic_rrspacing): Likewise.
2114 (gfc_conv_intrinsic_len): Use gfc_charlen_type_node for lengths.
2116 2011-05-04 Richard Guenther <rguenther@suse.de>
2118 * trans-types.c (gfc_get_array_type_bounds): Remove zero notrunc
2119 argument to int_const_binop.
2121 2011-05-03 Tobias Burnus <burnus@net-b.de>
2124 * trans-intrinsic.c (trans_this_image): Implement version with
2126 (conv_intrinsic_cobound): Simplify code.
2127 (gfc_conv_intrinsic_function): Call trans_this_image for
2128 this_image(coarray) except for -fcoarray=single.
2130 2011-05-02 Steven G. Kargl <kargl@gcc.gnu.org>
2133 * gfortran.texi: Document the 'Q' exponent-letter extension.
2134 * invoke.texi: Document -Wreal-q-constant.
2135 * lang.opt: Add -Wreal-q-constant option.
2136 * gfortran.h: Add warn_real_q_constant to option struct.
2137 * primary.c (match_real_constant): Use it. Accept 'Q' as
2138 exponent-letter for REAL(16) real-literal-constant with a
2139 fallback to REAL(10) or error if REAL(10) is not available.
2140 * options.c (gfc_init_options, set_Wall) Set it.
2141 (gfc_handle_option): Handle new option.
2143 2011-04-30 Thomas Koenig <tkoenig@gcc.gnu.org>
2145 * dump-prase-tree.c (show_code_node): Set the current
2146 namespace to the BLOCK before displaying it; restore
2149 2011-04-30 Tobias Burnus <burnus@net-b.de>
2152 * decl.c (gfc_match_import): Don't try to find the
2153 symbol if already found.
2155 2011-04-30 Paul Thomas <pault@gcc.gnu.org>
2158 * trans-expr.c (fcncall_realloc_result): Set the bounds and the
2159 offset so that the lbounds are one.
2160 (gfc_trans_arrayfunc_assign): Add rank to arguments of above.
2162 2011-04-29 Paul Thomas <pault@gcc.gnu.org>
2165 * trans-expr.c (arrayfunc_assign_needs_temporary): Deal with
2166 automatic reallocation when the lhs is a target.
2169 * trans-expr.c (fcncall_realloc_result): Make sure that the
2170 result dtype field is set before the function call.
2172 2011-04-29 Tobias Burnus <burnus@net-b.de>
2175 * resolve.c (resolve_typebound_generic_call): Don't check access
2176 flags of the specific function.
2179 * resolve.c (resolve_formal_arglist): Don't change AS_DEFERRED
2180 to AS_ASSUMED_SHAPE for function results.
2181 (resolve_fl_var_and_proc): Print also for function results with
2182 AS_DEFERRED an error, if they are not a pointer or allocatable.
2183 (resolve_types): Make sure arguments of procedures in interface
2184 blocks are resolved.
2186 2011-04-29 Michael Matz <matz@suse.de>
2188 * options.c (options.c): Set warn_maybe_uninitialized.
2190 2011-04-28 Tobias Burnus <burnus@net-b.de>
2193 * resolve.c (resolve_fl_var_and_proc): Print diagnostic of
2194 function results only once.
2195 (resolve_symbol): Always resolve function results.
2198 * expr.c (gfc_check_vardef_context): Fix handling of generic
2200 * interface.c (check_interface0): Reject internal functions
2201 in generic interfaces, unless -std=gnu.
2203 2011-04-27 Tobias Burnus <burnus@net-b.de>
2206 * resolve.c (resolve_global_procedure): Error recovery -
2207 avoid segfault for (non)character-returning functions.
2209 2011-04-26 Thomas Koenig <tkoenig@gcc.gnu.org>
2211 * decl.c (gfc_match_end): Check that the block name starts
2213 * parse.c (gfc_build_block_ns): Make block names unique by
2216 2011-04-26 Thomas Koenig <tkoenig@gcc.gnu.org>
2218 * frontend-passes.c (inserted_block): New variable.
2219 (changed_statement): Likewise.
2220 (create_var): Encase statement to be operated on in a BLOCK.
2221 Adjust code insertion for BLOCK.
2222 (cfe_code): Set inserted_block and changed_statement to NULL.
2224 2011-04-23 Tobias Burnus <burnus@net-b.de>
2227 * module.c (mio_array_spec): Set as->cotype on reading.
2228 * resolve.c (resolve_allocate_expr): Fix allocating coarray
2231 2011-04-21 Thomas Koenig <tkoenig@gcc.gnu.org>
2234 * frontend_passes (cfe_register_funcs): Remove workaround for DO
2236 (gfc_code_walker): Make sure the pointer to the current
2237 statement doen't change when other statements are inserted.
2239 2011-04-21 Tobias Burnus <burnus@net-b.de>
2242 * array.c (gfc_match_array_spec): Fix maximal rank(+corank) check.
2244 2011-04-20 Jim Meyering <meyering@redhat.com>
2246 * expr.c (free_expr0): Remove useless if-before-free.
2247 * gfortranspec.c (lang_specific_pre_link): Likewise.
2248 * interface.c (gfc_extend_expr): Likewise.
2249 * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
2251 2011-04-19 Tobias Burnus <burnus@net-b.de>
2256 * module.c (fix_mio_expr): Commit created symbol.
2258 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2260 * scanner.c (load_file): Use XCNEWVAR instead of xcalloc.
2262 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2264 * frontend-passes.c (gfc_run_passes): Use XDELETEVEC instead of
2267 2011-04-19 Janne Blomqvist <jb@gcc.gnu.org>
2269 * misc.c (gfc_getmem): Remove function.
2270 * gfortran.h: Remove gfc_getmem prototype. Replace gfc_getmem
2271 usage with XCNEW or XCNEWVEC.
2272 * expr.c (gfc_check_assign_symbol): Replace gfc_getmem usage with
2274 * options.c (gfc_handle_module_path_options)
2275 (gfc_get_option_string): Likewise.
2276 * resolve.c (gfc_resolve_forall): Likewise.
2277 * simplify.c (simplify_transformation_to_array): Likewise.
2278 * target-memory.c (gfc_target_interpret_expr): Likewise.
2279 * trans-common.c (get_segment_info, copy_equiv_list_to_ns)
2280 (get_init_field): Likewise.
2281 * trans-expr.c (gfc_conv_statement_function): Likewise.
2282 * trans-io.c (nml_full_name): Likewise.
2283 * trans-stmt.c (gfc_trans_forall_1): Likewise.
2284 * scanner.c (load_file): Replace gfc_getmem usage with xcalloc.
2286 2011-04-19 Tobias Burnus <burnus@net-b.de>
2289 * parse.c (resolve_all_program_units): Skip modules.
2290 (translate_all_program_units): Handle modules.
2291 (gfc_parse_file): Defer code generation for modules.
2293 2011-04-19 Martin Jambor <mjambor@suse.cz>
2295 * trans-decl.c (gfc_generate_function_code): Call cgraph_create_node
2296 instead of cgraph_get_create_node.
2298 2011-04-18 Jim Meyering <meyering@redhat.com>
2300 remove now-unused definition of gfc_free
2301 * misc.c (gfc_free): Remove function.
2302 * gfortran.h (gfc_free): Remove its prototype.
2304 2011-04-18 Jim Meyering <meyering@redhat.com>
2306 convert each use of gfc_free (p) to free (p)
2307 Do that by running this command:
2308 perl -pi -e 's/\bgfc_free ?\(/free (/' \
2309 $(git grep -El '\bgfc_free ?\(')
2310 which also corrects the few uses that lacked a space between
2311 the function name and the open parenthesis.
2312 Manually undo the change to the function definition itself
2313 and its prototype. They'll be removed next.
2314 * array.c (gfc_free_array_spec, gfc_set_array_spec): s/gfc_free/free/
2315 * constructor.c (node_free): Likewise.
2316 * cpp.c (dump_queued_macros): Likewise.
2317 * data.c (gfc_assign_data_value): Likewise.
2318 * decl.c (free_variable, free_value, gfc_free_data): Likewise.
2319 (gfc_free_data_all, match_old_style_init): Likewise.
2320 (gfc_set_constant_character_len, gfc_free_enum_history, NUM_DECL):
2322 (gfc_match_modproc): Likewise.
2323 * dependency.c (check_section_vs_section): Likewise.
2324 * error.c (gfc_pop_error, gfc_free_error): Likewise.
2325 * expr.c (free_expr0, gfc_free_expr, gfc_free_actual_arglist): Likewise.
2326 (gfc_free_ref_list, gfc_replace_expr, gfc_copy_ref): Likewise.
2327 (find_substring_ref, gfc_simplify_expr, gfc_check_assign_symbol):
2329 * frontend-passes.c (gfc_run_passes, cfe_expr_0): Likewise.
2330 (strip_function_call, optimize_comparison): Likewise.
2331 * interface.c (gfc_free_interface, arginfo, check_interface0): Likewise.
2332 (CHECK_OS_COMPARISON, gfc_extend_assign, gfc_free_formal_arglist):
2334 * intrinsic.c (gfc_intrinsic_done_1, gfc_convert_type_warn): Likewise.
2335 (gfc_convert_chartype): Likewise.
2336 * io.c (gfc_free_open, compare_to_allowed_values, gfc_free_close):
2338 (gfc_free_filepos, gfc_free_dt, gfc_free_inquire): Likewise.
2339 * match.c (gfc_free_iterator, gfc_match_associate): Likewise.
2340 (gfc_free_alloc_list, gfc_free_namelist, gfc_free_equiv_until):
2342 (free_case, gfc_free_forall_iterator): Likewise.
2344 * module.c (free_pi_tree, resolve_fixups, free_rename): Likewise.
2345 (free_true_name, peek_atom, mio_allocated_wide_string): Likewise.
2346 (mio_pool_string, mio_internal_string, mio_gmp_integer): Likewise.
2347 (mio_gmp_real, mio_expr, mio_typebound_proc): Likewise.
2348 (mio_full_typebound_tree, skip_list, load_equiv): Likewise.
2349 (free_written_common, gfc_use_module, gfc_free_use_stmts): Likewise.
2350 * openmp.c (gfc_free_omp_clauses): Likewise.
2351 * options.c (gfc_post_options): Likewise.
2352 * parse.c (select_type_pop, parse_omp_structured_block): Likewise.
2353 * primary.c (gfc_free_structure_ctor_component): Likewise.
2354 * resolve.c (resolve_structure_cons, check_host_association): Likewise.
2355 (gfc_resolve_forall, resolve_equivalence): Likewise.
2356 * scanner.c (gfc_scanner_done_1, gfc_release_include_path): Likewise.
2357 (gfc_define_undef_line, preprocessor_line, include_line): Likewise.
2358 (load_file, gfc_read_orig_filename): Likewise.
2359 * simplify.c (simplify_transformation_to_array): Likewise.
2360 (gfc_simplify_ibits, simplify_shift, gfc_simplify_ishftc, STRING):
2362 (gfc_simplify_compiler_options): Likewise.
2363 * st.c (gfc_free_statement, gfc_free_statements): Likewise.
2364 (gfc_free_association_list): Likewise.
2365 * symbol.c (free_components, gfc_free_st_label, free_st_labels):
2367 (gfc_delete_symtree, gfc_free_symbol, gfc_undo_symbols): Likewise.
2368 (free_old_symbol, gfc_commit_symbols, free_tb_tree): Likewise.
2369 (free_common_tree, free_uop_tree, free_sym_tree): Likewise.
2370 (gfc_free_dt_list, gfc_free_equiv_infos, gfc_free_equiv_lists):
2372 (gfc_free_finalizer, gfc_free_charlen, free_entry_list): Likewise.
2373 (gfc_free_namespace): Likewise.
2374 * trans-array.c (gfc_free_ss, gfc_trans_array_bound_check): Likewise.
2375 (gfc_conv_array_ref, gfc_conv_ss_startstride): Likewise.
2376 (gfc_trans_dummy_array_bias, gfc_conv_array_parameter): Likewise.
2377 * trans-common.c (get_init_field, create_common): Likewise.
2378 * trans-const.c (gfc_build_wide_string_const): Likewise.
2379 (gfc_conv_string_init): Likewise.
2380 * trans-decl.c (gfc_generate_function_code): Likewise.
2381 * trans-expr.c (gfc_conv_substring, gfc_free_interface_mapping):
2383 (SCALAR_POINTER, gfc_conv_statement_function): Likewise.
2384 (gfc_trans_subarray_assign): Likewise.
2385 * trans-intrinsic.c (conv_generic_with_optional_char_arg): Likewise.
2386 * trans-io.c (gfc_trans_io_runtime_check, set_string): Likewise.
2387 (transfer_namelist_element, transfer_array_component): Likewise.
2388 * trans-openmp.c (gfc_trans_omp_array_reduction): Likewise.
2389 * trans-stmt.c (cleanup_forall_symtrees, gfc_trans_forall_1): Likewise.
2390 * trans.c (trans_runtime_error_vararg, gfc_restore_backend_locus):
2393 2011-04-15 Jim Meyering <meyering@redhat.com>
2395 gfortran: remove cpp definition of free, ...
2396 in preparation for the s/gfc_free/free/ transformation.
2397 * gfortran.h (free): Remove macro definition that would otherwise
2398 prevent direct use of the function.
2400 2011-04-18 Tobias Burnus <burnus@net-b.de>
2403 * array.c (gfc_match_array_ref): Check for too many codimensions.
2404 * check.c (gfc_check_image_index): Check number of elements
2406 * simplify.c (gfc_simplify_image_index): Remove unreachable checks.
2408 2011-04-18 Tobias Burnus <burnus@net-b.de>
2411 * iresolve.c (gfc_resolve_image_index): Set ts.type.
2412 * simplify.c (gfc_simplify_image_index): Don't abort if the bounds
2413 are not known at compile time and handle -fcoarray=lib.
2414 * trans-intrinsics.c (gfc_conv_intrinsic_function): Handle
2416 (conv_intrinsic_cobound): Fix comment typo.
2417 (trans_this_image): New function.
2418 * trans-array.c (gfc_unlikely): Move to trans.c.
2419 * trans.c (gfc_unlikely): Function moved from trans-array.c.
2420 (gfc_trans_runtime_check): Use it.
2421 * trans-io.c (gfc_trans_io_runtime_check): Ditto.
2422 * trans.h (gfc_unlikely): Add prototype.
2424 2011-04-18 Paul Thomas <pault@gcc.gnu.org>
2427 * trans-expr.c (fcncall_realloc_result): Renamed version of
2428 realloc_lhs_bounds_for_intrinsic_call that does not touch the
2429 descriptor bounds anymore but makes a temporary descriptor to
2431 (gfc_trans_arrayfunc_assign): Modify the reference to above
2434 2011-05-17 Tobias Burnus <burnus@net-b.de>
2437 * trans-decl.c (gfc_get_extern_function_decl): Fix decl
2438 for external procedures with proc arguments.
2440 2011-04-15 Michael Matz <matz@suse.de>
2442 * trans-array.c (toplevel): Include gimple.h.
2443 (gfc_trans_allocate_array_storage): Check flag_stack_arrays,
2444 properly expand variable length arrays.
2445 (gfc_trans_auto_array_allocation): If flag_stack_arrays create
2446 variable length decls and associate them with their scope.
2447 * gfortran.h (gfc_option_t): Add flag_stack_arrays member.
2448 * options.c (gfc_init_options): Handle -fstack_arrays option.
2449 * lang.opt (fstack-arrays): Add option.
2450 * invoke.texi (Code Gen Options): Document it.
2451 * Make-lang.in (trans-array.o): Depend on GIMPLE_H.
2453 2011-04-15 Tobias Burnus <burnus@net-b.de>
2456 * trans-intrinsic.c (conv_intrinsic_cobound): Remove unused
2457 code which is also causing an ICE.
2459 2011-04-14 Nathan Froyd <froydnj@codesourcery.com>
2461 * f95-lang.c (poplevel): Use BLOCK_CHAIN and block_chainon.
2463 2011-04-12 Nathan Froyd <froydnj@codesourcery.com>
2465 * f95-lang.c (union lang_tree_node): Check for TS_COMMON before
2468 2011-04-12 Paul Thomas <pault@gcc.gnu.org>
2472 * trans-array.c (get_std_lbound): For derived type variables
2473 return array valued component lbound.
2475 2011-04-12 Martin Jambor <mjambor@suse.cz>
2477 * trans-decl.c (gfc_generate_function_code): Call
2478 cgraph_get_create_node instead of cgraph_node.
2480 2011-04-11 Tobias Burnus <burnus@net-b.de>
2483 * simplify.c (simplify_bound_dim): Exit for
2484 ucobound's last dimension unless -fcoarray=single.
2485 * trans-array (gfc_conv_descriptor_size_1): Renamed from
2486 gfc_conv_descriptor_size, made static, has now from_dim and
2488 (gfc_conv_descriptor_size): Call gfc_conv_descriptor_size.
2489 (gfc_conv_descriptor_cosize): New function.
2490 * trans-array.h (gfc_conv_descriptor_cosize): New prototype.
2491 * trans-intrinsic.c (conv_intrinsic_cobound): Add input_location
2492 and handle last codim of ucobound for when -fcoarray is not "single".
2494 2011-04-08 Thomas Koenig <tkoenig@gcc.gnu.org>
2497 * gfortran.h (gfc_option_t): Add warn_function_elimination and
2498 flag_frontend_optimize.
2499 * lang.opt (Wfunction-elimination): Add.
2500 (ffrontend-optimize): Add.
2501 * invoke.texi: Add documentation for -Wfunction-elimination
2502 and -ffrontend-optimize. Add -faggressive-function-elimination
2503 to list of code generation options.
2504 * frontend-passes.c (gfc_run_passes): Run optimizations if
2505 flag_frontend_optimize is set.
2506 (warn_function_elimination): New function.
2507 (cfe_expr_0): Call it if requested to do so.
2508 * options.c (gfc_init_options): Initiate warn_function_elimination
2509 and flag_frontend_optimize.
2510 (gfc_post_options): Set flag_frontend_optimize if not specified
2511 by user, depending on the optimization level.
2512 (gfc_handle_option): Handle -Wfunction-elimination and
2513 -ffrontend-optimize.
2515 2011-04-06 Tobias Burnus <burnus@net-b.de>
2518 * trans-intrinsic.c (gfc_conv_intrinsic_function): Fix
2519 call for this_image.
2521 2011-04-05 Nathan Froyd <froydnj@codesourcery.com>
2523 * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Use
2524 build_function_type_list instead of build_function_type. Correct
2525 argument order for func_frexp and func_scalbn.
2527 2011-04-05 Duncan Sands <baldrick@free.fr>
2529 * f95-lang.c (build_builtin_fntypes): Swap frexp parameter types.
2531 2011-04-04 Thomas Koenig <tkoenig@gcc.gnu.org>
2533 * frontend-passes: (optimize_lexical_comparison): New function.
2534 (optimize_expr): Call it.
2535 (optimize_comparison): Also handle lexical comparison functions.
2536 Return false instad of -2 for unequal comparison.
2538 2011-04-04 Thomas Koenig <tkoenig@gcc.gnu.org>
2541 * frontend-passes (cfe_expr_0): Reverse the order of going
2544 2011-04-04 Tobias Burnus <burnus@net-b.de>
2545 Mikael Morin <mikael.morin@sfr.fr>
2548 * check.c (is_coarray): Update - because of DIMEN_THIS_IMAGE.
2549 * expr.c (gfc_is_coindexed): Ditto.
2550 * gfortran.h (gfc_array_ref_dimen_type): Add DIMEN_THIS_IMAGE.
2551 * interface.c (compare_parameter): Use gfc_expr_attr and
2553 * resolve.c (check_dimension, compare_spec_to_ref,
2554 resolve_allocate_expr, check_data_variable): Update for
2556 * simplify.c (gfc_simplify_lcobound, gfc_simplify_this_image,
2557 gfc_simplify_ucobound): Allow non-constant bounds.
2558 * trans-array.c (gfc_set_loop_bounds_from_array_spec,
2559 gfc_trans_create_temp_array, gfc_trans_constant_array_constructor,
2560 gfc_set_vector_loop_bounds, gfc_conv_array_index_offset,
2561 gfc_start_scalarized_body, gfc_trans_scalarizing_loops,
2562 gfc_trans_scalarized_loop_boundary, gfc_conv_section_startstride,
2563 gfc_conv_ss_startstride, gfc_conv_loop_setup,
2564 gfc_trans_array_bounds, gfc_conv_expr_descriptor,
2565 gfc_walk_variable_expr): Handle codimen.
2566 * trans-decl.c (gfc_build_qualified_array): Save cobounds.
2567 * trans-intrinsic.c (gfc_conv_intrinsic_bound): Use arg2.
2568 (conv_intrinsic_cobound): New function.
2569 (gfc_conv_intrinsic_function): Call it.
2570 (gfc_walk_intrinsic_function, gfc_add_intrinsic_ss_code): Handle
2571 ucobound, lcobound, this_image.
2572 * fortran/trans-types.c (gfc_build_array_type): Save cobounds.
2573 (gfc_get_dtype): Honour corank.
2574 (gfc_get_nodesc_array_type): Save corank and codimensions.
2575 (gfc_get_array_type_bounds): Save cobound.
2576 * fortran/trans.h (gfc_ss_info,gfc_loopinfo): Add codimen item.
2577 (gfc_array_kind): Add corank item.
2578 (GFC_TYPE_ARRAY_CORANK): New macro.
2580 2011-04-03 Kai Tietz <ktietz@redhat.com>
2583 * Make-lang.in (f95-lang.o): Add some missing dependencies.
2585 2011-04-01 Thomas Koenig <tkoenig@gcc.gnu.org>
2588 * frontend-passes (cfe_register_funcs): Don't
2589 register functions if they appear as iterators in DO loops.
2591 2011-03-30 Michael Matz <matz@suse.de>
2594 * trans-expr.c (realloc_lhs_loop_for_fcn_call): Take loop as parameter,
2595 don't use local variable.
2596 (gfc_trans_arrayfunc_assign): Adjust caller.
2598 2011-03-29 Janus Weil <janus@gcc.gnu.org>
2601 * decl.c (match_procedure_decl,match_ppc_decl): Set flavor of interface.
2602 * module.c (MOD_VERSION): Bump.
2603 (mio_typespec): Read/write 'interface' field.
2604 * primary.c (match_string_constant,match_logical_constant): Remove
2606 (match_complex_constant): Make sure to clear the typespec.
2608 2011-03-29 Thomas Koenig <tkoenig@gcc.gnu.org>
2610 * frontend-passes.c (create_var): Warn about creating an
2611 array temporary if requested.
2613 2011-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
2616 * frontend-passes.c (optimize_trim): Also follow references, except
2617 when they are substring references or array references.
2619 2011-03-27 Tobias Burnus <burnus@net-b.de>
2622 * gfortran.h (gfc_isym_id): Rename GFC_ISYM_NUMIMAGES to
2623 GFC_ISYM_NUM_IMAGES.
2624 (gfc_fcoarray): Add GFC_FCOARRAY_LIB.
2625 * intrinsic.c (add_functions): Update due to GFC_ISYM_NUM_IMAGES
2627 * invoke.texi (-fcoarray=): Document "lib" argument.
2628 * iresolve.c (gfc_resolve_this_image): Fix THIS IMAGE().
2629 * libgfortran.h (libgfortran_stat_codes): Add comments.
2630 * options.c (gfc_handle_coarray_option): Add -fcoarray=lib.
2631 * simplify.c (gfc_simplify_num_images, gfc_simplify_this_image):
2632 Handle GFC_FCOARRAY_LIB.
2633 * trans.h (gfc_init_coarray_decl): New prototype.
2634 (gfor_fndecl_caf_init, gfor_fndecl_caf_finalize,
2635 gfor_fndecl_caf_critical, gfor_fndecl_caf_end_critical,
2636 gfor_fndecl_caf_sync_all, gfor_fndecl_caf_sync_images,
2637 gfor_fndecl_caf_error_stop, gfor_fndecl_caf_error_stop_str,
2638 gfort_gvar_caf_num_images, gfort_gvar_caf_this_image):
2639 New global variables.
2640 * trans-decl.c: Declare several CAF functions (cf. above).
2641 (gfc_build_builtin_function_decls): Initialize those.
2642 (gfc_init_coarray_decl): New function.
2643 (create_main_function): Call CAF init/finalize functions.
2644 * trans-intrinsic.c (trans_this_image, trans_num_images): New.
2645 (gfc_conv_intrinsic_function): Call those.
2646 * trans-stmt.c (gfc_trans_stop, gfc_trans_sync, gfc_trans_critical):
2647 Add code for GFC_FCOARRAY_LIB.
2649 2011-03-26 Janus Weil <janus@gcc.gnu.org>
2652 * class.c (get_unique_hashed_string): Adjust maximum allowable length
2653 for unique type string.
2655 2011-03-25 Kai Tietz <ktietz@redhat.com>
2657 * scanner.c (preprocessor_line): Use filename_cmp
2660 2011-03-25 Tobias Burnus <burnus@net-b.de>
2664 * trans-types.c (gfc_get_function_type): Don't use varargs if the
2665 procedure is known to have no arguments.
2667 2011-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
2670 * gfortran.h (gfc_option_t) : Add
2671 flag_aggressive_function_elimination.
2672 (gfc_dep_compare_functions): Add prototype.
2673 * lang.opt: Add faggressive-function-elimination.
2674 * invoke.texi: Document -faggressive-function-elimination.
2675 * frontend_passes (expr_array): New static variable.
2676 (expr_size): Likewise.
2677 (expr_count): Likewise.
2678 (current_code): Likewise.
2679 (current_ns): Likewise.
2680 (gfc_run_passes): Allocate and free space for expressions.
2681 (cfe_register_funcs): New function.
2682 (create_var): New function.
2683 (cfc_expr_0): New function.
2684 (cfe_code): New function.
2685 (optimize_namespace): Invoke gfc_code_walker with cfe_code
2687 * dependency.c (gfc_dep_compare_functions): New function.
2688 (gfc_dep_compare_expr): Use it.
2689 * options.c (gfc_init_options): Handle
2690 flag_aggressive_function_elimination.
2691 (gfc_handle_option): Likewise.
2693 2011-03-15 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2695 * arith.c (arith_power): Plug memory leak.
2697 2011-03-12 Janus Weil <janus@gcc.gnu.org>
2700 * trans-expr.c (gfc_apply_interface_mapping_to_expr): Replace base type
2701 for polymorphic arguments.
2703 2011-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2706 * intrinsic.texi: Clarify doc of logarithm functions.
2708 2011-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2711 * trans-intrinsic.c (gfc_conv_intrinsic_ctime): Fix type of
2712 the string length variable.
2714 2011-03-11 Janus Weil <janus@gcc.gnu.org>
2717 * module.c (ab_attribute,attr_bits): Add AB_PROC_POINTER_COMP.
2718 (mio_symbol_attribute): Handle attribute 'proc_pointer_comp'.
2720 2011-03-06 Paul Thomas <pault@gcc.gnu.org>
2721 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2724 * expr.c (gfc_is_constant_expr): Only use gfc_constant_ac if
2725 the expression has an iterator. Otherwise, iterate through the
2726 array, checking for constant expressions for each element.
2728 2011-03-04 Janne Blomqvist <jb@gcc.gnu.org>
2731 * intrinsic.texi: Update CTIME and FDATE documentation.
2733 2011-03-03 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2735 * invoke.texi (Option Summary, Fortran Dialect Options)
2736 (Preprocessing Options, Runtime Options, Code Gen Options):
2737 Fix vertical list spacing by using @itemx for additinoal
2738 items, empty line before @table. Fix typos.
2740 2011-02-28 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2743 * intrinsic.texi: Fix doc of the VERIFY intrinsic.
2745 2011-02-26 Tobias Burnus <burnus@net-b.de>
2748 * trans-stmt.c (gfc_trans_allocate): Fix allocation with
2749 type-spec of deferred-length strings.
2751 2011-02-26 Tobias Burnus <burnus@net-b.de>
2754 * openmp.c (gfc_resolve_omp_directive): Resolve if()
2755 condition of OpenMP's task.
2757 2011-02-26 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
2760 * intrinsic.texi: Fix doc of the VERIFY intrinsic.
2762 2011-02-24 Tobias Burnus <burnus@net-b.de>
2765 * intrinsic.texi (ALLOCATED, ATAN, BESSEL_JN, BESSEL_YN): Add
2766 multitable for linebreak between different syntax variants.
2768 2011-02-24 Richard Guenther <rguenther@suse.de>
2771 * f95-lang.c (pushdecl): For externs in non-global scope push
2772 a copy of the decl into the BLOCK.
2774 2011-02-23 Mikael Morin <mikael@gcc.gnu.org>
2777 * trans.c (gfc_prepend_expr_to_block): New function.
2778 * trans.h (gfc_prepend_expr_to_block): Declare.
2779 * trans-array.c (gfc_conv_array_parameter): Replace
2780 gfc_add_expr_to_block with gfc_prepend_expr_to_block.
2782 2011-02-22 Paul Thomas <pault@gcc.gnu.org>
2785 * trans-decl.c (gfc_get_extern_function_decl): Don't use the
2786 gsymbol backend_decl if the procedure has a formal argument
2787 that is a procedure.
2789 2011-02-22 Tobias Burnus <burnus@net-b.de>
2792 * trans-stmt.c (gfc_trans_if_1): Use correct line for
2793 expressions in the if condition.
2795 2011-02-20 Tobias Burnus <burnus@net-b.de>
2798 * trans-decl.c (gfc_trans_deferred_vars): Use gfc_set_backend_locus and
2799 gfc_restore_backend_locus to have better debug locations.
2800 * trans-array.c (gfc_trans_deferred_array): Ditto.
2802 2011-02-20 Paul Thomas <pault@gcc.gnu.org>
2806 * trans-types.c (gfc_get_derived_type): Remove code that looks
2807 for decls in gsym and add call to gfc_get_module_backend_decl.
2808 * trans.h : Add prototype for gfc_get_module_backend_decl.
2809 * trans-decl.c (gfc_get_module_backend_decl): New function.
2810 (gfc_get_symbol_decl): Call it.
2812 2011-02-19 Paul Thomas <pault@gcc.gnu.org>
2815 * trans-array.c (get_array_ctor_all_strlen): Move up in file.
2816 (get_array_ctor_var_strlen): Add block dummy and add call to
2817 get_array_ctor_all_strlen instead of giving up on substrings.
2818 Call gcc_unreachable for default case.
2819 (get_array_ctor_strlen): Add extra argument to in call to
2820 get_array_ctor_var_strlen.
2822 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2825 * primary.c (gfc_match_structure_constructor): Handle empty parent
2828 2011-02-18 Tobias Burnus
2831 * trans-expr.c (arrayfunc_assign_needs_temporary): Use
2832 esym to check whether the specific procedure returns an
2833 allocatable or pointer.
2835 2011-02-18 Michael Matz <matz@suse.de>
2838 * gfortran.h (struct gfc_component): Add norestrict_decl member.
2839 * trans.h (struct lang_type): Add nonrestricted_type member.
2840 * trans-expr.c (gfc_conv_component_ref): Search fields with correct
2842 * trans-types.c (mirror_fields, gfc_nonrestricted_type): New.
2843 (gfc_sym_type): Use it.
2845 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2848 * resolve.c (resolve_transfer): Reject variables with procedure pointer
2851 2011-02-18 Janus Weil <janus@gcc.gnu.org>
2854 * gfortran.h (gfc_check_access): Removed prototype.
2855 (gfc_check_symbol_access): Added prototype.
2856 * module.c (gfc_check_access): Renamed to 'check_access', made static.
2857 (gfc_check_symbol_access): New function, basically a shortcut for
2859 (write_dt_extensions,write_symbol0,write_generic,write_symtree): Use
2860 'gfc_check_symbol_access'.
2861 (write_operator,write_module): Renamed 'gfc_check_access'.
2862 * resolve.c (resolve_fl_procedure,resolve_fl_derived,
2863 resolve_fl_namelist,resolve_symbol,resolve_fntype): Use
2864 'gfc_check_symbol_access'.
2866 2011-02-16 Janus Weil <janus@gcc.gnu.org>
2869 * class.c (gfc_build_class_symbol): Set 'class_ok' attribute.
2870 * decl.c (build_sym,attr_decl1): Move setting of 'class_ok' into
2871 'gfc_build_class_symbol'.
2872 (gfc_match_decl_type_spec): Reject unlimited polymorphism.
2873 * interface.c (matching_typebound_op): Check for 'class_ok' attribute.
2874 * match.c (select_type_set_tmp): Move setting of 'class_ok' into
2875 'gfc_build_class_symbol'.
2876 * primary.c (gfc_variable_attr): Check for 'class_ok' attribute.
2878 2011-02-15 Steven G. Kargl <kargl@gcc.gnu.org>
2881 . simplify.c (gfc_simplify_compiler_version): Fix off-by-one issue.
2883 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2886 * parse.c (gfc_build_block_ns): Commit 'block@' symbol.
2888 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2891 * class.c (gfc_build_class_symbol): Give a fatal error on polymorphic
2893 * primary.c (gfc_match_varspec): Avoid ICE for invalid class
2896 2011-02-14 Janus Weil <janus@gcc.gnu.org>
2899 * interface.c (get_expr_storage_size): Handle derived-type components.
2901 2011-02-13 Tobias Burnus <burnus@net-b.de>
2904 * interface.c (compare_parameter): Avoid ICE with
2905 character components.
2907 2011-02-12 Janus Weil <janus@gcc.gnu.org>
2909 * class.c (gfc_build_class_symbol): Reject polymorphic arrays.
2910 * decl.c (build_sym,build_struct,attr_decl1): Use return value of
2911 'gfc_build_class_symbol'.
2913 2011-02-12 Michael Matz <matz@suse.de>
2914 Janus Weil <janus@gcc.gnu.org>
2915 Tobias Burnus <burnus@net-b.de>
2918 * trans-expr.c (conv_parent_component_references): Avoid unintendent
2919 skipping of parent compounds.
2921 2011-02-11 Tobias Burnus <burnus@net-b.de>
2924 * resolve.c (resolve_formal_arglist): PURE with VALUE
2925 and no INTENT: Add -std= diagnostics.
2927 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2930 * resolve.c (resolve_procedure_interface): If interface has a result
2931 variable, copy the typespec and set result pointer to self.
2933 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2936 * resolve.c (resolve_typebound_subroutine): Remove erroneous line.
2938 2011-02-09 Janus Weil <janus@gcc.gnu.org>
2941 * trans-decl.c (init_intent_out_dt): Handle CLASS arguments.
2943 2011-02-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2945 * io.c (match_io_element): Do not set dt if not inquire.
2947 2011-02-08 Janus Weil <janus@gcc.gnu.org>
2950 * expr.c (gfc_check_assign_symbol): Reject pointers as pointer
2951 initialization target.
2953 2011-02-07 Janne Blomqvist <jb@gcc.gnu.org>
2954 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2956 * gfortran.texi (Thread-safety): texinfo styling fixes.
2957 * intrinsic.texi: Likewise.
2959 2011-02-06 Janne Blomqvist <jb@gcc.gnu.org>
2961 * gfortran.texi (Compiler Characteristics): Add reference to
2962 thread-safety section.
2964 2011-02-06 Janne Blomqvist <jb@gcc.gnu.org>
2966 * gfortran.texi (Thread-safety): New section.
2967 * intrinsic.texi (EXECUTE_COMMAND_LINE): Mention thread-safety.
2969 (GET_ENVIRONMENT_VARIABLE): Likewise.
2972 2011-02-06 Paul Thomas <pault@gcc.gnu.org>
2975 * trans-stmt.c (gfc_trans_allocate): For deferred character
2976 length allocations with SOURCE, store to the values and string
2977 length to avoid calculating twice. Replace gfc_start_block
2978 with gfc_init_block to avoid unnecessary contexts and to keep
2979 declarations of temporaries where they should be. Tidy up the
2982 2011-02-05 Janne Blomqvist <jb@gcc.gnu.org>
2985 * intrinsic.texi (SYSTEM_CLOCK): Update documentation.
2987 2011-02-02 Janus Weil <janus@gcc.gnu.org>
2988 Paul Thomas <pault@gcc.gnu.org>
2991 * trans-expr.c (gfc_trans_class_init_assign): Add call to
2992 gfc_get_derived_type.
2993 * module.c (read_cleanup): Do not use unique_symtrees for vtabs
2996 2011-02-02 Janus Weil <janus@gcc.gnu.org>
2999 * resolve.c (resolve_fl_variable): Handle polymorphic allocatables.
3001 2011-02-01 Janus Weil <janus@gcc.gnu.org>
3004 * trans-expr.c (gfc_conv_structure): Handle constructors for procedure
3005 pointer components with allocatable result.
3007 2011-01-31 Janus Weil <janus@gcc.gnu.org>
3010 * trans-expr.c (gfc_conv_procedure_call): Handle procedure pointers
3011 with pointer or allocatable result.
3013 2011-01-31 Paul Thomas <pault@gcc.gnu.org>
3016 * trans-stmt.c (gfc_trans_allocate): Improve handling of
3017 deferred character lengths with SOURCE.
3018 * iresolve.c (gfc_resolve_repeat): Calculate character
3019 length from source length and ncopies.
3020 * dump-parse-tree.c (show_code_node): Show MOLD and SOURCE
3021 expressions for ALLOCATE.
3023 2011-01-31 Janus Weil <janus@gcc.gnu.org>
3026 * resolve.c (resolve_typebound_subroutine): Bug fix for the case of
3027 an argument of a typebound assignment being a component.
3029 2011-01-31 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
3031 * gfortranspec.c (add_arg_libgfortran) [HAVE_LD_STATIC_DYNAMIC] Use
3032 LD_STATIC_OPTION, LD_DYNAMIC_OPTION.
3034 2011-01-31 Tobias Burnus <burnus@net-b.de>
3037 * resolve.c (resolve_fl_procedure): Reject stmt functions
3038 with pointer/allocatable attribute.
3040 2011-01-31 Tobias Burnus <burnus@net-b.de>
3043 * interface.c (gfc_procedure_use): Add explicit interface check for
3044 pointer/allocatable functions.
3046 2011-01-30 Paul Thomas <pault@gcc.gnu.org>
3049 * trans-expr.c (gfc_trans_assignment_1): If the rhs is an op
3050 expr and is assigned to a deferred character length scalar,
3051 make sure that the function is called before reallocation,
3052 so that the length is available. Include procedure pointer
3053 and procedure pointer component rhs as well.
3058 * gfortran.dg/allocatable_function_5.f90: New test not added by
3059 mistake on 2011-01-28.
3061 2011-01-29 Tobias Burnus <burnus@net-b.de>
3064 * check.c (gfc_check_shape): Support kind argument in SHAPE.
3065 * intrinsic.c (add_functions): Ditto.
3066 * resolve.c (gfc_resolve_shape): Ditto.
3067 * simplify.c (gfc_simplify_shape): Ditto.
3068 * intrinsic.h (gfc_check_shape, gfc_resolve_shape,
3069 gfc_simplify_shape): Update prototypes.
3070 * intrinisc.text (SHAPE): Document kind argument.
3072 2011-01-28 Tobias Burnus <burnus@net-b.de>
3075 * resolve.c (resolve_formal_arglist): Allow arguments with VALUE
3076 attribute also without INTENT.
3078 2011-01-28 Tobias Burnus <burnus@net-b.de>
3080 * gfortran.texi (Fortran 2003 status): Mention support for
3081 nonconstant namelist variables.
3083 2011-01-28 Paul Thomas <pault@gcc.gnu.org>
3084 Tobias Burnus <burnus@gcc.gnu.org>
3089 * interface.c (compare_actual_formal): An allocatable or pointer
3090 deferred length actual is only allowed if the formal argument
3091 is also deferred length. Clean up whitespace.
3092 * trans-expr.c (gfc_conv_procedure_call): Pass string length for
3093 deferred character length formal arguments by reference. Do the
3094 same for function results.
3095 (gfc_trans_pointer_assignment): Do not do runtime check of lhs
3096 and rhs character lengths, if deferred length lhs. In this case
3097 set the lhs character length to that of the rhs.
3098 (gfc_conv_string_parameter): Remove assert that string length is
3100 (is_scalar_reallocatable_lhs): New function.
3101 (alloc_scalar_allocatable_for_assignment): New function.
3102 (gfc_trans_assignment_1): Call above new function. If the rhs is
3103 a deferred character length itself, makes ure that the function
3104 is called before reallocation, so that the length is available.
3105 (gfc_trans_asssignment): Remove error about assignment to
3106 deferred length character variables.
3107 * gfortran.texi : Update entry about (re)allocation on
3109 * trans-stmt.c (gfc_trans_allocate): Add code to handle deferred
3110 length character variables.
3111 * module.c (mio_typespec): Transfer deferred characteristic.
3112 * trans-types.c (gfc_get_function_type): New code to generate
3113 hidden typelist, so that those character lengths that are
3114 passed by reference get the right type.
3115 * resolve.c (resolve_contained_fntype): Supress error for
3116 deferred character length functions.
3117 (resolve_function, resolve_fl_procedure) The same.
3118 (check_symbols): Remove the error that support for
3119 entity with deferred type parameter is not yet implemented.
3120 (resolve_fl_derived): The same.
3121 match.c (alloc_opt_list): Allow MOLD for deferred length object.
3122 * trans-decl.c (gfc_get_symbol_decl): For deferred character
3123 length dummies, generate a local variable for string length.
3124 (create_function_arglist): Hidden length can be a pointer.
3125 (gfc_trans_deferred_vars): For deferred character length
3126 results and dummies, assign the string length to the local
3127 variable from the hidden argument on entry and the other way
3128 round on exit, as appropriate.
3130 2011-01-27 Tobias Burnus <burnus@net-b.de>
3133 * trans-decl.c (gfc_generate_function_code): Fix init
3134 of allocatable result variable with allocatable components.
3136 2011-01-27 Tobias Burnus <burnus@net-b.de>
3139 * options.c (gfc_handle_module_path_options): Save
3140 module path without trailing slash as include path.
3142 2011-01-25 Tobias Burnus <burnus@net-b.de>
3145 * interface.c (gfc_check_operator_interface): Fix
3146 defined-assignment check.
3148 2011-01-23 Tobias Burnus <burnus@net-b.de>
3151 * trans-decl.c (gfc_trans_deferred_vars): Do not nullify
3152 scalar allocatable dummy arguments.
3154 2011-01-22 Thomas Koenig <tkoenig@gcc.gnu.org>
3157 * resolve.c (gfc_iso_c_func_interface): For C_LOC,
3158 check for array sections followed by component references
3159 which are illegal. Also check for coindexed arguments.
3161 2011-01-22 Tobias Burnus <burnus@net-b.de>
3164 * primary.c (gfc_match_varspec): Relax gcc_assert to allow for
3167 2011-01-21 Tobias Burnus <burnus@net-b.de>
3170 * error.c (gfc_error_now, gfc_fatal_error, gfc_error_check):
3171 Use defined instead of magic number exit status codes.
3172 * scanner.c (include_line, gfc_new_file): Ditto.
3174 2011-01-21 Tobias Burnus <burnus@net-b.de>
3177 * expr.c (gfc_check_pointer_assign): Reject expr data-targets
3178 without pointer attribute.
3180 2011-01-18 Janus Weil <janus@gcc.gnu.org>
3183 * resolve.c (expression_rank): Fix rank of procedure poiner components.
3184 * trans-expr.c (gfc_conv_procedure_call): Take care of procedure
3185 pointer components as actual arguments.
3187 2011-01-17 Jakub Jelinek <jakub@redhat.com>
3190 * gfortran.h (struct gfc_omp_saved_state): New type.
3191 (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New prototypes.
3192 * resolve.c (resolve_global_procedure): Call it around gfc_resolve
3194 * openmp.c (gfc_omp_save_and_clear_state, gfc_omp_restore_state): New
3197 2011-01-17 Tobias Burnus <burnus@net-b.de>
3200 * invoke.texi (Options to request or suppress errors
3201 and warnings): Fix cross link.
3203 2011-01-15 Tobias Burnus <burnus@net-b.de>
3205 * gfortran.texi: Update Fortran 2003 Status section.
3208 * invoke.texi: Add missing "-E" to the -dM example.
3210 2011-01-13 Tobias Burnus <burnus@net-b.de>
3213 * intrinsic.texi (get_command_argument, get_environment_variable):
3214 Mark arguments as optional in the Arguments section.
3216 2011-01-13 Kai Tietz <kai.tietz@onevision.com>
3217 Tobias Burnus <burnus@net-b.de>
3220 * trans-decl.c (gfc_get_extern_function_decl,
3221 build_function_decl): Set TREE_PUBLIC/TREE_EXTERNAL before
3222 calling decl_attributes.
3224 2011-01-13 Tobias Burnus <burnus@net-b.de>
3225 Mikael Morin <mikael@gcc.gnu.org>
3229 * gfortran.h (gfc_code): Move union ext's case_list into
3231 * dump-parse-tree.c (show_code_node): Adapt by prefixing case_list
3233 * frontend-passes.c (gfc_code_walker): Ditto.
3234 * match.c (gfc_match_goto, gfc_match_call, gfc_match_case,
3235 gfc_match_type_is, gfc_match_class_is): Ditto.
3236 * resolve.c (resolve_select, resolve_select_type): Ditto.
3237 * st.c (gfc_free_statement): Ditto.
3238 * trans-stmt.c (gfc_trans_integer_select, gfc_trans_logical_select,
3239 gfc_trans_character_select): Ditto.
3240 * parse.c (resolve_all_program_units): For error recovery, avoid
3241 segfault is proc_name is NULL.
3243 2011-01-11 Paul Thomas <pault@gcc.gnu.org>
3246 * trans-array.c (gfc_alloc_allocatable_for_assignment): Change
3247 to be standard compliant by testing for shape rather than size
3248 before skipping reallocation. Improve comments.
3250 2011-01-09 Janus Weil <janus@gcc.gnu.org>
3253 * resolve.c (resolve_actual_arglist): Remove unneeded and buggy piece
3256 2011-01-09 Thomas Koenig <tkoenig@gcc.gnu.org>
3259 * resolve.c (is_scalar_expr_ptr): For a substring reference,
3260 use gfc_dep_compare_expr to compare start and end expession.
3261 Add FIXME for using gfc_deb_compare_expr elsewhere.
3263 2011-01-09 Janus Weil <janus@gcc.gnu.org>
3266 * class.c (get_unique_type_string): Make type name start with upper
3269 2011-01-08 Thomas Koenig <tkoenig@gcc.gnu.org>
3272 * invoke.texi: Mention -ffree-line-length-none and
3273 -ffixed-line-length-none for preprocessing.
3275 2011-01-08 Paul Thomas <pault@gcc.gnu.org>
3278 * trans-expr.c (gfc_conv_procedure_call): With a non-copying
3279 procedure argument (eg TRANSPOSE) use a temporary if there is
3280 any chance of aliasing due to host or use association.
3281 (arrayfunc_assign_needs_temporary): Correct logic for function
3282 results and do not use a temporary for implicitly PURE
3283 variables. Use a temporary for Cray pointees.
3284 * symbol.c (gfc_add_save): Explicit SAVE not compatible with
3285 implicit pureness of containing procedure.
3286 * decl.c (match_old_style_init, gfc_match_data): Where decl
3287 would fail in PURE procedure, set implicit_pure to zero.
3288 * gfortran.h : Add implicit_pure to structure symbol_attr and
3289 add prototype for function gfc_implicit_pure.
3290 * expr.c (gfc_check_pointer_assign, gfc_check_vardef_context):
3291 Where decl would fail in PURE procedure, reset implicit_pure.
3292 * io.c (match_vtag, gfc_match_open, gfc_match_close,
3293 gfc_match_print, gfc_match_inquire, gfc_match_wait): The same.
3294 * match.c (gfc_match_critical, gfc_match_stopcode,
3295 sync_statement, gfc_match_allocate, gfc_match_deallocate): The
3297 * parse.c (decode_omp_directive): The same.
3298 (parse_contained): If not PURE, set implicit pure attribute.
3299 * resolve.c (resolve_formal_arglist, resolve_structure_cons,
3300 resolve_function, resolve_ordinary_assign) : The same.
3301 (gfc_implicit_pure): New function.
3302 * module.c (mio_symbol_attribute): Introduce AB_IMPLICIT_PURE
3303 to ab_attribute enum and use it in this function.
3305 2011-01-08 Thomas Koenig <tkoenig@gcc.gnu.org>
3308 * symbol.c (gfc_symbols_could_alias): Strip gfc_ prefix,
3309 make static and move in front of its only caller, to ...
3310 * trans-array.c (symbols_could_alias): ... here.
3311 Pass information about pointer and target status as
3312 arguments. Allocatable arrays don't alias anything
3313 unless they have the POINTER attribute.
3314 (gfc_could_be_alias): Keep track of pointer and target
3315 status when following references. Also check if typespecs
3316 of components match those of other components or symbols.
3318 2011-01-07 Tobias Burnus <burnus@net-b.de>
3321 * class.c (gfc_build_class_symbol): Mark __vtab as attr.vtab.
3322 * intrinsic.c (add_functions): Use simplify functions for
3323 EXTENDS_TYPE_OF and SAME_TYPE_AS.
3324 * intrinsic.h (gfc_simplify_extends_type_of,
3325 gfc_simplify_same_type_as): New prototypes.
3326 * simplify.c (is_last_ref_vtab, gfc_simplify_extends_type_of,
3327 gfc_simplify_same_type_as): New functions.
3329 2011-01-07 Janus Weil <janus@gcc.gnu.org>
3333 * gfortran.h (gfc_lval_expr_from_sym): Moved prototype.
3334 * class.c (gfc_class_null_initializer): Initialize _vptr to declared
3336 * expr.c (gfc_lval_expr_from_sym): Moved here from symbol.c.
3337 * resolve.c (resolve_deallocate_expr): _data component will be added
3338 at translation stage.
3339 * symbol.c (gfc_lval_expr_from_sym): Moved to expr.c.
3340 * trans-stmt.c (gfc_trans_deallocate): Reset _vptr to declared type.
3342 2011-01-06 Daniel Franke <franke.daniel@gmail.com>
3346 * parse.c (parse_interface): Remove check for procedure types.
3347 * interface.c (check_interface0): Verify that procedures are
3348 either all SUBROUTINEs or all FUNCTIONs.
3350 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3353 * trans-expr.c (gfc_trans_class_assign): Bugfix for r168524 (make sure
3354 'vtab' is initialized).
3356 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3359 * trans-expr.c (gfc_trans_class_assign): For a polymorphic NULL pointer
3360 assignment, set the _vptr component to the declared type.
3362 2011-01-05 Thomas Koenig <tkoenig@gcc.gnu.org>
3365 * resolve.c (resolve_allocate_deallocate): Follow references to
3366 check for duplicate occurence of allocation/deallocation objects.
3368 2011-01-05 Janus Weil <janus@gcc.gnu.org>
3371 * trans-decl.c (gfc_trans_deferred_vars): Initialize the _vpr component
3372 of polymorphic allocatables according to their declared type.
3374 2011-01-04 Janus Weil <janus@gcc.gnu.org>
3377 * class.c (gfc_find_derived_vtab): Set the module field for the copying
3378 routine to make sure it receives module name mangling.
3380 2011-01-03 Jakub Jelinek <jakub@redhat.com>
3382 * gfortranspec.c (lang_specific_driver): Update copyright notice
3385 2011-01-03 Janus Weil <janus@gcc.gnu.org>
3387 * intrinsic.texi (LEADZ): Fix example.
3389 2011-01-02 Janus Weil <janus@gcc.gnu.org>
3392 * class.c (gfc_find_derived_vtab): Use EXEC_INIT_ASSIGN for __copy_
3396 Copyright (C) 2011 Free Software Foundation, Inc.
3398 Copying and distribution of this file, with or without modification,
3399 are permitted in any medium without royalty provided the copyright
3400 notice and this notice are preserved.