* move dummy implementions to dummy dir and add

it as fallback in the includepath

git-svn-id: trunk@12167 -
This commit is contained in:
peter 2008-11-18 23:16:44 +00:00
parent 82e5bdc6ab
commit 7842b27fc5
19 changed files with 68 additions and 482 deletions

17
.gitattributes vendored
View File

@ -1489,22 +1489,12 @@ packages/fcl-passrc/src/readme.txt svneol=native#text/plain
packages/fcl-process/Makefile svneol=native#text/plain
packages/fcl-process/Makefile.fpc svneol=native#text/plain
packages/fcl-process/fpmake.pp svneol=native#text/plain
packages/fcl-process/src/amiga/pipes.inc svneol=native#text/plain
packages/fcl-process/src/amiga/process.inc svneol=native#text/plain
packages/fcl-process/src/beos/pipes.inc svneol=native#text/plain
packages/fcl-process/src/dbugintf.pp svneol=native#text/plain
packages/fcl-process/src/dbugmsg.pp svneol=native#text/plain
packages/fcl-process/src/go32v2/pipes.inc svneol=native#text/plain
packages/fcl-process/src/go32v2/process.inc svneol=native#text/plain
packages/fcl-process/src/haiku/pipes.inc svneol=native#text/plain
packages/fcl-process/src/morphos/pipes.inc svneol=native#text/plain
packages/fcl-process/src/morphos/process.inc svneol=native#text/plain
packages/fcl-process/src/netware/pipes.inc svneol=native#text/plain
packages/fcl-process/src/netware/process.inc svneol=native#text/plain
packages/fcl-process/src/netwlibc/pipes.inc svneol=native#text/plain
packages/fcl-process/src/netwlibc/process.inc svneol=native#text/plain
packages/fcl-process/src/dummy/pipes.inc svneol=native#text/plain
packages/fcl-process/src/dummy/process.inc svneol=native#text/plain
packages/fcl-process/src/dummy/simpleipc.inc svneol=native#text/plain
packages/fcl-process/src/os2/pipes.inc svneol=native#text/plain
packages/fcl-process/src/os2/process.inc svneol=native#text/plain
packages/fcl-process/src/os2/simpleipc.inc svneol=native#text/plain
packages/fcl-process/src/pipes.pp svneol=native#text/plain
packages/fcl-process/src/process.pp svneol=native#text/plain
@ -1516,7 +1506,6 @@ packages/fcl-process/src/unix/simpleipc.inc svneol=native#text/plain
packages/fcl-process/src/win/pipes.inc svneol=native#text/plain
packages/fcl-process/src/win/process.inc svneol=native#text/plain
packages/fcl-process/src/win/simpleipc.inc svneol=native#text/plain
packages/fcl-process/src/wince/pipes.inc svneol=native#text/plain
packages/fcl-process/src/wince/process.inc svneol=native#text/plain
packages/fcl-process/src/wince/simpleipc.inc svneol=native#text/plain
packages/fcl-registry/Makefile svneol=native#text/plain

View File

