mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-13 12:39:15 +02:00
fix compilation
git-svn-id: trunk@16349 -
This commit is contained in:
parent
2cf87a40de
commit
626b5f317d
@ -118,11 +118,6 @@ end;
|
||||
|
||||
uses BaseUnix, TermIO;
|
||||
|
||||
procedure Register;
|
||||
begin
|
||||
RegisterComponents('System',[TProcessUTF8,TAsyncProcess]);
|
||||
end;
|
||||
|
||||
function TAsyncProcess.GetNumBytesAvailable: dword;
|
||||
begin
|
||||
if not (poUsePipes in Options) then
|
||||
@ -260,4 +255,9 @@ begin
|
||||
inherited Execute;
|
||||
end;
|
||||
|
||||
procedure Register;
|
||||
begin
|
||||
RegisterComponents('System',[TProcessUTF8,TAsyncProcess]);
|
||||
end;
|
||||
|
||||
end.
|
||||
|
Loading…
Reference in New Issue
Block a user