paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-19 22:09:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed unlocking executable after debugging

Browse Source 
git-svn-id: trunk@6636 -
This commit is contained in:
vincents 2005-01-18 21:22:44 +00:00
parent 166bd87dab
commit 58131f7541
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
debugger/gdbmidebugger.pp
View File

@ -394,6 +394,9 @@ function ConvertToGDBPath(APath: string): string;
// GDB wants forward slashes in its filenames, even on win32.
begin
Result := APath;
// no need to process empty filename
if Result='' then exit;
if DirectorySeparator <> '/' then
Result := StringReplace(Result, DirectorySeparator, '/', [rfReplaceAll]);
Result := '"' + Result + '"';
@ -2646,6 +2649,9 @@ initialization
end.
{ =============================================================================
$Log$
Revision 1.59 2005/01/18 21:22:44 vincents
fixed unlocking executable after debugging
Revision 1.58 2005/01/16 19:02:02 micha
fix bug 506: pass quoted files and paths to gdb that possibly contain spaces