mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-04 17:40:17 +02:00
FpDebug: Return errors when the debugger can't start.
This commit is contained in:
parent
190b5e77a7
commit
5acbe20f96
@ -1679,6 +1679,7 @@ begin
|
||||
|
||||
if assigned(FMainProcess) then begin
|
||||
DebugLn(DBG_WARNINGS, 'The debuggee is already running');
|
||||
FLastError := CreateError(fpInternalErr, ['The debugger is already running']);
|
||||
Exit;
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user