|
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_19c0d9
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0678 | x | .CONST 0x0678 ; 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 00c4 | | .CONST 0x00c4 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0037 | 7 | .CONST 0x0037 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 48c8 |H | Short_Literal 0xc8 000d 00e3 | | Load_Encached Natural_Cache 000e 03f9 | | Declare_Type Discrete,Constrained,Visible 000f 00d8 | | Load_Top At_Offset_0 0010 4800 |H | Short_Literal 0x0 0011 4801 |H | Short_Literal 0x1 0012 4801 |H | Short_Literal 0x1 0013 4804 |H | Short_Literal 0x4 0014 0319 | | Declare_Type Variant_Record,Incomplete,Visible 0015 029f 05cb | | Declare_Subprogram INIT_05c8,For_Call 0017 00d9 | | Load_Top At_Offset_1 0018 012a | * | Execute Any,Change_Utility 0019 0007 | | Action Break_Optional 001a 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 001c 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated 001e 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated 0020 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated 0022 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated 0024 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 0026 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0028 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 002a 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 002c 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 002e 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 0030 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0032 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 0034 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 0036 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 0038 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 003a 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 003c 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated 003e 1d20 | | Execute_Immediate Reference_Lex_1,0x20 003f 0129 | ) | Execute Any,Make_Visible 0040 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated 0042 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0043 0129 | ) | Execute Any,Make_Visible 0044 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 0046 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0047 0129 | ) | Execute Any,Make_Visible 0048 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 004a 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 004c 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 004d 0129 | ) | Execute Any,Make_Visible 004e 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 004f 0129 | ) | Execute Any,Make_Visible 0050 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 0052 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0053 0129 | ) | Execute Any,Make_Visible 0054 029a 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call,Visible,Unelaborated 0056 029a 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call,Visible,Unelaborated 0058 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated 005a 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated 005c 029a 051b | | Declare_Subprogram INIT_0518,For_Outer_Call,Visible,Unelaborated 005e 029a 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call,Visible,Unelaborated 0060 029a 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call,Visible,Unelaborated 0062 e001 | | Load 0x0,0x1 0063 0129 | ) | Execute Any,Make_Visible 0064 4800 |H | Short_Literal 0x0 0065 0093 0603 | | push_full_address INIT_0600 0067 02a0 | | Declare_Subprogram Null_Subprogram 0068 038f | | Declare_Type Package,Defined,Visible 0069 e002 | | Load 0x0,0x2 006a 4801 |H | Short_Literal 0x1 006b 00da | | Load_Top At_Offset_2 006c 020e | | Execute Module,Augment_Imports 006d 0386 | | Declare_Variable Package,Visible 006e e20d | | Load 0x1,0xd 006f 0266 | f | Execute Discrete,Bounds 0070 e003 | | Load 0x0,0x3 0071 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0072 02a0 | | Declare_Subprogram Null_Subprogram 0073 4801 |H | Short_Literal 0x1 0074 0348 | H | Declare_Type Array,Defined_Incomplete,Bounds_With_Object 0075 00e3 | | Load_Encached Natural_Cache 0076 00e4 | | Load_Encached Positive_Cache 0077 00da | | Load_Top At_Offset_2 0078 029f 05cb | | Declare_Subprogram INIT_05c8,For_Call 007a 4800 |H | Short_Literal 0x0 007b 4801 |H | Short_Literal 0x1 007c 4802 |H | Short_Literal 0x2 007d e20e | | Load 0x1,0xe 007e 0307 | | Complete_Type Variant_Record,By_Defining 007f 00bf | | Action Accept_Activation 0080 00d8 | | Load_Top At_Offset_0 0081 0340 | @ | Complete_Type Array,By_Component_Completion 0082 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0083 00c7 | | Action Elaborate_Subprogram 0084 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0085 00c7 | | Action Elaborate_Subprogram 0086 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0087 00c7 | | Action Elaborate_Subprogram 0088 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0089 00c7 | | Action Elaborate_Subprogram 008a 1d13 | | Execute_Immediate Reference_Lex_1,0x13 008b 00c7 | | Action Elaborate_Subprogram 008c 1d14 | | Execute_Immediate Reference_Lex_1,0x14 008d 00c7 | | Action Elaborate_Subprogram 008e 1d15 | | Execute_Immediate Reference_Lex_1,0x15 008f 00c7 | | Action Elaborate_Subprogram 0090 029d 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call 0092 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0093 00c7 | | Action Elaborate_Subprogram 0094 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0095 00c7 | | Action Elaborate_Subprogram 0096 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0097 00c7 | | Action Elaborate_Subprogram 0098 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0099 00c7 | | Action Elaborate_Subprogram 009a 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 009b 00c7 | | Action Elaborate_Subprogram 009c 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 009d 00c7 | | Action Elaborate_Subprogram 009e 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 009f 00c7 | | Action Elaborate_Subprogram 00a0 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00a1 00c7 | | Action Elaborate_Subprogram 00a2 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00a3 00c7 | | Action Elaborate_Subprogram 00a4 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00a5 00c7 | | Action Elaborate_Subprogram 00a6 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00a7 00c7 | | Action Elaborate_Subprogram 00a8 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call 00aa 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00ab 00c7 | | Action Elaborate_Subprogram 00ac 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 00ad 00c7 | | Action Elaborate_Subprogram 00ae 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 00af 00c7 | | Action Elaborate_Subprogram 00b0 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 00b1 00c7 | | Action Elaborate_Subprogram 00b2 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 00b3 00c7 | | Action Elaborate_Subprogram 00b4 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 00b5 00c7 | | Action Elaborate_Subprogram 00b6 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 00b7 00c7 | | Action Elaborate_Subprogram 00b8 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00b9 00c7 | | Action Elaborate_Subprogram 00ba 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 00bb 00c7 | | Action Elaborate_Subprogram 00bc 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00bd 00c7 | | Action Elaborate_Subprogram 00be 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 00bf 00c7 | | Action Elaborate_Subprogram 00c0 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 00c1 00c7 | | Action Elaborate_Subprogram 00c2 00db | | Load_Top At_Offset_3 00c3 020f | | Execute Module,Activate 00c4 BODY_0008: 00c4 00bc | | Action Signal_Activated 00c5 00bb | | Action Signal_Completion 00c6 0000 0000 | | .XXX[0x2] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00d2 | | .CONST 0x00d2 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0003 | | .CONST 0x0003 ; Number of locals 00cb INIT_00c8: 00cb 00da | | Load_Top At_Offset_2 00cc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00cd 00e0 | | Load_Encached Standard_Cache 00ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00cf e003 | | Load 0x0,0x3 00d0 1b10 | | Execute Package,Field_Read,Field_Number 0x10 00d1 0337 | 7 | Declare_Variable Array 00d2 BODY_00c8: 00d2 4801 |H | Short_Literal 0x1 00d3 00da | | Load_Top At_Offset_2 00d4 01db | | Execute Vector,Length 00d5 00d8 | | Load_Top At_Offset_0 00d6 00e2 | | Load_Encached Integer_Cache 00d7 0260 | ` | Execute Discrete,In_Type 00d8 7001 |p | Jump_Nonzero 0xda 00d9 0801 | | Execute_Immediate Raise,0x1 00da 00db | | Load_Top At_Offset_3 00db 01cf | | Execute Vector,Slice_Read 00dc 4801 |H | Short_Literal 0x1 00dd 00db | | Load_Top At_Offset_3 00de 01db | | Execute Vector,Length 00df 00d8 | | Load_Top At_Offset_0 00e0 00e2 | | Load_Encached Integer_Cache 00e1 0260 | ` | Execute Discrete,In_Type 00e2 7001 |p | Jump_Nonzero 0xe4 00e3 0801 | | Execute_Immediate Raise,0x1 00e4 00db | | Load_Top At_Offset_3 00e5 01ce | | Execute Vector,Slice_Write 00e6 00cf | | Action Mark_Auxiliary 00e7 480a |H | Short_Literal 0xa 00e8 00db | | Load_Top At_Offset_3 00e9 01db | | Execute Vector,Length 00ea 0a01 | | Execute_Immediate Plus,0x1 00eb 00d8 | | Load_Top At_Offset_0 00ec 00e3 | | Load_Encached Natural_Cache 00ed 0260 | ` | Execute Discrete,In_Type 00ee 7001 |p | Jump_Nonzero 0xf0 00ef 0801 | | Execute_Immediate Raise,0x1 00f0 0263 | c | Execute Discrete,Above_Bound 00f1 7006 |p | Jump_Nonzero 0xf8 00f2 4820 |H | Short_Literal 0x20 00f3 00d9 | | Load_Top At_Offset_1 00f4 e403 | | Load 0x2,0x3 00f5 01d6 | | Execute Vector,Field_Write 00f6 00c8 | | Action Pop_Auxiliary_Range 00f7 3ffa |? | Loop_Increasing 0xf2 00f8 00ce | | Action Pop_Auxiliary 00f9 00d8 | | Load_Top At_Offset_0 00fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00fb 0000 0000 | | .BLANK 0000[0x5] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0109 | | .CONST 0x0109 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0002 | | .CONST 0x0002 ; Number of locals 0103 INIT_0100: 0103 e5fd | | Load 0x2,-0x3 0104 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0105 e20e | | Load 0x1,0xe 0106 1c08 | | Execute_Immediate Run_Utility,0x8 0107 00d8 | | Load_Top At_Offset_0 0108 1c00 | | Execute_Immediate Run_Utility,0x0 0109 BODY_0100: 0109 e5fd | | Load 0x2,-0x3 010a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 010b 681f |h | Jump_Zero 0x12b 010c 00cf | | Action Mark_Auxiliary 010d e5fd | | Load 0x2,-0x3 010e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 010f 4801 |H | Short_Literal 0x1 0110 0263 | c | Execute Discrete,Above_Bound 0111 7018 |p | Jump_Nonzero 0x12a 0112 00d8 | | Load_Top At_Offset_0 0113 e5fd | | Load 0x2,-0x3 0114 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0115 01d5 | | Execute Vector,Field_Reference 0116 85fe | | Call 0x2,-0x2 0117 6810 |h | Jump_Zero 0x128 0118 00db | | Load_Top At_Offset_3 0119 00d9 | | Load_Top At_Offset_1 011a e5fd | | Load 0x2,-0x3 011b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 011c 01d5 | | Execute Vector,Field_Reference 011d 821a | | Call 0x1,0x1a 011e 00d1 | | Pop_Control Pop_Count_1 011f e5fc | | Load 0x2,-0x4 0120 6807 |h | Jump_Zero 0x128 0121 00db | | Load_Top At_Offset_3 0122 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0123 e5fc | | Load 0x2,-0x4 0124 027b | { | Execute Discrete,Greater_Equal 0125 6802 |h | Jump_Zero 0x128 0126 00db | | Load_Top At_Offset_3 0127 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0128 00c8 | | Action Pop_Auxiliary_Range 0129 3fe8 |? | Loop_Increasing 0x112 012a 00ce | | Action Pop_Auxiliary 012b 00d8 | | Load_Top At_Offset_0 012c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 012d 0000 0000 | | .XXX[0x3] 012f 0000 | | 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 e5fd | | Load 0x2,-0x3 0134 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0135 6816 |h | Jump_Zero 0x14c 0136 00cf | | Action Mark_Auxiliary 0137 e5fd | | Load 0x2,-0x3 0138 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0139 4801 |H | Short_Literal 0x1 013a 0263 | c | Execute Discrete,Above_Bound 013b 700f |p | Jump_Nonzero 0x14b 013c 00d8 | | Load_Top At_Offset_0 013d e5fd | | Load 0x2,-0x3 013e 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 013f 01d5 | | Execute Vector,Field_Reference 0140 85fe | | Call 0x2,-0x2 0141 6807 |h | Jump_Zero 0x149 0142 00d8 | | Load_Top At_Offset_0 0143 e5fd | | Load 0x2,-0x3 0144 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0145 01d5 | | Execute Vector,Field_Reference 0146 0320 | | Declare_Variable Record,Duplicate 0147 00cd | | Action Spare6_Action 0148 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0149 00c8 | | Action Pop_Auxiliary_Range 014a 3ff1 |? | Loop_Increasing 0x13c 014b 00ce | | Action Pop_Auxiliary 014c e003 | | Load 0x0,0x3 014d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 014e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 014f 0000 | | .XXX[0x1] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 e5fd | | Load 0x2,-0x3 0154 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0155 6811 |h | Jump_Zero 0x167 0156 00cf | | Action Mark_Auxiliary 0157 e5fd | | Load 0x2,-0x3 0158 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0159 4801 |H | Short_Literal 0x1 015a 0263 | c | Execute Discrete,Above_Bound 015b 700a |p | Jump_Nonzero 0x166 015c 00d8 | | Load_Top At_Offset_0 015d e5fd | | Load 0x2,-0x3 015e 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 015f 01d5 | | Execute Vector,Field_Reference 0160 85fe | | Call 0x2,-0x2 0161 6802 |h | Jump_Zero 0x164 0162 4800 |H | Short_Literal 0x0 0163 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0164 00c8 | | Action Pop_Auxiliary_Range 0165 3ff6 |? | Loop_Increasing 0x15c 0166 00ce | | Action Pop_Auxiliary 0167 4801 |H | Short_Literal 0x1 0168 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0169 0000 0000 | | .BLANK 0000[0x7] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 e5fd | | Load 0x2,-0x3 0174 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0175 6811 |h | Jump_Zero 0x187 0176 00cf | | Action Mark_Auxiliary 0177 e5fd | | Load 0x2,-0x3 0178 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0179 4801 |H | Short_Literal 0x1 017a 0263 | c | Execute Discrete,Above_Bound 017b 700a |p | Jump_Nonzero 0x186 017c 00d8 | | Load_Top At_Offset_0 017d e5fd | | Load 0x2,-0x3 017e 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 017f 01d5 | | Execute Vector,Field_Reference 0180 85fe | | Call 0x2,-0x2 0181 6802 |h | Jump_Zero 0x184 0182 4801 |H | Short_Literal 0x1 0183 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0184 00c8 | | Action Pop_Auxiliary_Range 0185 3ff6 |? | Loop_Increasing 0x17c 0186 00ce | | Action Pop_Auxiliary 0187 4800 |H | Short_Literal 0x0 0188 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0189 0000 0000 | | .BLANK 0000[0x7] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0196 | | .CONST 0x0196 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0002 | | .CONST 0x0002 ; Number of locals 0193 INIT_0190: 0193 e003 | | Load 0x0,0x3 0194 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0195 0322 | " | Declare_Variable Record 0196 BODY_0190: 0196 e5fd | | Load 0x2,-0x3 0197 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0198 7003 |p | Jump_Nonzero 0x19c 0199 e003 | | Load 0x0,0x3 019a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 019b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 019c 4801 |H | Short_Literal 0x1 019d e5fd | | Load 0x2,-0x3 019e 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 019f 01d5 | | Execute Vector,Field_Reference 01a0 00d9 | | Load_Top At_Offset_1 01a1 017d | } | Execute Record,Structure_Write 01a2 00cf | | Action Mark_Auxiliary 01a3 e5fd | | Load 0x2,-0x3 01a4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 01a5 4802 |H | Short_Literal 0x2 01a6 0263 | c | Execute Discrete,Above_Bound 01a7 700f |p | Jump_Nonzero 0x1b7 01a8 00d8 | | Load_Top At_Offset_0 01a9 e5fd | | Load 0x2,-0x3 01aa 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 01ab 01d5 | | Execute Vector,Field_Reference 01ac e402 | | Load 0x2,0x2 01ad 85fe | | Call 0x2,-0x2 01ae 7006 |p | Jump_Nonzero 0x1b5 01af 00d8 | | Load_Top At_Offset_0 01b0 e5fd | | Load 0x2,-0x3 01b1 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 01b2 01d5 | | Execute Vector,Field_Reference 01b3 e402 | | Load 0x2,0x2 01b4 017d | } | Execute Record,Structure_Write 01b5 00c8 | | Action Pop_Auxiliary_Range 01b6 3ff1 |? | Loop_Increasing 0x1a8 01b7 00ce | | Action Pop_Auxiliary 01b8 00d8 | | Load_Top At_Offset_0 01b9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 01ba 0000 0000 | | .BLANK 0000[0x6] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 00da | | Load_Top At_Offset_2 01c4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 01c5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c6 0000 0000 | | .XXX[0x2] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cb | | .CONST 0x01cb ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0001 | | .CONST 0x0001 ; Number of locals 01cb BODY_01c8: 01cb INIT_01c8: 01cb 00da | | Load_Top At_Offset_2 01cc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 01cd 0f00 | | Execute_Immediate Equal,0x0 01ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01cf 0000 | | .XXX[0x1] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00da | | Load_Top At_Offset_2 01d4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 01d5 0e00 | | Execute_Immediate Not_Equal,0x0 01d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d7 0000 | | .XXX[0x1] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 01dc e003 | | Load 0x0,0x3 01dd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01de 017f | | Execute Record,Equal 01df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01e3 | | .CONST 0x01e3 ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0001 | | .CONST 0x0001 ; Number of locals 01e3 BODY_01e0: 01e3 INIT_01e0: 01e3 00da | | Load_Top At_Offset_2 01e4 e003 | | Load 0x0,0x3 01e5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01e6 017e | ~ | Execute Record,Not_Equal 01e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01ef | | .CONST 0x01ef ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0003 | | .CONST 0x0003 ; Number of locals 01eb INIT_01e8: 01eb 00e1 | | Load_Encached Boolean_Cache 01ec 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 01ed 029f 05a3 | | Declare_Subprogram INIT_05a0,For_Call 01ef BODY_01e8: 01ef e5fe | | Load 0x2,-0x2 01f0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 01f1 680b |h | Jump_Zero 0x1fd 01f2 e5ff | | Load 0x2,-0x1 01f3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01f4 4801 |H | Short_Literal 0x1 01f5 e5fe | | Load 0x2,-0x2 01f6 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 01f7 01d5 | | Execute Vector,Field_Reference 01f8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01f9 027e | ~ | Execute Discrete,Not_Equal 01fa 6802 |h | Jump_Zero 0x1fd 01fb e233 | 3 | Load 0x1,0x33 01fc 0257 | W | Execute Discrete,Raise 01fd e5fe | | Load 0x2,-0x2 01fe 8236 | 6 | Call 0x1,0x36 01ff 6801 |h | Jump_Zero 0x201 0200 8403 | | Call 0x2,0x3 0201 00cf | | Action Mark_Auxiliary 0202 e5fe | | Load 0x2,-0x2 0203 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0204 4801 |H | Short_Literal 0x1 0205 0263 | c | Execute Discrete,Above_Bound 0206 700d |p | Jump_Nonzero 0x214 0207 e5ff | | Load 0x2,-0x1 0208 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0209 00d9 | | Load_Top At_Offset_1 020a e5fe | | Load 0x2,-0x2 020b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 020c 01d5 | | Execute Vector,Field_Reference 020d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 020e 027f | | Execute Discrete,Equal 020f 6802 |h | Jump_Zero 0x212 0210 4801 |H | Short_Literal 0x1 0211 a402 | | Store_Unchecked 0x2,0x2 0212 00c8 | | Action Pop_Auxiliary_Range 0213 3ff3 |? | Loop_Increasing 0x207 0214 00ce | | Action Pop_Auxiliary 0215 00d9 | | Load_Top At_Offset_1 0216 700b |p | Jump_Nonzero 0x222 0217 e5fe | | Load 0x2,-0x2 0218 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0219 0a01 | | Execute_Immediate Plus,0x1 021a e5fe | | Load 0x2,-0x2 021b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 021c e5ff | | Load 0x2,-0x1 021d e5fe | | Load 0x2,-0x2 021e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 021f e5fe | | Load 0x2,-0x2 0220 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0221 01d6 | | Execute Vector,Field_Write 0222 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0223 0000 0000 | | .BLANK 0000[0x5] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022b | + | .CONST 0x022b ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0001 | | .CONST 0x0001 ; Number of locals 022b BODY_0228: 022b INIT_0228: 022b 00db | | Load_Top At_Offset_3 022c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 022d 6835 |h5 | Jump_Zero 0x263 022e 4801 |H | Short_Literal 0x1 022f e5fe | | Load 0x2,-0x2 0230 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0231 01d5 | | Execute Vector,Field_Reference 0232 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0233 00db | | Load_Top At_Offset_3 0234 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0235 027f | | Execute Discrete,Equal 0236 682c |h, | Jump_Zero 0x263 0237 00cf | | Action Mark_Auxiliary 0238 e5fe | | Load 0x2,-0x2 0239 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 023a 4801 |H | Short_Literal 0x1 023b 0263 | c | Execute Discrete,Above_Bound 023c 7025 |p% | Jump_Nonzero 0x262 023d 00d8 | | Load_Top At_Offset_0 023e e5fe | | Load 0x2,-0x2 023f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0240 01d5 | | Execute Vector,Field_Reference 0241 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0242 e5ff | | Load 0x2,-0x1 0243 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0244 027f | | Execute Discrete,Equal 0245 681a |h | Jump_Zero 0x260 0246 00cf | | Action Mark_Auxiliary 0247 e5fe | | Load 0x2,-0x2 0248 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0249 0aff | | Execute_Immediate Plus,-0x1 024a 00da | | Load_Top At_Offset_2 024b 0263 | c | Execute Discrete,Above_Bound 024c 700b |p | Jump_Nonzero 0x258 024d 00d8 | | Load_Top At_Offset_0 024e 0a01 | | Execute_Immediate Plus,0x1 024f e5fe | | Load 0x2,-0x2 0250 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0251 01d5 | | Execute Vector,Field_Reference 0252 00d9 | | Load_Top At_Offset_1 0253 e5fe | | Load 0x2,-0x2 0254 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0255 01d6 | | Execute Vector,Field_Write 0256 00c8 | | Action Pop_Auxiliary_Range 0257 3ff5 |? | Loop_Increasing 0x24d 0258 00ce | | Action Pop_Auxiliary 0259 e5fe | | Load 0x2,-0x2 025a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 025b 0aff | | Execute_Immediate Plus,-0x1 025c e5fe | | Load 0x2,-0x2 025d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 025e 00d2 | | Pop_Control Pop_Count_2 025f 7802 |x | Jump 0x262 0260 00c8 | | Action Pop_Auxiliary_Range 0261 3fdb |? | Loop_Increasing 0x23d 0262 00ce | | Action Pop_Auxiliary 0263 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0264 0000 0000 | | .BLANK 0000[0x4] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b 00db | | Load_Top At_Offset_3 026c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 026d 6824 |h$ | Jump_Zero 0x292 026e 4801 |H | Short_Literal 0x1 026f e5fe | | Load 0x2,-0x2 0270 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0271 01d5 | | Execute Vector,Field_Reference 0272 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0273 00db | | Load_Top At_Offset_3 0274 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0275 027f | | Execute Discrete,Equal 0276 681b |h | Jump_Zero 0x292 0277 00cf | | Action Mark_Auxiliary 0278 e5fe | | Load 0x2,-0x2 0279 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 027a 4801 |H | Short_Literal 0x1 027b 0263 | c | Execute Discrete,Above_Bound 027c 7014 |p | Jump_Nonzero 0x291 027d 00d8 | | Load_Top At_Offset_0 027e e5fe | | Load 0x2,-0x2 027f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0280 01d5 | | Execute Vector,Field_Reference 0281 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0282 e5ff | | Load 0x2,-0x1 0283 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0284 027f | | Execute Discrete,Equal 0285 6809 |h | Jump_Zero 0x28f 0286 e004 | | Load 0x0,0x4 0287 180d | | Execute Package,Field_Execute,Field_Number 0xd 0288 00d9 | | Load_Top At_Offset_1 0289 e5fe | | Load 0x2,-0x2 028a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 028b 01d5 | | Execute Vector,Field_Reference 028c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 028d 00d2 | | Pop_Control Pop_Count_2 028e 7802 |x | Jump 0x291 028f 00c8 | | Action Pop_Auxiliary_Range 0290 3fec |? | Loop_Increasing 0x27d 0291 00ce | | Action Pop_Auxiliary 0292 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0293 0000 0000 | | .BLANK 0000[0x5] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 029b | | .CONST 0x029b ; Address of begin 0299 0004 | | .CONST 0x0004 ; Address of exception handler 029a 0001 | | .CONST 0x0001 ; Number of locals 029b BODY_0298: 029b INIT_0298: 029b e5fd | | Load 0x2,-0x3 029c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 029d 6823 |h# | Jump_Zero 0x2c1 029e 4801 |H | Short_Literal 0x1 029f e5fd | | Load 0x2,-0x3 02a0 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 02a1 01d5 | | Execute Vector,Field_Reference 02a2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02a3 00db | | Load_Top At_Offset_3 02a4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02a5 027f | | Execute Discrete,Equal 02a6 681a |h | Jump_Zero 0x2c1 02a7 00cf | | Action Mark_Auxiliary 02a8 e5fd | | Load 0x2,-0x3 02a9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 02aa 4801 |H | Short_Literal 0x1 02ab 0263 | c | Execute Discrete,Above_Bound 02ac 7013 |p | Jump_Nonzero 0x2c0 02ad 00d8 | | Load_Top At_Offset_0 02ae e5fd | | Load 0x2,-0x3 02af 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 02b0 01d5 | | Execute Vector,Field_Reference 02b1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02b2 e5ff | | Load 0x2,-0x1 02b3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02b4 027f | | Execute Discrete,Equal 02b5 6808 |h | Jump_Zero 0x2be 02b6 e5fe | | Load 0x2,-0x2 02b7 00d9 | | Load_Top At_Offset_1 02b8 e5fd | | Load 0x2,-0x3 02b9 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 02ba 01d5 | | Execute Vector,Field_Reference 02bb 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02bc 00d2 | | Pop_Control Pop_Count_2 02bd 7802 |x | Jump 0x2c0 02be 00c8 | | Action Pop_Auxiliary_Range 02bf 3fed |? | Loop_Increasing 0x2ad 02c0 00ce | | Action Pop_Auxiliary 02c1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02c2 0000 0000 | | .BLANK 0000[0x6] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cc | | .CONST 0x02cc ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0002 | | .CONST 0x0002 ; Number of locals 02cb INIT_02c8: 02cb 00e5 | | Load_Encached Long_Integer_Cache 02cc BODY_02c8: 02cc e004 | | Load 0x0,0x4 02cd 180d | | Execute Package,Field_Execute,Field_Number 0xd 02ce 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02cf 00cf | | Action Mark_Auxiliary 02d0 e5ff | | Load 0x2,-0x1 02d1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 02d2 4801 |H | Short_Literal 0x1 02d3 0263 | c | Execute Discrete,Above_Bound 02d4 7008 |p | Jump_Nonzero 0x2dd 02d5 00db | | Load_Top At_Offset_3 02d6 00d9 | | Load_Top At_Offset_1 02d7 e5ff | | Load 0x2,-0x1 02d8 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 02d9 01d5 | | Execute Vector,Field_Reference 02da 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02db 00c8 | | Action Pop_Auxiliary_Range 02dc 3ff8 |? | Loop_Increasing 0x2d5 02dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02de 0000 0000 | | .XXX[0x2] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 4800 |H | Short_Literal 0x0 02e4 00db | | Load_Top At_Offset_3 02e5 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 02e6 4801 |H | Short_Literal 0x1 02e7 00db | | Load_Top At_Offset_3 02e8 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 02e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02ea 0000 0000 | | .BLANK 0000[0x6] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 0302 | | .CONST 0x0302 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0003 | | .CONST 0x0003 ; Number of locals 02f3 INIT_02f0: 02f3 00da | | Load_Top At_Offset_2 02f4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02f5 e5fe | | Load 0x2,-0x2 02f6 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02f7 0273 | s | Execute Discrete,Plus 02f8 e20e | | Load 0x1,0xe 02f9 1c08 | | Execute_Immediate Run_Utility,0x8 02fa 00d8 | | Load_Top At_Offset_0 02fb 1c00 | | Execute_Immediate Run_Utility,0x0 02fc e5fe | | Load 0x2,-0x2 02fd 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02fe e20e | | Load 0x1,0xe 02ff 1c08 | | Execute_Immediate Run_Utility,0x8 0300 00d8 | | Load_Top At_Offset_0 0301 1c00 | | Execute_Immediate Run_Utility,0x0 0302 BODY_02f0: 0302 e5ff | | Load 0x2,-0x1 0303 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0304 7004 |p | Jump_Nonzero 0x309 0305 e5fe | | Load 0x2,-0x2 0306 00da | | Load_Top At_Offset_2 0307 016d | m | Execute Variant_Record,Structure_Write 0308 7867 |xg | Jump 0x370 0309 e5fe | | Load 0x2,-0x2 030a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 030b 7004 |p | Jump_Nonzero 0x310 030c e5ff | | Load 0x2,-0x1 030d 00da | | Load_Top At_Offset_2 030e 016d | m | Execute Variant_Record,Structure_Write 030f 7860 |x` | Jump 0x370 0310 4801 |H | Short_Literal 0x1 0311 e5ff | | Load 0x2,-0x1 0312 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0313 01d5 | | Execute Vector,Field_Reference 0314 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0315 4801 |H | Short_Literal 0x1 0316 e5fe | | Load 0x2,-0x2 0317 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0318 01d5 | | Execute Vector,Field_Reference 0319 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 031a 027e | ~ | Execute Discrete,Not_Equal 031b 6802 |h | Jump_Zero 0x31e 031c e233 | 3 | Load 0x1,0x33 031d 0257 | W | Execute Discrete,Raise 031e e5fe | | Load 0x2,-0x2 031f 00d9 | | Load_Top At_Offset_1 0320 016d | m | Execute Variant_Record,Structure_Write 0321 00cf | | Action Mark_Auxiliary 0322 e5ff | | Load 0x2,-0x1 0323 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0324 4801 |H | Short_Literal 0x1 0325 0263 | c | Execute Discrete,Above_Bound 0326 7026 |p& | Jump_Nonzero 0x34d 0327 00cf | | Action Mark_Auxiliary 0328 e403 | | Load 0x2,0x3 0329 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 032a 4801 |H | Short_Literal 0x1 032b 0263 | c | Execute Discrete,Above_Bound 032c 7016 |p | Jump_Nonzero 0x343 032d 00db | | Load_Top At_Offset_3 032e e5ff | | Load 0x2,-0x1 032f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0330 01d5 | | Execute Vector,Field_Reference 0331 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0332 00d9 | | Load_Top At_Offset_1 0333 e403 | | Load 0x2,0x3 0334 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0335 01d5 | | Execute Vector,Field_Reference 0336 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0337 027f | | Execute Discrete,Equal 0338 6808 |h | Jump_Zero 0x341 0339 e403 | | Load 0x2,0x3 033a 00d9 | | Load_Top At_Offset_1 033b e403 | | Load 0x2,0x3 033c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 033d 01d5 | | Execute Vector,Field_Reference 033e 821b | | Call 0x1,0x1b 033f 00d3 | | Pop_Control Pop_Count_3 0340 7802 |x | Jump 0x343 0341 00c8 | | Action Pop_Auxiliary_Range 0342 3fea |? | Loop_Increasing 0x32d 0343 00ce | | Action Pop_Auxiliary 0344 e402 | | Load 0x2,0x2 0345 00d9 | | Load_Top At_Offset_1 0346 e5ff | | Load 0x2,-0x1 0347 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0348 01d5 | | Execute Vector,Field_Reference 0349 821a | | Call 0x1,0x1a 034a 00d1 | | Pop_Control Pop_Count_1 034b 00c8 | | Action Pop_Auxiliary_Range 034c 3fda |? | Loop_Increasing 0x327 034d 00ce | | Action Pop_Auxiliary 034e 00d9 | | Load_Top At_Offset_1 034f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0350 00d9 | | Load_Top At_Offset_1 0351 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0352 0273 | s | Execute Discrete,Plus 0353 00da | | Load_Top At_Offset_2 0354 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0355 4801 |H | Short_Literal 0x1 0356 00da | | Load_Top At_Offset_2 0357 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0358 00db | | Load_Top At_Offset_3 0359 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 035a 01cf | | Execute Vector,Slice_Read 035b 4801 |H | Short_Literal 0x1 035c 00da | | Load_Top At_Offset_2 035d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 035e 00db | | Load_Top At_Offset_3 035f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0360 01cf | | Execute Vector,Slice_Read 0361 01cc | | Execute Vector,Catenate 0362 4801 |H | Short_Literal 0x1 0363 00db | | Load_Top At_Offset_3 0364 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0365 00db | | Load_Top At_Offset_3 0366 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0367 0273 | s | Execute Discrete,Plus 0368 00d8 | | Load_Top At_Offset_0 0369 00e2 | | Load_Encached Integer_Cache 036a 0260 | ` | Execute Discrete,In_Type 036b 7001 |p | Jump_Nonzero 0x36d 036c 0801 | | Execute_Immediate Raise,0x1 036d e402 | | Load 0x2,0x2 036e 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 036f 01ce | | Execute Vector,Slice_Write 0370 00d9 | | Load_Top At_Offset_1 0371 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0372 0000 0000 | | .BLANK 0000[0x6] 0378 ; -------------------------------------------------------------------------------------- 0378 ; SUBPROGRAM 0378 ; -------------------------------------------------------------------------------------- 0378 038a | | .CONST 0x038a ; Address of begin 0379 0004 | | .CONST 0x0004 ; Address of exception handler 037a 0003 | | .CONST 0x0003 ; Number of locals 037b INIT_0378: 037b 00db | | Load_Top At_Offset_3 037c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 037d 00db | | Load_Top At_Offset_3 037e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 037f 8237 | 7 | Call 0x1,0x37 0380 e20e | | Load 0x1,0xe 0381 1c08 | | Execute_Immediate Run_Utility,0x8 0382 00d8 | | Load_Top At_Offset_0 0383 1c00 | | Execute_Immediate Run_Utility,0x0 0384 e5fe | | Load 0x2,-0x2 0385 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0386 e20e | | Load 0x1,0xe 0387 1c08 | | Execute_Immediate Run_Utility,0x8 0388 00d8 | | Load_Top At_Offset_0 0389 1c00 | | Execute_Immediate Run_Utility,0x0 038a BODY_0378: 038a e5ff | | Load 0x2,-0x1 038b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 038c 0e00 | | Execute_Immediate Not_Equal,0x0 038d e5fe | | Load 0x2,-0x2 038e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 038f 0e00 | | Execute_Immediate Not_Equal,0x0 0390 0279 | y | Execute Discrete,And 0391 683e |h> | Jump_Zero 0x3d0 0392 4801 |H | Short_Literal 0x1 0393 e5ff | | Load 0x2,-0x1 0394 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0395 01d5 | | Execute Vector,Field_Reference 0396 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0397 4801 |H | Short_Literal 0x1 0398 e5fe | | Load 0x2,-0x2 0399 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 039a 01d5 | | Execute Vector,Field_Reference 039b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 039c 027e | ~ | Execute Discrete,Not_Equal 039d 6802 |h | Jump_Zero 0x3a0 039e e233 | 3 | Load 0x1,0x33 039f 0257 | W | Execute Discrete,Raise 03a0 e5fe | | Load 0x2,-0x2 03a1 00d9 | | Load_Top At_Offset_1 03a2 016d | m | Execute Variant_Record,Structure_Write 03a3 00cf | | Action Mark_Auxiliary 03a4 e5ff | | Load 0x2,-0x1 03a5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 03a6 4801 |H | Short_Literal 0x1 03a7 0263 | c | Execute Discrete,Above_Bound 03a8 7026 |p& | Jump_Nonzero 0x3cf 03a9 00cf | | Action Mark_Auxiliary 03aa e403 | | Load 0x2,0x3 03ab 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 03ac 4801 |H | Short_Literal 0x1 03ad 0263 | c | Execute Discrete,Above_Bound 03ae 701d |p | Jump_Nonzero 0x3cc 03af 00db | | Load_Top At_Offset_3 03b0 e5ff | | Load 0x2,-0x1 03b1 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 03b2 01d5 | | Execute Vector,Field_Reference 03b3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03b4 00d9 | | Load_Top At_Offset_1 03b5 e403 | | Load 0x2,0x3 03b6 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 03b7 01d5 | | Execute Vector,Field_Reference 03b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03b9 027f | | Execute Discrete,Equal 03ba 680f |h | Jump_Zero 0x3ca 03bb e403 | | Load 0x2,0x3 03bc 00d9 | | Load_Top At_Offset_1 03bd e403 | | Load 0x2,0x3 03be 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 03bf 01d5 | | Execute Vector,Field_Reference 03c0 821b | | Call 0x1,0x1b 03c1 00d1 | | Pop_Control Pop_Count_1 03c2 e402 | | Load 0x2,0x2 03c3 e406 | | Load 0x2,0x6 03c4 e5ff | | Load 0x2,-0x1 03c5 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 03c6 01d5 | | Execute Vector,Field_Reference 03c7 821a | | Call 0x1,0x1a 03c8 00d3 | | Pop_Control Pop_Count_3 03c9 7802 |x | Jump 0x3cc 03ca 00c8 | | Action Pop_Auxiliary_Range 03cb 3fe3 |? | Loop_Increasing 0x3af 03cc 00ce | | Action Pop_Auxiliary 03cd 00c8 | | Action Pop_Auxiliary_Range 03ce 3fda |? | Loop_Increasing 0x3a9 03cf 00ce | | Action Pop_Auxiliary 03d0 00d9 | | Load_Top At_Offset_1 03d1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03d2 0000 0000 | | .BLANK 0000[0x6] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03e1 | | .CONST 0x03e1 ; Address of begin 03d9 0004 | | .CONST 0x0004 ; Address of exception handler 03da 0002 | | .CONST 0x0002 ; Number of locals 03db INIT_03d8: 03db 00da | | Load_Top At_Offset_2 03dc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 03dd e20e | | Load 0x1,0xe 03de 1c08 | | Execute_Immediate Run_Utility,0x8 03df 00d8 | | Load_Top At_Offset_0 03e0 1c00 | | Execute_Immediate Run_Utility,0x0 03e1 BODY_03d8: 03e1 e5fe | | Load 0x2,-0x2 03e2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 03e3 7004 |p | Jump_Nonzero 0x3e8 03e4 00db | | Load_Top At_Offset_3 03e5 00d9 | | Load_Top At_Offset_1 03e6 016d | m | Execute Variant_Record,Structure_Write 03e7 783a |x: | Jump 0x422 03e8 00db | | Load_Top At_Offset_3 03e9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 03ea 6837 |h7 | Jump_Zero 0x422 03eb 4801 |H | Short_Literal 0x1 03ec e5ff | | Load 0x2,-0x1 03ed 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 03ee 01d5 | | Execute Vector,Field_Reference 03ef 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03f0 4801 |H | Short_Literal 0x1 03f1 e5fe | | Load 0x2,-0x2 03f2 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 03f3 01d5 | | Execute Vector,Field_Reference 03f4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03f5 027e | ~ | Execute Discrete,Not_Equal 03f6 6802 |h | Jump_Zero 0x3f9 03f7 e233 | 3 | Load 0x1,0x33 03f8 0257 | W | Execute Discrete,Raise 03f9 00db | | Load_Top At_Offset_3 03fa 00d9 | | Load_Top At_Offset_1 03fb 016d | m | Execute Variant_Record,Structure_Write 03fc 00cf | | Action Mark_Auxiliary 03fd e5ff | | Load 0x2,-0x1 03fe 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 03ff 4801 |H | Short_Literal 0x1 0400 0263 | c | Execute Discrete,Above_Bound 0401 701f |p | Jump_Nonzero 0x421 0402 00cf | | Action Mark_Auxiliary 0403 e5fe | | Load 0x2,-0x2 0404 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0405 4801 |H | Short_Literal 0x1 0406 0263 | c | Execute Discrete,Above_Bound 0407 7016 |p | Jump_Nonzero 0x41e 0408 00db | | Load_Top At_Offset_3 0409 e5ff | | Load 0x2,-0x1 040a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 040b 01d5 | | Execute Vector,Field_Reference 040c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 040d 00d9 | | Load_Top At_Offset_1 040e e5fe | | Load 0x2,-0x2 040f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0410 01d5 | | Execute Vector,Field_Reference 0411 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0412 027f | | Execute Discrete,Equal 0413 6808 |h | Jump_Zero 0x41c 0414 e402 | | Load 0x2,0x2 0415 e405 | | Load 0x2,0x5 0416 e5ff | | Load 0x2,-0x1 0417 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0418 01d5 | | Execute Vector,Field_Reference 0419 821b | | Call 0x1,0x1b 041a 00d3 | | Pop_Control Pop_Count_3 041b 7802 |x | Jump 0x41e 041c 00c8 | | Action Pop_Auxiliary_Range 041d 3fea |? | Loop_Increasing 0x408 041e 00ce | | Action Pop_Auxiliary 041f 00c8 | | Action Pop_Auxiliary_Range 0420 3fe1 |? | Loop_Increasing 0x402 0421 00ce | | Action Pop_Auxiliary 0422 00d8 | | Load_Top At_Offset_0 0423 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0424 0000 0000 | | .BLANK 0000[0x4] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042d | - | .CONST 0x042d ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0002 | | .CONST 0x0002 ; Number of locals 042b INIT_0428: 042b 00e1 | | Load_Encached Boolean_Cache 042c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 042d BODY_0428: 042d 00db | | Load_Top At_Offset_3 042e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 042f 7003 |p | Jump_Nonzero 0x433 0430 4800 |H | Short_Literal 0x0 0431 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0432 7822 |x" | Jump 0x455 0433 e5fe | | Load 0x2,-0x2 0434 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0435 4801 |H | Short_Literal 0x1 0436 e5ff | | Load 0x2,-0x1 0437 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0438 01d5 | | Execute Vector,Field_Reference 0439 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 043a 027e | ~ | Execute Discrete,Not_Equal 043b 6803 |h | Jump_Zero 0x43f 043c 4800 |H | Short_Literal 0x0 043d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 043e 7816 |x | Jump 0x455 043f 00cf | | Action Mark_Auxiliary 0440 e5ff | | Load 0x2,-0x1 0441 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0442 4801 |H | Short_Literal 0x1 0443 0263 | c | Execute Discrete,Above_Bound 0444 700f |p | Jump_Nonzero 0x454 0445 e5fe | | Load 0x2,-0x2 0446 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0447 00d9 | | Load_Top At_Offset_1 0448 e5ff | | Load 0x2,-0x1 0449 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 044a 01d5 | | Execute Vector,Field_Reference 044b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 044c 027f | | Execute Discrete,Equal 044d 6804 |h | Jump_Zero 0x452 044e 4801 |H | Short_Literal 0x1 044f a402 | | Store_Unchecked 0x2,0x2 0450 00d2 | | Pop_Control Pop_Count_2 0451 7802 |x | Jump 0x454 0452 00c8 | | Action Pop_Auxiliary_Range 0453 3ff1 |? | Loop_Increasing 0x445 0454 00ce | | Action Pop_Auxiliary 0455 00d8 | | Load_Top At_Offset_0 0456 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0457 0000 | | .XXX[0x1] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045f | _ | .CONST 0x045f ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0003 | | .CONST 0x0003 ; Number of locals 045b INIT_0458: 045b 00e1 | | Load_Encached Boolean_Cache 045c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 045d 00e1 | | Load_Encached Boolean_Cache 045e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 045f BODY_0458: 045f e5ff | | Load 0x2,-0x1 0460 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0461 7003 |p | Jump_Nonzero 0x465 0462 4801 |H | Short_Literal 0x1 0463 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0464 783c |x< | Jump 0x4a1 0465 e5fe | | Load 0x2,-0x2 0466 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0467 0e00 | | Execute_Immediate Not_Equal,0x0 0468 4801 |H | Short_Literal 0x1 0469 e5ff | | Load 0x2,-0x1 046a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 046b 01d5 | | Execute Vector,Field_Reference 046c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 046d 4801 |H | Short_Literal 0x1 046e e5fe | | Load 0x2,-0x2 046f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0470 01d5 | | Execute Vector,Field_Reference 0471 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0472 027f | | Execute Discrete,Equal 0473 0279 | y | Execute Discrete,And 0474 682c |h, | Jump_Zero 0x4a1 0475 4801 |H | Short_Literal 0x1 0476 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0477 00cf | | Action Mark_Auxiliary 0478 e5ff | | Load 0x2,-0x1 0479 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 047a 4801 |H | Short_Literal 0x1 047b 0263 | c | Execute Discrete,Above_Bound 047c 7023 |p# | Jump_Nonzero 0x4a0 047d 00cf | | Action Mark_Auxiliary 047e e5fe | | Load 0x2,-0x2 047f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0480 4801 |H | Short_Literal 0x1 0481 0263 | c | Execute Discrete,Above_Bound 0482 7012 |p | Jump_Nonzero 0x495 0483 00db | | Load_Top At_Offset_3 0484 e5ff | | Load 0x2,-0x1 0485 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0486 01d5 | | Execute Vector,Field_Reference 0487 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0488 00d9 | | Load_Top At_Offset_1 0489 e5fe | | Load 0x2,-0x2 048a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 048b 01d5 | | Execute Vector,Field_Reference 048c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 048d 027f | | Execute Discrete,Equal 048e 6804 |h | Jump_Zero 0x493 048f 4801 |H | Short_Literal 0x1 0490 a403 | | Store_Unchecked 0x2,0x3 0491 00d2 | | Pop_Control Pop_Count_2 0492 7802 |x | Jump 0x495 0493 00c8 | | Action Pop_Auxiliary_Range 0494 3fee |? | Loop_Increasing 0x483 0495 00ce | | Action Pop_Auxiliary 0496 00db | | Load_Top At_Offset_3 0497 7004 |p | Jump_Nonzero 0x49c 0498 4800 |H | Short_Literal 0x0 0499 a402 | | Store_Unchecked 0x2,0x2 049a 00d2 | | Pop_Control Pop_Count_2 049b 7804 |x | Jump 0x4a0 049c 4800 |H | Short_Literal 0x0 049d a403 | | Store_Unchecked 0x2,0x3 049e 00c8 | | Action Pop_Auxiliary_Range 049f 3fdd |? | Loop_Increasing 0x47d 04a0 00ce | | Action Pop_Auxiliary 04a1 00d9 | | Load_Top At_Offset_1 04a2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04a3 0000 0000 | | .BLANK 0000[0x5] 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 00da | | Load_Top At_Offset_2 04ac e5fe | | Load 0x2,-0x2 04ad 8227 | ' | Call 0x1,0x27 04ae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04af 0000 | | .XXX[0x1] 04b0 ; -------------------------------------------------------------------------------------- 04b0 ; SUBPROGRAM 04b0 ; -------------------------------------------------------------------------------------- 04b0 04b7 | | .CONST 0x04b7 ; Address of begin 04b1 0004 | | .CONST 0x0004 ; Address of exception handler 04b2 0002 | | .CONST 0x0002 ; Number of locals 04b3 INIT_04b0: 04b3 e20e | | Load 0x1,0xe 04b4 02ff | | Declare_Variable Variant_Record 04b5 00d8 | | Load_Top At_Offset_0 04b6 1c00 | | Execute_Immediate Run_Utility,0x0 04b7 BODY_04b0: 04b7 00d8 | | Load_Top At_Offset_0 04b8 e5ff | | Load 0x2,-0x1 04b9 821a | | Call 0x1,0x1a 04ba 00d1 | | Pop_Control Pop_Count_1 04bb 00d8 | | Load_Top At_Offset_0 04bc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04bd 0000 0000 | | .XXX[0x3] 04bf 0000 | | 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; SUBPROGRAM 04c0 ; -------------------------------------------------------------------------------------- 04c0 04c3 | | .CONST 0x04c3 ; Address of begin 04c1 0004 | | .CONST 0x0004 ; Address of exception handler 04c2 0001 | | .CONST 0x0001 ; Number of locals 04c3 BODY_04c0: 04c3 INIT_04c0: 04c3 00db | | Load_Top At_Offset_3 04c4 00db | | Load_Top At_Offset_3 04c5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04c6 027d | } | Execute Discrete,Greater 04c7 6803 |h | Jump_Zero 0x4cb 04c8 e003 | | Load 0x0,0x3 04c9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04ca 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04cb 00db | | Load_Top At_Offset_3 04cc 00db | | Load_Top At_Offset_3 04cd 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 04ce 01d5 | | Execute Vector,Field_Reference 04cf 0320 | | Declare_Variable Record,Duplicate 04d0 00cd | | Action Spare6_Action 04d1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04d2 0000 0000 | | .BLANK 0000[0x6] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04e1 | | .CONST 0x04e1 ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0004 | | .CONST 0x0004 ; Number of locals 04db INIT_04d8: 04db e20e | | Load 0x1,0xe 04dc 02ff | | Declare_Variable Variant_Record 04dd 00d8 | | Load_Top At_Offset_0 04de 1c00 | | Execute_Immediate Run_Utility,0x0 04df 00e3 | | Load_Encached Natural_Cache 04e0 00e3 | | Load_Encached Natural_Cache 04e1 BODY_04d8: 04e1 e5fd | | Load 0x2,-0x3 04e2 e5ff | | Load 0x2,-0x1 04e3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04e4 027d | } | Execute Discrete,Greater 04e5 6804 |h | Jump_Zero 0x4ea 04e6 e5ff | | Load 0x2,-0x1 04e7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04e8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 04e9 7802 |x | Jump 0x4ec 04ea e5fd | | Load 0x2,-0x3 04eb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 04ec e5fe | | Load 0x2,-0x2 04ed 0d01 | | Execute_Immediate Less,0x1 04ee 6803 |h | Jump_Zero 0x4f2 04ef 4801 |H | Short_Literal 0x1 04f0 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 04f1 7802 |x | Jump 0x4f4 04f2 e5fe | | Load 0x2,-0x2 04f3 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 04f4 00cf | | Action Mark_Auxiliary 04f5 00d9 | | Load_Top At_Offset_1 04f6 00db | | Load_Top At_Offset_3 04f7 0263 | c | Execute Discrete,Above_Bound 04f8 700d |p | Jump_Nonzero 0x506 04f9 e402 | | Load 0x2,0x2 04fa 00d9 | | Load_Top At_Offset_1 04fb 00d8 | | Load_Top At_Offset_0 04fc 00e4 | | Load_Encached Positive_Cache 04fd 0260 | ` | Execute Discrete,In_Type 04fe 7001 |p | Jump_Nonzero 0x500 04ff 0801 | | Execute_Immediate Raise,0x1 0500 e5ff | | Load 0x2,-0x1 0501 822d | - | Call 0x1,0x2d 0502 821a | | Call 0x1,0x1a 0503 00d1 | | Pop_Control Pop_Count_1 0504 00c8 | | Action Pop_Auxiliary_Range 0505 3ff3 |? | Loop_Increasing 0x4f9 0506 00ce | | Action Pop_Auxiliary 0507 00da | | Load_Top At_Offset_2 0508 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0509 0000 0000 | | .BLANK 0000[0x7] 0510 ; -------------------------------------------------------------------------------------- 0510 ; SUBPROGRAM 0510 ; -------------------------------------------------------------------------------------- 0510 0513 | | .CONST 0x0513 ; Address of begin 0511 0004 | | .CONST 0x0004 ; Address of exception handler 0512 0001 | | .CONST 0x0001 ; Number of locals 0513 BODY_0510: 0513 INIT_0510: 0513 4801 |H | Short_Literal 0x1 0514 00db | | Load_Top At_Offset_3 0515 822d | - | Call 0x1,0x2d 0516 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0517 0000 | | .XXX[0x1] 0518 ; -------------------------------------------------------------------------------------- 0518 ; SUBPROGRAM 0518 ; -------------------------------------------------------------------------------------- 0518 051f | | .CONST 0x051f ; Address of begin 0519 0004 | | .CONST 0x0004 ; Address of exception handler 051a 0002 | | .CONST 0x0002 ; Number of locals 051b INIT_0518: 051b e20e | | Load 0x1,0xe 051c 02ff | | Declare_Variable Variant_Record 051d 00d8 | | Load_Top At_Offset_0 051e 1c00 | | Execute_Immediate Run_Utility,0x0 051f BODY_0518: 051f 00db | | Load_Top At_Offset_3 0520 00d9 | | Load_Top At_Offset_1 0521 016d | m | Execute Variant_Record,Structure_Write 0522 00d8 | | Load_Top At_Offset_0 0523 4801 |H | Short_Literal 0x1 0524 e5ff | | Load 0x2,-0x1 0525 822d | - | Call 0x1,0x2d 0526 821b | | Call 0x1,0x1b 0527 00d1 | | Pop_Control Pop_Count_1 0528 00d8 | | Load_Top At_Offset_0 0529 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 052a 0000 0000 | | .BLANK 0000[0x6] 0530 ; -------------------------------------------------------------------------------------- 0530 ; SUBPROGRAM 0530 ; -------------------------------------------------------------------------------------- 0530 0533 | 3 | .CONST 0x0533 ; Address of begin 0531 0004 | | .CONST 0x0004 ; Address of exception handler 0532 0001 | | .CONST 0x0001 ; Number of locals 0533 BODY_0530: 0533 INIT_0530: 0533 00cf | | Action Mark_Auxiliary 0534 e5fd | | Load 0x2,-0x3 0535 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0536 4801 |H | Short_Literal 0x1 0537 0263 | c | Execute Discrete,Above_Bound 0538 7006 |p | Jump_Nonzero 0x53f 0539 00d8 | | Load_Top At_Offset_0 053a e5fd | | Load 0x2,-0x3 053b 822d | - | Call 0x1,0x2d 053c 85fe | | Call 0x2,-0x2 053d 00c8 | | Action Pop_Auxiliary_Range 053e 3ffa |? | Loop_Increasing 0x539 053f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0540 ; -------------------------------------------------------------------------------------- 0540 ; SUBPROGRAM 0540 ; -------------------------------------------------------------------------------------- 0540 054c | L | .CONST 0x054c ; Address of begin 0541 0004 | | .CONST 0x0004 ; Address of exception handler 0542 0003 | | .CONST 0x0003 ; Number of locals 0543 INIT_0540: 0543 4800 |H | Short_Literal 0x0 0544 e5fd | | Load 0x2,-0x3 0545 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0546 01dc | | Execute Vector,Last 0547 00e2 | | Load_Encached Integer_Cache 0548 03f8 | | Declare_Type Discrete,Constrained 0549 e003 | | Load 0x0,0x3 054a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 054b 0322 | " | Declare_Variable Record 054c BODY_0540: 054c 00cf | | Action Mark_Auxiliary 054d e5fd | | Load 0x2,-0x3 054e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 054f 0aff | | Execute_Immediate Plus,-0x1 0550 4802 |H | Short_Literal 0x2 0551 0263 | c | Execute Discrete,Above_Bound 0552 702c |p, | Jump_Nonzero 0x57f 0553 00d8 | | Load_Top At_Offset_0 0554 e5fd | | Load 0x2,-0x3 0555 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0556 01d5 | | Execute Vector,Field_Reference 0557 e403 | | Load 0x2,0x3 0558 017d | } | Execute Record,Structure_Write 0559 00d8 | | Load_Top At_Offset_0 055a 0aff | | Execute_Immediate Plus,-0x1 055b c402 | | Store 0x2,0x2 055c 00cf | | Action Mark_Auxiliary 055d 780f |x | Jump 0x56d 055e e402 | | Load 0x2,0x2 055f e5fd | | Load 0x2,-0x3 0560 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0561 01d5 | | Execute Vector,Field_Reference 0562 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0563 e402 | | Load 0x2,0x2 0564 0a01 | | Execute_Immediate Plus,0x1 0565 e5fd | | Load 0x2,-0x3 0566 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0567 01d5 | | Execute Vector,Field_Reference 0568 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0569 e402 | | Load 0x2,0x2 056a 0aff | | Execute_Immediate Plus,-0x1 056b c402 | | Store 0x2,0x2 056c 00c9 | | Action Pop_Auxiliary_Loop 056d e402 | | Load 0x2,0x2 056e 6807 |h | Jump_Zero 0x576 056f e402 | | Load 0x2,0x2 0570 e5fd | | Load 0x2,-0x3 0571 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0572 01d5 | | Execute Vector,Field_Reference 0573 e403 | | Load 0x2,0x3 0574 85fe | | Call 0x2,-0x2 0575 77e8 |w | Jump_Nonzero 0x55e 0576 00ce | | Action Pop_Auxiliary 0577 00db | | Load_Top At_Offset_3 0578 e402 | | Load 0x2,0x2 0579 0a01 | | Execute_Immediate Plus,0x1 057a e5fd | | Load 0x2,-0x3 057b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 057c 01d6 | | Execute Vector,Field_Write 057d 00c8 | | Action Pop_Auxiliary_Range 057e 3fd4 |? | Loop_Increasing 0x553 057f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 0583 | | .CONST 0x0583 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0001 | | .CONST 0x0001 ; Number of locals 0583 BODY_0580: 0583 INIT_0580: 0583 00da | | Load_Top At_Offset_2 0584 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0585 00db | | Load_Top At_Offset_3 0586 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0587 027f | | Execute Discrete,Equal 0588 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0589 0000 0000 | | .BLANK 0000[0x7] 0590 ; -------------------------------------------------------------------------------------- 0590 ; SUBPROGRAM 0590 ; -------------------------------------------------------------------------------------- 0590 0593 | | .CONST 0x0593 ; Address of begin 0591 0004 | | .CONST 0x0004 ; Address of exception handler 0592 0001 | | .CONST 0x0001 ; Number of locals 0593 BODY_0590: 0593 INIT_0590: 0593 00da | | Load_Top At_Offset_2 0594 e5fe | | Load 0x2,-0x2 0595 027d | } | Execute Discrete,Greater 0596 6802 |h | Jump_Zero 0x599 0597 00da | | Load_Top At_Offset_2 0598 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0599 00db | | Load_Top At_Offset_3 059a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 059b 0000 0000 | | .BLANK 0000[0x5] 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05ad | | .CONST 0x05ad ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0002 | | .CONST 0x0002 ; Number of locals 05a3 INIT_05a0: 05a3 e5fe | | Load 0x2,-0x2 05a4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05a5 e5fe | | Load 0x2,-0x2 05a6 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05a7 09ff | | Execute_Immediate Binary_Scale,-0x1 05a8 0273 | s | Execute Discrete,Plus 05a9 e20e | | Load 0x1,0xe 05aa 1c08 | | Execute_Immediate Run_Utility,0x8 05ab 00d8 | | Load_Top At_Offset_0 05ac 1c00 | | Execute_Immediate Run_Utility,0x0 05ad BODY_05a0: 05ad 4801 |H | Short_Literal 0x1 05ae e5fe | | Load 0x2,-0x2 05af 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05b0 e5fe | | Load 0x2,-0x2 05b1 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 05b2 01cf | | Execute Vector,Slice_Read 05b3 4801 |H | Short_Literal 0x1 05b4 e5fe | | Load 0x2,-0x2 05b5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05b6 00db | | Load_Top At_Offset_3 05b7 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 05b8 01ce | | Execute Vector,Slice_Write 05b9 e5fe | | Load 0x2,-0x2 05ba 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 05bb 00d9 | | Load_Top At_Offset_1 05bc 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 05bd e5fe | | Load 0x2,-0x2 05be 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 05bf 00d9 | | Load_Top At_Offset_1 05c0 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 05c1 00d8 | | Load_Top At_Offset_0 05c2 e5fe | | Load 0x2,-0x2 05c3 016d | m | Execute Variant_Record,Structure_Write 05c4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05c5 0000 0000 | | .XXX[0x3] 05c7 0000 | | 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05cb | | .CONST 0x05cb ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0001 | | .CONST 0x0001 ; Number of locals 05cb BODY_05c8: 05cb BODY_05c8: 05cb INIT_05c8: 05cb INIT_05c8: 05cb 4608 |F | Jump_Case 0x9 05cc 7808 |x | Jump 0x5d5 ; case 0x0 05cd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 05ce 782f |x/ | Jump 0x5fe ; case 0x2 05cf 782e |x. | Jump 0x5fe ; case 0x3 05d0 7817 |x | Jump 0x5e8 ; case 0x4 05d1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 05d2 782b |x+ | Jump 0x5fe ; case 0x6 05d3 7817 |x | Jump 0x5eb ; case 0x7 05d4 781f |x | Jump 0x5f4 ; case 0x8 05d5 00da | | Load_Top At_Offset_2 05d6 016c | l | Execute Variant_Record,Is_Constrained 05d7 7009 |p | Jump_Nonzero 0x5e1 05d8 00cf | | Action Mark_Auxiliary 05d9 4814 |H | Short_Literal 0x14 05da e5ff | | Load 0x2,-0x1 05db 1c08 | | Execute_Immediate Run_Utility,0x8 05dc 00d8 | | Load_Top At_Offset_0 05dd 1c00 | | Execute_Immediate Run_Utility,0x0 05de c5ff | | Store 0x2,-0x1 05df 00ce | | Action Pop_Auxiliary 05e0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 05e1 4800 |H | Short_Literal 0x0 05e2 00db | | Load_Top At_Offset_3 05e3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 05e4 4801 |H | Short_Literal 0x1 05e5 00db | | Load_Top At_Offset_3 05e6 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 05e7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 05e8 e235 | 5 | Load 0x1,0x35 05e9 0340 | @ | Complete_Type Array,By_Component_Completion 05ea 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 05eb 00db | | Load_Top At_Offset_3 05ec 4801 |H | Short_Literal 0x1 05ed e5fe | | Load 0x2,-0x2 05ee e235 | 5 | Load 0x1,0x35 05ef 035b | [ | Declare_Type Array,Constrained 05f0 4801 |H | Short_Literal 0x1 05f1 e5ff | | Load 0x2,-0x1 05f2 031b | | Declare_Type Variant_Record,Constrained 05f3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05f4 00db | | Load_Top At_Offset_3 05f5 00db | | Load_Top At_Offset_3 05f6 02fc | | Declare_Variable Variant_Record,With_Constraint 05f7 4801 |H | Short_Literal 0x1 05f8 e5fe | | Load 0x2,-0x2 05f9 e235 | 5 | Load 0x1,0x35 05fa 0334 | 4 | Declare_Variable Array,With_Constraint 05fb 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4 05fc 016a | j | QQ_execute Variant_Record,XXX 05fd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05fe 0869 | i | Execute_Immediate Raise,0x69 05ff 0000 | | .XXX[0x1] 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 061c | | .CONST 0x061c ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0012 | | .CONST 0x0012 ; Number of locals 0603 INIT_0600: 0603 e001 | | Load 0x0,0x1 0604 0129 | ) | Execute Any,Make_Visible 0605 03f3 | | Declare_Variable Discrete,Incomplete,Visible,Unsigned 0606 029a 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call,Visible,Unelaborated 0608 029a 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Visible,Unelaborated 060a 029a 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call,Visible,Unelaborated 060c 029a 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call,Visible,Unelaborated 060e 4800 |H | Short_Literal 0x0 060f 601c |` | Indirect_Literal Discrete,0x62c,{0x00000000, 0x7fffffff} 0610 00e5 | | Load_Encached Long_Integer_Cache 0611 e20e | | Load 0x1,0xe 0612 03ed | | Complete_Type Discrete,By_Constraining 0613 00bf | | Action Accept_Activation 0614 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0615 00c7 | | Action Elaborate_Subprogram 0616 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0617 00c7 | | Action Elaborate_Subprogram 0618 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0619 00c7 | | Action Elaborate_Subprogram 061a 1d12 | | Execute_Immediate Reference_Lex_1,0x12 061b 00c7 | | Action Elaborate_Subprogram 061c BODY_0600: 061c 00bc | | Action Signal_Activated 061d 00bb | | Action Signal_Completion 061e 0000 0000 | | .XXX[0x2] 0620 ; -------------------------------------------------------------------------------------- 0620 ; SUBPROGRAM 0620 ; -------------------------------------------------------------------------------------- 0620 0623 | # | .CONST 0x0623 ; Address of begin 0621 0004 | | .CONST 0x0004 ; Address of exception handler 0622 0001 | | .CONST 0x0001 ; Number of locals 0623 BODY_0620: 0623 INIT_0620: 0623 00da | | Load_Top At_Offset_2 0624 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0625 7002 |p | Jump_Nonzero 0x628 0626 4800 |H | Short_Literal 0x0 0627 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0628 4801 |H | Short_Literal 0x1 0629 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 062a 0000 0000 | | .XXX[0x2] 062c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0634 | 4 | .CONST 0x0634 ; Address of begin 0631 0644 | D | .CONST 0x0644 ; Address of exception handler 0632 0002 | | .CONST 0x0002 ; Number of locals 0633 INIT_0630: 0633 00e2 | | Load_Encached Integer_Cache 0634 BODY_0630: 0634 e5fe | | Load 0x2,-0x2 0635 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0636 00d8 | | Load_Top At_Offset_0 0637 e5ff | | Load 0x2,-0x1 0638 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0639 027d | } | Execute Discrete,Greater 063a 6802 |h | Jump_Zero 0x63d 063b e20d | | Load 0x1,0xd 063c 0257 | W | Execute Discrete,Raise 063d 00d8 | | Load_Top At_Offset_0 063e e5ff | | Load 0x2,-0x1 063f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0640 01d5 | | Execute Vector,Field_Reference 0641 0320 | | Declare_Variable Record,Duplicate 0642 00cd | | Action Spare6_Action 0643 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0644 TRAP_0630: 0644 010e | | Execute Exception,Is_Constraint_Error 0645 6802 |h | Jump_Zero 0x648 0646 e20d | | Load 0x1,0xd 0647 0257 | W | Execute Discrete,Raise 0648 0100 | | Execute Exception,Raise 0649 0000 0000 | | .BLANK 0000[0x7] 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 0654 | T | .CONST 0x0654 ; Address of begin 0651 0665 | e | .CONST 0x0665 ; Address of exception handler 0652 0002 | | .CONST 0x0002 ; Number of locals 0653 INIT_0650: 0653 00e2 | | Load_Encached Integer_Cache 0654 BODY_0650: 0654 e5fe | | Load 0x2,-0x2 0655 0a01 | | Execute_Immediate Plus,0x1 0656 0059 | Y | Store_Top Discrete,At_Offset_1 0657 00d8 | | Load_Top At_Offset_0 0658 e5ff | | Load 0x2,-0x1 0659 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 065a 027d | } | Execute Discrete,Greater 065b 6802 |h | Jump_Zero 0x65e 065c 4800 |H | Short_Literal 0x0 065d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 065e 00d8 | | Load_Top At_Offset_0 065f 00d8 | | Load_Top At_Offset_0 0660 e20e | | Load 0x1,0xe 0661 0260 | ` | Execute Discrete,In_Type 0662 7001 |p | Jump_Nonzero 0x664 0663 0801 | | Execute_Immediate Raise,0x1 0664 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0665 TRAP_0650: 0665 010e | | Execute Exception,Is_Constraint_Error 0666 6802 |h | Jump_Zero 0x669 0667 e20d | | Load 0x1,0xd 0668 0257 | W | Execute Discrete,Raise 0669 0100 | | Execute Exception,Raise 066a 0000 0000 | | .BLANK 0000[0x6] 0670 ; -------------------------------------------------------------------------------------- 0670 ; SUBPROGRAM 0670 ; -------------------------------------------------------------------------------------- 0670 0673 | s | .CONST 0x0673 ; Address of begin 0671 0004 | | .CONST 0x0004 ; Address of exception handler 0672 0001 | | .CONST 0x0001 ; Number of locals 0673 BODY_0670: 0673 INIT_0670: 0673 00db | | Load_Top At_Offset_3 0674 0f00 | | Execute_Immediate Equal,0x0 0675 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0676 0000 0000 | | .XXX[0x2] 0678 ; -------------------------------------------------------------------------------------- 0678 ; Debug Table 0678 ; -------------------------------------------------------------------------------------- 0678 0004 0001 | | .DEBUG4 0x0004,0x0001,0x7d1b,0x0000,0x0001,0x002a 067e 000b 0726 | &| .DBG4T 0x000b,0x0726,0x0000,0x8000 0682 0080 077c | || .DBG4T 0x0080,0x077c,0x0000,0x0000 0686 00cb 079f | | .DBG4T 0x00cb,0x079f,0x0002,0x0000 068a 0103 07a7 | | .DBG4T 0x0103,0x07a7,0x2802,0x0002 068e 0133 07b1 | 3 | .DBG4T 0x0133,0x07b1,0x2802,0x0002 0692 0153 07b8 | S | .DBG4T 0x0153,0x07b8,0x2802,0x0002 0696 0173 07bf | s | .DBG4T 0x0173,0x07bf,0x2802,0x0002 069a 0193 07c6 | | .DBG4T 0x0193,0x07c6,0x2802,0x0002 069e 01c3 07d0 | | .DBG4T 0x01c3,0x07d0,0x0002,0x0000 06a2 01cb 07d3 | | .DBG4T 0x01cb,0x07d3,0x0002,0x0000 06a6 01d3 07d6 | | .DBG4T 0x01d3,0x07d6,0x0002,0x0000 06aa 01db 07d9 | | .DBG4T 0x01db,0x07d9,0x0002,0x0000 06ae 01e3 07dc | | .DBG4T 0x01e3,0x07dc,0x0002,0x0000 06b2 01eb 07df | | .DBG4T 0x01eb,0x07df,0x0001,0x0000 06b6 022b 07ec | + | .DBG4T 0x022b,0x07ec,0x0001,0x0000 06ba 026b 07f5 | k | .DBG4T 0x026b,0x07f5,0x0001,0x0000 06be 029b 07fc | | .DBG4T 0x029b,0x07fc,0x0001,0x0000 06c2 02cb 0803 | | .DBG4T 0x02cb,0x0803,0x0001,0x0000 06c6 02e3 0809 | | .DBG4T 0x02e3,0x0809,0x0001,0x0000 06ca 02f3 080d | | .DBG4T 0x02f3,0x080d,0x0002,0x0000 06ce 037b 0821 | { !| .DBG4T 0x037b,0x0821,0x0002,0x0000 06d2 03db 0830 | 0| .DBG4T 0x03db,0x0830,0x0002,0x0000 06d6 042b 083f | + ?| .DBG4T 0x042b,0x083f,0x0002,0x0000 06da 045b 084b | [ K| .DBG4T 0x045b,0x084b,0x0002,0x0000 06de 04ab 085d | ]| .DBG4T 0x04ab,0x085d,0x0002,0x0000 06e2 04b3 0860 | `| .DBG4T 0x04b3,0x0860,0x0002,0x0000 06e6 04c3 0865 | e| .DBG4T 0x04c3,0x0865,0x0002,0x0000 06ea 04db 086a | j| .DBG4T 0x04db,0x086a,0x0002,0x0000 06ee 0513 0878 | x| .DBG4T 0x0513,0x0878,0x0002,0x0000 06f2 051b 087b | {| .DBG4T 0x051b,0x087b,0x0002,0x0000 06f6 0533 0881 | 3 | .DBG4T 0x0533,0x0881,0x2801,0x0002 06fa 0543 0885 | C | .DBG4T 0x0543,0x0885,0x2801,0x4002 06fe 0583 0897 | | .DBG4T 0x0583,0x0897,0x0002,0x0000 0702 0593 089a | | .DBG4T 0x0593,0x089a,0x0002,0x0000 0706 05a3 089f | | .DBG4T 0x05a3,0x089f,0x0004,0x0000 070a 05cb 0000 | | .DBG4T 0x05cb,0x0000,0x0005,0x0000 070e 0603 08a6 | | .DBG4T 0x0603,0x08a6,0x0000,0x0000 0712 0614 08af | | .DBG4T 0x0614,0x08af,0x0000,0x0000 0716 0623 08b5 | # | .DBG4T 0x0623,0x08b5,0x0002,0x0000 071a 0633 08ba | 3 | .DBG4T 0x0633,0x08ba,0x0002,0x0000 071e 0653 08c2 | S | .DBG4T 0x0653,0x08c2,0x0002,0x0000 0722 0673 08ca | s | .DBG4T 0x0673,0x08ca,0x0002,0x0000 0726 ; -------------------------------------------------------------------------------------- 0726 ; Debug chain 0726 ; -------------------------------------------------------------------------------------- 0726 002a 0000 | * | .DBGLEN 0x002a,0x0000 0728 000b 000f | | .DBGLNO 0x000b,0x000f,0x001a,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044,0x0046,0x0048,0x004a,0x004c,0x004e,0x0050,0x0052,0x0054,0x0056,0x0058,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x006e,0x0075 0752 0002 0003 | | .XXX[0x2a] 0754 0004 0005 | | 0756 0006 0007 | | 0758 0008 0009 | | 075a 000a 000b | | 075c 000c 000d | | 075e 000e 000f | | 0760 0010 0011 | | 0762 0012 0013 | | 0764 0014 0015 | | 0766 0016 0017 | | 0768 0018 0019 | | 076a 001a 001b | | 076c 001c 001d | | 076e 001e 001f | | 0770 0020 0021 | !| 0772 0022 0023 | " #| 0774 0024 0025 | $ %| 0776 0026 0027 | & '| 0778 0028 0029 | ( )| 077a 002a 002b | * +| 077c ; -------------------------------------------------------------------------------------- 077c ; Debug chain 077c ; -------------------------------------------------------------------------------------- 077c 0021 0000 | ! | .DBGLEN 0x0021,0x0000 077e 0082 0084 | | .DBGLNO 0x0082,0x0084,0x0086,0x0088,0x008a,0x008c,0x008e,0x0090,0x0092,0x0094,0x0096,0x0098,0x009a,0x009c,0x009e,0x00a0,0x00a2,0x00a4,0x00a6,0x00a8,0x00aa,0x00ac,0x00ae,0x00b0,0x00b2,0x00b4,0x00b6,0x00b8,0x00ba,0x00bc,0x00be,0x00c0,0x00c2 079f ; -------------------------------------------------------------------------------------- 079f ; Debug chain 079f ; -------------------------------------------------------------------------------------- 079f 0002 0004 | | .DBGLEN 0x0002,0x0004 07a1 00cb 00cf | | .DBGLNO 0x00cb,0x00cf,0x00d2,0x00e7,0x00f2,0x00f9 07a7 ; -------------------------------------------------------------------------------------- 07a7 ; Debug chain 07a7 ; -------------------------------------------------------------------------------------- 07a7 0001 0007 | | .DBGLEN 0x0001,0x0007 07a9 0103 0109 | | .DBGLNO 0x0103,0x0109,0x010d,0x0112,0x0118,0x011f,0x0126,0x012b 07b1 ; -------------------------------------------------------------------------------------- 07b1 ; Debug chain 07b1 ; -------------------------------------------------------------------------------------- 07b1 0000 0005 | | .DBGLEN 0x0000,0x0005 07b3 0133 0137 | 3 7| .DBGLNO 0x0133,0x0137,0x013c,0x0142,0x014c 07b8 ; -------------------------------------------------------------------------------------- 07b8 ; Debug chain 07b8 ; -------------------------------------------------------------------------------------- 07b8 0000 0005 | | .DBGLEN 0x0000,0x0005 07ba 0153 0157 | S W| .DBGLNO 0x0153,0x0157,0x015c,0x0162,0x0167 07bf ; -------------------------------------------------------------------------------------- 07bf ; Debug chain 07bf ; -------------------------------------------------------------------------------------- 07bf 0000 0005 | | .DBGLEN 0x0000,0x0005 07c1 0173 0177 | s w| .DBGLNO 0x0173,0x0177,0x017c,0x0182,0x0187 07c6 ; -------------------------------------------------------------------------------------- 07c6 ; Debug chain 07c6 ; -------------------------------------------------------------------------------------- 07c6 0001 0007 | | .DBGLEN 0x0001,0x0007 07c8 0193 0196 | | .DBGLNO 0x0193,0x0196,0x0199,0x019c,0x01a3,0x01a8,0x01af,0x01b8 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; Debug chain 07d0 ; -------------------------------------------------------------------------------------- 07d0 0000 0001 | | .DBGLEN 0x0000,0x0001 07d2 01c3 | | .DBGLNO 0x01c3 07d3 ; -------------------------------------------------------------------------------------- 07d3 ; Debug chain 07d3 ; -------------------------------------------------------------------------------------- 07d3 0000 0001 | | .DBGLEN 0x0000,0x0001 07d5 01cb | | .DBGLNO 0x01cb 07d6 ; -------------------------------------------------------------------------------------- 07d6 ; Debug chain 07d6 ; -------------------------------------------------------------------------------------- 07d6 0000 0001 | | .DBGLEN 0x0000,0x0001 07d8 01d3 | | .DBGLNO 0x01d3 07d9 ; -------------------------------------------------------------------------------------- 07d9 ; Debug chain 07d9 ; -------------------------------------------------------------------------------------- 07d9 0000 0001 | | .DBGLEN 0x0000,0x0001 07db 01db | | .DBGLNO 0x01db 07dc ; -------------------------------------------------------------------------------------- 07dc ; Debug chain 07dc ; -------------------------------------------------------------------------------------- 07dc 0000 0001 | | .DBGLEN 0x0000,0x0001 07de 01e3 | | .DBGLNO 0x01e3 07df ; -------------------------------------------------------------------------------------- 07df ; Debug chain 07df ; -------------------------------------------------------------------------------------- 07df 0001 000a | | .DBGLEN 0x0001,0x000a 07e1 01eb 01ef | | .DBGLNO 0x01eb,0x01ef,0x01fb,0x01fd,0x0200,0x0202,0x0207,0x0210,0x0215,0x0217,0x021c 07ec ; -------------------------------------------------------------------------------------- 07ec ; Debug chain 07ec ; -------------------------------------------------------------------------------------- 07ec 0000 0007 | | .DBGLEN 0x0000,0x0007 07ee 022b 0238 | + 8| .DBGLNO 0x022b,0x0238,0x023d,0x0247,0x024d,0x0259,0x025e 07f5 ; -------------------------------------------------------------------------------------- 07f5 ; Debug chain 07f5 ; -------------------------------------------------------------------------------------- 07f5 0000 0005 | | .DBGLEN 0x0000,0x0005 07f7 026b 0278 | k x| .DBGLNO 0x026b,0x0278,0x027d,0x0286,0x028d 07fc ; -------------------------------------------------------------------------------------- 07fc ; Debug chain 07fc ; -------------------------------------------------------------------------------------- 07fc 0000 0005 | | .DBGLEN 0x0000,0x0005 07fe 029b 02a8 | | .DBGLNO 0x029b,0x02a8,0x02ad,0x02b6,0x02bc 0803 ; -------------------------------------------------------------------------------------- 0803 ; Debug chain 0803 ; -------------------------------------------------------------------------------------- 0803 0001 0003 | | .DBGLEN 0x0001,0x0003 0805 02cb 02cc | | .DBGLNO 0x02cb,0x02cc,0x02d0,0x02d5 0809 ; -------------------------------------------------------------------------------------- 0809 ; Debug chain 0809 ; -------------------------------------------------------------------------------------- 0809 0000 0002 | | .DBGLEN 0x0000,0x0002 080b 02e3 02e6 | | .DBGLNO 0x02e3,0x02e6 080d ; -------------------------------------------------------------------------------------- 080d ; Debug chain 080d ; -------------------------------------------------------------------------------------- 080d 0002 0010 | | .DBGLEN 0x0002,0x0010 080f 02f3 02fc | | .DBGLNO 0x02f3,0x02fc,0x0302,0x0305,0x0309,0x030c,0x0310,0x031c,0x031e,0x0322,0x0328,0x032d,0x0339,0x0340,0x0344,0x034e,0x0355,0x0370 0821 ; -------------------------------------------------------------------------------------- 0821 ; Debug chain 0821 ; -------------------------------------------------------------------------------------- 0821 0002 000b | | .DBGLEN 0x0002,0x000b 0823 037b 0384 | { | .DBGLNO 0x037b,0x0384,0x038a,0x0392,0x039e,0x03a0,0x03a4,0x03aa,0x03af,0x03bb,0x03c2,0x03c9,0x03d0 0830 ; -------------------------------------------------------------------------------------- 0830 ; Debug chain 0830 ; -------------------------------------------------------------------------------------- 0830 0001 000c | | .DBGLEN 0x0001,0x000c 0832 03db 03e1 | | .DBGLNO 0x03db,0x03e1,0x03e4,0x03e8,0x03eb,0x03f7,0x03f9,0x03fd,0x0403,0x0408,0x0414,0x041b,0x0422 083f ; -------------------------------------------------------------------------------------- 083f ; Debug chain 083f ; -------------------------------------------------------------------------------------- 083f 0001 0009 | | .DBGLEN 0x0001,0x0009 0841 042b 042d | + -| .DBGLNO 0x042b,0x042d,0x0430,0x0433,0x043c,0x0440,0x0445,0x044e,0x0450,0x0455 084b ; -------------------------------------------------------------------------------------- 084b ; Debug chain 084b ; -------------------------------------------------------------------------------------- 084b 0002 000e | | .DBGLEN 0x0002,0x000e 084d 045b 045d | [ ]| .DBGLNO 0x045b,0x045d,0x045f,0x0462,0x0465,0x0475,0x0478,0x047e,0x0483,0x048f,0x0491,0x0496,0x0498,0x049a,0x049c,0x04a1 085d ; -------------------------------------------------------------------------------------- 085d ; Debug chain 085d ; -------------------------------------------------------------------------------------- 085d 0000 0001 | | .DBGLEN 0x0000,0x0001 085f 04ab | | .DBGLNO 0x04ab 0860 ; -------------------------------------------------------------------------------------- 0860 ; Debug chain 0860 ; -------------------------------------------------------------------------------------- 0860 0001 0002 | | .DBGLEN 0x0001,0x0002 0862 04b3 04b7 | | .DBGLNO 0x04b3,0x04b7,0x04bb 0865 ; -------------------------------------------------------------------------------------- 0865 ; Debug chain 0865 ; -------------------------------------------------------------------------------------- 0865 0000 0003 | | .DBGLEN 0x0000,0x0003 0867 04c3 04c8 | | .DBGLNO 0x04c3,0x04c8,0x04cb 086a ; -------------------------------------------------------------------------------------- 086a ; Debug chain 086a ; -------------------------------------------------------------------------------------- 086a 0003 0009 | | .DBGLEN 0x0003,0x0009 086c 04db 04df | | .DBGLNO 0x04db,0x04df,0x04e0,0x04e1,0x04e6,0x04ea,0x04ec,0x04ef,0x04f2,0x04f5,0x04f9,0x0507 0878 ; -------------------------------------------------------------------------------------- 0878 ; Debug chain 0878 ; -------------------------------------------------------------------------------------- 0878 0000 0001 | | .DBGLEN 0x0000,0x0001 087a 0513 | | .DBGLNO 0x0513 087b ; -------------------------------------------------------------------------------------- 087b ; Debug chain 087b ; -------------------------------------------------------------------------------------- 087b 0001 0003 | | .DBGLEN 0x0001,0x0003 087d 051b 051f | | .DBGLNO 0x051b,0x051f,0x0522,0x0528 0881 ; -------------------------------------------------------------------------------------- 0881 ; Debug chain 0881 ; -------------------------------------------------------------------------------------- 0881 0000 0002 | | .DBGLEN 0x0000,0x0002 0883 0534 0539 | 4 9| .DBGLNO 0x0534,0x0539 0885 ; -------------------------------------------------------------------------------------- 0885 ; Debug chain 0885 ; -------------------------------------------------------------------------------------- 0885 0002 0007 | | .DBGLEN 0x0002,0x0007 0887 0543 0549 | C I| .DBGLNO 0x0543,0x0549,0x054d,0x0553,0x0559,0x055e,0x0569,0x056d,0x0577 0890 0001 0002 | | .XXX[0x7] 0892 0003 0005 | | 0894 0006 0004 | | 0896 0007 | | 0897 ; -------------------------------------------------------------------------------------- 0897 ; Debug chain 0897 ; -------------------------------------------------------------------------------------- 0897 0000 0001 | | .DBGLEN 0x0000,0x0001 0899 0583 | | .DBGLNO 0x0583 089a ; -------------------------------------------------------------------------------------- 089a ; Debug chain 089a ; -------------------------------------------------------------------------------------- 089a 0000 0003 | | .DBGLEN 0x0000,0x0003 089c 0593 0597 | | .DBGLNO 0x0593,0x0597,0x0599 089f ; -------------------------------------------------------------------------------------- 089f ; Debug chain 089f ; -------------------------------------------------------------------------------------- 089f 0001 0004 | | .DBGLEN 0x0001,0x0004 08a1 05a3 05ad | | .DBGLNO 0x05a3,0x05ad,0x05b9,0x05bd,0x05c1 08a6 ; -------------------------------------------------------------------------------------- 08a6 ; Debug chain 08a6 ; -------------------------------------------------------------------------------------- 08a6 0007 0000 | | .DBGLEN 0x0007,0x0000 08a8 0603 0605 | | .DBGLNO 0x0603,0x0605,0x0606,0x0608,0x060a,0x060c,0x060e 08af ; -------------------------------------------------------------------------------------- 08af ; Debug chain 08af ; -------------------------------------------------------------------------------------- 08af 0004 0000 | | .DBGLEN 0x0004,0x0000 08b1 0614 0616 | | .DBGLNO 0x0614,0x0616,0x0618,0x061a 08b5 ; -------------------------------------------------------------------------------------- 08b5 ; Debug chain 08b5 ; -------------------------------------------------------------------------------------- 08b5 0000 0003 | | .DBGLEN 0x0000,0x0003 08b7 0623 0626 | # &| .DBGLNO 0x0623,0x0626,0x0628 08ba ; -------------------------------------------------------------------------------------- 08ba ; Debug chain 08ba ; -------------------------------------------------------------------------------------- 08ba 0001 0005 | | .DBGLEN 0x0001,0x0005 08bc 0633 0634 | 3 4| .DBGLNO 0x0633,0x0634,0x0636,0x063b,0x063d,0x0646 08c2 ; -------------------------------------------------------------------------------------- 08c2 ; Debug chain 08c2 ; -------------------------------------------------------------------------------------- 08c2 0001 0005 | | .DBGLEN 0x0001,0x0005 08c4 0653 0654 | S T| .DBGLNO 0x0653,0x0654,0x0657,0x065c,0x065e,0x0667 08ca ; -------------------------------------------------------------------------------------- 08ca ; Debug chain 08ca ; -------------------------------------------------------------------------------------- 08ca 0000 0001 | | .DBGLEN 0x0000,0x0001 08cc 0673 | s | .DBGLNO 0x0673 08cd 0000 0000 | | .BLANK 0000[0x133]