
{ DECK: IOT$PAGEABLE_TAPE_REQUESTS


  TYPE
    iot$pageable_tape_requests = ARRAY [1 .. ioc$max_multiple_tape_requests + 1] OF
          iot$pageable_tape_request_entry;

  TYPE
    iot$pageable_tape_request_entry = RECORD
      slot_in_use: boolean,
      tape_request_p: ^iot$tape_request,
      pp_response_p: ^iot$tape_collected_pp_response,
    RECEND;

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

