1 2010-04-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3 * array.c (extract_element): Restore function from trunk.
4 (gfc_get_array_element): Restore function from trunk.
5 (gfc_expand_constructor): Restore check against
6 flag_max_array_constructor.
7 * constructor.c (node_copy_and_append): Delete unused.
8 * gfortran.h: Delete comment and extra include.
9 * constructor.h: Bump copyright and clean up TODO comments.
10 * resolve.c: Whitespace.
12 2010-04-12 Daniel Franke <franke.daniel@gmail.com>
14 * simplify.c (compute_dot_product): Replaced usage of ADVANCE macro
15 with direct access access to elements. Adjusted prototype, fixed all
17 (gfc_simplify_dot_product): Removed duplicate check for zero-sized
19 (gfc_simplify_matmul): Removed usage of ADVANCE macro.
20 (gfc_simplify_spread): Removed workaround, directly insert elements
21 at a given array position.
22 (gfc_simplify_transpose): Likewise.
23 (gfc_simplify_pack): Replaced usage of ADVANCE macro with corresponding
25 (gfc_simplify_unpack): Likewise.
27 2010-04-12 Daniel Franke <franke.daniel@gmail.com>
29 * simplify.c (only_convert_cmplx_boz): Renamed to ...
30 (convert_boz): ... this and moved to start of file.
31 (gfc_simplify_abs): Whitespace fix.
32 (gfc_simplify_acos): Whitespace fix.
33 (gfc_simplify_acosh): Whitespace fix.
34 (gfc_simplify_aint): Whitespace fix.
35 (gfc_simplify_dint): Whitespace fix.
36 (gfc_simplify_anint): Whitespace fix.
37 (gfc_simplify_and): Replaced if-gate by more common switch-over-type.
38 (gfc_simplify_dnint): Whitespace fix.
39 (gfc_simplify_asin): Whitespace fix.
40 (gfc_simplify_asinh): Moved creation of result-expr out of switch.
41 (gfc_simplify_atan): Likewise.
42 (gfc_simplify_atanh): Whitespace fix.
43 (gfc_simplify_atan2): Whitespace fix.
44 (gfc_simplify_bessel_j0): Removed ATTRIBUTE_UNUSED.
45 (gfc_simplify_bessel_j1): Likewise.
46 (gfc_simplify_bessel_jn): Likewise.
47 (gfc_simplify_bessel_y0): Likewise.
48 (gfc_simplify_bessel_y1): Likewise.
49 (gfc_simplify_bessel_yn): Likewise.
50 (gfc_simplify_ceiling): Reorderd statements.
51 (simplify_cmplx): Use convert_boz(), check for constant arguments.
53 (gfc_simplify_cmplx): Use correct default kind. Removed check for
55 (gfc_simplify_complex): Replaced if-gate. Removed check for
57 (gfc_simplify_conjg): Whitespace fix.
58 (gfc_simplify_cos): Whitespace fix.
59 (gfc_simplify_cosh): Replaced if-gate by more common switch-over-type.
60 (gfc_simplify_dcmplx): Removed check for constant arguments.
61 (gfc_simplify_dble): Use convert_boz() and gfc_convert_constant().
62 (gfc_simplify_digits): Whitespace fix.
63 (gfc_simplify_dim): Whitespace fix.
64 (gfc_simplify_dprod): Reordered statements.
65 (gfc_simplify_erf): Whitespace fix.
66 (gfc_simplify_erfc): Whitespace fix.
67 (gfc_simplify_epsilon): Whitespace fix.
68 (gfc_simplify_exp): Whitespace fix.
69 (gfc_simplify_exponent): Use convert_boz().
70 (gfc_simplify_floor): Reorderd statements.
71 (gfc_simplify_gamma): Whitespace fix.
72 (gfc_simplify_huge): Whitespace fix.
73 (gfc_simplify_iand): Whitespace fix.
74 (gfc_simplify_ieor): Whitespace fix.
75 (simplify_intconv): Use gfc_convert_constant().
76 (gfc_simplify_int): Use simplify_intconv().
77 (gfc_simplify_int2): Reorderd statements.
78 (gfc_simplify_idint): Reorderd statements.
79 (gfc_simplify_ior): Whitespace fix.
80 (gfc_simplify_ishftc): Removed duplicate type check.
81 (gfc_simplify_len): Use range_check() instead of manual range check.
82 (gfc_simplify_lgamma): Removed ATTRIBUTE_UNUSED. Whitespace fix.
83 (gfc_simplify_log): Whitespace fix.
84 (gfc_simplify_log10): Whitespace fix.
85 (gfc_simplify_minval): Whitespace fix.
86 (gfc_simplify_maxval): Whitespace fix.
87 (gfc_simplify_mod): Whitespace fix.
88 (gfc_simplify_modulo): Whitespace fix.
89 (simplify_nint): Reorderd statements.
90 (gfc_simplify_not): Whitespace fix.
91 (gfc_simplify_or): Replaced if-gate by more common switch-over-type.
92 (gfc_simplify_radix): Removed unused result-variable. Whitespace fix.
93 (gfc_simplify_range): Removed unused result-variable. Whitespace fix.
94 (gfc_simplify_real): Use convert_boz() and gfc_convert_constant().
95 (gfc_simplify_realpart): Whitespace fix.
96 (gfc_simplify_selected_char_kind): Removed unused result-variable.
97 (gfc_simplify_selected_int_kind): Removed unused result-variable.
98 (gfc_simplify_selected_real_kind): Removed unused result-variable.
99 (gfc_simplify_sign): Whitespace fix.
100 (gfc_simplify_sin): Whitespace fix.
101 (gfc_simplify_sinh): Replaced if-gate by more common switch-over-type.
102 (gfc_simplify_sqrt): Avoided goto by inlining check. Whitespace fix.
103 (gfc_simplify_tan): Replaced if-gate by more common switch-over-type.
104 (gfc_simplify_tanh): Replaced if-gate by more common switch-over-type.
105 (gfc_simplify_xor): Replaced if-gate by more common switch-over-type.
107 2010-04-12 Daniel Franke <franke.daniel@gmail.com>
109 * gfortran.h (gfc_start_constructor): Removed.
110 (gfc_get_array_element): Removed.
111 * array.c (gfc_start_constructor): Removed, use gfc_get_array_expr
112 instead. Fixed all callers.
113 (extract_element): Removed.
114 (gfc_expand_constructor): Temporarily removed check for
115 max-array-constructor. Will be re-introduced later if still required.
116 (gfc_get_array_element): Removed, use gfc_constructor_lookup_expr
117 instead. Fixed all callers.
118 * expr.c (find_array_section): Replaced manual lookup of elements
119 by gfc_constructor_lookup.
121 2010-04-12 Daniel Franke <franke.daniel@gmail.com>
123 * gfortran.h (gfc_get_null_expr): New prototype.
124 (gfc_get_operator_expr): New prototype.
125 (gfc_get_character_expr): New prototype.
126 (gfc_get_iokind_expr): New prototype.
127 * expr.c (gfc_get_null_expr): New.
128 (gfc_get_character_expr): New.
129 (gfc_get_iokind_expr): New.
130 (gfc_get_operator_expr): Moved here from matchexp.c (build_node).
131 * matchexp.c (build_node): Renamed and moved to
132 expr.c (gfc_get_operator_expr). Reordered arguments to match
133 other functions. Fixed all callers.
134 (gfc_get_parentheses): Use specific function to build expr.
135 * array.c (gfc_match_array_constructor): Likewise.
136 * arith.c (eval_intrinsic): Likewise.
137 (gfc_hollerith2int): Likewise.
138 (gfc_hollerith2real): Likewise.
139 (gfc_hollerith2complex): Likewise.
140 (gfc_hollerith2logical): Likewise.
141 * data.c (create_character_intializer): Likewise.
142 * decl.c (gfc_match_null): Likewise.
143 (enum_initializer): Likewise.
144 * io.c (gfc_match_format): Likewise.
145 (match_io): Likewise.
146 * match.c (gfc_match_nullify): Likewise.
147 * primary.c (match_string_constant): Likewise.
148 (match_logical_constant): Likewise.
149 (build_actual_constructor): Likewise.
150 * resolve.c (build_default_init_expr): Likewise.
151 * symbol.c (generate_isocbinding_symbol): Likewise.
152 (gfc_build_class_symbol): Likewise.
153 (gfc_find_derived_vtab): Likewise.
154 * simplify.c (simplify_achar_char): Likewise.
155 (gfc_simplify_adjustl): Likewise.
156 (gfc_simplify_adjustr): Likewise.
157 (gfc_simplify_and): Likewise.
158 (gfc_simplify_bit_size): Likewise.
159 (gfc_simplify_is_iostat_end): Likewise.
160 (gfc_simplify_is_iostat_eor): Likewise.
161 (gfc_simplify_isnan): Likewise.
162 (simplify_bound): Likewise.
163 (gfc_simplify_leadz): Likewise.
164 (gfc_simplify_len_trim): Likewise.
165 (gfc_simplify_logical): Likewise.
166 (gfc_simplify_maxexponent): Likewise.
167 (gfc_simplify_minexponent): Likewise.
168 (gfc_simplify_new_line): Likewise.
169 (gfc_simplify_null): Likewise.
170 (gfc_simplify_or): Likewise.
171 (gfc_simplify_precision): Likewise.
172 (gfc_simplify_repeat): Likewise.
173 (gfc_simplify_scan): Likewise.
174 (gfc_simplify_size): Likewise.
175 (gfc_simplify_trailz): Likewise.
176 (gfc_simplify_trim): Likewise.
177 (gfc_simplify_verify): Likewise.
178 (gfc_simplify_xor): Likewise.
179 * trans-io.c (build_dt): Likewise.
180 (gfc_new_nml_name_expr): Removed.
182 2010-04-12 Daniel Franke <franke.daniel@gmail.com>
184 * arith.h (gfc_constant_result): Removed prototype.
185 * constructor.h (gfc_build_array_expr): Removed prototype.
186 (gfc_build_structure_constructor_expr): Removed prototype.
187 * gfortran.h (gfc_int_expr): Removed prototype.
188 (gfc_logical_expr): Removed prototype.
189 (gfc_get_array_expr): New prototype.
190 (gfc_get_structure_constructor_expr): New prototype.
191 (gfc_get_constant_expr): New prototype.
192 (gfc_get_int_expr): New prototype.
193 (gfc_get_logical_expr): New prototype.
194 * arith.c (gfc_constant_result): Moved and renamed to
195 expr.c (gfc_get_constant_expr). Fixed all callers.
196 * constructor.c (gfc_build_array_expr): Moved and renamed to
197 expr.c (gfc_get_array_expr). Split gfc_typespec argument to type
198 and kind. Fixed all callers.
199 (gfc_build_structure_constructor_expr): Moved and renamed to
200 expr.c (gfc_get_structure_constructor_expr). Split gfc_typespec argument
201 to type and kind. Fixed all callers.
202 * expr.c (gfc_logical_expr): Renamed to ...
203 (gfc_get_logical_expr): ... this. Added kind argument. Fixed all callers.
204 (gfc_int_expr): Renamed to ...
205 (gfc_get_int_expr): ... this. Added kind and where arguments. Fixed all
207 (gfc_get_constant_expr): New.
208 (gfc_get_array_expr): New.
209 (gfc_get_structure_constructor_expr): New.
210 * simplify.c (int_expr_with_kind): Removed, callers use gfc_get_int_expr
213 2010-04-12 Daniel Franke <franke.daniel@gmail.com>
215 * constructor.h: New.
216 * constructor.c: New.
217 * Make-lang.in: Add new files to F95_PARSER_OBJS.
218 * arith.c (reducy_unary): Use constructor API.
219 (reduce_binary_ac): Likewise.
220 (reduce_binary_ca): Likewise.
221 (reduce_binary_aa): Likewise.
222 * check.c (gfc_check_pack): Likewise.
223 (gfc_check_reshape): Likewise.
224 (gfc_check_unpack): Likewise.
225 * decl.c (add_init_expr_to_sym): Likewise.
226 (build_struct): Likewise.
227 * dependency.c (gfc_check_dependency): Likewise.
228 (contains_forall_index_p): Likewise.
229 * dump-parse-tree.c (show_constructor): Likewise.
230 * expr.c (free_expr0): Likewise.
231 (gfc_copy_expr): Likewise.
232 (gfc_is_constant_expr): Likewise.
233 (simplify_constructor): Likewise.
234 (find_array_element): Likewise.
235 (find_component_ref): Likewise.
236 (find_array_section): Likewise.
237 (find_substring_ref): Likewise.
238 (simplify_const_ref): Likewise.
239 (scalarize_intrinsic_call): Likewise.
240 (check_alloc_comp_init): Likewise.
241 (gfc_default_initializer): Likewise.
242 (gfc_traverse_expr): Likewise.
243 * iresolve.c (check_charlen_present): Likewise.
244 (gfc_resolve_reshape): Likewise.
245 (gfc_resolve_transfer): Likewise.
246 * module.c (mio_constructor): Likewise.
247 * primary.c (build_actual_constructor): Likewise.
248 (gfc_match_structure_constructor): Likewise.
249 * resolve.c (resolve_structure_cons): Likewise.
250 * simplify.c (is_constant_array_expr): Likewise.
251 (init_result_expr): Likewise.
252 (transformational_result): Likewise.
253 (simplify_transformation_to_scalar): Likewise.
254 (simplify_transformation_to_array): Likewise.
255 (gfc_simplify_dot_product): Likewise.
256 (simplify_bound): Likewise.
257 (simplify_matmul): Likewise.
258 (simplify_minval_maxval): Likewise.
259 (gfc_simplify_pack): Likewise.
260 (gfc_simplify_reshape): Likewise.
261 (gfc_simplify_shape): Likewise.
262 (gfc_simplify_spread): Likewise.
263 (gfc_simplify_transpose): Likewise.
264 (gfc_simplify_unpack): Likewise.q
265 (gfc_convert_constant): Likewise.
266 (gfc_convert_char_constant): Likewise.
267 * target-memory.c (size_array): Likewise.
268 (encode_array): Likewise.
269 (encode_derived): Likewise.
270 (interpret_array): Likewise.
271 (gfc_interpret_derived): Likewise.
272 (expr_to_char): Likewise.
273 (gfc_merge_initializers): Likewise.
274 * trans-array.c (gfc_get_array_constructor_size): Likewise.
275 (gfc_trans_array_constructor_value): Likewise.
276 (get_array_ctor_strlen): Likewise.
277 (gfc_constant_array_constructor_p): Likewise.
278 (gfc_build_constant_array_constructor): Likewise.
279 (gfc_trans_array_constructor): Likewise.
280 (gfc_conv_array_initializer): Likewise.
281 * trans-decl.c (check_constant_initializer): Likewise.
282 * trans-expr.c (flatten_array_ctors_without_strlen): Likewise.
283 (gfc_apply_interface_mapping_to_cons): Likewise.
284 (gfc_trans_structure_assign): Likewise.
285 (gfc_conv_structure): Likewise.
286 * array.c (check_duplicate_iterator): Likewise.
287 (match_array_list): Likewise.
288 (match_array_cons_element): Likewise.
289 (gfc_match_array_constructor): Likewise.
290 (check_constructor_type): Likewise.
291 (check_constructor): Likewise.
293 (expand_constructor): Likewise.
294 (extract_element): Likewise.
295 (gfc_expanded_ac): Likewise.
296 (resolve_array_list): Likewise.
297 (gfc_resolve_character_array_constructor): Likewise.
298 (copy_iterator): Renamed to ...
299 (gfc_copy_iterator): ... this.
300 (gfc_append_constructor): Removed.
301 (gfc_insert_constructor): Removed unused function.
302 (gfc_get_constructor): Removed.
303 (gfc_free_constructor): Removed.
304 (qgfc_copy_constructor): Removed.
305 * gfortran.h (struct gfc_expr): Removed member 'con_by_offset'.
306 Removed all references. Replaced constructor list by splay-tree.
307 (struct gfc_constructor): Removed member 'next', moved 'offset' from
308 the inner struct, added member 'base'.
309 (gfc_append_constructor): Removed prototype.
310 (gfc_insert_constructor): Removed prototype.
311 (gfc_get_constructor): Removed prototype.
312 (gfc_free_constructor): Removed prototype.
313 (qgfc_copy_constructor): Removed prototype.
314 (gfc_copy_iterator): New prototype.
315 * trans-array.h (gfc_constant_array_constructor_p): Adjusted prototype.
317 2010-04-10 Tobias Burnus <burnus@net-b.de>
320 * expr.c (gfc_is_constant_expr, gfc_traverse_expr): Handle
321 proc-pointers and type-bound procedures.
322 (gfc_specification_expr): Check proc-pointers for pureness.
324 2010-04-09 Iain Sandoe <iains@gcc.gnu.org>
327 * gfortranspec.c (lang_specific_driver): Do not expose vars
328 only used by HAVE_LD_STATIC_DYNAMIC targets unless compiling
331 2010-04-09 Tobias Burnus <burnus@net-b.de>
334 * decl.c (variable_decl, match_attr_spec): Fix setting the array
336 * array.c (match_subscript,gfc_match_array_ref): Add coarray support.
337 * data.c (gfc_assign_data_value): Ditto.
338 * expr.c (gfc_check_pointer_assign): Add check for coarray constraint.
339 (gfc_traverse_expr): Traverse also through codimension expressions.
340 (gfc_is_coindexed, gfc_has_ultimate_allocatable,
341 gfc_has_ultimate_pointer): New functions.
342 * gfortran.h (gfc_array_ref_dimen_type): Add DIMEN_STAR for coarrays.
343 (gfc_array_ref): Add codimen.
344 (gfc_array_ref): Add in_allocate.
345 (gfc_is_coindexed, gfc_has_ultimate_allocatable,
346 gfc_has_ultimate_pointer): Add prototypes.
347 * interface.c (compare_parameter, compare_actual_formal,
348 check_intents): Add coarray constraints.
349 * match.c (gfc_match_iterator): Add coarray constraint.
350 * match.h (gfc_match_array_ref): Update interface.
351 * primary.c (gfc_match_varspec): Handle codimensions.
352 * resolve.c (coarray_alloc, inquiry_argument): New static variables.
353 (check_class_members): Return gfc_try instead for error recovery.
354 (resolve_typebound_function,resolve_typebound_subroutine,
355 check_members): Handle return value of check_class_members.
356 (resolve_structure_cons, resolve_actual_arglist, resolve_function,
357 check_dimension, compare_spec_to_ref, resolve_array_ref,
358 resolve_ref, resolve_variable, gfc_resolve_expr, conformable_arrays,
359 resolve_allocate_expr, resolve_ordinary_assign): Add coarray
361 * trans-array.c (gfc_conv_array_ref, gfc_walk_variable_expr):
362 Skip over coarray refs.
363 (gfc_array_allocate) Add support for references containing coindexes.
364 * trans-expr.c (gfc_add_interface_mapping): Copy coarray attribute.
365 (gfc_map_intrinsic_function): Ignore codimensions.
367 2010-04-08 Bud Davis <bdavis9659@sbcglobal.net>
370 * io.c (check_format_string): Added check for additional non
371 blank characters after the format string was successfully
373 * io.c (check_format): Changed the error messages for positive
374 int required and period required to drop through the error logic
375 and report with gfc_error instead of gfc_error_now. Corrected
376 format postion for hollerith strings.
378 2010-04-08 Tobias Burnus <burnus@net-b.de>
380 * module.c (use_iso_fortran_env_module): Fix standard check.
382 2010-04-07 Jakub Jelinek <jakub@redhat.com>
384 * parse.c (parse_derived, parse_enum): Avoid set but not used
387 2010-04-07 Janne Blomqvist <jb@gcc.gnu.org>
390 * gfortran.texi: Add section about representation of
393 2010-04-07 Simon Baldwin <simonb@google.com>
395 * cpp.c (cb_cpp_error): Add warning reason argument, set a value
396 for diagnostic_override_option_index if CPP_W_WARNING_DIRECTIVE.
398 2010-04-07 Richard Guenther <rguenther@suse.de>
400 * options.c (gfc_init_options): Do not set.
402 2010-04-06 Tobias Burnus <burnus@net-b.de>
405 * array.c (gfc_match_array_spec): Add error for -fcoarray=none.
406 * match.c (gfc_match_critical, sync_statement): Ditto.
407 * gfortran.h (gfc_fcoarray): New enum.
408 (gfc_option_t): Use it.
409 * lang.opt (fcoarray): Add new flag.
410 * invoke.texi (fcoarray): Document it.
411 * options.c (gfc_init_options,gfc_handle_option): Handle -fcoarray=.
412 (gfc_handle_coarray_option): New function.
414 2010-04-06 Tobias Burnus <burnus@net-b.de>
417 * gfortran.h (gfc_array_spec): Add cotype.
418 * array.c (gfc_match_array_spec,gfc_set_array_spec): Use it
419 and defer error diagnostic.
420 * resolve.c (resolve_fl_derived): Add missing check.
421 (resolve_symbol): Add cotype/type check.
422 * parse.c (parse_derived): Fix setting of coarray_comp.
424 2010-04-06 Tobias Burnus <burnus@net-b.de>
427 * array.c (gfc_free_array_spec,gfc_resolve_array_spec,
428 match_array_element_spec,gfc_copy_array_spec,
429 gfc_compare_array_spec): Include corank.
430 (match_array_element_spec,gfc_set_array_spec): Support codimension.
431 * decl.c (build_sym,build_struct,variable_decl,
432 match_attr_spec,attr_decl1,cray_pointer_decl,
433 gfc_match_volatile): Add codimension.
434 (gfc_match_codimension): New function.
435 * dump-parse-tree.c (show_array_spec,show_attr): Support codimension.
436 * gfortran.h (symbol_attribute,gfc_array_spec): Ditto.
437 (gfc_add_codimension): New function prototype.
438 * match.h (gfc_match_codimension): New function prototype.
439 (gfc_match_array_spec): Update prototype
440 * match.c (gfc_match_common): Update gfc_match_array_spec call.
441 * module.c (MOD_VERSION): Bump.
442 (mio_symbol_attribute): Support coarray attributes.
443 (mio_array_spec): Add corank support.
444 * parse.c (decode_specification_statement,decode_statement,
445 parse_derived): Add coarray support.
446 * resolve.c (resolve_formal_arglist, was_declared,
447 is_non_constant_shape_array, resolve_fl_variable,
448 resolve_fl_derived, resolve_symbol): Add coarray support.
449 * symbol.c (check_conflict, gfc_add_volatile, gfc_copy_attr,
450 gfc_build_class_symbol): Add coarray support.
451 (gfc_add_codimension): New function.
453 2010-04-06 Tobias Burnus <burnus@net-b.de>
456 * iso-fortran-env.def: Add the integer parameters atomic_int_kind,
457 atomic_logical_kind, iostat_inquire_internal_unit, stat_locked,
458 stat_locked_other_image, stat_stopped_image and stat_unlocked of
460 * intrinsic.texi (iso_fortran_env): Ditto.
461 * libgfortran.h (libgfortran_stat_codes): New enum.
462 * module.c (use_iso_fortran_env_module): Honour -std= when loading
463 constants from the intrinsic module.
465 2010-04-06 Tobias Burnus <burnus@net-b.de>
468 * intrinsic.c (add_functions): Add num_images.
469 * decl.c (gfc_match_end): Handle END CRITICAL.
470 * intrinsic.h (gfc_simplify_num_images): Add prototype.
471 * dump-parse-tree.c (show_code_node): Dump CRITICAL, ERROR STOP,
473 * gfortran.h (gfc_statement): Add enum items for those.
475 (gfc_isym_id): Add num_images.
476 * trans-stmt.c (gfc_trans_stop): Handle ERROR STOP.
477 (gfc_trans_sync,gfc_trans_critical): New functions.
478 * trans-stmt.h (gfc_trans_stop,gfc_trans_sync,
479 gfc_trans_critical): Add/update prototypes.
480 * trans.c (gfc_trans_code): Handle CRITICAL, ERROR STOP,
482 * trans.h (gfor_fndecl_error_stop_string) Add variable.
483 * resolve.c (resolve_sync): Add function.
484 (gfc_resolve_blocks): Handle CRITICAL.
485 (resolve_code): Handle CRITICAL, ERROR STOP,
486 (resolve_branch): Add CRITICAL constraint check.
488 * st.c (gfc_free_statement): Add new statements.
489 * trans-decl.c (gfor_fndecl_error_stop_string): Global variable.
490 (gfc_build_builtin_function_decls): Initialize it.
491 * match.c (gfc_match_if): Handle ERROR STOP and SYNC.
492 (gfc_match_critical, gfc_match_error_stop, sync_statement,
493 gfc_match_sync_all, gfc_match_sync_images, gfc_match_sync_memory):
495 (match_exit_cycle): Handle CRITICAL constraint.
496 (gfc_match_stopcode): Handle ERROR STOP.
497 * match.h (gfc_match_critical, gfc_match_error_stop,
498 gfc_match_sync_all, gfc_match_sync_images,
499 gfc_match_sync_memory): Add prototype.
500 * parse.c (decode_statement, gfc_ascii_statement,
501 parse_executable): Handle new statements.
502 (parse_critical_block): New function.
503 * parse.h (gfc_compile_state): Add COMP_CRITICAL.
504 * intrinsic.texi (num_images): Document new function.
505 * simplify.c (gfc_simplify_num_images): Add function.
507 2010-04-06 Tobias Burnus <burnus@net-b.de>
510 * trans-array.c (gfc_conv_expr_descriptor): Update
511 gfc_trans_scalar_assign call.
512 (has_default_initializer): New function.
513 (gfc_trans_deferred_array): Nullify less often.
514 * trans-expr.c (gfc_conv_subref_array_arg,
515 gfc_trans_subcomponent_assign): Update call to
516 gfc_trans_scalar_assign.
517 (gfc_trans_scalar_assign): Add parameter and pass it on.
518 (gfc_trans_assignment_1): Optionally, do not dealloc before
520 * trans-openmp.c (gfc_trans_omp_array_reduction): Update
521 call to gfc_trans_scalar_assign.
522 * trans-decl.c (gfc_get_symbol_decl): Do not always apply
523 initializer to static variables.
524 (gfc_init_default_dt): Add dealloc parameter and pass it on.
525 * trans-stmt.c (forall_make_variable_temp,
526 generate_loop_for_temp_to_lhs, generate_loop_for_rhs_to_temp,
527 gfc_trans_forall_1, gfc_trans_where_assign, gfc_trans_where_3
528 gfc_trans_allocate): Update gfc_trans_assignment call.
529 * trans.h (gfc_trans_scalar_assign, gfc_init_default_dt,
530 gfc_init_default_dt, gfc_trans_assignment): Add bool dealloc
531 parameter to prototype.
533 2010-03-31 Paul Thomas <pault@gcc.gnu.org>
535 * ioparm.def : Update copyright.
537 * trans-array.c : ditto
538 * trans-array.h : ditto
540 * trans-types.c: ditto
541 * dependency.c : ditto
545 * trans-intrinsic.c : ditto
546 * libgfortran.h : ditto
547 * invoke.texi : ditto
548 * intrinsic.texi : ditto
551 * intrinsic.c : ditto
552 * interface.c : ditto
554 * trans-stmt.c : ditto
555 * trans-stmt.h : ditto
560 2010-03-20 Paul Thomas <pault@gcc.gnu.org>
563 * trans-decl.c (gfc_create_module_variable): With -fwhole-file
564 do not assert the context of derived types.
566 2010-03-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
569 * ioparm.def: Change inquire size variable to type pointer to
572 2010-03-18 Paul Thomas <pault@gcc.gnu.org>
575 * trans-expr.c (conv_parent_component_references): Ensure that
576 'dt' has a backend_decl.
579 * trans-expr.c (gfc_conv_structure): Ensure that the derived
580 type has a backend_decl.
583 * resolve.c (resolve_global_procedure): Check that the 'cl'
584 structure is not NULL.
586 2010-03-18 Shujing Zhao <pearly.zhao@oracle.com>
588 * lang.opt (-ffixed-line-length-, ffree-line-length-): Remove
591 2010-03-17 Tobias Burnus <burnus@net-b.de>
594 * trans-array.c (gfc_conv_array_index_offset,gfc_conv_array_ref,
595 gfc_conv_ss_startstride): Remove no-longer-needed cp_was_assumed
597 * decl.c (gfc_match_derived_decl): Don't mark assumed-size Cray
598 pointees as having explizit size.
599 * expr.c (gfc_check_assign): Remove now unreachable Cray pointee
601 * trans-types.c (gfc_is_nodesc_array): Add cp_was_assumed to assert.
602 (gfc_sym_type): Don't mark Cray pointees as restricted pointers.
603 * resolve.c (resolve_symbol): Handle cp_was_assumed.
604 * trans-decl.c (gfc_trans_deferred_vars): Ditto.
605 (gfc_finish_var_decl): Don't mark Cray pointees as restricted
608 2010-03-14 Tobias Burnus <burnus@net-b.de>
611 * resolve.c (resolve_structure_cons): Add missing PURE constraint.
612 (resolve_ordinary_assign): Add check to avoid segfault.
614 2010-03-12 Paul Thomas <pault@gcc.gnu.org>
618 * resolve.c (resolve_compcall): Add new boolean dummy argument
619 'class_members'. Only resolve expression at end if false.
620 Remove redundant, static variable 'class_object'.
621 (check_class_members): Add extra argument to call of
623 (resolve_typebound_function): Renamed resolve_class_compcall.
624 Do all the detection of class references here. Correct calls to
625 resolve_compcall for extra argument.
626 (resolve_typebound_subroutine): resolve_class_typebound_call
627 renamed. Otherwise same as resolve_typebound_function.
628 (gfc_resolve_expr): Call resolve_typebound_function.
629 (resolve_code): Call resolve_typebound_subroutine.
631 2010-03-10 Tobias Burnus <burnus@net-b.de
634 * symbol.c (get_iso_c_sym): Set sym->result.
636 2010-03-08 Janus Weil <janus@gcc.gnu.org>
639 * resolve.c (resolve_compcall): Don't set 'value.function.name' here
640 for TBPs, otherwise they will not be resolved properly.
641 (resolve_function): Use 'value.function.esym' instead of
642 'value.function.name' to check if we're dealing with a TBP.
643 (check_class_members): Set correct type of passed object for all TBPs,
644 not only generic ones, except if the type is abstract.
646 2010-03-04 Janus Weil <janus@gcc.gnu.org>
649 * decl.c (gfc_match_final_decl): Make sure variable names starting with
650 'final...' are not misinterpreted as FINAL statements.
652 2010-03-03 Paul Thomas <pault@gcc.gnu.org>
655 * trans-array.c (gfc_conv_array_parameter): Contiguous refs to
656 allocatable ultimate components do not need temporaries, whilst
657 ultimate pointer components do.
659 2010-03-03 Janus Weil <janus@gcc.gnu.org>
662 * resolve.c (resolve_code): Correctly set gfc_current_ns for
664 (gfc_impure_variable): Make it work with sub-namespaces (BLOCK etc).
667 2010-03-02 Paul Thomas <pault@gcc.gnu.org>
670 * trans-array.c (gfc_conv_array_parameter): A full array of
671 derived type need not be restricted to a symbol without an
672 array spec to use the call to gfc_conv_expr_descriptor.
675 * trans-array.c (gfc_conv_array_parameter): Contiguous refs to
676 allocatable arrays do not need temporaries.
678 2010-03-01 Tobias Burnus <burnus@net-b.de>
681 * resolve.c (find_array_spec): Handle REF_COMPONENT with
684 2010-02-28 Tobias Burnus <burnus@net-b.de>
687 * trans-expr.c (is_zero_initializer_p): Move up in the file.
688 (gfc_conv_initializer): Handle zero initializer as special case.
690 2010-02-27 Tobias Burnus <burnus@net-b.de>
693 * resolve.c (resolve_fl_variable_derived): Imply SAVE
694 for module variables for Fortran 2008.
696 2010-02-25 Jakub Jelinek <jakub@redhat.com>
699 * trans-common.c (build_common_decl): Also update DECL_MODE,
700 and DECL_SIZE when encountering a larger common block and call
703 2010-02-24 Tobias Burnus <burnus@net-b.de>
706 * trans-expr.c (gfc_conv_initializer): Call directly
707 gfc_conv_constant for C_NULL_(FUN)PTR.
709 2010-02-22 Paul Thomas <pault@gcc.gnu.org>
712 * dependency.c (gfc_full_array_ref_p): Check for contiguous by
713 checking the rest of the dimensions for elements.
715 2010-02-21 Tobias Burnus <burnus@net-b.de>
718 * gfortran.h (gfc_option_t): New flag -fprotect-parens.
720 * option.c (gfc_init_options,gfc_handle_option): Ditto.
721 * trans-expr.c (gfc_conv_expr_op): Use the flag.
722 * invoke.texi: Document new -fno-protect-parens flag.
724 2010-02-20 Paul Thomas <pault@gcc.gnu.org>
730 * dependency.c (gfc_check_argument_var_dependency): Use enum
731 value instead of arithmetic vaue for 'elemental'.
732 (check_data_pointer_types): New function.
733 (gfc_check_dependency): Call check_data_pointer_types.
734 * trans-array.h : Change fourth argument of
735 gfc_conv_array_parameter to boolean.
736 * trans-array.c (gfc_conv_array_parameter): A contiguous array
737 can be a dummy but it must not be assumed shape or deferred.
738 Change fourth argument to boolean. Array constructor exprs will
739 always be contiguous and do not need packing and unpacking.
740 * trans-expr.c (gfc_conv_procedure_call): Clean up some white
741 space and change fourth argument of gfc_conv_array_parameter
743 (gfc_trans_arrayfunc_assign): Change fourth argument of
744 gfc_conv_array_parameter to boolean.
745 * trans-io.c (gfc_convert_array_to_string): The same.
746 * trans-intrinsic.c (gfc_conv_intrinsic_loc): The same.
748 2010-02-20 Tobias Burnus <burnus@net-b.de>
751 * libgfortran.h: Add GFC_RTCHECK_MEM.
752 * invoke.texi (-fcheck=): Document -fcheck=mem.
753 * tranc.c (gfc_call_malloc): Remove negative-size run-time error
754 and enable malloc-success check only with -fcheck=mem.
755 * option.c (gfc_handle_runtime_check_option): Add -fcheck=mem.
757 2010-02-16 Tobias Burnus <burnus@net-b.de>
760 * gfortran.h (gfc_isym_id): Rename GFS_ISYM_GAMMA to GFS_ISYM_TGAMMA.
761 * intrinsic.c (add_functions): Ditto.
762 * iresolve.c (gfc_resolve_gamma): Call tgamma instead of gamma.
763 * mathbuiltins.def: Use TGAMMA instead of GAMMA with "tgamma".
765 2010-02-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
768 * trans-stmt.h: Add prototype for gfc_trans_code_cond. Add tree cond to
769 gfc_trans_do prototype.
770 * trans-stmt.c (gfc_trans_simple_do): Add optional argument to pass in
771 a loop exit condition. If exit condition is given, build the loop exit
772 code, checking IO results of implied do loops in READ and WRITE.
773 (gfc_trans_do): Likewise.
774 * trans.c (trans_code): New static work function, previously
775 gfc_trans_code. Passes exit condition to gfc_trans_do.
776 (gfc_trans_code): Calls trans_code with NULL_TREE condition.
777 (gfc_trans_code_cond): Calls trans_code with loop exit condition.
778 * trans-io.c (build_dt): Build an exit condition to allow checking IO
779 result status bits in the dtparm structure. Use this condition in call
780 to gfc_trans_code_cond.
782 2010-02-13 Paul Thomas <pault@gcc.gnu.org>
786 * trans-array.c (gfc_conv_array_parameter): Use
787 gfc_full_array_ref_p to detect full and contiguous variable
788 arrays. Full array components and contiguous arrays do not need
789 internal_pack and internal_unpack.
791 2010-02-11 Jakub Jelinek <jakub@redhat.com>
794 * resolve.c (gfc_resolve_dim_arg): Call gfc_clear_ts.
797 * decl.c (enumerator_decl): Don't call gfc_free_enum_history
799 (gfc_match_enumerator_def): But here whenever enumerator_decl returns
802 2010-02-10 Joost VandeVondele <jv244@cam.ac.uk>
803 Tobias Burnus <burnus@net-b.de>
806 * decl.c (gfc_match_subroutine): Explicitly set sym->declared_at.
808 2010-02-10 Tobias Burnus <burnus@net-b.de>
811 * trans-decl.c (gfc_generate_function_code): Only check
812 actual-vs.-dummy character bounds if not bind(C).
814 2010-02-10 Jakub Jelinek <jakub@redhat.com>
817 * trans-expr.c (gfc_conv_subref_array_arg): Avoid accessing
818 info->dimen after info has been freed.
820 2010-02-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
823 * array.c (gfc_constant_ac): Do not prevent expansion of constructors
826 2010-02-09 Jakub Jelinek <jakub@redhat.com>
828 * module.c (fix_mio_expr): Declare sym.
830 2010-02-09 Paul Thomas <pault@gcc.gnu.org>
833 * module.c (fix_mio_expr): Fix for private generic procedures.
835 2010-02-09 Daniel Kraft <d@domob.eu>
838 * resolve.c (resolve_charlen): Change warning about negative CHARACTER
839 length to be correct and issue only with -Wsurprising.
840 * invoke.texi (Wsurprising): Mention this new warning that is
841 turned on by -Wsurprising.
843 2010-02-09 Daniel Kraft <d@domob.eu>
846 * intrinsic.texi (MAXVAL): Remove wrong claim that array argument
847 can be CHARACTER type.
848 (MINVAL), (MAXLOC), (MINLOC): Ditto.
850 2010-02-05 Paul Thomas <pault@gcc.gnu.org>
853 * trans-expr.c (gfc_conv_subref_array_arg): Add new argument
854 'formal_ptr'. If this is true, give returned descriptor unity
855 lbounds, in all dimensions, and the appropriate offset.
856 (gfc_conv_procedure_call); If formal is a pointer, set the last
857 argument of gfc_conv_subref_array_arg to true.
858 * trans.h : Add last argument for gfc_conv_subref_array_arg.
859 * trans-io.c (set_internal_unit, gfc_trans_transfer): Set the
860 new arg of gfc_conv_subref_array_arg to false.
861 * trans-stmt.c (forall_make_variable_temp): The same.
863 2010-02-03 Tobias Burnus <burnus@net-b.de>
866 * interface.c (compare_parameter): Disable rank-checking
869 2010-02-02 Tobias Burnus <burnus@net-b.de>
872 * parse.c (decode_specification_statement): Use sym->result not sym.
874 2010-02-01 Tobias Burnus <burnus@net-b.de>
877 * decl.c (variable_decl): Allow default initializer in
878 TYPE declarations in PURE functions.
880 2010-01-31 Janus Weil <janus@gcc.gnu.org>
883 * resolve.c (resolve_allocate_expr): Move default initialization code
884 here from gfc_trans_allocate.
885 * trans.c (gfc_trans_code): Call gfc_trans_class_assign also for
887 * trans-expr.c (gfc_trans_class_assign): Handle default initialization
888 of CLASS variables via memcpy.
889 * trans-stmt.c (gfc_trans_allocate): Move default initialization code
890 to resolve_allocate_expr.
892 2010-01-31 Paul Thomas <pault@gcc.gnu.org>
895 * expr.c (gfc_get_full_arrayspec_from_expr): New function.
896 * gfortran.h : Add prototype for above.
897 * trans-expr.c (gfc_trans_alloc_subarray_assign): New function.
898 (gfc_trans_subcomponent_assign): Call new function to replace
899 the code to deal with allocatable components.
900 * trans-intrinsic.c (gfc_conv_intrinsic_bound): Call
901 gfc_get_full_arrayspec_from_expr to replace existing code.
903 2010-01-25 Tobias Burnus <burnus@net-b.de>
906 * array.c (gfc_array_dimen_size): Fix intrinsic procedure
909 2010-01-24 Paul Thomas <pault@gcc.gnu.org>
913 * expr.c (remove_subobject_ref): If the constructor is NULL use
914 the expression as the source.
915 (simplify_const_ref): Change the type of expression if
916 there are component references. Allow for substring to be at
917 the end of an arbitrarily long chain of references. If an
918 element is found that is not in an EXPR_ARRAY, assume that this
919 is scalar initialization of array. Call remove_subobject_ref in
920 this case with NULL second argument.
922 2010-01-24 Tobias Burnus <burnus@net-b.de>
925 * array.c (gfc_array_dimen_size): Use correct specific
926 function in the check.
928 2010-01-21 Paul Thomas <pault@gcc.gnu.org>
931 * trans-stmt.c (gfc_conv_elemental_dependencies): If temporary
932 is required, turn any trailing array elements after a range
933 into ranges so that offsets can be calculated.
935 2010-01-20 Joern Rennecke <amylaar@spamcop.net>
937 * module.c (mio_f2k_derived): Use enumerator as initializer of
941 * gfortran.h (struct gfc_namespace) <resolved>: Change to signed
944 2010-01-19 Janus Weil <janus@gcc.gnu.org>
947 * resolve.c (extract_compcall_passed_object): Set locus for
948 passed-object argument.
949 (extract_ppc_passed_object): Set locus and correctly remove PPC
952 2010-01-19 Paul Thomas <pault@gcc.gnu.org>
955 * trans-decl.c (add_argument_checking): Do not use the backend
956 decl directly to test for the presence of an optional dummy
957 argument. Use gfc_conv_expr_present, remembering to set the
961 * trans-decl.c (gfc_generate_function_code): Small white space
962 changes. If 'recurcheckvar' is NULL do not try to reset it.
964 2010-01-19 Janus Weil <janus@gcc.gnu.org>
967 * resolve.c (resolve_fl_derived): Set the accessibility of the parent
968 component for extended types.
969 * symbol.c (gfc_find_component): Remove a wrongly-worded error message
970 and take care of parent component accessibility.
972 2010-01-17 Janus Weil <janus@gcc.gnu.org>
975 * gfortran.h (symbol_attribute): Remove 'ambiguous_interfaces'.
976 * interface.c (check_interface1): Move a warning message here from
977 resolve_fl_procedure.
978 (check_sym_interfaces): Removed 'attr.ambiguous_interfaces'.
979 * module.c (read_module): Remove call to gfc_check_interfaces, since
980 this comes too early here.
981 * resolve.c (resolve_fl_procedure): Move warning message to
984 2010-01-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
987 * interface.c (check_interface1): Pass symbol name rather than NULL to
988 gfc_compare_interfaces. (gfc_compare_interfaces): Add assert to
990 * resolve.c (check_generic_tbp_ambiguity): Pass symbol name rather
991 than NULL to gfc_compare_interfaces.
993 2010-01-14 Paul Thomas <pault@gcc.gnu.org>
996 * trans-array.c (duplicate_allocatable): Static version of
997 gfc_duplicate_allocatable with provision to handle scalar
998 components. New boolean argument to switch off call to malloc
1000 (gfc_duplicate_allocatable): New function to call above with
1002 (gfc_copy_allocatable_data): New function to call above with
1004 (structure_alloc_comps): Do not apply indirect reference to
1005 scalar pointers. Add new section to copy allocatable components
1006 of arrays. Extend copying of allocatable components to include
1008 (gfc_copy_only_alloc_comp): New function to copy allocatable
1009 component derived types, without allocating the base structure.
1010 * trans-array.h : Add primitive for gfc_copy_allocatable_data.
1011 Add primitive for gfc_copy_only_alloc_comp.
1012 * trans-expr.c (gfc_conv_procedure_call): After calls to
1013 transformational functions with results that are derived types
1014 with allocatable components, copy the components in the result.
1015 (gfc_trans_arrayfunc_assign): Deallocate allocatable components
1016 of lhs derived types before allocation.
1018 2010-01-14 Paul Thomas <pault@gcc.gnu.org>
1021 * module.c (load_generic_interfaces): If a procedure that is
1022 use associated but not generic is given an interface that
1023 includes itself, then make it generic.
1025 2010-01-11 Joseph Myers <joseph@codesourcery.com>
1026 Shujing Zhao <pearly.zhao@oracle.com>
1028 PR translation/42469
1029 * lang.opt (fblas-matmul-limit=, finit-character=, finit-integer=,
1030 finit-logical=, finit-real=, fmax-array-constructor=): Use tab
1031 character between option name and help text.
1033 2010-01-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1037 * trans-array.c (gfc_conv_array_initializer): Change call to
1038 gfc_error_now to call to gfc_fatal_error.
1039 * array.c (count_elements): Whitespace. (extract_element): Whitespace.
1040 (is_constant_element): Changed name from constant_element.
1041 (gfc_constant_ac): Only use expand_construuctor for expression
1042 types of EXPR_ARRAY. If expression type is EXPR_CONSTANT, no need to
1043 call gfc_is_constant_expr.
1044 * expr.c (gfc_reduce_init_expr): Adjust conditionals and delete error
1046 * resolve.c (gfc_is_expandable_expr): New function that determiners if
1047 array expressions should have their constructors expanded.
1048 (gfc_resolve_expr): Use new function to determine whether or not to call
1049 gfc_expand_constructor.
1051 2010-01-09 Tobias Burnus <burnus@net-b.de>
1054 * trans-expr.c (gfc_trans_structure_assign): Handle
1056 * symbol.c (gen_special_c_interop_ptr): Add NULL_EXPR
1057 to the constructor for c_null_(fun)ptr.
1058 * resolve.c (resolve_structure_cons): Add special case
1059 for c_null_(fun)ptr.
1061 2010-01-09 Jakub Jelinek <jakub@redhat.com>
1063 * gfortranspec.c (lang_specific_driver): Update copyright notice
1066 2010-01-08 Tobias Burnus <burnus@net-b.de>
1069 * symbol.c (check_conflict, gfc_copy_attr): Add
1070 ASYNCHRONOUS support.
1071 (gfc_add_asynchronous): New function.
1072 * decl.c (match_attr_spec): Add ASYNCHRONOUS support.
1073 (gfc_match_asynchronous): New function.
1074 * dump-parse-tree.c (show_attr): Add ASYNCHRONOUS support.
1075 * gfortran.h (symbol_attribute): New ASYNCHRONOUS bit.
1076 (gfc_add_asynchronous): New Prototype.
1077 * module.c (ab_attribute, mio_symbol_attribute): Add
1078 ASYNCHRONOUS support.
1079 * resolve.c (was_declared): Ditto.
1080 * match.h (gfc_match_asynchronous): New prototype.
1081 * parse.c (decode_specification_statement,decode_statement):
1082 Add ASYNCHRONOUS support.
1084 2010-01-07 Tobias Burnus <burnus@net-b.de>
1087 * trans-decl.c (get_proc_pointer_decl): Fix call to
1088 gfc_conv_initializer for array-valued proc-pointer funcs.
1090 2010-01-07 Tobias Burnus <burnus@net-b.de>
1093 * trans-decl.c (gfc_trans_deferred_vars): Don't initialize
1094 allocatable scalars with SAVE attribute.
1096 2010-01-05 Tobias Burnus <burnus@net-b.de>
1099 * options.c (gfc_post_options): Set -frecursion
1100 when -fopenmp is used.
1102 2010-01-05 Tobias Burnus <burnus@net-b.de>
1105 * trans-expr.c (gfc_conv_procedure_call): Nullify
1106 return value for allocatable-scalar character functions.
1108 2010-01-04 Tobias Burnus <burnus@net-b.de>
1111 * error.c (error_printf, gfc_warning, gfc_notify_std,
1112 gfc_warning_now, gfc_error, gfc_error_now,
1113 gfc_fatal_error): Change argument name from nocmsgid to
1114 gmsgid to enable (x)gettext's % checking.
1116 2010-01-04 Tobias Burnus <burnus@net-b.de>
1118 * trans-decl.c (gfc_trans_deferred_vars): Fix spelling.
1120 2010-01-04 Tobias Burnus <burnus@net-b.de>
1123 * trans-expr.c (gfc_conv_procedure_call): Add indirect ref
1124 for functions returning allocatable scalars.
1125 * trans-stmt.c (gfc_trans_allocate): Emmit error when
1126 reallocating an allocatable scalar.
1127 * trans.c (gfc_allocate_with_status): Fix pseudocode syntax
1129 * trans-decl.c (gfc_trans_deferred_vars): Nullify local
1130 allocatable scalars.
1131 (gfc_generate_function_code): Nullify result variable for
1132 allocatable scalars.
1135 * module.c (gfc_use_module): Fix warning string to allow
1139 * invoke.texi (-fcheck=recursion): Mention that the checking
1140 is also disabled for -frecursive.
1141 * trans-decl.c (gfc_generate_function_code): Disable
1142 -fcheck=recursion when -frecursive is used.
1144 * intrinsic.texi (iso_c_binding): Improve wording.
1147 Copyright (C) 2010 Free Software Foundation, Inc.
1149 Copying and distribution of this file, with or without modification,
1150 are permitted in any medium without royalty provided the copyright
1151 notice and this notice are preserved.