diff options
| author | Stu Grossman <grossman@cygnus> | 1994-12-19 17:58:11 +0000 |
|---|---|---|
| committer | Stu Grossman <grossman@cygnus> | 1994-12-19 17:58:11 +0000 |
| commit | 0af608b8a11f9d8bf758d6cfd7d30538b6b70d1d (patch) | |
| tree | 121e47964be2a390491860862a431b215f77d0a0 /gdb/gdbtk.tcl | |
| parent | 28a2119fba3924f698156c0b243387be464243d8 (diff) | |
| download | gdb-0af608b8a11f9d8bf758d6cfd7d30538b6b70d1d.zip gdb-0af608b8a11f9d8bf758d6cfd7d30538b6b70d1d.tar.gz gdb-0af608b8a11f9d8bf758d6cfd7d30538b6b70d1d.tar.bz2 | |
* gdbtk.tcl (update_assembly): Force update to make sure that pc
is visible when creating new assembly windows.
Diffstat (limited to 'gdb/gdbtk.tcl')
| -rw-r--r-- | gdb/gdbtk.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gdb/gdbtk.tcl b/gdb/gdbtk.tcl index 82610d7..8e88005 100644 --- 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] } |