1 2018-07-16 Fritz Reese <fritzoreese@gmail.com>
4 * module.c (mio_component): Set component->loc when loading from module.
6 2018-07-10 Jakub Jelinek <jakub@redhat.com>
9 * module.c (omp_declare_simd_clauses): Add LINEAR with _REF, _VAL and
11 (mio_omp_declare_simd): Save and restore ref, val and uval modifiers
12 on linear clauses. Initialize n->where to gfc_current_locus.
14 2018-07-05 Paul Thomas <pault@gcc.gnu.org>
17 * resolve.c.c (resolve_contained_fntype): Reference to C418 is
18 in F2008 and not F2003.
19 (resolve_function): Ditto in error message. Also, exclude
20 deferred character length results from the error.
22 2018-07-05 Fritz Reese <fritzoreese@gmail.com>
26 * expr.c (class_allocatable, class_pointer, comp_allocatable,
27 comp_pointer): New helpers.
28 (component_initializer): Generate EXPR_NULL for allocatable or pointer
29 components. Do not generate initializers for components within BT_CLASS.
30 Do not assign to comp->initializer.
31 (gfc_generate_initializer): Use new helpers; move code to generate
32 EXPR_NULL for class allocatable components into component_initializer().
34 2018-07-04 Jerry DeLisle <jvdelisle@gcc.gnu.org>
37 * trans-decl.c (gfc_process_block_locals): Delete assert and set
38 saved_local_decls = NULL_TREE.
40 2018-07-02 Richard Biener <rguenther@suse.de>
43 * trans-types.c (gfc_get_array_type_bounds): Unshare TYPE_FIELDs
44 for the distinct type copy.
46 2018-07-02 Paul Thomas <pault@gcc.gnu.org>
50 * trans-array.c (structure_alloc_comps): Do not explicitly copy
51 procedure pointer components.
53 2018-07-02 Paul Thomas <pault@gcc.gnu.org>
56 * expr.c : Add a prototype for scalarize_intrinsic_call.
57 (gfc_simplify_expr): Use scalarize_intrinsic_call for elemental
58 intrinsic function calls.
59 (scalarize_intrinsic_call): Add 'init_flag' argument. Check if
60 the expression or any of the actual argument expressions are
61 NULL. Before calling gfc_check_init_expr, check 'init_flag'.
62 Only simplify the scalarized expressions if there are no errors
64 (gfc_check_init_expr): Set 'init_flag' true in the call to
65 scalarize_intrinsic_call.
67 2018-06-28 Fritz Reese <fritzoreese@gmail.com>
70 * decl.c (gfc_match_type): Refactor and check for PDT declarations.
72 2018-06-28 Martin Liska <mliska@suse.cz>
74 * gfortranspec.c: Include opt-suggestions.h.
76 2018-06-25 Fritz Reese <fritzoreese@gmail.com>
81 * expr.c (component_initializer): Assign init expr to c->initializer.
82 (generate_isocbinding_initializer): New.
83 (gfc_generate_initializer): Call generate_isocbinding_initializer to
84 generate initializers for c_ptr and c_funptr with -finit-derived.
86 2018-06-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
89 * interface.c (check_dtio_interface1): Delete assert.
91 2018-06-22 Paul Thomas <pault@gcc.gnu.org>
92 Rainer Orth <ro@gcc.gnu.org>
95 * resolve.c (resolve_contained_fntype): Check for the charlen
96 before testing the length.
98 2018-06-21 Paul Thomas <pault@gcc.gnu.org>
101 * resolve.c (resolve_contained_fntype): Change standard ref.
102 from F95 to F2003: C418. Correct a spelling error in a comment.
103 It is an error for an abstract interface to have an assumed
104 character length result.
105 * trans-expr.c (gfc_conv_procedure_call): Likewise change the
108 2018-06-21 Paul Thomas <pault@gcc.gnu.org>
111 * resolve.c (resolve_ordinary_assign): Force the creation of a
112 vtable for assignment of non-polymorphic expressions to an
113 unlimited polymorphic object.
114 * trans-array.c (gfc_alloc_allocatable_for_assignment): Use the
115 size of the rhs type for such assignments. Set the dtype, _len
116 and vptrs appropriately.
117 * trans-expr.c (gfc_trans_assignment): Force the use of the
118 _copy function for these assignments.
120 2018-06-20 Chung-Lin Tang <cltang@codesourcery.com>
121 Thomas Schwinge <thomas@codesourcery.com>
122 Cesar Philippidis <cesar@codesourcery.com>
124 * gfortran.h (gfc_omp_clauses): Add unsigned if_present, finalize
126 * openmp.c (enum omp_mask2): Remove OMP_CLAUSE_PRESENT_OR_*. Add
127 OMP_CLAUSE_{IF_PRESENT,FINALIZE}.
128 (gfc_match_omp_clauses): Update handling of copy, copyin, copyout,
129 create, deviceptr, present_of_*. Add support for finalize and
131 (OACC_PARALLEL_CLAUSES): Remove PRESENT_OR_* clauses.
132 (OACC_KERNELS_CLAUSES): Likewise.
133 (OACC_DATA_CLAUSES): Likewise.
134 (OACC_DECLARE_CLAUSES): Likewise.
135 (OACC_UPDATE_CLAUSES): Add IF_PRESENT clause.
136 (OACC_ENTER_DATA_CLAUSES): Remove PRESENT_OR_* clauses.
137 (OACC_EXIT_DATA_CLAUSES): Add FINALIZE clause.
138 (gfc_match_oacc_declare): Update to OpenACC 2.5 semantics.
139 * trans-openmp.c (gfc_trans_omp_clauses): Add support for IF_PRESENT
142 2018-06-18 Eric Botcazou <ebotcazou@adacore.com>
144 * trans-decl.c (gfc_get_fake_result_decl): Revert latest change.
146 2018-06-17 Eric Botcazou <ebotcazou@adacore.com>
148 * trans-decl.c (nonlocal_dummy_decl_pset): Delete.
149 (nonlocal_dummy_decls): Likewise.
150 (gfc_nonlocal_dummy_array_decl): Likewise.
151 (gfc_get_symbol_decl): Do not call gfc_nonlocal_dummy_array_decl.
152 (gfc_get_fake_result_decl): Do not generate a new DECL if simply
153 reusing the result of a recursive call.
154 (gfc_generate_function_code): Do not create, insert and destroy
155 nonlocal_dummy_decls.
157 2018-06-13 Steven G. Kargl <kargl@gcc.gnu.org>
160 * array.c (gfc_resolve_character_array_constructor): Avoid NULL
163 2018-06-13 Cesar Philippidis <cesar@codesourcery.com>
166 * parse.c (decode_oacc_directive): Set gfc_matching_function
168 (decode_omp_directive): Likewise.
170 2018-06-13 Cesar Philippidis <cesar@codesourcery.com>
173 * openmp.c (gfc_match_oacc_wait): Use %C to report error location.
175 2018-06-12 David Malcolm <dmalcolm@redhat.com>
178 * misc.c (gfc_closest_fuzzy_match): Update for renaming of
179 levenshtein_distance to get_edit_distance.
181 2018-06-12 Steven G. Kargl <kargl@gcc.gnu.org>
184 * expr.c (gfc_check_assign): Select non-NULL locus.
186 2018-06-11 Janus Weil <janus@gcc.gnu.org>
189 * interface.c (compare_ptr_alloc): New function.
190 (generic_correspondence): Call it.
192 2018-06-10 Thomas Koenig <tkoenig@gcc.gnu.org>
194 * gfortran.h (gfc_expr): Add no_bounds_check field.
195 * frontend-passes.c (get_array_inq_function): Set no_bounds_check
196 on function and function argument.
197 (inline_matmul_assign): Set no_bounds_check on zero expression
198 and on lhs of zero expression.
199 Also handle A1B2 case if realloc on assigment is active.
200 * trans-array.c (gfc_conv_array_ref): Don't do range checking
201 if expr has no_bounds_check set.
202 (gfc_conv_expr_descriptor): Set no_bounds_check on ss if expr
204 * trans-expr.c (gfc_trans_assignment_1): Set no_bounds_check
205 on lss and lss if the corresponding expressions have it set.
207 2018-06-10 Dominique d'Humieres <dominiq@gcc.gnu.org>
210 * trans-const.c: Remove include "diagnostic-core.h".
211 (gfc_conv_constant_to_tree): Replace fatal_error with gcc_unreachable.
213 2018-06-10 Janus Weil <janus@gcc.gnu.org>
216 * decl.c (match_attr_spec): Synchronize the DECL_* enum values with the
217 INTENT_* values from the enum 'sym_intent'. Call 'match_intent_spec'
218 and remove a TODO note.
219 * gfortran.h: Add a comment to sym_intent.
221 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
224 * resolve.c (resolve_operator): Provide better error message for
225 derived type entity used in an binary intrinsic numeric operator.
227 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
232 * decl.c (gfc_match_char_spec): Use private namespace in attempt to
233 reduce a charlen to a constant.
235 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
238 * data.c (gfc_assign_data_value): Re-arrange code to allow for
239 an error for double initialization of CHARACTER entities.
241 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
244 * symbol.c (gfc_add_volatile): Enforce F2008:C1282 and F2018:C1588.
246 2018-06-08 Thomas Koenig <tkoenig@gcc.gnu.org>
249 * trans.h (gfc_ss): Add field no_bounds_check.
250 * trans-array.c (gfc_conv_ss_startstride): If flag_realloc_lhs and
251 ss->no_bounds_check is set, do not use runtime checks.
252 * trans-expr.c (gfc_trans_assignment_1): Set lss->no_bounds_check
253 for reallocatable lhs.
255 2018-06-08 Steven G. Kargl <kargl@gcc.gnu.org>
258 * array.c (match_array_cons_element): NULL() cannot be in an
261 2018-06-08 Steven G. Kargl <kargl@gcc.gnu.org>
264 * data.c (create_character_initializer): Return early if type is
265 incompatible with CHARACTER.
267 2018-06-07 Steven G. Kargl <kargl@gcc.gnu.org>
270 * simplify.c (gfc_simplify_mod): Re-arrange code to test whether
271 'P' is zero and issue an error if it is.
273 2018-06-06 Thomas Koenig <tkoenig@gcc.gnu.org>
276 * frontend-passes.c (is_fe_temp): Add prototype.
277 (realloc_string_callback): Early return for frontend-generated
280 2018-06-05 Cesar Philippidis <cesar@codesourcery.com>
284 * openmp.c (gfc_resolve_oacc_declare): Error on functions and
285 subroutine data clause arguments.
287 2018-06-04 Steven G. Kargl <kargl@gcc.gnu.org>
290 * resolve.c (resolve_allocate_deallocate): Check errmsg is default
293 2018-06-03 Paul Thomas <pault@gcc.gnu.org>
296 * decl.c (variable_decl): Use gfc_add_type for cray pointees.
298 2018-06-01 Steven G. Kargl <kargl@gcc.gnu.org>
301 * check.c (gfc_check_random_init): New function. Check arguments of
303 * gfortran.h (GFC_ISYM_RANDOM_INIT): New enum token.
304 * intrinsic.c (add_subroutines): Add RANDOM_INIT to list of
306 (gfc_check_intrinsic_standard): Introduce Fortran 2018 check.
307 * intrinsic.h: Add prototypes for gfc_check_random_init and
308 gfc_resolve_random_init
309 * intrinsic.texi: Document new intrinsic subprogram.
310 * iresolve.c (gfc_resolve_random_init): Resolve routine name.
311 * trans-decl.c: Declare gfor_fndecl_random_init
312 * trans-intrinsic.c (conv_intrinsic_random_init): New function.
313 Translate call to RANDOM_INIT.
314 (gfc_conv_intrinsic_subroutine): Call it.
315 * trans.h: Declare gfor_fndecl_random_init
317 2018-05-27 Steven G. Kargl <kargl@gcc.gnu.org>
319 * decl.c (match_data_constant): Fortran 2018 allows pointer
320 initialization in a data statement.
322 2018-05-25 Janus Weil <janus@gcc.gnu.org>
325 * match.c (gfc_match_block_data): Call gfc_notify_std to warn about
326 an obsolescent feature in Fortran 2018.
327 (gfc_match_equivalence): Ditto.
328 * resolve.c (resolve_common_blocks): Ditto.
329 (gfc_resolve_forall): Ditto.
330 * symbol.c (gfc_define_st_label): Ditto.
332 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
335 * resolve.c (update_current_proc_array_outer_dependency): Avoid NULL
338 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
341 * resolve.c (resolve_fl_procedure): Avoid NULL dereference.
343 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
346 * decl.c (gfc_match_derived_decl): Fix NULL point dereference.
348 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
351 * resolve.c (resolve_sync): Resolve expression before checking for
354 2018-05-22 Janus Weil <janus@gcc.gnu.org>
357 * libgfortran.h: Remove the macros GFC_STD_F2008_TS and
359 * error.c (notify_std_msg): Remove GFC_STD_F2008_TS.
360 * options.c (set_default_std_flags): Ditto.
361 (gfc_handle_option): Make -std=f2008ts an alias for -std=f2018.
362 * array.c (gfc_match_array_spec): Replace GFC_STD_F2008_TS by
364 * check.c (gfc_check_atomic, gfc_check_event_query,
365 gfc_check_c_f_pointer, gfc_check_c_f_procpointer, gfc_check_c_funloc,
366 gfc_check_c_loc, gfc_check_num_images, gfc_check_this_image): Ditto.
367 * decl.c (gfc_verify_c_interop_param, gfc_match_decl_type_spec): Ditto.
368 * intrinsic.c (add_functions, add_subroutines,
369 gfc_check_intrinsic_standard): Ditto.
370 * iso-c-binding.def: Ditto.
371 * iso-fortran-env.def: Ditto.
372 * match.c (gfc_match_event_post, gfc_match_event_wait,
373 gfc_match_fail_image, gfc_match_form_team, gfc_match_change_team,
374 gfc_match_end_team, gfc_match_sync_team): Ditto.
375 * gfortran.texi: Remove mention of -std=f2008ts.
376 Move TSs into F2018 section.
377 * invoke.texi: Update documentation of -std=f2008ts.
379 2018-05-21 Janus Weil <janus@gcc.gnu.org>
382 * libgfortran.h: New macros GFC_STD_OPT_*.
383 * error.c (notify_std_msg): New function.
384 (gfc_notify_std): Adjust such that it can handle combinations of
385 GFC_STD_* flags in the 'std' argument, not just a single one.
386 * match.c (match_arithmetic_if, gfc_match_if): Reject arithmetic if
388 (gfc_match_stopcode): Use GFC_STD_OPT_* macros.
389 * options.c (set_default_std_flags): Warn for F2018 deleted features
391 (gfc_handle_option): F2018 deleted features are allowed in earlier
393 * symbol.c (gfc_define_st_label, gfc_reference_st_label): Reject
394 nonblock do constructs in Fortran 2018.
396 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
399 * resolve.c (flag_fn_result_spec): Use the 'sym' argument to
400 test for self refs to the function result in the character len
401 expression. If a self reference is found, emit an error and
403 (resolve_fntype): Use the function symbol in the calls to the
406 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
409 * trans-array.c (gfc_get_array_span): Renamed from
411 (gfc_conv_expr_descriptor): Change references to above.
412 * trans-array.h : Add prototype for 'gfc_get_array_span'.
413 * trans-intrinsic.c (gfc_conv_associated): Add pre and post
415 * trans-stmt.c (trans_associate_var): If the associate name is
416 a subref array pointer, use gfc_get_array_span for the span.
418 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
421 * match.c (gfc_match_type_spec): Go through the array ref and
422 decrement 'rank' for every dimension that is an element.
424 2018-05-19 Paul Thomas <pault@gcc.gnu.org>
429 * trans-array.c (gfc_alloc_allocatable_for_assignment): Set the
430 charlen backend_decl of the rhs expr to ss->info->string_length
431 so that the value in the current scope is used.
433 2018-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
436 * gfortran.texi: Clarify documentation for Cray pointer and
439 2018-05-13 Paul Thomas <pault@gcc.gnu.org>
442 * trans-types.c (gfc_get_dtype_rank_type): Reorder evaluation
443 of 'size'. If the element type is a pointer use the size of the
444 TREE_TYPE of the type, unless it is VOID_TYPE. In this latter
445 case, set the size to zero.
447 2018-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
449 * gfortran.h: Remove prototype.
450 * symbol.c (gfc_new_undo_checkpoint): Remove unused function.
452 2018-05-11 Steven G. Kargl <kargl@gcc.gnu.org>
455 * expr.c (check_inquiry): Avoid NULL pointer dereference.
457 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
460 * check.c (gfc_check_rank): Check that the argument is a data object.
462 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
465 * array.c (gfc_resolve_character_array_constructor): Substrings
466 with upper bound smaller than lower bound are zero length strings.
468 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
471 * data.c (gfc_assign_data_value): Check that a data object does
472 not also have default initialization.
474 2018-05-10 Marek Polacek <polacek@redhat.com>
477 * options.c (gfc_post_options): Set main_input_filename.
479 2018-05-10 Thomas Koenig <tkoenig@gcc.gnu.org>
482 * intrinsic.texi: Document BACK for MINLOC and MAXLOC.
484 2018-05-10 Paul Thomas <pault@gcc.gnu.org>
488 * resolve.c (get_temp_from_expr): The temporary must not have
489 dummy or intent attributes.
491 2018-05-08 Thomas Koenig <tkoenig@gcc.gnu.org>
494 * check.c (gfc_check_minmaxloc): Remove error for BACK not being
495 implemented. Use gfc_logical_4_kind for BACK.
496 * simplify.c (min_max_choose): Add optional argument back_val.
498 (simplify_minmaxloc_to_scalar): Add argument back_val. Pass
499 back_val to min_max_choose.
500 (simplify_minmaxloc_to_nodim): Likewise.
501 (simplify_minmaxloc_to_array): Likewise.
502 (gfc_simplify_minmaxloc): Add argument back, handle it.
503 Pass back_val to specific simplification functions.
504 (gfc_simplify_minloc): Remove ATTRIBUTE_UNUSED from argument back,
505 pass it on to gfc_simplify_minmaxloc.
506 (gfc_simplify_maxloc): Likewise.
507 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Adjust
508 comment. If BACK is true, use greater or equal (or lesser or
509 equal) insteal of greater (or lesser). Mark the condition of
510 having found a value which exceeds the limit as unlikely.
512 2018-05-07 Jeff Law <law@redhat.comg>
514 * scanner.c (preprocessor_line): Call linemap_add after a line
515 directive that changes the current filename.
517 2018-05-06 Andre Vehreschild <vehre@gcc.gnu.org>
520 * dependency.c (gfc_dep_resolver): Revert looking at coarray dimension
521 introduced by r259385.
522 * trans-intrinsic.c (conv_caf_send): Always report a dependency for
523 same variables in coarray assignments.
525 2018-05-02 Tom de Vries <tom@codesourcery.com>
528 * f95-lang.c (DEF_GOACC_BUILTIN_ONLY): Define.
530 2018-04-24 Steven G. Kargl <kargl@gcc.gnu.org>
533 * decl.c (gfc_match_char_spec): Check for negative length and set to 0.
535 2018-04-14 Andre Vehreschild <vehre@gcc.gnu.org>
539 * dependency.c (gfc_dep_resolver): Coarray indexes are to be ignored
540 during dependency computation. They define no data dependency.
541 * trans-array.c (conv_array_index_offset): The stride can not be set
543 * trans-intrinsic.c (conv_caf_send): Add creation of temporary array
544 for caf_get's result and copying to the array with vectorial
547 2018-04-14 Thomas Koenig <tkoenig@gcc.gnu.org>
550 * frontend-passes.c (traverse_io_block): Check for start, end or
551 stride being defined by an outer implied DO loop.
553 2018-04-12 Thomas Koenig <tkoenig@gcc.gnu.org>
557 * trans-stmt.c (gfc_trans_forall_loop): Use annot_expr_ivdep_kind
558 for annotation and remove dependence on -ftree-parallelize-loops.
560 2018-04-10 Jakub Jelinek <jakub@redhat.com>
563 * openmp.c (resolve_omp_do): Remove bogus if (j < i) break;.
564 (resolve_oacc_nested_loops): Likewise. Formatting fix.
566 2018-04-09 Thomas Koenig <tkoenig@gcc.gnu.org>
569 * trans-stmt.c (gfc_trans_forall_loop): Remove annotation for
570 parallell processing of DO CONCURRENT -ftree-parallelize-loops
573 2018-04-09 Thomas Koenig <tkoenig@gcc.gnu.org>
576 * resolve.c (resolve_variable): Simplify cases where access to a
577 parameter array results in a single constant.
579 2018-04-02 Thomas Koenig <tkoenig@gcc.gnu.org>
582 * decl.c (variable_decl): If upper or lower bounds simplify
583 to a constant, use that.
585 2018-03-30 Paul Thomas <pault@gcc.gnu.org>
588 * simplify.c (gfc_convert_constant): Handle case of array
589 constructors within an array that has no iterator and improve
590 the conciseness of this section of code.
592 2017-03-30 Thomas Koenig <tkoenig@gcc.gnu.org>
595 * array.c (gfc_resolve_character_array_constructor): Early
596 exit for zero-size arrays.
597 * simplify.c (simplify_transformation_to_array): Exit early
598 if the result size is zero.
599 (simplify_minmaxloc_to_array): Likewise.
601 2018-03-28 Mikael Morin <mikael@gcc.gnu.org>
604 * symbol.c (gfc_symbol_done_2): Start freeing namespaces
606 (gfc_free_namespace): Restore assert (revert r258839).
608 2018-03-28 Jakub Jelinek <jakub@redhat.com>
610 * gfortran.h (gfc_dt): Rename default_exp field to dec_ext.
611 * ioparm.def (IOPARM_dt_default_exp): Rename to ...
612 (IOPARM_dt_dec_ext): ... this.
613 * trans-io.c (build_dt): Adjust for default_exp renaming to
614 dec_ext and IOPARM_dt_default_exp renaming to IOPARM_dt_dec_ext.
615 * io.c (match_io): Likewise.
617 2018-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
620 * frontend-passes.c (gfc_run_passes): Do not run front-end
621 optimizations if a previous error occurred.
623 2018-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
624 Harald Anlauf <anlauf@gmx.de>
627 * primary.c (gfc_convert_to_structure_constructor): Check
628 conformance of argument types in structure constructor.
630 2018-03-26 Thomas Koenig <tkoenig@gcc.gnu.org>
633 * io.c: Include constructor.h.
634 (resolve_tag_format): For a constant character array, concatenate
635 into a single character expression.
637 2018-03-25 Seth Johnson <johnsonsr@ornl.gov>
638 Dominique d'Humieres <dominiq@gcc.gnu.org>
641 * check.c (gfc_check_c_f_pointer): Allow scalar noninteroperable
642 scalar derived type with -std=f2003 and -std=f2008.
644 2018-03-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
645 Dominique d'Humieres <dominiq@gcc.gnu.org>
648 * symbol.c (gfc_free_namespace): Delete the assert and only if
649 refs count is equals zero, free the namespace. Otherwise,
650 something is halfway and other errors will resound.
652 2018-03-24 Thomas Koenig <tkoenig@gcc.gnu.org>
655 * expr.c (find_substring_ref): Change types of start, end
656 and length variables to gfc_charlen_t. Set length to zero
659 2018-03-24 Steven G. Kargl <kargl@gcc.gnu.org>
662 * decl.c (check_function_name): Improved error message
663 (gfc_match_volatile, gfc_match_asynchronous) Use check_function_name.
665 2018-03-22 Steven G. Kargl <kargl@gcc.gnu.org>
668 * decl.c (get_proc_name): If the MODULE prefix appears in interface
669 body, then it must appear on the contained subroutine or function.
670 While here, fix nearby mis-indented code.
672 2018-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
673 Harald Anlauf <anlauf@gmx.de>
676 * trans-types.c (gfc_sym_type): Do not dereference NULL pointer.
678 2018-03-21 Janne Blomqvist <jb@gcc.gnu.org>
681 * trans-expr.c (gfc_conv_procedure_call): Convert charlen to
682 gfc_charlen_type_node when calling procedure.
684 2018-03-20 Steven G. Kargl <kargl@gcc.gnu.org>
687 * interface.c (symbol_rank): Remove bogus null pointer check that
688 crept in when translating a ternary operator into an if-else
691 2018-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
694 * simplify.c (gfc_convert_constant): Correctly handle iterators
697 2018-03-18 Steven G. Kargl <kargl@gcc.gnu.org>
700 * decl.c (get_proc_name): Check for a subroutine re-defined in
701 the contain portion of a subroutine. Change language of existing
702 error message to better describe the issue. While here fix whitespace
705 2018-03-18 Steven G. Kargl <kargl@gcc.gnu.org>
708 * decl.c (get_proc_name): Catch clash between a procedure statement
709 and a contained subprogram
711 2018-03-16 Steven G. Kargl <kargl@gcc.gnu.org>
714 * decl.c (merge_array_spec): Correct the error condition.
716 2018-03-15 Steven G. Kargl <kargl@gcc.gnu.org>
719 * decl.c (get_proc_name): Check for clash of entry name with
722 2018-03-15 Steven G. Kargl <kargl@gcc.gnu.org>
725 * decl.c (merge_array_spec): Limit the merging to maximum allowed
726 dimensions, and issue error message if limit is exceeded.
728 2018-03-13 Steven G. Kargl <kargl@gcc.gnu.org>
730 * check.c (gfc_check_kill_sub): Remove check for INTEGER(4) or (8).
731 * intrinsic.c (add_functions): Remove reference to gfc_resolve_kill.
732 (add_subroutines): Remove reference to gfc_resolve_kill_sub.
733 * intrinsic.texi: Update documentation.
734 * iresolve.c (gfc_resolve_kill, gfc_resolve_kill_sub): Remove.
735 * trans-decl.c (gfc_build_intrinsic_function_decls): Add
736 gfor_fndecl_kill and gfor_fndecl_kill_sub
737 * trans-intrinsic.c (conv_intrinsic_kill, conv_intrinsic_kill_sub): new
739 (gfc_conv_intrinsic_function): Use conv_intrinsic_kill.
740 (gfc_conv_intrinsic_subroutine): Use conv_intrinsic_kill_sub.
741 * trans.h: Declare gfor_fndecl_kill and gfor_fndecl_kill_sub.
743 2018-03-11 Paul Thomas <pault@gcc.gnu.org>
746 * trans-array.c (structure_alloc_comps): Make sure that the
747 vptr is copied and that the unlimited polymorphic _len is used
748 to compute the size to be allocated.
749 * trans-expr.c (gfc_get_class_array_ref): If unlimited, use the
750 unlimited polymorphic _len for the offset to the element.
751 (gfc_copy_class_to_class): Set the new 'unlimited' argument.
752 * trans.h : Add the boolean 'unlimited' to the prototype.
754 2018-03-11 Steven G. Kargl <kargl@gcc.gnu.org>
757 * resolve.c (resolve_fl_procedure): Enforce F2018:C15100.
759 2018-03-11 Steven G. Kargl <kargls@gcc.gnu.org>
761 * check.c (gfc_check_kill): Check pid and sig are scalar.
762 (gfc_check_kill_sub): Restrict kind to 4 and 8.
763 * intrinsic.c (add_function): Sort keyword list. Add pid and sig
764 keywords for KILL. Remove redundant *back="back" in favor of the
765 original *bck="back".
766 (add_subroutines): Sort keyword list. Add pid and sig keywords
768 * intrinsic.texi: Fix documentation to consistently use pid and sig.
769 * iresolve.c (gfc_resolve_kill): Kind can only be 4 or 8. Choose the
771 (gfc_resolve_rename_sub): Add comment.
773 2018-03-11 Thomas Koenig <tkoenig@gcc.gnu.org>
776 * simplify.c (simplify_transformation): Return default result for
777 empty array argument.
778 (gfc_simplify_all): Remove special-case handling for zerosize.
779 (gfc_simplify_any): Likewise.
780 (gfc_simplify_count): Likewise.
781 (gfc_simplify_iall): Likewise.
782 (gfc_simplify_iany): Likewise.
783 (gfc_simplify_iparity): Likewise.
784 (gfc_simplify_minval): Likewise.
785 (gfc_simplify_maxval): Likewise.
786 (gfc_simplify_norm2): Likewise.
787 (gfc_simplify_product): Likewise.
788 (gfc_simplify_sum): Likewise.
790 2018-03-10 Steven G. Kargl <kargl@gcc.gnu.org>
793 * arith.c (check_result, eval_intrinsic): If result overflows, pass
794 the expression up the chain instead of a NULL pointer.
796 2018-03-07 Steven G. Kargl <kargl@gcc.gnu.org>
800 * decl.c (gfc_match_char_spec): Try to reduce a charlen to a constant.
802 2017-03-06 Thomas Koenig <tkoenig@gcc.gnu.org>
806 * expr.c (simplify_parameter_variable): If p is a size zero array
807 and not an ARRAY_EXPR insert an empty array constructor and
809 * gfortran.h: Add prototype for gfc_is_size_zero_array.
810 * simplify.c (is_size_zero_array): Make non-static and rename into
811 (gfc_is_size_zero_array): Check for parameter arrays of zero
812 size by comparing shape and absence of constructor.
813 (gfc_simplify_all): Use gfc_is_size_zero_array instead of
815 (gfc_simplify_count): Likewise.
816 (gfc_simplify_iall): Likewise.
817 (gfc_simplify_iany): Likewise.
818 (gfc_simplify_iparity): Likewise.
819 (gfc_simplify_minval): Likewise.
820 (gfc_simplify_maxval): Likewise.
821 (gfc_simplify_product): Likewise.
822 (gfc_simplify_sum): Likewise.
824 2018-03-06 Steven G. Kargl <kargl@gcc.gnu.org>
827 * primary.c (match_sym_complex_part): Give the matcher for an implied
828 do-loop a chance to run.
830 2018-03-03 Harald Anlauf <anlauf@gmx.de>
833 * trans-expr.c (gfc_apply_interface_mapping_to_expr): Do not
834 dereference NULL pointer.
836 2018-03-03 Steven G. Kargl <kargl@gcc.gnu.org>
839 * simplify.c (is_size_zero_array): New function to check for size
841 (gfc_simplify_all, gfc_simplify_any, gfc_simplify_count,
842 gfc_simplify_iall, gfc_simplify_iany, gfc_simplify_iparity,
843 gfc_simplify_minval, gfc_simplify_maxval, gfc_simplify_norm2,
844 gfc_simplify_product, gfc_simplify_sum): Use it, and implement
845 requirements from F2018.
847 2018-03-03 Steven G. Kargl <kargl@gcc.gnu.org>
850 * simplify.c (gfc_simplify_transfer): Resolve mold.
852 2018-03-03 Paul Thomas <pault@gcc.gnu.org>
855 * resolve.c (build_loc_call): Change symtree name from 'loc' to
858 2018-03-01 Paul Thomas <pault@gcc.gnu.org>
861 * target-memory.c (gfc_interpret_derived): Assert that BT_VOID
862 components are caf tokens.
863 (gfc_target_interpret_expr): Treat BT_VOID expressions as
866 2018-03-01 Paul Thomas <pault@gcc.gnu.org>
869 * class.c (class_array_ref_detected): Remove the condition that
870 there be no reference after the array reference.
871 (find_intrinsic_vtab): Remove excess whitespace.
872 * trans-array.c (gfc_conv_scalarized_array_ref): Rename 'tmp'
873 as 'base and call build_class_array_ref earlier.
875 2018-02-28 Paul Thomas <pault@gcc.gnu.org>
878 * trans-stmt.c (trans_associate_var): Make sure that the se
879 expression is a pointer type before converting it to the symbol
882 2018-02-25 Steven G. Kargl <kargl@gcc.gnu.org>
885 * decl.c (variable_decl): Check that an explicit-shape-array with
886 nonconstant bounds is allowed.
888 2018-02-25 Paul Thomas <pault@gcc.gnu.org>
891 * trans-intrinsic.c (gfc_conv_allocated): If the argument se
892 has a pre block, add it to the expression pre block.
894 2018-02-25 Thomas Koenig <tkoenig@gcc.gnu.org>
897 * gfortran.h (gfc_integer_4_kind): Define.
898 * resolve.c (resolve_select_type): Make sure that the
899 kind of c->high is gfc_integer_4_kind.
901 2018-02-24 Steven G. Kargl <kargl@gcc.gnu.org>
904 * decl.c (gfc_match_data): Check for invalid substring in
907 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
909 * intrinsic.texi: Arguments to MATMUL cannot both be rank one.
911 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
914 * trans-io.c (transfer_expr): Deal with C_LOC in transfer statement.
916 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
919 * interface.c (compare_actual_formal): Issue error if keyword is
920 used in a statement function.
922 2018-02-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
925 * trans-io.c (set_parameter_value_inquire): Adjust range check of
926 negative unit values for kind=8 units to the kind=4 negative limit.
928 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
931 * trans-types.c (gfc_sym_type): Test sym->ns->proc_name before
932 accessing its components.
934 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
937 * trans-decl.c (gfc_finish_var_decl): Test sym->ns->proc_name
938 before accessing its components.
940 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
943 * trans-const.c : Clean up some whitespace issues.
944 * trans-expr.c (gfc_conv_initializer): If an iso_c_binding
945 derived type has a kind value of zero, set it to the default
948 2018-02-23 Janne Blomqvist <jb@gcc.gnu.org>
951 * trans-decl.c (gfc_build_builtin_function_decls): Add bool
952 argument to stop and error stop decls.
953 * trans-stmt.c (gfc_trans_stop): Add false value to argument
956 2018-02-22 Janne Blomqvist <jb@gcc.gnu.org>
960 * trans-decl.c (gfc_build_builtin_function_decls): Pass
961 gfc_int8_type node to pause_numeric, size_type_node to
963 * trans-stmt.c (gfc_trans_pause): Likewise.
965 2018-02-22 Janne Blomqvist <jb@gcc.gnu.org>
967 * gfortran.texi: Update Coarray API description.
968 * trans-decl.c (gfc_build_builtin_function_decls): Use size_t for
969 character lengths, int for exit codes.
970 (generate_coarray_sym_init): Use size_t for character length.
971 * trans-intrinsic.c (conv_co_collective): Likewise.
972 * trans-stmt.c (gfc_trans_lock_unlock): Likewise.
973 (gfc_trans_event_post_wait): Likewise.
974 (gfc_trans_sync): Likewise.
975 (gfc_trans_stop): Use size_t for character lengths, int for exit
978 2018-02-20 Thomas Koenig <tkoenig@gcc.gnu.org>
982 * primary.c (gfc_convert_to_structure_constructor):
983 For a constant string constructor, make sure the length
986 2018-02-19 Paul Thomas <pault@gcc.gnu.org>
990 * resolve.c (resolve_assoc_var): Rearrange the logic for the
991 determination of the character length of associate names. If
992 the associate name is missing a length expression or the length
993 expression is not a constant and the target is not a variable,
994 make the associate name allocatable and deferred length.
995 * trans-decl.c (gfc_get_symbol_decl): Null the character length
996 backend_decl for deferred length associate names that are not
997 variables. Set 'length' to gfc_index_zero_node for character
998 associate names, whose character length is a PARM_DECL.
1000 2018-02-19 Thomas Koenig <tkoenig@gcc.gnu.org>
1003 * frontend-passes.c (traverse_io_block): Remove workaround for
1006 2018-02-19 Andre Vehreschild <vehre@gcc.gnu.org>
1008 * gfortran.texi: Document additional src/dst_type. Fix some typos.
1009 * trans-decl.c (gfc_build_builtin_function_decls): Declare the new
1010 argument of _caf_*_by_ref () with * e { get, send, sendget }.
1011 * trans-intrinsic.c (gfc_conv_intrinsic_caf_get): Add the type of the
1012 data referenced when generating a call to caf_get_by_ref ().
1013 (conv_caf_send): Same but for caf_send_by_ref () and
1014 caf_sendget_by_ref ().
1016 2018-02-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1019 * io.c (check_format): Allow FMT_COLON.
1021 2018-02-18 Paul Thomas <pault@gcc.gnu.org>
1024 * trans-array.c (gfc_conv_expr_descriptor): Set parmtype from
1025 the typenode in the case of deferred length characters.
1027 2018-02-17 Thomas Koenig <tkoenig@gcc.gnu.org>
1030 * frontend-passes (scalarized_expr): If the expression
1031 is an assumed size array, leave in the last reference
1032 and pass AR_SECTION instead of AR_FULL to gfc_resolve
1033 in order to avoid an error.
1035 2018-02-17 Paul Thomas <pault@gcc.gnu.org>
1038 * resolve.c (resolve_assoc_var): If a non-constant target expr.
1039 has no string length expression, make the associate variable
1040 into a deferred length, allocatable symbol.
1041 * trans-decl.c (gfc_is_reallocatable_lhs): Add and use a ptr to
1043 * trans-stmt.c (trans_associate_var): Null and free scalar
1044 associate names that are allocatable. After assignment, remove
1045 the allocatable attribute to prevent reallocation.
1047 2018-02-16 Jakub Jelinek <jakub@redhat.com>
1050 * trans-openmp.c (gfc_trans_omp_clauses): For OMP_CLAUSE_LINEAR_REF
1051 kind set OMP_CLAUSE_LINEAR_STEP to TYPE_SIZE_UNIT times last_step.
1053 2018-02-16 Dominique d'Humieres <dominiq@gcc.gnu.org>
1056 * decl.c (gfc_get_pdt_instance): Replace '%qs' with %qs.
1058 2018-02-15 Janus Weil <janus@gcc.gnu.org>
1061 * interface.c (check_dtio_arg_TKR_intent): Add a check for character
1064 2018-02-14 Janus Weil <janus@gcc.gnu.org>
1067 * match.c (gfc_match_select_type): Fix check for selector in
1068 SELECT TYPE statement.
1070 2018-02-13 Janus Weil <janus@gcc.gnu.org>
1073 * symbol.c (check_conflict): Reject procedure pointers in common blocks.
1075 2018-02-13 Alastair McKinstry <alastair.mckinstry@sceal.ie>
1076 Janne Blomqvist <jb@gcc.gnu.org>
1078 * module.c (dump_module): Use lbasename to ensure that module
1079 files are reproducible.
1081 2018-02-12 Janus Weil <janus@gcc.gnu.org>
1084 * resolve.c (resolve_component): Fix checks of passed argument in
1085 procedure-pointer components.
1087 2018-02-11 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1090 * resolve.c (resolve_formal_arglist): Update error message.
1092 2018-02-11 Andre Vehreschild <vehre@gcc.gnu.org>
1094 * gfortran.texi: Fix typos in documentation of caf_register ().
1095 * trans-array.c (structure_alloc_comps): Only register a component of
1096 a derived typed corray, not of an ultimate component coarray.
1098 2018-02-11 Steven G. Kargl <kargl@gcc.gnu.org>
1102 * interface.c (compare_actual_formal): Add in_statement_function
1103 bool parameter. Skip check of INTENT attribute for statement
1104 functions. Arguments to a statement function cannot be optional,
1105 issue error for missing argument.
1106 (gfc_procedure_use, gfc_ppc_use, gfc_arglist_matches_symbol): Use
1107 in_statement_function.
1109 2018-02-11 Paul Thomas <pault@gcc.gnu.org>
1112 * trans-expr.c (gfc_conv_derived_to_class): Set the use_offset
1113 flag. If the is a vector subscript or the expression is not a
1114 variable, make the descriptor one-based.
1116 2018-02-10 Paul Thomas <pault@gcc.gnu.org>
1120 * trans-array.c (gfc_array_init_size): Revert the change made
1121 in revision 257356 setting the dtype.
1122 * trans-types.c (gfc_get_dtype): Do not use the cached dtype.
1123 Call gfc_get_dtype_rank_type every time.
1126 * trans-array.c (gfc_conv_expr_descriptor): If the source array
1127 is a descriptor type, use its offset, removing the condition
1128 that is be a class expression.
1130 2018-02-07 Steven G. Kargl <kargl@gcc.gnu.org>
1133 * match.c (gfc_match_deallocate): Check for NULL pointer.
1135 2018-02-07 Thomas Koenig <tkoenig@gcc.gnu.org>
1138 * trans-intrinsic.c (gfc_conv_intrinsic_shape): New function.
1139 (gfc_conv_intrinsic_function): Call it.
1141 2018-02-07 Steven G. Kargl <kargl@gcc.gnu.org>
1144 * match.c (gfc_match_type_spec): If the charlen is non-NULL, then
1145 try to resolve it. While here return early if possible.
1147 2018-02-04 Paul Thomas <pault@gcc.gnu.org>
1150 * trans-decl.c (gfc_get_symbol_decl): Do not finish the decl of
1151 'length' if the symbol charlen backend_decl is an indirect ref.
1153 2018-02-03 Paul Thomas <pault@gcc.gnu.org>
1157 * trans-array.c (gfc_array_init_size): Instead of gfc_get_dtype
1158 use gfc_get_dtype_rank_type.
1160 2018-02-01 Janne Blomqvist <jb@gcc.gnu.org>
1164 * resolve.c (resolve_assoc_var): Generate an error if
1165 target length unknown.
1167 2018-02-01 Janne Blomqvist <jb@gcc.gnu.org>
1170 * simplify.c (gfc_simplify_repeat): Increase limit for deferring
1171 to runtime, print a warning message.
1173 2018-01-31 Jakub Jelinek <jakub@redhat.com>
1176 * openmp.c (gfc_match_omp_clauses): If all the linear
1177 gfc_match_omp_variable_list calls failed, don't gfc_free_omp_namelist
1178 nor set *head = NULL. Formatting fixes.
1180 2018-01-31 Paul Thomas <pault@gcc.gnu.org>
1183 * trans-expr.c (gfc_conv_procedure_call): If the parm expr is
1184 an address expression passed to an assumed rank dummy, convert
1185 to an indirect reference.
1187 2018-01-31 Thomas Koenig <tkoenig@gcc.gnu.org>
1189 * dump-parse-tree.c (write_proc): Use sym_name (which may
1190 be sym->binding_label) instead of sym->name.
1192 2018-01-31 Janne Blomqvist <jb@gcc.gnu.org>
1194 * trans-const.c (gfc_conv_string_init): Use gfc_charlen_t instead
1197 2018-01-31 Janne Blomqvist <jb@gcc.gnu.org>
1200 * trans-expr.c (fill_with_spaces): Use memset instead of
1202 (gfc_trans_string_copy): Improve opportunity to use builtins with
1205 2018-01-30 Jakub Jelinek <jakub@redhat.com>
1208 * trans-array.c (gfc_get_descriptor_offsets_for_info): Set *data_off
1209 to DATA_FIELD's offset rather than OFFSET_FIELD's offset.
1211 2018-01-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1214 * array.c (gfc_ref_dimen_size): Whitespace fixes. If stride is
1217 2018-01-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1220 * frontend-passes (matmul_to_var_expr): Return early if
1221 in association list.
1222 (inline_matmul_assign): Likewise.
1224 2017-01-29 Thomas Koenig <tkoenig@gcc.gnu.org>
1227 * resolve.c (resolve_component): Ensure BIND(C) character
1228 components have length one.
1229 (resolve_symbol): Likewise for variables.
1231 2018-01-27 Jakub Jelinek <jakub@redhat.com>
1234 * decl.c (add_init_expr_to_sym): Ignore initializers for too large
1237 2018-01-26 Damian Rouson <damian@sourceryinstitute.org>
1238 Alessandro Fanfarillo <fanfarillo.gcc@gmail.com>
1239 Soren Rasmussen <s.c.rasmussen@gmail.com>
1241 Partial support for Fortran 2018 teams features.
1243 * array.c (gfc_match_array_ref): add team attribute in coarray
1245 * check.c (gfc_check_get_team, gfc_check_team_number): add new
1246 functions for get_team and team_number.
1247 * dump-parse-tree.c (show_code_node): add new statements: form team,
1248 change team, end team, and sync team.
1249 * expr.c (gfc_find_team_co): add new function.
1250 * gfortran.h: add new statements.
1251 * intrinsic.c (add_functions): add get_team and team_number functions.
1252 * intrinsic.h: add get_team and team_number prototypes for check,
1253 simplify, and resolve.
1254 * iresolve.c (gfc_resolve_get_team, gfc_resolve_team_number): add new
1256 * iso-fortran-env.def: add the team_type derived type.
1257 * match.c (gfc_match_if, gfc_match_form_team, gfc_match_team_number)
1258 (gfc_match_end_team, gfc_match_sync_team, gfc_match_change_team):
1259 add change team, end team, form team, sync team match and functions.
1260 * match.h: add new prototypes for change team, end team, form team,
1262 * parse.c (decode_statement): add cases for change team, end team,
1263 form team, and sync team.
1264 * resolve.c: add cases for exec form team, change team, end team, and
1266 * simplify.c (gfc_simplify_get_team): add new function for get team.
1267 * st.c (gfc_free_statement): add cases exec for change team, end team,
1268 form team, sync team.
1269 * trans-decl.c (gfor_fndecl_caf_form_team)
1270 (gfor_fndecl_caf_change_team, gfor_fndecl_caf_end_team)
1271 (gfor_fndecl_caf_sync_team, gfor_fndecl_caf_get_team)
1272 (gfor_fndecl_caf_team_number): add functions and definitions.
1273 * trans-intrinsic.c (conv_caf_send, conv_intrinsic_team_number): add
1274 new function and team_type argument support.
1275 * trans-stmt.c (gfc_trans_form_team, gfc_trans_change_team)
1276 (gfc_trans_end_team, gfc_trans_sync_team): add new functions.
1277 * trans-stmt.h: add new prototypes.
1278 * trans-types.c (gfc_get_derived_type): check condition for team_type.
1279 * trans.c (trans_code): new exec cases for form team, change team, end
1280 team, and sync team.
1281 * trans.h: add new prototypes.
1283 2018-01-26 Steven G. Kargl <kargl@gcc.gnu.org>
1286 * simplify.c (compute_dot_product): Initialize result to INTEGER(1) 0
1287 or .false. The summation does the correct type conversion.
1288 (gfc_simplify_dot_product): Special case zero-sized arrays.
1290 2018-25-01 Paul Thomas <pault@gcc.gnu.org>
1293 * array.c (gfc_match_array_ref): If standard earlier than F2008
1294 it is an error if the reference dimension is greater than 7.
1295 libgfortran.h : Increase GFC_MAX_DIMENSIONS to 15. Change the
1296 dtype masks and shifts accordingly.
1297 * trans-array.c (gfc_conv_descriptor_dtype): Use the dtype
1298 type node to check the field.
1299 (gfc_conv_descriptor_dtype): Access the rank field of dtype.
1300 (duplicate_allocatable_coarray): Access the rank field of the
1301 dtype descriptor rather than the dtype itself.
1302 * trans-expr.c (get_scalar_to_descriptor_type): Store the type
1303 of 'scalar' on entry and use its TREE_TYPE if it is ARRAY_TYPE
1305 (gfc_conv_procedure_call): Pass TREE_OPERAND (tmp,0) to
1306 get_scalar_to_descriptor_type if the actual expression is a
1308 (gfc_trans_structure_assign): Assign the rank directly to the
1310 * trans-intrinsic.c (gfc_conv_intrinsic_rank): Cast the result
1311 to default integer kind.
1312 (gfc_conv_intrinsic_sizeof): Obtain the element size from the
1313 'elem_len' field of the dtype.
1314 * trans-io.c (gfc_build_io_library_fndecls): Replace
1315 gfc_int4_type_node with dtype_type_node where necessary.
1316 (transfer_namelist_element): Use gfc_get_dtype_rank_type for
1318 * trans-types.c : Provide 'get_dtype_type_node' to acces the
1319 dtype_type_node and, if necessary, build it.
1320 The maximum size of an array element is now determined by the
1321 maximum value of size_t.
1322 Update the description of the array descriptor, including the
1323 type def for the dtype_type.
1324 (gfc_get_dtype_rank_type): Build a constructor for the dtype.
1325 Distinguish RECORD_TYPEs that are BT_DERIVED or BT_CLASS.
1326 (gfc_get_array_descriptor_base): Change the type of the dtype
1327 field to dtype_type_node.
1328 (gfc_get_array_descr_info): Get the offset to the rank field of
1330 * trans-types.h : Add a prototype for 'get_dtype_type_node ()'.
1331 * trans.h : Define the indices of the dtype fields.
1333 2018-23-01 Paul Thomas <pault@gcc.gnu.org>
1336 * decl.c (gfc_match_derived_decl): If eos not matched, recover
1337 and emit error about garbage after declaration.
1339 2018-23-01 Paul Thomas <pault@gcc.gnu.org>
1342 * trans-stmt.c (trans_associate_var): Do not set cst_array_ctor
1345 2018-01-22 Janne Blomqvist <jb@gcc.gnu.org>
1349 * arith.c (gfc_arith_concat): Use size_t for string length.
1350 (gfc_compare_string): Likewise.
1351 (gfc_compare_with_Cstring): Likewise.
1352 * array.c (gfc_resolve_character_array_constructor): Use
1353 HOST_WIDE_INT, gfc_mpz_get_hwi.
1354 * check.c (gfc_check_fe_runtime_error): Use size_t.
1355 * data.c (create_character_initializer): Use HOST_WIDE_INT,
1357 * decl.c (gfc_set_constant_character_len): Use gfc_charlen_t.
1358 (add_init_expr_to_sym): Use HOST_WIDE_INT.
1359 * expr.c (gfc_build_init_expr): Use HOST_WIDE_INT,
1361 (gfc_apply_init): Likewise.
1362 * match.h (gfc_set_constant_character_len): Update prototype.
1363 * primary.c (match_string_constant): Use size_t.
1364 * resolve.c (resolve_ordinary_assign): Use HOST_WIDE_INT,
1366 * simplify.c (init_result_expr): Likewise.
1367 (gfc_simplify_len_trim): Use size_t.
1368 * target-memory.c (gfc_encode_character): Use size_t.
1369 (gfc_target_encode_expr): Use HOST_WIDE_INT, gfc_mpz_get_hwi.
1370 (interpret_array): Use size_t.
1371 (gfc_interpret_character): Likewise.
1372 * target-memory.h (gfc_encode_character): Update prototype.
1373 (gfc_interpret_character): Likewise.
1374 (gfc_target_interpret_expr): Likewise.
1375 * trans-const.c (gfc_build_string_const): Use size_t for length
1377 (gfc_build_wide_string_const): Likewise.
1378 * trans-const.h (gfc_build_string_const): Likewise.
1379 (gfc_build_wide_string_const): Likewise.
1381 2018-01-20 Steven G. Kargl <kargl@gcc.gnu.org>
1384 * simplify.c (gfc_simplify_matmul): Set return type correctly.
1386 2018-01-19 Steven G. Kargl <kargl@gcc.gnu.org>
1389 * simplify.c (gfc_simplify_matmul): Delete bogus assertion.
1391 2018-01-17 Harald Anlauf <anlauf@gmx.de>
1394 * expr.c (add_init_expr_to_sym): Do not dereference NULL pointer.
1396 2018-01-17 Harald Anlauf <anlauf@gmx.de>
1399 * decl.c (add_init_expr_to_sym): Do not dereference NULL pointer.
1401 2018-01-15 Louis Krupp <louis.krupp@zoho.com>
1404 * interface.c (compare_rank): Don't try to retrieve CLASS_DATA
1405 from symbol marked unlimited polymorphic.
1406 * resolve.c (resolve_structure_cons): Likewise.
1407 * misc.c (gfc_typename): Don't dereference derived->components
1410 2018-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
1413 * gfortran.h (gfc_check_f): Rename f4ml to f5ml.
1414 (gfc_logical_4_kind): New macro
1415 * intrinsic.h (gfc_simplify_minloc): Add a gfc_expr *argument.
1416 (gfc_simplify_maxloc): Likewise.
1417 (gfc_resolve_maxloc): Likewise.
1418 (gfc_resolve_minloc): Likewise.
1419 * check.c (gfc_check_minloc_maxloc): Add checking for "back"
1420 argument; also raise error if it is used (for now). Add it
1421 if it isn't present.
1422 * intrinsic.c (add_sym_4ml): Rename to
1423 (add_sym_5ml), adjust for extra argument.
1424 (add_functions): Add "back" constant. Adjust maxloc and minloc
1426 * iresolve.c (gfc_resolve_maxloc): Add back argument. If back is
1427 not of gfc_logical_4_kind, convert.
1428 (gfc_resolve_minloc): Likewise.
1429 * simplify.c (gfc_simplify_minloc): Add back argument.
1430 (gfc_simplify_maxloc): Likewise.
1431 * trans-intinsic.c (gfc_conv_intrinsic_minmaxloc): Rename last
1432 argument to %VAL to ensure passing by value.
1433 (gfc_conv_intrinsic_function): Call gfc_conv_intrinsic_minmaxloc
1434 also for library calls.
1436 2018-01-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1439 * resolve.c (resolve_transfer): Delete code looking for 'DT'
1440 format specifiers in format strings. Set formatted to true if a
1441 format string or format label is present.
1442 * trans-io.c (get_dtio_proc): Likewise. (transfer_expr): Fix
1445 2018-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
1448 * dump-parse-tree.c (get_c_type_name): Remove extra line.
1449 Change for loop to use declaration in for loop. Handle BT_LOGICAL
1451 (write_decl): Add where argument. Fix indentation. Replace
1452 assert with error message. Add typename to warning
1454 (write_type): Adjust locus to call of write_decl.
1455 (write_variable): Likewise.
1456 (write_proc): Likewise. Replace assert with error message.
1458 2018-01-13 Paul Thomas <pault@gcc.gnu.org>
1461 * trans-expr.c (gfc_trans_scalar_assign): Flag is_alloc_lhs if
1462 the rhs expression is neither an elemental nor a conversion
1466 * trans-array.c (is_pointer_array): Remove unconditional return
1467 of false for -fopenmp.
1469 2018-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
1473 * dump-parse-tree.c (write_proc): Always emit closing parenthesis
1476 2018-01-10 Steven G. Kargl <kargl@gcc.gnu.org>
1479 * resolve.c (resolve_allocate_expr): Check for NULL pointer.
1481 2018-01-10 Steven G. Kargl <kargl@gcc.gnu.org>
1484 * resolve.c (resolve_charlen): Check the type of cl->length
1487 2018-01-10 Janne Blomqvist <jb@gcc.gnu.org>
1490 * trans-array.c (gfc_trans_array_ctor_element): Fix formatting.
1492 2018-01-10 Janne Blomqvist <jb@gcc.gnu.org>
1495 * trans-array.c (gfc_trans_array_ctor_element): Convert RHS to the
1496 LHS type when assigning.
1498 2018-01-09 Steven G. Kargl <kargl@gcc.gnu.org>
1501 * expr.c (gfc_is_simply_contiguous): Check for NULL pointer.
1503 2018-01-08 Steven G. Kargl <kargl@gcc.gnu.org>
1505 * match.c (gfc_match_allocate): Check for NULL pointer.
1507 2018-01-08 Steven G. Kargl <kargl@gcc.gnu.org>
1509 * expr.c (gfc_check_pointer_assign): Fix typo in comment.
1511 2018-01-08 Paul Thomas <pault@gcc.gnu.org>
1514 * decl.c (gfc_get_pdt_instance): If parameterized arrays have
1515 an initializer, convert the kind parameters and add to the
1516 component if the instance.
1517 * trans-array.c (structure_alloc_comps): Add 'is_pdt_type' and
1518 use it with case COPY_ALLOC_COMP. Call 'duplicate_allocatable'
1519 for parameterized arrays. Clean up typos in comments. Convert
1520 parameterized array initializers and copy into the array.
1521 * trans-expr.c (gfc_trans_scalar_assign): Do a deep copy for
1522 parameterized types.
1523 *trans-stmt.c (trans_associate_var): Deallocate associate vars
1524 as necessary, when they are PDT function results for example.
1527 * trans-array.c (structure_alloc_comps): Only compare len parms
1528 when they are declared explicitly.
1530 2018-01-06 Janne Blomqvist <jb@gcc.gnu.org>
1533 * trans-expr.c (gfc_trans_pointer_assignment): fold_convert rhs to
1536 2018-01-05 Janne Blomqvist <jb@gcc.gnu.org>
1540 * array.c (got_charlen): Use gfc_charlen_int_kind.
1541 * class.c (gfc_find_derived_vtab): Use gfc_size_kind instead of
1543 (find_intrinsic_vtab): Likewise.
1544 * decl.c (match_char_length): Use gfc_charlen_int_kind.
1545 (add_init_expr_to_sym): Use gfc_charlen_t and gfc_charlen_int_kind.
1546 (gfc_match_implicit): Use gfc_charlen_int_kind.
1547 * dump-parse-tree.c (show_char_const): Use gfc_charlen_t and size_t.
1548 (show_expr): Use HOST_WIDE_INT_PRINT_DEC.
1549 * expr.c (gfc_get_character_expr): Length parameter of type
1551 (gfc_get_int_expr): Value argument of type HOST_WIDE_INT.
1552 (gfc_extract_hwi): New function.
1553 (simplify_const_ref): Make string_len of type gfc_charlen_t.
1554 (gfc_simplify_expr): Use HOST_WIDE_INT for substring refs.
1555 * frontend-passes.c (optimize_trim): Use gfc_charlen_int_kind.
1556 * gfortran.h (gfc_mpz_get_hwi): New prototype.
1557 (gfc_mpz_set_hwi): Likewise.
1558 (gfc_charlen_t): New typedef.
1559 (gfc_expr): Use gfc_charlen_t for character lengths.
1560 (gfc_size_kind): New extern variable.
1561 (gfc_extract_hwi): New prototype.
1562 (gfc_get_character_expr): Use gfc_charlen_t for character length.
1563 (gfc_get_int_expr): Use HOST_WIDE_INT type for value argument.
1564 * gfortran.texi: Update description of hidden string length argument.
1565 * iresolve.c (check_charlen_present): Use gfc_charlen_int_kind.
1566 (gfc_resolve_char_achar): Likewise.
1567 (gfc_resolve_repeat): Pass string length directly without
1568 temporary, use gfc_charlen_int_kind.
1569 (gfc_resolve_transfer): Use gfc_charlen_int_kind.
1570 * match.c (select_intrinsic_set_tmp): Use HOST_WIDE_INT for charlen.
1571 * misc.c (gfc_mpz_get_hwi): New function.
1572 (gfc_mpz_set_hwi): New function.
1573 * module.c (atom_int): Change type from int to HOST_WIDE_INT.
1574 (parse_integer): Don't complain about large integers.
1575 (write_atom): Use HOST_WIDE_INT for integers.
1576 (mio_integer): Handle integer type mismatch.
1577 (mio_hwi): New function.
1578 (mio_intrinsic_op): Use HOST_WIDE_INT.
1579 (mio_array_ref): Likewise.
1580 (mio_expr): Likewise.
1581 * primary.c (match_substring): Use gfc_charlen_int_kind.
1582 * resolve.c (resolve_substring_charlen): Use gfc_charlen_int_kind.
1583 (resolve_character_operator): Likewise.
1584 (resolve_assoc_var): Likewise.
1585 (resolve_select_type): Use HOST_WIDE_INT for charlen, use snprintf.
1586 (resolve_charlen): Use mpz_sgn to determine sign.
1587 * simplify.c (gfc_simplify_repeat): Use HOST_WIDE_INT/gfc_charlen_t
1589 * symbol.c (generate_isocbinding_symbol): Use gfc_charlen_int_kind.
1590 * target-memory.c (size_character): Length argument of type
1592 (gfc_encode_character): Likewise.
1593 (gfc_interpret_character): Use gfc_charlen_t.
1594 * target-memory.h (gfc_encode_character): Modify prototype.
1595 * trans-array.c (gfc_trans_array_ctor_element): Use existing type.
1596 (get_array_ctor_var_strlen): Use gfc_conv_mpz_to_tree_type.
1597 (trans_array_constructor): Use existing type.
1598 (get_array_charlen): Likewise.
1599 * trans-const.c (gfc_conv_mpz_to_tree_type): New function.
1600 * trans-const.h (gfc_conv_mpz_to_tree_type): New prototype.
1601 * trans-decl.c (gfc_trans_deferred_vars): Use existing type.
1602 (add_argument_checking): Likewise.
1603 * trans-expr.c (gfc_class_len_or_zero_get): Build const of type
1604 gfc_charlen_type_node.
1605 (gfc_conv_intrinsic_to_class): Use gfc_charlen_int_kind instead of
1606 4, fold_convert to correct type.
1607 (gfc_conv_class_to_class): Build const of type size_type_node for
1609 (gfc_copy_class_to_class): Likewise.
1610 (gfc_conv_string_length): Use same type in expression.
1611 (gfc_conv_substring): Likewise, use HOST_WIDE_INT for charlen.
1612 (gfc_conv_string_tmp): Make sure len is of the right type.
1613 (gfc_conv_concat_op): Use same type in expression.
1614 (gfc_conv_procedure_call): Likewise.
1615 (fill_with_spaces): Comment out memset() block due to spurious
1616 -Wstringop-overflow warnings.
1617 (gfc_trans_string_copy): Use gfc_charlen_type_node.
1618 (alloc_scalar_allocatable_for_subcomponent_assignment):
1619 fold_convert to right type.
1620 (gfc_trans_subcomponent_assign): Likewise.
1621 (trans_class_vptr_len_assignment): Build const of correct type.
1622 (gfc_trans_pointer_assignment): Likewise.
1623 (alloc_scalar_allocatable_for_assignment): fold_convert to right
1625 (trans_class_assignment): Build const of correct type.
1626 * trans-intrinsic.c (gfc_conv_associated): Likewise.
1627 (gfc_conv_intrinsic_repeat): Do calculation in sizetype.
1628 * trans-io.c (gfc_build_io_library_fndecls): Use
1629 gfc_charlen_type_node for character lengths.
1630 (set_string): Convert to right type in assignment.
1631 * trans-stmt.c (gfc_trans_label_assign): Build const of
1632 gfc_charlen_type_node.
1633 (trans_associate_var): Likewise.
1634 (gfc_trans_character_select): Likewise.
1635 (gfc_trans_allocate): Likewise, don't typecast strlen result.
1636 (gfc_trans_deallocate): Don't typecast strlen result.
1637 * trans-types.c (gfc_size_kind): New variable.
1638 (gfc_init_types): Determine gfc_charlen_int_kind and gfc_size_kind
1639 from size_type_node.
1640 * trans-types.h: Fix comment.
1642 2018-01-04 Thomas Koenig <tkoenig@gcc.gnu.org>
1646 * check.c (gfc_check_eoshift): Check for string length and
1647 for conformance of boundary.
1648 * intrinsic.c (add_functions): Add gfc_simplify_eoshift.
1649 * intrinsic.h: Add prototype for gfc_simplify_eoshift.
1650 * simplify.c (gfc_simplify_eoshift): New function.
1652 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
1653 Alan Hayward <alan.hayward@arm.com>
1654 David Sherwood <david.sherwood@arm.com>
1656 * trans-types.c (gfc_type_for_mode): Handle MODE_VECTOR_BOOL.
1658 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
1659 Alan Hayward <alan.hayward@arm.com>
1660 David Sherwood <david.sherwood@arm.com>
1662 * trans-types.c (gfc_type_for_mode): Check valid_vector_subparts_p.
1664 2018-01-03 Thomas Koenig <tkoenig@gcc.gnu.org>
1667 * check.c (gfc_check_eoshift): Error for missing boundary if array
1668 is not one of the standard types.
1670 2018-01-03 Jakub Jelinek <jakub@redhat.com>
1672 Update copyright years.
1674 * gfortranspec.c (lang_specific_driver): Update copyright notice
1676 * gfc-internals.texi: Bump @copying's copyright year.
1677 * gfortran.texi: Ditto.
1678 * intrinsic.texi: Ditto.
1679 * invoke.texi: Ditto.
1681 2017-01-02 Thomas Koenig <tkoenig@gcc.gnu.org>
1684 * intrinsic.c (add_function): Add gfc_simplify_maxloc and
1685 gfc_simplify_minloc to maxloc and minloc, respectively.
1686 * intrinsic.h: Add prototypes for gfc_simplify_minloc
1687 and gfc_simplify_maxloc.
1688 * simplify.c (min_max_chose): Adjust prototype. Modify function
1689 to have a return value which indicates if the extremum was found.
1690 (is_constant_array_expr): Fix typo in comment.
1691 (simplify_minmaxloc_to_scalar): New function.
1692 (simplify_minmaxloc_nodim): New function.
1693 (new_array): New function.
1694 (simplify_minmaxloc_to_array): New function.
1695 (gfc_simplify_minmaxloc): New function.
1696 (simplify_minloc): New function.
1697 (simplify_maxloc): New function.
1699 2018-01-02 Thomas Koenig <tkoenig@gcc.gnu.org>
1703 * simplify.c (gfc_simplify_cshift): Re-implement to allow full
1706 2018-01-01 Paul Thomas <pault@gcc.gnu.org>
1709 * resolve.c (resolve_fl_derived0): Add caf_token fields for
1710 allocatable and pointer scalars, when -fcoarray selected.
1711 * trans-types.c (gfc_copy_dt_decls_ifequal): Copy the token
1712 field as well as the backend_decl.
1713 (gfc_get_derived_type): Flag GFC_FCOARRAY_LIB for module
1714 derived types that are not vtypes. Components with caf_token
1715 attribute are pvoid types. For a component requiring it, find
1716 the caf_token field and have the component token field point to
1720 *trans-types.c (gfc_get_array_descriptor_base): Add the token
1721 field to the descriptor even when codimen not set.
1723 Copyright (C) 2018 Free Software Foundation, Inc.
1725 Copying and distribution of this file, with or without modification,
1726 are permitted in any medium without royalty provided the copyright
1727 notice and this notice are preserved.