DBG: minor refactor in startup

git-svn-id: trunk@34787 -
This commit is contained in:
martin 2012-01-18 21:53:04 +00:00
parent 3d9b8ae714
commit 4f622019e2

View File

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