TFIELDTYPE

type TFIELDTYPE = record

  status: Word;

  ref: clong;

  left: PFIELDTYPE;

  right: PFIELDTYPE;

  makearg: TMakearg;

  copyarg: TCopy_arg;

  freearg: TFree_arg;

  fcheck: TFieldCheck;

  ccheck: TCharCheck;

  next: TFieldCheck;

  prev: TFieldCheck;

end;