1 " ***********************************************************
 2 " *                                                         *
 3 " * Copyright, (C) Honeywell Information Systems Inc., 1982 *
 4 " *                                                         *
 5 " ***********************************************************
 6 "
 7 " Transfer vector for stu_ entrypoints
 8 "
 9 " 23 Jun 83, W. Olin Sibert
10 "
11           macro     xfer
12           segdef    &1
13           ife       &2,()
14 &1:         getlp
15             tra     &1$&1
16           ifend
17           ine       &2,()
18 &1:         getlp
19             tra     &2
20           ifend
21 &end
22 
23 
24           xfer      block_dcld_in
25           xfer      decode_runtime_value
26           xfer      decode_runtime_value_extended,decode_runtime_value$decode_runtime_value_extended
27           xfer      find_block
28           xfer      find_containing_block
29           xfer      find_header
30           xfer      find_runtime_symbol
31           xfer      get_block
32           xfer      get_display_steps
33           xfer      get_implicit_qualifier
34           xfer      get_line,get_runtime_line_no$get_line
35           xfer      get_line_no
36           xfer      get_location
37           xfer      get_map_index
38           xfer      get_runtime_address
39           xfer      get_runtime_block,get_block$get_runtime_block
40           xfer      get_runtime_line_no
41           xfer      get_runtime_location
42           xfer      get_statement_map
43           xfer      offset_to_pointer
44           xfer      pointer_to_offset
45           xfer      remote_format
46           end