2002-09-19 Martin M. Hunt <hunt@redhat.com>

	* library/srctextwin.itb (FillAssembly): Fix debug
        statement for 64-bit addresses.
        (showBPBalloon): Fix for 64-bit addresses.

diff --git a/gdb/gdbtk/ChangeLog b/gdb/gdbtk/ChangeLog
index 31c30b2..cf676fe 100644 (file)
--- a/gdb/gdbtk/ChangeLog
+++ b/gdb/gdbtk/ChangeLog
@@ -1,5 +1,9 @@
 2002-09-19  Martin M. Hunt  <hunt@redhat.com>
 
+       * library/srctextwin.itb (FillAssembly): Fix debug
+        statement for 64-bit addresses.
+        (showBPBalloon): Fix for 64-bit addresses.
+
        * library/memwin.itb (incr_addr): Fix 64-bit addresses.
 
 2002-09-18  Keith Seitz  <keiths@redhat.com>

diff --git a/gdb/gdbtk/library/srctextwin.itb b/gdb/gdbtk/library/srctextwin.itb
index e384a46..d434aa8 100644 (file)
--- a/gdb/gdbtk/library/srctextwin.itb
+++ b/gdb/gdbtk/library/srctextwin.itb
@@ -1026,7 +1026,7 @@ body SrcTextWin::FillAssembly {w tagname filename funcname line addr pc_addr lib
     set oldpane $pane
     set result [LoadFromCache $w $addr A $lib]
     if {$result == 1} {
-      #debug [format "Disassembling at %x" $addr]
+      #debug "Disassembling at $addr"
       #debug "cf=$current(filename) name=$filename"
       if {[catch {gdb_load_disassembly $win nosource \
                             [scope _map] $Cname $addr} mess]} {
@@ -2324,7 +2324,7 @@ body SrcTextWin::showBPBalloon {win x y} {
 
     if {$need_lf} {append str \n}
 
-    append str [format "breakpoint %d at %s:%d (%#x)\n   %s %s %s" \
+    append str [format "breakpoint %d at %s:%d (%s)\n   %s %s %s" \
                  $b $file $linenum $addr $enabled $type $disposition]
 
     if {$thread != "-1"} {