|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 01c0 | | .CONST 0x01c0 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0014 | | .CONST 0x0014 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0004 | | .CONST 0x0004 ; Number of locals
000b INIT_0008:
000b e011 | | Load 0x0,0x11
000c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
000d e0b9 | | Load 0x0,0xb9
000e 0007 | | Action Break_Optional
000f e033 | 3 | Load 0x0,0x33
0010 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0011 0322 | " | Declare_Variable Record
0012 00d8 | | Load_Top At_Offset_0
0013 1c00 | | Execute_Immediate Run_Utility,0x0
0014 BODY_0008:
0014 e0ba | | Load 0x0,0xba
0015 0d01 | | Execute_Immediate Less,0x1
0016 6805 |h | Jump_Zero 0x1c
0017 0092 01a9 | | Action Push_String_Extended,0x1a9 ; "Table of Contents has no entries"
0019 e01c | | Load 0x0,0x1c
001a 180f | | Execute Package,Field_Execute,Field_Number 0xf
001b 4501 |E | Exit_Subprogram 0x1
001c 00cf | | Action Mark_Auxiliary
001d e0ba | | Load 0x0,0xba
001e 4801 |H | Short_Literal 0x1
001f 0263 | c | Execute Discrete,Above_Bound
0020 7187 |q | Jump_Nonzero 0x1a8
0021 00d8 | | Load_Top At_Offset_0
0022 80bb | | Call 0x0,0xbb
0023 a603 | | Store_Unchecked 0x3,0x3
0024 e603 | | Load 0x3,0x3
0025 0217 | | Execute Heap_Access,All_Reference
0026 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0027 e405 | | Load 0x2,0x5
0028 01d7 | | Execute Vector,Field_Read
0029 697c |i| | Jump_Zero 0x1a6
002a 481f |H | Short_Literal 0x1f
002b 801f | | Call 0x0,0x1f
002c e603 | | Load 0x3,0x3
002d 0217 | | Execute Heap_Access,All_Reference
002e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
002f 6805 |h | Jump_Zero 0x35
0030 e603 | | Load 0x3,0x3
0031 0217 | | Execute Heap_Access,All_Reference
0032 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0033 0f01 | | Execute_Immediate Equal,0x1
0034 6889 |h | Jump_Zero 0xbe
0035 e093 | | Load 0x0,0x93
0036 6847 |hG | Jump_Zero 0x7e
0037 e01d | | Load 0x0,0x1d
0038 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0039 e603 | | Load 0x3,0x3
003a 0217 | | Execute Heap_Access,All_Reference
003b 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
003c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
003d e017 | | Load 0x0,0x17
003e 3426 |4& | Execute Record,Field_Reference,Field_Number 0x26
003f 01d7 | | Execute Vector,Field_Read
0040 0273 | s | Execute Discrete,Plus
0041 e011 | | Load 0x0,0x11
0042 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0043 00d9 | | Load_Top At_Offset_1
0044 00d0 | | Action Swap_Control
0045 0260 | ` | Execute Discrete,In_Type
0046 7001 |p | Jump_Nonzero 0x48
0047 0801 | | Execute_Immediate Raise,0x1
0048 e020 | | Load 0x0,0x20
0049 1b12 | | Execute Package,Field_Read,Field_Number 0x12
004a e021 | ! | Load 0x0,0x21
004b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
004c 00d8 | | Load_Top At_Offset_0
004d e021 | ! | Load 0x0,0x21
004e 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
004f 7003 |p | Jump_Nonzero 0x53
0050 e022 | " | Load 0x0,0x22
0051 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0052 0257 | W | Execute Discrete,Raise
0053 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0054 e01d | | Load 0x0,0x1d
0055 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0056 e01d | | Load 0x0,0x1d
0057 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0058 e01d | | Load 0x0,0x1d
0059 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
005a 0273 | s | Execute Discrete,Plus
005b 4be8 |K | Short_Literal 0x3e8
005c 0271 | q | Execute Discrete,Times
005d e011 | | Load 0x0,0x11
005e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
005f 00d9 | | Load_Top At_Offset_1
0060 00d0 | | Action Swap_Control
0061 0260 | ` | Execute Discrete,In_Type
0062 7001 |p | Jump_Nonzero 0x64
0063 0801 | | Execute_Immediate Raise,0x1
0064 e020 | | Load 0x0,0x20
0065 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0066 e021 | ! | Load 0x0,0x21
0067 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0068 00d8 | | Load_Top At_Offset_0
0069 e021 | ! | Load 0x0,0x21
006a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
006b 7003 |p | Jump_Nonzero 0x6f
006c e022 | " | Load 0x0,0x22
006d 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
006e 0257 | W | Execute Discrete,Raise
006f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0070 e01d | | Load 0x0,0x1d
0071 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0072 4801 |H | Short_Literal 0x1
0073 4800 |H | Short_Literal 0x0
0074 e603 | | Load 0x3,0x3
0075 0217 | | Execute Heap_Access,All_Reference
0076 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0077 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0078 e017 | | Load 0x0,0x17
0079 3428 |4( | Execute Record,Field_Reference,Field_Number 0x28
007a 01d7 | | Execute Vector,Field_Read
007b e01e | | Load 0x0,0x1e
007c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
007d 7840 |x@ | Jump 0xbe
007e e603 | | Load 0x3,0x3
007f 0217 | | Execute Heap_Access,All_Reference
0080 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0081 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0082 0d03 | | Execute_Immediate Less,0x3
0083 683a |h: | Jump_Zero 0xbe
0084 e01d | | Load 0x0,0x1d
0085 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0086 4803 |H | Short_Literal 0x3
0087 e603 | | Load 0x3,0x3
0088 0217 | | Execute Heap_Access,All_Reference
0089 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
008a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
008b 0272 | r | Execute Discrete,Minus
008c 0273 | s | Execute Discrete,Plus
008d e011 | | Load 0x0,0x11
008e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
008f 00d9 | | Load_Top At_Offset_1
0090 00d0 | | Action Swap_Control
0091 0260 | ` | Execute Discrete,In_Type
0092 7001 |p | Jump_Nonzero 0x94
0093 0801 | | Execute_Immediate Raise,0x1
0094 e020 | | Load 0x0,0x20
0095 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0096 e021 | ! | Load 0x0,0x21
0097 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0098 00d8 | | Load_Top At_Offset_0
0099 e021 | ! | Load 0x0,0x21
009a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
009b 7003 |p | Jump_Nonzero 0x9f
009c e022 | " | Load 0x0,0x22
009d 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
009e 0257 | W | Execute Discrete,Raise
009f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00a0 e01d | | Load 0x0,0x1d
00a1 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
00a2 e01d | | Load 0x0,0x1d
00a3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
00a4 e01d | | Load 0x0,0x1d
00a5 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
00a6 0273 | s | Execute Discrete,Plus
00a7 4be8 |K | Short_Literal 0x3e8
00a8 0271 | q | Execute Discrete,Times
00a9 e011 | | Load 0x0,0x11
00aa 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00ab 00d9 | | Load_Top At_Offset_1
00ac 00d0 | | Action Swap_Control
00ad 0260 | ` | Execute Discrete,In_Type
00ae 7001 |p | Jump_Nonzero 0xb0
00af 0801 | | Execute_Immediate Raise,0x1
00b0 e020 | | Load 0x0,0x20
00b1 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00b2 e021 | ! | Load 0x0,0x21
00b3 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
00b4 00d8 | | Load_Top At_Offset_0
00b5 e021 | ! | Load 0x0,0x21
00b6 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
00b7 7003 |p | Jump_Nonzero 0xbb
00b8 e022 | " | Load 0x0,0x22
00b9 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00ba 0257 | W | Execute Discrete,Raise
00bb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00bc e01d | | Load 0x0,0x1d
00bd 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
00be 4801 |H | Short_Literal 0x1
00bf 4800 |H | Short_Literal 0x0
00c0 e01d | | Load 0x0,0x1d
00c1 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
00c2 e01e | | Load 0x0,0x1e
00c3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00c4 e603 | | Load 0x3,0x3
00c5 0217 | | Execute Heap_Access,All_Reference
00c6 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
00c7 6805 |h | Jump_Zero 0xcd
00c8 e603 | | Load 0x3,0x3
00c9 0217 | | Execute Heap_Access,All_Reference
00ca 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
00cb 0f01 | | Execute_Immediate Equal,0x1
00cc 6808 |h | Jump_Zero 0xd5
00cd e603 | | Load 0x3,0x3
00ce 0217 | | Execute Heap_Access,All_Reference
00cf 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
00d0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00d1 e075 | u | Load 0x0,0x75
00d2 01d7 | | Execute Vector,Field_Read
00d3 e01d | | Load 0x0,0x1d
00d4 3818 |8 | Execute Record,Field_Write,Field_Number 0x18
00d5 e603 | | Load 0x3,0x3
00d6 0217 | | Execute Heap_Access,All_Reference
00d7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
00d8 703d |p= | Jump_Nonzero 0x116
00d9 e603 | | Load 0x3,0x3
00da 0219 | | Execute Heap_Access,All_Read
00db 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00dc e602 | | Load 0x3,0x2
00dd e608 | | Load 0x3,0x8
00de e033 | 3 | Load 0x0,0x33
00df 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00e0 00d1 | | Pop_Control Pop_Count_1
00e1 c602 | | Store 0x3,0x2
00e2 00d1 | | Pop_Control Pop_Count_1
00e3 e602 | | Load 0x3,0x2
00e4 e011 | | Load 0x0,0x11
00e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00e7 0c01 | | Execute_Immediate Greater_Equal,0x1
00e8 682d |h- | Jump_Zero 0x116
00e9 e603 | | Load 0x3,0x3
00ea 0217 | | Execute Heap_Access,All_Reference
00eb 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
00ec 4603 |F | Jump_Case 0x3
00ed 7812 |x | Jump 0x100 ; case 0x0
00ee 7811 |x | Jump 0x100 ; case 0x1
00ef 7818 |x | Jump 0x108 ; case 0x2
00f0 7800 |x | Jump 0xf1 ; case 0x3
00f1 e603 | | Load 0x3,0x3
00f2 0217 | | Execute Heap_Access,All_Reference
00f3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00f4 0227 | ' | Execute Access,All_Reference
00f5 01db | | Execute Vector,Length
00f6 0c01 | | Execute_Immediate Greater_Equal,0x1
00f7 681e |h | Jump_Zero 0x116
00f8 e602 | | Load 0x3,0x2
00f9 e017 | | Load 0x0,0x17
00fa 3c0f |< | Execute Record,Field_Read,Field_Number 0xf
00fb e011 | | Load 0x0,0x11
00fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00fe c602 | | Store 0x3,0x2
00ff 7816 |x | Jump 0x116
0100 e602 | | Load 0x3,0x2
0101 0092 01aa | | Action Push_String_Extended,0x1aa ; "~ ~ "
0103 e011 | | Load 0x0,0x11
0104 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0105 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0106 c602 | | Store 0x3,0x2
0107 780e |x | Jump 0x116
0108 e603 | | Load 0x3,0x3
0109 0217 | | Execute Heap_Access,All_Reference
010a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
010b 0227 | ' | Execute Access,All_Reference
010c 01db | | Execute Vector,Length
010d 0c01 | | Execute_Immediate Greater_Equal,0x1
010e 6807 |h | Jump_Zero 0x116
010f e602 | | Load 0x3,0x2
0110 e017 | | Load 0x0,0x17
0111 3c3e |<> | Execute Record,Field_Read,Field_Number 0x3e
0112 e011 | | Load 0x0,0x11
0113 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0114 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0115 c602 | | Store 0x3,0x2
0116 e602 | | Load 0x3,0x2
0117 e603 | | Load 0x3,0x3
0118 0217 | | Execute Heap_Access,All_Reference
0119 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
011a 0227 | ' | Execute Access,All_Reference
011b e011 | | Load 0x0,0x11
011c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
011e c602 | | Store 0x3,0x2
011f e602 | | Load 0x3,0x2
0120 e015 | | Load 0x0,0x15
0121 180f | | Execute Package,Field_Execute,Field_Number 0xf
0122 e602 | | Load 0x3,0x2
0123 e011 | | Load 0x0,0x11
0124 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0125 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0126 c602 | | Store 0x3,0x2
0127 e603 | | Load 0x3,0x3
0128 0217 | | Execute Heap_Access,All_Reference
0129 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
012a 6812 |h | Jump_Zero 0x13d
012b e603 | | Load 0x3,0x3
012c 0217 | | Execute Heap_Access,All_Reference
012d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
012e 4801 |H | Short_Literal 0x1
012f e604 | | Load 0x3,0x4
0130 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0131 01d6 | | Execute Vector,Field_Write
0132 e603 | | Load 0x3,0x3
0133 0217 | | Execute Heap_Access,All_Reference
0134 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0135 4802 |H | Short_Literal 0x2
0136 e604 | | Load 0x3,0x4
0137 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0138 01d6 | | Execute Vector,Field_Write
0139 4802 |H | Short_Literal 0x2
013a e604 | | Load 0x3,0x4
013b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
013c 780a |x | Jump 0x147
013d e603 | | Load 0x3,0x3
013e 0217 | | Execute Heap_Access,All_Reference
013f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0140 4801 |H | Short_Literal 0x1
0141 e604 | | Load 0x3,0x4
0142 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0143 01d6 | | Execute Vector,Field_Write
0144 4801 |H | Short_Literal 0x1
0145 e604 | | Load 0x3,0x4
0146 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0147 e603 | | Load 0x3,0x3
0148 0217 | | Execute Heap_Access,All_Reference
0149 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
014a e604 | | Load 0x3,0x4
014b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
014c e602 | | Load 0x3,0x2
014d e604 | | Load 0x3,0x4
014e e033 | 3 | Load 0x0,0x33
014f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0150 00d1 | | Pop_Control Pop_Count_1
0151 c602 | | Store 0x3,0x2
0152 4801 |H | Short_Literal 0x1
0153 e01d | | Load 0x0,0x1d
0154 3815 |8 | Execute Record,Field_Write,Field_Number 0x15
0155 e01d | | Load 0x0,0x1d
0156 3c17 |< | Execute Record,Field_Read,Field_Number 0x17
0157 4801 |H | Short_Literal 0x1
0158 e01d | | Load 0x0,0x1d
0159 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12
015a 01d6 | | Execute Vector,Field_Write
015b 4804 |H | Short_Literal 0x4
015c 4801 |H | Short_Literal 0x1
015d e01d | | Load 0x0,0x1d
015e 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
015f 01d6 | | Execute Vector,Field_Write
0160 e088 | | Load 0x0,0x88
0161 0d00 | | Execute_Immediate Less,0x0
0162 680f |h | Jump_Zero 0x172
0163 e603 | | Load 0x3,0x3
0164 0217 | | Execute Heap_Access,All_Reference
0165 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0166 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0167 e088 | | Load 0x0,0x88
0168 0275 | u | Execute Discrete,Unary_Minus
0169 027a | z | Execute Discrete,Less_Equal
016a 6807 |h | Jump_Zero 0x172
016b e017 | | Load 0x0,0x17
016c 3c23 |<# | Execute Record,Field_Read,Field_Number 0x23
016d 4801 |H | Short_Literal 0x1
016e e01d | | Load 0x0,0x1d
016f 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14
0170 01d6 | | Execute Vector,Field_Write
0171 7816 |x | Jump 0x188
0172 e088 | | Load 0x0,0x88
0173 0c01 | | Execute_Immediate Greater_Equal,0x1
0174 680e |h | Jump_Zero 0x183
0175 e603 | | Load 0x3,0x3
0176 0217 | | Execute Heap_Access,All_Reference
0177 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0178 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0179 e088 | | Load 0x0,0x88
017a 027b | { | Execute Discrete,Greater_Equal
017b 6807 |h | Jump_Zero 0x183
017c e017 | | Load 0x0,0x17
017d 3c23 |<# | Execute Record,Field_Read,Field_Number 0x23
017e 4801 |H | Short_Literal 0x1
017f e01d | | Load 0x0,0x1d
0180 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14
0181 01d6 | | Execute Vector,Field_Write
0182 7805 |x | Jump 0x188
0183 4fff |O | Short_Literal 0x7ff
0184 4801 |H | Short_Literal 0x1
0185 e01d | | Load 0x0,0x1d
0186 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14
0187 01d6 | | Execute Vector,Field_Write
0188 e602 | | Load 0x3,0x2
0189 4809 |H | Short_Literal 0x9
018a 4801 |H | Short_Literal 0x1
018b e011 | | Load 0x0,0x11
018c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
018e c602 | | Store 0x3,0x2
018f e602 | | Load 0x3,0x2
0190 e015 | | Load 0x0,0x15
0191 180f | | Execute Package,Field_Execute,Field_Number 0xf
0192 e602 | | Load 0x3,0x2
0193 e011 | | Load 0x0,0x11
0194 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0195 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0196 c602 | | Store 0x3,0x2
0197 481f |H | Short_Literal 0x1f
0198 8023 | # | Call 0x0,0x23
0199 e093 | | Load 0x0,0x93
019a 680b |h | Jump_Zero 0x1a6
019b 4801 |H | Short_Literal 0x1
019c 4800 |H | Short_Literal 0x0
019d e603 | | Load 0x3,0x3
019e 0217 | | Execute Heap_Access,All_Reference
019f 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
01a0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01a1 e017 | | Load 0x0,0x17
01a2 3427 |4' | Execute Record,Field_Reference,Field_Number 0x27
01a3 01d7 | | Execute Vector,Field_Read
01a4 e01e | | Load 0x0,0x1e
01a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01a6 00c8 | | Action Pop_Auxiliary_Range
01a7 3e79 |>y | Loop_Increasing 0x21
01a8 4501 |E | Exit_Subprogram 0x1
01a9 ; --------------------------------------------------------------------------------------
01a9 ; STRING TABLE
01a9 ; --------------------------------------------------------------------------------------
01a9 0006 | | .STRTAB 0x0006->0x01ac ; "Table of Contents has no entries"
01aa 0024 | $ | .STRTAB 0x0024->0x01bc ; "~ ~ "
01ab 0026 | & | .STREND 0x0026->0x01be
01ac 5461 626c |Tabl| .STRTAB_STRINGS
01be 0000 0000 | | .XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; Debug Table
01c0 ; --------------------------------------------------------------------------------------
01c0 0004 000f | | .DEBUG4 0x0004,0x000f,0x480f,0x0000,0x0001,0x0000
01c6 0000 0000 | | .BLANK 0000[0x3a]