|
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_6148f2
└─⟦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 0560 | ` | .CONST 0x0560 ; 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 0042 | B | .CONST 0x0042 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001d | | .CONST 0x001d ; Number of locals 000b INIT_0008: 000b 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 000d 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated 000f 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated 0011 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 0013 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 0015 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 0017 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0019 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated 001b 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated 001d 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 001f 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated 0021 00bf | | Action Accept_Activation 0022 a002 | | Store_Unchecked 0x0,0x2 0023 00c6 | | Action Check_Subprogram_Elaborated 0024 e003 | | Load 0x0,0x3 0025 e004 | | Load 0x0,0x4 0026 e005 | | Load 0x0,0x5 0027 e006 | | Load 0x0,0x6 0028 4800 |H | Short_Literal 0x0 0029 0007 | | Action Break_Optional 002a 1d0d | | Execute_Immediate Reference_Lex_1,0xd 002b 00c7 | | Action Elaborate_Subprogram 002c 1d0e | | Execute_Immediate Reference_Lex_1,0xe 002d 00c7 | | Action Elaborate_Subprogram 002e 1d11 | | Execute_Immediate Reference_Lex_1,0x11 002f 00c7 | | Action Elaborate_Subprogram 0030 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0031 00c7 | | Action Elaborate_Subprogram 0032 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0033 00c7 | | Action Elaborate_Subprogram 0034 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0035 00c7 | | Action Elaborate_Subprogram 0036 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0037 00c7 | | Action Elaborate_Subprogram 0038 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0039 00c7 | | Action Elaborate_Subprogram 003a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 003b 00c7 | | Action Elaborate_Subprogram 003c 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call 003e 1d16 | | Execute_Immediate Reference_Lex_1,0x16 003f 00c7 | | Action Elaborate_Subprogram 0040 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0041 00c7 | | Action Elaborate_Subprogram 0042 BODY_0008: 0042 00bc | | Action Signal_Activated 0043 00bb | | Action Signal_Completion 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 4800 |H | Short_Literal 0x0 004c 00db | | Load_Top At_Offset_3 004d 0227 | ' | Execute Access,All_Reference 004e 3c37 |<7 | Execute Record,Field_Read,Field_Number 0x37 004f 0229 | ) | Execute Access,All_Read 0050 e007 | | Load 0x0,0x7 0051 00ad | | QQ_Action Package,Field_Execute_Dynamic 0052 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0053 0000 0000 | | .BLANK 0000[0x5] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b 4800 |H | Short_Literal 0x0 005c 00db | | Load_Top At_Offset_3 005d 0227 | ' | Execute Access,All_Reference 005e 3c37 |<7 | Execute Record,Field_Read,Field_Number 0x37 005f 0229 | ) | Execute Access,All_Read 0060 e008 | | Load 0x0,0x8 0061 00ad | | QQ_Action Package,Field_Execute_Dynamic 0062 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0063 0000 0000 | | .BLANK 0000[0x5] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 006d | m | .CONST 0x006d ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0002 | | .CONST 0x0002 ; Number of locals 006b INIT_0068: 006b e009 | | Load 0x0,0x9 006c 0007 | | Action Break_Optional 006d BODY_0068: 006d e009 | | Load 0x0,0x9 006e e5ff | | Load 0x2,-0x1 006f 4802 |H | Short_Literal 0x2 0070 e00a | | Load 0x0,0xa 0071 e00b | | Load 0x0,0xb 0072 00ad | | QQ_Action Package,Field_Execute_Dynamic 0073 0039 | 9 | Store_Top Access,At_Offset_1 0074 00db | | Load_Top At_Offset_3 0075 0229 | ) | Execute Access,All_Read 0076 3c33 |<3 | Execute Record,Field_Read,Field_Number 0x33 0077 00d8 | | Load_Top At_Offset_0 0078 4800 |H | Short_Literal 0x0 0079 4817 |H | Short_Literal 0x17 007a e00c | | Load 0x0,0xc 007b 0334 | 4 | Declare_Variable Array,With_Constraint 007c 502b |P+ | Indirect_Literal Any,0xa8,{0x5472616e, 0x73706f72} 007d 4800 |H | Short_Literal 0x0 007e 4805 |H | Short_Literal 0x5 007f e00c | | Load 0x0,0xc 0080 0334 | 4 | Declare_Variable Array,With_Constraint 0081 5032 |P2 | Indirect_Literal Any,0xb4,{0x54457272, 0x6f720000} 0082 4800 |H | Short_Literal 0x0 0083 4808 |H | Short_Literal 0x8 0084 e00c | | Load 0x0,0xc 0085 0334 | 4 | Declare_Variable Array,With_Constraint 0086 5031 |P1 | Indirect_Literal Any,0xb8,{0x586c6962, 0x4572726f} 0087 800d | | Call 0x0,0xd 0088 4800 |H | Short_Literal 0x0 0089 4801 |H | Short_Literal 0x1 008a e00c | | Load 0x0,0xc 008b 0334 | 4 | Declare_Variable Array,With_Constraint 008c 5033 |P3 | Indirect_Literal Any,0xc0,{0x20280000, 0x00000000} 008d 01cc | | Execute Vector,Catenate 008e e5fe | | Load 0x2,-0x2 008f 01cc | | Execute Vector,Catenate 0090 4800 |H | Short_Literal 0x0 0091 4802 |H | Short_Literal 0x2 0092 e00c | | Load 0x0,0xc 0093 0334 | 4 | Declare_Variable Array,With_Constraint 0094 502f |P/ | Indirect_Literal Any,0xc4,{0x20292000, 0x00000000} 0095 01cc | | Execute Vector,Catenate 0096 e5ff | | Load 0x2,-0x1 0097 0227 | ' | Execute Access,All_Reference 0098 3438 |48 | Execute Record,Field_Reference,Field_Number 0x38 0099 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 009a 800e | | Call 0x0,0xe 009b 800f | | Call 0x0,0xf 009c 01cc | | Execute Vector,Catenate 009d 8010 | | Call 0x0,0x10 009e 00d2 | | Pop_Control Pop_Count_2 009f 00db | | Load_Top At_Offset_3 00a0 00d9 | | Load_Top At_Offset_1 00a1 8011 | | Call 0x0,0x11 00a2 8012 | | Call 0x0,0x12 00a3 e013 | | Load 0x0,0x13 00a4 0257 | W | Execute Discrete,Raise 00a5 0000 0000 | | .XXX[0x3] 00a7 0000 | | 00a8 5472 616e |Tran| .LITERAL {0x5472616e, 0x73706f72} 00ac 7420 7061 |t pa| .XXX[0x8] 00ae 636b 6167 |ckag| 00b0 6520 6572 |e er| 00b2 726f 723a |ror:| 00b4 5445 7272 |TErr| .LITERAL {0x54457272, 0x6f720000} 00b8 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x4572726f} 00bc 7200 0000 |r | .XXX[0x4] 00be 0000 0000 | | 00c0 2028 0000 | ( | .LITERAL {0x20280000, 0x00000000} 00c4 2029 2000 | ) | .LITERAL {0x20292000, 0x00000000} 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 00da | | Load_Top At_Offset_2 00cc 0227 | ' | Execute Access,All_Reference 00cd 3c3a |<: | Execute Record,Field_Read,Field_Number 0x3a 00ce e009 | | Load 0x0,0x9 00cf 022e | . | Execute Access,Not_Equal 00d0 6806 |h | Jump_Zero 0xd7 00d1 00da | | Load_Top At_Offset_2 00d2 00db | | Load_Top At_Offset_3 00d3 0227 | ' | Execute Access,All_Reference 00d4 3c3a |<: | Execute Record,Field_Read,Field_Number 0x3a 00d5 8014 | | Call 0x0,0x14 00d6 8015 | | Call 0x0,0x15 00d7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00dd | | .CONST 0x00dd ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0002 | | .CONST 0x0002 ; Number of locals 00db INIT_00d8: 00db e016 | | Load 0x0,0x16 00dc 0322 | " | Declare_Variable Record 00dd BODY_00d8: 00dd 00db | | Load_Top At_Offset_3 00de 0227 | ' | Execute Access,All_Reference 00df 340e |4 | Execute Record,Field_Reference,Field_Number 0xe 00e0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e1 e5ff | | Load 0x2,-0x1 00e2 0227 | ' | Execute Access,All_Reference 00e3 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 00e4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e5 027c | | | Execute Discrete,Less 00e6 6801 |h | Jump_Zero 0xe8 00e7 08e0 | | Execute_Immediate Raise,0xe0 00e8 00db | | Load_Top At_Offset_3 00e9 0227 | ' | Execute Access,All_Reference 00ea 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 00eb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00ec e5ff | | Load 0x2,-0x1 00ed 0227 | ' | Execute Access,All_Reference 00ee 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 00ef 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00f0 0273 | s | Execute Discrete,Plus 00f1 00d9 | | Load_Top At_Offset_1 00f2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00f3 00db | | Load_Top At_Offset_3 00f4 0227 | ' | Execute Access,All_Reference 00f5 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 00f6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00f7 e5ff | | Load 0x2,-0x1 00f8 0227 | ' | Execute Access,All_Reference 00f9 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 00fa 0273 | s | Execute Discrete,Plus 00fb e5ff | | Load 0x2,-0x1 00fc 0227 | ' | Execute Access,All_Reference 00fd 340f |4 | Execute Record,Field_Reference,Field_Number 0xf 00fe 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00ff 00d8 | | Load_Top At_Offset_0 0100 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0101 0000 0000 | | .BLANK 0000[0x7] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010e | | .CONST 0x010e ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0003 | | .CONST 0x0003 ; Number of locals 010b INIT_0108: 010b e017 | | Load 0x0,0x17 010c 029f 0433 | 3| Declare_Subprogram INIT_0430,For_Call 010e BODY_0108: 010e e5ff | | Load 0x2,-0x1 010f 0227 | ' | Execute Access,All_Reference 0110 3c29 |<) | Execute Record,Field_Read,Field_Number 0x29 0111 003a | : | Store_Top Access,At_Offset_2 0112 00d9 | | Load_Top At_Offset_1 0113 e017 | | Load 0x0,0x17 0114 022f | / | Execute Access,Equal 0115 6802 |h | Jump_Zero 0x118 0116 8403 | | Call 0x2,0x3 0117 780a |x | Jump 0x122 0118 00d9 | | Load_Top At_Offset_1 0119 0227 | ' | Execute Access,All_Reference 011a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 011b e5ff | | Load 0x2,-0x1 011c 0227 | ' | Execute Access,All_Reference 011d 3829 |8) | Execute Record,Field_Write,Field_Number 0x29 011e e017 | | Load 0x0,0x17 011f 00da | | Load_Top At_Offset_2 0120 0227 | ' | Execute Access,All_Reference 0121 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0122 e5fe | | Load 0x2,-0x2 0123 00da | | Load_Top At_Offset_2 0124 0227 | ' | Execute Access,All_Reference 0125 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0126 e017 | | Load 0x0,0x17 0127 00da | | Load_Top At_Offset_2 0128 0227 | ' | Execute Access,All_Reference 0129 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 012a e5ff | | Load 0x2,-0x1 012b 0227 | ' | Execute Access,All_Reference 012c 3c27 |<' | Execute Record,Field_Read,Field_Number 0x27 012d 6807 |h | Jump_Zero 0x135 012e 00d9 | | Load_Top At_Offset_1 012f e5ff | | Load 0x2,-0x1 0130 0227 | ' | Execute Access,All_Reference 0131 3c27 |<' | Execute Record,Field_Read,Field_Number 0x27 0132 0227 | ' | Execute Access,All_Reference 0133 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0134 7804 |x | Jump 0x139 0135 00d9 | | Load_Top At_Offset_1 0136 e5ff | | Load 0x2,-0x1 0137 0227 | ' | Execute Access,All_Reference 0138 3826 |8& | Execute Record,Field_Write,Field_Number 0x26 0139 00d9 | | Load_Top At_Offset_1 013a e5ff | | Load 0x2,-0x1 013b 0227 | ' | Execute Access,All_Reference 013c 3827 |8' | Execute Record,Field_Write,Field_Number 0x27 013d e5ff | | Load 0x2,-0x1 013e 0227 | ' | Execute Access,All_Reference 013f 3c28 |<( | Execute Record,Field_Read,Field_Number 0x28 0140 0a01 | | Execute_Immediate Plus,0x1 0141 e5ff | | Load 0x2,-0x1 0142 0227 | ' | Execute Access,All_Reference 0143 3828 |8( | Execute Record,Field_Write,Field_Number 0x28 0144 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0145 0000 0000 | | .XXX[0x3] 0147 0000 | | 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014d | M | .CONST 0x014d ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0002 | | .CONST 0x0002 ; Number of locals 014b INIT_0148: 014b 029f 0443 | C| Declare_Subprogram INIT_0440,For_Call 014d BODY_0148: 014d 00db | | Load_Top At_Offset_3 014e 0227 | ' | Execute Access,All_Reference 014f 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0150 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0151 00d8 | | Load_Top At_Offset_0 0152 0d40 | @ | Execute_Immediate Less,0x40 0153 7015 |p | Jump_Nonzero 0x169 0154 00d8 | | Load_Top At_Offset_0 0155 0c44 | D | Execute_Immediate Greater_Equal,0x44 0156 7007 |p | Jump_Nonzero 0x15e 0157 0b40 | @ | Execute_Immediate Case_Compare,0x40 0158 7046 |pF | Jump_Nonzero 0x19f 0159 0b41 | A | Execute_Immediate Case_Compare,0x41 015a 7033 |p3 | Jump_Nonzero 0x18e 015b 0f43 | C | Execute_Immediate Equal,0x43 015c 7053 |pS | Jump_Nonzero 0x1b0 015d 7873 |xs | Jump 0x1d1 015e 0b45 | E | Execute_Immediate Case_Compare,0x45 015f 700c |p | Jump_Nonzero 0x16c 0160 0b46 | F | Execute_Immediate Case_Compare,0x46 0161 705e |p^ | Jump_Nonzero 0x1c0 0162 0b47 | G | Execute_Immediate Case_Compare,0x47 0163 7019 |p | Jump_Nonzero 0x17d 0164 4880 |H | Short_Literal 0x80 0165 48ff |H | Short_Literal 0xff 0166 0262 | b | Execute Discrete,In_Range 0167 7079 |py | Jump_Nonzero 0x1e1 0168 787a |xz | Jump 0x1e3 0169 6801 |h | Jump_Zero 0x16b 016a 7878 |xx | Jump 0x1e3 016b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 016c 00d1 | | Pop_Control Pop_Count_1 016d 00db | | Load_Top At_Offset_3 016e 0227 | ' | Execute Access,All_Reference 016f 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0170 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0171 e5ff | | Load 0x2,-0x1 0172 0227 | ' | Execute Access,All_Reference 0173 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0174 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0175 e5ff | | Load 0x2,-0x1 0176 e018 | | Load 0x0,0x18 0177 a019 | | Store_Unchecked 0x0,0x19 0178 e01a | | Load 0x0,0x1a 0179 e01b | | Load 0x0,0x1b 017a a01c | | Store_Unchecked 0x0,0x1c 017b 801d | | Call 0x0,0x1d 017c 7868 |xh | Jump 0x1e5 017d 00d1 | | Pop_Control Pop_Count_1 017e 00db | | Load_Top At_Offset_3 017f 0227 | ' | Execute Access,All_Reference 0180 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0181 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0182 e5ff | | Load 0x2,-0x1 0183 0227 | ' | Execute Access,All_Reference 0184 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0185 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0186 e5ff | | Load 0x2,-0x1 0187 e01e | | Load 0x0,0x1e 0188 a01f | | Store_Unchecked 0x0,0x1f 0189 e020 | | Load 0x0,0x20 018a e021 | ! | Load 0x0,0x21 018b a022 | " | Store_Unchecked 0x0,0x22 018c 801d | | Call 0x0,0x1d 018d 7857 |xW | Jump 0x1e5 018e 00d1 | | Pop_Control Pop_Count_1 018f 00db | | Load_Top At_Offset_3 0190 0227 | ' | Execute Access,All_Reference 0191 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0192 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0193 e5ff | | Load 0x2,-0x1 0194 0227 | ' | Execute Access,All_Reference 0195 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0196 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 0197 e5ff | | Load 0x2,-0x1 0198 e023 | # | Load 0x0,0x23 0199 a024 | $ | Store_Unchecked 0x0,0x24 019a e025 | % | Load 0x0,0x25 019b e026 | & | Load 0x0,0x26 019c a027 | ' | Store_Unchecked 0x0,0x27 019d 801d | | Call 0x0,0x1d 019e 7846 |xF | Jump 0x1e5 019f 00d1 | | Pop_Control Pop_Count_1 01a0 00db | | Load_Top At_Offset_3 01a1 0227 | ' | Execute Access,All_Reference 01a2 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01a3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01a4 e5ff | | Load 0x2,-0x1 01a5 0227 | ' | Execute Access,All_Reference 01a6 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01a7 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6 01a8 e5ff | | Load 0x2,-0x1 01a9 e028 | ( | Load 0x0,0x28 01aa a029 | ) | Store_Unchecked 0x0,0x29 01ab e02a | * | Load 0x0,0x2a 01ac e02b | + | Load 0x0,0x2b 01ad a02c | , | Store_Unchecked 0x0,0x2c 01ae 801d | | Call 0x0,0x1d 01af 7835 |x5 | Jump 0x1e5 01b0 00db | | Load_Top At_Offset_3 01b1 0227 | ' | Execute Access,All_Reference 01b2 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01b3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01b4 e5ff | | Load 0x2,-0x1 01b5 0227 | ' | Execute Access,All_Reference 01b6 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01b7 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7 01b8 e5ff | | Load 0x2,-0x1 01b9 e02d | - | Load 0x0,0x2d 01ba a02e | . | Store_Unchecked 0x0,0x2e 01bb e02f | / | Load 0x0,0x2f 01bc e030 | 0 | Load 0x0,0x30 01bd a031 | 1 | Store_Unchecked 0x0,0x31 01be 801d | | Call 0x0,0x1d 01bf 7825 |x% | Jump 0x1e5 01c0 00d1 | | Pop_Control Pop_Count_1 01c1 00db | | Load_Top At_Offset_3 01c2 0227 | ' | Execute Access,All_Reference 01c3 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01c4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01c5 e5ff | | Load 0x2,-0x1 01c6 0227 | ' | Execute Access,All_Reference 01c7 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01c8 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8 01c9 e5ff | | Load 0x2,-0x1 01ca e032 | 2 | Load 0x0,0x32 01cb a033 | 3 | Store_Unchecked 0x0,0x33 01cc e034 | 4 | Load 0x0,0x34 01cd e035 | 5 | Load 0x0,0x35 01ce a036 | 6 | Store_Unchecked 0x0,0x36 01cf 801d | | Call 0x0,0x1d 01d0 7814 |x | Jump 0x1e5 01d1 00db | | Load_Top At_Offset_3 01d2 0227 | ' | Execute Access,All_Reference 01d3 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01d4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01d5 e5ff | | Load 0x2,-0x1 01d6 0227 | ' | Execute Access,All_Reference 01d7 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01d8 3409 |4 | Execute Record,Field_Reference,Field_Number 0x9 01d9 e5ff | | Load 0x2,-0x1 01da e037 | 7 | Load 0x0,0x37 01db a038 | 8 | Store_Unchecked 0x0,0x38 01dc e039 | 9 | Load 0x0,0x39 01dd e03a | : | Load 0x0,0x3a 01de a03b | ; | Store_Unchecked 0x0,0x3b 01df 801d | | Call 0x0,0x1d 01e0 7804 |x | Jump 0x1e5 01e1 8402 | | Call 0x2,0x2 01e2 7802 |x | Jump 0x1e5 01e3 e03c | < | Load 0x0,0x3c 01e4 0257 | W | Execute Discrete,Raise 01e5 4800 |H | Short_Literal 0x0 01e6 e5ff | | Load 0x2,-0x1 01e7 0227 | ' | Execute Access,All_Reference 01e8 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 01e9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01ea 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01eb 0000 0000 | | .BLANK 0000[0x5] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f8 | | .CONST 0x01f8 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0004 | | .CONST 0x0004 ; Number of locals 01f3 INIT_01f0: 01f3 e03d | = | Load 0x0,0x3d 01f4 029f 045b | [| Declare_Subprogram INIT_0458,For_Call 01f6 029f 0483 | | Declare_Subprogram INIT_0480,For_Call 01f8 BODY_01f0: 01f8 e5ff | | Load 0x2,-0x1 01f9 e004 | | Load 0x0,0x4 01fa 022f | / | Execute Access,Equal 01fb 6801 |h | Jump_Zero 0x1fd 01fc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01fd e5ff | | Load 0x2,-0x1 01fe 0227 | ' | Execute Access,All_Reference 01ff 3c36 |<6 | Execute Record,Field_Read,Field_Number 0x36 0200 680b |h | Jump_Zero 0x20c 0201 e5ff | | Load 0x2,-0x1 0202 0229 | ) | Execute Access,All_Read 0203 00d8 | | Load_Top At_Offset_0 0204 3c36 |<6 | Execute Record,Field_Read,Field_Number 0x36 0205 e03e | > | Load 0x0,0x3e 0206 e03f | ? | Load 0x0,0x3f 0207 a040 | @ | Store_Unchecked 0x0,0x40 0208 8002 | | Call 0x0,0x2 0209 00d9 | | Load_Top At_Offset_1 020a 3836 |86 | Execute Record,Field_Write,Field_Number 0x36 020b 00d1 | | Pop_Control Pop_Count_1 020c e5ff | | Load 0x2,-0x1 020d 0227 | ' | Execute Access,All_Reference 020e 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 020f 680b |h | Jump_Zero 0x21b 0210 e5ff | | Load 0x2,-0x1 0211 0229 | ) | Execute Access,All_Read 0212 00d8 | | Load_Top At_Offset_0 0213 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 0214 e03e | > | Load 0x0,0x3e 0215 e03f | ? | Load 0x0,0x3f 0216 a040 | @ | Store_Unchecked 0x0,0x40 0217 8002 | | Call 0x0,0x2 0218 00d9 | | Load_Top At_Offset_1 0219 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 021a 00d1 | | Pop_Control Pop_Count_1 021b e5ff | | Load 0x2,-0x1 021c 0227 | ' | Execute Access,All_Reference 021d 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 021e 684b |hK | Jump_Zero 0x26a 021f 00cf | | Action Mark_Auxiliary 0220 e5ff | | Load 0x2,-0x1 0221 0227 | ' | Execute Access,All_Reference 0222 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0223 0227 | ' | Execute Access,All_Reference 0224 01d9 | | Execute Vector,Reverse_Bounds 0225 0263 | c | Execute Discrete,Above_Bound 0226 7037 |p7 | Jump_Nonzero 0x25e 0227 00d8 | | Load_Top At_Offset_0 0228 e5ff | | Load 0x2,-0x1 0229 0227 | ' | Execute Access,All_Reference 022a 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 022b 0227 | ' | Execute Access,All_Reference 022c 01d7 | | Execute Vector,Field_Read 022d a402 | | Store_Unchecked 0x2,0x2 022e e402 | | Load 0x2,0x2 022f 0227 | ' | Execute Access,All_Reference 0230 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0231 681c |h | Jump_Zero 0x24e 0232 00cf | | Action Mark_Auxiliary 0233 00d9 | | Load_Top At_Offset_1 0234 e5ff | | Load 0x2,-0x1 0235 0227 | ' | Execute Access,All_Reference 0236 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0237 0227 | ' | Execute Access,All_Reference 0238 01d7 | | Execute Vector,Field_Read 0239 0227 | ' | Execute Access,All_Reference 023a 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 023b 0227 | ' | Execute Access,All_Reference 023c 01d9 | | Execute Vector,Reverse_Bounds 023d 0263 | c | Execute Discrete,Above_Bound 023e 7003 |p | Jump_Nonzero 0x242 023f 8403 | | Call 0x2,0x3 0240 00c8 | | Action Pop_Auxiliary_Range 0241 3ffd |? | Loop_Increasing 0x23f 0242 00ce | | Action Pop_Auxiliary 0243 e402 | | Load 0x2,0x2 0244 0229 | ) | Execute Access,All_Read 0245 00d8 | | Load_Top At_Offset_0 0246 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0247 e041 | A | Load 0x0,0x41 0248 e042 | B | Load 0x0,0x42 0249 a043 | C | Store_Unchecked 0x0,0x43 024a 8002 | | Call 0x0,0x2 024b 00d9 | | Load_Top At_Offset_1 024c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 024d 00d1 | | Pop_Control Pop_Count_1 024e e402 | | Load 0x2,0x2 024f 0229 | ) | Execute Access,All_Read 0250 00d8 | | Load_Top At_Offset_0 0251 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0252 8044 | D | Call 0x0,0x44 0253 00d9 | | Load_Top At_Offset_1 0254 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0255 00d1 | | Pop_Control Pop_Count_1 0256 e402 | | Load 0x2,0x2 0257 e045 | E | Load 0x0,0x45 0258 e046 | F | Load 0x0,0x46 0259 a047 | G | Store_Unchecked 0x0,0x47 025a 8002 | | Call 0x0,0x2 025b c402 | | Store 0x2,0x2 025c 00c8 | | Action Pop_Auxiliary_Range 025d 3fc9 |? | Loop_Increasing 0x227 025e 00ce | | Action Pop_Auxiliary 025f e5ff | | Load 0x2,-0x1 0260 0229 | ) | Execute Access,All_Read 0261 00d8 | | Load_Top At_Offset_0 0262 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0263 e048 | H | Load 0x0,0x48 0264 e049 | I | Load 0x0,0x49 0265 a04a | J | Store_Unchecked 0x0,0x4a 0266 8002 | | Call 0x0,0x2 0267 00d9 | | Load_Top At_Offset_1 0268 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 0269 00d1 | | Pop_Control Pop_Count_1 026a e5ff | | Load 0x2,-0x1 026b 0227 | ' | Execute Access,All_Reference 026c 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 026d 6833 |h3 | Jump_Zero 0x2a1 026e 00cf | | Action Mark_Auxiliary 026f e5ff | | Load 0x2,-0x1 0270 0227 | ' | Execute Access,All_Reference 0271 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0272 0227 | ' | Execute Access,All_Reference 0273 01d9 | | Execute Vector,Reverse_Bounds 0274 0263 | c | Execute Discrete,Above_Bound 0275 701f |p | Jump_Nonzero 0x295 0276 00d8 | | Load_Top At_Offset_0 0277 e5ff | | Load 0x2,-0x1 0278 0229 | ) | Execute Access,All_Read 0279 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 027a 0229 | ) | Execute Access,All_Read 027b 01d7 | | Execute Vector,Field_Read 027c 0229 | ) | Execute Access,All_Read 027d 00d8 | | Load_Top At_Offset_0 027e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 027f 8044 | D | Call 0x0,0x44 0280 00d9 | | Load_Top At_Offset_1 0281 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0282 00d1 | | Pop_Control Pop_Count_1 0283 e5ff | | Load 0x2,-0x1 0284 0229 | ) | Execute Access,All_Read 0285 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0286 0229 | ) | Execute Access,All_Read 0287 00d9 | | Load_Top At_Offset_1 0288 00d8 | | Load_Top At_Offset_0 0289 00da | | Load_Top At_Offset_2 028a 01d7 | | Execute Vector,Field_Read 028b e04b | K | Load 0x0,0x4b 028c e04c | L | Load 0x0,0x4c 028d a04d | M | Store_Unchecked 0x0,0x4d 028e 8002 | | Call 0x0,0x2 028f 00d9 | | Load_Top At_Offset_1 0290 00db | | Load_Top At_Offset_3 0291 01d6 | | Execute Vector,Field_Write 0292 00d2 | | Pop_Control Pop_Count_2 0293 00c8 | | Action Pop_Auxiliary_Range 0294 3fe1 |? | Loop_Increasing 0x276 0295 00ce | | Action Pop_Auxiliary 0296 e5ff | | Load 0x2,-0x1 0297 0229 | ) | Execute Access,All_Read 0298 00d8 | | Load_Top At_Offset_0 0299 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 029a e04e | N | Load 0x0,0x4e 029b e04f | O | Load 0x0,0x4f 029c a050 | P | Store_Unchecked 0x0,0x50 029d 8002 | | Call 0x0,0x2 029e 00d9 | | Load_Top At_Offset_1 029f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 02a0 00d1 | | Pop_Control Pop_Count_1 02a1 e5ff | | Load 0x2,-0x1 02a2 0227 | ' | Execute Access,All_Reference 02a3 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26 02a4 6801 |h | Jump_Zero 0x2a6 02a5 8404 | | Call 0x2,0x4 02a6 e5ff | | Load 0x2,-0x1 02a7 0227 | ' | Execute Access,All_Reference 02a8 3c21 |<! | Execute Record,Field_Read,Field_Number 0x21 02a9 e051 | Q | Load 0x0,0x51 02aa 022e | . | Execute Access,Not_Equal 02ab 6808 |h | Jump_Zero 0x2b4 02ac e5ff | | Load 0x2,-0x1 02ad 0229 | ) | Execute Access,All_Read 02ae 00d8 | | Load_Top At_Offset_0 02af 3c21 |<! | Execute Record,Field_Read,Field_Number 0x21 02b0 8052 | R | Call 0x0,0x52 02b1 00d9 | | Load_Top At_Offset_1 02b2 3821 |8! | Execute Record,Field_Write,Field_Number 0x21 02b3 00d1 | | Pop_Control Pop_Count_1 02b4 e5ff | | Load 0x2,-0x1 02b5 0227 | ' | Execute Access,All_Reference 02b6 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b 02b7 680b |h | Jump_Zero 0x2c3 02b8 e5ff | | Load 0x2,-0x1 02b9 0229 | ) | Execute Access,All_Read 02ba 00d8 | | Load_Top At_Offset_0 02bb 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b 02bc e053 | S | Load 0x0,0x53 02bd e054 | T | Load 0x0,0x54 02be a055 | U | Store_Unchecked 0x0,0x55 02bf 8002 | | Call 0x0,0x2 02c0 00d9 | | Load_Top At_Offset_1 02c1 381b |8 | Execute Record,Field_Write,Field_Number 0x1b 02c2 00d1 | | Pop_Control Pop_Count_1 02c3 e5ff | | Load 0x2,-0x1 02c4 0227 | ' | Execute Access,All_Reference 02c5 3c20 |< | Execute Record,Field_Read,Field_Number 0x20 02c6 681b |h | Jump_Zero 0x2e2 02c7 e5ff | | Load 0x2,-0x1 02c8 0227 | ' | Execute Access,All_Reference 02c9 3c20 |< | Execute Record,Field_Read,Field_Number 0x20 02ca 0227 | ' | Execute Access,All_Reference 02cb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02cc 680d |h | Jump_Zero 0x2da 02cd e5ff | | Load 0x2,-0x1 02ce 0229 | ) | Execute Access,All_Read 02cf 3c20 |< | Execute Record,Field_Read,Field_Number 0x20 02d0 0229 | ) | Execute Access,All_Read 02d1 00d8 | | Load_Top At_Offset_0 02d2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02d3 e056 | V | Load 0x0,0x56 02d4 e057 | W | Load 0x0,0x57 02d5 a058 | X | Store_Unchecked 0x0,0x58 02d6 8002 | | Call 0x0,0x2 02d7 00d9 | | Load_Top At_Offset_1 02d8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02d9 00d1 | | Pop_Control Pop_Count_1 02da e5ff | | Load 0x2,-0x1 02db 0229 | ) | Execute Access,All_Read 02dc 00d8 | | Load_Top At_Offset_0 02dd 3c20 |< | Execute Record,Field_Read,Field_Number 0x20 02de 8059 | Y | Call 0x0,0x59 02df 00d9 | | Load_Top At_Offset_1 02e0 3820 |8 | Execute Record,Field_Write,Field_Number 0x20 02e1 00d1 | | Pop_Control Pop_Count_1 02e2 e5ff | | Load 0x2,-0x1 02e3 0227 | ' | Execute Access,All_Reference 02e4 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a 02e5 6808 |h | Jump_Zero 0x2ee 02e6 e5ff | | Load 0x2,-0x1 02e7 0229 | ) | Execute Access,All_Read 02e8 00d8 | | Load_Top At_Offset_0 02e9 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a 02ea 805a | Z | Call 0x0,0x5a 02eb 00d9 | | Load_Top At_Offset_1 02ec 381a |8 | Execute Record,Field_Write,Field_Number 0x1a 02ed 00d1 | | Pop_Control Pop_Count_1 02ee e5ff | | Load 0x2,-0x1 02ef 0227 | ' | Execute Access,All_Reference 02f0 3c22 |<" | Execute Record,Field_Read,Field_Number 0x22 02f1 e05b | [ | Load 0x0,0x5b 02f2 022e | . | Execute Access,Not_Equal 02f3 680b |h | Jump_Zero 0x2ff 02f4 e5ff | | Load 0x2,-0x1 02f5 0229 | ) | Execute Access,All_Read 02f6 00d8 | | Load_Top At_Offset_0 02f7 3c22 |<" | Execute Record,Field_Read,Field_Number 0x22 02f8 e03e | > | Load 0x0,0x3e 02f9 e03f | ? | Load 0x0,0x3f 02fa a040 | @ | Store_Unchecked 0x0,0x40 02fb 8002 | | Call 0x0,0x2 02fc 00d9 | | Load_Top At_Offset_1 02fd 3822 |8" | Execute Record,Field_Write,Field_Number 0x22 02fe 00d1 | | Pop_Control Pop_Count_1 02ff e5ff | | Load 0x2,-0x1 0300 0229 | ) | Execute Access,All_Read 0301 00d8 | | Load_Top At_Offset_0 0302 3c23 |<# | Execute Record,Field_Read,Field_Number 0x23 0303 8044 | D | Call 0x0,0x44 0304 00d9 | | Load_Top At_Offset_1 0305 3823 |8# | Execute Record,Field_Write,Field_Number 0x23 0306 00d1 | | Pop_Control Pop_Count_1 0307 4800 |H | Short_Literal 0x0 0308 e5ff | | Load 0x2,-0x1 0309 0227 | ' | Execute Access,All_Reference 030a 3c37 |<7 | Execute Record,Field_Read,Field_Number 0x37 030b 0229 | ) | Execute Access,All_Read 030c e008 | | Load 0x0,0x8 030d 00ad | | QQ_Action Package,Field_Execute_Dynamic 030e e5ff | | Load 0x2,-0x1 030f 0229 | ) | Execute Access,All_Read 0310 00d8 | | Load_Top At_Offset_0 0311 3c37 |<7 | Execute Record,Field_Read,Field_Number 0x37 0312 805c | \ | Call 0x0,0x5c 0313 00d9 | | Load_Top At_Offset_1 0314 3837 |87 | Execute Record,Field_Write,Field_Number 0x37 0315 00d1 | | Pop_Control Pop_Count_1 0316 e5ff | | Load 0x2,-0x1 0317 e218 | | Load 0x1,0x18 0318 e219 | | Load 0x1,0x19 0319 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 031a 8002 | | Call 0x0,0x2 031b c5ff | | Store 0x2,-0x1 031c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 031d 0000 0000 | | .XXX[0x3] 031f 0000 | | 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0333 | 3 | .CONST 0x0333 ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0009 | | .CONST 0x0009 ; Number of locals 0323 INIT_0320: 0323 e05d | ] | Load 0x0,0x5d 0324 0322 | " | Declare_Variable Record 0325 e05e | ^ | Load 0x0,0x5e 0326 0007 | | Action Break_Optional 0327 e05e | ^ | Load 0x0,0x5e 0328 0007 | | Action Break_Optional 0329 e05f | _ | Load 0x0,0x5f 032a 0007 | | Action Break_Optional 032b e05f | _ | Load 0x0,0x5f 032c 0007 | | Action Break_Optional 032d e05f | _ | Load 0x0,0x5f 032e 0007 | | Action Break_Optional 032f e060 | ` | Load 0x0,0x60 0330 0007 | | Action Break_Optional 0331 e061 | a | Load 0x0,0x61 0332 0007 | | Action Break_Optional 0333 BODY_0320: 0333 e061 | a | Load 0x0,0x61 0334 e060 | ` | Load 0x0,0x60 0335 e05f | _ | Load 0x0,0x5f 0336 00d8 | | Load_Top At_Offset_0 0337 e05f | _ | Load 0x0,0x5f 0338 e05e | ^ | Load 0x0,0x5e 0339 00d8 | | Load_Top At_Offset_0 033a e402 | | Load 0x2,0x2 033b e5fe | | Load 0x2,-0x2 033c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 033d e5ff | | Load 0x2,-0x1 033e 8062 | b | Call 0x0,0x62 033f 00d1 | | Pop_Control Pop_Count_1 0340 c403 | | Store 0x2,0x3 0341 c404 | | Store 0x2,0x4 0342 c405 | | Store 0x2,0x5 0343 c406 | | Store 0x2,0x6 0344 c407 | | Store 0x2,0x7 0345 005b | [ | Store_Top Discrete,At_Offset_3 0346 0059 | Y | Store_Top Discrete,At_Offset_1 0347 00d8 | | Load_Top At_Offset_0 0348 7002 |p | Jump_Nonzero 0x34b 0349 e03d | = | Load 0x0,0x3d 034a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 034b 00cf | | Action Mark_Auxiliary 034c e5ff | | Load 0x2,-0x1 034d 0227 | ' | Execute Access,All_Reference 034e 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 034f 0227 | ' | Execute Access,All_Reference 0350 01d9 | | Execute Vector,Reverse_Bounds 0351 0263 | c | Execute Discrete,Above_Bound 0352 700c |p | Jump_Nonzero 0x35f 0353 e402 | | Load 0x2,0x2 0354 00d9 | | Load_Top At_Offset_1 0355 e5ff | | Load 0x2,-0x1 0356 8063 | c | Call 0x0,0x63 0357 017f | | Execute Record,Equal 0358 6804 |h | Jump_Zero 0x35d 0359 00d8 | | Load_Top At_Offset_0 035a e5ff | | Load 0x2,-0x1 035b 8064 | d | Call 0x0,0x64 035c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 035d 00c8 | | Action Pop_Auxiliary_Range 035e 3ff4 |? | Loop_Increasing 0x353 035f 00ce | | Action Pop_Auxiliary 0360 e03d | = | Load 0x0,0x3d 0361 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0362 0000 0000 | | .BLANK 0000[0x6] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 036f | o | .CONST 0x036f ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0003 | | .CONST 0x0003 ; Number of locals 036b INIT_0368: 036b e065 | e | Load 0x0,0x65 036c 0007 | | Action Break_Optional 036d e065 | e | Load 0x0,0x65 036e 0007 | | Action Break_Optional 036f BODY_0368: 036f e5fe | | Load 0x2,-0x2 0370 0f0b | | Execute_Immediate Equal,0xb 0371 6804 |h | Jump_Zero 0x376 0372 e5ff | | Load 0x2,-0x1 0373 0227 | ' | Execute Access,All_Reference 0374 3c2c |<, | Execute Record,Field_Read,Field_Number 0x2c 0375 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0376 e5fd | | Load 0x2,-0x3 0377 6060 |`` | Indirect_Literal Discrete,0x3d8,{0x00000000, 0x0000ffff} 0378 8066 | f | Call 0x0,0x66 0379 e5ff | | Load 0x2,-0x1 037a 0227 | ' | Execute Access,All_Reference 037b 3c2c |<, | Execute Record,Field_Read,Field_Number 0x2c 037c 8067 | g | Call 0x0,0x67 037d 8068 | h | Call 0x0,0x68 037e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 037f e5ff | | Load 0x2,-0x1 0380 0227 | ' | Execute Access,All_Reference 0381 3c2c |<, | Execute Record,Field_Read,Field_Number 0x2c 0382 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0383 00cf | | Action Mark_Auxiliary 0384 783e |x> | Jump 0x3c3 0385 00da | | Load_Top At_Offset_2 0386 604d |`M | Indirect_Literal Discrete,0x3d4,{0x00000000, 0x00010000} 0387 0273 | s | Execute Discrete,Plus 0388 005b | [ | Store_Top Discrete,At_Offset_3 0389 00da | | Load_Top At_Offset_2 038a e5ff | | Load 0x2,-0x1 038b 0227 | ' | Execute Access,All_Reference 038c 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b 038d 027d | } | Execute Discrete,Greater 038e 6833 |h3 | Jump_Zero 0x3c2 038f 00da | | Load_Top At_Offset_2 0390 603f |`? | Indirect_Literal Discrete,0x3d0,{0xffffffff, 0xffff0000} 0391 0273 | s | Execute Discrete,Plus 0392 005b | [ | Store_Top Discrete,At_Offset_3 0393 4802 |H | Short_Literal 0x2 0394 4800 |H | Short_Literal 0x0 0395 00e5 | | Load_Encached Long_Integer_Cache 0396 00d9 | | Load_Top At_Offset_1 0397 0267 | g | Execute Discrete,Predecessor 0398 e00c | | Load 0x0,0xc 0399 0334 | 4 | Declare_Variable Array,With_Constraint 039a 4800 |H | Short_Literal 0x0 039b 00e5 | | Load_Encached Long_Integer_Cache 039c 00d9 | | Load_Top At_Offset_1 039d 0267 | g | Execute Discrete,Predecessor 039e e00c | | Load 0x0,0xc 039f 0334 | 4 | Declare_Variable Array,With_Constraint 03a0 4800 |H | Short_Literal 0x0 03a1 00e5 | | Load_Encached Long_Integer_Cache 03a2 00d9 | | Load_Top At_Offset_1 03a3 0267 | g | Execute Discrete,Predecessor 03a4 e00c | | Load 0x0,0xc 03a5 0334 | 4 | Declare_Variable Array,With_Constraint 03a6 e5fe | | Load 0x2,-0x2 03a7 e069 | i | Load 0x0,0x69 03a8 011c | | Execute Any,Convert_Unchecked 03a9 1c01 | | Execute_Immediate Run_Utility,0x1 03aa 800f | | Call 0x0,0xf 03ab e5ff | | Load 0x2,-0x1 03ac 0227 | ' | Execute Access,All_Reference 03ad 3c2b |<+ | Execute Record,Field_Read,Field_Number 0x2b 03ae 821d | | Call 0x1,0x1d 03af e402 | | Load 0x2,0x2 03b0 821d | | Call 0x1,0x1d 03b1 4800 |H | Short_Literal 0x0 03b2 4838 |H8 | Short_Literal 0x38 03b3 e00c | | Load 0x0,0xc 03b4 0334 | 4 | Declare_Variable Array,With_Constraint 03b5 5026 |P& | Indirect_Literal Any,0x3dc,{0x586c6962, 0x3b205365} 03b6 4800 |H | Short_Literal 0x0 03b7 480b |H | Short_Literal 0xb 03b8 e00c | | Load 0x0,0xc 03b9 0334 | 4 | Declare_Variable Array,With_Constraint 03ba 5041 |PA | Indirect_Literal Any,0x3fc,{0x53657175, 0x656e6365} 03bb 4800 |H | Short_Literal 0x0 03bc 4808 |H | Short_Literal 0x8 03bd e00c | | Load 0x0,0xc 03be 0334 | 4 | Declare_Variable Array,With_Constraint 03bf 5044 |PD | Indirect_Literal Any,0x404,{0x586c6962, 0x4572726f} 03c0 806a | j | Call 0x0,0x6a 03c1 7805 |x | Jump 0x3c7 03c2 00c9 | | Action Pop_Auxiliary_Loop 03c3 00da | | Load_Top At_Offset_2 03c4 00da | | Load_Top At_Offset_2 03c5 027c | | | Execute Discrete,Less 03c6 77be |w | Jump_Nonzero 0x385 03c7 00ce | | Action Pop_Auxiliary 03c8 00d9 | | Load_Top At_Offset_1 03c9 e5ff | | Load 0x2,-0x1 03ca 0227 | ' | Execute Access,All_Reference 03cb 382c |8, | Execute Record,Field_Write,Field_Number 0x2c 03cc 00d9 | | Load_Top At_Offset_1 03cd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 03ce 0000 0000 | | .XXX[0x2] 03d0 ffff ffff | | .LITERAL {0xffffffff, 0xffff0000} 03d4 0000 0000 | | .LITERAL {0x00000000, 0x00010000} 03d8 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 03dc 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x3b205365} 03e0 7175 656e |quen| .XXX[0x1c] 03e2 6365 206c |ce l| 03e4 6f73 7420 |ost | 03e6 286e 6577 |(new| 03e8 2920 2531 |) %1| 03ea 203c 2025 | < %| 03ec 3220 286f |2 (o| 03ee 6c64 2920 |ld) | 03f0 696e 2072 |in r| 03f2 6570 6c79 |eply| 03f4 2074 7970 | typ| 03f6 6520 2532 |e %2| 03f8 2e00 0000 |. | 03fa 0000 0000 | | 03fc 5365 7175 |Sequ| .LITERAL {0x53657175, 0x656e6365} 0400 4c6f 7374 |Lost| .XXX[0x4] 0402 0000 0000 | | 0404 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x4572726f} 0408 7200 |r | .XXX[0x1] 0409 0000 0000 | | .BLANK 0000[0x7] 0410 ; -------------------------------------------------------------------------------------- 0410 ; SUBPROGRAM 0410 ; -------------------------------------------------------------------------------------- 0410 0416 | | .CONST 0x0416 ; Address of begin 0411 0004 | | .CONST 0x0004 ; Address of exception handler 0412 0003 | | .CONST 0x0003 ; Number of locals 0413 INIT_0410: 0413 e03d | = | Load 0x0,0x3d 0414 029f 04a3 | | Declare_Subprogram INIT_04a0,For_Call 0416 BODY_0410: 0416 8403 | | Call 0x2,0x3 0417 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 0420 | | .CONST 0x0420 ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 0002 | | .CONST 0x0002 ; Number of locals 041b INIT_0418: 041b 4801 |H | Short_Literal 0x1 041c 480d |H | Short_Literal 0xd 041d 00e9 | | Load_Encached String_Cache 041e 035b | [ | Declare_Type Array,Constrained 041f 0337 | 7 | Declare_Variable Array 0420 BODY_0418: 0420 00d8 | | Load_Top At_Offset_0 0421 4810 |H | Short_Literal 0x10 0422 e5ff | | Load 0x2,-0x1 0423 e06b | k | Load 0x0,0x6b 0424 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0425 00d1 | | Pop_Control Pop_Count_1 0426 00d8 | | Load_Top At_Offset_0 0427 800f | | Call 0x0,0xf 0428 e00c | | Load 0x0,0xc 0429 01c6 | | Execute Vector,Convert_To_Formal 042a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 042b 0000 0000 | | .BLANK 0000[0x5] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0435 | 5 | .CONST 0x0435 ; Address of begin 0431 043c | < | .CONST 0x043c ; Address of exception handler 0432 0002 | | .CONST 0x0002 ; Number of locals 0433 INIT_0430: 0433 029f 04cb | | Declare_Subprogram INIT_04c8,For_Call 0435 BODY_0430: 0435 e017 | | Load 0x0,0x17 0436 03bc | | Declare_Variable Access,By_Allocation 0437 00d8 | | Load_Top At_Offset_0 0438 0227 | ' | Execute Access,All_Reference 0439 1c00 | | Execute_Immediate Run_Utility,0x0 043a a402 | | Store_Unchecked 0x2,0x2 043b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 043c TRAP_0430: 043c 0007 | | Action Break_Optional 043d 8602 | | Call 0x3,0x2 043e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 043f 0000 | | .XXX[0x1] 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 0443 | C | .CONST 0x0443 ; Address of begin 0441 0004 | | .CONST 0x0004 ; Address of exception handler 0442 0001 | | .CONST 0x0001 ; Number of locals 0443 BODY_0440: 0443 INIT_0440: 0443 e5ff | | Load 0x2,-0x1 0444 0227 | ' | Execute Access,All_Reference 0445 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0446 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0447 e009 | | Load 0x0,0x9 0448 022f | / | Execute Access,Equal 0449 6802 |h | Jump_Zero 0x44c 044a e03c | < | Load 0x0,0x3c 044b 0257 | W | Execute Discrete,Raise 044c e5ff | | Load 0x2,-0x1 044d 00d8 | | Load_Top At_Offset_0 044e 0227 | ' | Execute Access,All_Reference 044f 342d |4- | Execute Record,Field_Reference,Field_Number 0x2d 0450 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0451 806c | l | Call 0x0,0x6c 0452 806d | m | Call 0x0,0x6d 0453 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0454 0000 0000 | | .BLANK 0000[0x4] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 0463 | c | .CONST 0x0463 ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0003 | | .CONST 0x0003 ; Number of locals 045b INIT_0458: 045b e40a | | Load 0x2,0xa 045c e402 | | Load 0x2,0x2 045d 0227 | ' | Execute Access,All_Reference 045e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 045f 0227 | ' | Execute Access,All_Reference 0460 01d5 | | Execute Vector,Field_Reference 0461 029f 051b | | Declare_Subprogram INIT_0518,For_Call 0463 BODY_0458: 0463 00d9 | | Load_Top At_Offset_1 0464 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0465 6813 |h | Jump_Zero 0x479 0466 00cf | | Action Mark_Auxiliary 0467 00da | | Load_Top At_Offset_2 0468 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0469 0227 | ' | Execute Access,All_Reference 046a 01d9 | | Execute Vector,Reverse_Bounds 046b 0263 | c | Execute Discrete,Above_Bound 046c 7003 |p | Jump_Nonzero 0x470 046d 8603 | | Call 0x3,0x3 046e 00c8 | | Action Pop_Auxiliary_Range 046f 3ffd |? | Loop_Increasing 0x46d 0470 00ce | | Action Pop_Auxiliary 0471 00d9 | | Load_Top At_Offset_1 0472 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0473 e06e | n | Load 0x0,0x6e 0474 e06f | o | Load 0x0,0x6f 0475 a070 | p | Store_Unchecked 0x0,0x70 0476 8002 | | Call 0x0,0x2 0477 00da | | Load_Top At_Offset_2 0478 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0479 4501 |E | Exit_Suprogram New_Top_Offset 0x1 047a 0000 0000 | | .BLANK 0000[0x6] 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 0487 | | .CONST 0x0487 ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 0003 | | .CONST 0x0003 ; Number of locals 0483 INIT_0480: 0483 e017 | | Load 0x0,0x17 0484 0007 | | Action Break_Optional 0485 e017 | | Load 0x0,0x17 0486 0007 | | Action Break_Optional 0487 BODY_0480: 0487 e5ff | | Load 0x2,-0x1 0488 0227 | ' | Execute Access,All_Reference 0489 3c26 |<& | Execute Record,Field_Read,Field_Number 0x26 048a 003a | : | Store_Top Access,At_Offset_2 048b 00cf | | Action Mark_Auxiliary 048c 780d |x | Jump 0x49a 048d 00da | | Load_Top At_Offset_2 048e 0227 | ' | Execute Access,All_Reference 048f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0490 003a | : | Store_Top Access,At_Offset_2 0491 00da | | Load_Top At_Offset_2 0492 e071 | q | Load 0x0,0x71 0493 e072 | r | Load 0x0,0x72 0494 a073 | s | Store_Unchecked 0x0,0x73 0495 8002 | | Call 0x0,0x2 0496 003b | ; | Store_Top Access,At_Offset_3 0497 00d9 | | Load_Top At_Offset_1 0498 003b | ; | Store_Top Access,At_Offset_3 0499 00c9 | | Action Pop_Auxiliary_Loop 049a 00da | | Load_Top At_Offset_2 049b 77f1 |w | Jump_Nonzero 0x48d 049c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 049d 0000 0000 | | .XXX[0x3] 049f 0000 | | 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a5 | | .CONST 0x04a5 ; Address of begin 04a1 0004 | | .CONST 0x0004 ; Address of exception handler 04a2 0002 | | .CONST 0x0002 ; Number of locals 04a3 INIT_04a0: 04a3 029f 0533 | 3| Declare_Subprogram INIT_0530,For_Call 04a5 BODY_04a0: 04a5 00cf | | Action Mark_Auxiliary 04a6 e5ff | | Load 0x2,-0x1 04a7 0227 | ' | Execute Access,All_Reference 04a8 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 04a9 0227 | ' | Execute Access,All_Reference 04aa 01d9 | | Execute Vector,Reverse_Bounds 04ab 0263 | c | Execute Discrete,Above_Bound 04ac 7015 |p | Jump_Nonzero 0x4c2 04ad 00d8 | | Load_Top At_Offset_0 04ae e5ff | | Load 0x2,-0x1 04af 0227 | ' | Execute Access,All_Reference 04b0 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 04b1 0227 | ' | Execute Access,All_Reference 04b2 01d7 | | Execute Vector,Field_Read 04b3 a402 | | Store_Unchecked 0x2,0x2 04b4 00cf | | Action Mark_Auxiliary 04b5 e402 | | Load 0x2,0x2 04b6 0227 | ' | Execute Access,All_Reference 04b7 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 04b8 0227 | ' | Execute Access,All_Reference 04b9 01d9 | | Execute Vector,Reverse_Bounds 04ba 0263 | c | Execute Discrete,Above_Bound 04bb 7003 |p | Jump_Nonzero 0x4bf 04bc 8602 | | Call 0x3,0x2 04bd 00c8 | | Action Pop_Auxiliary_Range 04be 3ffd |? | Loop_Increasing 0x4bc 04bf 00ce | | Action Pop_Auxiliary 04c0 00c8 | | Action Pop_Auxiliary_Range 04c1 3feb |? | Loop_Increasing 0x4ad 04c2 00ce | | Action Pop_Auxiliary 04c3 4800 |H | Short_Literal 0x0 04c4 a5fc | | Store_Unchecked 0x2,-0x4 04c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04c6 0000 0000 | | .XXX[0x2] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cd | | .CONST 0x04cd ; Address of begin 04c9 0004 | | .CONST 0x0004 ; Address of exception handler 04ca 0002 | | .CONST 0x0002 ; Number of locals 04cb INIT_04c8: 04cb e009 | | Load 0x0,0x9 04cc 0007 | | Action Break_Optional 04cd BODY_04c8: 04cd e009 | | Load 0x0,0x9 04ce e5ff | | Load 0x2,-0x1 04cf 4802 |H | Short_Literal 0x2 04d0 e00a | | Load 0x0,0xa 04d1 e00b | | Load 0x0,0xb 04d2 00ad | | QQ_Action Package,Field_Execute_Dynamic 04d3 0039 | 9 | Store_Top Access,At_Offset_1 04d4 4803 |H | Short_Literal 0x3 04d5 e5ff | | Load 0x2,-0x1 04d6 0227 | ' | Execute Access,All_Reference 04d7 3438 |48 | Execute Record,Field_Reference,Field_Number 0x38 04d8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04d9 e5ff | | Load 0x2,-0x1 04da 0229 | ) | Execute Access,All_Read 04db 3c33 |<3 | Execute Record,Field_Read,Field_Number 0x33 04dc 00d8 | | Load_Top At_Offset_0 04dd 4800 |H | Short_Literal 0x0 04de 4818 |H | Short_Literal 0x18 04df e00c | | Load 0x0,0xc 04e0 0334 | 4 | Declare_Variable Array,With_Constraint 04e1 5016 |P | Indirect_Literal Any,0x4f8,{0x4e6f2066, 0x72656520} 04e2 4800 |H | Short_Literal 0x0 04e3 4807 |H | Short_Literal 0x7 04e4 e00c | | Load 0x0,0xc 04e5 0334 | 4 | Declare_Variable Array,With_Constraint 04e6 5021 |P! | Indirect_Literal Any,0x508,{0x4e6f4d65, 0x6d6f7279} 04e7 4800 |H | Short_Literal 0x0 04e8 4808 |H | Short_Literal 0x8 04e9 e00c | | Load 0x0,0xc 04ea 0334 | 4 | Declare_Variable Array,With_Constraint 04eb 5020 |P | Indirect_Literal Any,0x50c,{0x586c6962, 0x4572726f} 04ec 800d | | Call 0x0,0xd 04ed 8010 | | Call 0x0,0x10 04ee 00d2 | | Pop_Control Pop_Count_2 04ef e5ff | | Load 0x2,-0x1 04f0 00d9 | | Load_Top At_Offset_1 04f1 8011 | | Call 0x0,0x11 04f2 8012 | | Call 0x0,0x12 04f3 e013 | | Load 0x0,0x13 04f4 0257 | W | Execute Discrete,Raise 04f5 0000 0000 | | .XXX[0x3] 04f7 0000 | | 04f8 4e6f 2066 |No f| .LITERAL {0x4e6f2066, 0x72656520} 04fc 6d65 6d6f |memo| .XXX[0xc] 04fe 7279 2061 |ry a| 0500 7661 696c |vail| 0502 6162 6c65 |able| 0504 2e00 0000 |. | 0506 0000 0000 | | 0508 4e6f 4d65 |NoMe| .LITERAL {0x4e6f4d65, 0x6d6f7279} 050c 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x4572726f} 0510 7200 |r | .XXX[0x1] 0511 0000 0000 | | .BLANK 0000[0x7] 0518 ; -------------------------------------------------------------------------------------- 0518 ; SUBPROGRAM 0518 ; -------------------------------------------------------------------------------------- 0518 0521 | ! | .CONST 0x0521 ; Address of begin 0519 0004 | | .CONST 0x0004 ; Address of exception handler 051a 0002 | | .CONST 0x0002 ; Number of locals 051b INIT_0518: 051b e606 | | Load 0x3,0x6 051c e602 | | Load 0x3,0x2 051d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 051e 0227 | ' | Execute Access,All_Reference 051f 01d5 | | Execute Vector,Field_Reference 0520 0007 | | Action Break_Optional 0521 BODY_0518: 0521 00d8 | | Load_Top At_Offset_0 0522 0229 | ) | Execute Access,All_Read 0523 00d8 | | Load_Top At_Offset_0 0524 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0525 8044 | D | Call 0x0,0x44 0526 00d9 | | Load_Top At_Offset_1 0527 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0528 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0529 0000 0000 | | .BLANK 0000[0x7] 0530 ; -------------------------------------------------------------------------------------- 0530 ; SUBPROGRAM 0530 ; -------------------------------------------------------------------------------------- 0530 053b | ; | .CONST 0x053b ; Address of begin 0531 0004 | | .CONST 0x0004 ; Address of exception handler 0532 0003 | | .CONST 0x0003 ; Number of locals 0533 INIT_0530: 0533 e608 | | Load 0x3,0x8 0534 e402 | | Load 0x2,0x2 0535 0227 | ' | Execute Access,All_Reference 0536 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0537 0227 | ' | Execute Access,All_Reference 0538 01d5 | | Execute Vector,Field_Reference 0539 029f 054b | K| Declare_Subprogram INIT_0548,For_Call 053b BODY_0530: 053b 00cf | | Action Mark_Auxiliary 053c 00da | | Load_Top At_Offset_2 053d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 053e 0227 | ' | Execute Access,All_Reference 053f 01d9 | | Execute Vector,Reverse_Bounds 0540 0263 | c | Execute Discrete,Above_Bound 0541 7003 |p | Jump_Nonzero 0x545 0542 8803 | | Call 0x4,0x3 0543 00c8 | | Action Pop_Auxiliary_Range 0544 3ffd |? | Loop_Increasing 0x542 0545 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0546 0000 0000 | | .XXX[0x2] 0548 ; -------------------------------------------------------------------------------------- 0548 ; SUBPROGRAM 0548 ; -------------------------------------------------------------------------------------- 0548 0551 | Q | .CONST 0x0551 ; Address of begin 0549 0004 | | .CONST 0x0004 ; Address of exception handler 054a 0002 | | .CONST 0x0002 ; Number of locals 054b INIT_0548: 054b e806 | | Load 0x4,0x6 054c e802 | | Load 0x4,0x2 054d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 054e 0227 | ' | Execute Access,All_Reference 054f 01d5 | | Execute Vector,Field_Reference 0550 0007 | | Action Break_Optional 0551 BODY_0548: 0551 00d8 | | Load_Top At_Offset_0 0552 0227 | ' | Execute Access,All_Reference 0553 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0554 e5fe | | Load 0x2,-0x2 0555 017f | | Execute Record,Equal 0556 6808 |h | Jump_Zero 0x55f 0557 00d8 | | Load_Top At_Offset_0 0558 a5fd | | Store_Unchecked 0x2,-0x3 0559 4801 |H | Short_Literal 0x1 055a a5fc | | Store_Unchecked 0x2,-0x4 055b 00cc | | Action Pop_Block 055c 00cc | | Action Pop_Block 055d 00cc | | Action Pop_Block 055e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 055f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0560 ; -------------------------------------------------------------------------------------- 0560 ; Debug Table 0560 ; -------------------------------------------------------------------------------------- 0560 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68f5,0x0000,0x0001,0x0017 0566 000b 05c2 | | .DBG4T 0x000b,0x05c2,0x8000,0x0000 056a 0022 05cf | " | .DBG4T 0x0022,0x05cf,0x8000,0x0000 056e 004b 05de | K | .DBG4T 0x004b,0x05de,0x0001,0x0000 0572 005b 05e1 | [ | .DBG4T 0x005b,0x05e1,0x0001,0x0000 0576 006b 05e4 | k | .DBG4T 0x006b,0x05e4,0x0001,0x0000 057a 00cb 05eb | | .DBG4T 0x00cb,0x05eb,0x0001,0x0000 057e 00db 05ef | | .DBG4T 0x00db,0x05ef,0x0002,0x0000 0582 010b 05f7 | | .DBG4T 0x010b,0x05f7,0x0001,0x0000 0586 014b 0606 | K | .DBG4T 0x014b,0x0606,0x0001,0x0000 058a 01f3 0614 | | .DBG4T 0x01f3,0x0614,0x0001,0x0000 058e 0323 063e | # >| .DBG4T 0x0323,0x063e,0x0002,0x0000 0592 036b 064f | k O| .DBG4T 0x036b,0x064f,0x0002,0x4000 0596 0413 066b | k| .DBG4T 0x0413,0x066b,0x0001,0x0000 059a 041b 066f | o| .DBG4T 0x041b,0x066f,0x0002,0x0000 059e 0433 0674 | 3 t| .DBG4T 0x0433,0x0674,0x0004,0x0000 05a2 0443 0678 | C x| .DBG4T 0x0443,0x0678,0x0004,0x0000 05a6 045b 067d | [ }| .DBG4T 0x045b,0x067d,0x0004,0x0000 05aa 0483 0684 | | .DBG4T 0x0483,0x0684,0x0004,0x4000 05ae 04a3 0692 | | .DBG4T 0x04a3,0x0692,0x0004,0x0000 05b2 04cb 0699 | | .DBG4T 0x04cb,0x0699,0x0004,0x0000 05b6 051b 06a1 | | .DBG4T 0x051b,0x06a1,0x0004,0x0000 05ba 0533 06a5 | 3 | .DBG4T 0x0533,0x06a5,0x0004,0x0000 05be 054b 06aa | K | .DBG4T 0x054b,0x06aa,0x0004,0x0000 05c2 ; -------------------------------------------------------------------------------------- 05c2 ; Debug chain 05c2 ; -------------------------------------------------------------------------------------- 05c2 000b 0000 | | .DBGLEN 0x000b,0x0000 05c4 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f 05cf ; -------------------------------------------------------------------------------------- 05cf ; Debug chain 05cf ; -------------------------------------------------------------------------------------- 05cf 000d 0000 | | .DBGLEN 0x000d,0x0000 05d1 0022 002a | " *| .DBGLNO 0x0022,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040 05de ; -------------------------------------------------------------------------------------- 05de ; Debug chain 05de ; -------------------------------------------------------------------------------------- 05de 0000 0001 | | .DBGLEN 0x0000,0x0001 05e0 004b | K | .DBGLNO 0x004b 05e1 ; -------------------------------------------------------------------------------------- 05e1 ; Debug chain 05e1 ; -------------------------------------------------------------------------------------- 05e1 0000 0001 | | .DBGLEN 0x0000,0x0001 05e3 005b | [ | .DBGLNO 0x005b 05e4 ; -------------------------------------------------------------------------------------- 05e4 ; Debug chain 05e4 ; -------------------------------------------------------------------------------------- 05e4 0001 0004 | | .DBGLEN 0x0001,0x0004 05e6 006b 006d | k m| .DBGLNO 0x006b,0x006d,0x0074,0x009f,0x00a3 05eb ; -------------------------------------------------------------------------------------- 05eb ; Debug chain 05eb ; -------------------------------------------------------------------------------------- 05eb 0000 0002 | | .DBGLEN 0x0000,0x0002 05ed 00cb 00d1 | | .DBGLNO 0x00cb,0x00d1 05ef ; -------------------------------------------------------------------------------------- 05ef ; Debug chain 05ef ; -------------------------------------------------------------------------------------- 05ef 0001 0005 | | .DBGLEN 0x0001,0x0005 05f1 00db 00dd | | .DBGLNO 0x00db,0x00dd,0x00e7,0x00e8,0x00f3,0x00ff 05f7 ; -------------------------------------------------------------------------------------- 05f7 ; Debug chain 05f7 ; -------------------------------------------------------------------------------------- 05f7 0001 000c | | .DBGLEN 0x0001,0x000c 05f9 010b 010e | | .DBGLNO 0x010b,0x010e,0x0112,0x0116,0x0118,0x011e,0x0122,0x0126,0x012a,0x012e,0x0135,0x0139,0x013d 0606 ; -------------------------------------------------------------------------------------- 0606 ; Debug chain 0606 ; -------------------------------------------------------------------------------------- 0606 0000 000c | | .DBGLEN 0x0000,0x000c 0608 014d 016b | M k| .DBGLNO 0x014d,0x016b,0x016d,0x017e,0x018f,0x01a0,0x01b0,0x01c1,0x01d1,0x01e1,0x01e3,0x01e5 0614 ; -------------------------------------------------------------------------------------- 0614 ; Debug chain 0614 ; -------------------------------------------------------------------------------------- 0614 0001 0027 | '| .DBGLEN 0x0001,0x0027 0616 01f3 01f8 | | .DBGLNO 0x01f3,0x01f8,0x01fc,0x01fd,0x0201,0x020c,0x0210,0x021b,0x0220,0x0227,0x022e,0x0233,0x023f,0x0243,0x024e,0x0256,0x025f,0x026a,0x026f,0x0276,0x0283,0x0296,0x02a1,0x02a5,0x02a6,0x02ac,0x02b4,0x02b8,0x02c3,0x02c7,0x02cd,0x02da,0x02e2,0x02e6,0x02ee,0x02f4,0x02ff,0x0307,0x030e,0x0316 063e ; -------------------------------------------------------------------------------------- 063e ; Debug chain 063e ; -------------------------------------------------------------------------------------- 063e 0008 0007 | | .DBGLEN 0x0008,0x0007 0640 0323 0325 | # %| .DBGLNO 0x0323,0x0325,0x0327,0x0329,0x032b,0x032d,0x032f,0x0331,0x0333,0x0347,0x0349,0x034c,0x0353,0x0359,0x0360 064f ; -------------------------------------------------------------------------------------- 064f ; Debug chain 064f ; -------------------------------------------------------------------------------------- 064f 0002 000c | | .DBGLEN 0x0002,0x000c 0651 036b 036d | k m| .DBGLNO 0x036b,0x036d,0x036f,0x0372,0x0376,0x037f,0x0385,0x0389,0x038f,0x0393,0x03c1,0x03c3,0x03c8,0x03cc 065f 0001 0002 | | .XXX[0xc] 0661 0003 0004 | | 0663 0006 0007 | | 0665 0008 0009 | | 0667 000a 0005 | | 0669 000b 000c | | 066b ; -------------------------------------------------------------------------------------- 066b ; Debug chain 066b ; -------------------------------------------------------------------------------------- 066b 0001 0001 | | .DBGLEN 0x0001,0x0001 066d 0413 0416 | | .DBGLNO 0x0413,0x0416 066f ; -------------------------------------------------------------------------------------- 066f ; Debug chain 066f ; -------------------------------------------------------------------------------------- 066f 0001 0002 | | .DBGLEN 0x0001,0x0002 0671 041b 0420 | | .DBGLNO 0x041b,0x0420,0x0426 0674 ; -------------------------------------------------------------------------------------- 0674 ; Debug chain 0674 ; -------------------------------------------------------------------------------------- 0674 0000 0002 | | .DBGLEN 0x0000,0x0002 0676 0435 043d | 5 =| .DBGLNO 0x0435,0x043d 0678 ; -------------------------------------------------------------------------------------- 0678 ; Debug chain 0678 ; -------------------------------------------------------------------------------------- 0678 0000 0003 | | .DBGLEN 0x0000,0x0003 067a 0443 044a | C J| .DBGLNO 0x0443,0x044a,0x044c 067d ; -------------------------------------------------------------------------------------- 067d ; Debug chain 067d ; -------------------------------------------------------------------------------------- 067d 0001 0004 | | .DBGLEN 0x0001,0x0004 067f 045b 0463 | [ c| .DBGLNO 0x045b,0x0463,0x0467,0x046d,0x0471 0684 ; -------------------------------------------------------------------------------------- 0684 ; Debug chain 0684 ; -------------------------------------------------------------------------------------- 0684 0002 0005 | | .DBGLEN 0x0002,0x0005 0686 0483 0485 | | .DBGLNO 0x0483,0x0485,0x0487,0x048d,0x0491,0x0497,0x049a 068d 0001 0003 | | .XXX[0x5] 068f 0004 0005 | | 0691 0002 | | 0692 ; -------------------------------------------------------------------------------------- 0692 ; Debug chain 0692 ; -------------------------------------------------------------------------------------- 0692 0000 0005 | | .DBGLEN 0x0000,0x0005 0694 04a6 04ad | | .DBGLNO 0x04a6,0x04ad,0x04b5,0x04bc,0x04c3 0699 ; -------------------------------------------------------------------------------------- 0699 ; Debug chain 0699 ; -------------------------------------------------------------------------------------- 0699 0001 0005 | | .DBGLEN 0x0001,0x0005 069b 04cb 04cd | | .DBGLNO 0x04cb,0x04cd,0x04d4,0x04d9,0x04ef,0x04f3 06a1 ; -------------------------------------------------------------------------------------- 06a1 ; Debug chain 06a1 ; -------------------------------------------------------------------------------------- 06a1 0001 0001 | | .DBGLEN 0x0001,0x0001 06a3 051b 0521 | !| .DBGLNO 0x051b,0x0521 06a5 ; -------------------------------------------------------------------------------------- 06a5 ; Debug chain 06a5 ; -------------------------------------------------------------------------------------- 06a5 0001 0002 | | .DBGLEN 0x0001,0x0002 06a7 0533 053c | 3 <| .DBGLNO 0x0533,0x053c,0x0542 06aa ; -------------------------------------------------------------------------------------- 06aa ; Debug chain 06aa ; -------------------------------------------------------------------------------------- 06aa 0001 0004 | | .DBGLEN 0x0001,0x0004 06ac 054b 0551 | K Q| .DBGLNO 0x054b,0x0551,0x0557,0x0559,0x055b 06b1 0000 0000 | | .BLANK 0000[0x14f]