This is the mail archive of the
insight@sources.redhat.com
mailing list for the Insight project.
[patch] tweek display of multiple BPs on same line
- From: "Martin M. Hunt" <hunt at redhat dot com>
- To: Insight Mailing List <insight at sources dot redhat dot com>
- Date: Thu, 7 Mar 2002 13:54:28 -0800
- Subject: [patch] tweek display of multiple BPs on same line
- Organization: Red Hat Inc
checked in.
--
Martin Hunt
GDB Engineer
Red Hat, Inc.
2002-03-07 Martin M. Hunt <hunt@redhat.com>
* library/srctextwin.itb (SrcTextWin::showBPBalloon): Put
linefeeds between multiple breakpoints.
Index: library/srctextwin.itb
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/srctextwin.itb,v
retrieving revision 1.33
diff -u -p -r1.33 srctextwin.itb
--- srctextwin.itb 2002/03/07 20:22:42 1.33
+++ srctextwin.itb 2002/03/07 21:53:11
@@ -2310,6 +2310,7 @@ body SrcTextWin::showBPBalloon {win x y}
}
set str ""
+ set need_lf 0
foreach b $bps {
set bpinfo [gdb_get_breakpoint_info $b]
lassign $bpinfo file func linenum addr type enabled disposition \
@@ -2321,6 +2322,8 @@ body SrcTextWin::showBPBalloon {win x y}
set enabled "DIS"
}
+ if {$need_lf} {append str \n}
+
append str [format "breakpoint %d at %s:%d (%#x)\n %s %s %s" \
$b $file $linenum $addr $enabled $type $disposition]
@@ -2343,6 +2346,7 @@ body SrcTextWin::showBPBalloon {win x y}
append str "\n commands: $commands"
}
}
+ set need_lf 1
}
# Scope out which break type is set here, and use the tag to get