diff --git a/rtl/objpas/classes/streams.inc b/rtl/objpas/classes/streams.inc index fcdf62e44a..702cee6307 100644 --- a/rtl/objpas/classes/streams.inc +++ b/rtl/objpas/classes/streams.inc @@ -513,11 +513,13 @@ begin FSize:=ASize; end; +{$ifdef seek64bit} function TCustomMemoryStream.GetSize: Int64; begin Result:=FSize; end; +{$endif seek64bit} @@ -809,7 +811,10 @@ end; { $Log$ - Revision 1.6 2005-01-19 19:57:57 michael + Revision 1.7 2005-01-20 16:37:57 peter + * 1.0.x fix + + Revision 1.6 2005/01/19 19:57:57 michael + CustomMemoryStream.getsize overridden Revision 1.5 2005/01/19 09:09:50 michael