From 62147a2265e322c758743edf13a1377fdcb62479 Mon Sep 17 00:00:00 2001 From: Pedro Alves Date: Tue, 24 Nov 2015 18:11:22 +0000 Subject: [PATCH] List displays in ascending order Before: (gdb) info display Auto-display expressions now in effect: Num Enb Expression 3: y 1 2: y 1 1: y 1 After: (gdb) info display Auto-display expressions now in effect: Num Enb Expression 1: y 1 2: y 1 3: y 1 gdb/ChangeLog: 2015-11-24 Pedro Alves PR 17539 * printcmd.c (display_command): Append new display at the end of the list. gdb/testsuite/ChangeLog: 2015-11-24 Pedro Alves PR 17539 * gdb.base/display.exp: Expect displays to be sorted in ascending order. Use multi_line. * gdb.base/solib-display.exp: Likewise. --- gdb/ChangeLog | 6 ++++ gdb/printcmd.c | 14 ++++++++-- gdb/testsuite/ChangeLog | 7 +++++ gdb/testsuite/gdb.base/display.exp | 35 ++++++++++++++++++++---- gdb/testsuite/gdb.base/solib-display.exp | 19 +++++++++++-- 5 files changed, 71 insertions(+), 10 deletions(-) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 760aa80018a..6035c494972 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,9 @@ +2015-11-24 Pedro Alves + + PR 17539 + * printcmd.c (display_command): Append new display at the end of + the list. + 2015-11-24 Pedro Alves PR 17539 diff --git a/gdb/printcmd.c b/gdb/printcmd.c index 1744abd4324..c676fc7ed78 100644 --- a/gdb/printcmd.c +++ b/gdb/printcmd.c @@ -1543,11 +1543,21 @@ display_command (char *arg, int from_tty) newobj->exp = expr; newobj->block = innermost_block; newobj->pspace = current_program_space; - newobj->next = display_chain; newobj->number = ++display_number; newobj->format = fmt; newobj->enabled_p = 1; - display_chain = newobj; + newobj->next = NULL; + + if (display_chain == NULL) + display_chain = newobj; + else + { + struct display *last; + + for (last = display_chain; last->next != NULL; last = last->next) + ; + last->next = newobj; + } if (from_tty) do_one_display (newobj); diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 36bc829e4fc..fd7c1f4c268 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2015-11-24 Pedro Alves + + PR 17539 + * gdb.base/display.exp: Expect displays to be sorted in ascending + order. Use multi_line. + * gdb.base/solib-display.exp: Likewise. + 2015-11-24 Pedro Alves PR 17539 diff --git a/gdb/testsuite/gdb.base/display.exp b/gdb/testsuite/gdb.base/display.exp index 6e21d9ee009..1d02629b918 100644 --- a/gdb/testsuite/gdb.base/display.exp +++ b/gdb/testsuite/gdb.base/display.exp @@ -83,8 +83,23 @@ gdb_test "disp/s &sum" ".*5: x/s &sum $hex.*sum.:.*" "display/s &sum" # Hit the displays # -gdb_test "cont" ".*\[Ww\]atchpoint 3: sum.*\[1-9\]*: x/s &sum.*\[1-9\]*: /f f = 3.1415\r\n\[1-9\]*: x/i &k.*\r\n\[1-9\]*: /x j = 0x0\r\n\[1-9\]*: i = 0.*" "first disp" -gdb_test "cont" ".*\[Ww\]atchpoint 3: sum.*\[1-9\]*: x/s &sum.*\[1-9\]*: /f f = 4.1415\r\n\[1-9\]*: x/i &k.*\r\n\[1-9\]*: /x j = 0x0.*\[1-9\]*: i = 0.*" "second disp" +gdb_test "cont" [multi_line \ + ".*\[Ww\]atchpoint 3: sum.*" \ + "\[1-9\]*: i = 0.*" \ + "\[1-9\]*: /x j = 0x0" \ + "\[1-9\]*: x/i &k.*" \ + "\[1-9\]*: /f f = 3.1415" \ + "\[1-9\]*: x/s &sum.*" \ + ] "first disp" + +gdb_test "cont" [multi_line \ + ".*\[Ww\]atchpoint 3: sum.*" \ + "\[1-9\]*: i = 0.*" \ + "\[1-9\]*: /x j = 0x0.*" \ + "\[1-9\]*: x/i &k.*" \ + "\[1-9\]*: /f f = 4.1415" \ + "\[1-9\]*: x/s &sum.*" \ + ] "second disp" gdb_test "enab disp 6" ".*No display number 6..*" "catch err" gdb_test_no_output "disab disp 1" "disab disp 1" @@ -92,9 +107,19 @@ gdb_test_no_output "disab disp 2" "disab disp 2" gdb_test_no_output "enab disp 1" "re-enab" gdb_test_no_output "enab disp 1" "re-enab of enab" gdb_test_no_output "undisp 5" "undisp" -gdb_test "info disp" ".*Auto-display expressions now in effect.*y /f f.*y /1bi &k.*n /x j.*y i.*" "info disp" - -gdb_test "cont" ".*\[Ww\]atch.*5.1415.*.*i = 0.*" "next hit" +gdb_test "info disp" [multi_line \ + "Auto-display expressions now in effect.*" \ + ".*y i" \ + ".*n /x j" \ + ".*y /1bi &k" \ + ".*y /f f" \ + ] "info disp" + +gdb_test "cont" [multi_line \ + ".*\[Ww\]atch.*" \ + ".*i = 0" \ + ".*5.1415" \ + ] "next hit" gdb_test "undisp" \ "" \ diff --git a/gdb/testsuite/gdb.base/solib-display.exp b/gdb/testsuite/gdb.base/solib-display.exp index d1b2c65ed24..b2070c949d9 100644 --- a/gdb/testsuite/gdb.base/solib-display.exp +++ b/gdb/testsuite/gdb.base/solib-display.exp @@ -86,7 +86,11 @@ foreach libsepdebug {NO IN SEP} { with_test_prefix "$libsepdebug" { continue } - gdb_test "" "3: c_global = 43\\r\\n2: b_global = 42\\r\\n1: a_global = 41" "after rerun" + gdb_test "" [multi_line \ + "1: a_global = 41" \ + "2: b_global = 42" \ + "3: c_global = 43" \ + ] "after rerun" # Now rebuild the library without b_global if { [gdb_compile_shlib ${srcfile_lib} ${binfile_lib} \ @@ -109,7 +113,12 @@ foreach libsepdebug {NO IN SEP} { with_test_prefix "$libsepdebug" { continue } - gdb_test "" "3: c_global = 43\\r\\nwarning: .*b_global.*\\r\\n1: a_global = 41" "after rerun (2)" + + gdb_test "" [multi_line \ + "1: a_global = 41" \ + "warning: .*b_global.*" \ + "3: c_global = 43" \ + ] "after rerun (2)" # Now verify that displays which are not in the shared library # are not cleared permaturely. @@ -130,5 +139,9 @@ foreach libsepdebug {NO IN SEP} { with_test_prefix "$libsepdebug" { gdb_test "" "6: a_static = 46\\r\\n4: main_global = 44\\r\\n.*" gdb_test "break [gdb_get_line_number "break here" ${testfile}.c]" \ ".*Breakpoint.* at .*" - gdb_test "continue" "6: a_static = 46\\r\\n5: a_local = 45\\r\\n4: main_global = 44\\r\\n.*" + gdb_test "continue" [multi_line \ + "4: main_global = 44" \ + "5: a_local = 45" \ + "6: a_static = 46" \ + ] }} -- 2.30.2