data-list-changed-registers outputs a list of registers.

diff --git a/gdb/mi/ChangeLog b/gdb/mi/ChangeLog
index 87c8725a4fdb80d9744c22c6d15d498e42eaf90e..0f2ab50bc2a2af72651f76260f58c989979d56ff 100644 (file)
--- a/gdb/mi/ChangeLog
+++ b/gdb/mi/ChangeLog
@@ -1,3 +1,10 @@
+2001-06-23  Andrew Cagney  <ac131313@redhat.com>
+
+       * mi-main.c (mi_cmd_data_list_changed_registers): Output a list of
+       register numbers.
+       * gdbmi.texinfo (data-list-changed-registers): Update
+       documentation.
+       
 2001-06-23  Andrew Cagney  <ac131313@redhat.com>
 
        * gdbmi.texinfo (data-disassemble): Update documentation of

diff --git a/gdb/mi/gdbmi.texinfo b/gdb/mi/gdbmi.texinfo
index 74b774bd857ec5acabdbebd3e72c8c899dae9227..3fdad0f98b9e9b42c1efd6c26c1e9cb4c31520a0 100644 (file)
--- a/gdb/mi/gdbmi.texinfo
+++ b/gdb/mi/gdbmi.texinfo
@@ -1234,9 +1234,9 @@ On a PPC MBX board:
 args=@{@},file="try.c",line="5"@}
 (@value{GDBP})
 -data-list-changed-registers
-^done,changed-registers=@{"0","1","2","4","5","6","7","8","9",
+^done,changed-registers=["0","1","2","4","5","6","7","8","9",
 "10","11","13","14","15","16","17","18","19","20","21","22","23",
-"24","25","26","27","28","30","31","64","65","66","67","69"@}
+"24","25","26","27","28","30","31","64","65","66","67","69"]
 (@value{GDBP})
 @end smallexample
 

diff --git a/gdb/mi/mi-main.c b/gdb/mi/mi-main.c
index 5f73ddf85f9aec63fc9f531bff43b7679a9fe903..4ef68a720e1b043c6e8b6063bea07180ac339dd6 100644 (file)
--- a/gdb/mi/mi-main.c
+++ b/gdb/mi/mi-main.c
@@ -323,7 +323,7 @@ mi_cmd_data_list_changed_registers (char *command, char **argv, int argc)
 
   numregs = NUM_REGS;
 
-  ui_out_tuple_begin (uiout, "changed-registers");
+  ui_out_list_begin (uiout, "changed-registers");
 
   if (argc == 0)               /* No args, just do all the regs */
     {
@@ -372,7 +372,7 @@ mi_cmd_data_list_changed_registers (char *command, char **argv, int argc)
          return MI_CMD_ERROR;
        }
     }
-  ui_out_tuple_end (uiout);
+  ui_out_list_end (uiout);
   return MI_CMD_DONE;
 }
 

diff --git a/gdb/testsuite/gdb.mi/ChangeLog b/gdb/testsuite/gdb.mi/ChangeLog
index 5258a384d313052ddfb48d62f137cc4f13f74129..d6a116232426c097941e707c98400ce58608b26a 100644 (file)
--- a/gdb/testsuite/gdb.mi/ChangeLog
+++ b/gdb/testsuite/gdb.mi/ChangeLog
@@ -1,3 +1,8 @@
+2001-06-25  Andrew Cagney  <ac131313@redhat.com>
+
+       * mi-regs.exp: Update patterns matching changed-registers.  Now
+       outputs a list.
+
 2001-06-23  Andrew Cagney  <ac131313@redhat.com>
 
        * ChangeLog-mi: Rename to ChangeLog.

diff --git a/gdb/testsuite/gdb.mi/mi-regs.exp b/gdb/testsuite/gdb.mi/mi-regs.exp
index b4b0141027663fe0684918c99bfd7be7023ed995..9a60f8de22be1318370548d3a7d8e34cb4cd814a 100644 (file)
--- a/gdb/testsuite/gdb.mi/mi-regs.exp
+++ b/gdb/testsuite/gdb.mi/mi-regs.exp
@@ -160,7 +160,7 @@ proc sparc_register_tests { } {
     # Don't know how useful this test is
 
     mi_gdb_test "002-data-list-changed-registers" \
-           "002\\^done,changed-registers=\{\"1\",\"9\",\"10\",\"11\",\"12\",\"13\",\"14\",\"15\",\"16\",\"23\",\"24\",\"25\",\"26\",\"27\",\"28\",\"30\",\"31\",\"65\",\"68\",\"69\"\}" \
+           "002\\^done,changed-registers=\\\[\"1\",\"9\",\"10\",\"11\",\"12\",\"13\",\"14\",\"15\",\"16\",\"23\",\"24\",\"25\",\"26\",\"27\",\"28\",\"30\",\"31\",\"65\",\"68\",\"69\"\\\]" \
            "list changed registers"
 }