diff options
author | Jan Kratochvil <jan.kratochvil@redhat.com> | 2013-01-21 16:46:01 +0000 |
---|---|---|
committer | Jan Kratochvil <jan.kratochvil@redhat.com> | 2013-01-21 16:46:01 +0000 |
commit | b48fa46efd5d0968fd2a9f62264cb9313fd87e20 (patch) | |
tree | 86a9faf61331d481a4ac0b0de9124da88a3e4fc0 /gdb/symtab.h | |
parent | b6a551d42519ea2f633cad6362c30a0d569b3c0b (diff) | |
download | gdb-b48fa46efd5d0968fd2a9f62264cb9313fd87e20.tar.gz |
gdb/
Fix gdb.fortran/common-block.exp crash in PIE mode.
* dwarf2read.c (new_symbol_full) <DW_TAG_common_block>: Use
LOC_COMMON_BLOCK.
* f-valprint.c (info_common_command_for_block): Expect
LOC_COMMON_BLOCK in gdb_assert.
* symtab.h (struct general_symbol_info): Update comment for the
common_block member.
(domain_enum): Extend comment for the COMMON_BLOCK_DOMAIN member.
(enum address_class): New member LOC_COMMON_BLOCK.
Diffstat (limited to 'gdb/symtab.h')
-rw-r--r-- | gdb/symtab.h | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/gdb/symtab.h b/gdb/symtab.h index c334a3a28df..b992266f265 100644 --- a/gdb/symtab.h +++ b/gdb/symtab.h @@ -120,7 +120,7 @@ struct general_symbol_info CORE_ADDR address; - /* A common block. Used with COMMON_BLOCK_DOMAIN. */ + /* A common block. Used with LOC_COMMON_BLOCK. */ struct common_block *common_block; @@ -414,7 +414,8 @@ typedef enum domain_enum_tag LABEL_DOMAIN, - /* Fortran common blocks. Their naming must be separate from VAR_DOMAIN. */ + /* Fortran common blocks. Their naming must be separate from VAR_DOMAIN. + They also always use LOC_COMMON_BLOCK. */ COMMON_BLOCK_DOMAIN } domain_enum; @@ -533,6 +534,10 @@ enum address_class /* The variable's address is computed by a set of location functions (see "struct symbol_computed_ops" below). */ LOC_COMPUTED, + + /* The variable uses general_symbol_info->value->common_block field. + It also always uses COMMON_BLOCK_DOMAIN. */ + LOC_COMMON_BLOCK, }; /* The methods needed to implement LOC_COMPUTED. These methods can |