|
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 - 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_Suprogram New_Top_Offset 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 0x4 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 -0x1 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_Suprogram New_Top_Offset 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]