File parser.pas, line 998 (function Typ)

Old code:

lsp := pointer(Malloc(sizeof(structure)));
with lsp^ do begin
  form := objects;
  objname := nil;
  objsize := 6;
  objlevel := 1;
  objparent := nil;
  size := ptrsize;
  end; {with}

New code:

lsp := pointer(Malloc(sizeof(structure)));
with lsp^ do begin
  form := objects;
  objname := nil;
  objsize := 6;
  objlevel := 1;
  objparent := nil;
  size := ptrsize;
  hasSFile := false;
  end; {with}