1 "  ******************************************************
 2 "  *                                                    *
 3 "  *                                                    *
 4 "  * Copyright (c) 1972 by Massachusetts Institute of   *
 5 "  * Technology and Honeywell Information Systems, Inc. *
 6 "  *                                                    *
 7 "  *                                                    *
 8 "  ******************************************************
 9 
10 "         Outer Module Transfer Vector for the tape_ outer module.
11 
12           entry     tape_module
13 tape_module:
14           tra       *+1,6               go to proper transfer instruction
15 
16           tra       <tape_attach_>|[attach]
17           tra       <tape_detach_>|[detach]
18           tra       <tape_read_>|[stream]
19           tra       <tape_write_>|[stream]
20           tra       <ios_>|[no_entry]
21           tra       <tape_util_>|[order]
22           tra       <ios_>|[no_entry]
23           tra       <ios_>|[no_entry]
24           tra       <ios_>|[no_entry]
25           tra       <tape_util_>|[getsize]
26           tra       <ios_>|[no_entry]
27           tra       <ios_>|[no_entry]
28           tra       <tape_util_>|[seek]
29           tra       <ios_>|[no_entry]
30           tra       <ios_>|[no_entry]
31           tra       <ios_>|[no_entry]
32           tra       <ios_>|[no_entry]
33           tra       <ios_>|[no_entry]
34           tra       <ios_>|[no_entry]
35           tra       <ios_>|[no_entry]
36           tra       <ios_>|[no_entry]
37 
38           end