fix windows building broken

This commit is contained in:
Basile Burg 2018-03-05 06:23:32 +01:00
parent c3a7574a8d
commit cbc5987b9a
1 changed files with 3 additions and 3 deletions

View File

@ -95,9 +95,9 @@ begin
end; end;
function prettyReturnStatus(proc: TProcess): string; function prettyReturnStatus(proc: TProcess): string;
{$IFDEF UNIX}
var var
s: integer; s: integer;
{$IFDEF UNIX}
u: integer; u: integer;
{$ENDIF} {$ENDIF}
begin begin
@ -153,7 +153,7 @@ begin
end; end;
{$ENDIF} {$ENDIF}
if result = '' then if result = '' then
result := intToStr(s) + ' (indeterminate meaning)'; result := intToStr(s) + ' (undeterminated meaning)';
end; end;
constructor TCEProcess.create(aOwner: TComponent); constructor TCEProcess.create(aOwner: TComponent);