Use ui_out_emit_list

[binutils-gdb.git] / gdb / stack.c

diff --git a/gdb/stack.c b/gdb/stack.c
index fa4726448aca66546e3b1ee7a020a6370659c3de..7f8a51caa5602417172bc27f39bc40063bb5e2fd 100644 (file)
--- a/gdb/stack.c
+++ b/gdb/stack.c
@@ -1196,7 +1196,6 @@ print_frame (struct frame_info *frame, int print_level,
     {
       struct gdbarch *gdbarch = get_frame_arch (frame);
       int numargs;
-      struct cleanup *args_list_chain;
 
       if (gdbarch_frame_num_args_p (gdbarch))
        {
@@ -1206,20 +1205,20 @@ print_frame (struct frame_info *frame, int print_level,
       else
        numargs = -1;
     
-      args_list_chain = make_cleanup_ui_out_list_begin_end (uiout, "args");
-      TRY
-       {
-         print_frame_args (func, frame, numargs, gdb_stdout);
-       }
-      CATCH (e, RETURN_MASK_ERROR)
-       {
-       }
-      END_CATCH
+      {
+       ui_out_emit_list list_emitter (uiout, "args");
+       TRY
+         {
+           print_frame_args (func, frame, numargs, gdb_stdout);
+         }
+       CATCH (e, RETURN_MASK_ERROR)
+         {
+         }
+       END_CATCH
 
-      /* FIXME: ARGS must be a list.  If one argument is a string it
-         will have " that will not be properly escaped.  */
-      /* Invoke ui_out_tuple_end.  */
-      do_cleanups (args_list_chain);
+       /* FIXME: ARGS must be a list.  If one argument is a string it
+          will have " that will not be properly escaped.  */
+      }
       QUIT;
     }
   uiout->text (")");