summaryrefslogtreecommitdiff
path: root/gdb/dwarf2read.c
diff options
context:
space:
mode:
authorTom Tromey <tromey@redhat.com>2013-07-23 06:56:52 +0000
committerTom Tromey <tromey@redhat.com>2013-07-23 06:56:52 +0000
commitb711faca056f6729967aad30054cc993a6b3a475 (patch)
treeb375ac8b774fc30f5003f9824be16fbce92cc8e8 /gdb/dwarf2read.c
parent3e1cf1b5d796066d4082b10a5d4675f12b176959 (diff)
downloadgdb-b711faca056f6729967aad30054cc993a6b3a475.tar.gz
* dwarf2read.c (init_cutu_and_read_dies): Revert patch from
2013-07-22.
Diffstat (limited to 'gdb/dwarf2read.c')
-rw-r--r--gdb/dwarf2read.c33
1 files changed, 19 insertions, 14 deletions
diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c
index 05388166ce0..70ab302fb31 100644
--- a/gdb/dwarf2read.c
+++ b/gdb/dwarf2read.c
@@ -5015,7 +5015,7 @@ init_cutu_and_read_dies (struct dwarf2_per_cu_data *this_cu,
struct die_info *comp_unit_die;
int has_children;
struct attribute *attr;
- struct cleanup *cleanups;
+ struct cleanup *cleanups, *free_cu_cleanup = NULL;
struct signatured_type *sig_type = NULL;
struct dwarf2_section_info *abbrev_section;
/* Non-zero if CU currently points to a DWO file and we need to
@@ -5074,7 +5074,7 @@ init_cutu_and_read_dies (struct dwarf2_per_cu_data *this_cu,
init_one_comp_unit (cu, this_cu);
/* If an error occurs while loading, release our storage. */
- make_cleanup (free_heap_comp_unit, cu);
+ free_cu_cleanup = make_cleanup (free_heap_comp_unit, cu);
}
/* Get the header. */
@@ -5203,22 +5203,27 @@ init_cutu_and_read_dies (struct dwarf2_per_cu_data *this_cu,
die_reader_func (&reader, info_ptr, comp_unit_die, has_children, data);
/* Done, clean up. */
- if (keep)
+ if (free_cu_cleanup != NULL)
{
- /* We've successfully allocated this compilation unit. Let our
- caller clean it up when finished with it. */
- discard_cleanups (cleanups);
+ if (keep)
+ {
+ /* We've successfully allocated this compilation unit. Let our
+ caller clean it up when finished with it. */
+ discard_cleanups (free_cu_cleanup);
- /* We can only discard free_cu_cleanup and all subsequent cleanups.
- So we have to manually free the abbrev table. */
- dwarf2_free_abbrev_table (cu);
+ /* We can only discard free_cu_cleanup and all subsequent cleanups.
+ So we have to manually free the abbrev table. */
+ dwarf2_free_abbrev_table (cu);
- /* Link this CU into read_in_chain. */
- this_cu->cu->read_in_chain = dwarf2_per_objfile->read_in_chain;
- dwarf2_per_objfile->read_in_chain = this_cu;
+ /* Link this CU into read_in_chain. */
+ this_cu->cu->read_in_chain = dwarf2_per_objfile->read_in_chain;
+ dwarf2_per_objfile->read_in_chain = this_cu;
+ }
+ else
+ do_cleanups (free_cu_cleanup);
}
- else
- do_cleanups (cleanups);
+
+ do_cleanups (cleanups);
}
/* Read CU/TU THIS_CU in section SECTION,