index 6a5dbeedd227e3c8da2cc61bd07e6828342b6028..4d636eeadb9489df3ea81eebed7d85289c7c8495 100644 (file)
begin
len := stream.Size;
GetMem(data, len);
+ ASSERT(data <> nil);
//stream.ReadBuffer(data, len); (* leads to segfault *)
for i := 0 to len - 1 do
data[i] := stream.ReadByte();
begin
len := stream1.Size;
GetMem(data, len);
+ ASSERT(data <> nil);
//stream1.ReadBuffer(data, len); (* leads to segfault *)
for i := 0 to len - 1 do
data[i] := stream1.ReadByte();