Browse Source

* Removed TAsyncWriteStream.BufferEmpty (not needed anymore)

sg 22 years ago
parent
commit
8210c64447
1 changed files with 4 additions and 7 deletions
  1. 4 7
      fcl/inc/fpasync.pp

+ 4 - 7
fcl/inc/fpasync.pp

@@ -183,7 +183,6 @@ type
     function  DoRealWrite(const ABuffer; Count: Integer): Integer; override;
     function  DoRealWrite(const ABuffer; Count: Integer): Integer; override;
     procedure WritingFailed; override;
     procedure WritingFailed; override;
     procedure WantWrite; override;
     procedure WantWrite; override;
-    procedure BufferEmpty; override;
     procedure CanWrite(UserData: TObject);
     procedure CanWrite(UserData: TObject);
   public
   public
     constructor Create(AEventLoop: TEventLoop; AStream: THandleStream);
     constructor Create(AEventLoop: TEventLoop; AStream: THandleStream);
@@ -768,11 +767,6 @@ begin
       @CanWrite, nil);
       @CanWrite, nil);
 end;
 end;
 
 
-procedure TAsyncWriteStream.BufferEmpty;
-begin
-  inherited BufferEmpty;
-end;
-
 procedure TAsyncWriteStream.CanWrite(UserData: TObject);
 procedure TAsyncWriteStream.CanWrite(UserData: TObject);
 begin
 begin
   if FBytesInBuffer = 0 then
   if FBytesInBuffer = 0 then
@@ -831,7 +825,10 @@ end.
 
 
 {
 {
   $Log$
   $Log$
-  Revision 1.4  2003-08-03 21:18:40  sg
+  Revision 1.5  2003-11-22 11:46:40  sg
+  * Removed TAsyncWriteStream.BufferEmpty (not needed anymore)
+
+  Revision 1.4  2003/08/03 21:18:40  sg
   * Added TWriteBuffer.OnBufferSent and made this and OnBufferEmpty
   * Added TWriteBuffer.OnBufferSent and made this and OnBufferEmpty
     working correctly
     working correctly