|
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 0000 0000 | | .BLANK 0000[0x1b2]