[Bug debug/37738] Fortran DW_TAG_common_block has incorrect placement/scope

[jakub at gcc dot gnu dot org]

------- Comment #2 from jakub at gcc dot gnu dot org  2008-10-07 18:15 -------
Subject: Bug 37738

Author: jakub
Date: Tue Oct  7 18:14:16 2008
New Revision: 140944

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=140944
Log:
        PR debug/37738
        * dwarf2out.c (common_block_die_table): New variable.
        (common_block_die_table_hash, common_block_die_table_eq): New
        functions.
        (gen_variable_die): Look up a DW_TAG_common_block die for a particular
        COMMON block in the current scope rather than globally.  Optimize
        DW_OP_addr SYMBOL_REF DW_OP_plus_uconst off into
        DW_OP_addr SYMBOL_REF+off.

        * gfortran.dg/debug/pr37738.f: New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/debug/pr37738.f
Modified:
    trunk/gcc/ChangeLog
    trunk/gcc/dwarf2out.c
    trunk/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37738