paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 13:29:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

* dummy executeprocess routines fix, by Michael Ring, fpc-devel list.

Browse Source 
git-svn-id: trunk@33355 -
This commit is contained in:
marco 2016-03-27 19:27:48 +00:00
parent 9501faa00b
commit e7eb7d7415
1 changed files with 13 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
rtl/embedded/sysutils.pp
View File

@ -255,14 +255,24 @@ begin
end; end;
function ExecuteProcess (const Path: AnsiString; const ComLine: AnsiString;Flags:TExecuteFlags=[]): integer; function ExecuteProcess (const Path: RawByteString; const ComLine: RawByteString;Flags:TExecuteFlags=[]): integer;
begin begin
result := -1; result := -1;
end; end;
function ExecuteProcess (const Path: RawByteString;
const ComLine: array of RawByteString;Flags:TExecuteFlags=[]): integer;
begin
result := -1;
end;
function ExecuteProcess (const Path: AnsiString; function ExecuteProcess (const Path: UnicodeString; const ComLine: UnicodeString;Flags:TExecuteFlags=[]): integer;
const ComLine: array of AnsiString;Flags:TExecuteFlags=[]): integer; begin
result := -1;
end;
function ExecuteProcess (const Path: UnicodeString;
const ComLine: array of UnicodeString;Flags:TExecuteFlags=[]): integer;
begin begin
result := -1; result := -1;
end; end;