mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-13 10:59:18 +02:00
* remove redundant variable reported by Lagprogramming on forum.
(cherry picked from commit 2628a6ee17
)
This commit is contained in:
parent
26467dd400
commit
49c96f4629
@ -454,10 +454,6 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
Function TProcess.WaitOnExit : Boolean;
|
Function TProcess.WaitOnExit : Boolean;
|
||||||
|
|
||||||
Var
|
|
||||||
R : Dword;
|
|
||||||
|
|
||||||
begin
|
begin
|
||||||
if FRunning then
|
if FRunning then
|
||||||
fexitcode:=waitprocess(handle);
|
fexitcode:=waitprocess(handle);
|
||||||
|
Loading…
Reference in New Issue
Block a user