
  PROCEDURE [XREF] iop$free_wired_tape_tables (
        index: iot$no_of_tape_units);

?? PUSH (LISTEXT := ON) ??
*copyc iot$no_of_tape_units
?? POP ??
