| blob | 9b2c5c583f25371707d67f46a2b174cce8aa07a5 |
1 2016-10-17 Paul Thomas <pault@gcc.gnu.org>
3 PR fortran/61420
4 PR fortran/78013
5 * resolve.c (resolve_variable): Obtain the typespec for a
6 variable expression, when the variable is a function result
7 that is a procedure pointer.
9 2016-10-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
11 PR fortran/48298
12 * trans-io.c (transfer_expr): Ignore dtio procedures for inquire
13 with iolength.
15 2016-10-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
17 PR fortran/77972
18 * scanner.c (gfc_next_char_literal): If nextc is null do not
19 decrement the pointer and call the diagnostics.
21 2016-10-14 Andre Vehreschild <vehre@gcc.gnu.org>
23 * resolve.c (resolve_symbol): Add unimplemented message for
24 polymorphic types with allocatable/pointer components and coarray=lib.
26 2016-10-13 Thomas Preud'homme <thomas.preudhomme@arm.com>
28 * trans-intrinsic.c: Include memmodel.h.
30 2016-10-13 Andre Vehreschild <vehre@gcc.gnu.org>
32 PR fortran/72832
33 * trans-expr.c (gfc_copy_class_to_class): Add generation of
34 runtime array bounds check.
35 * trans-intrinsic.c (gfc_conv_intrinsic_size): Add a crutch to
36 get the descriptor of a function returning a class object.
37 * trans-stmt.c (gfc_trans_allocate): Use the array spec on the
38 array to allocate instead of the array spec from source=.
40 2016-10-12 Andre Vehreschild <vehre@gcc.gnu.org>
42 * trans-expr.c (gfc_find_and_cut_at_last_class_ref): Fixed style.
43 (gfc_trans_class_init_assign): Same.
44 (gfc_conv_procedure_call): Same.
45 (gfc_trans_assignment_1): Same.
46 * trans-stmt.c (gfc_trans_allocate): Same.
48 2016-10-11 Jakub Jelinek <jakub@redhat.com>
50 * iresolve.c (is_trig_resolved, resolve_trig_call): Formatting fixes.
51 * simplify.c (simplify_trig_call, degrees_f, radians_f,
52 gfc_simplify_atrigd, gfc_simplify_cotan): Likewise.
54 2016-10-11 Steven G. Kargl <kargl@gcc.gnu.org>
56 PR fortran/77942
57 * simplify.c (gfc_simplify_cshift): Check for zero.
59 2016-10-11 Fritz Reese <fritzoreese@gmail.com>
61 * iresolve.c (get_radians, get_degrees): Fix sloppy commit.
62 * simplify.c (degrees_f, radians_f): Ditto.
64 2016-10-11 Jerry DeLisle <jvdelisle@gcc.gnu.org>
66 * simplify.c (radians_f): Fix mpfr_mod.
67 * ireolce.c (get_degrees): Declare tmp.
69 2016-10-11 Fritz Reese <fritzoreese@gmail.com>
71 * lang.opt: New flag -fdec-math.
72 * options.c (set_dec_flags): Enable with -fdec.
73 * invoke.texi, gfortran.texi, intrinsic.texi: Update documentation.
74 * intrinsics.c (add_functions, do_simplify): New intrinsics
75 with -fdec-math.
76 * gfortran.h (gfc_isym_id): New isym GFC_ISYM_COTAN.
77 * gfortran.h (gfc_resolve_atan2d, gfc_resolve_cotan,
78 gfc_resolve_trigd, gfc_resolve_atrigd): New prototypes.
79 * iresolve.c (resolve_trig_call, get_degrees, get_radians,
80 is_trig_resolved, gfc_resolve_cotan, gfc_resolve_trigd,
81 gfc_resolve_atrigd, gfc_resolve_atan2d): New functions.
82 * intrinsics.h (gfc_simplify_atan2d, gfc_simplify_atrigd,
83 gfc_simplify_cotan, gfc_simplify_trigd): New prototypes.
84 * simplify.c (simplify_trig_call, degrees_f, radians_f,
85 gfc_simplify_cotan, gfc_simplify_trigd, gfc_simplify_atrigd,
86 gfc_simplify_atan2d): New functions.
88 2016-10-10 Thomas Koenig <tkoenig@gcc.gnu.org>
90 PR fortran/77915
91 * frontend-passes.c (inline_matmul_assign): Return early if
92 inside a FORALL statement.
94 2016-10-07 Fritz Reese <fritzoreese@gmail.com>
96 * interface.c (compare_components): Check charlen for BT_CHAR.
98 2016-10-07 Steven G. Kargl <kargl@gcc.gnu.org>
100 PR fortran/77406
101 * interface.c (gfc_compare_interfaces): Fix detection of ambiguous
102 interface involving alternate return.
103 (check_interface1): Improve error message and loci.
105 2016-10-06 Louis Krupp <louis.krupp@zoho.com>
107 PR fortran/69955
108 * trans-array.c (gfc_conv_expr_descriptor): Don't allocate
109 components if it's not necessary.
111 2016-10-05 Louis Krupp <louis.krupp@zoho.com>
113 PR fortran/57910
114 * trans-expr.c (gfc_add_interface_mapping): Don't try to
115 dereference call-by-value scalar argument.
117 2016-10-05 Steven G. Kargl <kargls@gcc.gnu.org>
119 PR fortran/58991
120 PR fortran/58992
121 * resolve.c (resolve_assoc_var): Fix CHARACTER type-spec for a
122 selector in ASSOCIATE.
123 (resolve_fl_variable): Skip checks for an ASSOCIATE variable.
125 2016-10-05 Fritz Reese <fritzoreese@gmail.com>
127 * interface.c (gfc_compare_types): Don't compare BT_UNION components
128 until we know they're both UNIONs.
129 * interface.c (gfc_compare_union_types): Guard against empty
130 components.
132 2016-10-05 Louis Krupp <louis.krupp@zoho.com>
134 PR fortran/67524
135 * resolve.c (resolve_symbol): Don't apply default type rules to
136 mixed-entry master created for function entry points.
138 2016-09-30 Jerry DeLisle <jvdelisle@gcc.gnu.org>
140 PR fortran/66643
141 * io.c (match_dt_unit): Peek check for missing format.
143 2016-09-30 Fritz Reese <fritzoreese@gmail.com>
145 PR fortran/77764
146 * interface.c (gfc_compare_union_types): Null-guard map components.
148 2016-09-30 Fritz Reese <fritzoreese@gmail.com>
150 PR fortran/77782
151 * interface.c (gfc_compare_derived_types): Use gfc_compare_union_types
152 to compare union types.
154 2016-09-30 Andre Vehreschild <vehre@gcc.gnu.org>
156 * trans-array.c (gfc_array_allocate): Use the token from coarray's
157 .token member.
158 * trans-intrinsic.c (conv_expr_ref_to_caf_ref): Only generate
159 caf-reference chains from the first coarray references on.
160 * trans-types.c (gfc_get_derived_type): Switch on mandatory .token
161 member generation for allocatable arrays in coarrays in derived types.
163 2016-09-29 James Greenhalgh <james.greenhalgh@arm.com>
165 * options.c (gfc_post_options): Remove special case for
166 TARGET_FLT_EVAL_METHOD_NON_DEFAULT with -fexcess-precision=standard.
168 2016-09-27 Jakub Jelinek <jakub@redhat.com>
170 * dependency.c (gfc_dep_compare_expr): Remove break after return.
171 * frontend-passes.c (optimize_op): Likewise.
172 * interface.c (gfc_current_interface_head): Likewise.
173 * symbol.c (check_conflict): Likewise.
174 * trans-intrinsic.c (build_fix_expr): Likewise.
176 PR fortran/77666
177 * trans-openmp.c (gfc_omp_private_outer_ref): Return true even for
178 references to allocatable arrays.
180 2016-09-26 Steven G. Kargl <kargl@gcc.gnu.org>
182 PR fortran/77420
183 * trans-common.c: Handle array elements in equivalence when
184 the lower and upper bounds of array spec are NULL.
186 2016-09-26 Paul Thomas <pault@gcc.gnu.org>
188 PR fortran/48298
189 * interface.c (gfc_find_specific_dtio_proc) : Return NULL if
190 the derived type is broken, as indicated by a flavor other than
191 FL_DERIVED.
193 2016-09-26 Marek Polacek <polacek@redhat.com>
195 PR c/7652
196 * arith.c (eval_intrinsic): Add gcc_fallthrough.
197 * frontend-passes.c (optimize_op): Likewise.
198 (gfc_expr_walker): Likewise.
199 * parse.c (next_fixed): Likewise.
200 * primary.c (match_variable): Likewise.
201 * trans-array.c: Likewise.
202 * trans-expr.c (flatten_array_ctors_without_strlen): Likewise.
203 * trans-io.c (transfer_expr): Likewise.
205 2016-09-25 Steven G. Kargl <kargl@gcc.gnu.org>
207 PR fortran/77429
208 * dependency.c (gfc_check_dependency): Convert gcc_assert() to
209 a conditional and possible call to gfc_internal_error().
211 2016-09-25 Steven G. Kargl <kargl@gcc.gnu.org>
213 PR fortran/77694
214 * frontend-passes.c (optimize_binop_array_assignment): Check pointer
215 for NULL.
217 2016-09-23 Fritz Reese <fritzoreese@gmail.com>
219 * lang.opt, invoke.texi, gfortran.texi: New flag -fdec-static.
220 * options.c (set_dec_flags): Set -fdec-static with -fdec.
221 * gfortran.h (symbol_attribute): New attribute automatic.
222 * gfortran.h (gfc_add_automatic): New prototype.
223 * match.h (gfc_match_automatic, gfc_match_static): New functions.
224 * decl.c (gfc_match_automatic, gfc_match_static): Ditto.
225 * symbol.c (gfc_add_automatic): Ditto.
226 * decl.c (match_attr_spec): Match AUTOMATIC and STATIC decls.
227 * parse.c (decode_specification_statement, decode_statement): Ditto.
228 * resolve.c (apply_default_init_local, resolve_fl_variable_derived,
229 resolve_symbol): Support for automatic attribute.
230 * symbol.c (check_conflict, gfc_copy_attr, gfc_is_var_automatic):
231 Ditto.
232 * trans-decl.c (gfc_finish_var_decl): Ditto.
234 2016-09-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
236 PR fortran/48298
237 * gfortran.h (gfc_dt): Add *udtio.
238 * ioparm.def: Add bit IOPARM_dt_f2003 to align with library use of bit
239 25. Add IOPARM_dt_dtio bit to common flags.
240 * resolve.c (resolve_transfer): Set dt->udtio to expression.
241 * io.c (gfc_match_inquire): Adjust error message for internal
242 unit KIND.
243 * libgfortran.h: Adjust defines for GFC_INTERNAL_UNIT4,
244 GFC_INTERNAL_UNIT, and GFC_INVALID_UNIT.
245 * trans-io.c (build_dt): Set common_unit to reflect the KIND of
246 the internal unit. Set mask bit for presence of dt->udtio.
248 2016-09-22 Andre Vehreschild <vehre@gcc.gnu.org>
250 * trans-intrinsic.c (gfc_conv_intrinsic_caf_get): Use the old caf-
251 interface where possible.
253 2016-09-22 Paul Thomas <pault@gcc.gnu.org>
255 * interface.c (check_dtio_interface1): Introduce errors for
256 alternate returns and incorrect numbers of arguments.
257 (gfc_find_specific_dtio_proc): Return cleanly if the derived
258 type either doesn't exist or has no namespace.
260 2016-09-21 Louis Krupp <louis.krupp@zoho.com>
262 PR fortran/66107
263 * decl.c (add_init_expr_to_sym): Catch variable character length
264 in parameter array.
266 2016-09-21 Paul Thomas <pault@gcc.gnu.org>
268 PR fortran/77657
270 * interface.c (gfc_find_specific_dtio_proc): Borrow trick from
271 resolve_typebound_generic_call to find dtio procedures that
272 over-ride those in the declared type.
274 2016-09-20 Marek Polacek <polacek@redhat.com>
276 * trans-intrinsic.c (conv_expr_ref_to_caf_ref): Adjust fall through
277 comment.
279 2016-09-19 Andre Vehreschild <vehre@gcc.gnu.org>
281 PR fortran/71952
282 * expr.c (gfc_check_assign): Added flag to control whether datatype
283 conversion is allowed.
284 * gfortran.h: Added caf-token-tree to gfc_component. Changed
285 prototypes mostly to add whether datatype conversion is allowed.
286 * gfortran.texi: Added documentation for the caf_reference_t and the
287 caf_*_by_ref function.
288 * primary.c (caf_variable_attr): Similar to gfc_variable_attr but
289 focused on the needs of coarrays.
290 (gfc_caf_attr): Same.
291 * resolve.c (resolve_ordinary_assign): Set the conversion allowed
292 flag when not in a coarray.
293 * trans-array.c (gfc_array_init_size): Moved setting of array
294 descriptor's datatype before the alloc, because caf_register needs it.
295 (gfc_array_allocate): Changed notion of whether an array is a coarray.
296 (gfc_array_deallocate): Same.
297 (gfc_alloc_allocatable_for_assignment): Added setting of coarray's
298 array descriptor datatype before the register. And using deregister/
299 register to mimmick a realloc for coarrays.
300 * trans-decl.c (gfc_build_builtin_function_decls): Corrected signatures
301 of old caf-functions and added signature definitions of the _by_ref
302 ones.
303 (generate_coarray_sym_init): Adapted to new caf_register signature.
304 * trans-expr.c (gfc_conv_scalar_to_descriptor): Make sure a constant
305 is translated to an lvalue expression before use in an array
306 descriptor.
307 (gfc_get_ultimate_alloc_ptr_comps_caf_token): New function. Get the
308 last allocatable component's coarray token.
309 (gfc_get_tree_for_caf_expr): For top-level object get the coarray
310 token and check for unsupported features.
311 (gfc_get_caf_token_offset): Getting the offset might procude new
312 statements, which now are stored in the pre and post of the current se.
313 (gfc_caf_get_image_index): For this image return a call to
314 caf_this_image.
315 (expr_may_alias_variables): Check that the result is set for testing
316 its properties.
317 (alloc_scalar_allocatable_for_assignment): Added auto allocation of
318 coarray components.
319 (gfc_trans_assignment_1): Rewrite an assign to a coarray object to
320 be a sendget.
321 * trans-intrinsic.c (conv_caf_vector_subscript_elem): Corrected
322 wrong comment.
323 (compute_component_offset): Compute the correct offset a structure
324 member.
325 (conv_expr_ref_to_caf_ref): Convert to a chain of refs into
326 caf_references.
327 (gfc_conv_intrinsic_caf_get): Call caf_get_by_ref instead of caf_get.
328 (conv_caf_send): Call caf_*_by_ref for coarrays that need
329 reallocation.
330 (gfc_conv_intrinsic_function): Adapted to new signuature of the caf
331 drivers.
332 (conv_intrinsic_atomic_op): Add pre and post statements correctly.
333 (conv_intrinsic_atomic_ref): Same.
334 (conv_intrinsic_atomic_cas): Same.
335 (conv_intrinsic_event_query): Same.
336 * trans-stmt.c (gfc_trans_lock_unlock): Same.
337 (gfc_trans_event_post_wait): Same.
338 (gfc_trans_allocate): Support allocation of allocatable coarrays.
339 (gfc_trans_deallocate): And there deallocation.
340 * trans-types.c (gfc_typenode_for_spec): Added flag to control whether
341 a component is part of coarray. When so, then add space to store a
342 coarray token.
343 (gfc_build_array_type): Same.
344 (gfc_get_array_descriptor_base): Same.
345 (gfc_get_array_type_bounds): Same.
346 (gfc_sym_type): Same.
347 (gfc_get_derived_type): Same.
348 (gfc_get_caf_reference_type): Declare the caf_reference_type.
349 * trans-types.h: Prototype changes only.
350 * trans.c (gfc_allocate_using_lib): Use the updated caf_register
351 signature.
352 (gfc_allocate_allocatable): Same.
353 (gfc_deallocate_with_status): Same.
354 * trans.h: Defined the runtime types for caf_reference_t and the enums.
356 2016-09-19 Fritz Reese <fritzoreese@gmail.com>
358 PR fortran/77584
359 * decl.c (match_record_decl, gfc_match_decl_type_spec): Fixes to
360 handling of structure/record from declaration-type-spec.
362 2016_09_17 Louis Krupp <louis.krupp@zoho.com>
364 PR fortran/68078
365 * resolve.c (resolve_allocate_expr): Check that derived type
366 pointer, object or array has been successfully allocated before
367 initializing.
369 2016-09-16 Steven G. Kargl <kargl@gcc.gnu.org>
371 PR fortran/77612
372 * decl.c (char_len_param_value): Check parent namespace for
373 seen_implicit_none.
375 2016-09-15 Louis Krupp <louis.krupp@zoho.com>
377 PR fortran/69963
378 * parse.c (reject_statement): Clear charlen pointers in implicit
379 character typespecs before those charlen structures are freed.
381 2016-09-14 Bernd Edlinger <bernd.edlinger@hotmail.de>
383 * simplify.c (gfc_simplify_repeat): Fix a misplaced closing ')'.
385 2016-09-13 Steven G. Kargl <kargl@gcc.gnu.org>
387 PR fortran/77420
388 * module.c (load_equiv): Revert revision 240063.
390 2016-09-10 Paul Thomas <pault@gcc.gnu.org>
391 Steven G. Kargl <kargl@gcc.gnu.org>
393 PR fortran/77532
394 * interface.c (check_dtio_arg_TKR_intent): Return after error.
395 (check_dtio_interface1): Remove asserts, test for NULL and return
396 if found.
398 2016-09-09 Steven G. Kargl <kargl@gcc.gnu.org>
400 PR fortran/77420
401 * module.c (load_equiv): If the current namespace has a list of
402 equivalence statements, initialize duplicate to false and then
403 look for duplicates; otherwise, initialize it to true.
405 2016-09-09 Steven G. Kargl <kargl@gcc.gnu.org>
407 PR fortran/77506
408 * array.c (gfc_match_array_constructor): CHARACTER(len=*) cannot
409 appear in an array constructor.
411 2016-09-09 Steven G. Kargl <kargl@gcc.gnu.org>
413 PR fortran/77507
414 * intrinsic.c (add_functions): Use correct keyword.
416 2016-09-08 Steven G. Kargl <kargl@gcc.gnu.org>
418 PR fortran/69514
419 * array.c (gfc_match_array_constructor): If type-spec is present,
420 walk the array constructor performing possible conversions for
421 numeric types.
423 2016-09-08 Jakub Jelinek <jakub@redhat.com>
425 PR fortran/77500
426 * trans-openmp.c (gfc_trans_omp_atomic): For atomic write or
427 swap, don't try to look through GFC_ISYM_CONVERSION. In other cases,
428 check that value.function.isym is non-NULL before dereferencing it.
430 2016-09-04 Steven G. Kargl <kargl@gcc.gnu.org>
432 PR fortran/77391
433 * resolve.c (deferred_requirements): New function to check F2008:C402.
434 (resolve_fl_variable,resolve_fl_parameter): Use it.
436 2016-09-04 Steven G. Kargl <kargl@gcc.gnu.org>
438 PR fortran/77460
439 * simplify.c (simplify_transformation_to_scalar): On error, result
440 may be NULL, simply return.
442 2016-08-31 Jakub Jelinek <jakub@redhat.com>
444 PR fortran/77352
445 * trans-openmp.c (gfc_trans_omp_parallel_workshare): Always add a
446 BIND_EXPR with BLOCK around what gfc_trans_omp_workshare returns.
448 PR fortran/77374
449 * parse.c (parse_omp_oacc_atomic): Copy over cp->ext.omp_atomic
450 to cp->block->ext.omp_atomic.
451 * resolve.c (gfc_resolve_blocks): Assert block with one or two
452 EXEC_ASSIGNs for EXEC_*_ATOMIC.
453 * openmp.c (resolve_omp_atomic): Don't assert one or two
454 EXEC_ASSIGNs, instead return quietly for EXEC_NOPs and otherwise
455 error unexpected statements.
457 2016-08-31 Paul Thomas <pault@gcc.gnu.org>
458 Jerry DeLisle <jvdelisle@gcc.gnu.org>
460 PR fortran/48298
461 * decl.c (access_attr_decl): Include case INTERFACE_DTIO as
462 appropriate.
463 * gfortran.h : Add INTRINSIC_FORMATTED and
464 INTRINSIC_UNFORMATTED to gfc_intrinsic_op. Add INTERFACE_DTIO
465 to interface type. Add new enum 'dtio_codes'. Add bitfield
466 'has_dtio_procs' to symbol_attr. Add prototypes
467 'gfc_check_dtio_interfaces' and 'gfc_find_specific_dtio_proc'.
468 * interface.c (dtio_op): New function.
469 (gfc_match_generic_spec): Match generic DTIO interfaces.
470 (gfc_match_interface): Treat DTIO interfaces in the same way as
471 (gfc_current_interface_head): Add INTERFACE_DTIO appropriately.
472 (check_dtio_arg_TKR_intent): New function.
473 (check_dtio_interface1): New function.
474 (gfc_check_dtio_interfaces): New function.
475 (gfc_find_specific_dtio_proc): New function.
476 * io.c : Add FMT_DT to format_token.
477 (format_lex): Handle DTIO formatting.
478 * match.c (gfc_op2string): Add DTIO operators.
479 * resolve.c (derived_inaccessible): Ignore pointer components
480 to enclosing derived type.
481 (resolve_transfer): Resolve transfers that involve DTIO.
482 procedures. Find the specific subroutine for the transfer and
483 use its existence to over-ride some of the constraints on
484 derived types. If the transfer is recursive, require that the
485 subroutine be so qualified.
486 (dtio_procs_present): New function.
487 (resolve_fl_namelist): Remove inhibition of polymorphic objects
488 in namelists if DTIO read and write subroutines exist. Likewise
489 for derived types.
490 (resolve_types): Invoke 'gfc_verify_dtio_procedures'.
491 * symbol.c : Set 'dtio_procs' using 'minit'.
492 * trans-decl.c (gfc_finish_var_decl): If a derived-type/class
493 object is associated with DTIO procedures, make it TREE_STATIC.
494 * trans-expr.c (gfc_get_vptr_from_expr): If the expression
495 drills down to a PARM_DECL, extract the vptr correctly.
496 (gfc_conv_derived_to_class): Check 'info' in the test for
497 'useflags'. If the se expression exists and is a pointer, use
498 it as the class _data.
499 * trans-io.c : Add IOCALL_X_DERIVED to iocall and the function
500 prototype. Likewise for IOCALL_SET_NML_DTIO_VAL.
501 (set_parameter_tree): Renamed from 'set_parameter_const', now
502 returns void and has new tree argument. Calls modified to match
503 new interface.
504 (transfer_namelist_element): Transfer DTIO procedure pointer
505 and vpointer using the new function IOCALL_SET_NML_DTIO_VAL.
506 (get_dtio_proc): New function.
507 (transfer_expr): Add new argument for the vptr field of class
508 objects. Add the code to call the specific DTIO proc, convert
509 derived types to class and call IOCALL_X_DERIVED.
510 (trans_transfer): Add BT_CLASS to structures for treatment by
511 the scalarizer. Obtain the vptr for the dynamic type, both for
512 scalar and array transfer.
514 2016-08-30 Fritz Reese <fritzoreese@gmail.com>
516 * gfortran.texi: Fix typo in STRUCTURE documentation.
518 2016-08-29 Fritz Reese <fritzoreese@gmail.com>
520 Fix, reorganize, and clarify comparisons of anonymous types/components.
522 PR fortran/77327
523 * interface.c (is_anonymous_component, is_anonymous_dt): New functions.
524 * interface.c (compare_components, gfc_compare_derived_types): Use new
525 functions.
527 2016-08-27 Steven G. Kargl <kargl@gcc.gnu.org>
529 PR fortran/77380
530 * dependency.c (gfc_check_dependency): Do not assert with
531 -fcoarray=lib.
533 2016-08-27 Steven G. Kargl <kargl@gcc.gnu.org>
535 PR fortran/77372
536 simplify.c (simplify_ieee_selected_real_kind): Check for NULL pointers.
538 2016-08-25 Steven g. Kargl <kargl@gcc.gnu.org>
540 PR fortran/77351
541 * frontend-passes.c (remove_trim,combine_array_constructor): Check for
542 NULL pointer.
544 2016-08-24 Paul Thomas <pault@gcc.gnu.org>
546 PR fortran/77358
547 * resolve.c (resolve_fl_procedure): Use the correct gfc_charlen
548 for deferred character length module procedures.
550 2016-08-23 Fritz Reese <fritzoreese@gmail.com>
552 * decl.c (gfc_match_structure_decl): Make gfc_structure_id static.
554 2016-08-23 Fritz Reese <fritzoreese@gmail.com>
556 * interface.c (compare_components): Fix typo in name check conditional.
558 2016-08-22 Steven G. Kargl <kargl@gcc.gnu.org>
559 Bud Davis <jmdavis@link.com>
561 PR fortran/60774
562 * parse.c (next_free,next_fixed): Issue error for statement label
563 without a statement.
565 2016-08-22 Steven G. Kargl <kargl@gcc.gnu.org>
567 PR fortran/61318
568 * interface.c (compare_parameter): Use better locus for error message.
570 2016-08-22 Steven G. Kargl <kargl@gcc.gnu.org>
572 PR fortran/77260
573 * gcc/fortran/trans-decl.c (generate_local_decl): Suppress warning
574 for unused variable if symbol is entry point.
576 2016-08-19 Joseph Myers <joseph@codesourcery.com>
578 PR c/32187
579 * trans-types.h (float128_type_node): Rename to
580 gfc_float128_type_node.
581 (complex_float128_type_node): Rename to
582 gfc_complex_float128_type_node.
583 * iso-c-binding.def, trans-intrinsic.c, trans-types.c: All users
584 changed.
586 2016-08-19 Jakub Jelinek <jakub@redhat.com>
588 PR fortran/71014
589 * resolve.c (gfc_resolve): For ns->construct_entities don't save, clear
590 and restore omp state around the resolving.
592 PR fortran/69281
593 * trans-openmp.c (gfc_trans_omp_parallel, gfc_trans_omp_task,
594 gfc_trans_omp_target): Wrap gfc_trans_omp_code result in an extra
595 BIND_EXPR with its own forced BLOCK.
597 2016-08-19 Janne Blomqvist <jb@gcc.gnu.org>
599 * intrinsics.texi (RANDOM_NUMBER): Remove reference to
600 init_random_seed in example.
601 (RANDOM_SEED): Remove warning to not set all seed values to 0.
603 2016-08-18 David Malcolm <dmalcolm@redhat.com>
605 * error.c (gfc_diagnostic_starter): Update for change to
606 diagnostic_show_locus.
608 2016-08-17 Jakub Jelinek <jakub@redhat.com>
610 PR fortran/67496
611 * trans-array.c (trans_array_constructor): Load
612 expr->ts.u.cl->length_from_typespec only if expr->ts.type is
613 BT_CHARACTER.
615 2016-08-15 Fritz Reese <fritzoreese@gmail.com>
617 * lang.opt, invoke.texi: New flag -finit-derived.
618 * gfortran.h (gfc_build_default_init_expr, gfc_apply_init,
619 gfc_generate_initializer): New prototypes.
620 * expr.c (gfc_build_default_init_expr, gfc_apply_init,
621 component_initializer, gfc_generate_initializer): New functions.
622 * expr.c (gfc_default_initializer): Wrap gfc_generate_initializer.
623 * decl.c (build_struct): Move common code to gfc_apply_init.
624 * resolve.c (can_generate_init): New function.
625 * resolve.c (build_default_init_expr): Wrap gfc_build_default_init_expr.
626 * resolve.c (apply_default_init, resolve_fl_variable_derived): Use
627 gfc_generate_initializer.
628 * trans-decl.c (gfc_generate_function_code): Use
629 gfc_generate_initializer.
631 2016-08-15 Thomas Koenig <tkoenig@gcc.gnu.org>
633 * frontend-passes.c (create_var): Set ts.deferred for
634 deferred-length character variables.
635 * dump-parse-tree.c (show_typespec): Also dump
636 is_c_interop, is_iso_c and deferred flags.
638 2016-08-15 Jakub Jelinek <jakub@redhat.com>
640 PR debug/71906
641 * trans-decl.c (gfc_get_symbol_decl): Call gfc_finish_var_decl
642 for decl's character length before gfc_finish_var_decl on the
643 decl itself.
645 2016-08-14 Chung-Lin Tang <cltang@codesourcery.com>
647 PR fortran/70598
648 * openmp.c (resolve_omp_clauses): Adjust use_device clause
649 handling to only allow pointers and arrays.
651 2016-08-12 Marek Polacek <polacek@redhat.com>
653 PR c/7652
654 * decl.c (match_attr_spec): Add FALLTHRU.
655 * primary.c (match_arg_list_function): Likewise.
656 * resolve.c (resolve_operator): Adjust fall through comment.
657 (fixup_charlen): Add FALLTHRU.
658 (resolve_allocate_expr): Adjust fall through comment.
659 * trans-array.c (gfc_conv_ss_startstride): Add FALLTHRU.
660 * trans-intrinsic.c (gfc_conv_intrinsic_len): Adjust fall through
661 comment.
663 2016-08-11 Janne Blomqvist <jb@gcc.gnu.org>
665 * check.c (gfc_check_random_seed): Use new seed size in check.
666 * intrinsic.texi (RANDOM_NUMBER): Updated documentation.
667 (RANDOM_SEED): Likewise.
669 2016-08-08 Jakub Jelinek <jakub@redhat.com>
671 PR fortran/72716
672 * openmp.c (gfc_match_omp_declare_simd): Don't stick anything into
673 BLOCK DATA ns, it will be rejected later.
675 2016-08-08 Andre Vehreschild <vehre@gcc.gnu.org>
677 PR fortran/71936
678 * trans-array.c (gfc_array_allocate): When SOURCE= is a function
679 stick with the ref of the object to allocate.
681 2016-08-08 Andre Vehreschild <vehre@gcc.gnu.org>
683 PR fortran/72698
684 * trans-stmt.c (gfc_trans_allocate): Prevent generating code for
685 copy of zero sized string and with it an ICE.
687 2016-08-08 Andre Vehreschild <vehre@gcc.gnu.org>
689 PR fortran/70524
690 * trans-array.c (gfc_trans_dummy_array_bias): Ensure that the
691 location information is correctly set.
692 * trans-decl.c (gfc_trans_deferred_vars): Set the locus of the
693 current construct early.
695 2016-08-03 Fritz Reese <fritzoreese@gmail.com>
697 * lang.opt: New option -fdec-intrinsic-ints.
698 * options.c (set_dec_flags): Enable with -fdec.
699 * gfortran.texi, invoke.texi, intrinsics.texi: Update documentation.
700 * intrinsic.c (add_function, add_subroutine): New B/I/J/K intrinsic
701 variants.
703 2016-07-30 Steven G. Kargl <kargl@gcc.gnu.org>
705 PR fortran/41922
706 * target-memory.c (expr_to_char): Pass in locus and use it in error
707 messages.
708 (gfc_merge_initializers): Ditto.
709 * target-memory.h: Update prototype for gfc_merge_initializers ().
710 * trans-common.c (get_init_field): Use the correct locus.
712 2016-07-30 Steven G. Kargl <kargl@gcc.gnu.org>
714 PR fortran/68566
715 * check.c (gfc_check_reshape): Check for constant expression.
717 2016-07-30 Steven G. Kargl <kargl@gcc.gnu.org>
719 PR fortran/69867
720 * decl.c (build_struct): Ensure that pointers point to something.
722 2016-07-30 Steven G. Kargl <kargl@gcc.gnu.org>
724 PR fortran/69962
725 * decl.c (gfc_set_constant_character_len): if expr is not
726 constant issue an error instead of an ICE.
728 2016-07-30 Steven G. Kargl <kargl@gcc.gnu.org>
730 PR fortran/70006
731 * io.c (gfc_resolve_dt): Use correct locus.
732 * resolve.c (resolve_branch): Ditto.
734 2016-07-30 Steven G. Kargl <kargl@gcc.gnu.org>
736 PR fortran/71730
737 * decl.c (char_len_param_value): Check return value of
738 gfc_reduce_init_expr().
740 2016-07-29 Dominik Vogt <vogt@linux.vnet.ibm.com>
742 * trans-array.c (gfc_conv_array_ref): Fix allocation of diagnostic
743 message (was too small).
745 2016-07-28 Steven G. Kargl <kargl@gcc.gnu.org>
747 PR fortran/71067
748 * decl.c (match_data_constant): On error, set 'result' to NULL.
750 2016-07-28 Steven G. Kargl <kargl@gcc.gnu.org>
752 PR fortran/71799
753 * resolve.c(gfc_resolve_iterator): Failure of type conversion need
754 not ICE.
756 2016-07-28 Steven G. Kargl <kargl@gcc.gnu.org>
758 PR fortran/71859
759 * check.c(numeric_check): Prevent ICE. Issue error for invalid
760 subroutine as an actual argument when numeric argument is expected.
762 2016-07-28 Steven G. Kargl <kargl@gcc.gnu.org>
763 Thomas Koenig <tkoenig@gcc.gnu.org>
765 PR fortran/71883
766 * frontend-passes.c (gfc_run_passes): Bail out if there are any
767 errors.
768 * error.c (gfc_internal_error): If there are any errors in the
769 buffer, exit with EXIT_FAILURE.
771 2016-07-28 Renlin Li <renlin.li@arm.com>
773 Revert
774 2016-07-19 Thomas Koenig <tkoenig@gcc.gnu.org>
776 PR fortran/71902
777 * dependency.c (gfc_check_dependency): Use dep_ref. Handle case
778 if identical is true and two array element references differ.
779 (gfc_dep_resovler): Move most of the code to dep_ref.
780 (dep_ref): New function.
781 * frontend-passes.c (realloc_string_callback): Name temporary
782 variable "realloc_string".
784 2016-07-26 Steven G. Kargl <kargl@gcc.gnu.org>
786 PR fortran/71862
787 * class.c: Remove assert. Iterate over component only if non-null.
789 2016-07-22 Steven G. Kargl <kargl@gcc.gnu.org>
791 PR fortran/71935
792 * check.c (is_c_interoperable): Simplify right expression.
794 2016-07-22 Thomas Koenig <tkoenig@gcc.gnu.org>
796 PR fortran/71795
797 * frontend-passes.c (combine_array_constructor): Don't
798 do anything if the expression is inside an array iterator.
800 2016-07-22 Andre Vehreschild <vehre@gcc.gnu.org>
802 * expr.c (gfc_find_stat_co): Fixed whitespaces.
803 * gfortran.texi: Fixed typos and reversed meaning of caf_get()'s
804 src and dst description.
805 * trans-decl.c (gfc_build_builtin_function_decls): Fixed style
806 and corrected fnspec for caf functions.
807 * trans-intrinsic.c (gfc_conv_intrinsic_caf_get): Fixed style.
808 (conv_caf_send): Dito.
810 2016-07-19 Thomas Koenig <tkoenig@gcc.gnu.org>
812 PR fortran/71902
813 * dependency.c (gfc_check_dependency): Use dep_ref. Handle case
814 if identical is true and two array element references differ.
815 (gfc_dep_resovler): Move most of the code to dep_ref.
816 (dep_ref): New function.
817 * frontend-passes.c (realloc_string_callback): Name temporary
818 variable "realloc_string".
820 2016-07-17 Fritz Reese <fritzoreese@gmail.com>
822 PR fortran/71523
823 * trans-decl.c (gfc_finish_var_decl): Replace automatic initializer with
824 a static one.
826 2016-07-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
827 Marco Restelli <mrestelli@gmail.com>
829 PR fortran/62125
830 * symbol.c (select_type_insert_tmp): Recursively call self to take care
831 of nested select type.
833 2016-07-15 Cesar Philippidis <cesar@codesourcery.com>
835 * openmp.c (gfc_match_omp_clauses): Scan for clause vector_length
836 before vector.
838 2016-07-15 Andre Vehreschild <vehre@gcc.gnu.org>
840 PR fortran/71807
841 * trans-expr.c (gfc_trans_subcomponent_assign): Special casing
842 when allocatable component is set to null() in initializer.
844 2016-07-14 Steven G. Kargl <kargl@gcc.gnu.org>
846 PR fortran/29819
847 * parse.c (parse_contained): Use proper locus.
849 2016-07-14 Andre Vehreschild <vehre@gcc.gnu.org>
851 PR fortran/70842
852 * simplify.c (gfc_simplify_len): Only for unlimited polymorphic
853 types replace the expression's _data ref with a _len ref.
855 2016-07-09 Thomas Koenig <tkoenig@gcc.gnu.org>
857 PR fortran/71783
858 * frontend-passes.c (create_var): Always allocate a charlen
859 for character variables.
861 2016-07-08 Steven G. Kargl <kargl@gcc.gnu.org>
863 PR fortran/68426
864 * simplify (gfc_simplify_spread): Adjust locus.
866 2016-07-08 Cesar Philippidis <cesar@codesourcery.com>
868 * parse.c (matcha): Define.
869 (decode_oacc_directive): Add spec_only local var and set it. Use
870 matcha to parse acc directives except for routine and declare. Return
871 ST_GET_FCN_CHARACTERISTICS if a non-declarative directive could be
872 matched.
874 2016-07-08 Martin Liska <mliska@suse.cz>
876 * invoke.texi (Wundefined-do-loop): Enhance documentation.
878 2016-07-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
880 PR fortran/71764
881 * trans-expr.c (gfc_trans_structure_assign): Remove assert.
883 2016-07-07 Martin Liska <mliska@suse.cz>
885 * lang.opt (Wundefined-do-loop): New option.
886 * resolve.c (gfc_resolve_iterator): Warn for Wundefined-do-loop.
887 (gfc_trans_simple_do): Generate a c-style loop.
888 (gfc_trans_do): Fix GNU coding style.
889 * invoke.texi: Mention the new warning.
891 2016-07-07 Martin Liska <mliska@suse.cz>
893 * trans-stmt.c (gfc_trans_do): Add expect builtin for DO
894 loops with step bigger than +-1.
896 2016-07-05 Alessandro Fanfarillo <fanfarillo.gcc@gmail.com>
898 * array.c (gfc_match_array_ref): Add parsing support for
899 STAT= attribute in CAF reference.
900 * expr.c (gfc_find_stat_co): New function that returns
901 the STAT= assignment.
902 * gfortran.h (gfc_array_ref): New member.
903 * trans-decl.c (gfc_build_builtin_function_decls):
904 new attribute for caf_get and caf_send functions.
905 * trans-intrinsic.c (gfc_conv_intrinsic_caf_get): Passing
906 the stat attribute to external function.
907 (gfc_conv_intrinsic_caf_send): Ditto.
909 2016-07-05 Andre Vehreschild <vehre@gcc.gnu.org>
911 PR fortran/71623
912 * trans-stmt.c (gfc_trans_allocate): Add code of pre block of typespec
913 in allocate to parent block.
915 2016-07-04 Jerry DeLisle <jvdelisle@gcc.gnu.org>
917 PR fortran/66575
918 * decl.c (match_procedure_interface): Exit loop if procedure
919 interface refers to itself.
921 2016-07-04 Jerry DeLisle <jvdelisle@gcc.gnu.org>
922 Steven G. Kargl <kargl@gcc.gnu.org>
924 PR fortran/35849
925 * simplify.c (gfc_simplify_ishftc): Check that absolute value of
926 SHIFT is less than or equal to SIZE.
928 2016-07-01 Jakub Jelinek <jakub@redhat.com>
930 PR fortran/71687
931 * f95-lang.c (struct binding_level): Add reversed field.
932 (clear_binding_level): Adjust initializer.
933 (getdecls): If reversed is clear, set it and nreverse the names
934 chain before returning it.
935 (poplevel): Use getdecls.
936 * trans-decl.c (gfc_generate_function_code, gfc_process_block_locals):
937 Use nreverse to pushdecl decls in the declaration order.
939 PR fortran/71717
940 * trans-openmp.c (gfc_omp_privatize_by_reference): Return false
941 for GFC_DECL_ASSOCIATE_VAR_P with POINTER_TYPE.
943 2016-06-30 Jakub Jelinek <jakub@redhat.com>
945 PR fortran/71704
946 * parse.c (matchs, matcho): Move right before decode_omp_directive.
947 If spec_only, only gfc_match the keyword and if successful, goto
948 do_spec_only.
949 (matchds, matchdo): Define.
950 (decode_omp_directive): Add spec_only local var and set it.
951 Use matchds or matchdo macros instead of matchs or matcho
952 for declare target, declare simd, declare reduction and threadprivate
953 directives. Return ST_GET_FCN_CHARACTERISTICS if a non-declarative
954 directive could be matched.
955 (next_statement): For ST_GET_FCN_CHARACTERISTICS restore
956 gfc_current_locus from old_locus even if there is no label.
958 PR fortran/71705
959 * trans-openmp.c (gfc_trans_omp_clauses): Set TREE_ADDRESSABLE on
960 decls in to/from clauses.
962 2016-06-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
964 PR fortran/71686
965 * scanner.c (gfc_next_char_literal): Only decrement nextc if it
966 is not NULL.
968 2016-06-29 Cesar Philippidis <cesar@codesourcery.com>
970 * openmp.c (match_oacc_clause_gang): Rename to ...
971 (match_oacc_clause_gwv): this. Add support for OpenACC worker and
972 vector clauses.
973 (gfc_match_omp_clauses): Use match_oacc_clause_gwv for
974 OMP_CLAUSE_{GANG,WORKER,VECTOR}. Propagate any MATCH_ERRORs for
975 invalid OMP_CLAUSE_{ASYNC,WAIT,GANG,WORKER,VECTOR} clauses.
976 (gfc_match_oacc_wait): Propagate MATCH_ERROR for invalid
977 oacc_expr_lists. Adjust the first and needs_space arguments to
978 gfc_match_omp_clauses.
980 2016-06-29 Richard Biener <rguenther@suse.de>
982 PR middle-end/71002
983 * f95-lang.c (LANG_HOOKS_GET_ALIAS_SET): Remove (un-)define.
984 (gfc_get_alias_set): Remove.
986 2016-06-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
988 PR fortran/71649
989 * module.c (create_intrinsic_function): Check for NULL values and
990 return after giving error.
992 2016-06-21 Michael Meissner <meissner@linux.vnet.ibm.com>
994 * trans-types.c (gfc_build_complex_type): Move setting complex
995 MODE to layout_type, instead of setting it ahead of time by the
996 caller.
998 2016-06-21 Tobias Burnus <burnus@net-b.de>
1000 PR fortran/71068
1001 * resolve.c (resolve_function): Don't resolve caf_get/caf_send.
1002 (check_data_variable): Strip-off caf_get before checking.
1004 2016-06-20 Tobias Burnus <burnus@net-b.de>
1006 PR fortran/71194
1007 * trans-expr.c (gfc_trans_pointer_assignment): Correctly handle
1008 RHS pointer functions.
1010 2016-06-19 Bernhard Reutner-Fischer <aldot@gcc.gnu.org>
1012 * class.c (gfc_add_class_array_ref): Call gfc_add_data_component()
1013 instead of gfc_add_component_ref().
1014 (gfc_get_len_component): Call gfc_add_len_component() instead of
1015 gfc_add_component_ref().
1016 * trans-intrinsic.c (gfc_conv_intrinsic_loc): Call
1017 gfc_add_data_component() instead of gfc_add_component_ref().
1018 * trans.c (gfc_add_finalizer_call): Call
1019 gfc_add_final_component() and gfc_add_size_component() instead
1020 of gfc_add_component_ref.
1022 2016-06-18 Bernhard Reutner-Fischer <aldot@gcc.gnu.org>
1024 * trans-types.c (gfc_typenode_for_spec): Commentary typo fix.
1026 2016-06-17 Cesar Philippidis <cesar@codesourcery.com>
1028 * openmp.c (match_acc): New generic function to parse OpenACC
1029 directives.
1030 (gfc_match_oacc_parallel_loop): Use it.
1031 (gfc_match_oacc_parallel): Likewise.
1032 (gfc_match_oacc_kernels_loop): Likewise.
1033 (gfc_match_oacc_kernels): Likewise.
1034 (gfc_match_oacc_data): Likewise.
1035 (gfc_match_oacc_host_data): Likewise.
1036 (gfc_match_oacc_loop): Likewise.
1037 (gfc_match_oacc_enter_data): Likewise.
1038 (gfc_match_oacc_exit_data): Likewise.
1040 2016-06-16 Martin Liska <mliska@suse.cz>
1042 * trans-stmt.c (gfc_trans_simple_do): Predict the edge.
1044 2016-06-16 Martin Liska <mliska@suse.cz>
1046 * trans-array.c (gfc_array_allocate): Do not generate expect
1047 stmt.
1048 * trans.c (gfc_allocate_using_malloc): Properly set FAIL_ALLOC
1049 predictor for malloc return value.
1050 (gfc_allocate_allocatable): Use REALLOC predictor instead of
1051 FAIL_ALLOC.
1052 (gfc_deallocate_with_status): Likewise.
1054 2016-06-13 Paul Thomas <pault@gcc.gnu.org>
1056 PR fortran/70673
1057 * frontend-passes.c (realloc_string_callback): Add a call to
1058 gfc_dep_compare_expr.
1060 2016-06-11 Dominique d'Humieres <dominiq@lps.ens.fr>
1062 PR fortran/60751
1063 * io.c (gfc_resolve_dt): Replace GFC_STD_GNU with GFC_STD_LEGACY.
1065 2016-06-10 Thomas Schwinge <thomas@codesourcery.com>
1067 PR c/71381
1068 * openmp.c (gfc_match_oacc_cache): Add comment.
1070 2016-06-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1072 PR fortran/71404
1073 * io.c (match_io): For READ, commit in pending symbols in the
1074 current statement before trying to match an expression so that
1075 if the match fails and we undo symbols we dont toss good symbols.
1077 2016-06-05 Andre Vehreschild <vehre@gcc.gnu.org>
1079 PR fortran/69659
1080 * trans-array.c (gfc_trans_dummy_array_bias): For class arrays use
1081 the address of the _data component to reference the arrays data
1082 component.
1084 2016-06-03 Chung-Lin Tang <cltang@codesourcery.com>
1086 * trans-openmp.c (gfc_trans_omp_reduction_list): Add mark_addressable
1087 bool parameter, set reduction clause DECLs as addressable when true.
1088 (gfc_trans_omp_clauses): Pass clauses->async to
1089 gfc_trans_omp_reduction_list, add comment describing OpenACC situation.
1091 2016-06-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1093 PR fortran/52393
1094 * io.c (match_io): For READ, try to match a default character
1095 expression. If found, set the dt format expression to this,
1096 otherwise go back and try control list.
1098 2016-06-01 Paul Thomas <pault@gcc.gnu.org>
1100 PR fortran/71156
1101 * decl.c (copy_prefix): Add checks that the module procedure
1102 declaration prefixes are compliant with the interface. Invert
1103 order of existing elemental and pure checks.
1104 * resolve.c (resolve_fl_procedure): Invert order of elemental
1105 and pure errors.
1107 2016-06-01 Jakub Jelinek <jakub@redhat.com>
1109 * parse.c (case_decl): Move ST_OMP_* to ...
1110 (case_omp_decl): ... here, new macro.
1111 (verify_st_order): For case_omp_decl, complain about
1112 p->state >= ORDER_EXEC, but don't change p->state otherwise.
1114 2016-05-26 Jakub Jelinek <jakub@redhat.com>
1116 * openmp.c (resolve_omp_clauses): Warn if chunk_size is known not to
1117 be positive.
1119 2016-05-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1121 PR fortran/66461
1122 * scanner.c (gfc_next_char_literal): Clear end_flag when adjusting
1123 current locus back to old_locus.
1125 2016-05-20 Jakub Jelinek <jakub@redhat.com>
1127 PR fortran/71204
1128 * frontend-passes.c (realloc_string_callback): Clear inserted_block
1129 and changed_statement before calling create_var.
1131 2016-05-15 Harald Anlauf <anlauf@gmx.de>
1133 PR fortran/69603
1134 * interface.c (compare_parameter): Check for non-NULL pointer.
1136 2016-05-14 Fritz Reese <fritzoreese@gmail.com>
1138 * gfortran.texi: Update example of DEC UNION extension.
1140 2016-05-14 Fritz Reese <fritzoreese@gmail.com>
1142 PR fortran/71047
1143 * expr.c (gfc_default_initializer): Avoid extra component refs in
1144 constructors for derived types and classes.
1146 2016-05-11 Jakub Jelinek <jakub@redhat.com>
1148 PR fortran/70855
1149 * frontend-passes.c (inline_matmul_assign): Disable in !$omp workshare.
1151 2016-05-09 Richard Biener <rguenther@suse.de>
1153 PR fortran/70937
1154 * trans-decl.c: Include gimplify.h for unshare_expr.
1155 (gfc_trans_vla_one_sizepos): Unshare exprs before inserting
1156 them into the IL.
1158 2016-05-07 Fritz Reese <fritzoreese@gmail.com>
1160 PR fortran/56226
1161 * module.c (dt_upper_string): Rename to gfc_dt_upper_string
1162 (dt_lower_string): Likewise.
1163 * gfortran.h: Make new gfc_dt_upper/lower_string global.
1164 * class.c: Use gfc_dt_upper_string.
1165 * decl.c: Likewise.
1166 * symbol.c: Likewise.
1167 * resolve.c (resolve_component): New function.
1168 (resolve_fl_derived0): Move component loop code to resolve_component.
1169 * parse.c (check_component): New function.
1170 (parse_derived): Move loop code to check_component.
1171 * lang.opt, invoke.texi, options.c : New option -fdec-structure.
1172 * libgfortran.h (bt): New basic type BT_UNION.
1173 * gfortran.h (gfc_option): New option -fdec-structure.
1174 (gfc_get_union_type, gfc_compare_union_types): New prototypes.
1175 (gfc_bt_struct, gfc_fl_struct, case_bt_struct, case_fl_struct): New
1176 macros.
1177 (gfc_find_component): Change prototype.
1178 * match.h (gfc_match_member_sep, gfc_match_map, gfc_match_union,
1179 gfc_match_structure_decl): New prototypes.
1180 * parse.h (gfc_comp_struct): New macro.
1181 * symbol.c (gfc_find_component): Search for components in nested unions
1182 * class.c (insert_component_ref, gfc_add_component_ref, add_proc_comp,
1183 copy_vtab_proc_comps): Update calls to gfc_find_component.
1184 * primary.c (gfc_convert_to_structure_constructor): Likewise.
1185 * symbol.c (gfc_add_component): Likewise.
1186 * resolve.c (resolve_typebound_function, resolve_typebound_subroutine,
1187 resolve_typebound_procedure, resolve_component, resolve_fl_derived):
1188 Likewise.
1189 * expr.c (get_union_init, component_init): New functions.
1190 * decl.c (match_clist_expr, match_record_decl, get_struct_decl,
1191 gfc_match_map, gfc_match_union, gfc_match_structure_decl): Likewise.
1192 * interface.c (compare_components, gfc_compare_union_types): Likewise.
1193 * match.c (gfc_match_member_sep): Likewise.
1194 * parse.c (check_component, parse_union, parse_struct_map): Likewise.
1195 * resolve.c (resolve_fl_struct): Likewise.
1196 * symbol.c (find_union_component): Likewise.
1197 * trans-types.c (gfc_get_union_type): Likewise.
1198 * parse.c (parse_derived): Use new functions.
1199 * interface.c (gfc_compare_derived_types, gfc_compare_types): Likewise.
1200 * expr.c (gfc_default_initializer): Likewise.
1201 * gfortran.texi: Support for DEC structures, unions, and maps.
1202 * gfortran.h (gfc_statement, sym_flavor): Likewise.
1203 * check.c (gfc_check_kill_sub): Likewise.
1204 * expr.c (gfc_copy_expr, simplify_const_ref,
1205 gfc_has_default_initializer): Likewise.
1206 * decl.c (build_sym, match_data_constant, add_init_expr_to_sym,
1207 match_pointer_init, build_struct, variable_decl,
1208 gfc_match_decl_type_spec, gfc_mach_data-decl, gfc_match_entry,
1209 gfc_match_end, gfc_match_derived_decl): Likewise.
1210 * interface.c (check_interface0, check_interface1,
1211 gfc_search_interface): Likewise.
1212 * misc.c (gfc_basic_typename, gfc_typename): Likewise.
1213 * module.c (add_true_name, build_tnt, bt_types, mio_typespec,
1214 fix_mio_expr, load_needed, mio_symbol, read_module, write_symbol,
1215 gfc_get_module_backend_decl): Likewise.
1216 * parse.h (gfc_compile_state): Likewise.
1217 * parse.c (decode_specification_statement, decode_statement,
1218 gfc_ascii_statement, verify_st_order, parse_spec): Likewise.
1219 * primary.c (gfc_match_varspec, gfc_match_structure_constructor,
1220 gfc_match_rvalue, match_variable): Likewise.
1221 * resolve.c (find_arglists, resolve_structure_cons,
1222 is_illegal_recursion, resolve_generic_f, get_declared_from_expr,
1223 resolve_typebound_subroutine, resolve_allocate_expr,
1224 nonscalar_typebound_assign, generate_component_assignments,
1225 resolve_fl_variable_derived, check_defined_assignments,
1226 resolve_component, resolve_symbol, resolve_equivalence_derived):
1227 Likewise.
1228 * symbol.c (flavors, check_conflict, gfc_add_flavor, gfc_use_derived,
1229 gfc_restore_last_undo_checkpoint, gfc_type_compatible,
1230 gfc_find_dt_in_generic): Likewise.
1231 * trans-decl.c (gfc_get_module_backend_decl, create_function_arglist,
1232 gfc_create_module_variable, check_constant_initializer): Likewise.
1233 * trans-expr.c (gfc_conv_component_ref, gfc_conv_initializer,
1234 gfc_trans_alloc_subarray_assign, gfc_trans_subcomponent_assign,
1235 gfc_conv_structure, gfc_trans_scalar_assign, copyable_array_p):
1236 Likewise.
1237 * trans-io.c (transfer_namelist_element, transfer_expr,
1238 gfc_trans_transfer): Likewise.
1239 * trans-stmt.c (gfc_trans_deallocate): Likewise.
1240 * trans-types.c (gfc_typenode_for_spec, gfc_copy_dt_decls_ifequal,
1241 gfc_get_derived_type): Likewise.
1243 2016-05-05 Jakub Jelinek <jakub@redhat.com>
1245 * openmp.c (gfc_match_omp_clauses): Restructuralize, so that clause
1246 parsing is done in a big switch based on gfc_peek_ascii_char and
1247 individual clauses under their first letters are sorted too.
1249 2016-05-02 Michael Meissner <meissner@linux.vnet.ibm.com>
1251 * trans-types.c (gfc_build_complex_type):
1253 2016-05-02 Richard Biener <rguenther@suse.de>
1255 * trans-array.c (gfc_trans_create_temp_array): Properly
1256 create a DECL_EXPR for the anonymous VLA array type.
1258 2016-04-29 Cesar Philippidis <cesar@codesourcery.com>
1260 PR middle-end/70626
1261 * trans-openmp.c (gfc_trans_oacc_combined_directive): Duplicate
1262 the reduction clause in both parallel and loop directives.
1264 2016-04-18 Michael Matz <matz@suse.de>
1266 * trans-io.c (gfc_build_io_library_fndecls): Use SET_TYPE_ALIGN.
1267 * trans-common.c (build_common_decl): Use SET_DECL_ALIGN.
1268 * trans-types.c (gfc_add_field_to_struct): Use SET_DECL_ALIGN.
1270 2016-04-13 Dominique d'Humieres <dominiq@lps.ens.fr>
1272 PR fortran/67039
1273 * intrinsic.texi: Correct the documentation of pseudorandom
1274 number intrinsics.
1276 2016-04-13 Dominique d'Humieres <dominiq@lps.ens.fr>
1278 PR fortran/58000
1279 * gfortran.texi: Document OPEN( ... NAME=) as not implemented
1280 in GNU Fortran
1282 2016-04-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1284 PR fortran/68566
1285 * array.c (match_array_element_spec): Add check for non-integer.
1286 * simplify.c (gfc_simplify_reshape): If source shape is NULL return.
1288 2016-04-06 Patrick Palka <ppalka@gcc.gnu.org>
1290 PR c/70436
1291 * openmp.c (gfc_find_omp_udr): Add explicit braces to resolve a
1292 future -Wparentheses warning.
1294 2016-04-04 Andre Vehreschild <vehre@gcc.gnu.org>
1296 PR fortran/67538
1297 * resolve.c (resolve_allocate_expr): Emit error message when no
1298 array spec and no array valued source= expression is given in an
1299 F2008 allocate() for an array to allocate.
1301 2016-04-04 Andre Vehreschild <vehre@gcc.gnu.org>
1303 PR fortran/65795
1304 * trans-array.c (gfc_array_allocate): When the array is a coarray,
1305 do not nullyfing its allocatable components in array_allocate, because
1306 the nullify missed the array ref and nullifies the wrong component.
1307 Cosmetics.
1309 2016-03-29 Andre Vehreschild <vehre@gcc.gnu.org>
1311 PR fortran/70397
1312 * trans-expr.c (gfc_class_len_or_zero_get): Add function to return a
1313 constant zero tree, when the class to get the _len component from is
1314 not unlimited polymorphic.
1315 (gfc_copy_class_to_class): Use the new function.
1316 * trans.h: Added interface of new function gfc_class_len_or_zero_get.
1318 2016-03-28 Alessandro Fanfarillo <fanfarillo.gcc@gmail.com>
1320 * trans-decl.c (gfc_build_builtin_function_decls):
1321 caf_stop_numeric and caf_stop_str definition.
1322 * trans-stmt.c (gfc_trans_stop): invoke external functions
1323 for stop and stop_str when coarrays are used.
1324 * trans.h: extern for new functions.
1326 2016-03-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1328 PR fortran/69043
1329 * scanner.c (load_file): Update to use S_ISREG macro.
1331 2016-03-17 Thomas Schwinge <thomas@codesourcery.com>
1333 * gfortran.h (enum gfc_omp_map_op): Rename OMP_MAP_FORCE_DEALLOC
1334 to OMP_MAP_DELETE. Adjust all users.
1336 2016-03-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1337 Jim MacArthur <jim.macarthur@codethink.co.uk>
1339 PR fortran/69043
1340 * scanner.c (load_file): Check that included file is regular.
1342 2016-03-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1343 Harold Anlauf <anlauf@gmx.de>
1345 PR fortran/69520
1346 * invoke.texi: Explain use of the 'no-' construct within the
1347 -fcheck= option.
1348 * options.c (gfc_handle_runtime_check_option): Enable use of
1349 'no-' prefix for the various options with -fcheck= to allow
1350 negating previously enabled check options.
1352 2016-03-12 Paul Thomas <pault@gcc.gnu.org>
1354 PR fortran/70031
1355 * decl.c (gfc_match_prefix): Treat the 'module' prefix in the
1356 same way as the others, rather than fixing it to come last.
1357 (gfc_match_function_decl, gfc_match_subroutine): After errors
1358 in 'copy_prefix', emit them immediately in the case of module
1359 procedures to prevent a later ICE.
1361 PR fortran/69524
1362 * decl.c (gfc_match_submod_proc): Permit 'module procedure'
1363 declarations within the contains section of modules as well as
1364 submodules.
1365 * resolve.c (resolve_fl_procedure): Likewise.
1366 *trans-decl.c (build_function_decl): Change the gcc_assert to
1367 allow all forms of module procedure declarations within module
1368 contains sections.
1370 2016-02-28 Thomas Koenig <tkoenig@gcc.gnu.org>
1372 PR fortran/68147
1373 PR fortran/47674
1374 * frontend-passes.c (realloc_string_callback): Don't set
1375 walk_subtrees.
1377 2016-02-28 Thomas Koenig <tkoenig@gcc.gnu.org>
1379 * dump-parse-tree.c (show_code_node): Print association
1380 list of a block if present. Handle EXEC_END_BLOCK.
1382 2016-02-28 Harald Anlauf <anlauf@gmx.de>
1383 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1385 PR fortran/56007
1386 * match.c (gfc_match_iterator): Add diagnostic for array variable
1387 as do loop index.
1389 2016-02-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1390 Steven G. Kargl <kargl@gcc.gnu.org>
1392 PR fortran/69910
1393 * io.c (gfc_match_open): Check that open status is an expression
1394 constant before comparing string to 'scratch' with NEWUNIT.
1396 2016-02-27 Alessandro Fanfarillo <fanfarillo.gcc@gmail.com>
1398 * trans.c (gfc_allocate_allocatable): size conversion
1399 from byte to number of elements for event variables.
1400 * trans-types.c (gfc_get_derived_type): event variables
1401 represented as a pointer (like lock variable).
1403 2016-02-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1405 PR fortran/61156
1406 * scanner.c (add_path_to_list): If include path is not a directory,
1407 issue a fatal error.
1409 2016-02-23 Andre Vehreschild <vehre@gcc.gnu.org>
1411 PR fortran/67451
1412 * trans-array.c (gfc_array_allocate): Take the attributes from the
1413 expression to allocate and not from the source=-expression.
1415 2016-02-20 Paul Thomas <pault@gcc.gnu.org>
1417 PR fortran/69423
1418 * trans-decl.c (create_function_arglist): Deferred character
1419 length functions, with and without declared results, address
1420 the passed reference type as '.result' and the local string
1421 length as '..result'.
1422 (gfc_null_and_pass_deferred_len): Helper function to null and
1423 return deferred string lengths, as needed.
1424 (gfc_trans_deferred_vars): Call it, thereby reducing repeated
1425 code, add call for deferred arrays and reroute pointer function
1426 results. Avoid using 'tmp' for anything other that a temporary
1427 tree by introducing 'type_of_array' for the arrayspec type.
1429 2015-02-16 Thomas Koenig <tkoenig@gcc.gnu.org>
1431 PR fortran/69742
1432 * frontend-passes.c (cfe-expr_0): Don't register functions
1433 from within an ASSOCIATE statement.
1435 2016-02-14 Thomas Koenig <tkoenig@gcc.gnu.org>
1437 PR fortran/60526
1438 * decl.c (build_sym): If the name has already been defined as a
1439 type, it has a symtree with an upper case letter at the beginning.
1440 If such a symtree exists, issue an error and exit. Don't do
1441 this if there is no corresponding upper case letter.
1443 2016-02-14 Thomas Koenig <tkoenig@gcc.gnu.org>
1445 PR fortran/60526
1446 PR bootstrap/69816
1447 * decl.c (build_sym): Reverted previous patch.
1449 2016-02-14 Thomas Koenig <tkoenig@gcc.gnu.org>
1451 PR fortran/60526
1452 * decl.c (build_sym): If the name has already been defined as a
1453 type, issue error and return false.
1455 2016-02-12 David Malcolm <dmalcolm@redhat.com>
1457 PR other/69554
1458 * error.c (gfc_diagnostic_start_span): New function.
1459 (gfc_diagnostics_init): Initialize global_dc's start_span.
1461 2016-02-11 Andre Vehreschild <vehre@gcc.gnu.org>
1463 PR fortran/69296
1464 * gfortran.h: Added flag to gfc_association_list indicating that
1465 the rank of an associate variable has been guessed only.
1466 * parse.c (parse_associate): Set the guess flag mentioned above
1467 when guessing the rank of an expression.
1468 * resolve.c (resolve_assoc_var): When the rank has been guessed,
1469 make sure, that the guess was correct else overwrite with the actual
1470 rank.
1471 * trans-stmt.c (trans_associate_var): For subref_array_pointers in
1472 class objects, take the span from the _data component.
1474 2016-02-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1476 PR fortran/50555
1477 * primary.c (match_actual_arg): If symbol has attribute flavor of
1478 namelist, generate an error. (gfc_match_rvalue): Likewise return
1479 MATCH_ERROR.
1480 * resolve.c (resolve_symbol): Scan arument list of procedures and
1481 generate an error if a namelist is found.
1483 2016-02-05 Mikael Morin <mikael@gcc.gnu.org>
1485 PR fortran/66089
1486 * trans-expr.c (expr_is_variable, gfc_expr_is_variable): Rename
1487 the former to the latter and make it non-static. Update callers.
1488 * gfortran.h (gfc_expr_is_variable): New declaration.
1489 (struct gfc_ss_info): Add field needs_temporary.
1490 * trans-array.c (gfc_scalar_elemental_arg_saved_as_argument):
1491 Tighten the condition on aggregate expressions with a check
1492 that the expression is a variable and doesn't need a temporary.
1493 (gfc_conv_resolve_dependency): Add intermediary reference variable.
1494 Set the needs_temporary field.
1496 2016-02-03 Andre Vehreschild <vehre@gcc.gnu.org>
1498 PR fortran/67451
1499 PR fortran/69418
1500 * trans-expr.c (gfc_copy_class_to_class): For coarrays just the
1501 pointer is passed. Take it as is without trying to deref the
1502 _data component.
1503 * trans-stmt.c (gfc_trans_allocate): Take care of coarrays as
1504 argument to source=-expression.
1506 2016-02-02 Nathan Sidwell <nathan@codesourcery.com>
1508 * lang.opt (fopenacc-dim=): New option.
1510 2016-01-31 Paul Thomas <pault@gcc.gnu.org>
1512 PR fortran/67564
1513 * trans-expr.c (gfc_conv_procedure_call): For the vtable copy
1514 subroutines, add a string length argument, when the actual
1515 argument is an unlimited polymorphic class object.
1517 2016-01-30 Paul Thomas <pault@gcc.gnu.org>
1519 PR fortran/69566
1520 * trans-expr.c (gfc_conv_procedure_call): Correct expression
1521 for 'ulim_copy', which was missing a test for 'comp'.
1523 2016-01-28 Andre Vehreschild <vehre@gcc.gnu.org>
1525 PR fortran/62536
1526 * decl.c (gfc_match_end): Only unnest and remove BLOCK namespaces
1527 when the END encountered does not match a BLOCK's end.
1529 2016-01-27 Janus Weil <janus@gcc.gnu.org>
1531 PR fortran/69484
1532 * invoke.texi: Fix documentation of -Wall with respect to -Wtabs.
1534 2016-01-27 Paul Thomas <pault@gcc.gnu.org>
1536 PR fortran/69422
1537 * trans-expr.c (is_scalar_reallocatable_lhs): Remove the check
1538 for allocatable components, whilst checking if the symbol is a
1539 derived or class entity..
1541 2016-01-26 Paul Thomas <pault@gcc.gnu.org>
1543 PR fortran/69385
1544 * trans-expr.c (gfc_trans_assignment_1): Exclude initialization
1545 assignments from check on assignment of scalars to unassigned
1546 arrays and correct wrong code within the corresponding block.
1548 2016-01-26 David Malcolm <dmalcolm@redhat.com>
1550 PR other/69006
1551 * error.c (gfc_diagnostic_starter): Delete use of pp_newline.
1553 2016-01-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1555 PR fortran/69397
1556 PR fortran/68442
1557 * interface.c (gfc_arglist_matches_symbol): Replace assert with
1558 a return false if not a procedure.
1559 * resolve.c (resolve_generic_f): Test if we are resolving an
1560 initialization expression and adjust error message accordingly.
1562 2016-01-24 Thomas Koenig <tkoenig@gcc.gnu.org>
1564 PR fortran/66094
1565 * frontend-passes.c (matmul_lhs_realloc): Add
1566 forgotten break statement.
1568 2016-01-24 Dominique d'Humieres <dominiq@lps.ens.fr>
1570 PR fortran/68283
1571 * primary.c (gfc_variable_attr): revert revision r221955,
1572 call gfc_internal_error only if there is no error.
1574 2016-01-24 Thomas Koenig <tkoenig@gcc.gnu.org>
1576 PR fortran/66094
1577 * frontend-passes.c (enum matrix_case): Add case A2B2T for
1578 MATMUL(A,TRANSPoSE(B)) where A and B are rank 2.
1579 (inline_limit_check): Also add A2B2T.
1580 (matmul_lhs_realloc): Handle A2B2T.
1581 (check_conjg_variable): Rename to
1582 (check_conjg_transpose_variable): and also count TRANSPOSE.
1583 (inline_matmul_assign): Handle A2B2T.
1585 2016-01-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1587 PR fortran/65996
1588 * error.c (gfc_error): Save the state of abort_on_error and set
1589 it to false for buffered errors to allow normal processing.
1590 Restore the state before leaving.
1592 2016-01-19 Martin Jambor <mjambor@suse.cz>
1594 * types.def (BT_FN_VOID_UINT_PTR_INT_PTR): New.
1595 (BT_FN_VOID_INT_OMPFN_SIZE_PTR_PTR_PTR_UINT_PTR_INT_INT): Removed.
1596 (BT_FN_VOID_INT_OMPFN_SIZE_PTR_PTR_PTR_UINT_PTR_PTR): New.
1598 2016-01-15 Paul Thomas <pault@gcc.gnu.org>
1600 PR fortran/64324
1601 * resolve.c (check_uop_procedure): Prevent deferred length
1602 characters from being trapped by assumed length error.
1604 PR fortran/49630
1605 PR fortran/54070
1606 PR fortran/60593
1607 PR fortran/60795
1608 PR fortran/61147
1609 PR fortran/64324
1610 * trans-array.c (gfc_conv_scalarized_array_ref): Pass decl for
1611 function as well as variable expressions.
1612 (gfc_array_init_size): Add 'expr' as an argument. Use this to
1613 correctly set the descriptor dtype for deferred characters.
1614 (gfc_array_allocate): Add 'expr' to the call to
1615 'gfc_array_init_size'.
1616 * trans.c (gfc_build_array_ref): Expand logic for setting span
1617 to include indirect references to character lengths.
1618 * trans-decl.c (gfc_get_symbol_decl): Ensure that deferred
1619 result char lengths that are PARM_DECLs are indirectly
1620 referenced both for directly passed and by reference.
1621 (create_function_arglist): If the length type is a pointer type
1622 then store the length as the 'passed_length' and make the char
1623 length an indirect reference to it.
1624 (gfc_trans_deferred_vars): If a character length has escaped
1625 being set as an indirect reference, return it via the 'passed
1626 length'.
1627 * trans-expr.c (gfc_conv_procedure_call): The length of
1628 deferred character length results is set TREE_STATIC and set to
1629 zero.
1630 (gfc_trans_assignment_1): Do not fix the rse string_length if
1631 it is a variable, a parameter or an indirect reference. Add the
1632 code to trap assignment of scalars to unallocated arrays.
1633 * trans-stmt.c (gfc_trans_allocate): Remove 'def_str_len' and
1634 all references to it. Instead, replicate the code to obtain a
1635 explicitly defined string length and provide a value before
1636 array allocation so that the dtype is correctly set.
1637 trans-types.c (gfc_get_character_type): If the character length
1638 is a pointer, use the indirect reference.
1640 2016-01-10 Thomas Koenig <tkoenig@gcc.gnu.org>
1642 PR fortran/69154
1643 * frontend-passes.c (in_where): New variable.
1644 (inline_matmul_assign): Don't try this if we are within
1645 a WHERE statement.
1646 (gfc_code_walker): Keep track of in_where.
1648 2016-01-10 Paul Thomas <pault@gcc.gnu.org>
1650 PR fortran/67779
1651 * trans_array.c (gfc_conv_scalarized_array_ref): Add missing
1652 se->use_offset from condition for calculation of 'base'.
1654 2016-01-08 Jakub Jelinek <jakub@redhat.com>
1656 PR fortran/69128
1657 * trans.h (OMPWS_SCALARIZER_BODY): Define.
1658 (OMPWS_NOWAIT): Renumber.
1659 * trans-stmt.c (gfc_trans_where_3): Only set OMPWS_SCALARIZER_WS
1660 if OMPWS_SCALARIZER_BODY is not set already, and set also
1661 OMPWS_SCALARIZER_BODY until the final loop creation.
1662 * trans-expr.c (gfc_trans_assignment_1): Likewise.
1663 * trans-openmp.c (gfc_trans_omp_workshare): Also clear
1664 OMPWS_SCALARIZER_BODY.
1665 * trans-array.c (gfc_trans_scalarized_loop_end): Don't create
1666 OMP_FOR if OMPWS_SCALARIZER_BODY is set.
1668 2016-01-04 Jakub Jelinek <jakub@redhat.com>
1670 Update copyright years.
1672 * gfortranspec.c (lang_specific_driver): Update copyright notice
1673 dates.
1674 * gfc-internals.texi: Bump @copying's copyright year.
1675 * gfortran.texi: Ditto.
1676 * intrinsic.texi: Ditto.
1677 * invoke.texi: Ditto.
1679 2016-01-01 Paul Thomas <pault@gcc.gnu.org>
1681 PR fortran/68864
1682 * trans-array.c (evaluate_bound): If deferred, test that 'desc'
1683 is an array descriptor before using gfc_conv_descriptor_xxx.
1684 \f
1685 Copyright (C) 2016 Free Software Foundation, Inc.
1687 Copying and distribution of this file, with or without modification,
1688 are permitted in any medium without royalty provided the copyright
1689 notice and this notice are preserved.