|
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: 4096 (0x1000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_19c0d9
└─⟦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 0520 | | .CONST 0x0520 ; 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 0003 | | .CONST 0x0003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 005c | \ | .CONST 0x005c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0084 | | .CONST 0x0084 ; Number of locals 000b INIT_0008: 000b 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 4801 |H | Short_Literal 0x1 000f 481e |H | Short_Literal 0x1e 0010 00e1 | | Load_Encached Boolean_Cache 0011 02a0 | | Declare_Subprogram Null_Subprogram 0012 4801 |H | Short_Literal 0x1 0013 035d | ] | Declare_Type Array,Defined 0014 4801 |H | Short_Literal 0x1 0015 481e |H | Short_Literal 0x1e 0016 00e3 | | Load_Encached Natural_Cache 0017 02a0 | | Declare_Subprogram Null_Subprogram 0018 4801 |H | Short_Literal 0x1 0019 035d | ] | Declare_Type Array,Defined 001a 00d8 | | Load_Top At_Offset_0 001b 00e3 | | Load_Encached Natural_Cache 001c 029f 00a3 | | Declare_Subprogram INIT_00a0,For_Call 001e 4802 |H | Short_Literal 0x2 001f 032d | - | Declare_Type Record,Defined 0020 00d8 | | Load_Top At_Offset_0 0021 0322 | " | Declare_Variable Record 0022 00d8 | | Load_Top At_Offset_0 0023 1c00 | | Execute_Immediate Run_Utility,0x0 0024 00db | | Load_Top At_Offset_3 0025 0337 | 7 | Declare_Variable Array 0026 e001 | | Load 0x0,0x1 0027 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0028 e001 | | Load 0x0,0x1 0029 1b20 | | Execute Package,Field_Read,Field_Number 0x20 002a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002b 02ff | | Declare_Variable Variant_Record 002c 00d8 | | Load_Top At_Offset_0 002d 1c00 | | Execute_Immediate Run_Utility,0x0 002e e001 | | Load 0x0,0x1 002f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0030 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0031 02ff | | Declare_Variable Variant_Record 0032 00d8 | | Load_Top At_Offset_0 0033 1c00 | | Execute_Immediate Run_Utility,0x0 0034 029d 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call 0036 029d 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call 0038 029d 029b | | Declare_Subprogram INIT_0298,For_Outer_Call 003a 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call 003c 029d 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call 003e 029b 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Unelaborated 0040 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a 0041 00c7 | | Action Elaborate_Subprogram 0042 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a 0043 00c6 | | Action Check_Subprogram_Elaborated 0044 1d78 | x | Execute_Immediate Reference_Lex_1,0x78 0045 0092 0508 | | Action Push_String_Extended,0x508 ; " LRU " 0047 e001 | | Load 0x0,0x1 0048 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0049 01c7 | | Execute Vector,Convert 004a e002 | | Load 0x0,0x2 004b e003 | | Load 0x0,0x3 004c 4800 |H | Short_Literal 0x0 004d 0007 | | Action Break_Optional 004e 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a 004f 00c6 | | Action Check_Subprogram_Elaborated 0050 1d79 | y | Execute_Immediate Reference_Lex_1,0x79 0051 0092 0509 | | Action Push_String_Extended,0x509 ; "FIRST" 0053 e001 | | Load 0x0,0x1 0054 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0055 01c7 | | Execute Vector,Convert 0056 e004 | | Load 0x0,0x4 0057 e005 | | Load 0x0,0x5 0058 4800 |H | Short_Literal 0x0 0059 0007 | | Action Break_Optional 005a 1d6c | l | Execute_Immediate Reference_Lex_1,0x6c 005b 00c7 | | Action Elaborate_Subprogram 005c BODY_0008: 005c e20f | | Load 0x1,0xf 005d e006 | | Load 0x0,0x6 005e 180f | | Execute Package,Field_Execute,Field_Number 0xf 005f c272 | r | Store 0x1,0x72 0060 e268 | h | Load 0x1,0x68 0061 e265 | e | Load 0x1,0x65 0062 e262 | b | Load 0x1,0x62 0063 e25f | _ | Load 0x1,0x5f 0064 e25c | \ | Load 0x1,0x5c 0065 e259 | Y | Load 0x1,0x59 0066 e256 | V | Load 0x1,0x56 0067 e253 | S | Load 0x1,0x53 0068 e250 | P | Load 0x1,0x50 0069 e24d | M | Load 0x1,0x4d 006a e24a | J | Load 0x1,0x4a 006b e247 | G | Load 0x1,0x47 006c e244 | D | Load 0x1,0x44 006d e241 | A | Load 0x1,0x41 006e e23e | > | Load 0x1,0x3e 006f e23b | ; | Load 0x1,0x3b 0070 e238 | 8 | Load 0x1,0x38 0071 e235 | 5 | Load 0x1,0x35 0072 e232 | 2 | Load 0x1,0x32 0073 e22f | / | Load 0x1,0x2f 0074 e22c | , | Load 0x1,0x2c 0075 e229 | ) | Load 0x1,0x29 0076 e226 | & | Load 0x1,0x26 0077 e223 | # | Load 0x1,0x23 0078 e220 | | Load 0x1,0x20 0079 e21d | | Load 0x1,0x1d 007a e21a | | Load 0x1,0x1a 007b e217 | | Load 0x1,0x17 007c e214 | | Load 0x1,0x14 007d e211 | | Load 0x1,0x11 007e e20f | | Load 0x1,0xf 007f e272 | r | Load 0x1,0x72 0080 e001 | | Load 0x0,0x1 0081 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0082 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0083 00bc | | Action Signal_Activated 0084 00bb | | Action Signal_Completion 0085 0000 0000 | | .XXX[0x3] 0087 0000 | | 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b e210 | | Load 0x1,0x10 008c 0f02 | | Execute_Immediate Equal,0x2 008d 6806 |h | Jump_Zero 0x94 008e 00da | | Load_Top At_Offset_2 008f 1d7b | { | Execute_Immediate Reference_Lex_1,0x7b 0090 e27c | | | Load 0x1,0x7c 0091 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d 0092 827a | z | Call 0x1,0x7a 0093 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0094 00da | | Load_Top At_Offset_2 0095 1d80 | | Execute_Immediate Reference_Lex_1,0x80 0096 e281 | | Load 0x1,0x81 0097 1d82 | | Execute_Immediate Reference_Lex_1,0x82 0098 827a | z | Call 0x1,0x7a 0099 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 009a 0000 0000 | | .BLANK 0000[0x6] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 4608 |F | Jump_Case 0x9 00a4 7808 |x | Jump 0xad ; case 0x0 00a5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 00a6 781b |x | Jump 0xc2 ; case 0x2 00a7 781a |x | Jump 0xc2 ; case 0x3 00a8 7819 |x | Jump 0xc2 ; case 0x4 00a9 7818 |x | Jump 0xc2 ; case 0x5 00aa 7817 |x | Jump 0xc2 ; case 0x6 00ab 7816 |x | Jump 0xc2 ; case 0x7 00ac 7815 |x | Jump 0xc2 ; case 0x8 00ad e26f | o | Load 0x1,0x6f 00ae 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 00af 0337 | 7 | Declare_Variable Array 00b0 481e |H | Short_Literal 0x1e 00b1 4801 |H | Short_Literal 0x1 00b2 4800 |H | Short_Literal 0x0 00b3 00d9 | | Load_Top At_Offset_1 00b4 e402 | | Load 0x2,0x2 00b5 01d6 | | Execute Vector,Field_Write 00b6 3ffb |? | Loop_Increasing 0xb2 00b7 00db | | Load_Top At_Offset_3 00b8 00d9 | | Load_Top At_Offset_1 00b9 00d9 | | Load_Top At_Offset_1 00ba 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 00bb 0119 | | Execute Any,Check_In_Formal_Type 00bc 00d1 | | Pop_Control Pop_Count_1 00bd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00be 4800 |H | Short_Literal 0x0 00bf 00db | | Load_Top At_Offset_3 00c0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00c1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 00c2 0869 | i | Execute_Immediate Raise,0x69 00c3 0000 0000 | | .BLANK 0000[0x5] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb 00cf | | Action Mark_Auxiliary 00cc 481e |H | Short_Literal 0x1e 00cd 4801 |H | Short_Literal 0x1 00ce 0007 | | Action Break_Optional 00cf 4800 |H | Short_Literal 0x0 00d0 00d9 | | Load_Top At_Offset_1 00d1 e270 | p | Load 0x1,0x70 00d2 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 00d3 01d6 | | Execute Vector,Field_Write 00d4 00c8 | | Action Pop_Auxiliary_Range 00d5 3ff9 |? | Loop_Increasing 0xcf 00d6 00ce | | Action Pop_Auxiliary 00d7 4800 |H | Short_Literal 0x0 00d8 e270 | p | Load 0x1,0x70 00d9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00da 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00db 0000 0000 | | .BLANK 0000[0x5] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e4 | | .CONST 0x00e4 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0002 | | .CONST 0x0002 ; Number of locals 00e3 INIT_00e0: 00e3 00e1 | | Load_Encached Boolean_Cache 00e4 BODY_00e0: 00e4 00db | | Load_Top At_Offset_3 00e5 e001 | | Load 0x0,0x1 00e6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00e7 00d9 | | Load_Top At_Offset_1 00e8 00d0 | | Action Swap_Control 00e9 0260 | ` | Execute Discrete,In_Type 00ea 7001 |p | Jump_Nonzero 0xec 00eb 0801 | | Execute_Immediate Raise,0x1 00ec e20f | | Load 0x1,0xf 00ed e001 | | Load 0x0,0x1 00ee 1b22 | " | Execute Package,Field_Read,Field_Number 0x22 00ef 180d | | Execute Package,Field_Execute,Field_Number 0xd 00f0 7082 |p | Jump_Nonzero 0x173 00f1 00db | | Load_Top At_Offset_3 00f2 00d8 | | Load_Top At_Offset_0 00f3 0c1f | | Execute_Immediate Greater_Equal,0x1f 00f4 7023 |p# | Jump_Nonzero 0x118 00f5 461e |F | Jump_Case 0x1f 00f6 7822 |x" | Jump 0x119 ; case 0x0 00f7 7824 |x$ | Jump 0x11c ; case 0x1 00f8 7826 |x& | Jump 0x11f ; case 0x2 00f9 7828 |x( | Jump 0x122 ; case 0x3 00fa 782a |x* | Jump 0x125 ; case 0x4 00fb 782c |x, | Jump 0x128 ; case 0x5 00fc 782e |x. | Jump 0x12b ; case 0x6 00fd 7830 |x0 | Jump 0x12e ; case 0x7 00fe 7832 |x2 | Jump 0x131 ; case 0x8 00ff 7834 |x4 | Jump 0x134 ; case 0x9 0100 7836 |x6 | Jump 0x137 ; case 0xa 0101 7838 |x8 | Jump 0x13a ; case 0xb 0102 783a |x: | Jump 0x13d ; case 0xc 0103 783c |x< | Jump 0x140 ; case 0xd 0104 783e |x> | Jump 0x143 ; case 0xe 0105 7840 |x@ | Jump 0x146 ; case 0xf 0106 7842 |xB | Jump 0x149 ; case 0x10 0107 7844 |xD | Jump 0x14c ; case 0x11 0108 7846 |xF | Jump 0x14f ; case 0x12 0109 7848 |xH | Jump 0x152 ; case 0x13 010a 784a |xJ | Jump 0x155 ; case 0x14 010b 784c |xL | Jump 0x158 ; case 0x15 010c 784e |xN | Jump 0x15b ; case 0x16 010d 7850 |xP | Jump 0x15e ; case 0x17 010e 7852 |xR | Jump 0x161 ; case 0x18 010f 7854 |xT | Jump 0x164 ; case 0x19 0110 7856 |xV | Jump 0x167 ; case 0x1a 0111 7858 |xX | Jump 0x16a ; case 0x1b 0112 785a |xZ | Jump 0x16d ; case 0x1c 0113 785c |x\ | Jump 0x170 ; case 0x1d 0114 7800 |x | Jump 0x115 ; case 0x1e 0115 8269 | i | Call 0x1,0x69 0116 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0117 785d |x] | Jump 0x175 0118 00d1 | | Pop_Control Pop_Count_1 0119 4800 |H | Short_Literal 0x0 011a 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 011b 7859 |xY | Jump 0x175 011c 8212 | | Call 0x1,0x12 011d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 011e 7856 |xV | Jump 0x175 011f 8215 | | Call 0x1,0x15 0120 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0121 7853 |xS | Jump 0x175 0122 8218 | | Call 0x1,0x18 0123 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0124 7850 |xP | Jump 0x175 0125 821b | | Call 0x1,0x1b 0126 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0127 784d |xM | Jump 0x175 0128 821e | | Call 0x1,0x1e 0129 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 012a 784a |xJ | Jump 0x175 012b 8221 | ! | Call 0x1,0x21 012c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 012d 7847 |xG | Jump 0x175 012e 8224 | $ | Call 0x1,0x24 012f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0130 7844 |xD | Jump 0x175 0131 8227 | ' | Call 0x1,0x27 0132 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0133 7841 |xA | Jump 0x175 0134 822a | * | Call 0x1,0x2a 0135 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0136 783e |x> | Jump 0x175 0137 822d | - | Call 0x1,0x2d 0138 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0139 783b |x; | Jump 0x175 013a 8230 | 0 | Call 0x1,0x30 013b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 013c 7838 |x8 | Jump 0x175 013d 8233 | 3 | Call 0x1,0x33 013e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 013f 7835 |x5 | Jump 0x175 0140 8236 | 6 | Call 0x1,0x36 0141 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0142 7832 |x2 | Jump 0x175 0143 8239 | 9 | Call 0x1,0x39 0144 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0145 782f |x/ | Jump 0x175 0146 823c | < | Call 0x1,0x3c 0147 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0148 782c |x, | Jump 0x175 0149 823f | ? | Call 0x1,0x3f 014a 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 014b 7829 |x) | Jump 0x175 014c 8242 | B | Call 0x1,0x42 014d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 014e 7826 |x& | Jump 0x175 014f 8245 | E | Call 0x1,0x45 0150 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0151 7823 |x# | Jump 0x175 0152 8248 | H | Call 0x1,0x48 0153 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0154 7820 |x | Jump 0x175 0155 824b | K | Call 0x1,0x4b 0156 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0157 781d |x | Jump 0x175 0158 824e | N | Call 0x1,0x4e 0159 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 015a 781a |x | Jump 0x175 015b 8251 | Q | Call 0x1,0x51 015c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 015d 7817 |x | Jump 0x175 015e 8254 | T | Call 0x1,0x54 015f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0160 7814 |x | Jump 0x175 0161 8257 | W | Call 0x1,0x57 0162 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0163 7811 |x | Jump 0x175 0164 825a | Z | Call 0x1,0x5a 0165 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0166 780e |x | Jump 0x175 0167 825d | ] | Call 0x1,0x5d 0168 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0169 780b |x | Jump 0x175 016a 8260 | ` | Call 0x1,0x60 016b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 016c 7808 |x | Jump 0x175 016d 8263 | c | Call 0x1,0x63 016e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 016f 7805 |x | Jump 0x175 0170 8266 | f | Call 0x1,0x66 0171 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0172 7802 |x | Jump 0x175 0173 4800 |H | Short_Literal 0x0 0174 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0175 4804 |H | Short_Literal 0x4 0176 e001 | | Load 0x0,0x1 0177 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0178 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0179 6915 |i | Jump_Zero 0x28f 017a 00db | | Load_Top At_Offset_3 017b 00d8 | | Load_Top At_Offset_0 017c 0c1f | | Execute_Immediate Greater_Equal,0x1f 017d 7028 |p( | Jump_Nonzero 0x1a6 017e 461e |F | Jump_Case 0x1f 017f 790f |y | Jump 0x28f ; case 0x0 0180 7907 |y | Jump 0x288 ; case 0x1 0181 7826 |x& | Jump 0x1a8 ; case 0x2 0182 782d |x- | Jump 0x1b0 ; case 0x3 0183 7834 |x4 | Jump 0x1b8 ; case 0x4 0184 783b |x; | Jump 0x1c0 ; case 0x5 0185 7842 |xB | Jump 0x1c8 ; case 0x6 0186 7849 |xI | Jump 0x1d0 ; case 0x7 0187 7850 |xP | Jump 0x1d8 ; case 0x8 0188 7857 |xW | Jump 0x1e0 ; case 0x9 0189 785e |x^ | Jump 0x1e8 ; case 0xa 018a 7865 |xe | Jump 0x1f0 ; case 0xb 018b 786c |xl | Jump 0x1f8 ; case 0xc 018c 7873 |xs | Jump 0x200 ; case 0xd 018d 787a |xz | Jump 0x208 ; case 0xe 018e 7881 |x | Jump 0x210 ; case 0xf 018f 7888 |x | Jump 0x218 ; case 0x10 0190 788f |x | Jump 0x220 ; case 0x11 0191 7896 |x | Jump 0x228 ; case 0x12 0192 789d |x | Jump 0x230 ; case 0x13 0193 78a4 |x | Jump 0x238 ; case 0x14 0194 78ab |x | Jump 0x240 ; case 0x15 0195 78b2 |x | Jump 0x248 ; case 0x16 0196 78b9 |x | Jump 0x250 ; case 0x17 0197 78c0 |x | Jump 0x258 ; case 0x18 0198 78c7 |x | Jump 0x260 ; case 0x19 0199 78ce |x | Jump 0x268 ; case 0x1a 019a 78d5 |x | Jump 0x270 ; case 0x1b 019b 78dc |x | Jump 0x278 ; case 0x1c 019c 78e3 |x | Jump 0x280 ; case 0x1d 019d 7800 |x | Jump 0x19e ; case 0x1e 019e e274 | t | Load 0x1,0x74 019f 00d9 | | Load_Top At_Offset_1 01a0 481e |H | Short_Literal 0x1e 01a1 e268 | h | Load 0x1,0x68 01a2 e001 | | Load 0x0,0x1 01a3 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01a4 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01a5 78e9 |x | Jump 0x28f 01a6 00d1 | | Pop_Control Pop_Count_1 01a7 78e7 |x | Jump 0x28f 01a8 e274 | t | Load 0x1,0x74 01a9 00d9 | | Load_Top At_Offset_1 01aa 4802 |H | Short_Literal 0x2 01ab e214 | | Load 0x1,0x14 01ac e001 | | Load 0x0,0x1 01ad 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01ae 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01af 78df |x | Jump 0x28f 01b0 e274 | t | Load 0x1,0x74 01b1 00d9 | | Load_Top At_Offset_1 01b2 4803 |H | Short_Literal 0x3 01b3 e217 | | Load 0x1,0x17 01b4 e001 | | Load 0x0,0x1 01b5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01b6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01b7 78d7 |x | Jump 0x28f 01b8 e274 | t | Load 0x1,0x74 01b9 00d9 | | Load_Top At_Offset_1 01ba 4804 |H | Short_Literal 0x4 01bb e21a | | Load 0x1,0x1a 01bc e001 | | Load 0x0,0x1 01bd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01be 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01bf 78cf |x | Jump 0x28f 01c0 e274 | t | Load 0x1,0x74 01c1 00d9 | | Load_Top At_Offset_1 01c2 4805 |H | Short_Literal 0x5 01c3 e21d | | Load 0x1,0x1d 01c4 e001 | | Load 0x0,0x1 01c5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01c6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01c7 78c7 |x | Jump 0x28f 01c8 e274 | t | Load 0x1,0x74 01c9 00d9 | | Load_Top At_Offset_1 01ca 4806 |H | Short_Literal 0x6 01cb e220 | | Load 0x1,0x20 01cc e001 | | Load 0x0,0x1 01cd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01ce 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01cf 78bf |x | Jump 0x28f 01d0 e274 | t | Load 0x1,0x74 01d1 00d9 | | Load_Top At_Offset_1 01d2 4807 |H | Short_Literal 0x7 01d3 e223 | # | Load 0x1,0x23 01d4 e001 | | Load 0x0,0x1 01d5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01d6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01d7 78b7 |x | Jump 0x28f 01d8 e274 | t | Load 0x1,0x74 01d9 00d9 | | Load_Top At_Offset_1 01da 4808 |H | Short_Literal 0x8 01db e226 | & | Load 0x1,0x26 01dc e001 | | Load 0x0,0x1 01dd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01de 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01df 78af |x | Jump 0x28f 01e0 e274 | t | Load 0x1,0x74 01e1 00d9 | | Load_Top At_Offset_1 01e2 4809 |H | Short_Literal 0x9 01e3 e229 | ) | Load 0x1,0x29 01e4 e001 | | Load 0x0,0x1 01e5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01e6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01e7 78a7 |x | Jump 0x28f 01e8 e274 | t | Load 0x1,0x74 01e9 00d9 | | Load_Top At_Offset_1 01ea 480a |H | Short_Literal 0xa 01eb e22c | , | Load 0x1,0x2c 01ec e001 | | Load 0x0,0x1 01ed 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01ee 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01ef 789f |x | Jump 0x28f 01f0 e274 | t | Load 0x1,0x74 01f1 00d9 | | Load_Top At_Offset_1 01f2 480b |H | Short_Literal 0xb 01f3 e22f | / | Load 0x1,0x2f 01f4 e001 | | Load 0x0,0x1 01f5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01f6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01f7 7897 |x | Jump 0x28f 01f8 e274 | t | Load 0x1,0x74 01f9 00d9 | | Load_Top At_Offset_1 01fa 480c |H | Short_Literal 0xc 01fb e232 | 2 | Load 0x1,0x32 01fc e001 | | Load 0x0,0x1 01fd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01fe 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01ff 788f |x | Jump 0x28f 0200 e274 | t | Load 0x1,0x74 0201 00d9 | | Load_Top At_Offset_1 0202 480d |H | Short_Literal 0xd 0203 e235 | 5 | Load 0x1,0x35 0204 e001 | | Load 0x0,0x1 0205 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0206 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0207 7887 |x | Jump 0x28f 0208 e274 | t | Load 0x1,0x74 0209 00d9 | | Load_Top At_Offset_1 020a 480e |H | Short_Literal 0xe 020b e238 | 8 | Load 0x1,0x38 020c e001 | | Load 0x0,0x1 020d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 020e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 020f 787f |x | Jump 0x28f 0210 e274 | t | Load 0x1,0x74 0211 00d9 | | Load_Top At_Offset_1 0212 480f |H | Short_Literal 0xf 0213 e23b | ; | Load 0x1,0x3b 0214 e001 | | Load 0x0,0x1 0215 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0216 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0217 7877 |xw | Jump 0x28f 0218 e274 | t | Load 0x1,0x74 0219 00d9 | | Load_Top At_Offset_1 021a 4810 |H | Short_Literal 0x10 021b e23e | > | Load 0x1,0x3e 021c e001 | | Load 0x0,0x1 021d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 021e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 021f 786f |xo | Jump 0x28f 0220 e274 | t | Load 0x1,0x74 0221 00d9 | | Load_Top At_Offset_1 0222 4811 |H | Short_Literal 0x11 0223 e241 | A | Load 0x1,0x41 0224 e001 | | Load 0x0,0x1 0225 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0226 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0227 7867 |xg | Jump 0x28f 0228 e274 | t | Load 0x1,0x74 0229 00d9 | | Load_Top At_Offset_1 022a 4812 |H | Short_Literal 0x12 022b e244 | D | Load 0x1,0x44 022c e001 | | Load 0x0,0x1 022d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 022e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 022f 785f |x_ | Jump 0x28f 0230 e274 | t | Load 0x1,0x74 0231 00d9 | | Load_Top At_Offset_1 0232 4813 |H | Short_Literal 0x13 0233 e247 | G | Load 0x1,0x47 0234 e001 | | Load 0x0,0x1 0235 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0236 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0237 7857 |xW | Jump 0x28f 0238 e274 | t | Load 0x1,0x74 0239 00d9 | | Load_Top At_Offset_1 023a 4814 |H | Short_Literal 0x14 023b e24a | J | Load 0x1,0x4a 023c e001 | | Load 0x0,0x1 023d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 023e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 023f 784f |xO | Jump 0x28f 0240 e274 | t | Load 0x1,0x74 0241 00d9 | | Load_Top At_Offset_1 0242 4815 |H | Short_Literal 0x15 0243 e24d | M | Load 0x1,0x4d 0244 e001 | | Load 0x0,0x1 0245 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0246 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0247 7847 |xG | Jump 0x28f 0248 e274 | t | Load 0x1,0x74 0249 00d9 | | Load_Top At_Offset_1 024a 4816 |H | Short_Literal 0x16 024b e250 | P | Load 0x1,0x50 024c e001 | | Load 0x0,0x1 024d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 024e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 024f 783f |x? | Jump 0x28f 0250 e274 | t | Load 0x1,0x74 0251 00d9 | | Load_Top At_Offset_1 0252 4817 |H | Short_Literal 0x17 0253 e253 | S | Load 0x1,0x53 0254 e001 | | Load 0x0,0x1 0255 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0256 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0257 7837 |x7 | Jump 0x28f 0258 e274 | t | Load 0x1,0x74 0259 00d9 | | Load_Top At_Offset_1 025a 4818 |H | Short_Literal 0x18 025b e256 | V | Load 0x1,0x56 025c e001 | | Load 0x0,0x1 025d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 025e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 025f 782f |x/ | Jump 0x28f 0260 e274 | t | Load 0x1,0x74 0261 00d9 | | Load_Top At_Offset_1 0262 4819 |H | Short_Literal 0x19 0263 e259 | Y | Load 0x1,0x59 0264 e001 | | Load 0x0,0x1 0265 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0266 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0267 7827 |x' | Jump 0x28f 0268 e274 | t | Load 0x1,0x74 0269 00d9 | | Load_Top At_Offset_1 026a 481a |H | Short_Literal 0x1a 026b e25c | \ | Load 0x1,0x5c 026c e001 | | Load 0x0,0x1 026d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 026e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 026f 781f |x | Jump 0x28f 0270 e274 | t | Load 0x1,0x74 0271 00d9 | | Load_Top At_Offset_1 0272 481b |H | Short_Literal 0x1b 0273 e25f | _ | Load 0x1,0x5f 0274 e001 | | Load 0x0,0x1 0275 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0276 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0277 7817 |x | Jump 0x28f 0278 e274 | t | Load 0x1,0x74 0279 00d9 | | Load_Top At_Offset_1 027a 481c |H | Short_Literal 0x1c 027b e262 | b | Load 0x1,0x62 027c e001 | | Load 0x0,0x1 027d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 027e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 027f 780f |x | Jump 0x28f 0280 e274 | t | Load 0x1,0x74 0281 00d9 | | Load_Top At_Offset_1 0282 481d |H | Short_Literal 0x1d 0283 e265 | e | Load 0x1,0x65 0284 e001 | | Load 0x0,0x1 0285 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0286 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0287 7807 |x | Jump 0x28f 0288 e274 | t | Load 0x1,0x74 0289 00d9 | | Load_Top At_Offset_1 028a 4801 |H | Short_Literal 0x1 028b e211 | | Load 0x1,0x11 028c e001 | | Load 0x0,0x1 028d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 028e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 028f 00d8 | | Load_Top At_Offset_0 0290 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0291 0000 0000 | | .BLANK 0000[0x7] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 029b | | .CONST 0x029b ; Address of begin 0299 0004 | | .CONST 0x0004 ; Address of exception handler 029a 0001 | | .CONST 0x0001 ; Number of locals 029b BODY_0298: 029b INIT_0298: 029b 00da | | Load_Top At_Offset_2 029c 00d8 | | Load_Top At_Offset_0 029d 0c1f | | Execute_Immediate Greater_Equal,0x1f 029e 7022 |p" | Jump_Nonzero 0x2c1 029f 461e |F | Jump_Case 0x1f 02a0 785b |x[ | Jump 0x2fc ; case 0x0 02a1 7859 |xY | Jump 0x2fb ; case 0x1 02a2 7820 |x | Jump 0x2c3 ; case 0x2 02a3 7821 |x! | Jump 0x2c5 ; case 0x3 02a4 7822 |x" | Jump 0x2c7 ; case 0x4 02a5 7823 |x# | Jump 0x2c9 ; case 0x5 02a6 7824 |x$ | Jump 0x2cb ; case 0x6 02a7 7825 |x% | Jump 0x2cd ; case 0x7 02a8 7826 |x& | Jump 0x2cf ; case 0x8 02a9 7827 |x' | Jump 0x2d1 ; case 0x9 02aa 7828 |x( | Jump 0x2d3 ; case 0xa 02ab 7829 |x) | Jump 0x2d5 ; case 0xb 02ac 782a |x* | Jump 0x2d7 ; case 0xc 02ad 782b |x+ | Jump 0x2d9 ; case 0xd 02ae 782c |x, | Jump 0x2db ; case 0xe 02af 782d |x- | Jump 0x2dd ; case 0xf 02b0 782e |x. | Jump 0x2df ; case 0x10 02b1 782f |x/ | Jump 0x2e1 ; case 0x11 02b2 7830 |x0 | Jump 0x2e3 ; case 0x12 02b3 7831 |x1 | Jump 0x2e5 ; case 0x13 02b4 7832 |x2 | Jump 0x2e7 ; case 0x14 02b5 7833 |x3 | Jump 0x2e9 ; case 0x15 02b6 7834 |x4 | Jump 0x2eb ; case 0x16 02b7 7835 |x5 | Jump 0x2ed ; case 0x17 02b8 7836 |x6 | Jump 0x2ef ; case 0x18 02b9 7837 |x7 | Jump 0x2f1 ; case 0x19 02ba 7838 |x8 | Jump 0x2f3 ; case 0x1a 02bb 7839 |x9 | Jump 0x2f5 ; case 0x1b 02bc 783a |x: | Jump 0x2f7 ; case 0x1c 02bd 783b |x; | Jump 0x2f9 ; case 0x1d 02be 7800 |x | Jump 0x2bf ; case 0x1e 02bf 826a | j | Call 0x1,0x6a 02c0 783b |x; | Jump 0x2fc 02c1 00d1 | | Pop_Control Pop_Count_1 02c2 7839 |x9 | Jump 0x2fc 02c3 8216 | | Call 0x1,0x16 02c4 7837 |x7 | Jump 0x2fc 02c5 8219 | | Call 0x1,0x19 02c6 7835 |x5 | Jump 0x2fc 02c7 821c | | Call 0x1,0x1c 02c8 7833 |x3 | Jump 0x2fc 02c9 821f | | Call 0x1,0x1f 02ca 7831 |x1 | Jump 0x2fc 02cb 8222 | " | Call 0x1,0x22 02cc 782f |x/ | Jump 0x2fc 02cd 8225 | % | Call 0x1,0x25 02ce 782d |x- | Jump 0x2fc 02cf 8228 | ( | Call 0x1,0x28 02d0 782b |x+ | Jump 0x2fc 02d1 822b | + | Call 0x1,0x2b 02d2 7829 |x) | Jump 0x2fc 02d3 822e | . | Call 0x1,0x2e 02d4 7827 |x' | Jump 0x2fc 02d5 8231 | 1 | Call 0x1,0x31 02d6 7825 |x% | Jump 0x2fc 02d7 8234 | 4 | Call 0x1,0x34 02d8 7823 |x# | Jump 0x2fc 02d9 8237 | 7 | Call 0x1,0x37 02da 7821 |x! | Jump 0x2fc 02db 823a | : | Call 0x1,0x3a 02dc 781f |x | Jump 0x2fc 02dd 823d | = | Call 0x1,0x3d 02de 781d |x | Jump 0x2fc 02df 8240 | @ | Call 0x1,0x40 02e0 781b |x | Jump 0x2fc 02e1 8243 | C | Call 0x1,0x43 02e2 7819 |x | Jump 0x2fc 02e3 8246 | F | Call 0x1,0x46 02e4 7817 |x | Jump 0x2fc 02e5 8249 | I | Call 0x1,0x49 02e6 7815 |x | Jump 0x2fc 02e7 824c | L | Call 0x1,0x4c 02e8 7813 |x | Jump 0x2fc 02e9 824f | O | Call 0x1,0x4f 02ea 7811 |x | Jump 0x2fc 02eb 8252 | R | Call 0x1,0x52 02ec 780f |x | Jump 0x2fc 02ed 8255 | U | Call 0x1,0x55 02ee 780d |x | Jump 0x2fc 02ef 8258 | X | Call 0x1,0x58 02f0 780b |x | Jump 0x2fc 02f1 825b | [ | Call 0x1,0x5b 02f2 7809 |x | Jump 0x2fc 02f3 825e | ^ | Call 0x1,0x5e 02f4 7807 |x | Jump 0x2fc 02f5 8261 | a | Call 0x1,0x61 02f6 7805 |x | Jump 0x2fc 02f7 8264 | d | Call 0x1,0x64 02f8 7803 |x | Jump 0x2fc 02f9 8267 | g | Call 0x1,0x67 02fa 7801 |x | Jump 0x2fc 02fb 8213 | | Call 0x1,0x13 02fc 00da | | Load_Top At_Offset_2 02fd 690b |i | Jump_Zero 0x409 02fe 4806 |H | Short_Literal 0x6 02ff e001 | | Load 0x0,0x1 0300 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0301 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0302 4808 |H | Short_Literal 0x8 0303 e001 | | Load 0x0,0x1 0304 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0305 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0306 0278 | x | Execute Discrete,Or 0307 6901 |i | Jump_Zero 0x409 0308 00da | | Load_Top At_Offset_2 0309 00d8 | | Load_Top At_Offset_0 030a 0c1f | | Execute_Immediate Greater_Equal,0x1f 030b 7027 |p' | Jump_Nonzero 0x333 030c 461e |F | Jump_Case 0x1f 030d 7826 |x& | Jump 0x334 ; case 0x0 030e 7830 |x0 | Jump 0x33f ; case 0x1 030f 7836 |x6 | Jump 0x346 ; case 0x2 0310 783c |x< | Jump 0x34d ; case 0x3 0311 7842 |xB | Jump 0x354 ; case 0x4 0312 7848 |xH | Jump 0x35b ; case 0x5 0313 784e |xN | Jump 0x362 ; case 0x6 0314 7854 |xT | Jump 0x369 ; case 0x7 0315 785a |xZ | Jump 0x370 ; case 0x8 0316 7860 |x` | Jump 0x377 ; case 0x9 0317 7866 |xf | Jump 0x37e ; case 0xa 0318 786c |xl | Jump 0x385 ; case 0xb 0319 7872 |xr | Jump 0x38c ; case 0xc 031a 7878 |xx | Jump 0x393 ; case 0xd 031b 787e |x~ | Jump 0x39a ; case 0xe 031c 7884 |x | Jump 0x3a1 ; case 0xf 031d 788a |x | Jump 0x3a8 ; case 0x10 031e 7890 |x | Jump 0x3af ; case 0x11 031f 7896 |x | Jump 0x3b6 ; case 0x12 0320 789c |x | Jump 0x3bd ; case 0x13 0321 78a2 |x | Jump 0x3c4 ; case 0x14 0322 78a8 |x | Jump 0x3cb ; case 0x15 0323 78ae |x | Jump 0x3d2 ; case 0x16 0324 78b4 |x | Jump 0x3d9 ; case 0x17 0325 78ba |x | Jump 0x3e0 ; case 0x18 0326 78c0 |x | Jump 0x3e7 ; case 0x19 0327 78c6 |x | Jump 0x3ee ; case 0x1a 0328 78cc |x | Jump 0x3f5 ; case 0x1b 0329 78d2 |x | Jump 0x3fc ; case 0x1c 032a 78d8 |x | Jump 0x403 ; case 0x1d 032b 7800 |x | Jump 0x32c ; case 0x1e 032c e273 | s | Load 0x1,0x73 032d 481e |H | Short_Literal 0x1e 032e e268 | h | Load 0x1,0x68 032f e001 | | Load 0x0,0x1 0330 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0331 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0332 78d6 |x | Jump 0x409 0333 00d1 | | Pop_Control Pop_Count_1 0334 e273 | s | Load 0x1,0x73 0335 4800 |H | Short_Literal 0x0 0336 0092 050a | | Action Push_String_Extended,0x50a ; "NO OPERATION ! " 0338 e001 | | Load 0x0,0x1 0339 1b11 | | Execute Package,Field_Read,Field_Number 0x11 033a 01c3 | | Execute Vector,Check_In_Type 033b e001 | | Load 0x0,0x1 033c 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 033d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 033e 78ca |x | Jump 0x409 033f e273 | s | Load 0x1,0x73 0340 4801 |H | Short_Literal 0x1 0341 e211 | | Load 0x1,0x11 0342 e001 | | Load 0x0,0x1 0343 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0344 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0345 78c3 |x | Jump 0x409 0346 e273 | s | Load 0x1,0x73 0347 4802 |H | Short_Literal 0x2 0348 e214 | | Load 0x1,0x14 0349 e001 | | Load 0x0,0x1 034a 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 034b 1816 | | Execute Package,Field_Execute,Field_Number 0x16 034c 78bc |x | Jump 0x409 034d e273 | s | Load 0x1,0x73 034e 4803 |H | Short_Literal 0x3 034f e217 | | Load 0x1,0x17 0350 e001 | | Load 0x0,0x1 0351 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0352 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0353 78b5 |x | Jump 0x409 0354 e273 | s | Load 0x1,0x73 0355 4804 |H | Short_Literal 0x4 0356 e21a | | Load 0x1,0x1a 0357 e001 | | Load 0x0,0x1 0358 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0359 1816 | | Execute Package,Field_Execute,Field_Number 0x16 035a 78ae |x | Jump 0x409 035b e273 | s | Load 0x1,0x73 035c 4805 |H | Short_Literal 0x5 035d e21d | | Load 0x1,0x1d 035e e001 | | Load 0x0,0x1 035f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0360 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0361 78a7 |x | Jump 0x409 0362 e273 | s | Load 0x1,0x73 0363 4806 |H | Short_Literal 0x6 0364 e220 | | Load 0x1,0x20 0365 e001 | | Load 0x0,0x1 0366 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0367 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0368 78a0 |x | Jump 0x409 0369 e273 | s | Load 0x1,0x73 036a 4807 |H | Short_Literal 0x7 036b e223 | # | Load 0x1,0x23 036c e001 | | Load 0x0,0x1 036d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 036e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 036f 7899 |x | Jump 0x409 0370 e273 | s | Load 0x1,0x73 0371 4808 |H | Short_Literal 0x8 0372 e226 | & | Load 0x1,0x26 0373 e001 | | Load 0x0,0x1 0374 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0375 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0376 7892 |x | Jump 0x409 0377 e273 | s | Load 0x1,0x73 0378 4809 |H | Short_Literal 0x9 0379 e229 | ) | Load 0x1,0x29 037a e001 | | Load 0x0,0x1 037b 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 037c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 037d 788b |x | Jump 0x409 037e e273 | s | Load 0x1,0x73 037f 480a |H | Short_Literal 0xa 0380 e22c | , | Load 0x1,0x2c 0381 e001 | | Load 0x0,0x1 0382 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0383 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0384 7884 |x | Jump 0x409 0385 e273 | s | Load 0x1,0x73 0386 480b |H | Short_Literal 0xb 0387 e22f | / | Load 0x1,0x2f 0388 e001 | | Load 0x0,0x1 0389 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 038a 1816 | | Execute Package,Field_Execute,Field_Number 0x16 038b 787d |x} | Jump 0x409 038c e273 | s | Load 0x1,0x73 038d 480c |H | Short_Literal 0xc 038e e232 | 2 | Load 0x1,0x32 038f e001 | | Load 0x0,0x1 0390 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0391 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0392 7876 |xv | Jump 0x409 0393 e273 | s | Load 0x1,0x73 0394 480d |H | Short_Literal 0xd 0395 e235 | 5 | Load 0x1,0x35 0396 e001 | | Load 0x0,0x1 0397 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0398 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0399 786f |xo | Jump 0x409 039a e273 | s | Load 0x1,0x73 039b 480e |H | Short_Literal 0xe 039c e238 | 8 | Load 0x1,0x38 039d e001 | | Load 0x0,0x1 039e 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 039f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03a0 7868 |xh | Jump 0x409 03a1 e273 | s | Load 0x1,0x73 03a2 480f |H | Short_Literal 0xf 03a3 e23b | ; | Load 0x1,0x3b 03a4 e001 | | Load 0x0,0x1 03a5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03a6 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03a7 7861 |xa | Jump 0x409 03a8 e273 | s | Load 0x1,0x73 03a9 4810 |H | Short_Literal 0x10 03aa e23e | > | Load 0x1,0x3e 03ab e001 | | Load 0x0,0x1 03ac 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03ad 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03ae 785a |xZ | Jump 0x409 03af e273 | s | Load 0x1,0x73 03b0 4811 |H | Short_Literal 0x11 03b1 e241 | A | Load 0x1,0x41 03b2 e001 | | Load 0x0,0x1 03b3 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03b4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03b5 7853 |xS | Jump 0x409 03b6 e273 | s | Load 0x1,0x73 03b7 4812 |H | Short_Literal 0x12 03b8 e244 | D | Load 0x1,0x44 03b9 e001 | | Load 0x0,0x1 03ba 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03bb 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03bc 784c |xL | Jump 0x409 03bd e273 | s | Load 0x1,0x73 03be 4813 |H | Short_Literal 0x13 03bf e247 | G | Load 0x1,0x47 03c0 e001 | | Load 0x0,0x1 03c1 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03c2 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03c3 7845 |xE | Jump 0x409 03c4 e273 | s | Load 0x1,0x73 03c5 4814 |H | Short_Literal 0x14 03c6 e24a | J | Load 0x1,0x4a 03c7 e001 | | Load 0x0,0x1 03c8 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03c9 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03ca 783e |x> | Jump 0x409 03cb e273 | s | Load 0x1,0x73 03cc 4815 |H | Short_Literal 0x15 03cd e24d | M | Load 0x1,0x4d 03ce e001 | | Load 0x0,0x1 03cf 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03d0 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03d1 7837 |x7 | Jump 0x409 03d2 e273 | s | Load 0x1,0x73 03d3 4816 |H | Short_Literal 0x16 03d4 e250 | P | Load 0x1,0x50 03d5 e001 | | Load 0x0,0x1 03d6 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03d7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03d8 7830 |x0 | Jump 0x409 03d9 e273 | s | Load 0x1,0x73 03da 4817 |H | Short_Literal 0x17 03db e253 | S | Load 0x1,0x53 03dc e001 | | Load 0x0,0x1 03dd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03de 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03df 7829 |x) | Jump 0x409 03e0 e273 | s | Load 0x1,0x73 03e1 4818 |H | Short_Literal 0x18 03e2 e256 | V | Load 0x1,0x56 03e3 e001 | | Load 0x0,0x1 03e4 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03e5 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03e6 7822 |x" | Jump 0x409 03e7 e273 | s | Load 0x1,0x73 03e8 4819 |H | Short_Literal 0x19 03e9 e259 | Y | Load 0x1,0x59 03ea e001 | | Load 0x0,0x1 03eb 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03ec 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03ed 781b |x | Jump 0x409 03ee e273 | s | Load 0x1,0x73 03ef 481a |H | Short_Literal 0x1a 03f0 e25c | \ | Load 0x1,0x5c 03f1 e001 | | Load 0x0,0x1 03f2 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03f3 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03f4 7814 |x | Jump 0x409 03f5 e273 | s | Load 0x1,0x73 03f6 481b |H | Short_Literal 0x1b 03f7 e25f | _ | Load 0x1,0x5f 03f8 e001 | | Load 0x0,0x1 03f9 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03fa 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03fb 780d |x | Jump 0x409 03fc e273 | s | Load 0x1,0x73 03fd 481c |H | Short_Literal 0x1c 03fe e262 | b | Load 0x1,0x62 03ff e001 | | Load 0x0,0x1 0400 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0401 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0402 7806 |x | Jump 0x409 0403 e273 | s | Load 0x1,0x73 0404 481d |H | Short_Literal 0x1d 0405 e265 | e | Load 0x1,0x65 0406 e001 | | Load 0x0,0x1 0407 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0408 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0409 e001 | | Load 0x0,0x1 040a 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 040b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 040c 00da | | Load_Top At_Offset_2 040d 7003 |p | Jump_Nonzero 0x411 040e e001 | | Load 0x0,0x1 040f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0410 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0411 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0412 0000 0000 | | .BLANK 0000[0x6] 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 0422 | " | .CONST 0x0422 ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 0004 | | .CONST 0x0004 ; Number of locals 041b INIT_0418: 041b 00e3 | | Load_Encached Natural_Cache 041c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 041d 00e3 | | Load_Encached Natural_Cache 041e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 041f 6080 |` | Indirect_Literal Discrete,0x4a0,{0x00000000, 0x7fffffff} 0420 00e3 | | Load_Encached Natural_Cache 0421 03f1 | | Declare_Variable Discrete,With_Value 0422 BODY_0418: 0422 e001 | | Load 0x0,0x1 0423 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0424 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0425 00cf | | Action Mark_Auxiliary 0426 e26b | k | Load 0x1,0x6b 0427 4801 |H | Short_Literal 0x1 0428 0263 | c | Execute Discrete,Above_Bound 0429 7030 |p0 | Jump_Nonzero 0x45a 042a 00d8 | | Load_Top At_Offset_0 042b 8276 | v | Call 0x1,0x76 042c 00d9 | | Load_Top At_Offset_1 042d e271 | q | Load 0x1,0x71 042e 01d6 | | Execute Vector,Field_Write 042f 00d8 | | Load_Top At_Offset_0 0430 e271 | q | Load 0x1,0x71 0431 01d7 | | Execute Vector,Field_Read 0432 6825 |h% | Jump_Zero 0x458 0433 4800 |H | Short_Literal 0x0 0434 a403 | | Store_Unchecked 0x2,0x3 0435 00cf | | Action Mark_Auxiliary 0436 e270 | p | Load 0x1,0x70 0437 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0438 4801 |H | Short_Literal 0x1 0439 0263 | c | Execute Discrete,Above_Bound 043a 700b |p | Jump_Nonzero 0x446 043b 00d8 | | Load_Top At_Offset_0 043c e270 | p | Load 0x1,0x70 043d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 043e 01d7 | | Execute Vector,Field_Read 043f e407 | | Load 0x2,0x7 0440 027f | | Execute Discrete,Equal 0441 6802 |h | Jump_Zero 0x444 0442 00d8 | | Load_Top At_Offset_0 0443 a403 | | Store_Unchecked 0x2,0x3 0444 00c8 | | Action Pop_Auxiliary_Range 0445 3ff5 |? | Loop_Increasing 0x43b 0446 00ce | | Action Pop_Auxiliary 0447 e403 | | Load 0x2,0x3 0448 7004 |p | Jump_Nonzero 0x44d 0449 00d8 | | Load_Top At_Offset_0 044a a402 | | Store_Unchecked 0x2,0x2 044b 00d2 | | Pop_Control Pop_Count_2 044c 780d |x | Jump 0x45a 044d e403 | | Load 0x2,0x3 044e e404 | | Load 0x2,0x4 044f 027c | | | Execute Discrete,Less 0450 6807 |h | Jump_Zero 0x458 0451 e403 | | Load 0x2,0x3 0452 a404 | | Store_Unchecked 0x2,0x4 0453 00db | | Load_Top At_Offset_3 0454 e270 | p | Load 0x1,0x70 0455 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0456 01d7 | | Execute Vector,Field_Read 0457 a402 | | Store_Unchecked 0x2,0x2 0458 00c8 | | Action Pop_Auxiliary_Range 0459 3fd0 |? | Loop_Increasing 0x42a 045a 00ce | | Action Pop_Auxiliary 045b e001 | | Load 0x0,0x1 045c 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 045d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 045e 00da | | Load_Top At_Offset_2 045f 7009 |p | Jump_Nonzero 0x469 0460 8275 | u | Call 0x1,0x75 0461 e001 | | Load 0x0,0x1 0462 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0463 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0464 e001 | | Load 0x0,0x1 0465 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0466 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0467 4800 |H | Short_Literal 0x0 0468 00ca | | Action Exit_Nullary_Function 0469 e270 | p | Load 0x1,0x70 046a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 046b 0a01 | | Execute_Immediate Plus,0x1 046c e270 | p | Load 0x1,0x70 046d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 046e e270 | p | Load 0x1,0x70 046f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0470 0c1e | | Execute_Immediate Greater_Equal,0x1e 0471 6813 |h | Jump_Zero 0x485 0472 481e |H | Short_Literal 0x1e 0473 e270 | p | Load 0x1,0x70 0474 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0475 00cf | | Action Mark_Auxiliary 0476 481d |H | Short_Literal 0x1d 0477 4801 |H | Short_Literal 0x1 0478 0007 | | Action Break_Optional 0479 00d8 | | Load_Top At_Offset_0 047a 0a01 | | Execute_Immediate Plus,0x1 047b e270 | p | Load 0x1,0x70 047c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 047d 01d7 | | Execute Vector,Field_Read 047e 00d9 | | Load_Top At_Offset_1 047f e270 | p | Load 0x1,0x70 0480 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0481 01d6 | | Execute Vector,Field_Write 0482 00c8 | | Action Pop_Auxiliary_Range 0483 3ff5 |? | Loop_Increasing 0x479 0484 00ce | | Action Pop_Auxiliary 0485 00da | | Load_Top At_Offset_2 0486 e270 | p | Load 0x1,0x70 0487 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0488 e270 | p | Load 0x1,0x70 0489 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 048a 01d6 | | Execute Vector,Field_Write 048b 4805 |H | Short_Literal 0x5 048c e001 | | Load 0x0,0x1 048d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 048e 1819 | | Execute Package,Field_Execute,Field_Number 0x19 048f 4807 |H | Short_Literal 0x7 0490 e001 | | Load 0x0,0x1 0491 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0492 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0493 0278 | x | Execute Discrete,Or 0494 6805 |h | Jump_Zero 0x49a 0495 e273 | s | Load 0x1,0x73 0496 00db | | Load_Top At_Offset_3 0497 e001 | | Load 0x0,0x1 0498 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0499 1815 | | Execute Package,Field_Execute,Field_Number 0x15 049a 00da | | Load_Top At_Offset_2 049b 8277 | w | Call 0x1,0x77 049c 4801 |H | Short_Literal 0x1 049d 00ca | | Action Exit_Nullary_Function 049e 0000 0000 | | .XXX[0x2] 04a0 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 04a4 0000 0000 | | .BLANK 0000[0x4] 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04ab | | .CONST 0x04ab ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0001 | | .CONST 0x0001 ; Number of locals 04ab BODY_04a8: 04ab INIT_04a8: 04ab e001 | | Load 0x0,0x1 04ac 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04ad 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04ae 00cf | | Action Mark_Auxiliary 04af e26b | k | Load 0x1,0x6b 04b0 4801 |H | Short_Literal 0x1 04b1 0263 | c | Execute Discrete,Above_Bound 04b2 7021 |p! | Jump_Nonzero 0x4d4 04b3 00d8 | | Load_Top At_Offset_0 04b4 8276 | v | Call 0x1,0x76 04b5 00d9 | | Load_Top At_Offset_1 04b6 e271 | q | Load 0x1,0x71 04b7 01d6 | | Execute Vector,Field_Write 04b8 00d8 | | Load_Top At_Offset_0 04b9 e271 | q | Load 0x1,0x71 04ba 01d7 | | Execute Vector,Field_Read 04bb 6816 |h | Jump_Zero 0x4d2 04bc e001 | | Load 0x0,0x1 04bd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04be 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04bf 4805 |H | Short_Literal 0x5 04c0 e001 | | Load 0x0,0x1 04c1 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04c2 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04c3 4807 |H | Short_Literal 0x7 04c4 e001 | | Load 0x0,0x1 04c5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04c6 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04c7 0278 | x | Execute Discrete,Or 04c8 6805 |h | Jump_Zero 0x4ce 04c9 e273 | s | Load 0x1,0x73 04ca 00d9 | | Load_Top At_Offset_1 04cb e001 | | Load 0x0,0x1 04cc 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04cd 1815 | | Execute Package,Field_Execute,Field_Number 0x15 04ce 00d8 | | Load_Top At_Offset_0 04cf 8277 | w | Call 0x1,0x77 04d0 4801 |H | Short_Literal 0x1 04d1 00ca | | Action Exit_Nullary_Function 04d2 00c8 | | Action Pop_Auxiliary_Range 04d3 3fdf |? | Loop_Increasing 0x4b3 04d4 00ce | | Action Pop_Auxiliary 04d5 e001 | | Load 0x0,0x1 04d6 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04d7 1817 | | Execute Package,Field_Execute,Field_Number 0x17 04d8 e001 | | Load 0x0,0x1 04d9 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04da 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04db 4800 |H | Short_Literal 0x0 04dc 00ca | | Action Exit_Nullary_Function 04dd 0000 0000 | | .XXX[0x3] 04df 0000 | | 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e4 | | .CONST 0x04e4 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0002 | | .CONST 0x0002 ; Number of locals 04e3 INIT_04e0: 04e3 00e1 | | Load_Encached Boolean_Cache 04e4 BODY_04e0: 04e4 e272 | r | Load 0x1,0x72 04e5 e20f | | Load 0x1,0xf 04e6 e001 | | Load 0x0,0x1 04e7 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04e8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04e9 e5fe | | Load 0x2,-0x2 04ea e001 | | Load 0x0,0x1 04eb 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04ec 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04ed e5fc | | Load 0x2,-0x4 04ee 7009 |p | Jump_Nonzero 0x4f8 04ef 00cf | | Action Mark_Auxiliary 04f0 85fd | | Call 0x2,-0x3 04f1 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 04f2 00d9 | | Load_Top At_Offset_1 04f3 6802 |h | Jump_Zero 0x4f6 04f4 00c9 | | Action Pop_Auxiliary_Loop 04f5 7ffa | | Jump 0x4f0 04f6 00ce | | Action Pop_Auxiliary 04f7 780e |x | Jump 0x506 04f8 00cf | | Action Mark_Auxiliary 04f9 e5fc | | Load 0x2,-0x4 04fa 4801 |H | Short_Literal 0x1 04fb 0263 | c | Execute Discrete,Above_Bound 04fc 7008 |p | Jump_Nonzero 0x505 04fd 85fd | | Call 0x2,-0x3 04fe a402 | | Store_Unchecked 0x2,0x2 04ff 00db | | Load_Top At_Offset_3 0500 7002 |p | Jump_Nonzero 0x503 0501 00d2 | | Pop_Control Pop_Count_2 0502 7802 |x | Jump 0x505 0503 00c8 | | Action Pop_Auxiliary_Range 0504 3ff8 |? | Loop_Increasing 0x4fd 0505 00ce | | Action Pop_Auxiliary 0506 00d8 | | Load_Top At_Offset_0 0507 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0508 ; -------------------------------------------------------------------------------------- 0508 ; STRING TABLE 0508 ; -------------------------------------------------------------------------------------- 0508 0008 | | .STRTAB 0x0008->0x050c ; " LRU " 0509 000b | | .STRTAB 0x000b->0x050e ; "FIRST" 050a 000e | | .STRTAB 0x000e->0x0511 ; "NO OPERATION ! " 050b 001b | | .STREND 0x001b->0x0518 050c 204c 5255 | LRU| .STRTAB_STRINGS 0519 0000 0000 | | .BLANK 0000[0x7] 0520 ; -------------------------------------------------------------------------------------- 0520 ; Debug Table 0520 ; -------------------------------------------------------------------------------------- 0520 0004 0001 | | .DEBUG4 0x0004,0x0001,0x7d46,0x0000,0x0001,0x000a 0526 000b 054e | N| .DBG4T 0x000b,0x054e,0x4000,0x0000 052a 000e 0551 | Q| .DBG4T 0x000e,0x0551,0x4000,0x8000 052e 008b 0579 | y| .DBG4T 0x008b,0x0579,0x1002,0x0000 0532 00a3 0000 | | .DBG4T 0x00a3,0x0000,0x1005,0x0000 0536 00cb 057e | ~| .DBG4T 0x00cb,0x057e,0x1001,0x0000 053a 00e3 0583 | | .DBG4T 0x00e3,0x0583,0x1002,0x4000 053e 029b 060c | | .DBG4T 0x029b,0x060c,0x1001,0x4000 0542 041b 0694 | | .DBG4T 0x041b,0x0694,0x1002,0x0000 0546 04ab 06b7 | | .DBG4T 0x04ab,0x06b7,0x1002,0x0000 054a 04e3 06c5 | | .DBG4T 0x04e3,0x06c5,0x3802,0x4002 054e ; -------------------------------------------------------------------------------------- 054e ; Debug chain 054e ; -------------------------------------------------------------------------------------- 054e 0001 0000 | | .DBGLEN 0x0001,0x0000 0550 000b | | .DBGLNO 0x000b 0551 ; -------------------------------------------------------------------------------------- 0551 ; Debug chain 0551 ; -------------------------------------------------------------------------------------- 0551 0012 0002 | | .DBGLEN 0x0012,0x0002 0553 000e 0014 | | .DBGLNO 0x000e,0x0014,0x001a,0x0020,0x0024,0x0026,0x0028,0x002e,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x004e,0x005a,0x005c,0x0060 0567 0003 0004 | | .XXX[0x12] 0569 0005 0006 | | 056b 0007 0008 | | 056d 0009 000a | | 056f 000b 000c | | 0571 000d 000e | | 0573 000f 0010 | | 0575 0011 0012 | | 0577 0013 0014 | | 0579 ; -------------------------------------------------------------------------------------- 0579 ; Debug chain 0579 ; -------------------------------------------------------------------------------------- 0579 0000 0003 | | .DBGLEN 0x0000,0x0003 057b 008b 008e | | .DBGLNO 0x008b,0x008e,0x0094 057e ; -------------------------------------------------------------------------------------- 057e ; Debug chain 057e ; -------------------------------------------------------------------------------------- 057e 0000 0003 | | .DBGLEN 0x0000,0x0003 0580 00cc 00cf | | .DBGLNO 0x00cc,0x00cf,0x00d7 0583 ; -------------------------------------------------------------------------------------- 0583 ; Debug chain 0583 ; -------------------------------------------------------------------------------------- 0583 0001 0043 | C| .DBGLEN 0x0001,0x0043 0585 00e3 00e4 | | .DBGLNO 0x00e3,0x00e4,0x00f1,0x0115,0x0119,0x011c,0x011f,0x0122,0x0125,0x0128,0x012b,0x012e,0x0131,0x0134,0x0137,0x013a,0x013d,0x0140,0x0143,0x0146,0x0149,0x014c,0x014f,0x0152,0x0155,0x0158,0x015b,0x015e,0x0161,0x0164,0x0167,0x016a,0x016d,0x0170,0x0173,0x0175,0x017a,0x019e,0x01a8,0x01b0,0x01b8,0x01c0,0x01c8,0x01d0,0x01d8,0x01e0,0x01e8,0x01f0,0x01f8,0x0200,0x0208,0x0210,0x0218,0x0220,0x0228,0x0230,0x0238,0x0240,0x0248,0x0250,0x0258,0x0260,0x0268,0x0270,0x0278,0x0280,0x0288,0x028f 05c9 0001 0002 | | .XXX[0x43] 05cb 0020 0021 | !| 05cd 0003 0004 | | 05cf 0005 0006 | | 05d1 0007 0008 | | 05d3 0009 000a | | 05d5 000b 000c | | 05d7 000d 000e | | 05d9 000f 0010 | | 05db 0011 0012 | | 05dd 0013 0014 | | 05df 0015 0016 | | 05e1 0017 0018 | | 05e3 0019 001a | | 05e5 001b 001c | | 05e7 001d 001e | | 05e9 001f 0022 | "| 05eb 0023 0024 | # $| 05ed 0042 0026 | B &| 05ef 0027 0028 | ' (| 05f1 0029 002a | ) *| 05f3 002b 002c | + ,| 05f5 002d 002e | - .| 05f7 002f 0030 | / 0| 05f9 0031 0032 | 1 2| 05fb 0033 0034 | 3 4| 05fd 0035 0036 | 5 6| 05ff 0037 0038 | 7 8| 0601 0039 003a | 9 :| 0603 003b 003c | ; <| 0605 003d 003e | = >| 0607 003f 0040 | ? @| 0609 0041 0025 | A %| 060b 0044 | D | 060c ; -------------------------------------------------------------------------------------- 060c ; Debug chain 060c ; -------------------------------------------------------------------------------------- 060c 0000 0043 | C| .DBGLEN 0x0000,0x0043 060e 029b 02bf | | .DBGLNO 0x029b,0x02bf,0x02c3,0x02c5,0x02c7,0x02c9,0x02cb,0x02cd,0x02cf,0x02d1,0x02d3,0x02d5,0x02d7,0x02d9,0x02db,0x02dd,0x02df,0x02e1,0x02e3,0x02e5,0x02e7,0x02e9,0x02eb,0x02ed,0x02ef,0x02f1,0x02f3,0x02f5,0x02f7,0x02f9,0x02fb,0x02fc,0x0308,0x032c,0x0334,0x033f,0x0346,0x034d,0x0354,0x035b,0x0362,0x0369,0x0370,0x0377,0x037e,0x0385,0x038c,0x0393,0x039a,0x03a1,0x03a8,0x03af,0x03b6,0x03bd,0x03c4,0x03cb,0x03d2,0x03d9,0x03e0,0x03e7,0x03ee,0x03f5,0x03fc,0x0403,0x0409,0x040c,0x040e 0651 0001 001f | | .XXX[0x43] 0653 0003 0004 | | 0655 0005 0006 | | 0657 0007 0008 | | 0659 0009 000a | | 065b 000b 000c | | 065d 000d 000e | | 065f 000f 0010 | | 0661 0011 0012 | | 0663 0013 0014 | | 0665 0015 0016 | | 0667 0017 0018 | | 0669 0019 001a | | 066b 001b 001c | | 066d 001d 001e | | 066f 0002 0021 | !| 0671 0022 0040 | " @| 0673 0041 0023 | A #| 0675 0024 0025 | $ %| 0677 0026 0027 | & '| 0679 0028 0029 | ( )| 067b 002a 002b | * +| 067d 002c 002d | , -| 067f 002e 002f | . /| 0681 0030 0031 | 0 1| 0683 0032 0033 | 2 3| 0685 0034 0035 | 4 5| 0687 0036 0037 | 6 7| 0689 0038 0039 | 8 9| 068b 003a 003b | : ;| 068d 003c 003d | < =| 068f 003e 003f | > ?| 0691 0042 0043 | B C| 0693 0044 | D | 0694 ; -------------------------------------------------------------------------------------- 0694 ; Debug chain 0694 ; -------------------------------------------------------------------------------------- 0694 0003 001e | | .DBGLEN 0x0003,0x001e 0696 041b 041d | | .DBGLNO 0x041b,0x041d,0x041f,0x0422,0x0426,0x042a,0x042f,0x0433,0x0436,0x043b,0x0442,0x0447,0x0449,0x044b,0x044d,0x0451,0x0453,0x045b,0x045e,0x0460,0x0461,0x0464,0x0467,0x0469,0x046e,0x0472,0x0476,0x0479,0x0485,0x048b,0x0495,0x049a,0x049c 06b7 ; -------------------------------------------------------------------------------------- 06b7 ; Debug chain 06b7 ; -------------------------------------------------------------------------------------- 06b7 0000 000c | | .DBGLEN 0x0000,0x000c 06b9 04ab 04af | | .DBGLNO 0x04ab,0x04af,0x04b3,0x04b8,0x04bc,0x04bf,0x04c9,0x04ce,0x04d0,0x04d5,0x04d8,0x04db 06c5 ; -------------------------------------------------------------------------------------- 06c5 ; Debug chain 06c5 ; -------------------------------------------------------------------------------------- 06c5 0001 0009 | | .DBGLEN 0x0001,0x0009 06c7 04e3 04e4 | | .DBGLNO 0x04e3,0x04e4,0x04e9,0x04ed,0x04f0,0x04f2,0x04f9,0x04fd,0x04ff,0x0506 06d1 0001 0002 | | .XXX[0x9] 06d3 0003 0005 | | 06d5 0006 0007 | | 06d7 0008 0009 | | 06d9 000a | | 06da 0000 0000 | | .BLANK 0000[0x126]