paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 07:36:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

DBG: minor refactor in startup

Browse Source 
git-svn-id: trunk@34787 -
This commit is contained in:
martin 2012-01-18 21:53:04 +00:00
parent 3d9b8ae714
commit 4f622019e2
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
debugger/gdbmidebugger.pp
View File

@ -3832,6 +3832,7 @@ function TGDBMIDebuggerCommandStartDebugging.DoExecute: Boolean;
{$IF defined(UNIX) or defined(DBG_ENABLE_TERMINAL)} {$IF defined(UNIX) or defined(DBG_ENABLE_TERMINAL)}
procedure InitConsole; procedure InitConsole;
var var
R: TGDBMIExecResult;
s: String; s: String;
h: THandle; h: THandle;
isConsole: Boolean; isConsole: Boolean;