* gdbtk.tcl (update_assembly): Force update to make sure that pc

	is visible when creating new assembly windows.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 1b26e2619dd5da94deac8aab58e5fcd3b169bb3f..05846b2e7fa6a36ce84c6bdb0e10c74b3ca76bc3 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+Mon Dec 19 09:55:47 1994  Stu Grossman  (grossman@cygnus.com)
+
+       * gdbtk.tcl (update_assembly):  Force update to make sure that pc
+       is visible when creating new assembly windows.
+
 Sun Dec 18 23:31:20 1994  Stu Grossman  (grossman@cygnus.com)
 
        * gdbtk.c (gdbtk_wait gdbtk_init):  Use different method of

diff --git a/gdb/gdbtk.tcl b/gdb/gdbtk.tcl
index 82610d7153c82ff4c214c90c02bfa26f66f6cc17..8e880059e7fd6dfb910bfa96cd606099f16f504b 100644 (file)
--- a/gdb/gdbtk.tcl
+++ b/gdb/gdbtk.tcl
@@ -1452,6 +1452,7 @@ proc update_assembly {linespec} {
                        -after .asm.scroll
                .asm.scroll configure -command "$win yview"
                set line [pc_to_line $pclist($cfunc) $pc]
+               update
                $win yview [expr $line - $asm_screen_height / 2]
                }