|
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: 5120 (0x1400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_191cd7
└─⟦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 0740 | @ | .CONST 0x0740 ; 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 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00d7 | | .CONST 0x00d7 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0044 | D | .CONST 0x0044 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional 000c 0007 | | Action Break_Optional 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 0093 0000 | | push_full_address 0x0 0011 60e2 |` | Indirect_Literal Discrete,0xf4,{0x80000000, 0x00010000} 0012 0273 | s | Execute Discrete,Plus 0013 e20d | | Load 0x1,0xd 0014 60db |` | Indirect_Literal Discrete,0xf0,{0x00000000, 0x0000ffff} 0015 0279 | y | Execute Discrete,And 0016 0273 | s | Execute Discrete,Plus 0017 0129 | ) | Execute Any,Make_Visible 0018 0093 0000 | | push_full_address 0x0 001a 60d1 |` | Indirect_Literal Discrete,0xec,{0x80000000, 0x00020000} 001b 0273 | s | Execute Discrete,Plus 001c e20d | | Load 0x1,0xd 001d 60d2 |` | Indirect_Literal Discrete,0xf0,{0x00000000, 0x0000ffff} 001e 0279 | y | Execute Discrete,And 001f 0273 | s | Execute Discrete,Plus 0020 0129 | ) | Execute Any,Make_Visible 0021 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated 0023 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 0025 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated 0027 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0029 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated 002b 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 002d 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated 002f 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 0031 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 0033 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 0035 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated 0037 029a 035b | [| Declare_Subprogram INIT_0358,For_Outer_Call,Visible,Unelaborated 0039 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated 003b 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated 003d 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 003f 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated 0041 029a 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call,Visible,Unelaborated 0043 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated 0045 029a 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Visible,Unelaborated 0047 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 0049 4802 |H | Short_Literal 0x2 004a 032b | + | Declare_Type Record,Incomplete,Visible 004b 4804 |H | Short_Literal 0x4 004c 032b | + | Declare_Type Record,Incomplete,Visible 004d 00d8 | | Load_Top At_Offset_0 004e 02a0 | | Declare_Subprogram Null_Subprogram 004f 4818 |H | Short_Literal 0x18 0050 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0051 00d8 | | Load_Top At_Offset_0 0052 0221 | ! | Execute Access,Allow_Deallocate 0053 00da | | Load_Top At_Offset_2 0054 02a0 | | Declare_Subprogram Null_Subprogram 0055 4818 |H | Short_Literal 0x18 0056 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0057 00d8 | | Load_Top At_Offset_0 0058 0221 | ! | Execute Access,Allow_Deallocate 0059 00d8 | | Load_Top At_Offset_0 005a 0129 | ) | Execute Any,Make_Visible 005b c215 | | Store 0x1,0x15 005c 00d8 | | Load_Top At_Offset_0 005d 00da | | Load_Top At_Offset_2 005e e002 | | Load 0x0,0x2 005f 029f 0733 | 3| Declare_Subprogram INIT_0730,For_Call 0061 4803 |H | Short_Literal 0x3 0062 032e | . | Declare_Type Record,Defined,Visible 0063 00d8 | | Load_Top At_Offset_0 0064 0322 | " | Declare_Variable Record 0065 00da | | Load_Top At_Offset_2 0066 00d9 | | Load_Top At_Offset_1 0067 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0068 00db | | Load_Top At_Offset_3 0069 00d9 | | Load_Top At_Offset_1 006a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 006b 4800 |H | Short_Literal 0x0 006c 00d9 | | Load_Top At_Offset_1 006d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 006e 0129 | ) | Execute Any,Make_Visible 006f c216 | | Store 0x1,0x16 0070 0007 | | Action Break_Optional 0071 00bf | | Action Accept_Activation 0072 e003 | | Load 0x0,0x3 0073 00db | | Load_Top At_Offset_3 0074 e212 | | Load 0x1,0x12 0075 e211 | | Load 0x1,0x11 0076 029f 050b | | Declare_Subprogram INIT_0508,For_Call 0078 e22e | . | Load 0x1,0x2e 0079 0326 | & | Complete_Type Record,By_Defining 007a 00da | | Load_Top At_Offset_2 007b 03c4 | | Complete_Type Access,By_Component_Completion 007c 00da | | Load_Top At_Offset_2 007d 0221 | ! | Execute Access,Allow_Deallocate 007e 4800 |H | Short_Literal 0x0 007f e213 | | Load 0x1,0x13 0080 0aff | | Execute_Immediate Plus,-0x1 0081 e003 | | Load 0x0,0x3 0082 025d | ] | Execute Discrete,Bounds_Check 0083 e22f | / | Load 0x1,0x2f 0084 02a0 | | Declare_Subprogram Null_Subprogram 0085 4801 |H | Short_Literal 0x1 0086 035d | ] | Declare_Type Array,Defined 0087 e002 | | Load 0x0,0x2 0088 00d9 | | Load_Top At_Offset_1 0089 029f 051b | | Declare_Subprogram INIT_0518,For_Call 008b e22d | - | Load 0x1,0x2d 008c 0326 | & | Complete_Type Record,By_Defining 008d 00da | | Load_Top At_Offset_2 008e 03c4 | | Complete_Type Access,By_Component_Completion 008f 00da | | Load_Top At_Offset_2 0090 0221 | ! | Execute Access,Allow_Deallocate 0091 a004 | | Store_Unchecked 0x0,0x4 0092 00c6 | | Action Check_Subprogram_Elaborated 0093 e210 | | Load 0x1,0x10 0094 e211 | | Load 0x1,0x11 0095 e005 | | Load 0x0,0x5 0096 e006 | | Load 0x0,0x6 0097 4800 |H | Short_Literal 0x0 0098 0007 | | Action Break_Optional 0099 a004 | | Store_Unchecked 0x0,0x4 009a 00c6 | | Action Check_Subprogram_Elaborated 009b e22e | . | Load 0x1,0x2e 009c e22f | / | Load 0x1,0x2f 009d e007 | | Load 0x0,0x7 009e e008 | | Load 0x0,0x8 009f 4800 |H | Short_Literal 0x0 00a0 0007 | | Action Break_Optional 00a1 a004 | | Store_Unchecked 0x0,0x4 00a2 00c6 | | Action Check_Subprogram_Elaborated 00a3 e22d | - | Load 0x1,0x2d 00a4 e230 | 0 | Load 0x1,0x30 00a5 e009 | | Load 0x0,0x9 00a6 e00a | | Load 0x0,0xa 00a7 4800 |H | Short_Literal 0x0 00a8 0007 | | Action Break_Optional 00a9 029d 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call 00ab 029d 060b | | Declare_Subprogram INIT_0608,For_Outer_Call 00ad 029d 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call 00af 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00b0 00c7 | | Action Elaborate_Subprogram 00b1 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00b2 00c7 | | Action Elaborate_Subprogram 00b3 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00b4 00c7 | | Action Elaborate_Subprogram 00b5 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00b6 00c7 | | Action Elaborate_Subprogram 00b7 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00b8 00c7 | | Action Elaborate_Subprogram 00b9 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00ba 00c7 | | Action Elaborate_Subprogram 00bb 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00bc 00c7 | | Action Elaborate_Subprogram 00bd 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00be 00c7 | | Action Elaborate_Subprogram 00bf 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00c0 00c7 | | Action Elaborate_Subprogram 00c1 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00c2 00c7 | | Action Elaborate_Subprogram 00c3 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00c4 00c7 | | Action Elaborate_Subprogram 00c5 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00c6 00c7 | | Action Elaborate_Subprogram 00c7 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 00c8 00c7 | | Action Elaborate_Subprogram 00c9 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 00ca 00c7 | | Action Elaborate_Subprogram 00cb 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 00cc 00c7 | | Action Elaborate_Subprogram 00cd 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 00ce 00c7 | | Action Elaborate_Subprogram 00cf 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 00d0 00c7 | | Action Elaborate_Subprogram 00d1 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 00d2 00c7 | | Action Elaborate_Subprogram 00d3 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 00d4 00c7 | | Action Elaborate_Subprogram 00d5 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 00d6 00c7 | | Action Elaborate_Subprogram 00d7 BODY_0008: 00d7 00bc | | Action Signal_Activated 00d8 00bb | | Action Signal_Completion 00d9 0000 0000 | | .BLANK 0000[0x7] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e3 | | .CONST 0x00e3 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0001 | | .CONST 0x0001 ; Number of locals 00e3 BODY_00e0: 00e3 INIT_00e0: 00e3 e230 | 0 | Load 0x1,0x30 00e4 03bc | | Declare_Variable Access,By_Allocation 00e5 00d8 | | Load_Top At_Offset_0 00e6 0227 | ' | Execute Access,All_Reference 00e7 1c00 | | Execute_Immediate Run_Utility,0x0 00e8 003b | ; | Store_Top Access,At_Offset_3 00e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00ea 0000 0000 | | .XXX[0x2] 00ec 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 00f0 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 00f4 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00ff | | .CONST 0x00ff ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0003 | | .CONST 0x0003 ; Number of locals 00fb INIT_00f8: 00fb e22f | / | Load 0x1,0x2f 00fc 0007 | | Action Break_Optional 00fd e22f | / | Load 0x1,0x2f 00fe 0007 | | Action Break_Optional 00ff BODY_00f8: 00ff e5ff | | Load 0x2,-0x1 0100 7001 |p | Jump_Nonzero 0x102 0101 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0102 e5ff | | Load 0x2,-0x1 0103 0227 | ' | Execute Access,All_Reference 0104 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0105 0c01 | | Execute_Immediate Greater_Equal,0x1 0106 682f |h/ | Jump_Zero 0x136 0107 00cf | | Action Mark_Auxiliary 0108 e5ff | | Load 0x2,-0x1 0109 0227 | ' | Execute Access,All_Reference 010a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 010b 01d9 | | Execute Vector,Reverse_Bounds 010c 0263 | c | Execute Discrete,Above_Bound 010d 7027 |p' | Jump_Nonzero 0x135 010e 00d8 | | Load_Top At_Offset_0 010f e5ff | | Load 0x2,-0x1 0110 0227 | ' | Execute Access,All_Reference 0111 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0112 01d7 | | Execute Vector,Field_Read 0113 a402 | | Store_Unchecked 0x2,0x2 0114 00cf | | Action Mark_Auxiliary 0115 781a |x | Jump 0x130 0116 e402 | | Load 0x2,0x2 0117 0227 | ' | Execute Access,All_Reference 0118 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0119 a403 | | Store_Unchecked 0x2,0x3 011a e402 | | Load 0x2,0x2 011b 0229 | ) | Execute Access,All_Read 011c 00d8 | | Load_Top At_Offset_0 011d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 011e e234 | 4 | Load 0x1,0x34 011f 0226 | & | Execute Access,Convert 0120 e233 | 3 | Load 0x1,0x33 0121 e234 | 4 | Load 0x1,0x34 0122 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0123 8004 | | Call 0x0,0x4 0124 00d9 | | Load_Top At_Offset_1 0125 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0126 00d1 | | Pop_Control Pop_Count_1 0127 e402 | | Load 0x2,0x2 0128 e238 | 8 | Load 0x1,0x38 0129 e239 | 9 | Load 0x1,0x39 012a 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 012b 8004 | | Call 0x0,0x4 012c c402 | | Store 0x2,0x2 012d e403 | | Load 0x2,0x3 012e a402 | | Store_Unchecked 0x2,0x2 012f 00c9 | | Action Pop_Auxiliary_Loop 0130 e402 | | Load 0x2,0x2 0131 77e4 |w | Jump_Nonzero 0x116 0132 00ce | | Action Pop_Auxiliary 0133 00c8 | | Action Pop_Auxiliary_Range 0134 3fd9 |? | Loop_Increasing 0x10e 0135 00ce | | Action Pop_Auxiliary 0136 e5ff | | Load 0x2,-0x1 0137 e23d | = | Load 0x1,0x3d 0138 e23e | > | Load 0x1,0x3e 0139 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 013a 8004 | | Call 0x0,0x4 013b c5ff | | Store 0x2,-0x1 013c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 013d 0000 0000 | | .XXX[0x3] 013f 0000 | | 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 00da | | Load_Top At_Offset_2 0144 0227 | ' | Execute Access,All_Reference 0145 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0146 0f00 | | Execute_Immediate Equal,0x0 0147 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b 00da | | Load_Top At_Offset_2 014c 0227 | ' | Execute Access,All_Reference 014d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 014e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 014f 0000 | | .XXX[0x1] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0161 | a | .CONST 0x0161 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0004 | | .CONST 0x0004 ; Number of locals 0153 INIT_0150: 0153 00db | | Load_Top At_Offset_3 0154 8242 | B | Call 0x1,0x42 0155 e003 | | Load 0x0,0x3 0156 03f1 | | Declare_Variable Discrete,With_Value 0157 e22f | / | Load 0x1,0x2f 0158 0007 | | Action Break_Optional 0159 00d9 | | Load_Top At_Offset_1 015a e213 | | Load 0x1,0x13 015b 026f | o | Execute Discrete,Remainder 015c e5ff | | Load 0x2,-0x1 015d 0227 | ' | Execute Access,All_Reference 015e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 015f 01d7 | | Execute Vector,Field_Read 0160 0007 | | Action Break_Optional 0161 BODY_0150: 0161 00d8 | | Load_Top At_Offset_0 0162 e22f | / | Load 0x1,0x2f 0163 e5fe | | Load 0x2,-0x2 0164 e402 | | Load 0x2,0x2 0165 8244 | D | Call 0x1,0x44 0166 003b | ; | Store_Top Access,At_Offset_3 0167 0039 | 9 | Store_Top Access,At_Offset_1 0168 00d8 | | Load_Top At_Offset_0 0169 6807 |h | Jump_Zero 0x171 016a 00d8 | | Load_Top At_Offset_0 016b 0227 | ' | Execute Access,All_Reference 016c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 016d c5fd | | Store 0x2,-0x3 016e 4801 |H | Short_Literal 0x1 016f a5fc | | Store_Unchecked 0x2,-0x4 0170 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0171 4800 |H | Short_Literal 0x0 0172 a5fc | | Store_Unchecked 0x2,-0x4 0173 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0174 0000 0000 | | .BLANK 0000[0x4] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 0189 | | .CONST 0x0189 ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0004 | | .CONST 0x0004 ; Number of locals 017b INIT_0178: 017b 00db | | Load_Top At_Offset_3 017c 8242 | B | Call 0x1,0x42 017d e003 | | Load 0x0,0x3 017e 03f1 | | Declare_Variable Discrete,With_Value 017f e22f | / | Load 0x1,0x2f 0180 0007 | | Action Break_Optional 0181 00d9 | | Load_Top At_Offset_1 0182 e213 | | Load 0x1,0x13 0183 026f | o | Execute Discrete,Remainder 0184 e5ff | | Load 0x2,-0x1 0185 0227 | ' | Execute Access,All_Reference 0186 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0187 01d7 | | Execute Vector,Field_Read 0188 0007 | | Action Break_Optional 0189 BODY_0178: 0189 00d8 | | Load_Top At_Offset_0 018a e22f | / | Load 0x1,0x2f 018b e5fe | | Load 0x2,-0x2 018c e402 | | Load 0x2,0x2 018d 8244 | D | Call 0x1,0x44 018e 003b | ; | Store_Top Access,At_Offset_3 018f 0039 | 9 | Store_Top Access,At_Offset_1 0190 00d8 | | Load_Top At_Offset_0 0191 680b |h | Jump_Zero 0x19d 0192 00d8 | | Load_Top At_Offset_0 0193 0227 | ' | Execute Access,All_Reference 0194 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0195 c5fc | | Store 0x2,-0x4 0196 00d8 | | Load_Top At_Offset_0 0197 0227 | ' | Execute Access,All_Reference 0198 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0199 a5fd | | Store_Unchecked 0x2,-0x3 019a 4801 |H | Short_Literal 0x1 019b a5fb | | Store_Unchecked 0x2,-0x5 019c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 019d 4800 |H | Short_Literal 0x0 019e a5fb | | Store_Unchecked 0x2,-0x5 019f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01b2 | | .CONST 0x01b2 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0004 | | .CONST 0x0004 ; Number of locals 01a3 INIT_01a0: 01a3 00db | | Load_Top At_Offset_3 01a4 0227 | ' | Execute Access,All_Reference 01a5 8242 | B | Call 0x1,0x42 01a6 e003 | | Load 0x0,0x3 01a7 03f1 | | Declare_Variable Discrete,With_Value 01a8 e22f | / | Load 0x1,0x2f 01a9 0007 | | Action Break_Optional 01aa 00d9 | | Load_Top At_Offset_1 01ab e213 | | Load 0x1,0x13 01ac 026f | o | Execute Discrete,Remainder 01ad e5ff | | Load 0x2,-0x1 01ae 0227 | ' | Execute Access,All_Reference 01af 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 01b0 01d7 | | Execute Vector,Field_Read 01b1 0007 | | Action Break_Optional 01b2 BODY_01a0: 01b2 00d8 | | Load_Top At_Offset_0 01b3 e22f | / | Load 0x1,0x2f 01b4 e5fe | | Load 0x2,-0x2 01b5 0227 | ' | Execute Access,All_Reference 01b6 e402 | | Load 0x2,0x2 01b7 8244 | D | Call 0x1,0x44 01b8 003b | ; | Store_Top Access,At_Offset_3 01b9 0039 | 9 | Store_Top Access,At_Offset_1 01ba 00d8 | | Load_Top At_Offset_0 01bb 680b |h | Jump_Zero 0x1c7 01bc 00d8 | | Load_Top At_Offset_0 01bd 0227 | ' | Execute Access,All_Reference 01be 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01bf c5fd | | Store 0x2,-0x3 01c0 00d8 | | Load_Top At_Offset_0 01c1 0227 | ' | Execute Access,All_Reference 01c2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 01c3 a5fe | | Store_Unchecked 0x2,-0x2 01c4 4801 |H | Short_Literal 0x1 01c5 a5fc | | Store_Unchecked 0x2,-0x4 01c6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c7 4800 |H | Short_Literal 0x0 01c8 a5fc | | Store_Unchecked 0x2,-0x4 01c9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01ca 0000 0000 | | .BLANK 0000[0x6] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01e1 | | .CONST 0x01e1 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0004 | | .CONST 0x0004 ; Number of locals 01d3 INIT_01d0: 01d3 00db | | Load_Top At_Offset_3 01d4 8242 | B | Call 0x1,0x42 01d5 e003 | | Load 0x0,0x3 01d6 03f1 | | Declare_Variable Discrete,With_Value 01d7 e22f | / | Load 0x1,0x2f 01d8 0007 | | Action Break_Optional 01d9 00d9 | | Load_Top At_Offset_1 01da e213 | | Load 0x1,0x13 01db 026f | o | Execute Discrete,Remainder 01dc e5ff | | Load 0x2,-0x1 01dd 0227 | ' | Execute Access,All_Reference 01de 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 01df 01d7 | | Execute Vector,Field_Read 01e0 0007 | | Action Break_Optional 01e1 BODY_01d0: 01e1 00d8 | | Load_Top At_Offset_0 01e2 e22f | / | Load 0x1,0x2f 01e3 e5fe | | Load 0x2,-0x2 01e4 e402 | | Load 0x2,0x2 01e5 8244 | D | Call 0x1,0x44 01e6 003b | ; | Store_Top Access,At_Offset_3 01e7 0039 | 9 | Store_Top Access,At_Offset_1 01e8 00d8 | | Load_Top At_Offset_0 01e9 680b |h | Jump_Zero 0x1f5 01ea 00d8 | | Load_Top At_Offset_0 01eb 0227 | ' | Execute Access,All_Reference 01ec 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01ed 00d8 | | Load_Top At_Offset_0 01ee 0120 | | Execute Any,Is_Value 01ef 7002 |p | Jump_Nonzero 0x1f2 01f0 00d8 | | Load_Top At_Offset_0 01f1 011e | | Execute Any,Convert 01f2 e212 | | Load 0x1,0x12 01f3 0119 | | Execute Any,Check_In_Formal_Type 01f4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01f5 e218 | | Load 0x1,0x18 01f6 0257 | W | Execute Discrete,Raise 01f7 0000 | | .XXX[0x1] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 020a | | .CONST 0x020a ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0005 | | .CONST 0x0005 ; Number of locals 01fb INIT_01f8: 01fb 00db | | Load_Top At_Offset_3 01fc 8242 | B | Call 0x1,0x42 01fd e003 | | Load 0x0,0x3 01fe 03f1 | | Declare_Variable Discrete,With_Value 01ff e22f | / | Load 0x1,0x2f 0200 0007 | | Action Break_Optional 0201 00d9 | | Load_Top At_Offset_1 0202 e213 | | Load 0x1,0x13 0203 026f | o | Execute Discrete,Remainder 0204 e5ff | | Load 0x2,-0x1 0205 0227 | ' | Execute Access,All_Reference 0206 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0207 01d7 | | Execute Vector,Field_Read 0208 029f 06b3 | | Declare_Subprogram INIT_06b0,For_Call 020a BODY_01f8: 020a 00d9 | | Load_Top At_Offset_1 020b e22f | / | Load 0x1,0x2f 020c e5fe | | Load 0x2,-0x2 020d e402 | | Load 0x2,0x2 020e 8244 | D | Call 0x1,0x44 020f c403 | | Store 0x2,0x3 0210 003a | : | Store_Top Access,At_Offset_2 0211 00d9 | | Load_Top At_Offset_1 0212 6809 |h | Jump_Zero 0x21c 0213 e5fc | | Load 0x2,-0x4 0214 6805 |h | Jump_Zero 0x21a 0215 e5fd | | Load 0x2,-0x3 0216 00da | | Load_Top At_Offset_2 0217 0227 | ' | Execute Access,All_Reference 0218 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0219 4505 |E | Exit_Suprogram New_Top_Offset 0x5 021a e217 | | Load 0x1,0x17 021b 0257 | W | Execute Discrete,Raise 021c 8405 | | Call 0x2,0x5 021d 00db | | Load_Top At_Offset_3 021e e213 | | Load 0x1,0x13 021f 026f | o | Execute Discrete,Remainder 0220 c402 | | Store 0x2,0x2 0221 00db | | Load_Top At_Offset_3 0222 e5ff | | Load 0x2,-0x1 0223 0227 | ' | Execute Access,All_Reference 0224 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0225 01d7 | | Execute Vector,Field_Read 0226 00da | | Load_Top At_Offset_2 0227 0227 | ' | Execute Access,All_Reference 0228 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0229 00d9 | | Load_Top At_Offset_1 022a e402 | | Load 0x2,0x2 022b e5ff | | Load 0x2,-0x1 022c 0227 | ' | Execute Access,All_Reference 022d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 022e 01d6 | | Execute Vector,Field_Write 022f e5ff | | Load 0x2,-0x1 0230 0227 | ' | Execute Access,All_Reference 0231 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0232 0a01 | | Execute_Immediate Plus,0x1 0233 e5ff | | Load 0x2,-0x1 0234 0227 | ' | Execute Access,All_Reference 0235 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0236 e214 | | Load 0x1,0x14 0237 703c |p< | Jump_Nonzero 0x274 0238 00cf | | Action Mark_Auxiliary 0239 00da | | Load_Top At_Offset_2 023a 0227 | ' | Execute Access,All_Reference 023b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 023c 0227 | ' | Execute Access,All_Reference 023d 01d9 | | Execute Vector,Reverse_Bounds 023e 0263 | c | Execute Discrete,Above_Bound 023f 7033 |p3 | Jump_Nonzero 0x273 0240 00d8 | | Load_Top At_Offset_0 0241 e404 | | Load 0x2,0x4 0242 0227 | ' | Execute Access,All_Reference 0243 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0244 0227 | ' | Execute Access,All_Reference 0245 01d7 | | Execute Vector,Field_Read 0246 4861 |Ha | Short_Literal 0x61 0247 e20e | | Load 0x1,0xe 0248 1c05 | | Execute_Immediate Run_Utility,0x5 0249 00d8 | | Load_Top At_Offset_0 024a e20e | | Load 0x1,0xe 024b 0122 | " | Execute Any,Make_Root_Type 024c 0260 | ` | Execute Discrete,In_Type 024d 7001 |p | Jump_Nonzero 0x24f 024e 0801 | | Execute_Immediate Raise,0x1 024f 487a |Hz | Short_Literal 0x7a 0250 e20e | | Load 0x1,0xe 0251 1c05 | | Execute_Immediate Run_Utility,0x5 0252 00d8 | | Load_Top At_Offset_0 0253 e20e | | Load 0x1,0xe 0254 0122 | " | Execute Any,Make_Root_Type 0255 0260 | ` | Execute Discrete,In_Type 0256 7001 |p | Jump_Nonzero 0x258 0257 0801 | | Execute_Immediate Raise,0x1 0258 0262 | b | Execute Discrete,In_Range 0259 6817 |h | Jump_Zero 0x271 025a 00d8 | | Load_Top At_Offset_0 025b e404 | | Load 0x2,0x4 025c 0227 | ' | Execute Access,All_Reference 025d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 025e 0227 | ' | Execute Access,All_Reference 025f 01d7 | | Execute Vector,Field_Read 0260 e20e | | Load 0x1,0xe 0261 1c04 | | Execute_Immediate Run_Utility,0x4 0262 0ae0 | | Execute_Immediate Plus,-0x20 0263 e20e | | Load 0x1,0xe 0264 1c05 | | Execute_Immediate Run_Utility,0x5 0265 00d8 | | Load_Top At_Offset_0 0266 e20e | | Load 0x1,0xe 0267 0122 | " | Execute Any,Make_Root_Type 0268 0260 | ` | Execute Discrete,In_Type 0269 7001 |p | Jump_Nonzero 0x26b 026a 0801 | | Execute_Immediate Raise,0x1 026b 00d9 | | Load_Top At_Offset_1 026c e404 | | Load 0x2,0x4 026d 0227 | ' | Execute Access,All_Reference 026e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 026f 0227 | ' | Execute Access,All_Reference 0270 01d6 | | Execute Vector,Field_Write 0271 00c8 | | Action Pop_Auxiliary_Range 0272 3fcd |? | Loop_Increasing 0x240 0273 00ce | | Action Pop_Auxiliary 0274 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0275 0000 0000 | | .XXX[0x3] 0277 0000 | | 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 028b | | .CONST 0x028b ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0005 | | .CONST 0x0005 ; Number of locals 027b INIT_0278: 027b 00db | | Load_Top At_Offset_3 027c 0227 | ' | Execute Access,All_Reference 027d 8242 | B | Call 0x1,0x42 027e e003 | | Load 0x0,0x3 027f 03f1 | | Declare_Variable Discrete,With_Value 0280 e22f | / | Load 0x1,0x2f 0281 0007 | | Action Break_Optional 0282 00d9 | | Load_Top At_Offset_1 0283 e213 | | Load 0x1,0x13 0284 026f | o | Execute Discrete,Remainder 0285 e5ff | | Load 0x2,-0x1 0286 0227 | ' | Execute Access,All_Reference 0287 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0288 01d7 | | Execute Vector,Field_Read 0289 029f 06cb | | Declare_Subprogram INIT_06c8,For_Call 028b BODY_0278: 028b 00d9 | | Load_Top At_Offset_1 028c e22f | / | Load 0x1,0x2f 028d e5fe | | Load 0x2,-0x2 028e 0227 | ' | Execute Access,All_Reference 028f e402 | | Load 0x2,0x2 0290 8244 | D | Call 0x1,0x44 0291 c403 | | Store 0x2,0x3 0292 003a | : | Store_Top Access,At_Offset_2 0293 00d9 | | Load_Top At_Offset_1 0294 681a |h | Jump_Zero 0x2af 0295 e5fc | | Load 0x2,-0x4 0296 6816 |h | Jump_Zero 0x2ad 0297 00d9 | | Load_Top At_Offset_1 0298 0229 | ) | Execute Access,All_Read 0299 00d8 | | Load_Top At_Offset_0 029a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 029b e234 | 4 | Load 0x1,0x34 029c 0226 | & | Execute Access,Convert 029d e233 | 3 | Load 0x1,0x33 029e e234 | 4 | Load 0x1,0x34 029f 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 02a0 8004 | | Call 0x0,0x4 02a1 00d9 | | Load_Top At_Offset_1 02a2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02a3 00d1 | | Pop_Control Pop_Count_1 02a4 e5fe | | Load 0x2,-0x2 02a5 00da | | Load_Top At_Offset_2 02a6 0227 | ' | Execute Access,All_Reference 02a7 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 02a8 e5fd | | Load 0x2,-0x3 02a9 00da | | Load_Top At_Offset_2 02aa 0227 | ' | Execute Access,All_Reference 02ab 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02ac 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02ad e217 | | Load 0x1,0x17 02ae 0257 | W | Execute Discrete,Raise 02af 8405 | | Call 0x2,0x5 02b0 00db | | Load_Top At_Offset_3 02b1 e213 | | Load 0x1,0x13 02b2 026f | o | Execute Discrete,Remainder 02b3 c402 | | Store 0x2,0x2 02b4 00db | | Load_Top At_Offset_3 02b5 e5ff | | Load 0x2,-0x1 02b6 0227 | ' | Execute Access,All_Reference 02b7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 02b8 01d7 | | Execute Vector,Field_Read 02b9 00da | | Load_Top At_Offset_2 02ba 0227 | ' | Execute Access,All_Reference 02bb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02bc 00d9 | | Load_Top At_Offset_1 02bd e402 | | Load 0x2,0x2 02be e5ff | | Load 0x2,-0x1 02bf 0227 | ' | Execute Access,All_Reference 02c0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 02c1 01d6 | | Execute Vector,Field_Write 02c2 e5ff | | Load 0x2,-0x1 02c3 0227 | ' | Execute Access,All_Reference 02c4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02c5 0a01 | | Execute_Immediate Plus,0x1 02c6 e5ff | | Load 0x2,-0x1 02c7 0227 | ' | Execute Access,All_Reference 02c8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02c9 e214 | | Load 0x1,0x14 02ca 703c |p< | Jump_Nonzero 0x307 02cb 00cf | | Action Mark_Auxiliary 02cc 00da | | Load_Top At_Offset_2 02cd 0227 | ' | Execute Access,All_Reference 02ce 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02cf 0227 | ' | Execute Access,All_Reference 02d0 01d9 | | Execute Vector,Reverse_Bounds 02d1 0263 | c | Execute Discrete,Above_Bound 02d2 7033 |p3 | Jump_Nonzero 0x306 02d3 00d8 | | Load_Top At_Offset_0 02d4 e404 | | Load 0x2,0x4 02d5 0227 | ' | Execute Access,All_Reference 02d6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02d7 0227 | ' | Execute Access,All_Reference 02d8 01d7 | | Execute Vector,Field_Read 02d9 4861 |Ha | Short_Literal 0x61 02da e20e | | Load 0x1,0xe 02db 1c05 | | Execute_Immediate Run_Utility,0x5 02dc 00d8 | | Load_Top At_Offset_0 02dd e20e | | Load 0x1,0xe 02de 0122 | " | Execute Any,Make_Root_Type 02df 0260 | ` | Execute Discrete,In_Type 02e0 7001 |p | Jump_Nonzero 0x2e2 02e1 0801 | | Execute_Immediate Raise,0x1 02e2 487a |Hz | Short_Literal 0x7a 02e3 e20e | | Load 0x1,0xe 02e4 1c05 | | Execute_Immediate Run_Utility,0x5 02e5 00d8 | | Load_Top At_Offset_0 02e6 e20e | | Load 0x1,0xe 02e7 0122 | " | Execute Any,Make_Root_Type 02e8 0260 | ` | Execute Discrete,In_Type 02e9 7001 |p | Jump_Nonzero 0x2eb 02ea 0801 | | Execute_Immediate Raise,0x1 02eb 0262 | b | Execute Discrete,In_Range 02ec 6817 |h | Jump_Zero 0x304 02ed 00d8 | | Load_Top At_Offset_0 02ee e404 | | Load 0x2,0x4 02ef 0227 | ' | Execute Access,All_Reference 02f0 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 02f1 0227 | ' | Execute Access,All_Reference 02f2 01d7 | | Execute Vector,Field_Read 02f3 e20e | | Load 0x1,0xe 02f4 1c04 | | Execute_Immediate Run_Utility,0x4 02f5 0ae0 | | Execute_Immediate Plus,-0x20 02f6 e20e | | Load 0x1,0xe 02f7 1c05 | | Execute_Immediate Run_Utility,0x5 02f8 00d8 | | Load_Top At_Offset_0 02f9 e20e | | Load 0x1,0xe 02fa 0122 | " | Execute Any,Make_Root_Type 02fb 0260 | ` | Execute Discrete,In_Type 02fc 7001 |p | Jump_Nonzero 0x2fe 02fd 0801 | | Execute_Immediate Raise,0x1 02fe 00d9 | | Load_Top At_Offset_1 02ff e404 | | Load 0x2,0x4 0300 0227 | ' | Execute Access,All_Reference 0301 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0302 0227 | ' | Execute Access,All_Reference 0303 01d6 | | Execute Vector,Field_Write 0304 00c8 | | Action Pop_Auxiliary_Range 0305 3fcd |? | Loop_Increasing 0x2d3 0306 00ce | | Action Pop_Auxiliary 0307 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 031c | | .CONST 0x031c ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0005 | | .CONST 0x0005 ; Number of locals 030b INIT_0308: 030b 00db | | Load_Top At_Offset_3 030c 8242 | B | Call 0x1,0x42 030d e003 | | Load 0x0,0x3 030e 03f1 | | Declare_Variable Discrete,With_Value 030f 00d8 | | Load_Top At_Offset_0 0310 e213 | | Load 0x1,0x13 0311 026f | o | Execute Discrete,Remainder 0312 e003 | | Load 0x0,0x3 0313 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0314 e22f | / | Load 0x1,0x2f 0315 0007 | | Action Break_Optional 0316 00d9 | | Load_Top At_Offset_1 0317 e5ff | | Load 0x2,-0x1 0318 0227 | ' | Execute Access,All_Reference 0319 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 031a 01d7 | | Execute Vector,Field_Read 031b 0007 | | Action Break_Optional 031c BODY_0308: 031c 00d8 | | Load_Top At_Offset_0 031d e22f | / | Load 0x1,0x2f 031e e5fe | | Load 0x2,-0x2 031f e402 | | Load 0x2,0x2 0320 8244 | D | Call 0x1,0x44 0321 003b | ; | Store_Top Access,At_Offset_3 0322 0039 | 9 | Store_Top Access,At_Offset_1 0323 00d8 | | Load_Top At_Offset_0 0324 682c |h, | Jump_Zero 0x351 0325 00d9 | | Load_Top At_Offset_1 0326 7009 |p | Jump_Nonzero 0x330 0327 00d8 | | Load_Top At_Offset_0 0328 0227 | ' | Execute Access,All_Reference 0329 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 032a 00db | | Load_Top At_Offset_3 032b e5ff | | Load 0x2,-0x1 032c 0227 | ' | Execute Access,All_Reference 032d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 032e 01d6 | | Execute Vector,Field_Write 032f 7806 |x | Jump 0x336 0330 00d8 | | Load_Top At_Offset_0 0331 0227 | ' | Execute Access,All_Reference 0332 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0333 00da | | Load_Top At_Offset_2 0334 0227 | ' | Execute Access,All_Reference 0335 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0336 00d8 | | Load_Top At_Offset_0 0337 0229 | ) | Execute Access,All_Read 0338 00d8 | | Load_Top At_Offset_0 0339 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 033a e234 | 4 | Load 0x1,0x34 033b 0226 | & | Execute Access,Convert 033c e233 | 3 | Load 0x1,0x33 033d e234 | 4 | Load 0x1,0x34 033e 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 033f 8004 | | Call 0x0,0x4 0340 00d9 | | Load_Top At_Offset_1 0341 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0342 00d1 | | Pop_Control Pop_Count_1 0343 00d8 | | Load_Top At_Offset_0 0344 e238 | 8 | Load 0x1,0x38 0345 e239 | 9 | Load 0x1,0x39 0346 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 0347 8004 | | Call 0x0,0x4 0348 0039 | 9 | Store_Top Access,At_Offset_1 0349 e5ff | | Load 0x2,-0x1 034a 0227 | ' | Execute Access,All_Reference 034b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 034c 0aff | | Execute_Immediate Plus,-0x1 034d e5ff | | Load 0x2,-0x1 034e 0227 | ' | Execute Access,All_Reference 034f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0350 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0351 e5fd | | Load 0x2,-0x3 0352 6801 |h | Jump_Zero 0x354 0353 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0354 e218 | | Load 0x1,0x18 0355 0257 | W | Execute Discrete,Raise 0356 0000 0000 | | .XXX[0x2] 0358 ; -------------------------------------------------------------------------------------- 0358 ; SUBPROGRAM 0358 ; -------------------------------------------------------------------------------------- 0358 036c | l | .CONST 0x036c ; Address of begin 0359 0004 | | .CONST 0x0004 ; Address of exception handler 035a 0005 | | .CONST 0x0005 ; Number of locals 035b INIT_0358: 035b 00db | | Load_Top At_Offset_3 035c 8242 | B | Call 0x1,0x42 035d e003 | | Load 0x0,0x3 035e 03f1 | | Declare_Variable Discrete,With_Value 035f 00d8 | | Load_Top At_Offset_0 0360 e213 | | Load 0x1,0x13 0361 026f | o | Execute Discrete,Remainder 0362 e003 | | Load 0x0,0x3 0363 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0364 e22f | / | Load 0x1,0x2f 0365 0007 | | Action Break_Optional 0366 00d9 | | Load_Top At_Offset_1 0367 e5ff | | Load 0x2,-0x1 0368 0227 | ' | Execute Access,All_Reference 0369 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 036a 01d7 | | Execute Vector,Field_Read 036b 0007 | | Action Break_Optional 036c BODY_0358: 036c 00d8 | | Load_Top At_Offset_0 036d e22f | / | Load 0x1,0x2f 036e e5fe | | Load 0x2,-0x2 036f e402 | | Load 0x2,0x2 0370 8244 | D | Call 0x1,0x44 0371 003b | ; | Store_Top Access,At_Offset_3 0372 0039 | 9 | Store_Top Access,At_Offset_1 0373 00d8 | | Load_Top At_Offset_0 0374 6832 |h2 | Jump_Zero 0x3a7 0375 00d9 | | Load_Top At_Offset_1 0376 7009 |p | Jump_Nonzero 0x380 0377 00d8 | | Load_Top At_Offset_0 0378 0227 | ' | Execute Access,All_Reference 0379 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 037a 00db | | Load_Top At_Offset_3 037b e5ff | | Load 0x2,-0x1 037c 0227 | ' | Execute Access,All_Reference 037d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 037e 01d6 | | Execute Vector,Field_Write 037f 7806 |x | Jump 0x386 0380 00d8 | | Load_Top At_Offset_0 0381 0227 | ' | Execute Access,All_Reference 0382 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0383 00da | | Load_Top At_Offset_2 0384 0227 | ' | Execute Access,All_Reference 0385 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0386 00d8 | | Load_Top At_Offset_0 0387 0227 | ' | Execute Access,All_Reference 0388 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0389 c5fd | | Store 0x2,-0x3 038a 00d8 | | Load_Top At_Offset_0 038b 0229 | ) | Execute Access,All_Read 038c 00d8 | | Load_Top At_Offset_0 038d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 038e e234 | 4 | Load 0x1,0x34 038f 0226 | & | Execute Access,Convert 0390 e233 | 3 | Load 0x1,0x33 0391 e234 | 4 | Load 0x1,0x34 0392 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0393 8004 | | Call 0x0,0x4 0394 00d9 | | Load_Top At_Offset_1 0395 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0396 00d1 | | Pop_Control Pop_Count_1 0397 00d8 | | Load_Top At_Offset_0 0398 e238 | 8 | Load 0x1,0x38 0399 e239 | 9 | Load 0x1,0x39 039a 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 039b 8004 | | Call 0x0,0x4 039c 0039 | 9 | Store_Top Access,At_Offset_1 039d e5ff | | Load 0x2,-0x1 039e 0227 | ' | Execute Access,All_Reference 039f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03a0 0aff | | Execute_Immediate Plus,-0x1 03a1 e5ff | | Load 0x2,-0x1 03a2 0227 | ' | Execute Access,All_Reference 03a3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03a4 4801 |H | Short_Literal 0x1 03a5 a5fc | | Store_Unchecked 0x2,-0x4 03a6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03a7 4800 |H | Short_Literal 0x0 03a8 a5fc | | Store_Unchecked 0x2,-0x4 03a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03aa 0000 0000 | | .BLANK 0000[0x6] 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03b3 | | .CONST 0x03b3 ; Address of begin 03b1 0004 | | .CONST 0x0004 ; Address of exception handler 03b2 0001 | | .CONST 0x0001 ; Number of locals 03b3 BODY_03b0: 03b3 INIT_03b0: 03b3 00da | | Load_Top At_Offset_2 03b4 e5fe | | Load 0x2,-0x2 03b5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03b6 00cf | | Action Mark_Auxiliary 03b7 e213 | | Load 0x1,0x13 03b8 0aff | | Execute_Immediate Plus,-0x1 03b9 4800 |H | Short_Literal 0x0 03ba e003 | | Load 0x0,0x3 03bb 025c | \ | QQucode_0x025c 03bc 0263 | c | Execute Discrete,Above_Bound 03bd 7013 |p | Jump_Nonzero 0x3d1 03be 00d8 | | Load_Top At_Offset_0 03bf e5ff | | Load 0x2,-0x1 03c0 0227 | ' | Execute Access,All_Reference 03c1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03c2 01d7 | | Execute Vector,Field_Read 03c3 680b |h | Jump_Zero 0x3cf 03c4 00d8 | | Load_Top At_Offset_0 03c5 e5ff | | Load 0x2,-0x1 03c6 0227 | ' | Execute Access,All_Reference 03c7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03c8 01d7 | | Execute Vector,Field_Read 03c9 e5fe | | Load 0x2,-0x2 03ca 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03cb 00d8 | | Load_Top At_Offset_0 03cc e5fe | | Load 0x2,-0x2 03cd 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 03ce 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03cf 00c8 | | Action Pop_Auxiliary_Range 03d0 3fed |? | Loop_Increasing 0x3be 03d1 00ce | | Action Pop_Auxiliary 03d2 e22f | / | Load 0x1,0x2f 03d3 e5fe | | Load 0x2,-0x2 03d4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03d5 e213 | | Load 0x1,0x13 03d6 e5fe | | Load 0x2,-0x2 03d7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 03d8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03d9 0000 0000 | | .BLANK 0000[0x7] 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03e3 | | .CONST 0x03e3 ; Address of begin 03e1 0004 | | .CONST 0x0004 ; Address of exception handler 03e2 0001 | | .CONST 0x0001 ; Number of locals 03e3 BODY_03e0: 03e3 INIT_03e0: 03e3 00da | | Load_Top At_Offset_2 03e4 e5fd | | Load 0x2,-0x3 03e5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03e6 00cf | | Action Mark_Auxiliary 03e7 e213 | | Load 0x1,0x13 03e8 0aff | | Execute_Immediate Plus,-0x1 03e9 4800 |H | Short_Literal 0x0 03ea e003 | | Load 0x0,0x3 03eb 025c | \ | QQucode_0x025c 03ec 0263 | c | Execute Discrete,Above_Bound 03ed 702c |p, | Jump_Nonzero 0x41a 03ee 00d8 | | Load_Top At_Offset_0 03ef e5ff | | Load 0x2,-0x1 03f0 0227 | ' | Execute Access,All_Reference 03f1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03f2 01d7 | | Execute Vector,Field_Read 03f3 6824 |h$ | Jump_Zero 0x418 03f4 00d8 | | Load_Top At_Offset_0 03f5 e5fd | | Load 0x2,-0x3 03f6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03f7 0227 | ' | Execute Access,All_Reference 03f8 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03f9 01d7 | | Execute Vector,Field_Read 03fa e5fd | | Load 0x2,-0x3 03fb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03fc 00cf | | Action Mark_Auxiliary 03fd 0007 | | Action Break_Optional 03fe e5fd | | Load 0x2,-0x3 03ff 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0400 0227 | ' | Execute Access,All_Reference 0401 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0402 e5fe | | Load 0x2,-0x2 0403 012f | / | Execute Any,Equal 0404 6804 |h | Jump_Zero 0x409 0405 00d9 | | Load_Top At_Offset_1 0406 e5fd | | Load 0x2,-0x3 0407 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0408 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0409 e5fd | | Load 0x2,-0x3 040a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 040b 0227 | ' | Execute Access,All_Reference 040c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 040d 7001 |p | Jump_Nonzero 0x40f 040e 7808 |x | Jump 0x417 040f e5fd | | Load 0x2,-0x3 0410 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0411 0227 | ' | Execute Access,All_Reference 0412 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0413 e5fd | | Load 0x2,-0x3 0414 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0415 00c9 | | Action Pop_Auxiliary_Loop 0416 7fe7 | | Jump 0x3fe 0417 00ce | | Action Pop_Auxiliary 0418 00c8 | | Action Pop_Auxiliary_Range 0419 3fd4 |? | Loop_Increasing 0x3ee 041a 00ce | | Action Pop_Auxiliary 041b e22f | / | Load 0x1,0x2f 041c e5fd | | Load 0x2,-0x3 041d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 041e e213 | | Load 0x1,0x13 041f e5fd | | Load 0x2,-0x3 0420 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0421 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0422 0000 0000 | | .BLANK 0000[0x6] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b 00da | | Load_Top At_Offset_2 042c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 042d 6802 |h | Jump_Zero 0x430 042e 4800 |H | Short_Literal 0x0 042f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0430 4801 |H | Short_Literal 0x1 0431 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0432 0000 0000 | | .BLANK 0000[0x6] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 043b | ; | .CONST 0x043b ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0001 | | .CONST 0x0001 ; Number of locals 043b BODY_0438: 043b INIT_0438: 043b 00da | | Load_Top At_Offset_2 043c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 043d 7002 |p | Jump_Nonzero 0x440 043e e218 | | Load 0x1,0x18 043f 0257 | W | Execute Discrete,Raise 0440 00da | | Load_Top At_Offset_2 0441 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0442 0227 | ' | Execute Access,All_Reference 0443 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0444 00d8 | | Load_Top At_Offset_0 0445 0120 | | Execute Any,Is_Value 0446 7002 |p | Jump_Nonzero 0x449 0447 00d8 | | Load_Top At_Offset_0 0448 011e | | Execute Any,Convert 0449 e212 | | Load 0x1,0x12 044a 0119 | | Execute Any,Check_In_Formal_Type 044b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 044c 0000 0000 | | .BLANK 0000[0x4] 0450 ; -------------------------------------------------------------------------------------- 0450 ; SUBPROGRAM 0450 ; -------------------------------------------------------------------------------------- 0450 0453 | S | .CONST 0x0453 ; Address of begin 0451 0004 | | .CONST 0x0004 ; Address of exception handler 0452 0001 | | .CONST 0x0001 ; Number of locals 0453 BODY_0450: 0453 INIT_0450: 0453 00da | | Load_Top At_Offset_2 0454 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0455 7002 |p | Jump_Nonzero 0x458 0456 e218 | | Load 0x1,0x18 0457 0257 | W | Execute Discrete,Raise 0458 00da | | Load_Top At_Offset_2 0459 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 045a 0227 | ' | Execute Access,All_Reference 045b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 045c 0227 | ' | Execute Access,All_Reference 045d 0335 | 5 | Declare_Variable Array,Duplicate 045e 00cd | | Action Spare6_Action 045f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0460 ; -------------------------------------------------------------------------------------- 0460 ; SUBPROGRAM 0460 ; -------------------------------------------------------------------------------------- 0460 0463 | c | .CONST 0x0463 ; Address of begin 0461 0004 | | .CONST 0x0004 ; Address of exception handler 0462 0001 | | .CONST 0x0001 ; Number of locals 0463 BODY_0460: 0463 INIT_0460: 0463 00da | | Load_Top At_Offset_2 0464 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0465 7002 |p | Jump_Nonzero 0x468 0466 e218 | | Load 0x1,0x18 0467 0257 | W | Execute Discrete,Raise 0468 00da | | Load_Top At_Offset_2 0469 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 046a 0227 | ' | Execute Access,All_Reference 046b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 046c e211 | | Load 0x1,0x11 046d 0223 | # | Execute Access,Check_In_Type 046e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 046f 0000 | | .XXX[0x1] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0473 | s | .CONST 0x0473 ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0001 | | .CONST 0x0001 ; Number of locals 0473 BODY_0470: 0473 INIT_0470: 0473 00da | | Load_Top At_Offset_2 0474 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0475 7002 |p | Jump_Nonzero 0x478 0476 e218 | | Load 0x1,0x18 0477 0257 | W | Execute Discrete,Raise 0478 00da | | Load_Top At_Offset_2 0479 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 047a 0227 | ' | Execute Access,All_Reference 047b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 047c 6807 |h | Jump_Zero 0x484 047d 00da | | Load_Top At_Offset_2 047e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 047f 0227 | ' | Execute Access,All_Reference 0480 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0481 00db | | Load_Top At_Offset_3 0482 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0483 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0484 00cf | | Action Mark_Auxiliary 0485 e213 | | Load 0x1,0x13 0486 0aff | | Execute_Immediate Plus,-0x1 0487 e5ff | | Load 0x2,-0x1 0488 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0489 0a01 | | Execute_Immediate Plus,0x1 048a 0263 | c | Execute Discrete,Above_Bound 048b 7015 |p | Jump_Nonzero 0x4a1 048c 00d8 | | Load_Top At_Offset_0 048d e5ff | | Load 0x2,-0x1 048e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 048f 0227 | ' | Execute Access,All_Reference 0490 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0491 01d7 | | Execute Vector,Field_Read 0492 680c |h | Jump_Zero 0x49f 0493 00d8 | | Load_Top At_Offset_0 0494 e5ff | | Load 0x2,-0x1 0495 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0496 0227 | ' | Execute Access,All_Reference 0497 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0498 01d7 | | Execute Vector,Field_Read 0499 e5ff | | Load 0x2,-0x1 049a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 049b 00d8 | | Load_Top At_Offset_0 049c e5ff | | Load 0x2,-0x1 049d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 049e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 049f 00c8 | | Action Pop_Auxiliary_Range 04a0 3feb |? | Loop_Increasing 0x48c 04a1 00ce | | Action Pop_Auxiliary 04a2 e22f | / | Load 0x1,0x2f 04a3 00db | | Load_Top At_Offset_3 04a4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04a6 0000 0000 | | .XXX[0x2] 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 00db | | Load_Top At_Offset_3 04ac 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04ad 7002 |p | Jump_Nonzero 0x4b0 04ae e218 | | Load 0x1,0x18 04af 0257 | W | Execute Discrete,Raise 04b0 00db | | Load_Top At_Offset_3 04b1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04b2 0227 | ' | Execute Access,All_Reference 04b3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04b4 6819 |h | Jump_Zero 0x4ce 04b5 00cf | | Action Mark_Auxiliary 04b6 0007 | | Action Break_Optional 04b7 e5fe | | Load 0x2,-0x2 04b8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04b9 0227 | ' | Execute Access,All_Reference 04ba 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04bb e5fe | | Load 0x2,-0x2 04bc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04bd e5fe | | Load 0x2,-0x2 04be 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04bf 0227 | ' | Execute Access,All_Reference 04c0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04c1 e5ff | | Load 0x2,-0x1 04c2 012f | / | Execute Any,Equal 04c3 6801 |h | Jump_Zero 0x4c5 04c4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04c5 e5fe | | Load 0x2,-0x2 04c6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04c7 0227 | ' | Execute Access,All_Reference 04c8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04c9 7001 |p | Jump_Nonzero 0x4cb 04ca 7802 |x | Jump 0x4cd 04cb 00c9 | | Action Pop_Auxiliary_Loop 04cc 7fea | | Jump 0x4b7 04cd 00ce | | Action Pop_Auxiliary 04ce 00cf | | Action Mark_Auxiliary 04cf e213 | | Load 0x1,0x13 04d0 0aff | | Execute_Immediate Plus,-0x1 04d1 e5fe | | Load 0x2,-0x2 04d2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04d3 0a01 | | Execute_Immediate Plus,0x1 04d4 0263 | c | Execute Discrete,Above_Bound 04d5 702d |p- | Jump_Nonzero 0x503 04d6 00d8 | | Load_Top At_Offset_0 04d7 e5fe | | Load 0x2,-0x2 04d8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04d9 0227 | ' | Execute Access,All_Reference 04da 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 04db 01d7 | | Execute Vector,Field_Read 04dc 6824 |h$ | Jump_Zero 0x501 04dd 00d8 | | Load_Top At_Offset_0 04de e5fe | | Load 0x2,-0x2 04df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04e0 0227 | ' | Execute Access,All_Reference 04e1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 04e2 01d7 | | Execute Vector,Field_Read 04e3 e5fe | | Load 0x2,-0x2 04e4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04e5 00cf | | Action Mark_Auxiliary 04e6 0007 | | Action Break_Optional 04e7 e5fe | | Load 0x2,-0x2 04e8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04e9 0227 | ' | Execute Access,All_Reference 04ea 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04eb e5ff | | Load 0x2,-0x1 04ec 012f | / | Execute Any,Equal 04ed 6804 |h | Jump_Zero 0x4f2 04ee 00d9 | | Load_Top At_Offset_1 04ef e5fe | | Load 0x2,-0x2 04f0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 04f1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04f2 e5fe | | Load 0x2,-0x2 04f3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04f4 0227 | ' | Execute Access,All_Reference 04f5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04f6 7001 |p | Jump_Nonzero 0x4f8 04f7 7808 |x | Jump 0x500 04f8 e5fe | | Load 0x2,-0x2 04f9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04fa 0227 | ' | Execute Access,All_Reference 04fb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 04fc e5fe | | Load 0x2,-0x2 04fd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 04fe 00c9 | | Action Pop_Auxiliary_Loop 04ff 7fe7 | | Jump 0x4e7 0500 00ce | | Action Pop_Auxiliary 0501 00c8 | | Action Pop_Auxiliary_Range 0502 3fd3 |? | Loop_Increasing 0x4d6 0503 00ce | | Action Pop_Auxiliary 0504 e22f | / | Load 0x1,0x2f 0505 e5fe | | Load 0x2,-0x2 0506 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0507 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 050b | | .CONST 0x050b ; Address of begin 0509 0004 | | .CONST 0x0004 ; Address of exception handler 050a 0001 | | .CONST 0x0001 ; Number of locals 050b BODY_0508: 050b INIT_0508: 050b 4601 |F | Jump_Case 0x2 050c 7801 |x | Jump 0x50e ; case 0x0 050d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 050e 4800 |H | Short_Literal 0x0 050f 00db | | Load_Top At_Offset_3 0510 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0511 00da | | Load_Top At_Offset_2 0512 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0513 0125 | % | Execute Any,Set_Constraint 0514 00da | | Load_Top At_Offset_2 0515 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0516 1c00 | | Execute_Immediate Run_Utility,0x0 0517 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0518 ; -------------------------------------------------------------------------------------- 0518 ; SUBPROGRAM 0518 ; -------------------------------------------------------------------------------------- 0518 051b | | .CONST 0x051b ; Address of begin 0519 0004 | | .CONST 0x0004 ; Address of exception handler 051a 0001 | | .CONST 0x0001 ; Number of locals 051b BODY_0518: 051b INIT_0518: 051b 4601 |F | Jump_Case 0x2 051c 7801 |x | Jump 0x51e ; case 0x0 051d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 051e 4800 |H | Short_Literal 0x0 051f 00db | | Load_Top At_Offset_3 0520 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0521 e22d | - | Load 0x1,0x2d 0522 3001 |0 | Execute Record,Field_Type,Field_Number 0x1 0523 0337 | 7 | Declare_Variable Array 0524 e22d | - | Load 0x1,0x2d 0525 3001 |0 | Execute Record,Field_Type,Field_Number 0x1 0526 01d9 | | Execute Vector,Reverse_Bounds 0527 0263 | c | Execute Discrete,Above_Bound 0528 7005 |p | Jump_Nonzero 0x52e 0529 e22f | / | Load 0x1,0x2f 052a 00d9 | | Load_Top At_Offset_1 052b e402 | | Load 0x2,0x2 052c 01d6 | | Execute Vector,Field_Write 052d 3ffb |? | Loop_Increasing 0x529 052e 00db | | Load_Top At_Offset_3 052f 00d9 | | Load_Top At_Offset_1 0530 00d9 | | Load_Top At_Offset_1 0531 3001 |0 | Execute Record,Field_Type,Field_Number 0x1 0532 0119 | | Execute Any,Check_In_Formal_Type 0533 00d1 | | Pop_Control Pop_Count_1 0534 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0535 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0536 0000 0000 | | .XXX[0x2] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 054e | N | .CONST 0x054e ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0003 | | .CONST 0x0003 ; Number of locals 053b INIT_0538: 053b 00da | | Load_Top At_Offset_2 053c 01dd | | Execute Vector,First 053d 00d8 | | Load_Top At_Offset_0 053e e003 | | Load 0x0,0x3 053f 0260 | ` | Execute Discrete,In_Type 0540 7001 |p | Jump_Nonzero 0x542 0541 0801 | | Execute_Immediate Raise,0x1 0542 00db | | Load_Top At_Offset_3 0543 01dc | | Execute Vector,Last 0544 00d8 | | Load_Top At_Offset_0 0545 e003 | | Load 0x0,0x3 0546 0260 | ` | Execute Discrete,In_Type 0547 7001 |p | Jump_Nonzero 0x549 0548 0801 | | Execute_Immediate Raise,0x1 0549 e00b | | Load 0x0,0xb 054a 035b | [ | Declare_Type Array,Constrained 054b 0337 | 7 | Declare_Variable Array 054c 029f 06e3 | | Declare_Subprogram INIT_06e0,For_Call 054e BODY_0538: 054e e214 | | Load 0x1,0x14 054f 6816 |h | Jump_Zero 0x566 0550 00cf | | Action Mark_Auxiliary 0551 e5ff | | Load 0x2,-0x1 0552 01d9 | | Execute Vector,Reverse_Bounds 0553 0263 | c | Execute Discrete,Above_Bound 0554 700f |p | Jump_Nonzero 0x564 0555 00d8 | | Load_Top At_Offset_0 0556 e5ff | | Load 0x2,-0x1 0557 01d7 | | Execute Vector,Field_Read 0558 e20e | | Load 0x1,0xe 0559 1c04 | | Execute_Immediate Run_Utility,0x4 055a 00d9 | | Load_Top At_Offset_1 055b 00d8 | | Load_Top At_Offset_0 055c e002 | | Load 0x0,0x2 055d 0260 | ` | Execute Discrete,In_Type 055e 7001 |p | Jump_Nonzero 0x560 055f 0801 | | Execute_Immediate Raise,0x1 0560 e402 | | Load 0x2,0x2 0561 01d6 | | Execute Vector,Field_Write 0562 00c8 | | Action Pop_Auxiliary_Range 0563 3ff1 |? | Loop_Increasing 0x555 0564 00ce | | Action Pop_Auxiliary 0565 783b |x; | Jump 0x5a1 0566 00cf | | Action Mark_Auxiliary 0567 e5ff | | Load 0x2,-0x1 0568 01d9 | | Execute Vector,Reverse_Bounds 0569 0263 | c | Execute Discrete,Above_Bound 056a 7035 |p5 | Jump_Nonzero 0x5a0 056b 00d8 | | Load_Top At_Offset_0 056c e5ff | | Load 0x2,-0x1 056d 01d7 | | Execute Vector,Field_Read 056e 4861 |Ha | Short_Literal 0x61 056f e20e | | Load 0x1,0xe 0570 1c05 | | Execute_Immediate Run_Utility,0x5 0571 00d8 | | Load_Top At_Offset_0 0572 e20e | | Load 0x1,0xe 0573 0122 | " | Execute Any,Make_Root_Type 0574 0260 | ` | Execute Discrete,In_Type 0575 7001 |p | Jump_Nonzero 0x577 0576 0801 | | Execute_Immediate Raise,0x1 0577 487a |Hz | Short_Literal 0x7a 0578 e20e | | Load 0x1,0xe 0579 1c05 | | Execute_Immediate Run_Utility,0x5 057a 00d8 | | Load_Top At_Offset_0 057b e20e | | Load 0x1,0xe 057c 0122 | " | Execute Any,Make_Root_Type 057d 0260 | ` | Execute Discrete,In_Type 057e 7001 |p | Jump_Nonzero 0x580 057f 0801 | | Execute_Immediate Raise,0x1 0580 0262 | b | Execute Discrete,In_Range 0581 680f |h | Jump_Zero 0x591 0582 00d8 | | Load_Top At_Offset_0 0583 e5ff | | Load 0x2,-0x1 0584 01d7 | | Execute Vector,Field_Read 0585 e20e | | Load 0x1,0xe 0586 1c04 | | Execute_Immediate Run_Utility,0x4 0587 0ae0 | | Execute_Immediate Plus,-0x20 0588 00d9 | | Load_Top At_Offset_1 0589 00d8 | | Load_Top At_Offset_0 058a e002 | | Load 0x0,0x2 058b 0260 | ` | Execute Discrete,In_Type 058c 7001 |p | Jump_Nonzero 0x58e 058d 0801 | | Execute_Immediate Raise,0x1 058e e402 | | Load 0x2,0x2 058f 01d6 | | Execute Vector,Field_Write 0590 780d |x | Jump 0x59e 0591 00d8 | | Load_Top At_Offset_0 0592 e5ff | | Load 0x2,-0x1 0593 01d7 | | Execute Vector,Field_Read 0594 e20e | | Load 0x1,0xe 0595 1c04 | | Execute_Immediate Run_Utility,0x4 0596 00d9 | | Load_Top At_Offset_1 0597 00d8 | | Load_Top At_Offset_0 0598 e002 | | Load 0x0,0x2 0599 0260 | ` | Execute Discrete,In_Type 059a 7001 |p | Jump_Nonzero 0x59c 059b 0801 | | Execute_Immediate Raise,0x1 059c e402 | | Load 0x2,0x2 059d 01d6 | | Execute Vector,Field_Write 059e 00c8 | | Action Pop_Auxiliary_Range 059f 3fcb |? | Loop_Increasing 0x56b 05a0 00ce | | Action Pop_Auxiliary 05a1 e5ff | | Load 0x2,-0x1 05a2 01db | | Execute Vector,Length 05a3 00d8 | | Load_Top At_Offset_0 05a4 4800 |H | Short_Literal 0x0 05a5 4804 |H | Short_Literal 0x4 05a6 0262 | b | Execute Discrete,In_Range 05a7 6857 |hW | Jump_Zero 0x5ff 05a8 0b00 | | Execute_Immediate Case_Compare,0x0 05a9 7024 |p$ | Jump_Nonzero 0x5ce 05aa 0b01 | | Execute_Immediate Case_Compare,0x1 05ab 7025 |p% | Jump_Nonzero 0x5d1 05ac 0b02 | | Execute_Immediate Case_Compare,0x2 05ad 7029 |p) | Jump_Nonzero 0x5d7 05ae 0f03 | | Execute_Immediate Equal,0x3 05af 7038 |p8 | Jump_Nonzero 0x5e8 05b0 00d9 | | Load_Top At_Offset_1 05b1 01dd | | Execute Vector,First 05b2 00da | | Load_Top At_Offset_2 05b3 01d7 | | Execute Vector,Field_Read 05b4 0915 | | Execute_Immediate Binary_Scale,0x15 05b5 00da | | Load_Top At_Offset_2 05b6 01dd | | Execute Vector,First 05b7 0a01 | | Execute_Immediate Plus,0x1 05b8 00db | | Load_Top At_Offset_3 05b9 01d7 | | Execute Vector,Field_Read 05ba 090e | | Execute_Immediate Binary_Scale,0xe 05bb 0273 | s | Execute Discrete,Plus 05bc 00da | | Load_Top At_Offset_2 05bd 01dd | | Execute Vector,First 05be 0a02 | | Execute_Immediate Plus,0x2 05bf 00db | | Load_Top At_Offset_3 05c0 01d7 | | Execute Vector,Field_Read 05c1 0907 | | Execute_Immediate Binary_Scale,0x7 05c2 0273 | s | Execute Discrete,Plus 05c3 00da | | Load_Top At_Offset_2 05c4 01dc | | Execute Vector,Last 05c5 00db | | Load_Top At_Offset_3 05c6 01d7 | | Execute Vector,Field_Read 05c7 0273 | s | Execute Discrete,Plus 05c8 00d8 | | Load_Top At_Offset_0 05c9 e003 | | Load 0x0,0x3 05ca 0260 | ` | Execute Discrete,In_Type 05cb 7001 |p | Jump_Nonzero 0x5cd 05cc 0801 | | Execute_Immediate Raise,0x1 05cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05ce 00d1 | | Pop_Control Pop_Count_1 05cf 4800 |H | Short_Literal 0x0 05d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05d1 00d1 | | Pop_Control Pop_Count_1 05d2 00d9 | | Load_Top At_Offset_1 05d3 01dd | | Execute Vector,First 05d4 00da | | Load_Top At_Offset_2 05d5 01d7 | | Execute Vector,Field_Read 05d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05d7 00d1 | | Pop_Control Pop_Count_1 05d8 00d9 | | Load_Top At_Offset_1 05d9 01dd | | Execute Vector,First 05da 00da | | Load_Top At_Offset_2 05db 01d7 | | Execute Vector,Field_Read 05dc 0907 | | Execute_Immediate Binary_Scale,0x7 05dd 00da | | Load_Top At_Offset_2 05de 01dc | | Execute Vector,Last 05df 00db | | Load_Top At_Offset_3 05e0 01d7 | | Execute Vector,Field_Read 05e1 0273 | s | Execute Discrete,Plus 05e2 00d8 | | Load_Top At_Offset_0 05e3 e003 | | Load 0x0,0x3 05e4 0260 | ` | Execute Discrete,In_Type 05e5 7001 |p | Jump_Nonzero 0x5e7 05e6 0801 | | Execute_Immediate Raise,0x1 05e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05e8 00d9 | | Load_Top At_Offset_1 05e9 01dd | | Execute Vector,First 05ea 00da | | Load_Top At_Offset_2 05eb 01d7 | | Execute Vector,Field_Read 05ec 090e | | Execute_Immediate Binary_Scale,0xe 05ed 00da | | Load_Top At_Offset_2 05ee 01dd | | Execute Vector,First 05ef 0a01 | | Execute_Immediate Plus,0x1 05f0 00db | | Load_Top At_Offset_3 05f1 01d7 | | Execute Vector,Field_Read 05f2 0907 | | Execute_Immediate Binary_Scale,0x7 05f3 0273 | s | Execute Discrete,Plus 05f4 00da | | Load_Top At_Offset_2 05f5 01dc | | Execute Vector,Last 05f6 00db | | Load_Top At_Offset_3 05f7 01d7 | | Execute Vector,Field_Read 05f8 0273 | s | Execute Discrete,Plus 05f9 00d8 | | Load_Top At_Offset_0 05fa e003 | | Load 0x0,0x3 05fb 0260 | ` | Execute Discrete,In_Type 05fc 7001 |p | Jump_Nonzero 0x5fe 05fd 0801 | | Execute_Immediate Raise,0x1 05fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05ff 00d1 | | Pop_Control Pop_Count_1 0600 8403 | | Call 0x2,0x3 0601 0831 | 1 | Execute_Immediate Raise,0x31 0602 0000 0000 | | .BLANK 0000[0x6] 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 0613 | | .CONST 0x0613 ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0003 | | .CONST 0x0003 ; Number of locals 060b INIT_0608: 060b 00da | | Load_Top At_Offset_2 060c 01dd | | Execute Vector,First 060d e20f | | Load 0x1,0xf 060e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 060f e5fe | | Load 0x2,-0x2 0610 01dd | | Execute Vector,First 0611 e20f | | Load 0x1,0xf 0612 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0613 BODY_0608: 0613 e5ff | | Load 0x2,-0x1 0614 01db | | Execute Vector,Length 0615 e5fe | | Load 0x2,-0x2 0616 01db | | Execute Vector,Length 0617 027e | ~ | Execute Discrete,Not_Equal 0618 6802 |h | Jump_Zero 0x61b 0619 4800 |H | Short_Literal 0x0 061a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 061b 00cf | | Action Mark_Auxiliary 061c e5ff | | Load 0x2,-0x1 061d 01db | | Execute Vector,Length 061e e20f | | Load 0x1,0xf 061f 0122 | " | Execute Any,Make_Root_Type 0620 00d9 | | Load_Top At_Offset_1 0621 00d0 | | Action Swap_Control 0622 0260 | ` | Execute Discrete,In_Type 0623 7001 |p | Jump_Nonzero 0x625 0624 0801 | | Execute_Immediate Raise,0x1 0625 4801 |H | Short_Literal 0x1 0626 e20f | | Load 0x1,0xf 0627 025c | \ | QQucode_0x025c 0628 0263 | c | Execute Discrete,Above_Bound 0629 7045 |pE | Jump_Nonzero 0x66f 062a e402 | | Load 0x2,0x2 062b 00d9 | | Load_Top At_Offset_1 062c 0273 | s | Execute Discrete,Plus 062d 0aff | | Execute_Immediate Plus,-0x1 062e e5ff | | Load 0x2,-0x1 062f 01d7 | | Execute Vector,Field_Read 0630 e403 | | Load 0x2,0x3 0631 00da | | Load_Top At_Offset_2 0632 0273 | s | Execute Discrete,Plus 0633 0aff | | Execute_Immediate Plus,-0x1 0634 e5fe | | Load 0x2,-0x2 0635 01d7 | | Execute Vector,Field_Read 0636 027e | ~ | Execute Discrete,Not_Equal 0637 6835 |h5 | Jump_Zero 0x66d 0638 e402 | | Load 0x2,0x2 0639 00d9 | | Load_Top At_Offset_1 063a 0273 | s | Execute Discrete,Plus 063b 0aff | | Execute_Immediate Plus,-0x1 063c e5ff | | Load 0x2,-0x1 063d 01d7 | | Execute Vector,Field_Read 063e 4861 |Ha | Short_Literal 0x61 063f e20e | | Load 0x1,0xe 0640 1c05 | | Execute_Immediate Run_Utility,0x5 0641 00d8 | | Load_Top At_Offset_0 0642 e20e | | Load 0x1,0xe 0643 0122 | " | Execute Any,Make_Root_Type 0644 0260 | ` | Execute Discrete,In_Type 0645 7001 |p | Jump_Nonzero 0x647 0646 0801 | | Execute_Immediate Raise,0x1 0647 487a |Hz | Short_Literal 0x7a 0648 e20e | | Load 0x1,0xe 0649 1c05 | | Execute_Immediate Run_Utility,0x5 064a 00d8 | | Load_Top At_Offset_0 064b e20e | | Load 0x1,0xe 064c 0122 | " | Execute Any,Make_Root_Type 064d 0260 | ` | Execute Discrete,In_Type 064e 7001 |p | Jump_Nonzero 0x650 064f 0801 | | Execute_Immediate Raise,0x1 0650 0261 | a | Execute Discrete,Not_In_Range 0651 7019 |p | Jump_Nonzero 0x66b 0652 e402 | | Load 0x2,0x2 0653 00d9 | | Load_Top At_Offset_1 0654 0273 | s | Execute Discrete,Plus 0655 0aff | | Execute_Immediate Plus,-0x1 0656 e5ff | | Load 0x2,-0x1 0657 01d7 | | Execute Vector,Field_Read 0658 e20e | | Load 0x1,0xe 0659 1c04 | | Execute_Immediate Run_Utility,0x4 065a 0ae0 | | Execute_Immediate Plus,-0x20 065b e20e | | Load 0x1,0xe 065c 1c05 | | Execute_Immediate Run_Utility,0x5 065d 00d8 | | Load_Top At_Offset_0 065e e20e | | Load 0x1,0xe 065f 0122 | " | Execute Any,Make_Root_Type 0660 0260 | ` | Execute Discrete,In_Type 0661 7001 |p | Jump_Nonzero 0x663 0662 0801 | | Execute_Immediate Raise,0x1 0663 e403 | | Load 0x2,0x3 0664 00da | | Load_Top At_Offset_2 0665 0273 | s | Execute Discrete,Plus 0666 0aff | | Execute_Immediate Plus,-0x1 0667 e5fe | | Load 0x2,-0x2 0668 01d7 | | Execute Vector,Field_Read 0669 027e | ~ | Execute Discrete,Not_Equal 066a 6802 |h | Jump_Zero 0x66d 066b 4800 |H | Short_Literal 0x0 066c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 066d 00c8 | | Action Pop_Auxiliary_Range 066e 3fbb |? | Loop_Increasing 0x62a 066f 00ce | | Action Pop_Auxiliary 0670 4801 |H | Short_Literal 0x1 0671 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0672 0000 0000 | | .BLANK 0000[0x6] 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 067d | } | .CONST 0x067d ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0002 | | .CONST 0x0002 ; Number of locals 067b INIT_0678: 067b e5fc | | Load 0x2,-0x4 067c 0007 | | Action Break_Optional 067d BODY_0678: 067d e22f | / | Load 0x1,0x2f 067e a5fd | | Store_Unchecked 0x2,-0x3 067f 00cf | | Action Mark_Auxiliary 0680 7823 |x# | Jump 0x6a4 0681 00d9 | | Load_Top At_Offset_1 0682 0227 | ' | Execute Access,All_Reference 0683 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0684 e5ff | | Load 0x2,-0x1 0685 027f | | Execute Discrete,Equal 0686 6816 |h | Jump_Zero 0x69d 0687 e214 | | Load 0x1,0x14 0688 680a |h | Jump_Zero 0x693 0689 00d9 | | Load_Top At_Offset_1 068a 0227 | ' | Execute Access,All_Reference 068b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 068c 0227 | ' | Execute Access,All_Reference 068d e5fe | | Load 0x2,-0x2 068e 01df | | Execute Vector,Equal 068f 680d |h | Jump_Zero 0x69d 0690 00d9 | | Load_Top At_Offset_1 0691 a5fc | | Store_Unchecked 0x2,-0x4 0692 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0693 00d9 | | Load_Top At_Offset_1 0694 0227 | ' | Execute Access,All_Reference 0695 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0696 0227 | ' | Execute Access,All_Reference 0697 e5fe | | Load 0x2,-0x2 0698 8243 | C | Call 0x1,0x43 0699 6803 |h | Jump_Zero 0x69d 069a 00d9 | | Load_Top At_Offset_1 069b a5fc | | Store_Unchecked 0x2,-0x4 069c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 069d 00d9 | | Load_Top At_Offset_1 069e a5fd | | Store_Unchecked 0x2,-0x3 069f 00d9 | | Load_Top At_Offset_1 06a0 0227 | ' | Execute Access,All_Reference 06a1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 06a2 003a | : | Store_Top Access,At_Offset_2 06a3 00c9 | | Action Pop_Auxiliary_Loop 06a4 00d9 | | Load_Top At_Offset_1 06a5 77db |w | Jump_Nonzero 0x681 06a6 00ce | | Action Pop_Auxiliary 06a7 e22f | / | Load 0x1,0x2f 06a8 a5fc | | Store_Unchecked 0x2,-0x4 06a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06aa 0000 0000 | | .BLANK 0000[0x6] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06b7 | | .CONST 0x06b7 ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0002 | | .CONST 0x0002 ; Number of locals 06b3 INIT_06b0: 06b3 e22e | . | Load 0x1,0x2e 06b4 0322 | " | Declare_Variable Record 06b5 00d8 | | Load_Top At_Offset_0 06b6 1c00 | | Execute_Immediate Run_Utility,0x0 06b7 BODY_06b0: 06b7 e402 | | Load 0x2,0x2 06b8 00d9 | | Load_Top At_Offset_1 06b9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 06ba e5fe | | Load 0x2,-0x2 06bb e211 | | Load 0x1,0x11 06bc 03b6 | | Declare_Variable Access,By_Allocation,With_Value 06bd 00d9 | | Load_Top At_Offset_1 06be 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 06bf e5fd | | Load 0x2,-0x3 06c0 00d9 | | Load_Top At_Offset_1 06c1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 06c2 00d8 | | Load_Top At_Offset_0 06c3 e22f | / | Load 0x1,0x2f 06c4 03b6 | | Declare_Variable Access,By_Allocation,With_Value 06c5 a404 | | Store_Unchecked 0x2,0x4 06c6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06c7 0000 | | .XXX[0x1] 06c8 ; -------------------------------------------------------------------------------------- 06c8 ; SUBPROGRAM 06c8 ; -------------------------------------------------------------------------------------- 06c8 06cf | | .CONST 0x06cf ; Address of begin 06c9 0004 | | .CONST 0x0004 ; Address of exception handler 06ca 0002 | | .CONST 0x0002 ; Number of locals 06cb INIT_06c8: 06cb e22e | . | Load 0x1,0x2e 06cc 0322 | " | Declare_Variable Record 06cd 00d8 | | Load_Top At_Offset_0 06ce 1c00 | | Execute_Immediate Run_Utility,0x0 06cf BODY_06c8: 06cf e402 | | Load 0x2,0x2 06d0 00d9 | | Load_Top At_Offset_1 06d1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 06d2 e5fe | | Load 0x2,-0x2 06d3 00d9 | | Load_Top At_Offset_1 06d4 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 06d5 e5fd | | Load 0x2,-0x3 06d6 00d9 | | Load_Top At_Offset_1 06d7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 06d8 00d8 | | Load_Top At_Offset_0 06d9 e22f | / | Load 0x1,0x2f 06da 03b6 | | Declare_Variable Access,By_Allocation,With_Value 06db a404 | | Store_Unchecked 0x2,0x4 06dc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06dd 0000 0000 | | .XXX[0x3] 06df 0000 | | 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06e9 | | .CONST 0x06e9 ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0003 | | .CONST 0x0003 ; Number of locals 06e3 INIT_06e0: 06e3 e402 | | Load 0x2,0x2 06e4 01dd | | Execute Vector,First 06e5 e002 | | Load 0x0,0x2 06e6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 06e7 e003 | | Load 0x0,0x3 06e8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 06e9 BODY_06e0: 06e9 00cf | | Action Mark_Auxiliary 06ea 7824 |x$ | Jump 0x70f 06eb 00d9 | | Load_Top At_Offset_1 06ec 603b |`; | Indirect_Literal Discrete,0x728,{0x00000000, 0x6fffffff} 06ed 027d | } | Execute Discrete,Greater 06ee 6804 |h | Jump_Zero 0x6f3 06ef 00d9 | | Load_Top At_Offset_1 06f0 4803 |H | Short_Literal 0x3 06f1 0270 | p | Execute Discrete,Divide 06f2 005a | Z | Store_Top Discrete,At_Offset_2 06f3 00d9 | | Load_Top At_Offset_1 06f4 00db | | Load_Top At_Offset_3 06f5 e402 | | Load 0x2,0x2 06f6 01d7 | | Execute Vector,Field_Read 06f7 0915 | | Execute_Immediate Binary_Scale,0x15 06f8 0273 | s | Execute Discrete,Plus 06f9 00db | | Load_Top At_Offset_3 06fa 0a01 | | Execute_Immediate Plus,0x1 06fb e402 | | Load 0x2,0x2 06fc 01d7 | | Execute Vector,Field_Read 06fd 090e | | Execute_Immediate Binary_Scale,0xe 06fe 0273 | s | Execute Discrete,Plus 06ff 00db | | Load_Top At_Offset_3 0700 0a02 | | Execute_Immediate Plus,0x2 0701 e402 | | Load 0x2,0x2 0702 01d7 | | Execute Vector,Field_Read 0703 0907 | | Execute_Immediate Binary_Scale,0x7 0704 0273 | s | Execute Discrete,Plus 0705 00db | | Load_Top At_Offset_3 0706 0a03 | | Execute_Immediate Plus,0x3 0707 e402 | | Load 0x2,0x2 0708 01d7 | | Execute Vector,Field_Read 0709 0273 | s | Execute Discrete,Plus 070a 005a | Z | Store_Top Discrete,At_Offset_2 070b 00da | | Load_Top At_Offset_2 070c 0a04 | | Execute_Immediate Plus,0x4 070d 005b | [ | Store_Top Discrete,At_Offset_3 070e 00c9 | | Action Pop_Auxiliary_Loop 070f 00da | | Load_Top At_Offset_2 0710 0a03 | | Execute_Immediate Plus,0x3 0711 e402 | | Load 0x2,0x2 0712 01dc | | Execute Vector,Last 0713 027a | z | Execute Discrete,Less_Equal 0714 77d6 |w | Jump_Nonzero 0x6eb 0715 00c9 | | Action Pop_Auxiliary_Loop 0716 e402 | | Load 0x2,0x2 0717 01dc | | Execute Vector,Last 0718 00db | | Load_Top At_Offset_3 0719 0263 | c | Execute Discrete,Above_Bound 071a 7008 |p | Jump_Nonzero 0x723 071b 00db | | Load_Top At_Offset_3 071c 00d9 | | Load_Top At_Offset_1 071d e402 | | Load 0x2,0x2 071e 01d7 | | Execute Vector,Field_Read 071f 0273 | s | Execute Discrete,Plus 0720 c603 | | Store 0x3,0x3 0721 00c8 | | Action Pop_Auxiliary_Range 0722 3ff8 |? | Loop_Increasing 0x71b 0723 00ce | | Action Pop_Auxiliary 0724 00d8 | | Load_Top At_Offset_0 0725 00cb | | Action Pop_Block_With_Result 0726 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0727 0000 | | .XXX[0x1] 0728 0000 0000 | | .LITERAL {0x00000000, 0x6fffffff} 072c 0000 0000 | | .BLANK 0000[0x4] 0730 ; -------------------------------------------------------------------------------------- 0730 ; SUBPROGRAM 0730 ; -------------------------------------------------------------------------------------- 0730 0733 | 3 | .CONST 0x0733 ; Address of begin 0731 0004 | | .CONST 0x0004 ; Address of exception handler 0732 0001 | | .CONST 0x0001 ; Number of locals 0733 BODY_0730: 0733 INIT_0730: 0733 4601 |F | Jump_Case 0x2 0734 7801 |x | Jump 0x736 ; case 0x0 0735 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0736 4800 |H | Short_Literal 0x0 0737 00db | | Load_Top At_Offset_3 0738 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0739 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 073a 0000 0000 | | .BLANK 0000[0x6] 0740 ; -------------------------------------------------------------------------------------- 0740 ; Debug Table 0740 ; -------------------------------------------------------------------------------------- 0740 0004 0000 | | .DEBUG4 0x0004,0x0000,0x4927,0x0000,0x0001,0x001f 0746 000b 07c2 | | .DBG4T 0x000b,0x07c2,0xc000,0x0000 074a 0072 07e7 | r | .DBG4T 0x0072,0x07e7,0xc000,0x0000 074e 00e3 0806 | | .DBG4T 0x00e3,0x0806,0x1001,0x0000 0752 00fb 0809 | | .DBG4T 0x00fb,0x0809,0x1001,0x4000 0756 0143 0823 | C #| .DBG4T 0x0143,0x0823,0x1002,0x0000 075a 014b 0826 | K &| .DBG4T 0x014b,0x0826,0x1002,0x0000 075e 0153 0829 | S )| .DBG4T 0x0153,0x0829,0x1001,0x0000 0762 017b 0834 | { 4| .DBG4T 0x017b,0x0834,0x1001,0x0000 0766 01a3 0840 | @| .DBG4T 0x01a3,0x0840,0x1001,0x0000 076a 01d3 084c | L| .DBG4T 0x01d3,0x084c,0x1002,0x0000 076e 01fb 0855 | U| .DBG4T 0x01fb,0x0855,0x1001,0x0000 0772 027b 0869 | { i| .DBG4T 0x027b,0x0869,0x1001,0x0000 0776 030b 087f | | .DBG4T 0x030b,0x087f,0x1001,0x0000 077a 035b 0891 | [ | .DBG4T 0x035b,0x0891,0x1001,0x0000 077e 03b3 08a3 | | .DBG4T 0x03b3,0x08a3,0x1001,0x0000 0782 03e3 08ad | | .DBG4T 0x03e3,0x08ad,0x1001,0x0000 0786 042b 08bc | + | .DBG4T 0x042b,0x08bc,0x1002,0x0000 078a 043b 08c1 | ; | .DBG4T 0x043b,0x08c1,0x1002,0x0000 078e 0453 08c6 | S | .DBG4T 0x0453,0x08c6,0x1002,0x0000 0792 0463 08cb | c | .DBG4T 0x0463,0x08cb,0x1002,0x0000 0796 0473 08d0 | s | .DBG4T 0x0473,0x08d0,0x1001,0x0000 079a 04ab 08dd | | .DBG4T 0x04ab,0x08dd,0x1001,0x0000 079e 050b 0000 | | .DBG4T 0x050b,0x0000,0x1005,0x0000 07a2 051b 0000 | | .DBG4T 0x051b,0x0000,0x1005,0x0000 07a6 053b 08f3 | ; | .DBG4T 0x053b,0x08f3,0x1002,0x4000 07aa 060b 0912 | | .DBG4T 0x060b,0x0912,0x1002,0x0000 07ae 067b 091d | { | .DBG4T 0x067b,0x091d,0x1001,0x4000 07b2 06b3 093a | :| .DBG4T 0x06b3,0x093a,0x1004,0x0000 07b6 06cb 0941 | A| .DBG4T 0x06cb,0x0941,0x1004,0x0000 07ba 06e3 0948 | H| .DBG4T 0x06e3,0x0948,0x1004,0x4000 07be 0733 0000 | 3 | .DBG4T 0x0733,0x0000,0x1005,0x0000 07c2 ; -------------------------------------------------------------------------------------- 07c2 ; Debug chain 07c2 ; -------------------------------------------------------------------------------------- 07c2 0023 0000 | # | .DBGLEN 0x0023,0x0000 07c4 000b 000c | | .DBGLNO 0x000b,0x000c,0x000d,0x000e,0x000f,0x0018,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0045,0x0047,0x0049,0x004b,0x004d,0x0053,0x0059,0x005c,0x0063,0x0070,0x0071 07e7 ; -------------------------------------------------------------------------------------- 07e7 ; Debug chain 07e7 ; -------------------------------------------------------------------------------------- 07e7 001d 0000 | | .DBGLEN 0x001d,0x0000 07e9 0072 007e | r ~| .DBGLNO 0x0072,0x007e,0x0087,0x0091,0x0099,0x00a1,0x00a9,0x00ab,0x00ad,0x00af,0x00b1,0x00b3,0x00b5,0x00b7,0x00b9,0x00bb,0x00bd,0x00bf,0x00c1,0x00c3,0x00c5,0x00c7,0x00c9,0x00cb,0x00cd,0x00cf,0x00d1,0x00d3,0x00d5 0806 ; -------------------------------------------------------------------------------------- 0806 ; Debug chain 0806 ; -------------------------------------------------------------------------------------- 0806 0000 0001 | | .DBGLEN 0x0000,0x0001 0808 00e3 | | .DBGLNO 0x00e3 0809 ; -------------------------------------------------------------------------------------- 0809 ; Debug chain 0809 ; -------------------------------------------------------------------------------------- 0809 0002 000b | | .DBGLEN 0x0002,0x000b 080b 00fb 00fd | | .DBGLNO 0x00fb,0x00fd,0x00ff,0x0101,0x0102,0x0108,0x010e,0x0116,0x011a,0x0127,0x012d,0x0130,0x0136 0818 0001 0002 | | .XXX[0xb] 081a 0003 0004 | | 081c 0005 0007 | | 081e 0008 0009 | | 0820 000a 0006 | | 0822 000b | | 0823 ; -------------------------------------------------------------------------------------- 0823 ; Debug chain 0823 ; -------------------------------------------------------------------------------------- 0823 0000 0001 | | .DBGLEN 0x0000,0x0001 0825 0143 | C | .DBGLNO 0x0143 0826 ; -------------------------------------------------------------------------------------- 0826 ; Debug chain 0826 ; -------------------------------------------------------------------------------------- 0826 0000 0001 | | .DBGLEN 0x0000,0x0001 0828 014b | K | .DBGLNO 0x014b 0829 ; -------------------------------------------------------------------------------------- 0829 ; Debug chain 0829 ; -------------------------------------------------------------------------------------- 0829 0003 0006 | | .DBGLEN 0x0003,0x0006 082b 0153 0157 | S W| .DBGLNO 0x0153,0x0157,0x0159,0x0161,0x0168,0x016a,0x016e,0x0170,0x0171 0834 ; -------------------------------------------------------------------------------------- 0834 ; Debug chain 0834 ; -------------------------------------------------------------------------------------- 0834 0003 0007 | | .DBGLEN 0x0003,0x0007 0836 017b 017f | { | .DBGLNO 0x017b,0x017f,0x0181,0x0189,0x0190,0x0192,0x0196,0x019a,0x019c,0x019d 0840 ; -------------------------------------------------------------------------------------- 0840 ; Debug chain 0840 ; -------------------------------------------------------------------------------------- 0840 0003 0007 | | .DBGLEN 0x0003,0x0007 0842 01a3 01a8 | | .DBGLNO 0x01a3,0x01a8,0x01aa,0x01b2,0x01ba,0x01bc,0x01c0,0x01c4,0x01c6,0x01c7 084c ; -------------------------------------------------------------------------------------- 084c ; Debug chain 084c ; -------------------------------------------------------------------------------------- 084c 0003 0004 | | .DBGLEN 0x0003,0x0004 084e 01d3 01d7 | | .DBGLNO 0x01d3,0x01d7,0x01d9,0x01e1,0x01e8,0x01ea,0x01f5 0855 ; -------------------------------------------------------------------------------------- 0855 ; Debug chain 0855 ; -------------------------------------------------------------------------------------- 0855 0003 000f | | .DBGLEN 0x0003,0x000f 0857 01fb 01ff | | .DBGLNO 0x01fb,0x01ff,0x0201,0x020a,0x0211,0x0213,0x0215,0x0219,0x021a,0x021c,0x021d,0x0221,0x0229,0x022f,0x0236,0x0239,0x0240,0x025a 0869 ; -------------------------------------------------------------------------------------- 0869 ; Debug chain 0869 ; -------------------------------------------------------------------------------------- 0869 0003 0011 | | .DBGLEN 0x0003,0x0011 086b 027b 0280 | { | .DBGLNO 0x027b,0x0280,0x0282,0x028b,0x0293,0x0295,0x0297,0x02a4,0x02a8,0x02ac,0x02ad,0x02af,0x02b0,0x02b4,0x02bc,0x02c2,0x02c9,0x02cc,0x02d3,0x02ed 087f ; -------------------------------------------------------------------------------------- 087f ; Debug chain 087f ; -------------------------------------------------------------------------------------- 087f 0004 000c | | .DBGLEN 0x0004,0x000c 0881 030b 030f | | .DBGLNO 0x030b,0x030f,0x0314,0x0316,0x031c,0x0323,0x0325,0x0327,0x0330,0x0336,0x0343,0x0349,0x0350,0x0351,0x0353,0x0354 0891 ; -------------------------------------------------------------------------------------- 0891 ; Debug chain 0891 ; -------------------------------------------------------------------------------------- 0891 0004 000c | | .DBGLEN 0x0004,0x000c 0893 035b 035f | [ _| .DBGLNO 0x035b,0x035f,0x0364,0x0366,0x036c,0x0373,0x0375,0x0377,0x0380,0x0386,0x038a,0x0397,0x039d,0x03a4,0x03a6,0x03a7 08a3 ; -------------------------------------------------------------------------------------- 08a3 ; Debug chain 08a3 ; -------------------------------------------------------------------------------------- 08a3 0000 0008 | | .DBGLEN 0x0000,0x0008 08a5 03b3 03b7 | | .DBGLNO 0x03b3,0x03b7,0x03be,0x03c4,0x03cb,0x03ce,0x03d2,0x03d5 08ad ; -------------------------------------------------------------------------------------- 08ad ; Debug chain 08ad ; -------------------------------------------------------------------------------------- 08ad 0000 000d | | .DBGLEN 0x0000,0x000d 08af 03e3 03e7 | | .DBGLNO 0x03e3,0x03e7,0x03ee,0x03f4,0x03fd,0x03fe,0x0405,0x0408,0x0409,0x040e,0x040f,0x041b,0x041e 08bc ; -------------------------------------------------------------------------------------- 08bc ; Debug chain 08bc ; -------------------------------------------------------------------------------------- 08bc 0000 0003 | | .DBGLEN 0x0000,0x0003 08be 042b 042e | + .| .DBGLNO 0x042b,0x042e,0x0430 08c1 ; -------------------------------------------------------------------------------------- 08c1 ; Debug chain 08c1 ; -------------------------------------------------------------------------------------- 08c1 0000 0003 | | .DBGLEN 0x0000,0x0003 08c3 043b 043e | ; >| .DBGLNO 0x043b,0x043e,0x0440 08c6 ; -------------------------------------------------------------------------------------- 08c6 ; Debug chain 08c6 ; -------------------------------------------------------------------------------------- 08c6 0000 0003 | | .DBGLEN 0x0000,0x0003 08c8 0453 0456 | S V| .DBGLNO 0x0453,0x0456,0x0458 08cb ; -------------------------------------------------------------------------------------- 08cb ; Debug chain 08cb ; -------------------------------------------------------------------------------------- 08cb 0000 0003 | | .DBGLEN 0x0000,0x0003 08cd 0463 0466 | c f| .DBGLNO 0x0463,0x0466,0x0468 08d0 ; -------------------------------------------------------------------------------------- 08d0 ; Debug chain 08d0 ; -------------------------------------------------------------------------------------- 08d0 0000 000b | | .DBGLEN 0x0000,0x000b 08d2 0473 0476 | s v| .DBGLNO 0x0473,0x0476,0x0478,0x047d,0x0483,0x0485,0x048c,0x0493,0x049b,0x049e,0x04a2 08dd ; -------------------------------------------------------------------------------------- 08dd ; Debug chain 08dd ; -------------------------------------------------------------------------------------- 08dd 0000 0014 | | .DBGLEN 0x0000,0x0014 08df 04ab 04ae | | .DBGLNO 0x04ab,0x04ae,0x04b0,0x04b6,0x04b7,0x04bd,0x04c4,0x04c5,0x04ca,0x04cf,0x04d6,0x04dd,0x04e6,0x04e7,0x04ee,0x04f1,0x04f2,0x04f7,0x04f8,0x0504 08f3 ; -------------------------------------------------------------------------------------- 08f3 ; Debug chain 08f3 ; -------------------------------------------------------------------------------------- 08f3 0001 000e | | .DBGLEN 0x0001,0x000e 08f5 053b 054e | ; N| .DBGLNO 0x053b,0x054e,0x0551,0x0555,0x0567,0x056b,0x0582,0x0591,0x05a1,0x05b0,0x05cf,0x05d2,0x05d8,0x05e8,0x0600 0904 0001 0002 | | .XXX[0xe] 0906 0003 0004 | | 0908 0005 0006 | | 090a 0007 0008 | | 090c 000d 0009 | | 090e 000a 000b | | 0910 000c 000e | | 0912 ; -------------------------------------------------------------------------------------- 0912 ; Debug chain 0912 ; -------------------------------------------------------------------------------------- 0912 0002 0007 | | .DBGLEN 0x0002,0x0007 0914 060b 060f | | .DBGLNO 0x060b,0x060f,0x0613,0x0619,0x061c,0x062a,0x0638,0x066b,0x0670 091d ; -------------------------------------------------------------------------------------- 091d ; Debug chain 091d ; -------------------------------------------------------------------------------------- 091d 0001 000d | | .DBGLEN 0x0001,0x000d 091f 067b 067d | { }| .DBGLNO 0x067b,0x067d,0x0681,0x0687,0x0689,0x0690,0x0692,0x0693,0x069a,0x069c,0x069d,0x069f,0x06a4,0x06a7 092d 0001 0003 | | .XXX[0xd] 092f 0004 0005 | | 0931 0006 0007 | | 0933 0008 0009 | | 0935 000a 000b | | 0937 000c 0002 | | 0939 000d | | 093a ; -------------------------------------------------------------------------------------- 093a ; Debug chain 093a ; -------------------------------------------------------------------------------------- 093a 0001 0004 | | .DBGLEN 0x0001,0x0004 093c 06b3 06b7 | | .DBGLNO 0x06b3,0x06b7,0x06ba,0x06bf,0x06c2 0941 ; -------------------------------------------------------------------------------------- 0941 ; Debug chain 0941 ; -------------------------------------------------------------------------------------- 0941 0001 0004 | | .DBGLEN 0x0001,0x0004 0943 06cb 06cf | | .DBGLNO 0x06cb,0x06cf,0x06d2,0x06d5,0x06d8 0948 ; -------------------------------------------------------------------------------------- 0948 ; Debug chain 0948 ; -------------------------------------------------------------------------------------- 0948 0002 0008 | | .DBGLEN 0x0002,0x0008 094a 06e3 06e7 | | .DBGLNO 0x06e3,0x06e7,0x06eb,0x06ef,0x06f3,0x070b,0x070f,0x0716,0x071b,0x0724 0954 0002 0003 | | .XXX[0x8] 0956 0004 0005 | | 0958 0001 0006 | | 095a 0007 0008 | | 095c 0000 0000 | | .BLANK 0000[0xa4]