* utils.c (do_obstack_free): New function.

	(make_cleanup_obstack_free): Likewise.
	* defs.h (make_cleanup_obstack_free): Declare.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index b96ecc36657ddbe50db770f469ebbc4bbbade956..107396ea20bd38185e6796878d9450c1c09d2369 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,9 @@
+2009-03-19  Tom Tromey  <tromey@redhat.com>
+
+       * utils.c (do_obstack_free): New function.
+       (make_cleanup_obstack_free): Likewise.
+       * defs.h (make_cleanup_obstack_free): Declare.
+
 2009-03-18  Doug Evans  <dje@google.com>
 
        * linux-nat.c (linux_nat_find_memory_regions): Result of PIDGET is an

diff --git a/gdb/defs.h b/gdb/defs.h
index 001db816a6b2d7174584c6b93ed726a79e39d825..e140474bb490841a5a51393028d43ceaffca137d 100644 (file)
--- a/gdb/defs.h
+++ b/gdb/defs.h
@@ -366,6 +366,9 @@ extern struct cleanup *make_cleanup_fclose (FILE *file);
 
 extern struct cleanup *make_cleanup_bfd_close (bfd *abfd);
 
+struct obstack;
+extern struct cleanup *make_cleanup_obstack_free (struct obstack *obstack);
+
 extern struct cleanup *make_cleanup_restore_integer (int *variable);
 
 extern struct cleanup *make_final_cleanup (make_cleanup_ftype *, void *);

diff --git a/gdb/utils.c b/gdb/utils.c
index 92248391eedf49b3eb7711552ac14d4b92451ad0..0becfd97bb78a7d60f5e459a4cb2b2dfe4915a72 100644 (file)
--- a/gdb/utils.c
+++ b/gdb/utils.c
@@ -271,6 +271,23 @@ make_cleanup_fclose (FILE *file)
   return make_cleanup (do_fclose_cleanup, file);
 }
 
+/* Helper function which does the work for make_cleanup_obstack_free.  */
+
+static void
+do_obstack_free (void *arg)
+{
+  struct obstack *ob = arg;
+  obstack_free (ob, NULL);
+}
+
+/* Return a new cleanup that frees OBSTACK.  */
+
+struct cleanup *
+make_cleanup_obstack_free (struct obstack *obstack)
+{
+  return make_cleanup (do_obstack_free, obstack);
+}
+
 static void
 do_ui_file_delete (void *arg)
 {