|
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: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0248 | H | .CONST 0x0248 ; 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 001f | | .CONST 0x001f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000a | | .CONST 0x000a ; Number of locals 000b INIT_0008: 000b e009 | | Load 0x0,0x9 000c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 000d e23f | ? | Load 0x1,0x3f 000e 0a01 | | Execute_Immediate Plus,0x1 000f 00e3 | | Load_Encached Natural_Cache 0010 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0011 e254 | T | Load 0x1,0x54 0012 0a01 | | Execute_Immediate Plus,0x1 0013 00e3 | | Load_Encached Natural_Cache 0014 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0015 e23c | < | Load 0x1,0x3c 0016 0007 | | Action Break_Optional 0017 e251 | Q | Load 0x1,0x51 0018 0007 | | Action Break_Optional 0019 00e3 | | Load_Encached Natural_Cache 001a 00e3 | | Load_Encached Natural_Cache 001b e009 | | Load 0x0,0x9 001c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 001d e2db | | Load 0x1,0xdb 001e 0007 | | Action Break_Optional 001f BODY_0008: 001f e2a8 | | Load 0x1,0xa8 0020 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0021 6829 |h) | Jump_Zero 0x4b 0022 e2a8 | | Load 0x1,0xa8 0023 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0024 0f02 | | Execute_Immediate Equal,0x2 0025 e2a8 | | Load 0x1,0xa8 0026 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0027 0f04 | | Execute_Immediate Equal,0x4 0028 0278 | x | Execute Discrete,Or 0029 6821 |h! | Jump_Zero 0x4b 002a e065 | e | Load 0x0,0x65 002b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 002c e019 | | Load 0x0,0x19 002d 1b12 | | Execute Package,Field_Read,Field_Number 0x12 002e e2a8 | | Load 0x1,0xa8 002f 3c18 |< | Execute Record,Field_Read,Field_Number 0x18 0030 e066 | f | Load 0x0,0x66 0031 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0032 e067 | g | Load 0x0,0x67 0033 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0034 00d8 | | Load_Top At_Offset_0 0035 e067 | g | Load 0x0,0x67 0036 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0037 7003 |p | Jump_Nonzero 0x3b 0038 e068 | h | Load 0x0,0x68 0039 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 003a 0257 | W | Execute Discrete,Raise 003b 181d | | Execute Package,Field_Execute,Field_Number 0x1d 003c 0273 | s | Execute Discrete,Plus 003d e009 | | Load 0x0,0x9 003e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 003f 00d9 | | Load_Top At_Offset_1 0040 00d0 | | Action Swap_Control 0041 0260 | ` | Execute Discrete,In_Type 0042 7001 |p | Jump_Nonzero 0x44 0043 0801 | | Execute_Immediate Raise,0x1 0044 e019 | | Load 0x0,0x19 0045 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0046 4800 |H | Short_Literal 0x0 0047 e2a8 | | Load 0x1,0xa8 0048 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 0049 e019 | | Load 0x0,0x19 004a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 004b e220 | | Load 0x1,0x20 004c 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 004d 6803 |h | Jump_Zero 0x51 004e 4943 |IC | Short_Literal 0x143 004f e065 | e | Load 0x0,0x65 0050 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0051 4801 |H | Short_Literal 0x1 0052 e065 | e | Load 0x0,0x65 0053 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0054 e2a0 | | Load 0x1,0xa0 0055 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 0056 e2a0 | | Load 0x1,0xa0 0057 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 0058 0272 | r | Execute Discrete,Minus 0059 09ff | | Execute_Immediate Binary_Scale,-0x1 005a 4801 |H | Short_Literal 0x1 005b e2a0 | | Load 0x1,0xa0 005c 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12 005d 01d6 | | Execute Vector,Field_Write 005e 4802 |H | Short_Literal 0x2 005f 4801 |H | Short_Literal 0x1 0060 e2a0 | | Load 0x1,0xa0 0061 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13 0062 01d6 | | Execute Vector,Field_Write 0063 e2a0 | | Load 0x1,0xa0 0064 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 0065 4802 |H | Short_Literal 0x2 0066 e2a0 | | Load 0x1,0xa0 0067 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12 0068 01d6 | | Execute Vector,Field_Write 0069 4804 |H | Short_Literal 0x4 006a 4802 |H | Short_Literal 0x2 006b e2a0 | | Load 0x1,0xa0 006c 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13 006d 01d6 | | Execute Vector,Field_Write 006e 00cf | | Action Mark_Auxiliary 006f e23f | ? | Load 0x1,0x3f 0070 e240 | @ | Load 0x1,0x40 0071 0263 | c | Execute Discrete,Above_Bound 0072 7033 |p3 | Jump_Nonzero 0xa6 0073 00d8 | | Load_Top At_Offset_0 0074 00d8 | | Load_Top At_Offset_0 0075 00e4 | | Load_Encached Positive_Cache 0076 0260 | ` | Execute Discrete,In_Type 0077 7001 |p | Jump_Nonzero 0x79 0078 0801 | | Execute_Immediate Raise,0x1 0079 823e | > | Call 0x1,0x3e 007a a405 | | Store_Unchecked 0x2,0x5 007b e405 | | Load 0x2,0x5 007c 0217 | | Execute Heap_Access,All_Reference 007d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 007e e5ff | | Load 0x2,-0x1 007f 027d | } | Execute Discrete,Greater 0080 6823 |h# | Jump_Zero 0xa4 0081 00d8 | | Load_Top At_Offset_0 0082 a403 | | Store_Unchecked 0x2,0x3 0083 00cf | | Action Mark_Auxiliary 0084 e23f | ? | Load 0x1,0x3f 0085 e40d | | Load 0x2,0xd 0086 0263 | c | Execute Discrete,Above_Bound 0087 7019 |p | Jump_Nonzero 0xa1 0088 00d8 | | Load_Top At_Offset_0 0089 00d8 | | Load_Top At_Offset_0 008a 00e4 | | Load_Encached Positive_Cache 008b 0260 | ` | Execute Discrete,In_Type 008c 7001 |p | Jump_Nonzero 0x8e 008d 0801 | | Execute_Immediate Raise,0x1 008e 823e | > | Call 0x1,0x3e 008f a405 | | Store_Unchecked 0x2,0x5 0090 e405 | | Load 0x2,0x5 0091 0217 | | Execute Heap_Access,All_Reference 0092 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0093 0a01 | | Execute_Immediate Plus,0x1 0094 e405 | | Load 0x2,0x5 0095 0217 | | Execute Heap_Access,All_Reference 0096 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0097 e405 | | Load 0x2,0x5 0098 0217 | | Execute Heap_Access,All_Reference 0099 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 009a e5ff | | Load 0x2,-0x1 009b 0272 | r | Execute Discrete,Minus 009c e405 | | Load 0x2,0x5 009d 0217 | | Execute Heap_Access,All_Reference 009e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 009f 00c8 | | Action Pop_Auxiliary_Range 00a0 3fe7 |? | Loop_Increasing 0x88 00a1 00ce | | Action Pop_Auxiliary 00a2 00d2 | | Pop_Control Pop_Count_2 00a3 7802 |x | Jump 0xa6 00a4 00c8 | | Action Pop_Auxiliary_Range 00a5 3fcd |? | Loop_Increasing 0x73 00a6 00ce | | Action Pop_Auxiliary 00a7 e403 | | Load 0x2,0x3 00a8 a240 | @ | Store_Unchecked 0x1,0x40 00a9 00cf | | Action Mark_Auxiliary 00aa e254 | T | Load 0x1,0x54 00ab e255 | U | Load 0x1,0x55 00ac 0263 | c | Execute Discrete,Above_Bound 00ad 7033 |p3 | Jump_Nonzero 0xe1 00ae 00d8 | | Load_Top At_Offset_0 00af 00d8 | | Load_Top At_Offset_0 00b0 00e4 | | Load_Encached Positive_Cache 00b1 0260 | ` | Execute Discrete,In_Type 00b2 7001 |p | Jump_Nonzero 0xb4 00b3 0801 | | Execute_Immediate Raise,0x1 00b4 8253 | S | Call 0x1,0x53 00b5 a406 | | Store_Unchecked 0x2,0x6 00b6 e406 | | Load 0x2,0x6 00b7 0217 | | Execute Heap_Access,All_Reference 00b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00b9 e5ff | | Load 0x2,-0x1 00ba 027d | } | Execute Discrete,Greater 00bb 6823 |h# | Jump_Zero 0xdf 00bc 00d8 | | Load_Top At_Offset_0 00bd a404 | | Store_Unchecked 0x2,0x4 00be 00cf | | Action Mark_Auxiliary 00bf e254 | T | Load 0x1,0x54 00c0 e40d | | Load 0x2,0xd 00c1 0263 | c | Execute Discrete,Above_Bound 00c2 7019 |p | Jump_Nonzero 0xdc 00c3 00d8 | | Load_Top At_Offset_0 00c4 00d8 | | Load_Top At_Offset_0 00c5 00e4 | | Load_Encached Positive_Cache 00c6 0260 | ` | Execute Discrete,In_Type 00c7 7001 |p | Jump_Nonzero 0xc9 00c8 0801 | | Execute_Immediate Raise,0x1 00c9 8253 | S | Call 0x1,0x53 00ca a406 | | Store_Unchecked 0x2,0x6 00cb e406 | | Load 0x2,0x6 00cc 0217 | | Execute Heap_Access,All_Reference 00cd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 00ce 0a01 | | Execute_Immediate Plus,0x1 00cf e406 | | Load 0x2,0x6 00d0 0217 | | Execute Heap_Access,All_Reference 00d1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 00d2 e406 | | Load 0x2,0x6 00d3 0217 | | Execute Heap_Access,All_Reference 00d4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00d5 e5ff | | Load 0x2,-0x1 00d6 0272 | r | Execute Discrete,Minus 00d7 e406 | | Load 0x2,0x6 00d8 0217 | | Execute Heap_Access,All_Reference 00d9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00da 00c8 | | Action Pop_Auxiliary_Range 00db 3fe7 |? | Loop_Increasing 0xc3 00dc 00ce | | Action Pop_Auxiliary 00dd 00d2 | | Pop_Control Pop_Count_2 00de 7802 |x | Jump 0xe1 00df 00c8 | | Action Pop_Auxiliary_Range 00e0 3fcd |? | Loop_Increasing 0xae 00e1 00ce | | Action Pop_Auxiliary 00e2 e404 | | Load 0x2,0x4 00e3 a255 | U | Store_Unchecked 0x1,0x55 00e4 483a |H: | Short_Literal 0x3a 00e5 e2a0 | | Load 0x1,0xa0 00e6 8225 | % | Call 0x1,0x25 00e7 4801 |H | Short_Literal 0x1 00e8 a407 | | Store_Unchecked 0x2,0x7 00e9 4800 |H | Short_Literal 0x0 00ea a408 | | Store_Unchecked 0x2,0x8 00eb 4800 |H | Short_Literal 0x0 00ec a409 | | Store_Unchecked 0x2,0x9 00ed 00cf | | Action Mark_Auxiliary 00ee e28c | | Load 0x1,0x8c 00ef 4801 |H | Short_Literal 0x1 00f0 0263 | c | Execute Discrete,Above_Bound 00f1 703d |p= | Jump_Nonzero 0x12f 00f2 00d8 | | Load_Top At_Offset_0 00f3 e28b | | Load 0x1,0x8b 00f4 01d5 | | Execute Vector,Field_Reference 00f5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 00f6 7033 |p3 | Jump_Nonzero 0x12a 00f7 00d8 | | Load_Top At_Offset_0 00f8 e28b | | Load 0x1,0x8b 00f9 01d5 | | Execute Vector,Field_Reference 00fa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00fb e5ff | | Load 0x2,-0x1 00fc 027d | } | Execute Discrete,Greater 00fd 6814 |h | Jump_Zero 0x112 00fe 00cf | | Action Mark_Auxiliary 00ff e28c | | Load 0x1,0x8c 0100 e40d | | Load 0x2,0xd 0101 0263 | c | Execute Discrete,Above_Bound 0102 700c |p | Jump_Nonzero 0x10f 0103 00d8 | | Load_Top At_Offset_0 0104 e28b | | Load 0x1,0x8b 0105 01d5 | | Execute Vector,Field_Reference 0106 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0107 e5ff | | Load 0x2,-0x1 0108 0272 | r | Execute Discrete,Minus 0109 e410 | | Load 0x2,0x10 010a e28b | | Load 0x1,0x8b 010b 01d5 | | Execute Vector,Field_Reference 010c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 010d 00c8 | | Action Pop_Auxiliary_Range 010e 3ff4 |? | Loop_Increasing 0x103 010f 00ce | | Action Pop_Auxiliary 0110 00d2 | | Pop_Control Pop_Count_2 0111 781d |x | Jump 0x12f 0112 00d8 | | Load_Top At_Offset_0 0113 a408 | | Store_Unchecked 0x2,0x8 0114 e409 | | Load 0x2,0x9 0115 7007 |p | Jump_Nonzero 0x11d 0116 e22c | , | Load 0x1,0x2c 0117 3c19 |< | Execute Record,Field_Read,Field_Number 0x19 0118 e22c | , | Load 0x1,0x2c 0119 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 011a 0273 | s | Execute Discrete,Plus 011b c409 | | Store 0x2,0x9 011c 7805 |x | Jump 0x122 011d e409 | | Load 0x2,0x9 011e e22c | , | Load 0x1,0x2c 011f 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a 0120 0273 | s | Execute Discrete,Plus 0121 c409 | | Store 0x2,0x9 0122 e409 | | Load 0x2,0x9 0123 e40d | | Load 0x2,0xd 0124 e28b | | Load 0x1,0x8b 0125 01d5 | | Execute Vector,Field_Reference 0126 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0127 0273 | s | Execute Discrete,Plus 0128 c409 | | Store 0x2,0x9 0129 7803 |x | Jump 0x12d 012a e407 | | Load 0x2,0x7 012b 0a01 | | Execute_Immediate Plus,0x1 012c c407 | | Store 0x2,0x7 012d 00c8 | | Action Pop_Auxiliary_Range 012e 3fc3 |? | Loop_Increasing 0xf2 012f 00ce | | Action Pop_Auxiliary 0130 e408 | | Load 0x2,0x8 0131 0e00 | | Execute_Immediate Not_Equal,0x0 0132 e5ff | | Load 0x2,-0x1 0133 e22c | , | Load 0x1,0x2c 0134 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0135 610a |a | Indirect_Literal Discrete,0x240,{0xffffffff, 0xffffa240} 0136 0273 | s | Execute Discrete,Plus 0137 027c | | | Execute Discrete,Less 0138 0279 | y | Execute Discrete,And 0139 6876 |hv | Jump_Zero 0x1b0 013a e22c | , | Load 0x1,0x2c 013b 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 013c e409 | | Load 0x2,0x9 013d 0272 | r | Execute Discrete,Minus 013e e2a1 | | Load 0x1,0xa1 013f 027d | } | Execute Discrete,Greater 0140 680f |h | Jump_Zero 0x150 0141 e22c | , | Load 0x1,0x2c 0142 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0143 e409 | | Load 0x2,0x9 0144 0272 | r | Execute Discrete,Minus 0145 e009 | | Load 0x0,0x9 0146 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0147 00d9 | | Load_Top At_Offset_1 0148 00d0 | | Action Swap_Control 0149 0260 | ` | Execute Discrete,In_Type 014a 7001 |p | Jump_Nonzero 0x14c 014b 0801 | | Execute_Immediate Raise,0x1 014c 4800 |H | Short_Literal 0x0 014d e019 | | Load 0x0,0x19 014e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 014f 7804 |x | Jump 0x154 0150 e2a1 | | Load 0x1,0xa1 0151 4800 |H | Short_Literal 0x0 0152 e019 | | Load 0x0,0x19 0153 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0154 e22c | , | Load 0x1,0x2c 0155 3c19 |< | Execute Record,Field_Read,Field_Number 0x19 0156 4800 |H | Short_Literal 0x0 0157 e019 | | Load 0x0,0x19 0158 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0159 00cf | | Action Mark_Auxiliary 015a 7805 |x | Jump 0x160 015b e22c | , | Load 0x1,0x2c 015c 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 015d e065 | e | Load 0x0,0x65 015e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 015f 00c9 | | Action Pop_Auxiliary_Loop 0160 e019 | | Load 0x0,0x19 0161 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0162 e22c | , | Load 0x1,0x2c 0163 3c18 |< | Execute Record,Field_Read,Field_Number 0x18 0164 027c | | | Execute Discrete,Less 0165 77f5 |w | Jump_Nonzero 0x15b 0166 00ce | | Action Pop_Auxiliary 0167 4801 |H | Short_Literal 0x1 0168 4800 |H | Short_Literal 0x0 0169 e22c | , | Load 0x1,0x2c 016a 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 016b 8218 | | Call 0x1,0x18 016c 00cf | | Action Mark_Auxiliary 016d e408 | | Load 0x2,0x8 016e e407 | | Load 0x2,0x7 016f 0263 | c | Execute Discrete,Above_Bound 0170 703e |p> | Jump_Nonzero 0x1af 0171 e019 | | Load 0x0,0x19 0172 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0173 a409 | | Store_Unchecked 0x2,0x9 0174 00cf | | Action Mark_Auxiliary 0175 7821 |x! | Jump 0x197 0176 e019 | | Load 0x0,0x19 0177 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0178 e22c | , | Load 0x1,0x2c 0179 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 017a 027d | } | Execute Discrete,Greater 017b 6810 |h | Jump_Zero 0x18c 017c e40d | | Load 0x2,0xd 017d e28b | | Load 0x1,0x8b 017e 01d5 | | Execute Vector,Field_Reference 017f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0180 e019 | | Load 0x0,0x19 0181 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0182 e409 | | Load 0x2,0x9 0183 0272 | r | Execute Discrete,Minus 0184 0272 | r | Execute Discrete,Minus 0185 e40d | | Load 0x2,0xd 0186 e28b | | Load 0x1,0x8b 0187 01d5 | | Execute Vector,Field_Reference 0188 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0189 00ce | | Action Pop_Auxiliary 018a 00d2 | | Pop_Control Pop_Count_2 018b 7823 |x# | Jump 0x1af 018c e40d | | Load 0x2,0xd 018d e28b | | Load 0x1,0x8b 018e 01d5 | | Execute Vector,Field_Reference 018f 00d8 | | Load_Top At_Offset_0 0190 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0191 e019 | | Load 0x0,0x19 0192 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0193 e40f | | Load 0x2,0xf 0194 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0195 00d1 | | Pop_Control Pop_Count_1 0196 00c9 | | Action Pop_Auxiliary_Loop 0197 e40d | | Load 0x2,0xd 0198 e28b | | Load 0x1,0x8b 0199 01d5 | | Execute Vector,Field_Reference 019a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 019b 77da |w | Jump_Nonzero 0x176 019c 00ce | | Action Pop_Auxiliary 019d 4801 |H | Short_Literal 0x1 019e e40d | | Load 0x2,0xd 019f e28b | | Load 0x1,0x8b 01a0 01d5 | | Execute Vector,Field_Reference 01a1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01a2 e019 | | Load 0x0,0x19 01a3 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01a4 e22c | , | Load 0x1,0x2c 01a5 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 01a6 027c | | | Execute Discrete,Less 01a7 6805 |h | Jump_Zero 0x1ad 01a8 4801 |H | Short_Literal 0x1 01a9 4801 |H | Short_Literal 0x1 01aa e22c | , | Load 0x1,0x2c 01ab 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a 01ac 8218 | | Call 0x1,0x18 01ad 00c8 | | Action Pop_Auxiliary_Range 01ae 3fc2 |? | Loop_Increasing 0x171 01af 00ce | | Action Pop_Auxiliary 01b0 e28c | | Load 0x1,0x8c 01b1 6805 |h | Jump_Zero 0x1b7 01b2 e28c | | Load 0x1,0x8c 01b3 e28b | | Load 0x1,0x8b 01b4 01d5 | | Execute Vector,Field_Reference 01b5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01b6 6808 |h | Jump_Zero 0x1bf 01b7 4800 |H | Short_Literal 0x0 01b8 a28c | | Store_Unchecked 0x1,0x8c 01b9 4800 |H | Short_Literal 0x0 01ba a288 | | Store_Unchecked 0x1,0x88 01bb e22c | , | Load 0x1,0x2c 01bc 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 01bd a2a1 | | Store_Unchecked 0x1,0xa1 01be 7837 |x7 | Jump 0x1f6 01bf e22c | , | Load 0x1,0x2c 01c0 3c19 |< | Execute Record,Field_Read,Field_Number 0x19 01c1 e22c | , | Load 0x1,0x2c 01c2 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 01c3 0273 | s | Execute Discrete,Plus 01c4 c409 | | Store 0x2,0x9 01c5 00cf | | Action Mark_Auxiliary 01c6 e28c | | Load 0x1,0x8c 01c7 4801 |H | Short_Literal 0x1 01c8 0263 | c | Execute Discrete,Above_Bound 01c9 700e |p | Jump_Nonzero 0x1d8 01ca 00d8 | | Load_Top At_Offset_0 01cb e28b | | Load 0x1,0x8b 01cc 01d5 | | Execute Vector,Field_Reference 01cd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01ce 7007 |p | Jump_Nonzero 0x1d6 01cf e409 | | Load 0x2,0x9 01d0 e40d | | Load 0x2,0xd 01d1 e28b | | Load 0x1,0x8b 01d2 01d5 | | Execute Vector,Field_Reference 01d3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01d4 0273 | s | Execute Discrete,Plus 01d5 c409 | | Store 0x2,0x9 01d6 00c8 | | Action Pop_Auxiliary_Range 01d7 3ff2 |? | Loop_Increasing 0x1ca 01d8 00ce | | Action Pop_Auxiliary 01d9 e22c | , | Load 0x1,0x2c 01da 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 01db e409 | | Load 0x2,0x9 01dc 0272 | r | Execute Discrete,Minus 01dd e22c | , | Load 0x1,0x2c 01de 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f 01df e22c | , | Load 0x1,0x2c 01e0 3c1e |< | Execute Record,Field_Read,Field_Number 0x1e 01e1 0273 | s | Execute Discrete,Plus 01e2 6059 |`Y | Indirect_Literal Discrete,0x23c,{0x00000000, 0x00008ca0} 01e3 0273 | s | Execute Discrete,Plus 01e4 027c | | | Execute Discrete,Less 01e5 6809 |h | Jump_Zero 0x1ef 01e6 e22c | , | Load 0x1,0x2c 01e7 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f 01e8 e22c | , | Load 0x1,0x2c 01e9 3c1e |< | Execute Record,Field_Read,Field_Number 0x1e 01ea 0273 | s | Execute Discrete,Plus 01eb 6050 |`P | Indirect_Literal Discrete,0x23c,{0x00000000, 0x00008ca0} 01ec 0273 | s | Execute Discrete,Plus 01ed c2a1 | | Store 0x1,0xa1 01ee 7805 |x | Jump 0x1f4 01ef e22c | , | Load 0x1,0x2c 01f0 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 01f1 e409 | | Load 0x2,0x9 01f2 0272 | r | Execute Discrete,Minus 01f3 c2a1 | | Store 0x1,0xa1 01f4 4801 |H | Short_Literal 0x1 01f5 a288 | | Store_Unchecked 0x1,0x88 01f6 e22c | , | Load 0x1,0x2c 01f7 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 01f8 e22c | , | Load 0x1,0x2c 01f9 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 01fa 0273 | s | Execute Discrete,Plus 01fb e009 | | Load 0x0,0x9 01fc 1b10 | | Execute Package,Field_Read,Field_Number 0x10 01fd 00d9 | | Load_Top At_Offset_1 01fe 00d0 | | Action Swap_Control 01ff 0260 | ` | Execute Discrete,In_Type 0200 7001 |p | Jump_Nonzero 0x202 0201 0801 | | Execute_Immediate Raise,0x1 0202 4800 |H | Short_Literal 0x0 0203 e019 | | Load 0x0,0x19 0204 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0205 e2a2 | | Load 0x1,0xa2 0206 6815 |h | Jump_Zero 0x21c 0207 e286 | | Load 0x1,0x86 0208 4801 |H | Short_Literal 0x1 0209 0279 | y | Execute Discrete,And 020a 0f01 | | Execute_Immediate Equal,0x1 020b 6808 |h | Jump_Zero 0x214 020c e29f | | Load 0x1,0x9f 020d 6803 |h | Jump_Zero 0x211 020e e299 | | Load 0x1,0x99 020f a402 | | Store_Unchecked 0x2,0x2 0210 7817 |x | Jump 0x228 0211 e295 | | Load 0x1,0x95 0212 a402 | | Store_Unchecked 0x2,0x2 0213 7814 |x | Jump 0x228 0214 e29e | | Load 0x1,0x9e 0215 6803 |h | Jump_Zero 0x219 0216 e298 | | Load 0x1,0x98 0217 a402 | | Store_Unchecked 0x2,0x2 0218 780f |x | Jump 0x228 0219 e295 | | Load 0x1,0x95 021a a402 | | Store_Unchecked 0x2,0x2 021b 780c |x | Jump 0x228 021c e29b | | Load 0x1,0x9b 021d 6803 |h | Jump_Zero 0x221 021e e295 | | Load 0x1,0x95 021f a402 | | Store_Unchecked 0x2,0x2 0220 7807 |x | Jump 0x228 0221 e29f | | Load 0x1,0x9f 0222 6803 |h | Jump_Zero 0x226 0223 e299 | | Load 0x1,0x99 0224 a402 | | Store_Unchecked 0x2,0x2 0225 7802 |x | Jump 0x228 0226 e298 | | Load 0x1,0x98 0227 a402 | | Store_Unchecked 0x2,0x2 0228 e402 | | Load 0x2,0x2 0229 e009 | | Load 0x0,0x9 022a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 022b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 022c 0c01 | | Execute_Immediate Greater_Equal,0x1 022d 6803 |h | Jump_Zero 0x231 022e e402 | | Load 0x2,0x2 022f e065 | e | Load 0x0,0x65 0230 180f | | Execute Package,Field_Execute,Field_Number 0xf 0231 4801 |H | Short_Literal 0x1 0232 4800 |H | Short_Literal 0x0 0233 4800 |H | Short_Literal 0x0 0234 8218 | | Call 0x1,0x18 0235 483a |H: | Short_Literal 0x3a 0236 8226 | & | Call 0x1,0x26 0237 00d8 | | Load_Top At_Offset_0 0238 a2db | | Store_Unchecked 0x1,0xdb 0239 4502 |E | Exit_Suprogram New_Top_Offset 0x2 023a 0000 0000 | | .XXX[0x2] 023c 0000 0000 | | .LITERAL {0x00000000, 0x00008ca0} 0240 ffff ffff | | .LITERAL {0xffffffff, 0xffffa240} 0244 0000 0000 | | .BLANK 0000[0x4] 0248 ; -------------------------------------------------------------------------------------- 0248 ; Debug Table 0248 ; -------------------------------------------------------------------------------------- 0248 0004 000f | | .DEBUG4 0x0004,0x000f,0x47f5,0x0000,0x0001,0x0000 024e 3d7d 1925 |=} %| .XXX[0x1d] 0250 3114 5c00 |1 \ | 0252 3d4d 5105 |=MQ | 0254 3911 0549 |9 I| 0256 10b9 4d51 | MQ| 0258 4925 391c |I%9 | 025a 2c00 01fa |, | 025c 408c 0019 |@ | 025e 3115 391d |1 9 | 0260 5120 5c00 |Q \ | 0262 414d 5105 |AMQ | 0264 3911 0549 |9 I| 0266 10b9 3905 | 9 | 0268 5155 4905 |QUI | 026a 3020 |0 | 026b 0000 0000 | | .BLANK 0000[0x4] 026f 3dfa 408c |= @ | .XXX[0xe0] 0271 0039 1125 | 9 %| 0273 4d41 3105 |MA1 | 0275 657d 554d |e}UM| 0277 5105 0d2c |Q ,| 0279 5c00 414d |\ AM| 027b 5105 3911 |Q 9 | 027d 0549 10b9 | I | 027f 093d 3d31 | ==1| 0281 1505 3858 | 8X| 0283 0055 4d51 | UMQ| 0285 0539 1105 | 9 | 0287 4910 b909 |I | 0289 3d3d 3115 |==1 | 028b 0538 b951 | 8 Q| 028d 4955 15fa |IU | 028f 408c 0039 |@ 9| 0291 4149 3d11 |AI= | 0293 550d 157d |U }| 0295 3105 0915 |1 | 0297 314c 5c00 |1L\ | 0299 414d 5105 |AMQ | 029b 3911 0549 |9 I| 029d 10b9 093d | =| 029f 3d31 1505 |=1 | 02a1 3858 0055 |8X U| 02a3 4d51 0539 |MQ 9| 02a5 1105 4910 | I | 02a7 b909 3d3d | ==| 02a9 3115 0538 |1 8| 02ab b951 4955 | QIU| 02ad 15fa 408c | @ | 02af 0025 554d | %UM| 02b1 2539 1d7d |%9 }| 02b3 3505 405c |5 @\| 02b5 003d 4d51 | =MQ| 02b7 0539 1105 | 9 | 02b9 4910 b94d |I M| 02bb 5149 2539 |QI%9| 02bd 1c2c 0002 | , | 02bf 005c 0035 | \ 5| 02c1 5149 050d |QI | 02c3 14b9 1561 | a| 02c5 5149 050d |QI | 02c7 5000 0000 |P | 02c9 0400 2400 | $ | 02cb 1551 4905 | QI | 02cd 0d14 f9f0 | | 02cf 0000 0010 | | 02d1 0178 003d | x =| 02d3 5149 050d |QI | 02d5 14b9 3105 | 1 | 02d7 0915 317d | 1}| 02d9 193d 48f5 | =H | 02db ee51 fa40 | Q @| 02dd 8c00 1d05 | | 02df 1111 4915 | I | 02e1 4d4c 5c00 |ML\ | 02e3 414d 5105 |AMQ | 02e5 3911 0549 |9 I| 02e7 10b9 2539 | %9| 02e9 5115 1d15 |Q | 02eb 4801 fa40 |H @| 02ed 8c00 2555 | %U| 02ef 4d25 391d |M%9 | 02f1 7d35 0540 |}5 @| 02f3 5c00 3d4d |\ =M| 02f5 5105 3911 |Q 9 | 02f7 0549 10b9 | I | 02f9 4d51 4925 |MQI%| 02fb 391c 2c00 |9 , | 02fd 1934 c8c0 | 4 | 02ff dd7c d000 | | | 0301 0000 0008 | | 0303 04fc 0035 | 5| 0305 5149 050d |QI | 0307 14b9 1561 | a| 0309 5149 050d |QI | 030b 50f5 ee51 |P Q| 030d fa40 8c00 | @ | 030f 8919 493d | I=| 0311 357d 4d05 |5}M | 0313 5915 117d |Y }| 0315 4d51 0551 |MQ Q| 0317 157d 1925 | } %| 0319 3115 7d25 |1 }%| 031b 397d 1125 |9} %| 031d 4915 0d51 |I Q| 031f 3d49 645c |=Id\| 0321 003d 4d51 | =MQ| 0323 0539 1105 | 9 | 0325 4910 b94d |I M| 0327 5149 2539 |QI%9| 0329 1c2c 0004 | , | 032b 91fa 408c | @ | 032d 0025 2539 | %%9| 032f 513d 7d19 |Q=} | 0331 2531 145c |%1 \| 0333 003d 4d51 | =MQ| 0335 0539 1105 | 9 | 0337 4910 b94d |I M| 0339 5149 2539 |QI%9| 033b 1c2c 0015 | , | 033d d1c9 858d | | 033f 95fa 408c | @ | 0341 0019 3115 | 1 | 0343 391d 5120 |9 Q | 0345 5c00 414d |\ AM| 0347 5105 3911 |Q 9 | 0349 0549 10b9 | I | 034b 3905 5155 |9 QU| 034d 4905 3020 |I 0 | 034f 0000 0000 | | .BLANK 0000[0x4] 0353 01fa 408c | @ | .XXX[0xa2] 0355 0039 1125 | 9 %| 0357 4d41 3105 |MA1 | 0359 657d 554d |e}UM| 035b 5105 0d2c |Q ,| 035d 5c00 414d |\ AM| 035f 5105 3911 |Q 9 | 0361 0549 10b9 | I | 0363 093d 3d31 | ==1| 0365 1505 3858 | 8X| 0367 0055 4d51 | UMQ| 0369 0539 1105 | 9 | 036b 4910 b909 |I | 036d 3d3d 3115 |==1 | 036f 0538 b951 | 8 Q| 0371 4955 15fa |IU | 0373 408c 0039 |@ 9| 0375 4149 3d11 |AI= | 0377 550d 157d |U }| 0379 3105 0915 |1 | 037b 314c 5c00 |1L\ | 037d 414d 5105 |AMQ | 037f 3911 0549 |9 I| 0381 10b9 093d | =| 0383 3d31 1505 |=1 | 0385 3858 0055 |8X U| 0387 4d51 0539 |MQ 9| 0389 1105 4910 | I | 038b b909 3d3d | ==| 038d 3115 0538 |1 8| 038f b951 4955 | QIU| 0391 15fa 408c | @ | 0393 0025 554d | %UM| 0395 2539 1d7d |%9 }| 0397 3505 405c |5 @\| 0399 003d 4d51 | =MQ| 039b 0539 1105 | 9 | 039d 4910 b94d |I M| 039f 5149 2539 |QI%9| 03a1 1c2c 0000 | , | 03a3 0008 0000 | | 03a5 0928 0035 | ( 5| 03a7 5149 050d |QI | 03a9 157d 1561 | } a| 03ab 0535 2539 | 5%9| 03ad 1408 0000 | | 03af 0008 009c | | 03b1 0000 0008 | | 03b3 001d ad5c | \| 03b5 0234 0014 | 4 | 03b7 0000 0008 | | 03b9 03fc 0035 | 5| 03bb 5149 050d |QI | 03bd 157d 1561 | } a| 03bf 0535 2539 | 5%9| 03c1 14f5 ee51 | Q| 03c3 fa40 8c00 | @ | 03c5 354d 5105 |5MQ | 03c7 5115 7d41 |Q }A| 03c9 3d25 3951 |=%9Q| 03cb 1548 5c00 | H\ | 03cd 3111 0551 |1 Q| 03cf 057d 413d | }A=| 03d1 2539 5115 |%9Q | 03d3 4801 fa40 |H @| 03d5 8c00 2525 | %%| 03d7 3951 3d7d |9Q=}| 03d9 1925 3114 | %1 | 03db 5c00 3d4d |\ =M| 03dd 5105 3911 |Q 9 | 03df 0549 10b9 | I | 03e1 4d51 4925 |MQI%| 03e3 391c 2c00 |9 , | 03e5 01fa 408c | @ | 03e7 0019 3115 | 1 | 03e9 391d 5120 |9 Q | 03eb 5c00 414d |\ AM| 03ed 5105 3911 |Q 9 | 03ef 0549 10b9 | I | 03f1 3905 5155 |9 QU| 03f3 4905 3020 |I 0 | 03f5 0000 0000 | | .BLANK 0000[0x4] 03f9 3dfa 408c |= @ | .XXX[0x7] 03fb 0039 1125 | 9 %| 03fd 4d41 3105 |MA1 | 03ff 657d |e} |