@ -1,5 +1,5 @@
#
# Don't edit, this file is generated by FPCMake Version 2.0.0 [2008/10/22]
# Don't edit, this file is generated by FPCMake Version 2.0.0 [2008/11/18]
#
default: all
MAKEFILETARGETS=i386-linux i386-go32v2 i386-win32 i386-os2 i386-freebsd i386-beos i386-haiku i386-netbsd i386-solaris i386-qnx i386-netware i386-openbsd i386-wdosx i386-darwin i386-emx i386-watcom i386-netwlibc i386-wince i386-embedded i386-symbian m68k-linux m68k-freebsd m68k-netbsd m68k-amiga m68k-atari m68k-openbsd m68k-palmos m68k-embedded powerpc-linux powerpc-netbsd powerpc-amiga powerpc-macos powerpc-darwin powerpc-morphos powerpc-embedded sparc-linux sparc-netbsd sparc-solaris sparc-embedded x86_64-linux x86_64-freebsd x86_64-darwin x86_64-win64 x86_64-embedded arm-linux arm-palmos arm-darwin arm-wince arm-gba arm-nds arm-embedded arm-symbian powerpc64-linux powerpc64-darwin powerpc64-embedded avr-embedded armeb-linux armeb-embedded
@ -788,49 +788,49 @@ ifeq ($(FULL_TARGET),armeb-embedded)
override COMPILER_OPTIONS+=-S2h
endif
ifeq ($(FULL_TARGET),i386-linux)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-go32v2)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win src/dummy
endif
ifeq ($(FULL_TARGET),i386-win32)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win src/dummy
endif
ifeq ($(FULL_TARGET),i386-os2)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/os2 src/dummy
endif
ifeq ($(FULL_TARGET),i386-freebsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-beos)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-haiku)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-netbsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-solaris)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-qnx)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-netware)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),i386-openbsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-wdosx)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),i386-darwin)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),i386-emx)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/os2
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/os2 src/dummy
endif
ifeq ($(FULL_TARGET),i386-watcom)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
@ -839,7 +839,7 @@ ifeq ($(FULL_TARGET),i386-netwlibc)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),i386-wince)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win src/dummy
endif
ifeq ($(FULL_TARGET),i386-embedded)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
@ -848,13 +848,13 @@ ifeq ($(FULL_TARGET),i386-symbian)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),m68k-linux)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),m68k-freebsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),m68k-netbsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),m68k-amiga)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
@ -863,7 +863,7 @@ ifeq ($(FULL_TARGET),m68k-atari)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),m68k-openbsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),m68k-palmos)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
@ -872,10 +872,10 @@ ifeq ($(FULL_TARGET),m68k-embedded)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),powerpc-linux)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),powerpc-netbsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),powerpc-amiga)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
@ -884,7 +884,7 @@ ifeq ($(FULL_TARGET),powerpc-macos)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),powerpc-darwin)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),powerpc-morphos)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
@ -893,43 +893,43 @@ ifeq ($(FULL_TARGET),powerpc-embedded)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),sparc-linux)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),sparc-netbsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),sparc-solaris)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),sparc-embedded)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),x86_64-linux)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),x86_64-freebsd)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),x86_64-darwin)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),x86_64-win64)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win src/dummy
endif
ifeq ($(FULL_TARGET),x86_64-embedded)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),arm-linux)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),arm-palmos)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),arm-darwin)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),arm-wince)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/win src/dummy
endif
ifeq ($(FULL_TARGET),arm-gba)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
@ -944,10 +944,10 @@ ifeq ($(FULL_TARGET),arm-symbian)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),powerpc64-linux)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),powerpc64-darwin)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),powerpc64-embedded)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
@ -956,7 +956,7 @@ ifeq ($(FULL_TARGET),avr-embedded)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src
endif
ifeq ($(FULL_TARGET),armeb-linux)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src src/unix src/dummy
endif
ifeq ($(FULL_TARGET),armeb-embedded)
override COMPILER_INCLUDEDIR+=src/$(OS_TARGET) src

View File

@ -27,19 +27,21 @@ rsts=process simpleipc
[compiler]
options=-S2h
includedir=src/$(OS_TARGET) src
includedir_linux=src/unix
includedir_freebsd=src/unix
includedir_darwin=src/unix
includedir_netbsd=src/unix
includedir_openbsd=src/unix
includedir_solaris=src/unix
includedir_qnx=src/unix
includedir_beos=src/unix
includedir_haiku=src/unix
includedir_emx=src/os2
includedir_win32=src/win
includedir_win64=src/win
includedir_wince=src/win
includedir_linux=src/unix src/dummy
includedir_freebsd=src/unix src/dummy
includedir_darwin=src/unix src/dummy
includedir_netbsd=src/unix src/dummy
includedir_openbsd=src/unix src/dummy
includedir_solaris=src/unix src/dummy
includedir_qnx=src/unix src/dummy
includedir_beos=src/unix src/dummy
includedir_haiku=src/unix src/dummy
includedir_emx=src/os2 src/dummy
includedir_win32=src/win src/dummy
includedir_win64=src/win src/dummy
includedir_wince=src/win src/dummy
includedir_go32v2=src/win src/dummy
includedir_os2=src/os2 src/dummy
sourcedir=src/$(OS_TARGET) src
[install]

