1 " ***********************************************************
2 " * *
3 " * Copyright, C Honeywell Information Systems Inc., 1983 *
4 " * *
5 " ***********************************************************
6 " Transfer vector for mtape_
7 "
8 " Modification History:
9 "
10 " Created by J. A. Bush 07/10/83
11
12 name mtape_
13
14 macro transfer
15 segdef &1
16 &1: getlp
17 tra &2$&1
18 &end
19
20 transfer mtape_attach,mtape_iox_
21 transfer allocate_buffers,mtape_io_
22 transfer flush_buffers,mtape_io_
23 transfer order,mtape_io_
24 transfer read_block,mtape_io_
25 transfer read_label,mtape_io_
26 transfer set_mode,mtape_io_
27 transfer stop_tape,mtape_io_
28 transfer write_block,mtape_io_
29 transfer write_label,mtape_io_
30 transfer demount,mtape_mount_cntl_
31 transfer mount,mtape_mount_cntl_
32 transfer volume_switch,mtape_mount_cntl_
33 transfer alloc,mtape_util_
34 transfer error,mtape_util_
35 transfer user_query,mtape_util_
36 transfer mtape_cv_apd,mtape_cv_apd
37
38 end