@@ -449,8 +449,7 @@ begin
BlockWrite(f,maxalloc,2);
close(f);
{$pop}
- if ioresult<>0 then
- Result:=true;
+ Result:=ioresult=0;
end;
{****************************************************************************