aboutsummaryrefslogtreecommitdiff
path: root/gdb/f-valprint.c
diff options
context:
space:
mode:
authorJan Kratochvil <jan.kratochvil@redhat.com>2013-01-21 16:46:12 +0000
committerJan Kratochvil <jan.kratochvil@redhat.com>2013-01-21 16:46:12 +0000
commit5a352474f94fb3d8b8d81cd5000eb2d10ad7c656 (patch)
tree45479d53cf38bc535f3b1a06be98f81fd33edaca /gdb/f-valprint.c
parent822b8bf46be64f9055e3d4b944323881f102fd8d (diff)
downloadgdb-5a352474f94fb3d8b8d81cd5000eb2d10ad7c656.zip
gdb-5a352474f94fb3d8b8d81cd5000eb2d10ad7c656.tar.gz
gdb-5a352474f94fb3d8b8d81cd5000eb2d10ad7c656.tar.bz2
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/f-valprint.c')
-rw-r--r--gdb/f-valprint.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/f-valprint.c b/gdb/f-valprint.c
index 22cca83..d01d6ec 100644
--- a/gdb/f-valprint.c
+++ b/gdb/f-valprint.c
@@ -427,7 +427,7 @@ info_common_command_for_block (struct block *block, const char *comname,
struct common_block *common = SYMBOL_VALUE_COMMON_BLOCK (sym);
size_t index;
- gdb_assert (SYMBOL_CLASS (sym) == LOC_STATIC);
+ gdb_assert (SYMBOL_CLASS (sym) == LOC_COMMON_BLOCK);
if (comname && (!SYMBOL_LINKAGE_NAME (sym)
|| strcmp (comname, SYMBOL_LINKAGE_NAME (sym)) != 0))