1 2018-10-30 Thomas Koenig <tkoenig@gcc.gnu.org>
4 * simplify.c (simplify_min_max): Do not convert the type of the
7 2017-10-28 Thomas Koenig <tkoenig@gcc.gnu.org>
10 * gfortran.h (gfc_isym_id): Add GFC_ISYM_FINDLOC.
11 (gfc_check_f): Add f6fl field.
12 (gfc_simplify_f): Add f6 field.
13 (gfc_resolve_f): Likewise.
14 (gfc_type_letter): Add optional logical_equas_int flag.
15 * check.c (intrinsic_type_check): New function.
16 (gfc_check_findloc): New function.
17 * intrinsics.c (gfc_type_letter): If logical_equals_int is
19 (add_sym_5ml): Reformat comment.
20 (add_sym_6fl): New function.
21 (add_functions): Add findloc.
22 (check_arglist): Add sixth argument, handle it.
23 (resolve_intrinsic): Likewise.
24 (check_specific): Handle findloc.
25 * intrinsic.h (gfc_check_findloc): Add prototype.
26 (gfc_simplify_findloc): Likewise.
27 (gfc_resolve_findloc): Likewise.
28 (MAX_INTRINSIC_ARGS): Adjust.
29 * iresolve.c (gfc_resolve_findloc): New function.
30 * simplify.c (gfc_simplify_minmaxloc): Make static.
31 (simplify_findloc_to_scalar): New function.
32 (simplify_findloc_nodim): New function.
33 (simplify_findloc_to_array): New function.
34 (gfc_simplify_findloc): New function.
35 (gfc_conv_intrinsic_findloc): New function.
36 (gfc_conv_intrinsic_function): Handle GFC_ISYM_FINDLOC.
37 (gfc_is_intrinsic_libcall): Likewise.
39 2018-10-27 Thomas Koenig <tkoenig@gcc.gnu.org>
42 * frontend-passes.c (check_locus_code): Add information that
43 warning about missing location information points to an
44 inconsisten internal state.
45 (check_locus_expr): Likewise.
47 2018-10-25 Jakub Jelinek <jakub@redhat.com>
50 * openmp.c (gfc_match_omp_clauses): Parse simd, monotonic and
51 nonmonotonic modifiers regardless of if they have been parsed
52 already or if the opposite one has. Fix up check whether
53 comma after modifier should be parsed.
54 (resolve_omp_clauses): Diagnose schedule modifier restrictions.
56 2018-10-23 Paul Thomas <pault@gcc.gnu.org>
59 * frontend-passes.c (get_len_call): New function to generate a
60 call to intrinsic LEN.
61 (create_var): Use this to make length expressions for variable
63 Clean up some white space issues.
65 2018-10-21 Paul Thomas <pault@gcc.gnu.org>
68 * trans-expr.c (gfc_trans_pointer_assignment): Set the string
69 length for array valued deferred length lhs.
71 2018-10-18 Tobias Burnus <burnus@net-b.de>
74 * trans-array.c (gfc_is_reallocatable_lhs): Detect allocatable
77 2018-10-18 Paul Thomas <pault@gcc.gnu.org>
80 * trans-stmt.c (trans_associate_var): All strings that return
81 as pointer types can be assigned directly to the associate
82 name so remove 'attr' and the condition that uses it.
84 2018-10-18 Paul Thomas <pault@gcc.gnu.org>
87 * trans-decl.c (gfc_get_symbol_decl): Deal correctly with the
88 initialization with NULL() of a deferred length pointer.
90 2018-10-17 Tobias Burnus <burnus@net-b.de>
93 * resolve.c (resolve_select_type): Use correct variable.
95 2018-10-17 David Malcolm <dmalcolm@redhat.com>
97 * Make-lang.in (selftest-fortran): New.
99 2018-10-17 Paul Thomas <pault@gcc.gnu.org>
106 * resolve.c (resolve_variable): Fix up expressions with array
107 associate names, where the parser did not detect that this is
108 array and there was no array part_ref in the expression.
110 2018-10-16 Tobias Burnus <burnus@net-b.de>
113 * trans-array.c (gfc_array_init_size, gfc_array_allocate):
114 Rename argument e3_is_array_constr to e3_has_nodescriptor
116 * trans-stmt.c (gfc_trans_allocate): Also fix lower bound
117 to 1 for nonalloc/nonpointer func results/vars besides
120 2018-10-16 Tobias Burnus <burnus@net-b.de>
123 * trans-stmt.c (form_team, change_team, sync_team):
124 Don't ignore argse.pre/argse.post.
126 2018-10-15 Paul Thomas <pault@gcc.gnu.org>
127 Tobias Burnus <burnus@gcc.gnu.org>
130 * resolve.c (resolve_assoc_var): Add missing array spec for
131 class associate names.
132 (resolve_select_type): Handle case where last typed component
133 of the selector has a different type to the expression.
134 * trans-expr.c (gfc_find_and_cut_at_last_class_ref): Replace
135 call to gfc_expr_to_initialize with call to gfc_copy_expr.
136 (gfc_conv_class_to_class): Guard assignment to 'len' field
137 against case where zero constant is supplied.
139 2018-10-12 Tobias Burnus <burnus@net-b.de>
142 * expr.c (gfc_simplify_expr): Avoid simplifying
143 the 'array' argument to lbound/ubound/lcobound/
146 2018-10-12 Tobias Burnus <burnus@net-b.de>
149 * decl.c (get_proc_name): Return with error before
152 2018-10-11 Tobias Burnus <burnus@net-b.de>
155 2018-10-09 Tobias Burnus <burnus@net-b.de>
158 * resolve.c (resolve_ref): Reject nonscalar
159 substring references.
161 2018-10-09 David Malcolm <dmalcolm@redhat.com>
163 * cpp.c (gfc_cpp_init_0): Update for renamings.
164 (cb_cpp_error): Rename to...
165 (cb_cpp_diagnostic): ...this, converting level and reason to
168 2018-10-09 Tobias Burnus <burnus@net-b.de>
171 * resolve.c (resolve_ref): Reject nonscalar
172 substring references.
174 2018-10-09 Paul Thomas <pault@gcc.gnu.org>
177 * trans-array.c (gfc_get_array_span): Deal with deferred char
178 array components having a TYPE_MAX_VALUE of zero.
179 (gfc_array_init_size): Use the hidden string length component
180 to build the descriptor dtype.
181 (gfc_array_allocate): Remove the erroneous replacement of the
182 charlen backend decl with a temporary.
183 (gfc_conv_expr_descriptor): Use the ss_info string length in
184 the case of deferred character components.
185 (gfc_alloc_allocatable_for_assignment): Actually compare the
186 string lengths for deferred characters. Make sure that kind > 1
187 is handled correctly. Set the span field of the descriptor.
188 * trans-intrinsic.c (gfc_conv_intrinsic_len): Remove the stupid
192 * trans-array.c (gfc_array_allocate): Set the span field for
193 variable length character arrays.
195 2018-10-08 Cesar Philippidis <cesar@codesourcery.com>
197 * expr.c (gfc_check_pointer_assign): Demote "Assignment to
198 contiguous pointer from non-contiguous target" to a warning.
200 2018-10-08 Paul Thomas <pault@gcc.gnu.org>
203 * trans-stmt.c (trans_associate_var): Character associate names
204 with variable string length do not have to be deferred length
205 for the string length to be set, if variable.
207 2018-10-06 Thomas Koenig <tkoenig@gcc.gnu.org>
210 * gfortran.h (enum arith): Add ARITH_WRONGCONCAT.
211 * arith.h (gfc_arith_error): Issue error for ARITH_WRONGCONCAT.
212 (gfc_arith_concat): If the types of op1 and op2 are not
213 character of if their kinds do not match, issue ARITH_WRONGCONCAT.
215 2018-10-06 Paul Thomas <pault@gcc.gnu.org>
218 * resolve.c (resolve_fl_procedure): Include class functions in
219 the test that elemental function results be scalar.
221 2018-10-06 Thomas Koenig <tkoenig@gcc.gnu.org>
224 * simplify.c (gfc_simplify_cshift): Extend size of hs_ex and ss_ex
225 by one. Set extents one past the array boundaries to zero to avoid
226 warning with instrumented compiler.
227 (gfc_simplify_eoshift): Likewise, only for ss_ex.
229 2018-10-05 Paul Thomas <pault@gcc.gnu.org>
232 * trans-decl.c (gfc_get_symbol_decl): Make sure that deferred
233 character length pointer initializer has the right type to fix
234 problem with deferred_character_24.f90 on big endian.
236 2018-10-03 Jeff Law <law@redhat.comg>
238 * trans-types.c (get_typenode_from_name): Moved into gcc/tree.c.
240 2018-10-01 Paul Thomas <pault@gcc.gnu.org>
243 * trans-expr.c (gfc_trans_assignment_1): Set the 'identical'
244 flag in the call to gfc_check_dependency.
246 2018-09-30 Paul Thomas <pault@gcc.gnu.org>
249 * trans-array.c (gfc_is_reallocatable_lhs): Correct the problem
250 introduced by r264358, which prevented components of associate
251 names from being reallocated on assignment.
253 2018-09-30 Paul Thomas <pault@gcc.gnu.org>
257 * trans-array.c (gfc_conv_scalarized_array_ref): If this is a
258 deferred type and the info->descriptor is present, use the
260 (gfc_conv_array_ref): Is the se expr is a descriptor type, pass
261 it as 'decl' rather than the symbol backend_decl.
262 (gfc_array_allocate): If the se string_length is a component
263 reference, fix it and use it for the expression string length
264 if the latter is not a variable type. If it is a variable do
265 an assignment. Make use of component ref string lengths to set
266 the descriptor 'span'.
267 (gfc_conv_expr_descriptor): For pointer assignment, do not set
268 the span field if gfc_get_array_span returns zero.
269 * trans.c (get_array_span): If the upper bound a character type
270 is zero, use the descriptor span if available.
272 2018-09-30 Paul Thomas <pault@gcc.gnu.org>
275 * trans-decl.c (gfc_get_symbol_decl): A deferred character
276 length pointer that is initialized needs the string length to
277 be initialized as well.
279 2018-09-29 Paul Thomas <pault@gcc.gnu.org>
282 * trans-expr.c (gfc_trans_assignment_1): If there is dependency
283 fix the rse stringlength.
285 2018-09-25 Martin Liska <mliska@suse.cz>
288 * decl.c (add_hidden_procptr_result): Simplify condition
289 as we are in branch witch 'case1 || case2'.
291 2018-09-25 Martin Liska <mliska@suse.cz>
293 * trans.c (remove_suffix): Remove
296 2018-09-24 Thomas Koenig <tkoenig@gcc.gnu.org>
299 * gfc_conv_procedure_call: Do not add clobber on INTENT(OUT)
300 for variables in an associate statement.
302 2018-09-24 Bernhard Reuther-Fischer <aldot@gcc.gnu.org>
303 Cesar Philippidis <cesar@codesourcery.com>
305 * openmp.c (resolve_oacc_loop_blocks):
307 2018-09-23 Thomas Koenig <tkoenig@gcc.gnu.org>
310 * gfc_conv_procedure_call: Do not add clobber on INTENT(OUT)
311 for variables having the dimension attribute.
313 2018-09-23 Janne Blomqvist <jb@gcc.gnu.org>
315 * trans-expr.c (gfc_caf_get_image_index): Do array index
316 calculations in gfc_array_index_type.
317 * trans-intrinsic.c (conv_intrinsic_event_query): Likewise.
318 * trans-stmt.c (gfc_trans_lock_unlock): Likewise.
319 (gfc_trans_event_post_wait): Likewise.
321 2018-09-23 Thomas Koenig <tkoenig@gcc.gnu.org>
324 * gfc_conv_procedure_call: Reformat comments slightly. Do not add
325 clobber on INTENT(OUT) for saved variables.
327 2018-09-22 Thomas Koenig <tkoenig@gcc.gnu.org>
330 * trans.h (gfc_conv_expr_reference): Add optional argument
331 add_clobber to prototype.
332 (gfc_conv_procedure_call): Set add_clobber argument to
333 gfc_conv_procedure_reference to true for scalar, INTENT(OUT),
334 non-pointer, non-allocatable, non-dummy variables whose type
335 is neither BT_CHARACTER, BT_DERIVED or BT_CLASS, but only if
336 the procedure is not elemental.
337 * trans-expr.c (gfc_conv_procedure_reference): Add clobber
338 statement before call if add_clobber is set.
340 2018-09-22 Paul Thomas <pault@gcc.gnu.org>
343 * trans-array.c (gfc_alloc_allocatable_for_assignment): Test
344 the charlen backend_decl before using the VAR_P macro.
346 2018-09-21 Paul Thomas <pault@gcc.gnu.org>
349 * trans-array.c (gfc_alloc_allocatable_for_assignment): If the
350 rhs has a charlen expression, convert that and use it.
351 * trans-expr.c (gfc_trans_assignment_1): The rse.pre for the
352 assignment of deferred character array vars to a realocatable
353 lhs should not be added to the exterior block since vector
354 indices, for example, generate temporaries indexed within the
357 2018-09-21 Paul Thomas <pault@gcc.gnu.org>
360 * trans-stmt.c (gfc_trans_allocate): Don't deallocate alloc
361 components if must_finalize is set for expr3.
363 2018-09-21 Andrew Stubbs <ams@codesourcery.com>
364 Kwok Cheung Yeung <kcy@codesourcery.com>
366 * trans-expr.c (gfc_trans_structure_assign): Ensure that the first
367 argument of a call to _gfortran_caf_register is of size_type_node.
368 * trans-intrinsic.c (conv_intrinsic_event_query): Convert computed
369 index to a size_type_node type.
370 * trans-stmt.c (gfc_trans_event_post_wait): Likewise.
372 2018-09-20 Allan Sandfeld Jensen <allan.jensen@qt.io>
374 * gfortranspec.c (lang_specific_driver): Handle -r like -nostdlib.
376 2018-09-20 Janus Weil <janus@gcc.gnu.org>
378 * gfortran.h (gfc_str_startswith): New macro.
379 * decl.c (variable_decl, gfc_match_end): Use it.
380 * iresolve.c (is_trig_resolved): Ditto.
381 * module.c (load_omp_udrs, read_module): Ditto.
382 * options.c (gfc_handle_runtime_check_option): Ditto.
383 * primary.c (match_arg_list_function): Ditto.
384 * trans-decl.c (gfc_get_symbol_decl): Ditto.
385 * trans-expr.c (gfc_conv_procedure_call): Ditto.
386 * interface.c (dtio_op): Replace strncmp by strcmp.
387 * resolve.c (resolve_actual_arglist, resolve_function): Ditto.
388 * trans-expr.c (conv_arglist_function): Ditto.
389 * trans-intrinsic.c (gfc_conv_ieee_arithmetic_function): Replace macro
390 STARTS_WITH by gfc_str_startswith.
392 2018-09-20 Cesar Philippidis <cesar@codesourcery.com>
394 * dump-parse-tree.c (show_omp_clauses): Add missing omp list_types
395 and reorder the switch cases to match the enum in gfortran.h.
397 2018-09-19 Paul Thomas <pault@gcc.gnu.org>
400 * trans-expr.c (gfc_trans_assignment_1): The rse.pre for the
401 assignment of deferred character intrinsic elemental function
402 results to a realocatable lhs must not be added to the exterior
403 block if they are array valued but must go to the loop body.
405 2018-09-18 Thomas Koenig <tkoenig@gcc.gnu.org>
408 * gfortran.h (gfc_expr): Add external_blas flag.
409 * frontend-passes.c (matrix_case): Add case A2TB2T.
410 (optimize_namespace): Handle flag_external_blas by
411 calling call_external_blas.
412 (get_array_inq_function): Add argument okind. If
413 it is nonzero, use it as the kind of argument
415 (inline_limit_check): Remove m_case argument, add
416 limit argument instead. Remove assert about m_case.
417 Set the limit for inlining from the limit argument.
418 (matmul_lhs_realloc): Handle case A2TB2T.
419 (inline_matmul_assign): Handle inline limit for other cases with
420 two rank-two matrices. Remove no-op calls to inline_limit_check.
421 (call_external_blas): New function.
422 * trans-intrinsic.c (gfc_conv_intrinsic_funcall): Do not add
423 argument to external BLAS if external_blas is already set.
425 2018-09-18 Paul Thomas <pault@gcc.gnu.org>
428 * trans-expr.c (gfc_trans_assignment_1): The rse.pre for the
429 assignment of deferred character elemental function results to
430 a realocatable lhs must not be added to the exterior block but
431 must go to the loop body.
433 2018-09-18 Paul Thomas <pault@gcc.gnu.org>
436 * trans-array.c (gfc_get_array_span): Try to get the element
437 length of incomplete types. Return NULL_TREE otherwise.
438 (gfc_conv_expr_descriptor): Only set the 'span' field if the
439 above does not return NULL_TREE. Set 'span' field if possible
440 for all new descriptors.
442 2018-09-17 Paul Thomas <pault@gcc.gnu.org>
445 * trans-decl.c (gfc_get_symbol_decl): Flag allocatable, scalar
446 characters with a variable length expression for deferred init.
447 (gfc_trans_deferred_vars): Perform the assignment for these
448 symbols by calling gfc_conv_string_length.
450 2018-09-17 Paul Thomas <pault@gcc.gnu.org>
453 * resolve.c (resolve_assoc_var): If the target expression is a
454 deferred charlen dummy and the associate name shares the
455 charlen, generate a new one. Make sure that new charlens are in
456 the namespace list so that they get cleaned up.
457 * trans-array.c (gfc_is_reallocatable_lhs): Associate names are
459 * trans-decl.c (gfc_get_symbol_decl): Put deferred character
460 length dummy and result arrays on the deferred initialization
461 list so that the variable length arrays can be correctly dealt
463 * trans-expr.c (gfc_conv_string_length): Return if 'expr' is
464 NULL rather than ICEing..
466 2018-09-16 Janus Weil <janus@gcc.gnu.org>
470 * match.c (gfc_match_assignment): For a polymorphic assignment,
471 make sure that the vtab for the rhs type is generated.
473 2018-09-16 Thomas Koenig <tkoenig@gcc.gnu.org>
476 * frontend-passes.c (B_ERROR): New macro for matmul bounds
477 checking error messages.
479 (inline_matmul_assign): Reorganize bounds checking, use B_ERROR
482 2018-09-13 Bernd Edlinger <bernd.edlinger@hotmail.de>
484 * trans-array.c (gfc_conv_array_initializer): Remove excess precision
485 from overlength string initializers.
487 2018-09-12 Paul Thomas <pault@gcc.gnu.org>
490 * trans-expr.c (gfc_trans_class_init_assign): Access to
491 to array elements of the dynamic type requires that the array
492 reference be added to the class expression and not the _data
493 component, unlike scalar expressions.
495 2018-09-11 Janus Weil <janus@gcc.gnu.org>
498 * resolve.c (resolve_fl_derived): If a type has the 'use_assoc'
499 attribute, then it was declared in another module, so there should be
500 no error that it has not been declared.
502 2018-09-11 Paul Thomas <pault@gcc.gnu.org>
505 * expr.c (is_subref_array): Add the check of dimensionality for
506 class, dummy, pointer arrays.
508 2018-09-11 Janus Weil <janus@gcc.gnu.org>
511 * expr.c (gfc_is_simply_contiguous): Handle type-bound procedure calls
512 with non-polymorphic objects.
514 2018-09-10 Janus Weil <janus@gcc.gnu.org>
517 * decl.c (match_binding_attributes): Use correct default accessibility
518 for procedure pointer components.
520 2018-09-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
522 * simplify.c (gfc_simplify_modulo): Re-arrange code to test whether
523 'P' is zero and issue an error if it is.
525 2018-08-31 Paul Thomas <pault@gcc.gnu.org>
529 * trans-array.c (gfc_conv_scalarized_array_ref): Do not fix
530 info->descriptor but pass it directly to gfc_build_array_ref.
531 (gfc_conv_array_ref): Likewise for se->expr.
532 * trans.c (gfc_build_array_ref): If 'decl' is a COMPONENT_REF
533 obtain the span field directly from it.
535 2017-08-28 Paul Thomas <pault@gcc.gnu.org>
538 * trans-expr.c (gfc_conv_procedure_call): Allocatable class
539 scalar results being passed to a derived type formal argument
540 are finalized if possible. Otherwise, rely on existing code for
541 deallocation. Make the deallocation of allocatable result
542 components conditional on finalization not taking place. Make
543 the freeing of data components after finalization conditional
544 on the data being NULL.
545 (gfc_trans_arrayfunc_assign): Change the gcc_assert to a
546 condition to return NULL_TREE.
547 (gfc_trans_assignment_1): If the assignment is class to class
548 and the rhs expression must be finalized but the assignment
549 is not marked as a polymorphic assignment, use the vptr copy
550 function instead of gfc_trans_scalar_assign.
553 * trans-expr.c (gfc_conv_expr_reference): Do not add the post
554 block to the pre block if the expression is to be finalized.
555 * trans-stmt.c (gfc_trans_allocate): If the expr3 must be
556 finalized, load the post block into a finalization block and
557 add it right at the end of the allocation block.
559 2018-08-27 David Malcolm <dmalcolm@redhat.com>
562 * error.c (gfc_format_decoder): Update for conversion of
563 show_caret_p to a tri-state.
565 2018-08-25 Janus Weil <janus@gcc.gnu.org>
568 * resolve.c (resolve_transfer): Correctly determine typespec for
569 generic function calls, in order to throw a proper error.
571 2018-08-24 Thomas Koenig <tkoenig@gcc.gnu.org>
574 * frontend-passes.c (var_in_expr_callback): New function.
575 (var_in_expr): New function.
576 (traverse_io_block): Use var_in_expr instead of
577 gfc_check_dependency for checking if the variable depends on the
580 2018-08-23 Janne Blomqvist <blomqvist.janne@gmail.com>
582 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxval): Delete
583 HONOR_SIGNED_ZEROS checks.
585 2018-08-23 Paul Thomas <pault@gcc.gnu.org>
588 * resolve.c (resolve_typebound_call): If the TBP is not marked
589 as a subroutine, check the specific symbol.
591 2018-08-22 Thomas Koenig <tkoenig@gcc.gnu.org>
593 * gfortran.texi: Mention that asynchronous I/O does
594 not work on systems which lack condition variables, such
597 2018-08-22 Janus Weil <janus@gcc.gnu.org>
600 * match.c (gfc_match_associate): Improve diagnostics for the ASSOCIATE
603 2018-08-22 Andrew Benson <abensonca@gmail.com>
605 * module.c (load_generic_interfaces): Move call to find_symbol()
606 so that only occurs if actually needed.
608 2018-08-22 Janus Weil <janus@gcc.gnu.org>
611 * decl.c (gfc_match_data_decl): Allow allocatable components of
612 indirectly recursive type.
613 * resolve.c (resolve_component): Remove two errors messages ...
614 (resolve_fl_derived): ... and replace them by a new one.
616 2018-08-21 Janne Blomqvist <jb@gcc.gnu.org>
618 * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Use
619 MAX_EXPR/MIN_EXPR unconditionally for real arguments.
620 * gfortran.texi (Compiler Characteristics): Document MAX/MIN
623 2018-08-21 Nicolas Koenig <koenigni@gcc.gnu.org>
624 Thomas Koenig <tkoenig@gcc.gnu.org>
627 * gfortran.texi: Add description of asynchronous I/O.
628 * trans-decl.c (gfc_finish_var_decl): Treat asynchronous variables
630 * trans-io.c (gfc_build_io_library_fndecls): Rename st_wait to
631 st_wait_async and change argument spec from ".X" to ".w".
632 (gfc_trans_wait): Pass ID argument via reference.
634 2018-08-16 Nathan Sidwell <nathan@acm.org>
636 * cpp.c (dump_macro): Use cpp_user_macro_p.
638 2018-08-14 Janus Weil <janus@gcc.gnu.org>
641 * interface.c (compare_type): Remove a CLASS/TYPE check.
642 (compare_type_characteristics): New function that behaves like the old
644 (gfc_check_dummy_characteristics, gfc_check_result_characteristics):
645 Call 'compare_type_characteristics' instead of 'compare_type'.
647 2018-08-12 Paul Thomas <pault@gcc.gnu.org>
650 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Class array
651 elements are returned as references to the data element. Get
652 the class expression by stripping back the references. Use this
653 for the element size.
655 2018-08-12 Paul Thomas <pault@gcc.gnu.org>
658 * resolve.c (resolve_fl_variable_derived): Check if the derived
659 type is use associated before checking for the host association
662 2018-08-10 Janus Weil <janus@gcc.gnu.org>
665 * invoke.texi (frontend-optimize): Mention short-circuiting.
666 * options.c (gfc_post_options): Disable -ffrontend-optimize with -Og.
667 * resolve.c (resolve_operator): Warn about short-circuiting only with
669 * trans-expr.c (gfc_conv_expr_op): Use short-circuiting operators only
670 with -ffrontend-optimize. Without that flag, make sure that both
671 operands are evaluated.
673 2018-08-08 Nathan Sidwell <nathan@acm.org>
675 * cpp.c (cb_file_change): Use linemap_included_from.
677 2018-08-07 Cesar Philippidis <cesar@codesourcery.com>
679 * trans-stmt.h: Remove stale reference to trans-openacc.c.
681 2018-08-04 Janus Weil <janus@gcc.gnu.org>
684 * interface.c (gfc_compare_interfaces): Apply additional
685 distinguishability criteria of F08 to operator interfaces.
687 2018-07-31 Andre Vieira <andre.simoesdiasvieira@arm.com>
689 Revert 'AsyncI/O patch committed'
690 2018-07-25 Nicolas Koenig <koenigni@gcc.gnu.org>
691 Thomas Koenig <tkoenig@gcc.gnu.org>
694 * gfortran.texi: Add description of asynchronous I/O.
695 * trans-decl.c (gfc_finish_var_decl): Treat asynchronous variables
697 * trans-io.c (gfc_build_io_library_fndecls): Rename st_wait to
698 st_wait_async and change argument spec from ".X" to ".w".
699 (gfc_trans_wait): Pass ID argument via reference.
701 2018-07-25 Nicolas Koenig <koenigni@gcc.gnu.org>
702 Thomas Koenig <tkoenig@gcc.gnu.org>
705 * gfortran.texi: Add description of asynchronous I/O.
706 * trans-decl.c (gfc_finish_var_decl): Treat asynchronous variables
708 * trans-io.c (gfc_build_io_library_fndecls): Rename st_wait to
709 st_wait_async and change argument spec from ".X" to ".w".
710 (gfc_trans_wait): Pass ID argument via reference.
712 2018-07-20 Martin Sebor <msebor@redhat.com>
715 * gfortran.h (gfc_handle_option): Change function argument
717 * options.c (gfc_handle_option): Same.
719 2018-07-20 Andrew Benson <abenson@carnegiescience.edu>
721 * gfortran.h (gfc_symbol): Add pointer to next derived type.
722 (gfc_dt_list, gfc_get_dt_list): Remove.
723 (gfc_namespace): Replace gfc_dt_list with gfc_symbol.
724 * parse.c (resolve_all_program_units): Replace gfc_free_dt_list() with
725 simple nullification of gfc_derived_types.
726 * resolve.c (resolve_global_procedure): Replace gfc_dt_list with
728 (add_dt_to_dt_list): Change derived type linked list insertion to
729 utilize dt_next pointers in gfc_symbol.
730 * symbol.c (gfc_new_symbol, gfc_free_dt_list, gfc_symbol_done2)
731 (get_iso_c_binding_dt, generate_isocbinding_symbol): Remove
732 gfc_free_dt_list as gfc_dt_list is obsoleted. Change derived type
733 linked list search/insertion to utilize dt_next pointers in gfc_symbol.
734 * trans-types.c (gfc_get_derived_type): Change derived type linked
735 list search to utilize dt_next pointers in gfc_symbol.
737 2018-07-19 Kyrylo Tkachov <kyrylo.tkachov@arm.com>
739 * trans-intrinsic.c: (gfc_conv_intrinsic_minmax): Emit MIN_MAX_EXPR
740 or IFN_FMIN/FMAX sequence to calculate the min/max when possible.
742 2018-07-18 Janus Weil <janus@gcc.gnu.org>
743 Thomas Koenig <tkoenig@gcc.gnu.org>
746 * dump-parse-tree.c (show_attr): Add handling of implicit_pure.
747 * frontend-passes.c (do_warn_function_elimination): Do not warn for
749 * gfortran.h: Add prototypes for gfc_pure_function and
750 gfc_implicit_pure_function.
751 * gfortran.texi: Add chapter on evaluation of logical expressions.
752 * invoke.texi: Mention that -Wfunction-elimination is implied
754 * lang.opt: Make -Wextra imply -Wfunction-elimination.
755 * resolve.c (pure_function): Rename to gfc_pure_function.
756 (gfc_implicit_pure_function): New function.
757 (check_pure_function): Use it here.
758 (impure_function_callback): New function.
759 (resolve_operator): Call it via gfc_expr_walker.
761 2018-07-16 Fritz Reese <fritzoreese@gmail.com>
764 * decl.c (match_old_style_init): Initialize locus of variable expr when
765 creating a data variable.
766 (match_clist_expr): Verify array is explicit shape/size before
767 attempting to allocate constant array constructor.
769 2018-07-16 Fritz Reese <fritzoreese@gmail.com>
772 * module.c (mio_component): Set component->loc when loading from module.
774 2018-07-10 Jakub Jelinek <jakub@redhat.com>
777 * module.c (omp_declare_simd_clauses): Add LINEAR with _REF, _VAL and
779 (mio_omp_declare_simd): Save and restore ref, val and uval modifiers
780 on linear clauses. Initialize n->where to gfc_current_locus.
782 2018-07-05 Paul Thomas <pault@gcc.gnu.org>
785 * resolve.c.c (resolve_contained_fntype): Reference to C418 is
786 in F2008 and not F2003.
787 (resolve_function): Ditto in error message. Also, exclude
788 deferred character length results from the error.
790 2018-07-05 Fritz Reese <fritzoreese@gmail.com>
794 * expr.c (class_allocatable, class_pointer, comp_allocatable,
795 comp_pointer): New helpers.
796 (component_initializer): Generate EXPR_NULL for allocatable or pointer
797 components. Do not generate initializers for components within BT_CLASS.
798 Do not assign to comp->initializer.
799 (gfc_generate_initializer): Use new helpers; move code to generate
800 EXPR_NULL for class allocatable components into component_initializer().
802 2018-07-04 Jerry DeLisle <jvdelisle@gcc.gnu.org>
805 * trans-decl.c (gfc_process_block_locals): Delete assert and set
806 saved_local_decls = NULL_TREE.
808 2018-07-02 Richard Biener <rguenther@suse.de>
811 * trans-types.c (gfc_get_array_type_bounds): Unshare TYPE_FIELDs
812 for the distinct type copy.
814 2018-07-02 Paul Thomas <pault@gcc.gnu.org>
818 * trans-array.c (structure_alloc_comps): Do not explicitly copy
819 procedure pointer components.
821 2018-07-02 Paul Thomas <pault@gcc.gnu.org>
824 * expr.c : Add a prototype for scalarize_intrinsic_call.
825 (gfc_simplify_expr): Use scalarize_intrinsic_call for elemental
826 intrinsic function calls.
827 (scalarize_intrinsic_call): Add 'init_flag' argument. Check if
828 the expression or any of the actual argument expressions are
829 NULL. Before calling gfc_check_init_expr, check 'init_flag'.
830 Only simplify the scalarized expressions if there are no errors
832 (gfc_check_init_expr): Set 'init_flag' true in the call to
833 scalarize_intrinsic_call.
835 2018-06-28 Fritz Reese <fritzoreese@gmail.com>
838 * decl.c (gfc_match_type): Refactor and check for PDT declarations.
840 2018-06-28 Martin Liska <mliska@suse.cz>
842 * gfortranspec.c: Include opt-suggestions.h.
844 2018-06-25 Fritz Reese <fritzoreese@gmail.com>
849 * expr.c (component_initializer): Assign init expr to c->initializer.
850 (generate_isocbinding_initializer): New.
851 (gfc_generate_initializer): Call generate_isocbinding_initializer to
852 generate initializers for c_ptr and c_funptr with -finit-derived.
854 2018-06-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
857 * interface.c (check_dtio_interface1): Delete assert.
859 2018-06-22 Paul Thomas <pault@gcc.gnu.org>
860 Rainer Orth <ro@gcc.gnu.org>
863 * resolve.c (resolve_contained_fntype): Check for the charlen
864 before testing the length.
866 2018-06-21 Paul Thomas <pault@gcc.gnu.org>
869 * resolve.c (resolve_contained_fntype): Change standard ref.
870 from F95 to F2003: C418. Correct a spelling error in a comment.
871 It is an error for an abstract interface to have an assumed
872 character length result.
873 * trans-expr.c (gfc_conv_procedure_call): Likewise change the
876 2018-06-21 Paul Thomas <pault@gcc.gnu.org>
879 * resolve.c (resolve_ordinary_assign): Force the creation of a
880 vtable for assignment of non-polymorphic expressions to an
881 unlimited polymorphic object.
882 * trans-array.c (gfc_alloc_allocatable_for_assignment): Use the
883 size of the rhs type for such assignments. Set the dtype, _len
884 and vptrs appropriately.
885 * trans-expr.c (gfc_trans_assignment): Force the use of the
886 _copy function for these assignments.
888 2018-06-20 Chung-Lin Tang <cltang@codesourcery.com>
889 Thomas Schwinge <thomas@codesourcery.com>
890 Cesar Philippidis <cesar@codesourcery.com>
892 * gfortran.h (gfc_omp_clauses): Add unsigned if_present, finalize
894 * openmp.c (enum omp_mask2): Remove OMP_CLAUSE_PRESENT_OR_*. Add
895 OMP_CLAUSE_{IF_PRESENT,FINALIZE}.
896 (gfc_match_omp_clauses): Update handling of copy, copyin, copyout,
897 create, deviceptr, present_of_*. Add support for finalize and
899 (OACC_PARALLEL_CLAUSES): Remove PRESENT_OR_* clauses.
900 (OACC_KERNELS_CLAUSES): Likewise.
901 (OACC_DATA_CLAUSES): Likewise.
902 (OACC_DECLARE_CLAUSES): Likewise.
903 (OACC_UPDATE_CLAUSES): Add IF_PRESENT clause.
904 (OACC_ENTER_DATA_CLAUSES): Remove PRESENT_OR_* clauses.
905 (OACC_EXIT_DATA_CLAUSES): Add FINALIZE clause.
906 (gfc_match_oacc_declare): Update to OpenACC 2.5 semantics.
907 * trans-openmp.c (gfc_trans_omp_clauses): Add support for IF_PRESENT
910 2018-06-18 Eric Botcazou <ebotcazou@adacore.com>
912 * trans-decl.c (gfc_get_fake_result_decl): Revert latest change.
914 2018-06-17 Eric Botcazou <ebotcazou@adacore.com>
916 * trans-decl.c (nonlocal_dummy_decl_pset): Delete.
917 (nonlocal_dummy_decls): Likewise.
918 (gfc_nonlocal_dummy_array_decl): Likewise.
919 (gfc_get_symbol_decl): Do not call gfc_nonlocal_dummy_array_decl.
920 (gfc_get_fake_result_decl): Do not generate a new DECL if simply
921 reusing the result of a recursive call.
922 (gfc_generate_function_code): Do not create, insert and destroy
923 nonlocal_dummy_decls.
925 2018-06-13 Steven G. Kargl <kargl@gcc.gnu.org>
928 * array.c (gfc_resolve_character_array_constructor): Avoid NULL
931 2018-06-13 Cesar Philippidis <cesar@codesourcery.com>
934 * parse.c (decode_oacc_directive): Set gfc_matching_function
936 (decode_omp_directive): Likewise.
938 2018-06-13 Cesar Philippidis <cesar@codesourcery.com>
941 * openmp.c (gfc_match_oacc_wait): Use %C to report error location.
943 2018-06-12 David Malcolm <dmalcolm@redhat.com>
946 * misc.c (gfc_closest_fuzzy_match): Update for renaming of
947 levenshtein_distance to get_edit_distance.
949 2018-06-12 Steven G. Kargl <kargl@gcc.gnu.org>
952 * expr.c (gfc_check_assign): Select non-NULL locus.
954 2018-06-11 Janus Weil <janus@gcc.gnu.org>
957 * interface.c (compare_ptr_alloc): New function.
958 (generic_correspondence): Call it.
960 2018-06-10 Thomas Koenig <tkoenig@gcc.gnu.org>
962 * gfortran.h (gfc_expr): Add no_bounds_check field.
963 * frontend-passes.c (get_array_inq_function): Set no_bounds_check
964 on function and function argument.
965 (inline_matmul_assign): Set no_bounds_check on zero expression
966 and on lhs of zero expression.
967 Also handle A1B2 case if realloc on assigment is active.
968 * trans-array.c (gfc_conv_array_ref): Don't do range checking
969 if expr has no_bounds_check set.
970 (gfc_conv_expr_descriptor): Set no_bounds_check on ss if expr
972 * trans-expr.c (gfc_trans_assignment_1): Set no_bounds_check
973 on lss and lss if the corresponding expressions have it set.
975 2018-06-10 Dominique d'Humieres <dominiq@gcc.gnu.org>
978 * trans-const.c: Remove include "diagnostic-core.h".
979 (gfc_conv_constant_to_tree): Replace fatal_error with gcc_unreachable.
981 2018-06-10 Janus Weil <janus@gcc.gnu.org>
984 * decl.c (match_attr_spec): Synchronize the DECL_* enum values with the
985 INTENT_* values from the enum 'sym_intent'. Call 'match_intent_spec'
986 and remove a TODO note.
987 * gfortran.h: Add a comment to sym_intent.
989 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
992 * resolve.c (resolve_operator): Provide better error message for
993 derived type entity used in an binary intrinsic numeric operator.
995 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
1000 * decl.c (gfc_match_char_spec): Use private namespace in attempt to
1001 reduce a charlen to a constant.
1003 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
1006 * data.c (gfc_assign_data_value): Re-arrange code to allow for
1007 an error for double initialization of CHARACTER entities.
1009 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
1012 * symbol.c (gfc_add_volatile): Enforce F2008:C1282 and F2018:C1588.
1014 2018-06-08 Thomas Koenig <tkoenig@gcc.gnu.org>
1017 * trans.h (gfc_ss): Add field no_bounds_check.
1018 * trans-array.c (gfc_conv_ss_startstride): If flag_realloc_lhs and
1019 ss->no_bounds_check is set, do not use runtime checks.
1020 * trans-expr.c (gfc_trans_assignment_1): Set lss->no_bounds_check
1021 for reallocatable lhs.
1023 2018-06-08 Steven G. Kargl <kargl@gcc.gnu.org>
1026 * array.c (match_array_cons_element): NULL() cannot be in an
1029 2018-06-08 Steven G. Kargl <kargl@gcc.gnu.org>
1032 * data.c (create_character_initializer): Return early if type is
1033 incompatible with CHARACTER.
1035 2018-06-07 Steven G. Kargl <kargl@gcc.gnu.org>
1038 * simplify.c (gfc_simplify_mod): Re-arrange code to test whether
1039 'P' is zero and issue an error if it is.
1041 2018-06-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1044 * frontend-passes.c (is_fe_temp): Add prototype.
1045 (realloc_string_callback): Early return for frontend-generated
1048 2018-06-05 Cesar Philippidis <cesar@codesourcery.com>
1052 * openmp.c (gfc_resolve_oacc_declare): Error on functions and
1053 subroutine data clause arguments.
1055 2018-06-04 Steven G. Kargl <kargl@gcc.gnu.org>
1058 * resolve.c (resolve_allocate_deallocate): Check errmsg is default
1061 2018-06-03 Paul Thomas <pault@gcc.gnu.org>
1064 * decl.c (variable_decl): Use gfc_add_type for cray pointees.
1066 2018-06-01 Steven G. Kargl <kargl@gcc.gnu.org>
1069 * check.c (gfc_check_random_init): New function. Check arguments of
1071 * gfortran.h (GFC_ISYM_RANDOM_INIT): New enum token.
1072 * intrinsic.c (add_subroutines): Add RANDOM_INIT to list of
1074 (gfc_check_intrinsic_standard): Introduce Fortran 2018 check.
1075 * intrinsic.h: Add prototypes for gfc_check_random_init and
1076 gfc_resolve_random_init
1077 * intrinsic.texi: Document new intrinsic subprogram.
1078 * iresolve.c (gfc_resolve_random_init): Resolve routine name.
1079 * trans-decl.c: Declare gfor_fndecl_random_init
1080 * trans-intrinsic.c (conv_intrinsic_random_init): New function.
1081 Translate call to RANDOM_INIT.
1082 (gfc_conv_intrinsic_subroutine): Call it.
1083 * trans.h: Declare gfor_fndecl_random_init
1085 2018-05-27 Steven G. Kargl <kargl@gcc.gnu.org>
1087 * decl.c (match_data_constant): Fortran 2018 allows pointer
1088 initialization in a data statement.
1090 2018-05-25 Janus Weil <janus@gcc.gnu.org>
1093 * match.c (gfc_match_block_data): Call gfc_notify_std to warn about
1094 an obsolescent feature in Fortran 2018.
1095 (gfc_match_equivalence): Ditto.
1096 * resolve.c (resolve_common_blocks): Ditto.
1097 (gfc_resolve_forall): Ditto.
1098 * symbol.c (gfc_define_st_label): Ditto.
1100 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
1103 * resolve.c (update_current_proc_array_outer_dependency): Avoid NULL
1104 pointer dereference.
1106 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
1109 * resolve.c (resolve_fl_procedure): Avoid NULL dereference.
1111 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
1114 * decl.c (gfc_match_derived_decl): Fix NULL point dereference.
1116 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
1119 * resolve.c (resolve_sync): Resolve expression before checking for
1122 2018-05-22 Janus Weil <janus@gcc.gnu.org>
1125 * libgfortran.h: Remove the macros GFC_STD_F2008_TS and
1127 * error.c (notify_std_msg): Remove GFC_STD_F2008_TS.
1128 * options.c (set_default_std_flags): Ditto.
1129 (gfc_handle_option): Make -std=f2008ts an alias for -std=f2018.
1130 * array.c (gfc_match_array_spec): Replace GFC_STD_F2008_TS by
1132 * check.c (gfc_check_atomic, gfc_check_event_query,
1133 gfc_check_c_f_pointer, gfc_check_c_f_procpointer, gfc_check_c_funloc,
1134 gfc_check_c_loc, gfc_check_num_images, gfc_check_this_image): Ditto.
1135 * decl.c (gfc_verify_c_interop_param, gfc_match_decl_type_spec): Ditto.
1136 * intrinsic.c (add_functions, add_subroutines,
1137 gfc_check_intrinsic_standard): Ditto.
1138 * iso-c-binding.def: Ditto.
1139 * iso-fortran-env.def: Ditto.
1140 * match.c (gfc_match_event_post, gfc_match_event_wait,
1141 gfc_match_fail_image, gfc_match_form_team, gfc_match_change_team,
1142 gfc_match_end_team, gfc_match_sync_team): Ditto.
1143 * gfortran.texi: Remove mention of -std=f2008ts.
1144 Move TSs into F2018 section.
1145 * invoke.texi: Update documentation of -std=f2008ts.
1147 2018-05-21 Janus Weil <janus@gcc.gnu.org>
1150 * libgfortran.h: New macros GFC_STD_OPT_*.
1151 * error.c (notify_std_msg): New function.
1152 (gfc_notify_std): Adjust such that it can handle combinations of
1153 GFC_STD_* flags in the 'std' argument, not just a single one.
1154 * match.c (match_arithmetic_if, gfc_match_if): Reject arithmetic if
1156 (gfc_match_stopcode): Use GFC_STD_OPT_* macros.
1157 * options.c (set_default_std_flags): Warn for F2018 deleted features
1159 (gfc_handle_option): F2018 deleted features are allowed in earlier
1161 * symbol.c (gfc_define_st_label, gfc_reference_st_label): Reject
1162 nonblock do constructs in Fortran 2018.
1164 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
1167 * resolve.c (flag_fn_result_spec): Use the 'sym' argument to
1168 test for self refs to the function result in the character len
1169 expression. If a self reference is found, emit an error and
1171 (resolve_fntype): Use the function symbol in the calls to the
1174 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
1177 * trans-array.c (gfc_get_array_span): Renamed from
1179 (gfc_conv_expr_descriptor): Change references to above.
1180 * trans-array.h : Add prototype for 'gfc_get_array_span'.
1181 * trans-intrinsic.c (gfc_conv_associated): Add pre and post
1183 * trans-stmt.c (trans_associate_var): If the associate name is
1184 a subref array pointer, use gfc_get_array_span for the span.
1186 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
1189 * match.c (gfc_match_type_spec): Go through the array ref and
1190 decrement 'rank' for every dimension that is an element.
1192 2018-05-19 Paul Thomas <pault@gcc.gnu.org>
1197 * trans-array.c (gfc_alloc_allocatable_for_assignment): Set the
1198 charlen backend_decl of the rhs expr to ss->info->string_length
1199 so that the value in the current scope is used.
1201 2018-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
1204 * gfortran.texi: Clarify documentation for Cray pointer and
1205 assumed-sized array.
1207 2018-05-13 Paul Thomas <pault@gcc.gnu.org>
1210 * trans-types.c (gfc_get_dtype_rank_type): Reorder evaluation
1211 of 'size'. If the element type is a pointer use the size of the
1212 TREE_TYPE of the type, unless it is VOID_TYPE. In this latter
1213 case, set the size to zero.
1215 2018-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
1217 * gfortran.h: Remove prototype.
1218 * symbol.c (gfc_new_undo_checkpoint): Remove unused function.
1220 2018-05-11 Steven G. Kargl <kargl@gcc.gnu.org>
1223 * expr.c (check_inquiry): Avoid NULL pointer dereference.
1225 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
1228 * check.c (gfc_check_rank): Check that the argument is a data object.
1230 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
1233 * array.c (gfc_resolve_character_array_constructor): Substrings
1234 with upper bound smaller than lower bound are zero length strings.
1236 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
1239 * data.c (gfc_assign_data_value): Check that a data object does
1240 not also have default initialization.
1242 2018-05-10 Marek Polacek <polacek@redhat.com>
1245 * options.c (gfc_post_options): Set main_input_filename.
1247 2018-05-10 Thomas Koenig <tkoenig@gcc.gnu.org>
1250 * intrinsic.texi: Document BACK for MINLOC and MAXLOC.
1252 2018-05-10 Paul Thomas <pault@gcc.gnu.org>
1256 * resolve.c (get_temp_from_expr): The temporary must not have
1257 dummy or intent attributes.
1259 2018-05-08 Thomas Koenig <tkoenig@gcc.gnu.org>
1262 * check.c (gfc_check_minmaxloc): Remove error for BACK not being
1263 implemented. Use gfc_logical_4_kind for BACK.
1264 * simplify.c (min_max_choose): Add optional argument back_val.
1266 (simplify_minmaxloc_to_scalar): Add argument back_val. Pass
1267 back_val to min_max_choose.
1268 (simplify_minmaxloc_to_nodim): Likewise.
1269 (simplify_minmaxloc_to_array): Likewise.
1270 (gfc_simplify_minmaxloc): Add argument back, handle it.
1271 Pass back_val to specific simplification functions.
1272 (gfc_simplify_minloc): Remove ATTRIBUTE_UNUSED from argument back,
1273 pass it on to gfc_simplify_minmaxloc.
1274 (gfc_simplify_maxloc): Likewise.
1275 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Adjust
1276 comment. If BACK is true, use greater or equal (or lesser or
1277 equal) insteal of greater (or lesser). Mark the condition of
1278 having found a value which exceeds the limit as unlikely.
1280 2018-05-07 Jeff Law <law@redhat.comg>
1282 * scanner.c (preprocessor_line): Call linemap_add after a line
1283 directive that changes the current filename.
1285 2018-05-06 Andre Vehreschild <vehre@gcc.gnu.org>
1288 * dependency.c (gfc_dep_resolver): Revert looking at coarray dimension
1289 introduced by r259385.
1290 * trans-intrinsic.c (conv_caf_send): Always report a dependency for
1291 same variables in coarray assignments.
1293 2018-05-02 Tom de Vries <tom@codesourcery.com>
1296 * f95-lang.c (DEF_GOACC_BUILTIN_ONLY): Define.
1298 2018-04-24 Steven G. Kargl <kargl@gcc.gnu.org>
1301 * decl.c (gfc_match_char_spec): Check for negative length and set to 0.
1303 2018-04-14 Andre Vehreschild <vehre@gcc.gnu.org>
1307 * dependency.c (gfc_dep_resolver): Coarray indexes are to be ignored
1308 during dependency computation. They define no data dependency.
1309 * trans-array.c (conv_array_index_offset): The stride can not be set
1311 * trans-intrinsic.c (conv_caf_send): Add creation of temporary array
1312 for caf_get's result and copying to the array with vectorial
1315 2018-04-14 Thomas Koenig <tkoenig@gcc.gnu.org>
1318 * frontend-passes.c (traverse_io_block): Check for start, end or
1319 stride being defined by an outer implied DO loop.
1321 2018-04-12 Thomas Koenig <tkoenig@gcc.gnu.org>
1325 * trans-stmt.c (gfc_trans_forall_loop): Use annot_expr_ivdep_kind
1326 for annotation and remove dependence on -ftree-parallelize-loops.
1328 2018-04-10 Jakub Jelinek <jakub@redhat.com>
1331 * openmp.c (resolve_omp_do): Remove bogus if (j < i) break;.
1332 (resolve_oacc_nested_loops): Likewise. Formatting fix.
1334 2018-04-09 Thomas Koenig <tkoenig@gcc.gnu.org>
1337 * trans-stmt.c (gfc_trans_forall_loop): Remove annotation for
1338 parallell processing of DO CONCURRENT -ftree-parallelize-loops
1341 2018-04-09 Thomas Koenig <tkoenig@gcc.gnu.org>
1344 * resolve.c (resolve_variable): Simplify cases where access to a
1345 parameter array results in a single constant.
1347 2018-04-02 Thomas Koenig <tkoenig@gcc.gnu.org>
1350 * decl.c (variable_decl): If upper or lower bounds simplify
1351 to a constant, use that.
1353 2018-03-30 Paul Thomas <pault@gcc.gnu.org>
1356 * simplify.c (gfc_convert_constant): Handle case of array
1357 constructors within an array that has no iterator and improve
1358 the conciseness of this section of code.
1360 2017-03-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1363 * array.c (gfc_resolve_character_array_constructor): Early
1364 exit for zero-size arrays.
1365 * simplify.c (simplify_transformation_to_array): Exit early
1366 if the result size is zero.
1367 (simplify_minmaxloc_to_array): Likewise.
1369 2018-03-28 Mikael Morin <mikael@gcc.gnu.org>
1372 * symbol.c (gfc_symbol_done_2): Start freeing namespaces
1374 (gfc_free_namespace): Restore assert (revert r258839).
1376 2018-03-28 Jakub Jelinek <jakub@redhat.com>
1378 * gfortran.h (gfc_dt): Rename default_exp field to dec_ext.
1379 * ioparm.def (IOPARM_dt_default_exp): Rename to ...
1380 (IOPARM_dt_dec_ext): ... this.
1381 * trans-io.c (build_dt): Adjust for default_exp renaming to
1382 dec_ext and IOPARM_dt_default_exp renaming to IOPARM_dt_dec_ext.
1383 * io.c (match_io): Likewise.
1385 2018-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
1388 * frontend-passes.c (gfc_run_passes): Do not run front-end
1389 optimizations if a previous error occurred.
1391 2018-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
1392 Harald Anlauf <anlauf@gmx.de>
1395 * primary.c (gfc_convert_to_structure_constructor): Check
1396 conformance of argument types in structure constructor.
1398 2018-03-26 Thomas Koenig <tkoenig@gcc.gnu.org>
1401 * io.c: Include constructor.h.
1402 (resolve_tag_format): For a constant character array, concatenate
1403 into a single character expression.
1405 2018-03-25 Seth Johnson <johnsonsr@ornl.gov>
1406 Dominique d'Humieres <dominiq@gcc.gnu.org>
1409 * check.c (gfc_check_c_f_pointer): Allow scalar noninteroperable
1410 scalar derived type with -std=f2003 and -std=f2008.
1412 2018-03-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1413 Dominique d'Humieres <dominiq@gcc.gnu.org>
1416 * symbol.c (gfc_free_namespace): Delete the assert and only if
1417 refs count is equals zero, free the namespace. Otherwise,
1418 something is halfway and other errors will resound.
1420 2018-03-24 Thomas Koenig <tkoenig@gcc.gnu.org>
1423 * expr.c (find_substring_ref): Change types of start, end
1424 and length variables to gfc_charlen_t. Set length to zero
1425 for empty substring.
1427 2018-03-24 Steven G. Kargl <kargl@gcc.gnu.org>
1430 * decl.c (check_function_name): Improved error message
1431 (gfc_match_volatile, gfc_match_asynchronous) Use check_function_name.
1433 2018-03-22 Steven G. Kargl <kargl@gcc.gnu.org>
1436 * decl.c (get_proc_name): If the MODULE prefix appears in interface
1437 body, then it must appear on the contained subroutine or function.
1438 While here, fix nearby mis-indented code.
1440 2018-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1441 Harald Anlauf <anlauf@gmx.de>
1444 * trans-types.c (gfc_sym_type): Do not dereference NULL pointer.
1446 2018-03-21 Janne Blomqvist <jb@gcc.gnu.org>
1449 * trans-expr.c (gfc_conv_procedure_call): Convert charlen to
1450 gfc_charlen_type_node when calling procedure.
1452 2018-03-20 Steven G. Kargl <kargl@gcc.gnu.org>
1455 * interface.c (symbol_rank): Remove bogus null pointer check that
1456 crept in when translating a ternary operator into an if-else
1459 2018-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
1462 * simplify.c (gfc_convert_constant): Correctly handle iterators
1463 for type conversion.
1465 2018-03-18 Steven G. Kargl <kargl@gcc.gnu.org>
1468 * decl.c (get_proc_name): Check for a subroutine re-defined in
1469 the contain portion of a subroutine. Change language of existing
1470 error message to better describe the issue. While here fix whitespace
1473 2018-03-18 Steven G. Kargl <kargl@gcc.gnu.org>
1476 * decl.c (get_proc_name): Catch clash between a procedure statement
1477 and a contained subprogram
1479 2018-03-16 Steven G. Kargl <kargl@gcc.gnu.org>
1482 * decl.c (merge_array_spec): Correct the error condition.
1484 2018-03-15 Steven G. Kargl <kargl@gcc.gnu.org>
1487 * decl.c (get_proc_name): Check for clash of entry name with
1490 2018-03-15 Steven G. Kargl <kargl@gcc.gnu.org>
1493 * decl.c (merge_array_spec): Limit the merging to maximum allowed
1494 dimensions, and issue error message if limit is exceeded.
1496 2018-03-13 Steven G. Kargl <kargl@gcc.gnu.org>
1498 * check.c (gfc_check_kill_sub): Remove check for INTEGER(4) or (8).
1499 * intrinsic.c (add_functions): Remove reference to gfc_resolve_kill.
1500 (add_subroutines): Remove reference to gfc_resolve_kill_sub.
1501 * intrinsic.texi: Update documentation.
1502 * iresolve.c (gfc_resolve_kill, gfc_resolve_kill_sub): Remove.
1503 * trans-decl.c (gfc_build_intrinsic_function_decls): Add
1504 gfor_fndecl_kill and gfor_fndecl_kill_sub
1505 * trans-intrinsic.c (conv_intrinsic_kill, conv_intrinsic_kill_sub): new
1507 (gfc_conv_intrinsic_function): Use conv_intrinsic_kill.
1508 (gfc_conv_intrinsic_subroutine): Use conv_intrinsic_kill_sub.
1509 * trans.h: Declare gfor_fndecl_kill and gfor_fndecl_kill_sub.
1511 2018-03-11 Paul Thomas <pault@gcc.gnu.org>
1514 * trans-array.c (structure_alloc_comps): Make sure that the
1515 vptr is copied and that the unlimited polymorphic _len is used
1516 to compute the size to be allocated.
1517 * trans-expr.c (gfc_get_class_array_ref): If unlimited, use the
1518 unlimited polymorphic _len for the offset to the element.
1519 (gfc_copy_class_to_class): Set the new 'unlimited' argument.
1520 * trans.h : Add the boolean 'unlimited' to the prototype.
1522 2018-03-11 Steven G. Kargl <kargl@gcc.gnu.org>
1525 * resolve.c (resolve_fl_procedure): Enforce F2018:C15100.
1527 2018-03-11 Steven G. Kargl <kargls@gcc.gnu.org>
1529 * check.c (gfc_check_kill): Check pid and sig are scalar.
1530 (gfc_check_kill_sub): Restrict kind to 4 and 8.
1531 * intrinsic.c (add_function): Sort keyword list. Add pid and sig
1532 keywords for KILL. Remove redundant *back="back" in favor of the
1533 original *bck="back".
1534 (add_subroutines): Sort keyword list. Add pid and sig keywords
1536 * intrinsic.texi: Fix documentation to consistently use pid and sig.
1537 * iresolve.c (gfc_resolve_kill): Kind can only be 4 or 8. Choose the
1539 (gfc_resolve_rename_sub): Add comment.
1541 2018-03-11 Thomas Koenig <tkoenig@gcc.gnu.org>
1544 * simplify.c (simplify_transformation): Return default result for
1545 empty array argument.
1546 (gfc_simplify_all): Remove special-case handling for zerosize.
1547 (gfc_simplify_any): Likewise.
1548 (gfc_simplify_count): Likewise.
1549 (gfc_simplify_iall): Likewise.
1550 (gfc_simplify_iany): Likewise.
1551 (gfc_simplify_iparity): Likewise.
1552 (gfc_simplify_minval): Likewise.
1553 (gfc_simplify_maxval): Likewise.
1554 (gfc_simplify_norm2): Likewise.
1555 (gfc_simplify_product): Likewise.
1556 (gfc_simplify_sum): Likewise.
1558 2018-03-10 Steven G. Kargl <kargl@gcc.gnu.org>
1561 * arith.c (check_result, eval_intrinsic): If result overflows, pass
1562 the expression up the chain instead of a NULL pointer.
1564 2018-03-07 Steven G. Kargl <kargl@gcc.gnu.org>
1568 * decl.c (gfc_match_char_spec): Try to reduce a charlen to a constant.
1570 2017-03-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1574 * expr.c (simplify_parameter_variable): If p is a size zero array
1575 and not an ARRAY_EXPR insert an empty array constructor and
1577 * gfortran.h: Add prototype for gfc_is_size_zero_array.
1578 * simplify.c (is_size_zero_array): Make non-static and rename into
1579 (gfc_is_size_zero_array): Check for parameter arrays of zero
1580 size by comparing shape and absence of constructor.
1581 (gfc_simplify_all): Use gfc_is_size_zero_array instead of
1583 (gfc_simplify_count): Likewise.
1584 (gfc_simplify_iall): Likewise.
1585 (gfc_simplify_iany): Likewise.
1586 (gfc_simplify_iparity): Likewise.
1587 (gfc_simplify_minval): Likewise.
1588 (gfc_simplify_maxval): Likewise.
1589 (gfc_simplify_product): Likewise.
1590 (gfc_simplify_sum): Likewise.
1592 2018-03-06 Steven G. Kargl <kargl@gcc.gnu.org>
1595 * primary.c (match_sym_complex_part): Give the matcher for an implied
1596 do-loop a chance to run.
1598 2018-03-03 Harald Anlauf <anlauf@gmx.de>
1601 * trans-expr.c (gfc_apply_interface_mapping_to_expr): Do not
1602 dereference NULL pointer.
1604 2018-03-03 Steven G. Kargl <kargl@gcc.gnu.org>
1607 * simplify.c (is_size_zero_array): New function to check for size
1609 (gfc_simplify_all, gfc_simplify_any, gfc_simplify_count,
1610 gfc_simplify_iall, gfc_simplify_iany, gfc_simplify_iparity,
1611 gfc_simplify_minval, gfc_simplify_maxval, gfc_simplify_norm2,
1612 gfc_simplify_product, gfc_simplify_sum): Use it, and implement
1613 requirements from F2018.
1615 2018-03-03 Steven G. Kargl <kargl@gcc.gnu.org>
1618 * simplify.c (gfc_simplify_transfer): Resolve mold.
1620 2018-03-03 Paul Thomas <pault@gcc.gnu.org>
1623 * resolve.c (build_loc_call): Change symtree name from 'loc' to
1626 2018-03-01 Paul Thomas <pault@gcc.gnu.org>
1629 * target-memory.c (gfc_interpret_derived): Assert that BT_VOID
1630 components are caf tokens.
1631 (gfc_target_interpret_expr): Treat BT_VOID expressions as
1634 2018-03-01 Paul Thomas <pault@gcc.gnu.org>
1637 * class.c (class_array_ref_detected): Remove the condition that
1638 there be no reference after the array reference.
1639 (find_intrinsic_vtab): Remove excess whitespace.
1640 * trans-array.c (gfc_conv_scalarized_array_ref): Rename 'tmp'
1641 as 'base and call build_class_array_ref earlier.
1643 2018-02-28 Paul Thomas <pault@gcc.gnu.org>
1646 * trans-stmt.c (trans_associate_var): Make sure that the se
1647 expression is a pointer type before converting it to the symbol
1650 2018-02-25 Steven G. Kargl <kargl@gcc.gnu.org>
1653 * decl.c (variable_decl): Check that an explicit-shape-array with
1654 nonconstant bounds is allowed.
1656 2018-02-25 Paul Thomas <pault@gcc.gnu.org>
1659 * trans-intrinsic.c (gfc_conv_allocated): If the argument se
1660 has a pre block, add it to the expression pre block.
1662 2018-02-25 Thomas Koenig <tkoenig@gcc.gnu.org>
1665 * gfortran.h (gfc_integer_4_kind): Define.
1666 * resolve.c (resolve_select_type): Make sure that the
1667 kind of c->high is gfc_integer_4_kind.
1669 2018-02-24 Steven G. Kargl <kargl@gcc.gnu.org>
1672 * decl.c (gfc_match_data): Check for invalid substring in
1675 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
1677 * intrinsic.texi: Arguments to MATMUL cannot both be rank one.
1679 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
1682 * trans-io.c (transfer_expr): Deal with C_LOC in transfer statement.
1684 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
1687 * interface.c (compare_actual_formal): Issue error if keyword is
1688 used in a statement function.
1690 2018-02-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1693 * trans-io.c (set_parameter_value_inquire): Adjust range check of
1694 negative unit values for kind=8 units to the kind=4 negative limit.
1696 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
1699 * trans-types.c (gfc_sym_type): Test sym->ns->proc_name before
1700 accessing its components.
1702 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
1705 * trans-decl.c (gfc_finish_var_decl): Test sym->ns->proc_name
1706 before accessing its components.
1708 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
1711 * trans-const.c : Clean up some whitespace issues.
1712 * trans-expr.c (gfc_conv_initializer): If an iso_c_binding
1713 derived type has a kind value of zero, set it to the default
1716 2018-02-23 Janne Blomqvist <jb@gcc.gnu.org>
1719 * trans-decl.c (gfc_build_builtin_function_decls): Add bool
1720 argument to stop and error stop decls.
1721 * trans-stmt.c (gfc_trans_stop): Add false value to argument
1724 2018-02-22 Janne Blomqvist <jb@gcc.gnu.org>
1728 * trans-decl.c (gfc_build_builtin_function_decls): Pass
1729 gfc_int8_type node to pause_numeric, size_type_node to
1731 * trans-stmt.c (gfc_trans_pause): Likewise.
1733 2018-02-22 Janne Blomqvist <jb@gcc.gnu.org>
1735 * gfortran.texi: Update Coarray API description.
1736 * trans-decl.c (gfc_build_builtin_function_decls): Use size_t for
1737 character lengths, int for exit codes.
1738 (generate_coarray_sym_init): Use size_t for character length.
1739 * trans-intrinsic.c (conv_co_collective): Likewise.
1740 * trans-stmt.c (gfc_trans_lock_unlock): Likewise.
1741 (gfc_trans_event_post_wait): Likewise.
1742 (gfc_trans_sync): Likewise.
1743 (gfc_trans_stop): Use size_t for character lengths, int for exit
1746 2018-02-20 Thomas Koenig <tkoenig@gcc.gnu.org>
1750 * primary.c (gfc_convert_to_structure_constructor):
1751 For a constant string constructor, make sure the length
1754 2018-02-19 Paul Thomas <pault@gcc.gnu.org>
1758 * resolve.c (resolve_assoc_var): Rearrange the logic for the
1759 determination of the character length of associate names. If
1760 the associate name is missing a length expression or the length
1761 expression is not a constant and the target is not a variable,
1762 make the associate name allocatable and deferred length.
1763 * trans-decl.c (gfc_get_symbol_decl): Null the character length
1764 backend_decl for deferred length associate names that are not
1765 variables. Set 'length' to gfc_index_zero_node for character
1766 associate names, whose character length is a PARM_DECL.
1768 2018-02-19 Thomas Koenig <tkoenig@gcc.gnu.org>
1771 * frontend-passes.c (traverse_io_block): Remove workaround for
1774 2018-02-19 Andre Vehreschild <vehre@gcc.gnu.org>
1776 * gfortran.texi: Document additional src/dst_type. Fix some typos.
1777 * trans-decl.c (gfc_build_builtin_function_decls): Declare the new
1778 argument of _caf_*_by_ref () with * e { get, send, sendget }.
1779 * trans-intrinsic.c (gfc_conv_intrinsic_caf_get): Add the type of the
1780 data referenced when generating a call to caf_get_by_ref ().
1781 (conv_caf_send): Same but for caf_send_by_ref () and
1782 caf_sendget_by_ref ().
1784 2018-02-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1787 * io.c (check_format): Allow FMT_COLON.
1789 2018-02-18 Paul Thomas <pault@gcc.gnu.org>
1792 * trans-array.c (gfc_conv_expr_descriptor): Set parmtype from
1793 the typenode in the case of deferred length characters.
1795 2018-02-17 Thomas Koenig <tkoenig@gcc.gnu.org>
1798 * frontend-passes (scalarized_expr): If the expression
1799 is an assumed size array, leave in the last reference
1800 and pass AR_SECTION instead of AR_FULL to gfc_resolve
1801 in order to avoid an error.
1803 2018-02-17 Paul Thomas <pault@gcc.gnu.org>
1806 * resolve.c (resolve_assoc_var): If a non-constant target expr.
1807 has no string length expression, make the associate variable
1808 into a deferred length, allocatable symbol.
1809 * trans-decl.c (gfc_is_reallocatable_lhs): Add and use a ptr to
1811 * trans-stmt.c (trans_associate_var): Null and free scalar
1812 associate names that are allocatable. After assignment, remove
1813 the allocatable attribute to prevent reallocation.
1815 2018-02-16 Jakub Jelinek <jakub@redhat.com>
1818 * trans-openmp.c (gfc_trans_omp_clauses): For OMP_CLAUSE_LINEAR_REF
1819 kind set OMP_CLAUSE_LINEAR_STEP to TYPE_SIZE_UNIT times last_step.
1821 2018-02-16 Dominique d'Humieres <dominiq@gcc.gnu.org>
1824 * decl.c (gfc_get_pdt_instance): Replace '%qs' with %qs.
1826 2018-02-15 Janus Weil <janus@gcc.gnu.org>
1829 * interface.c (check_dtio_arg_TKR_intent): Add a check for character
1832 2018-02-14 Janus Weil <janus@gcc.gnu.org>
1835 * match.c (gfc_match_select_type): Fix check for selector in
1836 SELECT TYPE statement.
1838 2018-02-13 Janus Weil <janus@gcc.gnu.org>
1841 * symbol.c (check_conflict): Reject procedure pointers in common blocks.
1843 2018-02-13 Alastair McKinstry <alastair.mckinstry@sceal.ie>
1844 Janne Blomqvist <jb@gcc.gnu.org>
1846 * module.c (dump_module): Use lbasename to ensure that module
1847 files are reproducible.
1849 2018-02-12 Janus Weil <janus@gcc.gnu.org>
1852 * resolve.c (resolve_component): Fix checks of passed argument in
1853 procedure-pointer components.
1855 2018-02-11 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1858 * resolve.c (resolve_formal_arglist): Update error message.
1860 2018-02-11 Andre Vehreschild <vehre@gcc.gnu.org>
1862 * gfortran.texi: Fix typos in documentation of caf_register ().
1863 * trans-array.c (structure_alloc_comps): Only register a component of
1864 a derived typed corray, not of an ultimate component coarray.
1866 2018-02-11 Steven G. Kargl <kargl@gcc.gnu.org>
1870 * interface.c (compare_actual_formal): Add in_statement_function
1871 bool parameter. Skip check of INTENT attribute for statement
1872 functions. Arguments to a statement function cannot be optional,
1873 issue error for missing argument.
1874 (gfc_procedure_use, gfc_ppc_use, gfc_arglist_matches_symbol): Use
1875 in_statement_function.
1877 2018-02-11 Paul Thomas <pault@gcc.gnu.org>
1880 * trans-expr.c (gfc_conv_derived_to_class): Set the use_offset
1881 flag. If the is a vector subscript or the expression is not a
1882 variable, make the descriptor one-based.
1884 2018-02-10 Paul Thomas <pault@gcc.gnu.org>
1888 * trans-array.c (gfc_array_init_size): Revert the change made
1889 in revision 257356 setting the dtype.
1890 * trans-types.c (gfc_get_dtype): Do not use the cached dtype.
1891 Call gfc_get_dtype_rank_type every time.
1894 * trans-array.c (gfc_conv_expr_descriptor): If the source array
1895 is a descriptor type, use its offset, removing the condition
1896 that is be a class expression.
1898 2018-02-07 Steven G. Kargl <kargl@gcc.gnu.org>
1901 * match.c (gfc_match_deallocate): Check for NULL pointer.
1903 2018-02-07 Thomas Koenig <tkoenig@gcc.gnu.org>
1906 * trans-intrinsic.c (gfc_conv_intrinsic_shape): New function.
1907 (gfc_conv_intrinsic_function): Call it.
1909 2018-02-07 Steven G. Kargl <kargl@gcc.gnu.org>
1912 * match.c (gfc_match_type_spec): If the charlen is non-NULL, then
1913 try to resolve it. While here return early if possible.
1915 2018-02-04 Paul Thomas <pault@gcc.gnu.org>
1918 * trans-decl.c (gfc_get_symbol_decl): Do not finish the decl of
1919 'length' if the symbol charlen backend_decl is an indirect ref.
1921 2018-02-03 Paul Thomas <pault@gcc.gnu.org>
1925 * trans-array.c (gfc_array_init_size): Instead of gfc_get_dtype
1926 use gfc_get_dtype_rank_type.
1928 2018-02-01 Janne Blomqvist <jb@gcc.gnu.org>
1932 * resolve.c (resolve_assoc_var): Generate an error if
1933 target length unknown.
1935 2018-02-01 Janne Blomqvist <jb@gcc.gnu.org>
1938 * simplify.c (gfc_simplify_repeat): Increase limit for deferring
1939 to runtime, print a warning message.
1941 2018-01-31 Jakub Jelinek <jakub@redhat.com>
1944 * openmp.c (gfc_match_omp_clauses): If all the linear
1945 gfc_match_omp_variable_list calls failed, don't gfc_free_omp_namelist
1946 nor set *head = NULL. Formatting fixes.
1948 2018-01-31 Paul Thomas <pault@gcc.gnu.org>
1951 * trans-expr.c (gfc_conv_procedure_call): If the parm expr is
1952 an address expression passed to an assumed rank dummy, convert
1953 to an indirect reference.
1955 2018-01-31 Thomas Koenig <tkoenig@gcc.gnu.org>
1957 * dump-parse-tree.c (write_proc): Use sym_name (which may
1958 be sym->binding_label) instead of sym->name.
1960 2018-01-31 Janne Blomqvist <jb@gcc.gnu.org>
1962 * trans-const.c (gfc_conv_string_init): Use gfc_charlen_t instead
1965 2018-01-31 Janne Blomqvist <jb@gcc.gnu.org>
1968 * trans-expr.c (fill_with_spaces): Use memset instead of
1970 (gfc_trans_string_copy): Improve opportunity to use builtins with
1973 2018-01-30 Jakub Jelinek <jakub@redhat.com>
1976 * trans-array.c (gfc_get_descriptor_offsets_for_info): Set *data_off
1977 to DATA_FIELD's offset rather than OFFSET_FIELD's offset.
1979 2018-01-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1982 * array.c (gfc_ref_dimen_size): Whitespace fixes. If stride is
1985 2018-01-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1988 * frontend-passes (matmul_to_var_expr): Return early if
1989 in association list.
1990 (inline_matmul_assign): Likewise.
1992 2017-01-29 Thomas Koenig <tkoenig@gcc.gnu.org>
1995 * resolve.c (resolve_component): Ensure BIND(C) character
1996 components have length one.
1997 (resolve_symbol): Likewise for variables.
1999 2018-01-27 Jakub Jelinek <jakub@redhat.com>
2002 * decl.c (add_init_expr_to_sym): Ignore initializers for too large
2005 2018-01-26 Damian Rouson <damian@sourceryinstitute.org>
2006 Alessandro Fanfarillo <fanfarillo.gcc@gmail.com>
2007 Soren Rasmussen <s.c.rasmussen@gmail.com>
2009 Partial support for Fortran 2018 teams features.
2011 * array.c (gfc_match_array_ref): add team attribute in coarray
2013 * check.c (gfc_check_get_team, gfc_check_team_number): add new
2014 functions for get_team and team_number.
2015 * dump-parse-tree.c (show_code_node): add new statements: form team,
2016 change team, end team, and sync team.
2017 * expr.c (gfc_find_team_co): add new function.
2018 * gfortran.h: add new statements.
2019 * intrinsic.c (add_functions): add get_team and team_number functions.
2020 * intrinsic.h: add get_team and team_number prototypes for check,
2021 simplify, and resolve.
2022 * iresolve.c (gfc_resolve_get_team, gfc_resolve_team_number): add new
2024 * iso-fortran-env.def: add the team_type derived type.
2025 * match.c (gfc_match_if, gfc_match_form_team, gfc_match_team_number)
2026 (gfc_match_end_team, gfc_match_sync_team, gfc_match_change_team):
2027 add change team, end team, form team, sync team match and functions.
2028 * match.h: add new prototypes for change team, end team, form team,
2030 * parse.c (decode_statement): add cases for change team, end team,
2031 form team, and sync team.
2032 * resolve.c: add cases for exec form team, change team, end team, and
2034 * simplify.c (gfc_simplify_get_team): add new function for get team.
2035 * st.c (gfc_free_statement): add cases exec for change team, end team,
2036 form team, sync team.
2037 * trans-decl.c (gfor_fndecl_caf_form_team)
2038 (gfor_fndecl_caf_change_team, gfor_fndecl_caf_end_team)
2039 (gfor_fndecl_caf_sync_team, gfor_fndecl_caf_get_team)
2040 (gfor_fndecl_caf_team_number): add functions and definitions.
2041 * trans-intrinsic.c (conv_caf_send, conv_intrinsic_team_number): add
2042 new function and team_type argument support.
2043 * trans-stmt.c (gfc_trans_form_team, gfc_trans_change_team)
2044 (gfc_trans_end_team, gfc_trans_sync_team): add new functions.
2045 * trans-stmt.h: add new prototypes.
2046 * trans-types.c (gfc_get_derived_type): check condition for team_type.
2047 * trans.c (trans_code): new exec cases for form team, change team, end
2048 team, and sync team.
2049 * trans.h: add new prototypes.
2051 2018-01-26 Steven G. Kargl <kargl@gcc.gnu.org>
2054 * simplify.c (compute_dot_product): Initialize result to INTEGER(1) 0
2055 or .false. The summation does the correct type conversion.
2056 (gfc_simplify_dot_product): Special case zero-sized arrays.
2058 2018-25-01 Paul Thomas <pault@gcc.gnu.org>
2061 * array.c (gfc_match_array_ref): If standard earlier than F2008
2062 it is an error if the reference dimension is greater than 7.
2063 libgfortran.h : Increase GFC_MAX_DIMENSIONS to 15. Change the
2064 dtype masks and shifts accordingly.
2065 * trans-array.c (gfc_conv_descriptor_dtype): Use the dtype
2066 type node to check the field.
2067 (gfc_conv_descriptor_dtype): Access the rank field of dtype.
2068 (duplicate_allocatable_coarray): Access the rank field of the
2069 dtype descriptor rather than the dtype itself.
2070 * trans-expr.c (get_scalar_to_descriptor_type): Store the type
2071 of 'scalar' on entry and use its TREE_TYPE if it is ARRAY_TYPE
2073 (gfc_conv_procedure_call): Pass TREE_OPERAND (tmp,0) to
2074 get_scalar_to_descriptor_type if the actual expression is a
2076 (gfc_trans_structure_assign): Assign the rank directly to the
2078 * trans-intrinsic.c (gfc_conv_intrinsic_rank): Cast the result
2079 to default integer kind.
2080 (gfc_conv_intrinsic_sizeof): Obtain the element size from the
2081 'elem_len' field of the dtype.
2082 * trans-io.c (gfc_build_io_library_fndecls): Replace
2083 gfc_int4_type_node with dtype_type_node where necessary.
2084 (transfer_namelist_element): Use gfc_get_dtype_rank_type for
2086 * trans-types.c : Provide 'get_dtype_type_node' to acces the
2087 dtype_type_node and, if necessary, build it.
2088 The maximum size of an array element is now determined by the
2089 maximum value of size_t.
2090 Update the description of the array descriptor, including the
2091 type def for the dtype_type.
2092 (gfc_get_dtype_rank_type): Build a constructor for the dtype.
2093 Distinguish RECORD_TYPEs that are BT_DERIVED or BT_CLASS.
2094 (gfc_get_array_descriptor_base): Change the type of the dtype
2095 field to dtype_type_node.
2096 (gfc_get_array_descr_info): Get the offset to the rank field of
2098 * trans-types.h : Add a prototype for 'get_dtype_type_node ()'.
2099 * trans.h : Define the indices of the dtype fields.
2101 2018-23-01 Paul Thomas <pault@gcc.gnu.org>
2104 * decl.c (gfc_match_derived_decl): If eos not matched, recover
2105 and emit error about garbage after declaration.
2107 2018-23-01 Paul Thomas <pault@gcc.gnu.org>
2110 * trans-stmt.c (trans_associate_var): Do not set cst_array_ctor
2113 2018-01-22 Janne Blomqvist <jb@gcc.gnu.org>
2117 * arith.c (gfc_arith_concat): Use size_t for string length.
2118 (gfc_compare_string): Likewise.
2119 (gfc_compare_with_Cstring): Likewise.
2120 * array.c (gfc_resolve_character_array_constructor): Use
2121 HOST_WIDE_INT, gfc_mpz_get_hwi.
2122 * check.c (gfc_check_fe_runtime_error): Use size_t.
2123 * data.c (create_character_initializer): Use HOST_WIDE_INT,
2125 * decl.c (gfc_set_constant_character_len): Use gfc_charlen_t.
2126 (add_init_expr_to_sym): Use HOST_WIDE_INT.
2127 * expr.c (gfc_build_init_expr): Use HOST_WIDE_INT,
2129 (gfc_apply_init): Likewise.
2130 * match.h (gfc_set_constant_character_len): Update prototype.
2131 * primary.c (match_string_constant): Use size_t.
2132 * resolve.c (resolve_ordinary_assign): Use HOST_WIDE_INT,
2134 * simplify.c (init_result_expr): Likewise.
2135 (gfc_simplify_len_trim): Use size_t.
2136 * target-memory.c (gfc_encode_character): Use size_t.
2137 (gfc_target_encode_expr): Use HOST_WIDE_INT, gfc_mpz_get_hwi.
2138 (interpret_array): Use size_t.
2139 (gfc_interpret_character): Likewise.
2140 * target-memory.h (gfc_encode_character): Update prototype.
2141 (gfc_interpret_character): Likewise.
2142 (gfc_target_interpret_expr): Likewise.
2143 * trans-const.c (gfc_build_string_const): Use size_t for length
2145 (gfc_build_wide_string_const): Likewise.
2146 * trans-const.h (gfc_build_string_const): Likewise.
2147 (gfc_build_wide_string_const): Likewise.
2149 2018-01-20 Steven G. Kargl <kargl@gcc.gnu.org>
2152 * simplify.c (gfc_simplify_matmul): Set return type correctly.
2154 2018-01-19 Steven G. Kargl <kargl@gcc.gnu.org>
2157 * simplify.c (gfc_simplify_matmul): Delete bogus assertion.
2159 2018-01-17 Harald Anlauf <anlauf@gmx.de>
2162 * expr.c (add_init_expr_to_sym): Do not dereference NULL pointer.
2164 2018-01-17 Harald Anlauf <anlauf@gmx.de>
2167 * decl.c (add_init_expr_to_sym): Do not dereference NULL pointer.
2169 2018-01-15 Louis Krupp <louis.krupp@zoho.com>
2172 * interface.c (compare_rank): Don't try to retrieve CLASS_DATA
2173 from symbol marked unlimited polymorphic.
2174 * resolve.c (resolve_structure_cons): Likewise.
2175 * misc.c (gfc_typename): Don't dereference derived->components
2178 2018-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
2181 * gfortran.h (gfc_check_f): Rename f4ml to f5ml.
2182 (gfc_logical_4_kind): New macro
2183 * intrinsic.h (gfc_simplify_minloc): Add a gfc_expr *argument.
2184 (gfc_simplify_maxloc): Likewise.
2185 (gfc_resolve_maxloc): Likewise.
2186 (gfc_resolve_minloc): Likewise.
2187 * check.c (gfc_check_minloc_maxloc): Add checking for "back"
2188 argument; also raise error if it is used (for now). Add it
2189 if it isn't present.
2190 * intrinsic.c (add_sym_4ml): Rename to
2191 (add_sym_5ml), adjust for extra argument.
2192 (add_functions): Add "back" constant. Adjust maxloc and minloc
2194 * iresolve.c (gfc_resolve_maxloc): Add back argument. If back is
2195 not of gfc_logical_4_kind, convert.
2196 (gfc_resolve_minloc): Likewise.
2197 * simplify.c (gfc_simplify_minloc): Add back argument.
2198 (gfc_simplify_maxloc): Likewise.
2199 * trans-intinsic.c (gfc_conv_intrinsic_minmaxloc): Rename last
2200 argument to %VAL to ensure passing by value.
2201 (gfc_conv_intrinsic_function): Call gfc_conv_intrinsic_minmaxloc
2202 also for library calls.
2204 2018-01-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2207 * resolve.c (resolve_transfer): Delete code looking for 'DT'
2208 format specifiers in format strings. Set formatted to true if a
2209 format string or format label is present.
2210 * trans-io.c (get_dtio_proc): Likewise. (transfer_expr): Fix
2213 2018-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
2216 * dump-parse-tree.c (get_c_type_name): Remove extra line.
2217 Change for loop to use declaration in for loop. Handle BT_LOGICAL
2219 (write_decl): Add where argument. Fix indentation. Replace
2220 assert with error message. Add typename to warning
2222 (write_type): Adjust locus to call of write_decl.
2223 (write_variable): Likewise.
2224 (write_proc): Likewise. Replace assert with error message.
2226 2018-01-13 Paul Thomas <pault@gcc.gnu.org>
2229 * trans-expr.c (gfc_trans_scalar_assign): Flag is_alloc_lhs if
2230 the rhs expression is neither an elemental nor a conversion
2234 * trans-array.c (is_pointer_array): Remove unconditional return
2235 of false for -fopenmp.
2237 2018-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
2241 * dump-parse-tree.c (write_proc): Always emit closing parenthesis
2244 2018-01-10 Steven G. Kargl <kargl@gcc.gnu.org>
2247 * resolve.c (resolve_allocate_expr): Check for NULL pointer.
2249 2018-01-10 Steven G. Kargl <kargl@gcc.gnu.org>
2252 * resolve.c (resolve_charlen): Check the type of cl->length
2255 2018-01-10 Janne Blomqvist <jb@gcc.gnu.org>
2258 * trans-array.c (gfc_trans_array_ctor_element): Fix formatting.
2260 2018-01-10 Janne Blomqvist <jb@gcc.gnu.org>
2263 * trans-array.c (gfc_trans_array_ctor_element): Convert RHS to the
2264 LHS type when assigning.
2266 2018-01-09 Steven G. Kargl <kargl@gcc.gnu.org>
2269 * expr.c (gfc_is_simply_contiguous): Check for NULL pointer.
2271 2018-01-08 Steven G. Kargl <kargl@gcc.gnu.org>
2273 * match.c (gfc_match_allocate): Check for NULL pointer.
2275 2018-01-08 Steven G. Kargl <kargl@gcc.gnu.org>
2277 * expr.c (gfc_check_pointer_assign): Fix typo in comment.
2279 2018-01-08 Paul Thomas <pault@gcc.gnu.org>
2282 * decl.c (gfc_get_pdt_instance): If parameterized arrays have
2283 an initializer, convert the kind parameters and add to the
2284 component if the instance.
2285 * trans-array.c (structure_alloc_comps): Add 'is_pdt_type' and
2286 use it with case COPY_ALLOC_COMP. Call 'duplicate_allocatable'
2287 for parameterized arrays. Clean up typos in comments. Convert
2288 parameterized array initializers and copy into the array.
2289 * trans-expr.c (gfc_trans_scalar_assign): Do a deep copy for
2290 parameterized types.
2291 *trans-stmt.c (trans_associate_var): Deallocate associate vars
2292 as necessary, when they are PDT function results for example.
2295 * trans-array.c (structure_alloc_comps): Only compare len parms
2296 when they are declared explicitly.
2298 2018-01-06 Janne Blomqvist <jb@gcc.gnu.org>
2301 * trans-expr.c (gfc_trans_pointer_assignment): fold_convert rhs to
2304 2018-01-05 Janne Blomqvist <jb@gcc.gnu.org>
2308 * array.c (got_charlen): Use gfc_charlen_int_kind.
2309 * class.c (gfc_find_derived_vtab): Use gfc_size_kind instead of
2311 (find_intrinsic_vtab): Likewise.
2312 * decl.c (match_char_length): Use gfc_charlen_int_kind.
2313 (add_init_expr_to_sym): Use gfc_charlen_t and gfc_charlen_int_kind.
2314 (gfc_match_implicit): Use gfc_charlen_int_kind.
2315 * dump-parse-tree.c (show_char_const): Use gfc_charlen_t and size_t.
2316 (show_expr): Use HOST_WIDE_INT_PRINT_DEC.
2317 * expr.c (gfc_get_character_expr): Length parameter of type
2319 (gfc_get_int_expr): Value argument of type HOST_WIDE_INT.
2320 (gfc_extract_hwi): New function.
2321 (simplify_const_ref): Make string_len of type gfc_charlen_t.
2322 (gfc_simplify_expr): Use HOST_WIDE_INT for substring refs.
2323 * frontend-passes.c (optimize_trim): Use gfc_charlen_int_kind.
2324 * gfortran.h (gfc_mpz_get_hwi): New prototype.
2325 (gfc_mpz_set_hwi): Likewise.
2326 (gfc_charlen_t): New typedef.
2327 (gfc_expr): Use gfc_charlen_t for character lengths.
2328 (gfc_size_kind): New extern variable.
2329 (gfc_extract_hwi): New prototype.
2330 (gfc_get_character_expr): Use gfc_charlen_t for character length.
2331 (gfc_get_int_expr): Use HOST_WIDE_INT type for value argument.
2332 * gfortran.texi: Update description of hidden string length argument.
2333 * iresolve.c (check_charlen_present): Use gfc_charlen_int_kind.
2334 (gfc_resolve_char_achar): Likewise.
2335 (gfc_resolve_repeat): Pass string length directly without
2336 temporary, use gfc_charlen_int_kind.
2337 (gfc_resolve_transfer): Use gfc_charlen_int_kind.
2338 * match.c (select_intrinsic_set_tmp): Use HOST_WIDE_INT for charlen.
2339 * misc.c (gfc_mpz_get_hwi): New function.
2340 (gfc_mpz_set_hwi): New function.
2341 * module.c (atom_int): Change type from int to HOST_WIDE_INT.
2342 (parse_integer): Don't complain about large integers.
2343 (write_atom): Use HOST_WIDE_INT for integers.
2344 (mio_integer): Handle integer type mismatch.
2345 (mio_hwi): New function.
2346 (mio_intrinsic_op): Use HOST_WIDE_INT.
2347 (mio_array_ref): Likewise.
2348 (mio_expr): Likewise.
2349 * primary.c (match_substring): Use gfc_charlen_int_kind.
2350 * resolve.c (resolve_substring_charlen): Use gfc_charlen_int_kind.
2351 (resolve_character_operator): Likewise.
2352 (resolve_assoc_var): Likewise.
2353 (resolve_select_type): Use HOST_WIDE_INT for charlen, use snprintf.
2354 (resolve_charlen): Use mpz_sgn to determine sign.
2355 * simplify.c (gfc_simplify_repeat): Use HOST_WIDE_INT/gfc_charlen_t
2357 * symbol.c (generate_isocbinding_symbol): Use gfc_charlen_int_kind.
2358 * target-memory.c (size_character): Length argument of type
2360 (gfc_encode_character): Likewise.
2361 (gfc_interpret_character): Use gfc_charlen_t.
2362 * target-memory.h (gfc_encode_character): Modify prototype.
2363 * trans-array.c (gfc_trans_array_ctor_element): Use existing type.
2364 (get_array_ctor_var_strlen): Use gfc_conv_mpz_to_tree_type.
2365 (trans_array_constructor): Use existing type.
2366 (get_array_charlen): Likewise.
2367 * trans-const.c (gfc_conv_mpz_to_tree_type): New function.
2368 * trans-const.h (gfc_conv_mpz_to_tree_type): New prototype.
2369 * trans-decl.c (gfc_trans_deferred_vars): Use existing type.
2370 (add_argument_checking): Likewise.
2371 * trans-expr.c (gfc_class_len_or_zero_get): Build const of type
2372 gfc_charlen_type_node.
2373 (gfc_conv_intrinsic_to_class): Use gfc_charlen_int_kind instead of
2374 4, fold_convert to correct type.
2375 (gfc_conv_class_to_class): Build const of type size_type_node for
2377 (gfc_copy_class_to_class): Likewise.
2378 (gfc_conv_string_length): Use same type in expression.
2379 (gfc_conv_substring): Likewise, use HOST_WIDE_INT for charlen.
2380 (gfc_conv_string_tmp): Make sure len is of the right type.
2381 (gfc_conv_concat_op): Use same type in expression.
2382 (gfc_conv_procedure_call): Likewise.
2383 (fill_with_spaces): Comment out memset() block due to spurious
2384 -Wstringop-overflow warnings.
2385 (gfc_trans_string_copy): Use gfc_charlen_type_node.
2386 (alloc_scalar_allocatable_for_subcomponent_assignment):
2387 fold_convert to right type.
2388 (gfc_trans_subcomponent_assign): Likewise.
2389 (trans_class_vptr_len_assignment): Build const of correct type.
2390 (gfc_trans_pointer_assignment): Likewise.
2391 (alloc_scalar_allocatable_for_assignment): fold_convert to right
2393 (trans_class_assignment): Build const of correct type.
2394 * trans-intrinsic.c (gfc_conv_associated): Likewise.
2395 (gfc_conv_intrinsic_repeat): Do calculation in sizetype.
2396 * trans-io.c (gfc_build_io_library_fndecls): Use
2397 gfc_charlen_type_node for character lengths.
2398 (set_string): Convert to right type in assignment.
2399 * trans-stmt.c (gfc_trans_label_assign): Build const of
2400 gfc_charlen_type_node.
2401 (trans_associate_var): Likewise.
2402 (gfc_trans_character_select): Likewise.
2403 (gfc_trans_allocate): Likewise, don't typecast strlen result.
2404 (gfc_trans_deallocate): Don't typecast strlen result.
2405 * trans-types.c (gfc_size_kind): New variable.
2406 (gfc_init_types): Determine gfc_charlen_int_kind and gfc_size_kind
2407 from size_type_node.
2408 * trans-types.h: Fix comment.
2410 2018-01-04 Thomas Koenig <tkoenig@gcc.gnu.org>
2414 * check.c (gfc_check_eoshift): Check for string length and
2415 for conformance of boundary.
2416 * intrinsic.c (add_functions): Add gfc_simplify_eoshift.
2417 * intrinsic.h: Add prototype for gfc_simplify_eoshift.
2418 * simplify.c (gfc_simplify_eoshift): New function.
2420 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
2421 Alan Hayward <alan.hayward@arm.com>
2422 David Sherwood <david.sherwood@arm.com>
2424 * trans-types.c (gfc_type_for_mode): Handle MODE_VECTOR_BOOL.
2426 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
2427 Alan Hayward <alan.hayward@arm.com>
2428 David Sherwood <david.sherwood@arm.com>
2430 * trans-types.c (gfc_type_for_mode): Check valid_vector_subparts_p.
2432 2018-01-03 Thomas Koenig <tkoenig@gcc.gnu.org>
2435 * check.c (gfc_check_eoshift): Error for missing boundary if array
2436 is not one of the standard types.
2438 2018-01-03 Jakub Jelinek <jakub@redhat.com>
2440 Update copyright years.
2442 * gfortranspec.c (lang_specific_driver): Update copyright notice
2444 * gfc-internals.texi: Bump @copying's copyright year.
2445 * gfortran.texi: Ditto.
2446 * intrinsic.texi: Ditto.
2447 * invoke.texi: Ditto.
2449 2017-01-02 Thomas Koenig <tkoenig@gcc.gnu.org>
2452 * intrinsic.c (add_function): Add gfc_simplify_maxloc and
2453 gfc_simplify_minloc to maxloc and minloc, respectively.
2454 * intrinsic.h: Add prototypes for gfc_simplify_minloc
2455 and gfc_simplify_maxloc.
2456 * simplify.c (min_max_chose): Adjust prototype. Modify function
2457 to have a return value which indicates if the extremum was found.
2458 (is_constant_array_expr): Fix typo in comment.
2459 (simplify_minmaxloc_to_scalar): New function.
2460 (simplify_minmaxloc_nodim): New function.
2461 (new_array): New function.
2462 (simplify_minmaxloc_to_array): New function.
2463 (gfc_simplify_minmaxloc): New function.
2464 (simplify_minloc): New function.
2465 (simplify_maxloc): New function.
2467 2018-01-02 Thomas Koenig <tkoenig@gcc.gnu.org>
2471 * simplify.c (gfc_simplify_cshift): Re-implement to allow full
2474 2018-01-01 Paul Thomas <pault@gcc.gnu.org>
2477 * resolve.c (resolve_fl_derived0): Add caf_token fields for
2478 allocatable and pointer scalars, when -fcoarray selected.
2479 * trans-types.c (gfc_copy_dt_decls_ifequal): Copy the token
2480 field as well as the backend_decl.
2481 (gfc_get_derived_type): Flag GFC_FCOARRAY_LIB for module
2482 derived types that are not vtypes. Components with caf_token
2483 attribute are pvoid types. For a component requiring it, find
2484 the caf_token field and have the component token field point to
2488 *trans-types.c (gfc_get_array_descriptor_base): Add the token
2489 field to the descriptor even when codimen not set.
2491 Copyright (C) 2018 Free Software Foundation, Inc.
2493 Copying and distribution of this file, with or without modification,
2494 are permitted in any medium without royalty provided the copyright
2495 notice and this notice are preserved.