`Grid.forEachInAABB()`: no more callbacks

[d2df-sdl.git] / src / shared / xstreams.pas

diff --git a/src/shared/xstreams.pas b/src/shared/xstreams.pas
index 346ee9edaa9a81e6b086a74923351ea2365b6bdd..e27f73ad0eb9c94c8f964649e0d969a22b0e78e6 100644 (file)
--- a/src/shared/xstreams.pas
+++ b/src/shared/xstreams.pas
@@ -1,4 +1,4 @@
-(* Copyright (C)  DooM 2D:Forever Developers
+(* Copyright (C)  Doom 2D: Forever Developers
  *
  * This program is free software: you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -127,7 +127,7 @@ type
   end;
 
   // fixed memory chunk
-  TSFSMemoryChunkStream = class(TCustomMemoryStream)
+  TSFSMemoryChunkStream = class(TStream)
   private
     fFreeMem: Boolean;
     fMemBuf: PByte;
@@ -558,7 +558,6 @@ begin
   left := fMemSize-fCurPos;
   if (left < 0) then raise XStreamError.Create('internal error in TSFSMemoryChunkStream (write)');
   if (count > left) then count := left;
-  //writeln('mcs: writing ', count, ' bytes at ofs ', fCurPos, ' (total size is ', fMemSize, ')');
   if (count > 0) then Move(buffer, (fMemBuf+fCurPos)^, count);
   Inc(fCurPos, count);
   result := count;