re PR fortran/87395 (ICE in in lookup_field_for_decl with whizard)
[gcc.git] / gcc / fortran / ChangeLog
1 2018-09-23 Thomas Koenig <tkoenig@gcc.gnu.org>
2
3 PR fortran/87395
4 * gfc_conv_procedure_call: Reformat comments slightly. Do not add
5 clobber on INTENT(OUT) for saved variables.
6
7 2018-09-22 Thomas Koenig <tkoenig@gcc.gnu.org>
8
9 PR fortran/41453
10 * trans.h (gfc_conv_expr_reference): Add optional argument
11 add_clobber to prototype.
12 (gfc_conv_procedure_call): Set add_clobber argument to
13 gfc_conv_procedure_reference to true for scalar, INTENT(OUT),
14 non-pointer, non-allocatable, non-dummy variables whose type
15 is neither BT_CHARACTER, BT_DERIVED or BT_CLASS, but only if
16 the procedure is not elemental.
17 * trans-expr.c (gfc_conv_procedure_reference): Add clobber
18 statement before call if add_clobber is set.
19
20 2018-09-22 Paul Thomas <pault@gcc.gnu.org>
21
22 PR fortran/85603
23 * trans-array.c (gfc_alloc_allocatable_for_assignment): Test
24 the charlen backend_decl before using the VAR_P macro.
25
26 2018-09-21 Paul Thomas <pault@gcc.gnu.org>
27
28 PR fortran/77325
29 * trans-array.c (gfc_alloc_allocatable_for_assignment): If the
30 rhs has a charlen expression, convert that and use it.
31 * trans-expr.c (gfc_trans_assignment_1): The rse.pre for the
32 assignment of deferred character array vars to a realocatable
33 lhs should not be added to the exterior block since vector
34 indices, for example, generate temporaries indexed within the
35 loop.
36
37 2018-09-21 Paul Thomas <pault@gcc.gnu.org>
38
39 PR fortran/87359
40 * trans-stmt.c (gfc_trans_allocate): Don't deallocate alloc
41 components if must_finalize is set for expr3.
42
43 2018-09-21 Andrew Stubbs <ams@codesourcery.com>
44 Kwok Cheung Yeung <kcy@codesourcery.com>
45
46 * trans-expr.c (gfc_trans_structure_assign): Ensure that the first
47 argument of a call to _gfortran_caf_register is of size_type_node.
48 * trans-intrinsic.c (conv_intrinsic_event_query): Convert computed
49 index to a size_type_node type.
50 * trans-stmt.c (gfc_trans_event_post_wait): Likewise.
51
52 2018-09-20 Allan Sandfeld Jensen <allan.jensen@qt.io>
53
54 * gfortranspec.c (lang_specific_driver): Handle -r like -nostdlib.
55
56 2018-09-20 Janus Weil <janus@gcc.gnu.org>
57
58 * gfortran.h (gfc_str_startswith): New macro.
59 * decl.c (variable_decl, gfc_match_end): Use it.
60 * iresolve.c (is_trig_resolved): Ditto.
61 * module.c (load_omp_udrs, read_module): Ditto.
62 * options.c (gfc_handle_runtime_check_option): Ditto.
63 * primary.c (match_arg_list_function): Ditto.
64 * trans-decl.c (gfc_get_symbol_decl): Ditto.
65 * trans-expr.c (gfc_conv_procedure_call): Ditto.
66 * interface.c (dtio_op): Replace strncmp by strcmp.
67 * resolve.c (resolve_actual_arglist, resolve_function): Ditto.
68 * trans-expr.c (conv_arglist_function): Ditto.
69 * trans-intrinsic.c (gfc_conv_ieee_arithmetic_function): Replace macro
70 STARTS_WITH by gfc_str_startswith.
71
72 2018-09-20 Cesar Philippidis <cesar@codesourcery.com>
73
74 * dump-parse-tree.c (show_omp_clauses): Add missing omp list_types
75 and reorder the switch cases to match the enum in gfortran.h.
76
77 2018-09-19 Paul Thomas <pault@gcc.gnu.org>
78
79 PR fortran/84109
80 * trans-expr.c (gfc_trans_assignment_1): The rse.pre for the
81 assignment of deferred character intrinsic elemental function
82 results to a realocatable lhs must not be added to the exterior
83 block if they are array valued but must go to the loop body.
84
85 2018-09-18 Thomas Koenig <tkoenig@gcc.gnu.org>
86
87 PR fortran/29550
88 * gfortran.h (gfc_expr): Add external_blas flag.
89 * frontend-passes.c (matrix_case): Add case A2TB2T.
90 (optimize_namespace): Handle flag_external_blas by
91 calling call_external_blas.
92 (get_array_inq_function): Add argument okind. If
93 it is nonzero, use it as the kind of argument
94 to be used.
95 (inline_limit_check): Remove m_case argument, add
96 limit argument instead. Remove assert about m_case.
97 Set the limit for inlining from the limit argument.
98 (matmul_lhs_realloc): Handle case A2TB2T.
99 (inline_matmul_assign): Handle inline limit for other cases with
100 two rank-two matrices. Remove no-op calls to inline_limit_check.
101 (call_external_blas): New function.
102 * trans-intrinsic.c (gfc_conv_intrinsic_funcall): Do not add
103 argument to external BLAS if external_blas is already set.
104
105 2018-09-18 Paul Thomas <pault@gcc.gnu.org>
106
107 PR fortran/87239
108 * trans-expr.c (gfc_trans_assignment_1): The rse.pre for the
109 assignment of deferred character elemental function results to
110 a realocatable lhs must not be added to the exterior block but
111 must go to the loop body.
112
113 2018-09-18 Paul Thomas <pault@gcc.gnu.org>
114
115 PR fortran/87336
116 * trans-array.c (gfc_get_array_span): Try to get the element
117 length of incomplete types. Return NULL_TREE otherwise.
118 (gfc_conv_expr_descriptor): Only set the 'span' field if the
119 above does not return NULL_TREE. Set 'span' field if possible
120 for all new descriptors.
121
122 2018-09-17 Paul Thomas <pault@gcc.gnu.org>
123
124 PR fortran/64120
125 * trans-decl.c (gfc_get_symbol_decl): Flag allocatable, scalar
126 characters with a variable length expression for deferred init.
127 (gfc_trans_deferred_vars): Perform the assignment for these
128 symbols by calling gfc_conv_string_length.
129
130 2018-09-17 Paul Thomas <pault@gcc.gnu.org>
131
132 PR fortran/85954
133 * resolve.c (resolve_assoc_var): If the target expression is a
134 deferred charlen dummy and the associate name shares the
135 charlen, generate a new one. Make sure that new charlens are in
136 the namespace list so that they get cleaned up.
137 * trans-array.c (gfc_is_reallocatable_lhs): Associate names are
138 not reallocatable.
139 * trans-decl.c (gfc_get_symbol_decl): Put deferred character
140 length dummy and result arrays on the deferred initialization
141 list so that the variable length arrays can be correctly dealt
142 with.
143 * trans-expr.c (gfc_conv_string_length): Return if 'expr' is
144 NULL rather than ICEing..
145
146 2018-09-16 Janus Weil <janus@gcc.gnu.org>
147
148 PR fortran/86484
149 PR fortran/84543
150 * match.c (gfc_match_assignment): For a polymorphic assignment,
151 make sure that the vtab for the rhs type is generated.
152
153 2018-09-16 Thomas Koenig <tkoenig@gcc.gnu.org>
154
155 PR fortran/37802
156 * frontend-passes.c (B_ERROR): New macro for matmul bounds
157 checking error messages.
158 (C_ERROR): Likewise.
159 (inline_matmul_assign): Reorganize bounds checking, use B_ERROR
160 and C_ERROR macros.
161
162 2018-09-13 Bernd Edlinger <bernd.edlinger@hotmail.de>
163
164 * trans-array.c (gfc_conv_array_initializer): Remove excess precision
165 from overlength string initializers.
166
167 2018-09-12 Paul Thomas <pault@gcc.gnu.org>
168
169 PR fortran/87284
170 * trans-expr.c (gfc_trans_class_init_assign): Access to
171 to array elements of the dynamic type requires that the array
172 reference be added to the class expression and not the _data
173 component, unlike scalar expressions.
174
175 2018-09-11 Janus Weil <janus@gcc.gnu.org>
176
177 PR fortran/87172
178 * resolve.c (resolve_fl_derived): If a type has the 'use_assoc'
179 attribute, then it was declared in another module, so there should be
180 no error that it has not been declared.
181
182 2018-09-11 Paul Thomas <pault@gcc.gnu.org>
183
184 PR fortran/87277
185 * expr.c (is_subref_array): Add the check of dimensionality for
186 class, dummy, pointer arrays.
187
188 2018-09-11 Janus Weil <janus@gcc.gnu.org>
189
190 PR fortran/86830
191 * expr.c (gfc_is_simply_contiguous): Handle type-bound procedure calls
192 with non-polymorphic objects.
193
194 2018-09-10 Janus Weil <janus@gcc.gnu.org>
195
196 PR fortran/85395
197 * decl.c (match_binding_attributes): Use correct default accessibility
198 for procedure pointer components.
199
200 2018-09-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
201
202 * simplify.c (gfc_simplify_modulo): Re-arrange code to test whether
203 'P' is zero and issue an error if it is.
204
205 2018-08-31 Paul Thomas <pault@gcc.gnu.org>
206
207 PR fortran/86328
208 PR fortran/86760
209 * trans-array.c (gfc_conv_scalarized_array_ref): Do not fix
210 info->descriptor but pass it directly to gfc_build_array_ref.
211 (gfc_conv_array_ref): Likewise for se->expr.
212 * trans.c (gfc_build_array_ref): If 'decl' is a COMPONENT_REF
213 obtain the span field directly from it.
214
215 2017-08-28 Paul Thomas <pault@gcc.gnu.org>
216
217 PR fortran/80477
218 * trans-expr.c (gfc_conv_procedure_call): Allocatable class
219 scalar results being passed to a derived type formal argument
220 are finalized if possible. Otherwise, rely on existing code for
221 deallocation. Make the deallocation of allocatable result
222 components conditional on finalization not taking place. Make
223 the freeing of data components after finalization conditional
224 on the data being NULL.
225 (gfc_trans_arrayfunc_assign): Change the gcc_assert to a
226 condition to return NULL_TREE.
227 (gfc_trans_assignment_1): If the assignment is class to class
228 and the rhs expression must be finalized but the assignment
229 is not marked as a polymorphic assignment, use the vptr copy
230 function instead of gfc_trans_scalar_assign.
231
232 PR fortran/86481
233 * trans-expr.c (gfc_conv_expr_reference): Do not add the post
234 block to the pre block if the expression is to be finalized.
235 * trans-stmt.c (gfc_trans_allocate): If the expr3 must be
236 finalized, load the post block into a finalization block and
237 add it right at the end of the allocation block.
238
239 2018-08-27 David Malcolm <dmalcolm@redhat.com>
240
241 PR 87091
242 * error.c (gfc_format_decoder): Update for conversion of
243 show_caret_p to a tri-state.
244
245 2018-08-25 Janus Weil <janus@gcc.gnu.org>
246
247 PR fortran/86545
248 * resolve.c (resolve_transfer): Correctly determine typespec for
249 generic function calls, in order to throw a proper error.
250
251 2018-08-24 Thomas Koenig <tkoenig@gcc.gnu.org>
252
253 PR fortran/86837
254 * frontend-passes.c (var_in_expr_callback): New function.
255 (var_in_expr): New function.
256 (traverse_io_block): Use var_in_expr instead of
257 gfc_check_dependency for checking if the variable depends on the
258 previous interators.
259
260 2018-08-23 Janne Blomqvist <blomqvist.janne@gmail.com>
261
262 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxval): Delete
263 HONOR_SIGNED_ZEROS checks.
264
265 2018-08-23 Paul Thomas <pault@gcc.gnu.org>
266
267 PR fortran/86863
268 * resolve.c (resolve_typebound_call): If the TBP is not marked
269 as a subroutine, check the specific symbol.
270
271 2018-08-22 Thomas Koenig <tkoenig@gcc.gnu.org>
272
273 * gfortran.texi: Mention that asynchronous I/O does
274 not work on systems which lack condition variables, such
275 as AIX.
276
277 2018-08-22 Janus Weil <janus@gcc.gnu.org>
278
279 PR fortran/86935
280 * match.c (gfc_match_associate): Improve diagnostics for the ASSOCIATE
281 statement.
282
283 2018-08-22 Andrew Benson <abensonca@gmail.com>
284
285 * module.c (load_generic_interfaces): Move call to find_symbol()
286 so that only occurs if actually needed.
287
288 2018-08-22 Janus Weil <janus@gcc.gnu.org>
289
290 PR fortran/86888
291 * decl.c (gfc_match_data_decl): Allow allocatable components of
292 indirectly recursive type.
293 * resolve.c (resolve_component): Remove two errors messages ...
294 (resolve_fl_derived): ... and replace them by a new one.
295
296 2018-08-21 Janne Blomqvist <jb@gcc.gnu.org>
297
298 * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Use
299 MAX_EXPR/MIN_EXPR unconditionally for real arguments.
300 * gfortran.texi (Compiler Characteristics): Document MAX/MIN
301 behavior wrt NaN.
302
303 2018-08-21 Nicolas Koenig <koenigni@gcc.gnu.org>
304 Thomas Koenig <tkoenig@gcc.gnu.org>
305
306 PR fortran/25829
307 * gfortran.texi: Add description of asynchronous I/O.
308 * trans-decl.c (gfc_finish_var_decl): Treat asynchronous variables
309 as volatile.
310 * trans-io.c (gfc_build_io_library_fndecls): Rename st_wait to
311 st_wait_async and change argument spec from ".X" to ".w".
312 (gfc_trans_wait): Pass ID argument via reference.
313
314 2018-08-16 Nathan Sidwell <nathan@acm.org>
315
316 * cpp.c (dump_macro): Use cpp_user_macro_p.
317
318 2018-08-14 Janus Weil <janus@gcc.gnu.org>
319
320 PR fortran/86116
321 * interface.c (compare_type): Remove a CLASS/TYPE check.
322 (compare_type_characteristics): New function that behaves like the old
323 'compare_type'.
324 (gfc_check_dummy_characteristics, gfc_check_result_characteristics):
325 Call 'compare_type_characteristics' instead of 'compare_type'.
326
327 2018-08-12 Paul Thomas <pault@gcc.gnu.org>
328
329 PR fortran/66679
330 * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Class array
331 elements are returned as references to the data element. Get
332 the class expression by stripping back the references. Use this
333 for the element size.
334
335 2018-08-12 Paul Thomas <pault@gcc.gnu.org>
336
337 PR fortran/86906
338 * resolve.c (resolve_fl_variable_derived): Check if the derived
339 type is use associated before checking for the host association
340 error.
341
342 2018-08-10 Janus Weil <janus@gcc.gnu.org>
343
344 PR fortran/57160
345 * invoke.texi (frontend-optimize): Mention short-circuiting.
346 * options.c (gfc_post_options): Disable -ffrontend-optimize with -Og.
347 * resolve.c (resolve_operator): Warn about short-circuiting only with
348 -ffrontend-optimize.
349 * trans-expr.c (gfc_conv_expr_op): Use short-circuiting operators only
350 with -ffrontend-optimize. Without that flag, make sure that both
351 operands are evaluated.
352
353 2018-08-08 Nathan Sidwell <nathan@acm.org>
354
355 * cpp.c (cb_file_change): Use linemap_included_from.
356
357 2018-08-07 Cesar Philippidis <cesar@codesourcery.com>
358
359 * trans-stmt.h: Remove stale reference to trans-openacc.c.
360
361 2018-08-04 Janus Weil <janus@gcc.gnu.org>
362
363 PR fortran/45521
364 * interface.c (gfc_compare_interfaces): Apply additional
365 distinguishability criteria of F08 to operator interfaces.
366
367 2018-07-31 Andre Vieira <andre.simoesdiasvieira@arm.com>
368
369 Revert 'AsyncI/O patch committed'
370 2018-07-25 Nicolas Koenig <koenigni@gcc.gnu.org>
371 Thomas Koenig <tkoenig@gcc.gnu.org>
372
373 PR fortran/25829
374 * gfortran.texi: Add description of asynchronous I/O.
375 * trans-decl.c (gfc_finish_var_decl): Treat asynchronous variables
376 as volatile.
377 * trans-io.c (gfc_build_io_library_fndecls): Rename st_wait to
378 st_wait_async and change argument spec from ".X" to ".w".
379 (gfc_trans_wait): Pass ID argument via reference.
380
381 2018-07-25 Nicolas Koenig <koenigni@gcc.gnu.org>
382 Thomas Koenig <tkoenig@gcc.gnu.org>
383
384 PR fortran/25829
385 * gfortran.texi: Add description of asynchronous I/O.
386 * trans-decl.c (gfc_finish_var_decl): Treat asynchronous variables
387 as volatile.
388 * trans-io.c (gfc_build_io_library_fndecls): Rename st_wait to
389 st_wait_async and change argument spec from ".X" to ".w".
390 (gfc_trans_wait): Pass ID argument via reference.
391
392 2018-07-20 Martin Sebor <msebor@redhat.com>
393
394 PR middle-end/82063
395 * gfortran.h (gfc_handle_option): Change function argument
396 to HOST_WIDE_INT.
397 * options.c (gfc_handle_option): Same.
398
399 2018-07-20 Andrew Benson <abenson@carnegiescience.edu>
400
401 * gfortran.h (gfc_symbol): Add pointer to next derived type.
402 (gfc_dt_list, gfc_get_dt_list): Remove.
403 (gfc_namespace): Replace gfc_dt_list with gfc_symbol.
404 * parse.c (resolve_all_program_units): Replace gfc_free_dt_list() with
405 simple nullification of gfc_derived_types.
406 * resolve.c (resolve_global_procedure): Replace gfc_dt_list with
407 gfc_symbol.
408 (add_dt_to_dt_list): Change derived type linked list insertion to
409 utilize dt_next pointers in gfc_symbol.
410 * symbol.c (gfc_new_symbol, gfc_free_dt_list, gfc_symbol_done2)
411 (get_iso_c_binding_dt, generate_isocbinding_symbol): Remove
412 gfc_free_dt_list as gfc_dt_list is obsoleted. Change derived type
413 linked list search/insertion to utilize dt_next pointers in gfc_symbol.
414 * trans-types.c (gfc_get_derived_type): Change derived type linked
415 list search to utilize dt_next pointers in gfc_symbol.
416
417 2018-07-19 Kyrylo Tkachov <kyrylo.tkachov@arm.com>
418
419 * trans-intrinsic.c: (gfc_conv_intrinsic_minmax): Emit MIN_MAX_EXPR
420 or IFN_FMIN/FMAX sequence to calculate the min/max when possible.
421
422 2018-07-18 Janus Weil <janus@gcc.gnu.org>
423 Thomas Koenig <tkoenig@gcc.gnu.org>
424
425 PR fortran/85599
426 * dump-parse-tree.c (show_attr): Add handling of implicit_pure.
427 * frontend-passes.c (do_warn_function_elimination): Do not warn for
428 pure functions.
429 * gfortran.h: Add prototypes for gfc_pure_function and
430 gfc_implicit_pure_function.
431 * gfortran.texi: Add chapter on evaluation of logical expressions.
432 * invoke.texi: Mention that -Wfunction-elimination is implied
433 by -Wextra.
434 * lang.opt: Make -Wextra imply -Wfunction-elimination.
435 * resolve.c (pure_function): Rename to gfc_pure_function.
436 (gfc_implicit_pure_function): New function.
437 (check_pure_function): Use it here.
438 (impure_function_callback): New function.
439 (resolve_operator): Call it via gfc_expr_walker.
440
441 2018-07-16 Fritz Reese <fritzoreese@gmail.com>
442
443 PR fortran/83184
444 * decl.c (match_old_style_init): Initialize locus of variable expr when
445 creating a data variable.
446 (match_clist_expr): Verify array is explicit shape/size before
447 attempting to allocate constant array constructor.
448
449 2018-07-16 Fritz Reese <fritzoreese@gmail.com>
450
451 PR fortran/86417
452 * module.c (mio_component): Set component->loc when loading from module.
453
454 2018-07-10 Jakub Jelinek <jakub@redhat.com>
455
456 PR fortran/86421
457 * module.c (omp_declare_simd_clauses): Add LINEAR with _REF, _VAL and
458 _UVAL suffixes.
459 (mio_omp_declare_simd): Save and restore ref, val and uval modifiers
460 on linear clauses. Initialize n->where to gfc_current_locus.
461
462 2018-07-05 Paul Thomas <pault@gcc.gnu.org>
463
464 PR fortran/86408
465 * resolve.c.c (resolve_contained_fntype): Reference to C418 is
466 in F2008 and not F2003.
467 (resolve_function): Ditto in error message. Also, exclude
468 deferred character length results from the error.
469
470 2018-07-05 Fritz Reese <fritzoreese@gmail.com>
471
472 PR fortran/83183
473 PR fortran/86325
474 * expr.c (class_allocatable, class_pointer, comp_allocatable,
475 comp_pointer): New helpers.
476 (component_initializer): Generate EXPR_NULL for allocatable or pointer
477 components. Do not generate initializers for components within BT_CLASS.
478 Do not assign to comp->initializer.
479 (gfc_generate_initializer): Use new helpers; move code to generate
480 EXPR_NULL for class allocatable components into component_initializer().
481
482 2018-07-04 Jerry DeLisle <jvdelisle@gcc.gnu.org>
483
484 PR fortran/82009
485 * trans-decl.c (gfc_process_block_locals): Delete assert and set
486 saved_local_decls = NULL_TREE.
487
488 2018-07-02 Richard Biener <rguenther@suse.de>
489
490 PR lto/86321
491 * trans-types.c (gfc_get_array_type_bounds): Unshare TYPE_FIELDs
492 for the distinct type copy.
493
494 2018-07-02 Paul Thomas <pault@gcc.gnu.org>
495
496 PR fortran/82969
497 PR fortran/86242
498 * trans-array.c (structure_alloc_comps): Do not explicitly copy
499 procedure pointer components.
500
501 2018-07-02 Paul Thomas <pault@gcc.gnu.org>
502
503 PR fortran/45305
504 * expr.c : Add a prototype for scalarize_intrinsic_call.
505 (gfc_simplify_expr): Use scalarize_intrinsic_call for elemental
506 intrinsic function calls.
507 (scalarize_intrinsic_call): Add 'init_flag' argument. Check if
508 the expression or any of the actual argument expressions are
509 NULL. Before calling gfc_check_init_expr, check 'init_flag'.
510 Only simplify the scalarized expressions if there are no errors
511 on the stack.
512 (gfc_check_init_expr): Set 'init_flag' true in the call to
513 scalarize_intrinsic_call.
514
515 2018-06-28 Fritz Reese <fritzoreese@gmail.com>
516
517 PR fortran/82865
518 * decl.c (gfc_match_type): Refactor and check for PDT declarations.
519
520 2018-06-28 Martin Liska <mliska@suse.cz>
521
522 * gfortranspec.c: Include opt-suggestions.h.
523
524 2018-06-25 Fritz Reese <fritzoreese@gmail.com>
525
526 PR fortran/82972
527 PR fortran/83088
528 PR fortran/85851
529 * expr.c (component_initializer): Assign init expr to c->initializer.
530 (generate_isocbinding_initializer): New.
531 (gfc_generate_initializer): Call generate_isocbinding_initializer to
532 generate initializers for c_ptr and c_funptr with -finit-derived.
533
534 2018-06-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
535
536 PR fortran/85983
537 * interface.c (check_dtio_interface1): Delete assert.
538
539 2018-06-22 Paul Thomas <pault@gcc.gnu.org>
540 Rainer Orth <ro@gcc.gnu.org>
541
542 PR fortran/86281
543 * resolve.c (resolve_contained_fntype): Check for the charlen
544 before testing the length.
545
546 2018-06-21 Paul Thomas <pault@gcc.gnu.org>
547
548 PR fortran/49630
549 * resolve.c (resolve_contained_fntype): Change standard ref.
550 from F95 to F2003: C418. Correct a spelling error in a comment.
551 It is an error for an abstract interface to have an assumed
552 character length result.
553 * trans-expr.c (gfc_conv_procedure_call): Likewise change the
554 standard reference.
555
556 2018-06-21 Paul Thomas <pault@gcc.gnu.org>
557
558 PR fortran/83118
559 * resolve.c (resolve_ordinary_assign): Force the creation of a
560 vtable for assignment of non-polymorphic expressions to an
561 unlimited polymorphic object.
562 * trans-array.c (gfc_alloc_allocatable_for_assignment): Use the
563 size of the rhs type for such assignments. Set the dtype, _len
564 and vptrs appropriately.
565 * trans-expr.c (gfc_trans_assignment): Force the use of the
566 _copy function for these assignments.
567
568 2018-06-20 Chung-Lin Tang <cltang@codesourcery.com>
569 Thomas Schwinge <thomas@codesourcery.com>
570 Cesar Philippidis <cesar@codesourcery.com>
571
572 * gfortran.h (gfc_omp_clauses): Add unsigned if_present, finalize
573 bitfields.
574 * openmp.c (enum omp_mask2): Remove OMP_CLAUSE_PRESENT_OR_*. Add
575 OMP_CLAUSE_{IF_PRESENT,FINALIZE}.
576 (gfc_match_omp_clauses): Update handling of copy, copyin, copyout,
577 create, deviceptr, present_of_*. Add support for finalize and
578 if_present.
579 (OACC_PARALLEL_CLAUSES): Remove PRESENT_OR_* clauses.
580 (OACC_KERNELS_CLAUSES): Likewise.
581 (OACC_DATA_CLAUSES): Likewise.
582 (OACC_DECLARE_CLAUSES): Likewise.
583 (OACC_UPDATE_CLAUSES): Add IF_PRESENT clause.
584 (OACC_ENTER_DATA_CLAUSES): Remove PRESENT_OR_* clauses.
585 (OACC_EXIT_DATA_CLAUSES): Add FINALIZE clause.
586 (gfc_match_oacc_declare): Update to OpenACC 2.5 semantics.
587 * trans-openmp.c (gfc_trans_omp_clauses): Add support for IF_PRESENT
588 and FINALIZE.
589
590 2018-06-18 Eric Botcazou <ebotcazou@adacore.com>
591
592 * trans-decl.c (gfc_get_fake_result_decl): Revert latest change.
593
594 2018-06-17 Eric Botcazou <ebotcazou@adacore.com>
595
596 * trans-decl.c (nonlocal_dummy_decl_pset): Delete.
597 (nonlocal_dummy_decls): Likewise.
598 (gfc_nonlocal_dummy_array_decl): Likewise.
599 (gfc_get_symbol_decl): Do not call gfc_nonlocal_dummy_array_decl.
600 (gfc_get_fake_result_decl): Do not generate a new DECL if simply
601 reusing the result of a recursive call.
602 (gfc_generate_function_code): Do not create, insert and destroy
603 nonlocal_dummy_decls.
604
605 2018-06-13 Steven G. Kargl <kargl@gcc.gnu.org>
606
607 PR fortran/86110
608 * array.c (gfc_resolve_character_array_constructor): Avoid NULL
609 pointer dereference.
610
611 2018-06-13 Cesar Philippidis <cesar@codesourcery.com>
612
613 PR fortran/85703
614 * parse.c (decode_oacc_directive): Set gfc_matching_function
615 to false.
616 (decode_omp_directive): Likewise.
617
618 2018-06-13 Cesar Philippidis <cesar@codesourcery.com>
619
620 PR fortran/85702
621 * openmp.c (gfc_match_oacc_wait): Use %C to report error location.
622
623 2018-06-12 David Malcolm <dmalcolm@redhat.com>
624
625 PR other/69968
626 * misc.c (gfc_closest_fuzzy_match): Update for renaming of
627 levenshtein_distance to get_edit_distance.
628
629 2018-06-12 Steven G. Kargl <kargl@gcc.gnu.org>
630
631 PR fortran/44491
632 * expr.c (gfc_check_assign): Select non-NULL locus.
633
634 2018-06-11 Janus Weil <janus@gcc.gnu.org>
635
636 PR fortran/45521
637 * interface.c (compare_ptr_alloc): New function.
638 (generic_correspondence): Call it.
639
640 2018-06-10 Thomas Koenig <tkoenig@gcc.gnu.org>
641
642 * gfortran.h (gfc_expr): Add no_bounds_check field.
643 * frontend-passes.c (get_array_inq_function): Set no_bounds_check
644 on function and function argument.
645 (inline_matmul_assign): Set no_bounds_check on zero expression
646 and on lhs of zero expression.
647 Also handle A1B2 case if realloc on assigment is active.
648 * trans-array.c (gfc_conv_array_ref): Don't do range checking
649 if expr has no_bounds_check set.
650 (gfc_conv_expr_descriptor): Set no_bounds_check on ss if expr
651 has it set.
652 * trans-expr.c (gfc_trans_assignment_1): Set no_bounds_check
653 on lss and lss if the corresponding expressions have it set.
654
655 2018-06-10 Dominique d'Humieres <dominiq@gcc.gnu.org>
656
657 PR fortran/79854
658 * trans-const.c: Remove include "diagnostic-core.h".
659 (gfc_conv_constant_to_tree): Replace fatal_error with gcc_unreachable.
660
661 2018-06-10 Janus Weil <janus@gcc.gnu.org>
662
663 PR fortran/85088
664 * decl.c (match_attr_spec): Synchronize the DECL_* enum values with the
665 INTENT_* values from the enum 'sym_intent'. Call 'match_intent_spec'
666 and remove a TODO note.
667 * gfortran.h: Add a comment to sym_intent.
668
669 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
670
671 PR fortran/38351
672 * resolve.c (resolve_operator): Provide better error message for
673 derived type entity used in an binary intrinsic numeric operator.
674
675 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
676
677 PR fortran/85138
678 PR fortran/85996
679 PR fortran/86051
680 * decl.c (gfc_match_char_spec): Use private namespace in attempt to
681 reduce a charlen to a constant.
682
683 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
684
685 PR fortran/78278
686 * data.c (gfc_assign_data_value): Re-arrange code to allow for
687 an error for double initialization of CHARACTER entities.
688
689 2018-06-09 Steven G. Kargl <kargl@gcc.gnu.org>
690
691 PR fortran/63514
692 * symbol.c (gfc_add_volatile): Enforce F2008:C1282 and F2018:C1588.
693
694 2018-06-08 Thomas Koenig <tkoenig@gcc.gnu.org>
695
696 PR fortran/85631
697 * trans.h (gfc_ss): Add field no_bounds_check.
698 * trans-array.c (gfc_conv_ss_startstride): If flag_realloc_lhs and
699 ss->no_bounds_check is set, do not use runtime checks.
700 * trans-expr.c (gfc_trans_assignment_1): Set lss->no_bounds_check
701 for reallocatable lhs.
702
703 2018-06-08 Steven G. Kargl <kargl@gcc.gnu.org>
704
705 PR fortran/86059
706 * array.c (match_array_cons_element): NULL() cannot be in an
707 array constructor.
708
709 2018-06-08 Steven G. Kargl <kargl@gcc.gnu.org>
710
711 PR fortran/78571
712 * data.c (create_character_initializer): Return early if type is
713 incompatible with CHARACTER.
714
715 2018-06-07 Steven G. Kargl <kargl@gcc.gnu.org>
716
717 PR fortran/86045
718 * simplify.c (gfc_simplify_mod): Re-arrange code to test whether
719 'P' is zero and issue an error if it is.
720
721 2018-06-06 Thomas Koenig <tkoenig@gcc.gnu.org>
722
723 PR fortran/85641
724 * frontend-passes.c (is_fe_temp): Add prototype.
725 (realloc_string_callback): Early return for frontend-generated
726 temporary.
727
728 2018-06-05 Cesar Philippidis <cesar@codesourcery.com>
729
730 PR fortran/85701
731
732 * openmp.c (gfc_resolve_oacc_declare): Error on functions and
733 subroutine data clause arguments.
734
735 2018-06-04 Steven G. Kargl <kargl@gcc.gnu.org>
736
737 PR fortran/85981
738 * resolve.c (resolve_allocate_deallocate): Check errmsg is default
739 character kind.
740
741 2018-06-03 Paul Thomas <pault@gcc.gnu.org>
742
743 PR fortran/36497
744 * decl.c (variable_decl): Use gfc_add_type for cray pointees.
745
746 2018-06-01 Steven G. Kargl <kargl@gcc.gnu.org>
747
748 PR fortran/63570
749 * check.c (gfc_check_random_init): New function. Check arguments of
750 RANDOM_INIT.
751 * gfortran.h (GFC_ISYM_RANDOM_INIT): New enum token.
752 * intrinsic.c (add_subroutines): Add RANDOM_INIT to list of
753 subroutines.
754 (gfc_check_intrinsic_standard): Introduce Fortran 2018 check.
755 * intrinsic.h: Add prototypes for gfc_check_random_init and
756 gfc_resolve_random_init
757 * intrinsic.texi: Document new intrinsic subprogram.
758 * iresolve.c (gfc_resolve_random_init): Resolve routine name.
759 * trans-decl.c: Declare gfor_fndecl_random_init
760 * trans-intrinsic.c (conv_intrinsic_random_init): New function.
761 Translate call to RANDOM_INIT.
762 (gfc_conv_intrinsic_subroutine): Call it.
763 * trans.h: Declare gfor_fndecl_random_init
764
765 2018-05-27 Steven G. Kargl <kargl@gcc.gnu.org>
766
767 * decl.c (match_data_constant): Fortran 2018 allows pointer
768 initialization in a data statement.
769
770 2018-05-25 Janus Weil <janus@gcc.gnu.org>
771
772 PR fortran/85839
773 * match.c (gfc_match_block_data): Call gfc_notify_std to warn about
774 an obsolescent feature in Fortran 2018.
775 (gfc_match_equivalence): Ditto.
776 * resolve.c (resolve_common_blocks): Ditto.
777 (gfc_resolve_forall): Ditto.
778 * symbol.c (gfc_define_st_label): Ditto.
779
780 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
781
782 PR fortran/85543
783 * resolve.c (update_current_proc_array_outer_dependency): Avoid NULL
784 pointer dereference.
785
786 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
787
788 PR fortran/85780
789 * resolve.c (resolve_fl_procedure): Avoid NULL dereference.
790
791 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
792
793 PR fortran/85779
794 * decl.c (gfc_match_derived_decl): Fix NULL point dereference.
795
796 2018-05-24 Steven G. Kargl <kargl@gcc.gnu.org>
797
798 PR fortran/85895
799 * resolve.c (resolve_sync): Resolve expression before checking for
800 an error.
801
802 2018-05-22 Janus Weil <janus@gcc.gnu.org>
803
804 PR fortran/85841
805 * libgfortran.h: Remove the macros GFC_STD_F2008_TS and
806 GFC_STD_OPT_F08TS.
807 * error.c (notify_std_msg): Remove GFC_STD_F2008_TS.
808 * options.c (set_default_std_flags): Ditto.
809 (gfc_handle_option): Make -std=f2008ts an alias for -std=f2018.
810 * array.c (gfc_match_array_spec): Replace GFC_STD_F2008_TS by
811 GFC_STD_F2018.
812 * check.c (gfc_check_atomic, gfc_check_event_query,
813 gfc_check_c_f_pointer, gfc_check_c_f_procpointer, gfc_check_c_funloc,
814 gfc_check_c_loc, gfc_check_num_images, gfc_check_this_image): Ditto.
815 * decl.c (gfc_verify_c_interop_param, gfc_match_decl_type_spec): Ditto.
816 * intrinsic.c (add_functions, add_subroutines,
817 gfc_check_intrinsic_standard): Ditto.
818 * iso-c-binding.def: Ditto.
819 * iso-fortran-env.def: Ditto.
820 * match.c (gfc_match_event_post, gfc_match_event_wait,
821 gfc_match_fail_image, gfc_match_form_team, gfc_match_change_team,
822 gfc_match_end_team, gfc_match_sync_team): Ditto.
823 * gfortran.texi: Remove mention of -std=f2008ts.
824 Move TSs into F2018 section.
825 * invoke.texi: Update documentation of -std=f2008ts.
826
827 2018-05-21 Janus Weil <janus@gcc.gnu.org>
828
829 PR fortran/85841
830 * libgfortran.h: New macros GFC_STD_OPT_*.
831 * error.c (notify_std_msg): New function.
832 (gfc_notify_std): Adjust such that it can handle combinations of
833 GFC_STD_* flags in the 'std' argument, not just a single one.
834 * match.c (match_arithmetic_if, gfc_match_if): Reject arithmetic if
835 in Fortran 2018.
836 (gfc_match_stopcode): Use GFC_STD_OPT_* macros.
837 * options.c (set_default_std_flags): Warn for F2018 deleted features
838 by default.
839 (gfc_handle_option): F2018 deleted features are allowed in earlier
840 standards.
841 * symbol.c (gfc_define_st_label, gfc_reference_st_label): Reject
842 nonblock do constructs in Fortran 2018.
843
844 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
845
846 PR fortran/80657
847 * resolve.c (flag_fn_result_spec): Use the 'sym' argument to
848 test for self refs to the function result in the character len
849 expression. If a self reference is found, emit an error and
850 return true.
851 (resolve_fntype): Use the function symbol in the calls to the
852 above.
853
854 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
855
856 PR fortran/49636
857 * trans-array.c (gfc_get_array_span): Renamed from
858 'get_array_span'.
859 (gfc_conv_expr_descriptor): Change references to above.
860 * trans-array.h : Add prototype for 'gfc_get_array_span'.
861 * trans-intrinsic.c (gfc_conv_associated): Add pre and post
862 blocks for 'arg1'.
863 * trans-stmt.c (trans_associate_var): If the associate name is
864 a subref array pointer, use gfc_get_array_span for the span.
865
866 2018-05-20 Paul Thomas <pault@gcc.gnu.org>
867
868 PR fortran/82275
869 * match.c (gfc_match_type_spec): Go through the array ref and
870 decrement 'rank' for every dimension that is an element.
871
872 2018-05-19 Paul Thomas <pault@gcc.gnu.org>
873
874 PR fortran/82923
875 PR fortran/66694
876 PR fortran/82617
877 * trans-array.c (gfc_alloc_allocatable_for_assignment): Set the
878 charlen backend_decl of the rhs expr to ss->info->string_length
879 so that the value in the current scope is used.
880
881 2018-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
882
883 PR fortran/63529
884 * gfortran.texi: Clarify documentation for Cray pointer and
885 assumed-sized array.
886
887 2018-05-13 Paul Thomas <pault@gcc.gnu.org>
888
889 PR fortran/85742
890 * trans-types.c (gfc_get_dtype_rank_type): Reorder evaluation
891 of 'size'. If the element type is a pointer use the size of the
892 TREE_TYPE of the type, unless it is VOID_TYPE. In this latter
893 case, set the size to zero.
894
895 2018-05-13 Steven G. Kargl <kargl@gcc.gnu.org>
896
897 * gfortran.h: Remove prototype.
898 * symbol.c (gfc_new_undo_checkpoint): Remove unused function.
899
900 2018-05-11 Steven G. Kargl <kargl@gcc.gnu.org>
901
902 PR fortran/85542
903 * expr.c (check_inquiry): Avoid NULL pointer dereference.
904
905 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
906
907 PR fortran/85687
908 * check.c (gfc_check_rank): Check that the argument is a data object.
909
910 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
911
912 PR fortran/85521
913 * array.c (gfc_resolve_character_array_constructor): Substrings
914 with upper bound smaller than lower bound are zero length strings.
915
916 2018-05-10 Steven G. Kargl <kargl@gcc.gnu.org>
917
918 PR fortran/70870
919 * data.c (gfc_assign_data_value): Check that a data object does
920 not also have default initialization.
921
922 2018-05-10 Marek Polacek <polacek@redhat.com>
923
924 PR fortran/85735
925 * options.c (gfc_post_options): Set main_input_filename.
926
927 2018-05-10 Thomas Koenig <tkoenig@gcc.gnu.org>
928
929 PR fortran/54613
930 * intrinsic.texi: Document BACK for MINLOC and MAXLOC.
931
932 2018-05-10 Paul Thomas <pault@gcc.gnu.org>
933
934 PR fortran/68846
935 PR fortran/70864
936 * resolve.c (get_temp_from_expr): The temporary must not have
937 dummy or intent attributes.
938
939 2018-05-08 Thomas Koenig <tkoenig@gcc.gnu.org>
940
941 PR fortran/54613
942 * check.c (gfc_check_minmaxloc): Remove error for BACK not being
943 implemented. Use gfc_logical_4_kind for BACK.
944 * simplify.c (min_max_choose): Add optional argument back_val.
945 Handle it.
946 (simplify_minmaxloc_to_scalar): Add argument back_val. Pass
947 back_val to min_max_choose.
948 (simplify_minmaxloc_to_nodim): Likewise.
949 (simplify_minmaxloc_to_array): Likewise.
950 (gfc_simplify_minmaxloc): Add argument back, handle it.
951 Pass back_val to specific simplification functions.
952 (gfc_simplify_minloc): Remove ATTRIBUTE_UNUSED from argument back,
953 pass it on to gfc_simplify_minmaxloc.
954 (gfc_simplify_maxloc): Likewise.
955 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Adjust
956 comment. If BACK is true, use greater or equal (or lesser or
957 equal) insteal of greater (or lesser). Mark the condition of
958 having found a value which exceeds the limit as unlikely.
959
960 2018-05-07 Jeff Law <law@redhat.comg>
961
962 * scanner.c (preprocessor_line): Call linemap_add after a line
963 directive that changes the current filename.
964
965 2018-05-06 Andre Vehreschild <vehre@gcc.gnu.org>
966
967 PR fortran/85507
968 * dependency.c (gfc_dep_resolver): Revert looking at coarray dimension
969 introduced by r259385.
970 * trans-intrinsic.c (conv_caf_send): Always report a dependency for
971 same variables in coarray assignments.
972
973 2018-05-02 Tom de Vries <tom@codesourcery.com>
974
975 PR libgomp/82428
976 * f95-lang.c (DEF_GOACC_BUILTIN_ONLY): Define.
977
978 2018-04-24 Steven G. Kargl <kargl@gcc.gnu.org>
979
980 PR fortran/85520
981 * decl.c (gfc_match_char_spec): Check for negative length and set to 0.
982
983 2018-04-14 Andre Vehreschild <vehre@gcc.gnu.org>
984
985 PR fortran/81773
986 PR fortran/83606
987 * dependency.c (gfc_dep_resolver): Coarray indexes are to be ignored
988 during dependency computation. They define no data dependency.
989 * trans-array.c (conv_array_index_offset): The stride can not be set
990 here, prevent fail.
991 * trans-intrinsic.c (conv_caf_send): Add creation of temporary array
992 for caf_get's result and copying to the array with vectorial
993 indexing.
994
995 2018-04-14 Thomas Koenig <tkoenig@gcc.gnu.org>
996
997 PR fortran/85387
998 * frontend-passes.c (traverse_io_block): Check for start, end or
999 stride being defined by an outer implied DO loop.
1000
1001 2018-04-12 Thomas Koenig <tkoenig@gcc.gnu.org>
1002
1003 PR fortran/83064
1004 PR testsuite/85346
1005 * trans-stmt.c (gfc_trans_forall_loop): Use annot_expr_ivdep_kind
1006 for annotation and remove dependence on -ftree-parallelize-loops.
1007
1008 2018-04-10 Jakub Jelinek <jakub@redhat.com>
1009
1010 PR fortran/85313
1011 * openmp.c (resolve_omp_do): Remove bogus if (j < i) break;.
1012 (resolve_oacc_nested_loops): Likewise. Formatting fix.
1013
1014 2018-04-09 Thomas Koenig <tkoenig@gcc.gnu.org>
1015
1016 PR fortran/83064
1017 * trans-stmt.c (gfc_trans_forall_loop): Remove annotation for
1018 parallell processing of DO CONCURRENT -ftree-parallelize-loops
1019 is set.
1020
1021 2018-04-09 Thomas Koenig <tkoenig@gcc.gnu.org>
1022
1023 PR fortran/51260
1024 * resolve.c (resolve_variable): Simplify cases where access to a
1025 parameter array results in a single constant.
1026
1027 2018-04-02 Thomas Koenig <tkoenig@gcc.gnu.org>
1028
1029 PR fortran/85102
1030 * decl.c (variable_decl): If upper or lower bounds simplify
1031 to a constant, use that.
1032
1033 2018-03-30 Paul Thomas <pault@gcc.gnu.org>
1034
1035 PR fortran/84931
1036 * simplify.c (gfc_convert_constant): Handle case of array
1037 constructors within an array that has no iterator and improve
1038 the conciseness of this section of code.
1039
1040 2017-03-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1041
1042 PR fortran/85111
1043 * array.c (gfc_resolve_character_array_constructor): Early
1044 exit for zero-size arrays.
1045 * simplify.c (simplify_transformation_to_array): Exit early
1046 if the result size is zero.
1047 (simplify_minmaxloc_to_array): Likewise.
1048
1049 2018-03-28 Mikael Morin <mikael@gcc.gnu.org>
1050
1051 PR fortran/69497
1052 * symbol.c (gfc_symbol_done_2): Start freeing namespaces
1053 from the root.
1054 (gfc_free_namespace): Restore assert (revert r258839).
1055
1056 2018-03-28 Jakub Jelinek <jakub@redhat.com>
1057
1058 * gfortran.h (gfc_dt): Rename default_exp field to dec_ext.
1059 * ioparm.def (IOPARM_dt_default_exp): Rename to ...
1060 (IOPARM_dt_dec_ext): ... this.
1061 * trans-io.c (build_dt): Adjust for default_exp renaming to
1062 dec_ext and IOPARM_dt_default_exp renaming to IOPARM_dt_dec_ext.
1063 * io.c (match_io): Likewise.
1064
1065 2018-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
1066
1067 PR fortran/85084
1068 * frontend-passes.c (gfc_run_passes): Do not run front-end
1069 optimizations if a previous error occurred.
1070
1071 2018-03-27 Thomas Koenig <tkoenig@gcc.gnu.org>
1072 Harald Anlauf <anlauf@gmx.de>
1073
1074 PR fortran/85083
1075 * primary.c (gfc_convert_to_structure_constructor): Check
1076 conformance of argument types in structure constructor.
1077
1078 2018-03-26 Thomas Koenig <tkoenig@gcc.gnu.org>
1079
1080 PR fortran/66709
1081 * io.c: Include constructor.h.
1082 (resolve_tag_format): For a constant character array, concatenate
1083 into a single character expression.
1084
1085 2018-03-25 Seth Johnson <johnsonsr@ornl.gov>
1086 Dominique d'Humieres <dominiq@gcc.gnu.org>
1087
1088 PR fortran/84924
1089 * check.c (gfc_check_c_f_pointer): Allow scalar noninteroperable
1090 scalar derived type with -std=f2003 and -std=f2008.
1091
1092 2018-03-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1093 Dominique d'Humieres <dominiq@gcc.gnu.org>
1094
1095 PR fortran/69497
1096 * symbol.c (gfc_free_namespace): Delete the assert and only if
1097 refs count is equals zero, free the namespace. Otherwise,
1098 something is halfway and other errors will resound.
1099
1100 2018-03-24 Thomas Koenig <tkoenig@gcc.gnu.org>
1101
1102 PR fortran/70068
1103 * expr.c (find_substring_ref): Change types of start, end
1104 and length variables to gfc_charlen_t. Set length to zero
1105 for empty substring.
1106
1107 2018-03-24 Steven G. Kargl <kargl@gcc.gnu.org>
1108
1109 PR fortran/42651
1110 * decl.c (check_function_name): Improved error message
1111 (gfc_match_volatile, gfc_match_asynchronous) Use check_function_name.
1112
1113 2018-03-22 Steven G. Kargl <kargl@gcc.gnu.org>
1114
1115 PR fortran/84922
1116 * decl.c (get_proc_name): If the MODULE prefix appears in interface
1117 body, then it must appear on the contained subroutine or function.
1118 While here, fix nearby mis-indented code.
1119
1120 2018-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
1121 Harald Anlauf <anlauf@gmx.de>
1122
1123 PR fortran/84957
1124 * trans-types.c (gfc_sym_type): Do not dereference NULL pointer.
1125
1126 2018-03-21 Janne Blomqvist <jb@gcc.gnu.org>
1127
1128 PR fortran/84615
1129 * trans-expr.c (gfc_conv_procedure_call): Convert charlen to
1130 gfc_charlen_type_node when calling procedure.
1131
1132 2018-03-20 Steven G. Kargl <kargl@gcc.gnu.org>
1133
1134 PR fortran/85001
1135 * interface.c (symbol_rank): Remove bogus null pointer check that
1136 crept in when translating a ternary operator into an if-else
1137 constructor.
1138
1139 2018-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
1140
1141 PR fortran/84931
1142 * simplify.c (gfc_convert_constant): Correctly handle iterators
1143 for type conversion.
1144
1145 2018-03-18 Steven G. Kargl <kargl@gcc.gnu.org>
1146
1147 PR fortran/77414
1148 * decl.c (get_proc_name): Check for a subroutine re-defined in
1149 the contain portion of a subroutine. Change language of existing
1150 error message to better describe the issue. While here fix whitespace
1151 issues.
1152
1153 2018-03-18 Steven G. Kargl <kargl@gcc.gnu.org>
1154
1155 PR fortran/65453
1156 * decl.c (get_proc_name): Catch clash between a procedure statement
1157 and a contained subprogram
1158
1159 2018-03-16 Steven G. Kargl <kargl@gcc.gnu.org>
1160
1161 PR fortran/69395
1162 * decl.c (merge_array_spec): Correct the error condition.
1163
1164 2018-03-15 Steven G. Kargl <kargl@gcc.gnu.org>
1165
1166 PR fortran/78741
1167 * decl.c (get_proc_name): Check for clash of entry name with
1168 subroutine name.
1169
1170 2018-03-15 Steven G. Kargl <kargl@gcc.gnu.org>
1171
1172 PR fortran/69395
1173 * decl.c (merge_array_spec): Limit the merging to maximum allowed
1174 dimensions, and issue error message if limit is exceeded.
1175
1176 2018-03-13 Steven G. Kargl <kargl@gcc.gnu.org>
1177
1178 * check.c (gfc_check_kill_sub): Remove check for INTEGER(4) or (8).
1179 * intrinsic.c (add_functions): Remove reference to gfc_resolve_kill.
1180 (add_subroutines): Remove reference to gfc_resolve_kill_sub.
1181 * intrinsic.texi: Update documentation.
1182 * iresolve.c (gfc_resolve_kill, gfc_resolve_kill_sub): Remove.
1183 * trans-decl.c (gfc_build_intrinsic_function_decls): Add
1184 gfor_fndecl_kill and gfor_fndecl_kill_sub
1185 * trans-intrinsic.c (conv_intrinsic_kill, conv_intrinsic_kill_sub): new
1186 functions.
1187 (gfc_conv_intrinsic_function): Use conv_intrinsic_kill.
1188 (gfc_conv_intrinsic_subroutine): Use conv_intrinsic_kill_sub.
1189 * trans.h: Declare gfor_fndecl_kill and gfor_fndecl_kill_sub.
1190
1191 2018-03-11 Paul Thomas <pault@gcc.gnu.org>
1192
1193 PR fortran/84546
1194 * trans-array.c (structure_alloc_comps): Make sure that the
1195 vptr is copied and that the unlimited polymorphic _len is used
1196 to compute the size to be allocated.
1197 * trans-expr.c (gfc_get_class_array_ref): If unlimited, use the
1198 unlimited polymorphic _len for the offset to the element.
1199 (gfc_copy_class_to_class): Set the new 'unlimited' argument.
1200 * trans.h : Add the boolean 'unlimited' to the prototype.
1201
1202 2018-03-11 Steven G. Kargl <kargl@gcc.gnu.org>
1203
1204 PR fortran/83939
1205 * resolve.c (resolve_fl_procedure): Enforce F2018:C15100.
1206
1207 2018-03-11 Steven G. Kargl <kargls@gcc.gnu.org>
1208
1209 * check.c (gfc_check_kill): Check pid and sig are scalar.
1210 (gfc_check_kill_sub): Restrict kind to 4 and 8.
1211 * intrinsic.c (add_function): Sort keyword list. Add pid and sig
1212 keywords for KILL. Remove redundant *back="back" in favor of the
1213 original *bck="back".
1214 (add_subroutines): Sort keyword list. Add pid and sig keywords
1215 for KILL.
1216 * intrinsic.texi: Fix documentation to consistently use pid and sig.
1217 * iresolve.c (gfc_resolve_kill): Kind can only be 4 or 8. Choose the
1218 correct function.
1219 (gfc_resolve_rename_sub): Add comment.
1220
1221 2018-03-11 Thomas Koenig <tkoenig@gcc.gnu.org>
1222
1223 PR fortran/66128
1224 * simplify.c (simplify_transformation): Return default result for
1225 empty array argument.
1226 (gfc_simplify_all): Remove special-case handling for zerosize.
1227 (gfc_simplify_any): Likewise.
1228 (gfc_simplify_count): Likewise.
1229 (gfc_simplify_iall): Likewise.
1230 (gfc_simplify_iany): Likewise.
1231 (gfc_simplify_iparity): Likewise.
1232 (gfc_simplify_minval): Likewise.
1233 (gfc_simplify_maxval): Likewise.
1234 (gfc_simplify_norm2): Likewise.
1235 (gfc_simplify_product): Likewise.
1236 (gfc_simplify_sum): Likewise.
1237
1238 2018-03-10 Steven G. Kargl <kargl@gcc.gnu.org>
1239
1240 PR fortran/84734
1241 * arith.c (check_result, eval_intrinsic): If result overflows, pass
1242 the expression up the chain instead of a NULL pointer.
1243
1244 2018-03-07 Steven G. Kargl <kargl@gcc.gnu.org>
1245
1246 PR fortran/64124
1247 PR fortran/70409
1248 * decl.c (gfc_match_char_spec): Try to reduce a charlen to a constant.
1249
1250 2017-03-06 Thomas Koenig <tkoenig@gcc.gnu.org>
1251
1252 PR fortran/84697
1253 PR fortran/66128
1254 * expr.c (simplify_parameter_variable): If p is a size zero array
1255 and not an ARRAY_EXPR insert an empty array constructor and
1256 return.
1257 * gfortran.h: Add prototype for gfc_is_size_zero_array.
1258 * simplify.c (is_size_zero_array): Make non-static and rename into
1259 (gfc_is_size_zero_array): Check for parameter arrays of zero
1260 size by comparing shape and absence of constructor.
1261 (gfc_simplify_all): Use gfc_is_size_zero_array instead of
1262 is_size_zero_array.
1263 (gfc_simplify_count): Likewise.
1264 (gfc_simplify_iall): Likewise.
1265 (gfc_simplify_iany): Likewise.
1266 (gfc_simplify_iparity): Likewise.
1267 (gfc_simplify_minval): Likewise.
1268 (gfc_simplify_maxval): Likewise.
1269 (gfc_simplify_product): Likewise.
1270 (gfc_simplify_sum): Likewise.
1271
1272 2018-03-06 Steven G. Kargl <kargl@gcc.gnu.org>
1273
1274 PR fortran/56667
1275 * primary.c (match_sym_complex_part): Give the matcher for an implied
1276 do-loop a chance to run.
1277
1278 2018-03-03 Harald Anlauf <anlauf@gmx.de>
1279
1280 PR fortran/71085
1281 * trans-expr.c (gfc_apply_interface_mapping_to_expr): Do not
1282 dereference NULL pointer.
1283
1284 2018-03-03 Steven G. Kargl <kargl@gcc.gnu.org>
1285
1286 PR fortran/66128
1287 * simplify.c (is_size_zero_array): New function to check for size
1288 zero array.
1289 (gfc_simplify_all, gfc_simplify_any, gfc_simplify_count,
1290 gfc_simplify_iall, gfc_simplify_iany, gfc_simplify_iparity,
1291 gfc_simplify_minval, gfc_simplify_maxval, gfc_simplify_norm2,
1292 gfc_simplify_product, gfc_simplify_sum): Use it, and implement
1293 requirements from F2018.
1294
1295 2018-03-03 Steven G. Kargl <kargl@gcc.gnu.org>
1296
1297 PR fortran/51434
1298 * simplify.c (gfc_simplify_transfer): Resolve mold.
1299
1300 2018-03-03 Paul Thomas <pault@gcc.gnu.org>
1301
1302 PR fortran/80965
1303 * resolve.c (build_loc_call): Change symtree name from 'loc' to
1304 '_loc'.
1305
1306 2018-03-01 Paul Thomas <pault@gcc.gnu.org>
1307
1308 PR fortran/84219
1309 * target-memory.c (gfc_interpret_derived): Assert that BT_VOID
1310 components are caf tokens.
1311 (gfc_target_interpret_expr): Treat BT_VOID expressions as
1312 integers.
1313
1314 2018-03-01 Paul Thomas <pault@gcc.gnu.org>
1315
1316 PR fortran/84538
1317 * class.c (class_array_ref_detected): Remove the condition that
1318 there be no reference after the array reference.
1319 (find_intrinsic_vtab): Remove excess whitespace.
1320 * trans-array.c (gfc_conv_scalarized_array_ref): Rename 'tmp'
1321 as 'base and call build_class_array_ref earlier.
1322
1323 2018-02-28 Paul Thomas <pault@gcc.gnu.org>
1324
1325 PR fortran/83901
1326 * trans-stmt.c (trans_associate_var): Make sure that the se
1327 expression is a pointer type before converting it to the symbol
1328 backend_decl type.
1329
1330 2018-02-25 Steven G. Kargl <kargl@gcc.gnu.org>
1331
1332 PR fortran/83633
1333 * decl.c (variable_decl): Check that an explicit-shape-array with
1334 nonconstant bounds is allowed.
1335
1336 2018-02-25 Paul Thomas <pault@gcc.gnu.org>
1337
1338 PR fortran/84523
1339 * trans-intrinsic.c (gfc_conv_allocated): If the argument se
1340 has a pre block, add it to the expression pre block.
1341
1342 2018-02-25 Thomas Koenig <tkoenig@gcc.gnu.org>
1343
1344 PR fortran/78238
1345 * gfortran.h (gfc_integer_4_kind): Define.
1346 * resolve.c (resolve_select_type): Make sure that the
1347 kind of c->high is gfc_integer_4_kind.
1348
1349 2018-02-24 Steven G. Kargl <kargl@gcc.gnu.org>
1350
1351 PR fortran/30792
1352 * decl.c (gfc_match_data): Check for invalid substring in
1353 data-implied-do
1354
1355 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
1356
1357 * intrinsic.texi: Arguments to MATMUL cannot both be rank one.
1358
1359 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
1360
1361 PR fortran/84511
1362 * trans-io.c (transfer_expr): Deal with C_LOC in transfer statement.
1363
1364 2018-02-23 Steven G. Kargl <kargl@gcc.gnu.org>
1365
1366 PR fortran/84346
1367 * interface.c (compare_actual_formal): Issue error if keyword is
1368 used in a statement function.
1369
1370 2018-02-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1371
1372 PR fortran/84506
1373 * trans-io.c (set_parameter_value_inquire): Adjust range check of
1374 negative unit values for kind=8 units to the kind=4 negative limit.
1375
1376 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
1377
1378 PR fortran/83149
1379 * trans-types.c (gfc_sym_type): Test sym->ns->proc_name before
1380 accessing its components.
1381
1382 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
1383
1384 PR fortran/83149
1385 * trans-decl.c (gfc_finish_var_decl): Test sym->ns->proc_name
1386 before accessing its components.
1387
1388 2018-02-23 Paul Thomas <pault@gcc.gnu.org>
1389
1390 PR fortran/83148
1391 * trans-const.c : Clean up some whitespace issues.
1392 * trans-expr.c (gfc_conv_initializer): If an iso_c_binding
1393 derived type has a kind value of zero, set it to the default
1394 integer kind.
1395
1396 2018-02-23 Janne Blomqvist <jb@gcc.gnu.org>
1397
1398 PR fortran/84519
1399 * trans-decl.c (gfc_build_builtin_function_decls): Add bool
1400 argument to stop and error stop decls.
1401 * trans-stmt.c (gfc_trans_stop): Add false value to argument
1402 lists.
1403
1404 2018-02-22 Janne Blomqvist <jb@gcc.gnu.org>
1405
1406 PR 78534
1407 PR 84509
1408 * trans-decl.c (gfc_build_builtin_function_decls): Pass
1409 gfc_int8_type node to pause_numeric, size_type_node to
1410 pause_string.
1411 * trans-stmt.c (gfc_trans_pause): Likewise.
1412
1413 2018-02-22 Janne Blomqvist <jb@gcc.gnu.org>
1414
1415 * gfortran.texi: Update Coarray API description.
1416 * trans-decl.c (gfc_build_builtin_function_decls): Use size_t for
1417 character lengths, int for exit codes.
1418 (generate_coarray_sym_init): Use size_t for character length.
1419 * trans-intrinsic.c (conv_co_collective): Likewise.
1420 * trans-stmt.c (gfc_trans_lock_unlock): Likewise.
1421 (gfc_trans_event_post_wait): Likewise.
1422 (gfc_trans_sync): Likewise.
1423 (gfc_trans_stop): Use size_t for character lengths, int for exit
1424 codes.
1425
1426 2018-02-20 Thomas Koenig <tkoenig@gcc.gnu.org>
1427
1428 PR fortran/48890
1429 PR fortran/83823
1430 * primary.c (gfc_convert_to_structure_constructor):
1431 For a constant string constructor, make sure the length
1432 is correct.
1433
1434 2018-02-19 Paul Thomas <pault@gcc.gnu.org>
1435
1436 PR fortran/83344
1437 PR fortran/83975
1438 * resolve.c (resolve_assoc_var): Rearrange the logic for the
1439 determination of the character length of associate names. If
1440 the associate name is missing a length expression or the length
1441 expression is not a constant and the target is not a variable,
1442 make the associate name allocatable and deferred length.
1443 * trans-decl.c (gfc_get_symbol_decl): Null the character length
1444 backend_decl for deferred length associate names that are not
1445 variables. Set 'length' to gfc_index_zero_node for character
1446 associate names, whose character length is a PARM_DECL.
1447
1448 2018-02-19 Thomas Koenig <tkoenig@gcc.gnu.org>
1449
1450 PR fortran/35339
1451 * frontend-passes.c (traverse_io_block): Remove workaround for
1452 PR 80945.
1453
1454 2018-02-19 Andre Vehreschild <vehre@gcc.gnu.org>
1455
1456 * gfortran.texi: Document additional src/dst_type. Fix some typos.
1457 * trans-decl.c (gfc_build_builtin_function_decls): Declare the new
1458 argument of _caf_*_by_ref () with * e { get, send, sendget }.
1459 * trans-intrinsic.c (gfc_conv_intrinsic_caf_get): Add the type of the
1460 data referenced when generating a call to caf_get_by_ref ().
1461 (conv_caf_send): Same but for caf_send_by_ref () and
1462 caf_sendget_by_ref ().
1463
1464 2018-02-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1465
1466 PR fortran/84389
1467 * io.c (check_format): Allow FMT_COLON.
1468
1469 2018-02-18 Paul Thomas <pault@gcc.gnu.org>
1470
1471 PR fortran/80945
1472 * trans-array.c (gfc_conv_expr_descriptor): Set parmtype from
1473 the typenode in the case of deferred length characters.
1474
1475 2018-02-17 Thomas Koenig <tkoenig@gcc.gnu.org>
1476
1477 PR fortran/84270
1478 * frontend-passes (scalarized_expr): If the expression
1479 is an assumed size array, leave in the last reference
1480 and pass AR_SECTION instead of AR_FULL to gfc_resolve
1481 in order to avoid an error.
1482
1483 2018-02-17 Paul Thomas <pault@gcc.gnu.org>
1484
1485 PR fortran/84115
1486 * resolve.c (resolve_assoc_var): If a non-constant target expr.
1487 has no string length expression, make the associate variable
1488 into a deferred length, allocatable symbol.
1489 * trans-decl.c (gfc_is_reallocatable_lhs): Add and use a ptr to
1490 the symbol.
1491 * trans-stmt.c (trans_associate_var): Null and free scalar
1492 associate names that are allocatable. After assignment, remove
1493 the allocatable attribute to prevent reallocation.
1494
1495 2018-02-16 Jakub Jelinek <jakub@redhat.com>
1496
1497 PR fortran/84418
1498 * trans-openmp.c (gfc_trans_omp_clauses): For OMP_CLAUSE_LINEAR_REF
1499 kind set OMP_CLAUSE_LINEAR_STEP to TYPE_SIZE_UNIT times last_step.
1500
1501 2018-02-16 Dominique d'Humieres <dominiq@gcc.gnu.org>
1502
1503 PR fortran/84354
1504 * decl.c (gfc_get_pdt_instance): Replace '%qs' with %qs.
1505
1506 2018-02-15 Janus Weil <janus@gcc.gnu.org>
1507
1508 PR fortran/84409
1509 * interface.c (check_dtio_arg_TKR_intent): Add a check for character
1510 length.
1511
1512 2018-02-14 Janus Weil <janus@gcc.gnu.org>
1513
1514 PR fortran/84385
1515 * match.c (gfc_match_select_type): Fix check for selector in
1516 SELECT TYPE statement.
1517
1518 2018-02-13 Janus Weil <janus@gcc.gnu.org>
1519
1520 PR fortran/84313
1521 * symbol.c (check_conflict): Reject procedure pointers in common blocks.
1522
1523 2018-02-13 Alastair McKinstry <alastair.mckinstry@sceal.ie>
1524 Janne Blomqvist <jb@gcc.gnu.org>
1525
1526 * module.c (dump_module): Use lbasename to ensure that module
1527 files are reproducible.
1528
1529 2018-02-12 Janus Weil <janus@gcc.gnu.org>
1530
1531 PR fortran/84273
1532 * resolve.c (resolve_component): Fix checks of passed argument in
1533 procedure-pointer components.
1534
1535 2018-02-11 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1536
1537 PR fortran/35299
1538 * resolve.c (resolve_formal_arglist): Update error message.
1539
1540 2018-02-11 Andre Vehreschild <vehre@gcc.gnu.org>
1541
1542 * gfortran.texi: Fix typos in documentation of caf_register ().
1543 * trans-array.c (structure_alloc_comps): Only register a component of
1544 a derived typed corray, not of an ultimate component coarray.
1545
1546 2018-02-11 Steven G. Kargl <kargl@gcc.gnu.org>
1547
1548 PR fortran/54223
1549 PR fortran/84276
1550 * interface.c (compare_actual_formal): Add in_statement_function
1551 bool parameter. Skip check of INTENT attribute for statement
1552 functions. Arguments to a statement function cannot be optional,
1553 issue error for missing argument.
1554 (gfc_procedure_use, gfc_ppc_use, gfc_arglist_matches_symbol): Use
1555 in_statement_function.
1556
1557 2018-02-11 Paul Thomas <pault@gcc.gnu.org>
1558
1559 PR fortran/84074
1560 * trans-expr.c (gfc_conv_derived_to_class): Set the use_offset
1561 flag. If the is a vector subscript or the expression is not a
1562 variable, make the descriptor one-based.
1563
1564 2018-02-10 Paul Thomas <pault@gcc.gnu.org>
1565
1566 PR fortran/84141
1567 PR fortran/84155
1568 * trans-array.c (gfc_array_init_size): Revert the change made
1569 in revision 257356 setting the dtype.
1570 * trans-types.c (gfc_get_dtype): Do not use the cached dtype.
1571 Call gfc_get_dtype_rank_type every time.
1572
1573 PR fortran/56691
1574 * trans-array.c (gfc_conv_expr_descriptor): If the source array
1575 is a descriptor type, use its offset, removing the condition
1576 that is be a class expression.
1577
1578 2018-02-07 Steven G. Kargl <kargl@gcc.gnu.org>
1579
1580 PR fortran/82994
1581 * match.c (gfc_match_deallocate): Check for NULL pointer.
1582
1583 2018-02-07 Thomas Koenig <tkoenig@gcc.gnu.org>
1584
1585 PR fortran/68560
1586 * trans-intrinsic.c (gfc_conv_intrinsic_shape): New function.
1587 (gfc_conv_intrinsic_function): Call it.
1588
1589 2018-02-07 Steven G. Kargl <kargl@gcc.gnu.org>
1590
1591 PR fortran/82049
1592 * match.c (gfc_match_type_spec): If the charlen is non-NULL, then
1593 try to resolve it. While here return early if possible.
1594
1595 2018-02-04 Paul Thomas <pault@gcc.gnu.org>
1596
1597 PR fortran/84115
1598 * trans-decl.c (gfc_get_symbol_decl): Do not finish the decl of
1599 'length' if the symbol charlen backend_decl is an indirect ref.
1600
1601 2018-02-03 Paul Thomas <pault@gcc.gnu.org>
1602
1603 PR fortran/84141
1604 PR fortran/84155
1605 * trans-array.c (gfc_array_init_size): Instead of gfc_get_dtype
1606 use gfc_get_dtype_rank_type.
1607
1608 2018-02-01 Janne Blomqvist <jb@gcc.gnu.org>
1609
1610 PR 83975
1611 PR 83344
1612 * resolve.c (resolve_assoc_var): Generate an error if
1613 target length unknown.
1614
1615 2018-02-01 Janne Blomqvist <jb@gcc.gnu.org>
1616
1617 PR fortran/83705
1618 * simplify.c (gfc_simplify_repeat): Increase limit for deferring
1619 to runtime, print a warning message.
1620
1621 2018-01-31 Jakub Jelinek <jakub@redhat.com>
1622
1623 PR fortran/84116
1624 * openmp.c (gfc_match_omp_clauses): If all the linear
1625 gfc_match_omp_variable_list calls failed, don't gfc_free_omp_namelist
1626 nor set *head = NULL. Formatting fixes.
1627
1628 2018-01-31 Paul Thomas <pault@gcc.gnu.org>
1629
1630 PR fortran/84088
1631 * trans-expr.c (gfc_conv_procedure_call): If the parm expr is
1632 an address expression passed to an assumed rank dummy, convert
1633 to an indirect reference.
1634
1635 2018-01-31 Thomas Koenig <tkoenig@gcc.gnu.org>
1636
1637 * dump-parse-tree.c (write_proc): Use sym_name (which may
1638 be sym->binding_label) instead of sym->name.
1639
1640 2018-01-31 Janne Blomqvist <jb@gcc.gnu.org>
1641
1642 * trans-const.c (gfc_conv_string_init): Use gfc_charlen_t instead
1643 of int for slen.
1644
1645 2018-01-31 Janne Blomqvist <jb@gcc.gnu.org>
1646
1647 PR fortran/78534
1648 * trans-expr.c (fill_with_spaces): Use memset instead of
1649 generating loop.
1650 (gfc_trans_string_copy): Improve opportunity to use builtins with
1651 constant lengths.
1652
1653 2018-01-30 Jakub Jelinek <jakub@redhat.com>
1654
1655 PR debug/84131
1656 * trans-array.c (gfc_get_descriptor_offsets_for_info): Set *data_off
1657 to DATA_FIELD's offset rather than OFFSET_FIELD's offset.
1658
1659 2018-01-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1660
1661 PR fortran/84134
1662 * array.c (gfc_ref_dimen_size): Whitespace fixes. If stride is
1663 zero, return false.
1664
1665 2018-01-30 Thomas Koenig <tkoenig@gcc.gnu.org>
1666
1667 PR fortran/84133
1668 * frontend-passes (matmul_to_var_expr): Return early if
1669 in association list.
1670 (inline_matmul_assign): Likewise.
1671
1672 2017-01-29 Thomas Koenig <tkoenig@gcc.gnu.org>
1673
1674 PR fortran/84073
1675 * resolve.c (resolve_component): Ensure BIND(C) character
1676 components have length one.
1677 (resolve_symbol): Likewise for variables.
1678
1679 2018-01-27 Jakub Jelinek <jakub@redhat.com>
1680
1681 PR fortran/84065
1682 * decl.c (add_init_expr_to_sym): Ignore initializers for too large
1683 lengths.
1684
1685 2018-01-26 Damian Rouson <damian@sourceryinstitute.org>
1686 Alessandro Fanfarillo <fanfarillo.gcc@gmail.com>
1687 Soren Rasmussen <s.c.rasmussen@gmail.com>
1688
1689 Partial support for Fortran 2018 teams features.
1690
1691 * array.c (gfc_match_array_ref): add team attribute in coarray
1692 transfers.
1693 * check.c (gfc_check_get_team, gfc_check_team_number): add new
1694 functions for get_team and team_number.
1695 * dump-parse-tree.c (show_code_node): add new statements: form team,
1696 change team, end team, and sync team.
1697 * expr.c (gfc_find_team_co): add new function.
1698 * gfortran.h: add new statements.
1699 * intrinsic.c (add_functions): add get_team and team_number functions.
1700 * intrinsic.h: add get_team and team_number prototypes for check,
1701 simplify, and resolve.
1702 * iresolve.c (gfc_resolve_get_team, gfc_resolve_team_number): add new
1703 functions.
1704 * iso-fortran-env.def: add the team_type derived type.
1705 * match.c (gfc_match_if, gfc_match_form_team, gfc_match_team_number)
1706 (gfc_match_end_team, gfc_match_sync_team, gfc_match_change_team):
1707 add change team, end team, form team, sync team match and functions.
1708 * match.h: add new prototypes for change team, end team, form team,
1709 and sync team.
1710 * parse.c (decode_statement): add cases for change team, end team,
1711 form team, and sync team.
1712 * resolve.c: add cases for exec form team, change team, end team, and
1713 sync team.
1714 * simplify.c (gfc_simplify_get_team): add new function for get team.
1715 * st.c (gfc_free_statement): add cases exec for change team, end team,
1716 form team, sync team.
1717 * trans-decl.c (gfor_fndecl_caf_form_team)
1718 (gfor_fndecl_caf_change_team, gfor_fndecl_caf_end_team)
1719 (gfor_fndecl_caf_sync_team, gfor_fndecl_caf_get_team)
1720 (gfor_fndecl_caf_team_number): add functions and definitions.
1721 * trans-intrinsic.c (conv_caf_send, conv_intrinsic_team_number): add
1722 new function and team_type argument support.
1723 * trans-stmt.c (gfc_trans_form_team, gfc_trans_change_team)
1724 (gfc_trans_end_team, gfc_trans_sync_team): add new functions.
1725 * trans-stmt.h: add new prototypes.
1726 * trans-types.c (gfc_get_derived_type): check condition for team_type.
1727 * trans.c (trans_code): new exec cases for form team, change team, end
1728 team, and sync team.
1729 * trans.h: add new prototypes.
1730
1731 2018-01-26 Steven G. Kargl <kargl@gcc.gnu.org>
1732
1733 PR fortran/83998
1734 * simplify.c (compute_dot_product): Initialize result to INTEGER(1) 0
1735 or .false. The summation does the correct type conversion.
1736 (gfc_simplify_dot_product): Special case zero-sized arrays.
1737
1738 2018-25-01 Paul Thomas <pault@gcc.gnu.org>
1739
1740 PR fortran/37577
1741 * array.c (gfc_match_array_ref): If standard earlier than F2008
1742 it is an error if the reference dimension is greater than 7.
1743 libgfortran.h : Increase GFC_MAX_DIMENSIONS to 15. Change the
1744 dtype masks and shifts accordingly.
1745 * trans-array.c (gfc_conv_descriptor_dtype): Use the dtype
1746 type node to check the field.
1747 (gfc_conv_descriptor_dtype): Access the rank field of dtype.
1748 (duplicate_allocatable_coarray): Access the rank field of the
1749 dtype descriptor rather than the dtype itself.
1750 * trans-expr.c (get_scalar_to_descriptor_type): Store the type
1751 of 'scalar' on entry and use its TREE_TYPE if it is ARRAY_TYPE
1752 (ie. a character).
1753 (gfc_conv_procedure_call): Pass TREE_OPERAND (tmp,0) to
1754 get_scalar_to_descriptor_type if the actual expression is a
1755 constant.
1756 (gfc_trans_structure_assign): Assign the rank directly to the
1757 dtype rank field.
1758 * trans-intrinsic.c (gfc_conv_intrinsic_rank): Cast the result
1759 to default integer kind.
1760 (gfc_conv_intrinsic_sizeof): Obtain the element size from the
1761 'elem_len' field of the dtype.
1762 * trans-io.c (gfc_build_io_library_fndecls): Replace
1763 gfc_int4_type_node with dtype_type_node where necessary.
1764 (transfer_namelist_element): Use gfc_get_dtype_rank_type for
1765 scalars.
1766 * trans-types.c : Provide 'get_dtype_type_node' to acces the
1767 dtype_type_node and, if necessary, build it.
1768 The maximum size of an array element is now determined by the
1769 maximum value of size_t.
1770 Update the description of the array descriptor, including the
1771 type def for the dtype_type.
1772 (gfc_get_dtype_rank_type): Build a constructor for the dtype.
1773 Distinguish RECORD_TYPEs that are BT_DERIVED or BT_CLASS.
1774 (gfc_get_array_descriptor_base): Change the type of the dtype
1775 field to dtype_type_node.
1776 (gfc_get_array_descr_info): Get the offset to the rank field of
1777 the dtype.
1778 * trans-types.h : Add a prototype for 'get_dtype_type_node ()'.
1779 * trans.h : Define the indices of the dtype fields.
1780
1781 2018-23-01 Paul Thomas <pault@gcc.gnu.org>
1782
1783 PR fortran/83866
1784 * decl.c (gfc_match_derived_decl): If eos not matched, recover
1785 and emit error about garbage after declaration.
1786
1787 2018-23-01 Paul Thomas <pault@gcc.gnu.org>
1788
1789 PR fortran/83898
1790 * trans-stmt.c (trans_associate_var): Do not set cst_array_ctor
1791 for characters.
1792
1793 2018-01-22 Janne Blomqvist <jb@gcc.gnu.org>
1794
1795 PR 78534
1796 PR 83704
1797 * arith.c (gfc_arith_concat): Use size_t for string length.
1798 (gfc_compare_string): Likewise.
1799 (gfc_compare_with_Cstring): Likewise.
1800 * array.c (gfc_resolve_character_array_constructor): Use
1801 HOST_WIDE_INT, gfc_mpz_get_hwi.
1802 * check.c (gfc_check_fe_runtime_error): Use size_t.
1803 * data.c (create_character_initializer): Use HOST_WIDE_INT,
1804 gfc_extract_hwi.
1805 * decl.c (gfc_set_constant_character_len): Use gfc_charlen_t.
1806 (add_init_expr_to_sym): Use HOST_WIDE_INT.
1807 * expr.c (gfc_build_init_expr): Use HOST_WIDE_INT,
1808 gfc_extract_hwi.
1809 (gfc_apply_init): Likewise.
1810 * match.h (gfc_set_constant_character_len): Update prototype.
1811 * primary.c (match_string_constant): Use size_t.
1812 * resolve.c (resolve_ordinary_assign): Use HOST_WIDE_INT,
1813 gfc_mpz_get_hwi.
1814 * simplify.c (init_result_expr): Likewise.
1815 (gfc_simplify_len_trim): Use size_t.
1816 * target-memory.c (gfc_encode_character): Use size_t.
1817 (gfc_target_encode_expr): Use HOST_WIDE_INT, gfc_mpz_get_hwi.
1818 (interpret_array): Use size_t.
1819 (gfc_interpret_character): Likewise.
1820 * target-memory.h (gfc_encode_character): Update prototype.
1821 (gfc_interpret_character): Likewise.
1822 (gfc_target_interpret_expr): Likewise.
1823 * trans-const.c (gfc_build_string_const): Use size_t for length
1824 argument.
1825 (gfc_build_wide_string_const): Likewise.
1826 * trans-const.h (gfc_build_string_const): Likewise.
1827 (gfc_build_wide_string_const): Likewise.
1828
1829 2018-01-20 Steven G. Kargl <kargl@gcc.gnu.org>
1830
1831 PR fortran/83900
1832 * simplify.c (gfc_simplify_matmul): Set return type correctly.
1833
1834 2018-01-19 Steven G. Kargl <kargl@gcc.gnu.org>
1835
1836 PR fortran/83900
1837 * simplify.c (gfc_simplify_matmul): Delete bogus assertion.
1838
1839 2018-01-17 Harald Anlauf <anlauf@gmx.de>
1840
1841 PR fortran/83864
1842 * expr.c (add_init_expr_to_sym): Do not dereference NULL pointer.
1843
1844 2018-01-17 Harald Anlauf <anlauf@gmx.de>
1845
1846 PR fortran/83874
1847 * decl.c (add_init_expr_to_sym): Do not dereference NULL pointer.
1848
1849 2018-01-15 Louis Krupp <louis.krupp@zoho.com>
1850
1851 PR fortran/82257
1852 * interface.c (compare_rank): Don't try to retrieve CLASS_DATA
1853 from symbol marked unlimited polymorphic.
1854 * resolve.c (resolve_structure_cons): Likewise.
1855 * misc.c (gfc_typename): Don't dereference derived->components
1856 if it's NULL.
1857
1858 2018-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
1859
1860 PR fortran/54613
1861 * gfortran.h (gfc_check_f): Rename f4ml to f5ml.
1862 (gfc_logical_4_kind): New macro
1863 * intrinsic.h (gfc_simplify_minloc): Add a gfc_expr *argument.
1864 (gfc_simplify_maxloc): Likewise.
1865 (gfc_resolve_maxloc): Likewise.
1866 (gfc_resolve_minloc): Likewise.
1867 * check.c (gfc_check_minloc_maxloc): Add checking for "back"
1868 argument; also raise error if it is used (for now). Add it
1869 if it isn't present.
1870 * intrinsic.c (add_sym_4ml): Rename to
1871 (add_sym_5ml), adjust for extra argument.
1872 (add_functions): Add "back" constant. Adjust maxloc and minloc
1873 for back argument.
1874 * iresolve.c (gfc_resolve_maxloc): Add back argument. If back is
1875 not of gfc_logical_4_kind, convert.
1876 (gfc_resolve_minloc): Likewise.
1877 * simplify.c (gfc_simplify_minloc): Add back argument.
1878 (gfc_simplify_maxloc): Likewise.
1879 * trans-intinsic.c (gfc_conv_intrinsic_minmaxloc): Rename last
1880 argument to %VAL to ensure passing by value.
1881 (gfc_conv_intrinsic_function): Call gfc_conv_intrinsic_minmaxloc
1882 also for library calls.
1883
1884 2018-01-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1885
1886 PR fortran/82007
1887 * resolve.c (resolve_transfer): Delete code looking for 'DT'
1888 format specifiers in format strings. Set formatted to true if a
1889 format string or format label is present.
1890 * trans-io.c (get_dtio_proc): Likewise. (transfer_expr): Fix
1891 whitespace.
1892
1893 2018-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
1894
1895 PR fortran/83744
1896 * dump-parse-tree.c (get_c_type_name): Remove extra line.
1897 Change for loop to use declaration in for loop. Handle BT_LOGICAL
1898 and BT_CHARACTER.
1899 (write_decl): Add where argument. Fix indentation. Replace
1900 assert with error message. Add typename to warning
1901 in comment.
1902 (write_type): Adjust locus to call of write_decl.
1903 (write_variable): Likewise.
1904 (write_proc): Likewise. Replace assert with error message.
1905
1906 2018-01-13 Paul Thomas <pault@gcc.gnu.org>
1907
1908 PR fortran/52162
1909 * trans-expr.c (gfc_trans_scalar_assign): Flag is_alloc_lhs if
1910 the rhs expression is neither an elemental nor a conversion
1911 function.
1912
1913 PR fortran/83622
1914 * trans-array.c (is_pointer_array): Remove unconditional return
1915 of false for -fopenmp.
1916
1917 2018-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
1918 <emsr@gcc.gnu.org>
1919
1920 PR fortran/83803
1921 * dump-parse-tree.c (write_proc): Always emit closing parenthesis
1922 for functions.
1923
1924 2018-01-10 Steven G. Kargl <kargl@gcc.gnu.org>
1925
1926 PR fortran/82367
1927 * resolve.c (resolve_allocate_expr): Check for NULL pointer.
1928
1929 2018-01-10 Steven G. Kargl <kargl@gcc.gnu.org>
1930
1931 PR fortran/83093
1932 * resolve.c (resolve_charlen): Check the type of cl->length
1933 after resolution.
1934
1935 2018-01-10 Janne Blomqvist <jb@gcc.gnu.org>
1936
1937 PR fortran/83740
1938 * trans-array.c (gfc_trans_array_ctor_element): Fix formatting.
1939
1940 2018-01-10 Janne Blomqvist <jb@gcc.gnu.org>
1941
1942 PR fortran/83740
1943 * trans-array.c (gfc_trans_array_ctor_element): Convert RHS to the
1944 LHS type when assigning.
1945
1946 2018-01-09 Steven G. Kargl <kargl@gcc.gnu.org>
1947
1948 PR fortran/83742
1949 * expr.c (gfc_is_simply_contiguous): Check for NULL pointer.
1950
1951 2018-01-08 Steven G. Kargl <kargl@gcc.gnu.org>
1952
1953 * match.c (gfc_match_allocate): Check for NULL pointer.
1954
1955 2018-01-08 Steven G. Kargl <kargl@gcc.gnu.org>
1956
1957 * expr.c (gfc_check_pointer_assign): Fix typo in comment.
1958
1959 2018-01-08 Paul Thomas <pault@gcc.gnu.org>
1960
1961 PR fortran/83611
1962 * decl.c (gfc_get_pdt_instance): If parameterized arrays have
1963 an initializer, convert the kind parameters and add to the
1964 component if the instance.
1965 * trans-array.c (structure_alloc_comps): Add 'is_pdt_type' and
1966 use it with case COPY_ALLOC_COMP. Call 'duplicate_allocatable'
1967 for parameterized arrays. Clean up typos in comments. Convert
1968 parameterized array initializers and copy into the array.
1969 * trans-expr.c (gfc_trans_scalar_assign): Do a deep copy for
1970 parameterized types.
1971 *trans-stmt.c (trans_associate_var): Deallocate associate vars
1972 as necessary, when they are PDT function results for example.
1973
1974 PR fortran/83731
1975 * trans-array.c (structure_alloc_comps): Only compare len parms
1976 when they are declared explicitly.
1977
1978 2018-01-06 Janne Blomqvist <jb@gcc.gnu.org>
1979
1980 PR fortran/50892
1981 * trans-expr.c (gfc_trans_pointer_assignment): fold_convert rhs to
1982 lhs type.
1983
1984 2018-01-05 Janne Blomqvist <jb@gcc.gnu.org>
1985
1986 PR fortran/78534
1987 PR fortran/66310
1988 * array.c (got_charlen): Use gfc_charlen_int_kind.
1989 * class.c (gfc_find_derived_vtab): Use gfc_size_kind instead of
1990 hardcoded kind.
1991 (find_intrinsic_vtab): Likewise.
1992 * decl.c (match_char_length): Use gfc_charlen_int_kind.
1993 (add_init_expr_to_sym): Use gfc_charlen_t and gfc_charlen_int_kind.
1994 (gfc_match_implicit): Use gfc_charlen_int_kind.
1995 * dump-parse-tree.c (show_char_const): Use gfc_charlen_t and size_t.
1996 (show_expr): Use HOST_WIDE_INT_PRINT_DEC.
1997 * expr.c (gfc_get_character_expr): Length parameter of type
1998 gfc_charlen_t.
1999 (gfc_get_int_expr): Value argument of type HOST_WIDE_INT.
2000 (gfc_extract_hwi): New function.
2001 (simplify_const_ref): Make string_len of type gfc_charlen_t.
2002 (gfc_simplify_expr): Use HOST_WIDE_INT for substring refs.
2003 * frontend-passes.c (optimize_trim): Use gfc_charlen_int_kind.
2004 * gfortran.h (gfc_mpz_get_hwi): New prototype.
2005 (gfc_mpz_set_hwi): Likewise.
2006 (gfc_charlen_t): New typedef.
2007 (gfc_expr): Use gfc_charlen_t for character lengths.
2008 (gfc_size_kind): New extern variable.
2009 (gfc_extract_hwi): New prototype.
2010 (gfc_get_character_expr): Use gfc_charlen_t for character length.
2011 (gfc_get_int_expr): Use HOST_WIDE_INT type for value argument.
2012 * gfortran.texi: Update description of hidden string length argument.
2013 * iresolve.c (check_charlen_present): Use gfc_charlen_int_kind.
2014 (gfc_resolve_char_achar): Likewise.
2015 (gfc_resolve_repeat): Pass string length directly without
2016 temporary, use gfc_charlen_int_kind.
2017 (gfc_resolve_transfer): Use gfc_charlen_int_kind.
2018 * match.c (select_intrinsic_set_tmp): Use HOST_WIDE_INT for charlen.
2019 * misc.c (gfc_mpz_get_hwi): New function.
2020 (gfc_mpz_set_hwi): New function.
2021 * module.c (atom_int): Change type from int to HOST_WIDE_INT.
2022 (parse_integer): Don't complain about large integers.
2023 (write_atom): Use HOST_WIDE_INT for integers.
2024 (mio_integer): Handle integer type mismatch.
2025 (mio_hwi): New function.
2026 (mio_intrinsic_op): Use HOST_WIDE_INT.
2027 (mio_array_ref): Likewise.
2028 (mio_expr): Likewise.
2029 * primary.c (match_substring): Use gfc_charlen_int_kind.
2030 * resolve.c (resolve_substring_charlen): Use gfc_charlen_int_kind.
2031 (resolve_character_operator): Likewise.
2032 (resolve_assoc_var): Likewise.
2033 (resolve_select_type): Use HOST_WIDE_INT for charlen, use snprintf.
2034 (resolve_charlen): Use mpz_sgn to determine sign.
2035 * simplify.c (gfc_simplify_repeat): Use HOST_WIDE_INT/gfc_charlen_t
2036 instead of long.
2037 * symbol.c (generate_isocbinding_symbol): Use gfc_charlen_int_kind.
2038 * target-memory.c (size_character): Length argument of type
2039 gfc_charlen_t.
2040 (gfc_encode_character): Likewise.
2041 (gfc_interpret_character): Use gfc_charlen_t.
2042 * target-memory.h (gfc_encode_character): Modify prototype.
2043 * trans-array.c (gfc_trans_array_ctor_element): Use existing type.
2044 (get_array_ctor_var_strlen): Use gfc_conv_mpz_to_tree_type.
2045 (trans_array_constructor): Use existing type.
2046 (get_array_charlen): Likewise.
2047 * trans-const.c (gfc_conv_mpz_to_tree_type): New function.
2048 * trans-const.h (gfc_conv_mpz_to_tree_type): New prototype.
2049 * trans-decl.c (gfc_trans_deferred_vars): Use existing type.
2050 (add_argument_checking): Likewise.
2051 * trans-expr.c (gfc_class_len_or_zero_get): Build const of type
2052 gfc_charlen_type_node.
2053 (gfc_conv_intrinsic_to_class): Use gfc_charlen_int_kind instead of
2054 4, fold_convert to correct type.
2055 (gfc_conv_class_to_class): Build const of type size_type_node for
2056 size.
2057 (gfc_copy_class_to_class): Likewise.
2058 (gfc_conv_string_length): Use same type in expression.
2059 (gfc_conv_substring): Likewise, use HOST_WIDE_INT for charlen.
2060 (gfc_conv_string_tmp): Make sure len is of the right type.
2061 (gfc_conv_concat_op): Use same type in expression.
2062 (gfc_conv_procedure_call): Likewise.
2063 (fill_with_spaces): Comment out memset() block due to spurious
2064 -Wstringop-overflow warnings.
2065 (gfc_trans_string_copy): Use gfc_charlen_type_node.
2066 (alloc_scalar_allocatable_for_subcomponent_assignment):
2067 fold_convert to right type.
2068 (gfc_trans_subcomponent_assign): Likewise.
2069 (trans_class_vptr_len_assignment): Build const of correct type.
2070 (gfc_trans_pointer_assignment): Likewise.
2071 (alloc_scalar_allocatable_for_assignment): fold_convert to right
2072 type in expr.
2073 (trans_class_assignment): Build const of correct type.
2074 * trans-intrinsic.c (gfc_conv_associated): Likewise.
2075 (gfc_conv_intrinsic_repeat): Do calculation in sizetype.
2076 * trans-io.c (gfc_build_io_library_fndecls): Use
2077 gfc_charlen_type_node for character lengths.
2078 (set_string): Convert to right type in assignment.
2079 * trans-stmt.c (gfc_trans_label_assign): Build const of
2080 gfc_charlen_type_node.
2081 (trans_associate_var): Likewise.
2082 (gfc_trans_character_select): Likewise.
2083 (gfc_trans_allocate): Likewise, don't typecast strlen result.
2084 (gfc_trans_deallocate): Don't typecast strlen result.
2085 * trans-types.c (gfc_size_kind): New variable.
2086 (gfc_init_types): Determine gfc_charlen_int_kind and gfc_size_kind
2087 from size_type_node.
2088 * trans-types.h: Fix comment.
2089
2090 2018-01-04 Thomas Koenig <tkoenig@gcc.gnu.org>
2091
2092 PR fortran/83683
2093 PR fortran/45689
2094 * check.c (gfc_check_eoshift): Check for string length and
2095 for conformance of boundary.
2096 * intrinsic.c (add_functions): Add gfc_simplify_eoshift.
2097 * intrinsic.h: Add prototype for gfc_simplify_eoshift.
2098 * simplify.c (gfc_simplify_eoshift): New function.
2099
2100 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
2101 Alan Hayward <alan.hayward@arm.com>
2102 David Sherwood <david.sherwood@arm.com>
2103
2104 * trans-types.c (gfc_type_for_mode): Handle MODE_VECTOR_BOOL.
2105
2106 2018-01-03 Richard Sandiford <richard.sandiford@linaro.org>
2107 Alan Hayward <alan.hayward@arm.com>
2108 David Sherwood <david.sherwood@arm.com>
2109
2110 * trans-types.c (gfc_type_for_mode): Check valid_vector_subparts_p.
2111
2112 2018-01-03 Thomas Koenig <tkoenig@gcc.gnu.org>
2113
2114 PR fortran/83664
2115 * check.c (gfc_check_eoshift): Error for missing boundary if array
2116 is not one of the standard types.
2117
2118 2018-01-03 Jakub Jelinek <jakub@redhat.com>
2119
2120 Update copyright years.
2121
2122 * gfortranspec.c (lang_specific_driver): Update copyright notice
2123 dates.
2124 * gfc-internals.texi: Bump @copying's copyright year.
2125 * gfortran.texi: Ditto.
2126 * intrinsic.texi: Ditto.
2127 * invoke.texi: Ditto.
2128
2129 2017-01-02 Thomas Koenig <tkoenig@gcc.gnu.org>
2130
2131 PR fortran/45689
2132 * intrinsic.c (add_function): Add gfc_simplify_maxloc and
2133 gfc_simplify_minloc to maxloc and minloc, respectively.
2134 * intrinsic.h: Add prototypes for gfc_simplify_minloc
2135 and gfc_simplify_maxloc.
2136 * simplify.c (min_max_chose): Adjust prototype. Modify function
2137 to have a return value which indicates if the extremum was found.
2138 (is_constant_array_expr): Fix typo in comment.
2139 (simplify_minmaxloc_to_scalar): New function.
2140 (simplify_minmaxloc_nodim): New function.
2141 (new_array): New function.
2142 (simplify_minmaxloc_to_array): New function.
2143 (gfc_simplify_minmaxloc): New function.
2144 (simplify_minloc): New function.
2145 (simplify_maxloc): New function.
2146
2147 2018-01-02 Thomas Koenig <tkoenig@gcc.gnu.org>
2148
2149 PR fortran/45689
2150 PR fortran/83650
2151 * simplify.c (gfc_simplify_cshift): Re-implement to allow full
2152 range of arguments.
2153
2154 2018-01-01 Paul Thomas <pault@gcc.gnu.org>
2155
2156 PR fortran/83076
2157 * resolve.c (resolve_fl_derived0): Add caf_token fields for
2158 allocatable and pointer scalars, when -fcoarray selected.
2159 * trans-types.c (gfc_copy_dt_decls_ifequal): Copy the token
2160 field as well as the backend_decl.
2161 (gfc_get_derived_type): Flag GFC_FCOARRAY_LIB for module
2162 derived types that are not vtypes. Components with caf_token
2163 attribute are pvoid types. For a component requiring it, find
2164 the caf_token field and have the component token field point to
2165 its backend_decl.
2166
2167 PR fortran/83319
2168 *trans-types.c (gfc_get_array_descriptor_base): Add the token
2169 field to the descriptor even when codimen not set.
2170 \f
2171 Copyright (C) 2018 Free Software Foundation, Inc.
2172
2173 Copying and distribution of this file, with or without modification,
2174 are permitted in any medium without royalty provided the copyright
2175 notice and this notice are preserved.