paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-01 13:30:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

* uses ShortName of exe to start GDB

Browse Source
This commit is contained in:
pierre 2000-01-20 00:31:53 +00:00
parent ccf88239a6
commit 6a89db2fdc
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/text/fpdebug.pas
View File

@ -420,7 +420,7 @@ constructor TDebugController.Init(const exefn:string);
var f: string; var f: string;
begin begin
inherited Init; inherited Init;
f := exefn; f := GetShortName(exefn);
NoSwitch:=False; NoSwitch:=False;
LoadFile(f); LoadFile(f);
SetArgs(GetRunParameters); SetArgs(GetRunParameters);
@ -2723,7 +2723,10 @@ end.
{ {
$Log$ $Log$
Revision 1.42 2000-01-10 17:49:40 pierre Revision 1.43 2000-01-20 00:31:53 pierre
* uses ShortName of exe to start GDB
Revision 1.42 2000/01/10 17:49:40 pierre
* Get RegisterView to Update correctly * Get RegisterView to Update correctly
* Write in white changed regs (keeping a copy of previous values) * Write in white changed regs (keeping a copy of previous values)