Remove cleanup from ada_collect_symbol_completion_matches

ada_collect_symbol_completion_matches installs a null_cleanup but not
any other cleanups.  This patch removes it.

ChangeLog
2018-05-21  Tom Tromey  <tom@tromey.com>

	* ada-lang.c (ada_collect_symbol_completion_matches): Remove
	cleanup.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 018a98ec544e28030bd0d0349fe1abd1a753ebda..5d773566ec352ffb351fa15424ee21c2c749860d 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+2018-05-21  Tom Tromey  <tom@tromey.com>
+
+       * ada-lang.c (ada_collect_symbol_completion_matches): Remove
+       cleanup.
+
 2018-05-21  Tom Tromey  <tom@tromey.com>
 
        * ada-lang.c (ada_exception_message_1, ada_exception_message):

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index fe6212c53f50b20302da3c51e228752cae96fbc1..b05203f081f8896f45eb30b4aeef9215d87ab921 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -6444,7 +6444,6 @@ ada_collect_symbol_completion_matches (completion_tracker &tracker,
   struct objfile *objfile;
   const struct block *b, *surrounding_static_block = 0;
   struct block_iterator iter;
-  struct cleanup *old_chain = make_cleanup (null_cleanup, NULL);
 
   gdb_assert (code == TYPE_CODE_UNDEF);
 
@@ -6549,8 +6548,6 @@ ada_collect_symbol_completion_matches (completion_tracker &tracker,
                                lookup_name, text, word);
     }
   }
-
-  do_cleanups (old_chain);
 }
 
                                 /* Field Access */