
  TYPE
    mmt$modified_bit_option = (mmc$mp_set_modified, mmc$mp_clear_modified,
          mmc$mp_no_change_to_modified);

