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