mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-10 07:17:23 +02:00
DBG: added framework for handling timeout (not active by default)
git-svn-id: trunk@28495 -
This commit is contained in:
parent
03709534ab
commit
07c762d4a0
@ -8169,7 +8169,7 @@ function TGDBMIDebuggerCommand.GetText(const AExpression: String;
|
|||||||
var
|
var
|
||||||
R: TGDBMIExecResult;
|
R: TGDBMIExecResult;
|
||||||
begin
|
begin
|
||||||
if not ExecuteCommand('x/s ' + AExpression, AValues, R {$IFDEF DBG_WIT_TIMEOUT}, 2500{$ENDIF})
|
if not ExecuteCommand('x/s ' + AExpression, AValues, R {$IFDEF DBG_WITH_TIMEOUT}, 2500{$ENDIF})
|
||||||
then begin
|
then begin
|
||||||
Result := '';
|
Result := '';
|
||||||
Exit;
|
Exit;
|
||||||
|
Loading…
Reference in New Issue
Block a user