Use ui_out_emit_tuple in more places in MI
authorTom Tromey <tom@tromey.com>
Wed, 12 Apr 2017 22:16:10 +0000 (16:16 -0600)
committerTom Tromey <tom@tromey.com>
Sat, 22 Apr 2017 15:47:00 +0000 (09:47 -0600)
This patch changes a few more spots in MI to use ui_out_emit_tuple.
These changes required the use of gdb::optional.

ChangeLog
2017-04-22  Tom Tromey  <tom@tromey.com>

* mi/mi-main.c (print_variable_or_computed): Use ui_out_emit_tuple.
* mi/mi-cmd-var.c (varobj_update_one): Use ui_out_emit_tuple.
* mi/mi-cmd-stack.c (list_arg_or_local): Use ui_out_emit_tuple.

gdb/ChangeLog
gdb/mi/mi-cmd-stack.c
gdb/mi/mi-cmd-var.c
gdb/mi/mi-main.c

index 37ca98858b7f0ed0e502e336a9bc262ff769adbf..fb066d04c78bb562c8f5dda99b6470d0624ed77c 100644 (file)
@@ -1,3 +1,9 @@
+2017-04-22  Tom Tromey  <tom@tromey.com>
+
+       * mi/mi-main.c (print_variable_or_computed): Use ui_out_emit_tuple.
+       * mi/mi-cmd-var.c (varobj_update_one): Use ui_out_emit_tuple.
+       * mi/mi-cmd-stack.c (list_arg_or_local): Use ui_out_emit_tuple.
+
 2017-04-22  Tom Tromey  <tom@tromey.com>
 
        * tracepoint.c (tvariables_info_1)
index f288817b5c7ba8c77659d31d82a9da776e7486ac..bd24e5b158879b1845069bfe207f1997a0043356 100644 (file)
@@ -34,6 +34,7 @@
 #include "extension.h"
 #include <ctype.h>
 #include "mi-parse.h"
+#include "common/gdb_optional.h"
 
 enum what_to_list { locals, arguments, all };
 
@@ -483,7 +484,6 @@ static void
 list_arg_or_local (const struct frame_arg *arg, enum what_to_list what,
                   enum print_values values, int skip_unavailable)
 {
-  struct cleanup *old_chain;
   struct ui_out *uiout = current_uiout;
 
   gdb_assert (!arg->val || !arg->error);
@@ -507,10 +507,9 @@ list_arg_or_local (const struct frame_arg *arg, enum what_to_list what,
                                         TYPE_LENGTH (value_type (arg->val))))))
     return;
 
-  old_chain = make_cleanup (null_cleanup, NULL);
-
+  gdb::optional<ui_out_emit_tuple> tuple_emitter;
   if (values != PRINT_NO_VALUES || what == all)
-    make_cleanup_ui_out_tuple_begin_end (uiout, NULL);
+    tuple_emitter.emplace (uiout, nullptr);
 
   string_file stb;
 
@@ -556,8 +555,6 @@ list_arg_or_local (const struct frame_arg *arg, enum what_to_list what,
        stb.printf (_("<error reading variable: %s>"), error_message);
       uiout->field_stream ("value", stb);
     }
-
-  do_cleanups (old_chain);
 }
 
 /* Print a list of the objects for the frame FI in a certain form,
index 0a4ed62f89de50ef8bc4bfe27d5ede6db666d93f..1a7e322c7c479ba79b8d6f1f61edca0e5a48b9bf 100644 (file)
@@ -30,6 +30,7 @@
 #include "mi-getopt.h"
 #include "gdbthread.h"
 #include "mi-parse.h"
+#include "common/gdb_optional.h"
 
 extern unsigned int varobjdebug;               /* defined in varobj.c.  */
 
@@ -712,10 +713,10 @@ varobj_update_one (struct varobj *var, enum print_values print_values,
   for (i = 0; VEC_iterate (varobj_update_result, changes, i, r); ++i)
     {
       int from, to;
-      struct cleanup *cleanup = make_cleanup (null_cleanup, NULL);
 
+      gdb::optional<ui_out_emit_tuple> tuple_emitter;
       if (mi_version (uiout) > 1)
-       make_cleanup_ui_out_tuple_begin_end (uiout, NULL);
+       tuple_emitter.emplace (uiout, nullptr);
       uiout->field_string ("name", varobj_get_objname (r->varobj));
 
       switch (r->status)
@@ -784,8 +785,6 @@ varobj_update_one (struct varobj *var, enum print_values print_values,
          VEC_free (varobj_p, r->newobj);
          r->newobj = NULL;     /* Paranoia.  */
        }
-
-      do_cleanups (cleanup);
     }
   VEC_free (varobj_update_result, changes);
 }
index d309ba3fbfd6f64a896fd1893c4ed111ba8affae..7e225db82e40348b749fc272a9ff5522335d1968 100644 (file)
@@ -2656,7 +2656,6 @@ mi_cmd_ada_task_info (const char *command, char **argv, int argc)
 static void
 print_variable_or_computed (const char *expression, enum print_values values)
 {
-  struct cleanup *old_chain;
   struct value *val;
   struct type *type;
   struct ui_out *uiout = current_uiout;
@@ -2670,9 +2669,9 @@ print_variable_or_computed (const char *expression, enum print_values values)
   else
     val = evaluate_expression (expr.get ());
 
-  old_chain = make_cleanup (null_cleanup, NULL);
+  gdb::optional<ui_out_emit_tuple> tuple_emitter;
   if (values != PRINT_NO_VALUES)
-    make_cleanup_ui_out_tuple_begin_end (uiout, NULL);
+    tuple_emitter.emplace (uiout, nullptr);
   uiout->field_string ("name", expression);
 
   switch (values)
@@ -2704,8 +2703,6 @@ print_variable_or_computed (const char *expression, enum print_values values)
       }
       break;
     }
-
-  do_cleanups (old_chain);
 }
 
 /* Implement the "-trace-frame-collected" command.  */