Fri Jul 24 01:08:37 1998 Martin M. Hunt <hunt@cygnus.com>

* gdbtk-cmds.c (gdb_loadfile): When there are no
	linenumbers, use only one tab.
This commit is contained in:
Martin Hunt 1998-07-24 08:09:03 +00:00
parent ddbe80f79c
commit 6e77819495
2 changed files with 7 additions and 2 deletions

View File

@ -1,3 +1,8 @@
Fri Jul 24 01:08:37 1998 Martin M. Hunt <hunt@cygnus.com>
* gdbtk-cmds.c (gdb_loadfile): When there are no
linenumbers, use only one tab.
Sat Jul 18 12:28:39 1998 Martin M. Hunt <hunt@cygnus.com>
* gdbtk.c (gdbtk_cleanup): Add call to tcl function

View File

@ -2686,9 +2686,9 @@ gdb_loadfile (clientData, interp, objc, objv)
}
else
{
Tcl_DStringAppend (&text_cmd_1, " insert end {-\t} break_tag", -1);
Tcl_DStringAppend (&text_cmd_1, " insert end {- } break_tag", -1);
prefix_len_1 = Tcl_DStringLength(&text_cmd_1);
Tcl_DStringAppend (&text_cmd_2, " insert end { \t} \"\"", -1);
Tcl_DStringAppend (&text_cmd_2, " insert end { } \"\"", -1);
prefix_len_2 = Tcl_DStringLength(&text_cmd_2);