
  PROCEDURE [XREF] bap$free_tape_label_sequences
    (    free_initial_volume_sequence: boolean;
     VAR p_tape_descriptor: ^bat$tape_descriptor);

?? PUSH (LISTEXT := ON) ??
*copyc bat$tape_descriptor
?? POP ??
