From: Tom Tromey <tromey@redhat.com>
Date: Tue, 23 Jul 2013 06:56:53 +0000 (+0000)
Subject: 	* dwarf2read.c (init_cutu_and_read_dies): Revert patch from
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=365156ada142ed158af533d83ed88521e06439d7;p=binutils-gdb.git

	* dwarf2read.c (init_cutu_and_read_dies): Revert patch from
	2013-07-22.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index d8e2f1bc025..ca11d3c0fbd 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2013-07-23  Tom Tromey  <tromey@redhat.com>
+
+	* dwarf2read.c (init_cutu_and_read_dies): Revert patch from
+	2013-07-22.
+
 2013-07-22  Doug Evans  <dje@google.com>
 
 	* exec.h (remove_target_sections): Delete arg abfd.
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,