Output ``[]'' when a list.

diff --git a/gdb/mi/ChangeLog b/gdb/mi/ChangeLog
index 447138c8167be0ba6be0e99716affbe84f58a60b..5231b9af3646f84311c7487c659259fcddd2a499 100644 (file)
--- a/gdb/mi/ChangeLog
+++ b/gdb/mi/ChangeLog
@@ -1,3 +1,8 @@
+2001-06-21  Andrew Cagney  <ac131313@redhat.com>
+
+       * mi-out.c (mi_open): For lists, when mi_version > 0, use ``[''.
+       (mi_close): Ditto for ``]''.
+
 2001-06-20  Andrew Cagney  <ac131313@redhat.com>
 
        * mi-out.c (mi_table_header): Add parameter ``col_name''.

diff --git a/gdb/mi/mi-out.c b/gdb/mi/mi-out.c
index 1cc81806d3225ba08ceda323af1237309af7532a..b2c02e69d0002ffffabec7a7c789320133e05c79 100644 (file)
--- a/gdb/mi/mi-out.c
+++ b/gdb/mi/mi-out.c
@@ -318,7 +318,10 @@ mi_open (struct ui_out *uiout,
       fputc_unfiltered ('{', data->buffer);
       break;
     case ui_out_type_list:
-      fputc_unfiltered ('[', data->buffer);
+      if (data->mi_version > 0)
+       fputc_unfiltered ('[', data->buffer);
+      else
+       fputc_unfiltered ('{', data->buffer);
       break;
     default:
       internal_error (__FILE__, __LINE__, "bad switch");
@@ -336,7 +339,10 @@ mi_close (struct ui_out *uiout,
       fputc_unfiltered ('}', data->buffer);
       break;
     case ui_out_type_list:
-      fputc_unfiltered (']', data->buffer);
+      if (data->mi_version > 0)
+       fputc_unfiltered (']', data->buffer);
+      else
+       fputc_unfiltered ('}', data->buffer);
       break;
     default:
       internal_error (__FILE__, __LINE__, "bad switch");