From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <insight-return-3336-listarch-insight=sourceware.cygnus.com@sources.redhat.com>
Received: (qmail 16858 invoked by alias); 7 Mar 2002 21:55:04 -0000
Mailing-List: contact insight-help@sources.redhat.com; run by ezmlm
Precedence: bulk
List-Subscribe: <mailto:insight-subscribe@sources.redhat.com>
List-Archive: <http://sources.redhat.com/ml/insight/>
List-Post: <mailto:insight@sources.redhat.com>
List-Help: <mailto:insight-help@sources.redhat.com>, <http://sources.redhat.com/ml/#faqs>
Sender: insight-owner@sources.redhat.com
Received: (qmail 16775 invoked from network); 7 Mar 2002 21:55:01 -0000
Received: from unknown (HELO localhost.localdomain) (12.230.181.242)
  by sources.redhat.com with SMTP; 7 Mar 2002 21:55:01 -0000
Received: from there (DRAGON [127.0.0.1])
	by localhost.localdomain (8.11.6/8.11.6) with SMTP id g27LsSc06113
	for <insight@sources.redhat.com>; Thu, 7 Mar 2002 13:54:28 -0800
Message-Id: <200203072154.g27LsSc06113@localhost.localdomain>
Content-Type: text/plain;
  charset="iso-8859-1"
From: "Martin M. Hunt" <hunt@redhat.com>
Organization: Red Hat Inc
To: Insight Mailing List <insight@sources.redhat.com>
Subject: [patch] tweek display of multiple BPs on same line
Date: Thu, 07 Mar 2002 13:55:00 -0000
X-Mailer: KMail [version 1.3.2]
MIME-Version: 1.0
Content-Transfer-Encoding: 8bit
X-SW-Source: 2002-q1/txt/msg00198.txt.bz2

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