[Bug debug/71906] [6/7 Regression] Fortran allocatable strings debug info type size regression

[jakub at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=71906

--- Comment #7 from Jakub Jelinek <jakub at gcc dot gnu.org> ---
Author: jakub
Date: Mon Aug 15 10:05:59 2016
New Revision: 239473

URL: https://gcc.gnu.org/viewcvs?rev=239473&root=gcc&view=rev
Log:
        PR debug/71906
        * dwarf2out.c (string_types): New variable.
        (gen_array_type_die): Change early_dwarf handling of
        DW_AT_string_length, create DW_OP_call4 referencing the
        length var temporarily.  Handle parameters that are pointers
        to string length.
        (adjust_string_types): New function.
        (gen_subprogram_die): Temporarily set string_types to local var,
        call adjust_string_types if needed.
        (non_dwarf_expression, copy_deref_exprloc, optimize_string_length):
        New functions.
        (resolve_addr): Adjust DW_AT_string_length if it is DW_OP_call4.

        * trans-decl.c (gfc_get_symbol_decl): Call gfc_finish_var_decl
        for decl's character length before gfc_finish_var_decl on the
        decl itself.

Modified:
    branches/gcc-6-branch/gcc/ChangeLog
    branches/gcc-6-branch/gcc/dwarf2out.c
    branches/gcc-6-branch/gcc/fortran/ChangeLog
    branches/gcc-6-branch/gcc/fortran/trans-decl.c