
  TYPE
    mmt$old_modified_bits = packed  array [0 .. *] of boolean;