View File

@ -28,6 +28,8 @@ begin
P.IncludePath.Add('src/unix',AllUnixOSes);
P.IncludePath.Add('src/win',AllWindowsOSes);
P.IncludePath.Add('src/$(OS)',AllOSes-AllWindowsOSes-AllUnixOSes);
P.IncludePath.Add('src/dummy');
T:=P.Targets.AddUnit('pipes.pp');
T.Dependencies.AddInclude('pipes.inc');
T:=P.Targets.AddUnit('process.pp');

View File

@ -1,30 +0,0 @@
{
This file is part of the Free Pascal run time library.
Copyright (c) 1999-2000 by Michael Van Canneyt
AmigaOS specific part of pipe stream.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
// Unsupported for the moment...
Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
begin
Result := False;
end;
Function TInputPipeStream.GetNumBytesAvailable: DWord;
begin
Result := 0;
end;

View File

@ -1,42 +0,0 @@
{
Dummy process.inc
}
procedure TProcess.CloseProcessHandles;
begin
end;
Function TProcess.PeekExitStatus : Boolean;
begin
end;
Procedure TProcess.Execute;
begin
end;
Function TProcess.WaitOnExit : Boolean;
begin
Result:=False;
end;
Function TProcess.Suspend : Longint;
begin
Result:=0;
end;
Function TProcess.Resume : LongInt;
begin
Result:=0;
end;
Function TProcess.Terminate(AExitCode : Integer) : Boolean;
begin
Result:=False;
end;
Procedure TProcess.SetShowWindow (Value : TShowWindowOptions);
begin
end;

View File

@ -1,30 +0,0 @@
{
This file is part of the Free Pascal run time library.
Copyright (c) 1999-2000 by Michael Van Canneyt
DOS/go32v2 specific part of pipe stream.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
// No pipes under beos, sorry...
Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
begin
Result := False;
end;
Function TInputPipeStream.GetNumBytesAvailable: DWord;
begin
Result := 0;
end;

View File

@ -0,0 +1,13 @@
{
dummy simpleipc.inc
}
Function TSimpleIPCServer.CommClass : TIPCServerCommClass;
begin
Result:=nil;
end;
function TSimpleIPCClient.CommClass: TIPCClientCommClass;
begin
Result:=nil;
end;

View File

@ -1,30 +0,0 @@
{
This file is part of the Free Pascal run time library.
Copyright (c) 1999-2000 by Michael Van Canneyt
DOS/go32v2 specific part of pipe stream.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
// No pipes under beos, sorry...
Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
begin
Result := False;
end;
Function TInputPipeStream.GetNumBytesAvailable: DWord;
begin
Result := 0;
end;

View File

@ -1,30 +0,0 @@
{
This file is part of the Free Pascal run time library.
Copyright (c) 1999-2000 by Michael Van Canneyt
AmigaOS specific part of pipe stream.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
// Unsupported for the moment...
Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
begin
Result := False;
end;
Function TInputPipeStream.GetNumBytesAvailable: DWord;
begin
Result := 0;
end;

View File

@ -1,42 +0,0 @@
{
Dummy process.inc
}
procedure TProcess.CloseProcessHandles;
begin
end;
Function TProcess.PeekExitStatus : Boolean;
begin
end;
Procedure TProcess.Execute;
begin
end;
Function TProcess.WaitOnExit : Boolean;
begin
Result:=False;
end;
Function TProcess.Suspend : Longint;
begin
Result:=0;
end;
Function TProcess.Resume : LongInt;
begin
Result:=0;
end;
Function TProcess.Terminate(AExitCode : Integer) : Boolean;
begin
Result:=False;
end;
Procedure TProcess.SetShowWindow (Value : TShowWindowOptions);
begin
end;

View File

@ -1,30 +0,0 @@
{
This file is part of the Free Pascal run time library.
Copyright (c) 1999-2000 by Michael Van Canneyt
Netware specific part of pipe stream.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
// Unsupported for the moment...
Function CreatePipeHandles (Var Inhandle,OutHandle : THandle) : Boolean;
begin
Result := false; {dont know how to do that with netware clib}
end;
Function TInputPipeStream.GetNumBytesAvailable: DWord;
begin
Result := 0;
end;

View File

@ -1,42 +0,0 @@
{
Dummy process.inc
}
procedure TProcess.CloseProcessHandles;
begin
end;
Function TProcess.PeekExitStatus : Boolean;
begin
end;
Procedure TProcess.Execute;
begin
end;
Function TProcess.WaitOnExit : Boolean;
begin
Result:=False;
end;
Function TProcess.Suspend : Longint;
begin
Result:=0;
end;
Function TProcess.Resume : LongInt;
begin
Result:=0;
end;
Function TProcess.Terminate(AExitCode : Integer) : Boolean;
begin
Result:=False;
end;
Procedure TProcess.SetShowWindow (Value : TShowWindowOptions);
begin
end;

View File

@ -1,30 +0,0 @@
{
This file is part of the Free Pascal run time library.
Copyright (c) 1999-2004 by Michael Van Canneyt
Netware specific part of pipe stream.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
// Unsupported for the moment...
Function CreatePipeHandles (Var Inhandle,OutHandle : THandle) : Boolean;
begin
Result := false; {todo}
end;
Function TInputPipeStream.GetNumBytesAvailable: DWord;
begin
Result := 0;
end;

View File

@ -1,42 +0,0 @@
{
Dummy process.inc
}
procedure TProcess.CloseProcessHandles;
begin
end;
Function TProcess.PeekExitStatus : Boolean;
begin
end;
Procedure TProcess.Execute;
begin
end;
Function TProcess.WaitOnExit : Boolean;
begin
Result:=False;
end;
Function TProcess.Suspend : Longint;
begin
Result:=0;
end;
Function TProcess.Resume : LongInt;
begin
Result:=0;
end;
Function TProcess.Terminate(AExitCode : Integer) : Boolean;
begin
Result:=False;
end;
Procedure TProcess.SetShowWindow (Value : TShowWindowOptions);
begin
end;

View File

@ -1,42 +0,0 @@
{
Dummy process.inc
}
procedure TProcess.CloseProcessHandles;
begin
end;
Function TProcess.PeekExitStatus : Boolean;
begin
end;
Procedure TProcess.Execute;
begin
end;
Function TProcess.WaitOnExit : Boolean;
begin
Result:=False;
end;
Function TProcess.Suspend : Longint;
begin
Result:=0;
end;
Function TProcess.Resume : LongInt;
begin
Result:=0;
end;
Function TProcess.Terminate(AExitCode : Integer) : Boolean;
begin
Result:=False;
end;
Procedure TProcess.SetShowWindow (Value : TShowWindowOptions);
begin
end;

View File

@ -1,30 +0,0 @@
{
This file is part of the Free Pascal run time library.
Copyright (c) 1998 by Michael Van Canneyt
Win32 part of pipe stream.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
// Unsupported for the moment...
Function CreatePipeHandles (Var Inhandle,OutHandle : THandle) : Boolean;
begin
Result := False;
end;
Function TInputPipeStream.GetNumBytesAvailable: DWord;
begin
// Windows CE doesn´t have the API function PeekNamedPipe
Result := 0;
end;