Output ``[...]'' when a list.

diff --git a/gdb/mi/ChangeLog b/gdb/mi/ChangeLog
index 617e0cd6b974b1fb7886ff705bff2be7ccead87a..3398252398ddfd4fa7137fa972a65157fdbb8a43 100644 (file)
--- a/gdb/mi/ChangeLog
+++ b/gdb/mi/ChangeLog
@@ -1,3 +1,7 @@
+2001-05-12  Andrew Cagney  <ac131313@redhat.com>
+
+       * mi-out.c (mi_close, mi_open): Output ``[]'' when a list.
+
 Fri May 11 13:55:07 2001  Andrew Cagney  <cagney@b1.cygnus.com>
 
        * mi-cmd-var.c: Replace ui_out_list_begin, ui_out_list_end and

diff --git a/gdb/mi/mi-out.c b/gdb/mi/mi-out.c
index e9208123bbd948a1adc6dfc17bcce3bc25a63571..b2bfaed39d8358be5f289d831cf9d2d59803d748 100644 (file)
--- a/gdb/mi/mi-out.c
+++ b/gdb/mi/mi-out.c
@@ -307,7 +307,17 @@ mi_open (struct ui_out *uiout,
         enum ui_out_type type)
 {
   struct ui_out_data *data = ui_out_data (uiout);
-  fputc_unfiltered ('{', data->buffer);
+  switch (type)
+    {
+    case ui_out_type_tuple:
+      fputc_unfiltered ('{', data->buffer);
+      break;
+    case ui_out_type_list:
+      fputc_unfiltered ('[', data->buffer);
+      break;
+    default:
+      internal_error (__FILE__, __LINE__, "bad switch");
+    }
 }
 
 static void
@@ -315,7 +325,17 @@ mi_close (struct ui_out *uiout,
          enum ui_out_type type)
 {
   struct ui_out_data *data = ui_out_data (uiout);
-  fputc_unfiltered ('}', data->buffer);
+  switch (type)
+    {
+    case ui_out_type_tuple:
+      fputc_unfiltered ('}', data->buffer);
+      break;
+    case ui_out_type_list:
+      fputc_unfiltered (']', data->buffer);
+      break;
+    default:
+      internal_error (__FILE__, __LINE__, "bad switch");
+    }
 }
 
 /* add a string to the buffer */