From: Tom Tromey <tromey@redhat.com>
Date: Fri, 3 Aug 2012 20:52:47 +0000 (+0000)
Subject: 	* dwarf2-frame.c (dwarf2_frame_cache): Call do_cleanups before
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=5a1cf4d6a803271b9c895d0c11fdeeab9f49bb99;p=binutils-gdb.git

	* dwarf2-frame.c (dwarf2_frame_cache): Call do_cleanups before
	return.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index b4c15458011..336ab5edf7e 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2012-08-03  Tom Tromey  <tromey@redhat.com>
+
+	* dwarf2-frame.c (dwarf2_frame_cache): Call do_cleanups before
+	return.
+
 2012-08-02  Ulrich Weigand  <ulrich.weigand@linaro.org>
 
 	* inf-child.c (inf_child_fileio_pwrite): If pwrite fails, fall back
diff --git a/gdb/dwarf2-frame.c b/gdb/dwarf2-frame.c
index 01786efb7bd..741a10333e3 100644
--- a/gdb/dwarf2-frame.c
+++ b/gdb/dwarf2-frame.c
@@ -1110,6 +1110,7 @@ dwarf2_frame_cache (struct frame_info *this_frame, void **this_cache)
       if (ex.error == NOT_AVAILABLE_ERROR)
 	{
 	  cache->unavailable_retaddr = 1;
+	  do_cleanups (old_chain);
 	  return cache;
 	}