2
0
Эх сурвалжийг харах

* cleaned out some ver2_2_0 defines.

git-svn-id: trunk@26230 -
marco 11 жил өмнө
parent
commit
10ff8bf74e

+ 0 - 8
packages/fcl-process/src/pipes.pp

@@ -86,11 +86,7 @@ end;
 Function TInputPipeStream.Write (Const Buffer; Count : Longint) : longint;
 
 begin
-{$ifdef ver2_2_0}
-  raise EStreamError.Create( 'Cannot write to InputPipeStream');
-{$else}
   WriteNotImplemented;
-{$endif}
   Result := 0;
 end;
 
@@ -117,11 +113,7 @@ end;
 Function TOutputPipeStream.Read(Var Buffer; Count : Longint) : longint;
 
 begin
-{$ifdef ver2_2_0}
-  raise EStreamError.Create( 'Cannot read from OutputPipeStream');
-{$else}
   ReadNotImplemented;
-{$endif}
   Result := 0;
 end;