  TYPE
    cmt$ms_class_info = record
      classes: array [cmt$ms_class_members] of boolean,
      allocation_allowed: boolean,
      volume_available: boolean,
    recend;

*copyc cmt$ms_class_members
