{ 'DIRVAR.PAS' contains declarations which must be held globally for the
  directory reading package }

    device: rtdevice;

    rtptr: integer;                 { next rt block to read }

    cursegment: dirsegtype;

    segptr: integer;                { points to current word }

    entrylen: integer;              { set to length of entries for this dir }

    segcounter: integer;            { number of segment in use }

    maxsegment: integer;            { max segment number on device }

    cumsize: uword16;               { cumulative size this segment }