
  TYPE
    fmt$open_cleanup_work_list = set of (fmc$clear_open_lock,
          fmc$decrement_open_count, fmc$free_static_label);
