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

is visible when creating new assembly windows.
1994-12-19 17:58:11 +00:00
parent 28a2119fba
commit 0af608b8a1
2 changed files with 6 additions and 0 deletions
--- 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]
 		}