|
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_d218d6
└─⟦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 0728 | ( | .CONST 0x0728 ; 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 0144 | D | .CONST 0x0144 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0049 | I | .CONST 0x0049 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4807 |H | Short_Literal 0x7 000d 029f 014b | K| Declare_Subprogram INIT_0148,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 00d8 | | Load_Top At_Offset_0 0011 4808 |H | Short_Literal 0x8 0012 4800 |H | Short_Literal 0x0 0013 4801 |H | Short_Literal 0x1 0014 4809 |H | Short_Literal 0x9 0015 0319 | | Declare_Type Variant_Record,Incomplete,Visible 0016 029f 039b | | Declare_Subprogram INIT_0398,For_Call 0018 00d9 | | Load_Top At_Offset_1 0019 012a | * | Execute Any,Change_Utility 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 00c4 | | Action Make_Default 0028 00c4 | | Action Make_Default 0029 00c4 | | Action Make_Default 002a 00c4 | | Action Make_Default 002b 00c4 | | Action Make_Default 002c 00c4 | | Action Make_Default 002d 00c4 | | Action Make_Default 002e 00c4 | | Action Make_Default 002f 00c4 | | Action Make_Default 0030 00c4 | | Action Make_Default 0031 00c4 | | Action Make_Default 0032 00c4 | | Action Make_Default 0033 00c4 | | Action Make_Default 0034 00c4 | | Action Make_Default 0035 00c4 | | Action Make_Default 0036 00c4 | | Action Make_Default 0037 00c4 | | Action Make_Default 0038 00c4 | | Action Make_Default 0039 00c4 | | Action Make_Default 003a 00c4 | | Action Make_Default 003b 00c4 | | Action Make_Default 003c 00c4 | | Action Make_Default 003d 00c4 | | Action Make_Default 003e 00c4 | | Action Make_Default 003f 00c4 | | Action Make_Default 0040 00c4 | | Action Make_Default 0041 00c4 | | Action Make_Default 0042 00c4 | | Action Make_Default 0043 00c4 | | Action Make_Default 0044 00c4 | | Action Make_Default 0045 00c4 | | Action Make_Default 0046 00c4 | | Action Make_Default 0047 00c4 | | Action Make_Default 0048 00c4 | | Action Make_Default 0049 00c4 | | Action Make_Default 004a 00c4 | | Action Make_Default 004b 00c4 | | Action Make_Default 004c 00c4 | | Action Make_Default 004d 00c4 | | Action Make_Default 004e 00c4 | | Action Make_Default 004f 00c4 | | Action Make_Default 0050 00c4 | | Action Make_Default 0051 00c4 | | Action Make_Default 0052 00c4 | | Action Make_Default 0053 00c4 | | Action Make_Default 0054 00c4 | | Action Make_Default 0055 00c4 | | Action Make_Default 0056 00d1 | | Pop_Control Pop_Count_1 0057 00c4 | | Action Make_Default 0058 00d1 | | Pop_Control Pop_Count_1 0059 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated 005b c20f | | Store 0x1,0xf 005c 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 005e c210 | | Store 0x1,0x10 005f 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 0061 c211 | | Store 0x1,0x11 0062 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated 0064 c212 | | Store 0x1,0x12 0065 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated 0067 c213 | | Store 0x1,0x13 0068 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 006a c214 | | Store 0x1,0x14 006b 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 006d c215 | | Store 0x1,0x15 006e 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 0070 c216 | | Store 0x1,0x16 0071 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 0073 c217 | | Store 0x1,0x17 0074 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 0076 c218 | | Store 0x1,0x18 0077 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated 0079 c219 | | Store 0x1,0x19 007a 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 007c c21a | | Store 0x1,0x1a 007d 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated 007f c227 | ' | Store 0x1,0x27 0080 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 0082 c228 | ( | Store 0x1,0x28 0083 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated 0085 c229 | ) | Store 0x1,0x29 0086 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated 0088 c22a | * | Store 0x1,0x2a 0089 029a 031b | | Declare_Subprogram INIT_0318,For_Outer_Call,Visible,Unelaborated 008b c22b | + | Store 0x1,0x2b 008c 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 008e c22c | , | Store 0x1,0x2c 008f 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 0091 c224 | $ | Store 0x1,0x24 0092 4800 |H | Short_Literal 0x0 0093 0093 05c3 | | push_full_address INIT_05c0 0095 02a0 | | Declare_Subprogram Null_Subprogram 0096 038f | | Declare_Type Package,Defined,Visible 0097 0386 | | Declare_Variable Package,Visible 0098 c221 | ! | Store 0x1,0x21 0099 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated 009b c222 | " | Store 0x1,0x22 009c 4804 |H | Short_Literal 0x4 009d 0093 041b | | push_full_address INIT_0418 009f 02a0 | | Declare_Subprogram Null_Subprogram 00a0 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 00a1 c223 | # | Store 0x1,0x23 00a2 e002 | | Load 0x0,0x2 00a3 0129 | ) | Execute Any,Make_Visible 00a4 c234 | 4 | Store 0x1,0x34 00a5 e003 | | Load 0x0,0x3 00a6 0129 | ) | Execute Any,Make_Visible 00a7 c235 | 5 | Store 0x1,0x35 00a8 e004 | | Load 0x0,0x4 00a9 0129 | ) | Execute Any,Make_Visible 00aa c236 | 6 | Store 0x1,0x36 00ab e005 | | Load 0x0,0x5 00ac 0129 | ) | Execute Any,Make_Visible 00ad c237 | 7 | Store 0x1,0x37 00ae e006 | | Load 0x0,0x6 00af 0129 | ) | Execute Any,Make_Visible 00b0 c238 | 8 | Store 0x1,0x38 00b1 e007 | | Load 0x0,0x7 00b2 0129 | ) | Execute Any,Make_Visible 00b3 c239 | 9 | Store 0x1,0x39 00b4 e008 | | Load 0x0,0x8 00b5 0129 | ) | Execute Any,Make_Visible 00b6 c23a | : | Store 0x1,0x3a 00b7 e009 | | Load 0x0,0x9 00b8 0129 | ) | Execute Any,Make_Visible 00b9 c23b | ; | Store 0x1,0x3b 00ba e00a | | Load 0x0,0xa 00bb 0129 | ) | Execute Any,Make_Visible 00bc c23c | < | Store 0x1,0x3c 00bd e00b | | Load 0x0,0xb 00be 0129 | ) | Execute Any,Make_Visible 00bf c23d | = | Store 0x1,0x3d 00c0 e00c | | Load 0x0,0xc 00c1 0129 | ) | Execute Any,Make_Visible 00c2 c23e | > | Store 0x1,0x3e 00c3 e00d | | Load 0x0,0xd 00c4 0129 | ) | Execute Any,Make_Visible 00c5 c23f | ? | Store 0x1,0x3f 00c6 e00e | | Load 0x0,0xe 00c7 0129 | ) | Execute Any,Make_Visible 00c8 c240 | @ | Store 0x1,0x40 00c9 e00f | | Load 0x0,0xf 00ca 0129 | ) | Execute Any,Make_Visible 00cb c241 | A | Store 0x1,0x41 00cc e010 | | Load 0x0,0x10 00cd 0129 | ) | Execute Any,Make_Visible 00ce c242 | B | Store 0x1,0x42 00cf e011 | | Load 0x0,0x11 00d0 0129 | ) | Execute Any,Make_Visible 00d1 c243 | C | Store 0x1,0x43 00d2 e012 | | Load 0x0,0x12 00d3 0129 | ) | Execute Any,Make_Visible 00d4 c244 | D | Store 0x1,0x44 00d5 e013 | | Load 0x0,0x13 00d6 0129 | ) | Execute Any,Make_Visible 00d7 c245 | E | Store 0x1,0x45 00d8 e014 | | Load 0x0,0x14 00d9 0129 | ) | Execute Any,Make_Visible 00da c246 | F | Store 0x1,0x46 00db e015 | | Load 0x0,0x15 00dc 0129 | ) | Execute Any,Make_Visible 00dd c247 | G | Store 0x1,0x47 00de e016 | | Load 0x0,0x16 00df 0129 | ) | Execute Any,Make_Visible 00e0 c248 | H | Store 0x1,0x48 00e1 e017 | | Load 0x0,0x17 00e2 0129 | ) | Execute Any,Make_Visible 00e3 c249 | I | Store 0x1,0x49 00e4 4801 |H | Short_Literal 0x1 00e5 00e2 | | Load_Encached Integer_Cache 00e6 4801 |H | Short_Literal 0x1 00e7 00e6 | | Load_Encached Float_Cache 00e8 4801 |H | Short_Literal 0x1 00e9 00e1 | | Load_Encached Boolean_Cache 00ea 4801 |H | Short_Literal 0x1 00eb 00e8 | | Load_Encached Character_Cache 00ec 4801 |H | Short_Literal 0x1 00ed e018 | | Load 0x0,0x18 00ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00ef 4801 |H | Short_Literal 0x1 00f0 e001 | | Load 0x0,0x1 00f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00f2 4801 |H | Short_Literal 0x1 00f3 00e2 | | Load_Encached Integer_Cache 00f4 4801 |H | Short_Literal 0x1 00f5 e018 | | Load 0x0,0x18 00f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00f7 029f 039b | | Declare_Subprogram INIT_0398,For_Call 00f9 4808 |H | Short_Literal 0x8 00fa 4800 |H | Short_Literal 0x0 00fb e20e | | Load 0x1,0xe 00fc 0307 | | Complete_Type Variant_Record,By_Defining 00fd 4801 |H | Short_Literal 0x1 00fe e20e | | Load 0x1,0xe 00ff 1c08 | | Execute_Immediate Run_Utility,0x8 0100 4801 |H | Short_Literal 0x1 0101 00d9 | | Load_Top At_Offset_1 0102 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 0103 0129 | ) | Execute Any,Make_Visible 0104 c232 | 2 | Store 0x1,0x32 0105 4801 |H | Short_Literal 0x1 0106 e20e | | Load 0x1,0xe 0107 1c08 | | Execute_Immediate Run_Utility,0x8 0108 4800 |H | Short_Literal 0x0 0109 00d9 | | Load_Top At_Offset_1 010a 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 010b 0129 | ) | Execute Any,Make_Visible 010c c233 | 3 | Store 0x1,0x33 010d 00bf | | Action Accept_Activation 010e 1d0f | | Execute_Immediate Reference_Lex_1,0xf 010f 00c7 | | Action Elaborate_Subprogram 0110 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0111 00c7 | | Action Elaborate_Subprogram 0112 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0113 00c7 | | Action Elaborate_Subprogram 0114 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0115 00c7 | | Action Elaborate_Subprogram 0116 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0117 00c7 | | Action Elaborate_Subprogram 0118 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0119 00c7 | | Action Elaborate_Subprogram 011a 1d15 | | Execute_Immediate Reference_Lex_1,0x15 011b 00c7 | | Action Elaborate_Subprogram 011c 1d16 | | Execute_Immediate Reference_Lex_1,0x16 011d 00c7 | | Action Elaborate_Subprogram 011e 1d17 | | Execute_Immediate Reference_Lex_1,0x17 011f 00c7 | | Action Elaborate_Subprogram 0120 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0121 00c7 | | Action Elaborate_Subprogram 0122 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0123 00c7 | | Action Elaborate_Subprogram 0124 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0125 00c7 | | Action Elaborate_Subprogram 0126 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0127 00c7 | | Action Elaborate_Subprogram 0128 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0129 00c7 | | Action Elaborate_Subprogram 012a 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 012b 00c7 | | Action Elaborate_Subprogram 012c 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 012d 00c7 | | Action Elaborate_Subprogram 012e 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 012f 00c7 | | Action Elaborate_Subprogram 0130 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 0131 00c7 | | Action Elaborate_Subprogram 0132 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0133 00c7 | | Action Elaborate_Subprogram 0134 00b6 | | Action Make_Scope 0135 e018 | | Load 0x0,0x18 0136 4802 |H | Short_Literal 0x2 0137 e221 | ! | Load 0x1,0x21 0138 020e | | Execute Module,Augment_Imports 0139 e221 | ! | Load 0x1,0x21 013a 020f | | Execute Module,Activate 013b 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 013c 00c7 | | Action Elaborate_Subprogram 013d 00b6 | | Action Make_Scope 013e e018 | | Load 0x0,0x18 013f 4802 |H | Short_Literal 0x2 0140 e223 | # | Load 0x1,0x23 0141 020e | | Execute Module,Augment_Imports 0142 e223 | # | Load 0x1,0x23 0143 020d | | Execute Module,Elaborate 0144 BODY_0008: 0144 00bc | | Action Signal_Activated 0145 00bb | | Action Signal_Completion 0146 0000 0000 | | .XXX[0x2] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b 4607 |F | Jump_Case 0x8 014c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 014d 7806 |x | Jump 0x154 ; case 0x1 014e 7809 |x | Jump 0x158 ; case 0x2 014f 780d |x | Jump 0x15d ; case 0x3 0150 7810 |x | Jump 0x161 ; case 0x4 0151 7811 |x | Jump 0x163 ; case 0x5 0152 7812 |x | Jump 0x165 ; case 0x6 0153 7815 |x | Jump 0x169 ; case 0x7 0154 00da | | Load_Top At_Offset_2 0155 0091 06d8 | | Action Push_String_Extended_Indexed,0x6d8 ; "INTEGER_VALUE" 0157 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0158 00db | | Load_Top At_Offset_3 0159 00db | | Load_Top At_Offset_3 015a 00e0 | | Load_Encached Standard_Cache 015b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 015c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 015d 00da | | Load_Top At_Offset_2 015e 00e0 | | Load_Encached Standard_Cache 015f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0160 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0161 00db | | Load_Top At_Offset_3 0162 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0163 00db | | Load_Top At_Offset_3 0164 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0165 e20d | | Load 0x1,0xd 0166 00dc | | Load_Top At_Offset_4 0167 0267 | g | Execute Discrete,Predecessor 0168 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0169 e20d | | Load 0x1,0xd 016a 00dc | | Load_Top At_Offset_4 016b 0268 | h | Execute Discrete,Successor 016c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 016d 0000 0000 | | .XXX[0x3] 016f 0000 | | 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 4800 |H | Short_Literal 0x0 0174 e20e | | Load 0x1,0xe 0175 1c08 | | Execute_Immediate Run_Utility,0x8 0176 00db | | Load_Top At_Offset_3 0177 00d9 | | Load_Top At_Offset_1 0178 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0179 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017a 0000 0000 | | .BLANK 0000[0x6] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0183 | | .CONST 0x0183 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0001 | | .CONST 0x0001 ; Number of locals 0183 BODY_0180: 0183 INIT_0180: 0183 4802 |H | Short_Literal 0x2 0184 e20e | | Load 0x1,0xe 0185 1c08 | | Execute_Immediate Run_Utility,0x8 0186 00db | | Load_Top At_Offset_3 0187 00d9 | | Load_Top At_Offset_1 0188 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 0189 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018a 0000 0000 | | .BLANK 0000[0x6] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 4801 |H | Short_Literal 0x1 0194 e20e | | Load 0x1,0xe 0195 1c08 | | Execute_Immediate Run_Utility,0x8 0196 00db | | Load_Top At_Offset_3 0197 00d9 | | Load_Top At_Offset_1 0198 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 0199 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019a 0000 0000 | | .BLANK 0000[0x6] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01a3 | | .CONST 0x01a3 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0001 | | .CONST 0x0001 ; Number of locals 01a3 BODY_01a0: 01a3 INIT_01a0: 01a3 4803 |H | Short_Literal 0x3 01a4 e20e | | Load 0x1,0xe 01a5 1c08 | | Execute_Immediate Run_Utility,0x8 01a6 00db | | Load_Top At_Offset_3 01a7 00d9 | | Load_Top At_Offset_1 01a8 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 01a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01aa 0000 0000 | | .BLANK 0000[0x6] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 4804 |H | Short_Literal 0x4 01b4 e20e | | Load 0x1,0xe 01b5 1c08 | | Execute_Immediate Run_Utility,0x8 01b6 00db | | Load_Top At_Offset_3 01b7 e018 | | Load 0x0,0x18 01b8 180f | | Execute Package,Field_Execute,Field_Number 0xf 01b9 00d9 | | Load_Top At_Offset_1 01ba 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 01bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bc 0000 0000 | | .BLANK 0000[0x4] 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 4807 |H | Short_Literal 0x7 01c4 e20e | | Load 0x1,0xe 01c5 1c08 | | Execute_Immediate Run_Utility,0x8 01c6 00db | | Load_Top At_Offset_3 01c7 00d9 | | Load_Top At_Offset_1 01c8 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 01c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ca 0000 0000 | | .BLANK 0000[0x6] 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 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 01d5 4607 |F | Jump_Case 0x8 01d6 7809 |x | Jump 0x1e0 ; case 0x0 01d7 780b |x | Jump 0x1e3 ; case 0x1 01d8 7815 |x | Jump 0x1ee ; case 0x2 01d9 7804 |x | Jump 0x1de ; case 0x3 01da 7803 |x | Jump 0x1de ; case 0x4 01db 7802 |x | Jump 0x1de ; case 0x5 01dc 780e |x | Jump 0x1eb ; case 0x6 01dd 7800 |x | Jump 0x1de ; case 0x7 01de e234 | 4 | Load 0x1,0x34 01df 0257 | W | Execute Discrete,Raise 01e0 00da | | Load_Top At_Offset_2 01e1 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 01e2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e3 00da | | Load_Top At_Offset_2 01e4 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 01e5 00d8 | | Load_Top At_Offset_0 01e6 00e2 | | Load_Encached Integer_Cache 01e7 0260 | ` | Execute Discrete,In_Type 01e8 7001 |p | Jump_Nonzero 0x1ea 01e9 0801 | | Execute_Immediate Raise,0x1 01ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01eb 00da | | Load_Top At_Offset_2 01ec 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 01ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ee 00da | | Load_Top At_Offset_2 01ef 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 01f0 0235 | 5 | Execute Float,Round_To_Discrete 01f1 00e2 | | Load_Encached Integer_Cache 01f2 025e | ^ | Execute Discrete,Convert 01f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f4 0000 0000 | | .BLANK 0000[0x4] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb 00da | | Load_Top At_Offset_2 01fc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 01fd 0f01 | | Execute_Immediate Equal,0x1 01fe 7002 |p | Jump_Nonzero 0x201 01ff e235 | 5 | Load 0x1,0x35 0200 0257 | W | Execute Discrete,Raise 0201 00da | | Load_Top At_Offset_2 0202 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0203 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0204 0000 0000 | | .BLANK 0000[0x4] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b 00da | | Load_Top At_Offset_2 020c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 020d 4607 |F | Jump_Case 0x8 020e 780c |x | Jump 0x21b ; case 0x0 020f 780f |x | Jump 0x21f ; case 0x1 0210 7807 |x | Jump 0x218 ; case 0x2 0211 7804 |x | Jump 0x216 ; case 0x3 0212 7803 |x | Jump 0x216 ; case 0x4 0213 7802 |x | Jump 0x216 ; case 0x5 0214 780e |x | Jump 0x223 ; case 0x6 0215 7800 |x | Jump 0x216 ; case 0x7 0216 e236 | 6 | Load 0x1,0x36 0217 0257 | W | Execute Discrete,Raise 0218 00da | | Load_Top At_Offset_2 0219 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 021a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 021b 00da | | Load_Top At_Offset_2 021c 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 021d 0237 | 7 | Execute Float,Convert_From_Discrete 021e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 021f 00da | | Load_Top At_Offset_2 0220 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0221 0237 | 7 | Execute Float,Convert_From_Discrete 0222 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0223 00da | | Load_Top At_Offset_2 0224 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0225 0237 | 7 | Execute Float,Convert_From_Discrete 0226 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0227 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 022c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 022d 4607 |F | Jump_Case 0x8 022e 7807 |x | Jump 0x236 ; case 0x0 022f 7806 |x | Jump 0x236 ; case 0x1 0230 7805 |x | Jump 0x236 ; case 0x2 0231 7806 |x | Jump 0x238 ; case 0x3 0232 7808 |x | Jump 0x23b ; case 0x4 0233 7802 |x | Jump 0x236 ; case 0x5 0234 7801 |x | Jump 0x236 ; case 0x6 0235 7800 |x | Jump 0x236 ; case 0x7 0236 e237 | 7 | Load 0x1,0x37 0237 0257 | W | Execute Discrete,Raise 0238 00da | | Load_Top At_Offset_2 0239 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 023a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 023b 00da | | Load_Top At_Offset_2 023c 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 023d e018 | | Load 0x0,0x18 023e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 023f 01db | | Execute Vector,Length 0240 0f01 | | Execute_Immediate Equal,0x1 0241 6807 |h | Jump_Zero 0x249 0242 4801 |H | Short_Literal 0x1 0243 00db | | Load_Top At_Offset_3 0244 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0245 e018 | | Load 0x0,0x18 0246 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0247 01d7 | | Execute Vector,Field_Read 0248 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0249 e237 | 7 | Load 0x1,0x37 024a 0257 | W | Execute Discrete,Raise 024b 0000 0000 | | .BLANK 0000[0x5] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0253 | S | .CONST 0x0253 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0001 | | .CONST 0x0001 ; Number of locals 0253 BODY_0250: 0253 INIT_0250: 0253 00da | | Load_Top At_Offset_2 0254 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0255 4607 |F | Jump_Case 0x8 0256 7813 |x | Jump 0x26a ; case 0x0 0257 7821 |x! | Jump 0x279 ; case 0x1 0258 7805 |x | Jump 0x25e ; case 0x2 0259 780b |x | Jump 0x265 ; case 0x3 025a 7805 |x | Jump 0x260 ; case 0x4 025b 7818 |x | Jump 0x274 ; case 0x5 025c 7812 |x | Jump 0x26f ; case 0x6 025d 7800 |x | Jump 0x25e ; case 0x7 025e e238 | 8 | Load 0x1,0x38 025f 0257 | W | Execute Discrete,Raise 0260 00da | | Load_Top At_Offset_2 0261 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0262 e018 | | Load 0x0,0x18 0263 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0264 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0265 00da | | Load_Top At_Offset_2 0266 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0267 00ea | | Load_Encached Null_String_Cache 0268 01cb | | Execute Vector,Append 0269 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 026a 00da | | Load_Top At_Offset_2 026b 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 026c 00e0 | | Load_Encached Standard_Cache 026d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 026e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 026f 00da | | Load_Top At_Offset_2 0270 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0271 00e0 | | Load_Encached Standard_Cache 0272 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0273 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0274 00da | | Load_Top At_Offset_2 0275 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0276 e018 | | Load 0x0,0x18 0277 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0278 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0279 00da | | Load_Top At_Offset_2 027a 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 027b 00e1 | | Load_Encached Boolean_Cache 027c 011c | | Execute Any,Convert_Unchecked 027d 1c01 | | Execute_Immediate Run_Utility,0x1 027e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 027f 0000 | | .XXX[0x1] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 00da | | Load_Top At_Offset_2 0284 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0285 0f07 | | Execute_Immediate Equal,0x7 0286 6805 |h | Jump_Zero 0x28c 0287 00da | | Load_Top At_Offset_2 0288 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 0289 02fd | | Declare_Variable Variant_Record,Duplicate 028a 00cd | | Action Spare6_Action 028b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 028c e239 | 9 | Load 0x1,0x39 028d 0257 | W | Execute Discrete,Raise 028e 0000 0000 | | .XXX[0x2] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0295 | | .CONST 0x0295 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0002 | | .CONST 0x0002 ; Number of locals 0293 INIT_0290: 0293 00e1 | | Load_Encached Boolean_Cache 0294 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0295 BODY_0290: 0295 e5fd | | Load 0x2,-0x3 0296 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0297 4607 |F | Jump_Case 0x8 0298 780b |x | Jump 0x2a4 ; case 0x0 0299 780f |x | Jump 0x2a9 ; case 0x1 029a 780e |x | Jump 0x2a9 ; case 0x2 029b 780d |x | Jump 0x2a9 ; case 0x3 029c 780c |x | Jump 0x2a9 ; case 0x4 029d 780b |x | Jump 0x2a9 ; case 0x5 029e 7801 |x | Jump 0x2a0 ; case 0x6 029f 7809 |x | Jump 0x2a9 ; case 0x7 02a0 00db | | Load_Top At_Offset_3 02a1 e5fd | | Load 0x2,-0x3 02a2 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 02a3 7805 |x | Jump 0x2a9 02a4 00db | | Load_Top At_Offset_3 02a5 e5fd | | Load 0x2,-0x3 02a6 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 02a7 4801 |H | Short_Literal 0x1 02a8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02a9 00d8 | | Load_Top At_Offset_0 02aa 700c |p | Jump_Nonzero 0x2b7 02ab e5fe | | Load 0x2,-0x2 02ac 680a |h | Jump_Zero 0x2b7 02ad 4800 |H | Short_Literal 0x0 02ae e20e | | Load 0x1,0xe 02af 1c08 | | Execute_Immediate Run_Utility,0x8 02b0 e5ff | | Load 0x2,-0x1 02b1 00d9 | | Load_Top At_Offset_1 02b2 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 02b3 e5fd | | Load 0x2,-0x3 02b4 016d | m | Execute Variant_Record,Structure_Write 02b5 4801 |H | Short_Literal 0x1 02b6 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02b7 00d8 | | Load_Top At_Offset_0 02b8 7002 |p | Jump_Nonzero 0x2bb 02b9 e23a | : | Load 0x1,0x3a 02ba 0257 | W | Execute Discrete,Raise 02bb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02bc 0000 0000 | | .BLANK 0000[0x4] 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c3 | | .CONST 0x02c3 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0001 | | .CONST 0x0001 ; Number of locals 02c3 BODY_02c0: 02c3 INIT_02c0: 02c3 e5fd | | Load 0x2,-0x3 02c4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02c5 0f01 | | Execute_Immediate Equal,0x1 02c6 6804 |h | Jump_Zero 0x2cb 02c7 00da | | Load_Top At_Offset_2 02c8 e5fd | | Load 0x2,-0x3 02c9 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 02ca 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02cb 00db | | Load_Top At_Offset_3 02cc 6809 |h | Jump_Zero 0x2d6 02cd 4801 |H | Short_Literal 0x1 02ce e20e | | Load 0x1,0xe 02cf 1c08 | | Execute_Immediate Run_Utility,0x8 02d0 00db | | Load_Top At_Offset_3 02d1 00d9 | | Load_Top At_Offset_1 02d2 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 02d3 e5fd | | Load 0x2,-0x3 02d4 016d | m | Execute Variant_Record,Structure_Write 02d5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02d6 e23b | ; | Load 0x1,0x3b 02d7 0257 | W | Execute Discrete,Raise 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db e5fd | | Load 0x2,-0x3 02dc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02dd 0f02 | | Execute_Immediate Equal,0x2 02de 6804 |h | Jump_Zero 0x2e3 02df 00da | | Load_Top At_Offset_2 02e0 e5fd | | Load 0x2,-0x3 02e1 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 02e2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02e3 00db | | Load_Top At_Offset_3 02e4 6809 |h | Jump_Zero 0x2ee 02e5 4802 |H | Short_Literal 0x2 02e6 e20e | | Load 0x1,0xe 02e7 1c08 | | Execute_Immediate Run_Utility,0x8 02e8 00db | | Load_Top At_Offset_3 02e9 00d9 | | Load_Top At_Offset_1 02ea 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 02eb e5fd | | Load 0x2,-0x3 02ec 016d | m | Execute Variant_Record,Structure_Write 02ed 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02ee e23c | < | Load 0x1,0x3c 02ef 0257 | W | Execute Discrete,Raise 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 e5fd | | Load 0x2,-0x3 02f4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02f5 0f03 | | Execute_Immediate Equal,0x3 02f6 6804 |h | Jump_Zero 0x2fb 02f7 00da | | Load_Top At_Offset_2 02f8 e5fd | | Load 0x2,-0x3 02f9 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 02fa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02fb e5fd | | Load 0x2,-0x3 02fc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02fd 0f04 | | Execute_Immediate Equal,0x4 02fe 6808 |h | Jump_Zero 0x307 02ff 00da | | Load_Top At_Offset_2 0300 00ea | | Load_Encached Null_String_Cache 0301 01cb | | Execute Vector,Append 0302 e018 | | Load 0x0,0x18 0303 180f | | Execute Package,Field_Execute,Field_Number 0xf 0304 e5fd | | Load 0x2,-0x3 0305 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 0306 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0307 00db | | Load_Top At_Offset_3 0308 6809 |h | Jump_Zero 0x312 0309 4803 |H | Short_Literal 0x3 030a e20e | | Load 0x1,0xe 030b 1c08 | | Execute_Immediate Run_Utility,0x8 030c 00db | | Load_Top At_Offset_3 030d 00d9 | | Load_Top At_Offset_1 030e 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 030f e5fd | | Load 0x2,-0x3 0310 016d | m | Execute Variant_Record,Structure_Write 0311 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0312 e23d | = | Load 0x1,0x3d 0313 0257 | W | Execute Discrete,Raise 0314 0000 0000 | | .BLANK 0000[0x4] 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 031b | | .CONST 0x031b ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0001 | | .CONST 0x0001 ; Number of locals 031b BODY_0318: 031b INIT_0318: 031b e5fd | | Load 0x2,-0x3 031c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 031d 0f04 | | Execute_Immediate Equal,0x4 031e 6806 |h | Jump_Zero 0x325 031f 00da | | Load_Top At_Offset_2 0320 e018 | | Load 0x0,0x18 0321 180f | | Execute Package,Field_Execute,Field_Number 0xf 0322 e5fd | | Load 0x2,-0x3 0323 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 0324 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0325 00db | | Load_Top At_Offset_3 0326 680b |h | Jump_Zero 0x332 0327 4804 |H | Short_Literal 0x4 0328 e20e | | Load 0x1,0xe 0329 1c08 | | Execute_Immediate Run_Utility,0x8 032a 00db | | Load_Top At_Offset_3 032b e018 | | Load 0x0,0x18 032c 180f | | Execute Package,Field_Execute,Field_Number 0xf 032d 00d9 | | Load_Top At_Offset_1 032e 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 032f e5fd | | Load 0x2,-0x3 0330 016d | m | Execute Variant_Record,Structure_Write 0331 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0332 e23e | > | Load 0x1,0x3e 0333 0257 | W | Execute Discrete,Raise 0334 0000 0000 | | .BLANK 0000[0x4] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033b | ; | .CONST 0x033b ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0001 | | .CONST 0x0001 ; Number of locals 033b BODY_0338: 033b INIT_0338: 033b e5fd | | Load 0x2,-0x3 033c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 033d 0f07 | | Execute_Immediate Equal,0x7 033e 6804 |h | Jump_Zero 0x343 033f 00da | | Load_Top At_Offset_2 0340 e5fd | | Load 0x2,-0x3 0341 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 0342 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0343 00db | | Load_Top At_Offset_3 0344 6809 |h | Jump_Zero 0x34e 0345 4807 |H | Short_Literal 0x7 0346 e20e | | Load 0x1,0xe 0347 1c08 | | Execute_Immediate Run_Utility,0x8 0348 00db | | Load_Top At_Offset_3 0349 00d9 | | Load_Top At_Offset_1 034a 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 034b e5fd | | Load 0x2,-0x3 034c 016d | m | Execute Variant_Record,Structure_Write 034d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 034e e23f | ? | Load 0x1,0x3f 034f 0257 | W | Execute Discrete,Raise 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0353 | S | .CONST 0x0353 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0001 | | .CONST 0x0001 ; Number of locals 0353 BODY_0350: 0353 INIT_0350: 0353 00da | | Load_Top At_Offset_2 0354 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0355 e5fe | | Load 0x2,-0x2 0356 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0357 027f | | Execute Discrete,Equal 0358 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0359 0000 0000 | | .BLANK 0000[0x7] 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0363 | c | .CONST 0x0363 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0001 | | .CONST 0x0001 ; Number of locals 0363 BODY_0360: 0363 INIT_0360: 0363 00da | | Load_Top At_Offset_2 0364 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0365 4607 |F | Jump_Case 0x8 0366 780c |x | Jump 0x373 ; case 0x0 0367 7814 |x | Jump 0x37c ; case 0x1 0368 780f |x | Jump 0x378 ; case 0x2 0369 7818 |x | Jump 0x382 ; case 0x3 036a 781d |x | Jump 0x388 ; case 0x4 036b 7821 |x! | Jump 0x38d ; case 0x5 036c 7825 |x% | Jump 0x392 ; case 0x6 036d 7800 |x | Jump 0x36e ; case 0x7 036e 00da | | Load_Top At_Offset_2 036f 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 0370 e001 | | Load 0x0,0x1 0371 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0372 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0373 00da | | Load_Top At_Offset_2 0374 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0375 00e0 | | Load_Encached Standard_Cache 0376 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0377 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0378 00da | | Load_Top At_Offset_2 0379 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 037a 8019 | | Call 0x0,0x19 037b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 037c 00da | | Load_Top At_Offset_2 037d 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 037e 00e1 | | Load_Encached Boolean_Cache 037f 011c | | Execute Any,Convert_Unchecked 0380 1c01 | | Execute_Immediate Run_Utility,0x1 0381 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0382 00da | | Load_Top At_Offset_2 0383 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0384 00e8 | | Load_Encached Character_Cache 0385 011c | | Execute Any,Convert_Unchecked 0386 1c01 | | Execute_Immediate Run_Utility,0x1 0387 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0388 00da | | Load_Top At_Offset_2 0389 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 038a e018 | | Load 0x0,0x18 038b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 038c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 038d 00da | | Load_Top At_Offset_2 038e 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 038f e018 | | Load 0x0,0x18 0390 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0391 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0392 00da | | Load_Top At_Offset_2 0393 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0394 00e0 | | Load_Encached Standard_Cache 0395 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0396 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0397 0000 | | .XXX[0x1] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039b | | .CONST 0x039b ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0001 | | .CONST 0x0001 ; Number of locals 039b BODY_0398: 039b BODY_0398: 039b INIT_0398: 039b INIT_0398: 039b 4608 |F | Jump_Case 0x9 039c 7808 |x | Jump 0x3a5 ; case 0x0 039d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 039e 7874 |xt | Jump 0x413 ; case 0x2 039f 7873 |xs | Jump 0x413 ; case 0x3 03a0 7872 |xr | Jump 0x413 ; case 0x4 03a1 7871 |xq | Jump 0x413 ; case 0x5 03a2 7832 |x2 | Jump 0x3d5 ; case 0x6 03a3 784b |xK | Jump 0x3ef ; case 0x7 03a4 7867 |xg | Jump 0x40c ; case 0x8 03a5 00da | | Load_Top At_Offset_2 03a6 016c | l | Execute Variant_Record,Is_Constrained 03a7 7009 |p | Jump_Nonzero 0x3b1 03a8 00cf | | Action Mark_Auxiliary 03a9 4800 |H | Short_Literal 0x0 03aa e5ff | | Load 0x2,-0x1 03ab 1c08 | | Execute_Immediate Run_Utility,0x8 03ac 00d8 | | Load_Top At_Offset_0 03ad 1c00 | | Execute_Immediate Run_Utility,0x0 03ae c5ff | | Store 0x2,-0x1 03af 00ce | | Action Pop_Auxiliary 03b0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03b1 00da | | Load_Top At_Offset_2 03b2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 03b3 4607 |F | Jump_Case 0x8 03b4 780c |x | Jump 0x3c1 ; case 0x0 03b5 7813 |x | Jump 0x3c9 ; case 0x1 03b6 780e |x | Jump 0x3c5 ; case 0x2 03b7 7815 |x | Jump 0x3cd ; case 0x3 03b8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 03b9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 03ba 7816 |x | Jump 0x3d1 ; case 0x6 03bb 7800 |x | Jump 0x3bc ; case 0x7 03bc e001 | | Load 0x0,0x1 03bd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03be 00db | | Load_Top At_Offset_3 03bf 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 03c0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03c1 4800 |H | Short_Literal 0x0 03c2 00db | | Load_Top At_Offset_3 03c3 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 03c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03c5 584e |XN | Indirect_Literal Float,0x414,0.0 03c6 00db | | Load_Top At_Offset_3 03c7 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 03c8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03c9 4800 |H | Short_Literal 0x0 03ca 00db | | Load_Top At_Offset_3 03cb 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 03cc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03cd 4800 |H | Short_Literal 0x0 03ce 00db | | Load_Top At_Offset_3 03cf 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 03d0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03d1 4800 |H | Short_Literal 0x0 03d2 00db | | Load_Top At_Offset_3 03d3 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 03d4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03d5 00db | | Load_Top At_Offset_3 03d6 4607 |F | Jump_Case 0x8 03d7 7809 |x | Jump 0x3e1 ; case 0x0 03d8 780c |x | Jump 0x3e5 ; case 0x1 03d9 7809 |x | Jump 0x3e3 ; case 0x2 03da 780c |x | Jump 0x3e7 ; case 0x3 03db 780d |x | Jump 0x3e9 ; case 0x4 03dc 7810 |x | Jump 0x3ed ; case 0x5 03dd 780d |x | Jump 0x3eb ; case 0x6 03de 7800 |x | Jump 0x3df ; case 0x7 03df 4806 |H | Short_Literal 0x6 03e0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03e1 4801 |H | Short_Literal 0x1 03e2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03e3 4802 |H | Short_Literal 0x2 03e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03e5 4803 |H | Short_Literal 0x3 03e6 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03e7 4804 |H | Short_Literal 0x4 03e8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03e9 4805 |H | Short_Literal 0x5 03ea 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03eb 4807 |H | Short_Literal 0x7 03ec 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03ed 4808 |H | Short_Literal 0x8 03ee 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03ef 00db | | Load_Top At_Offset_3 03f0 e5fe | | Load 0x2,-0x2 03f1 4607 |F | Jump_Case 0x8 03f2 7809 |x | Jump 0x3fc ; case 0x0 03f3 780c |x | Jump 0x400 ; case 0x1 03f4 7809 |x | Jump 0x3fe ; case 0x2 03f5 780c |x | Jump 0x402 ; case 0x3 03f6 780d |x | Jump 0x404 ; case 0x4 03f7 7810 |x | Jump 0x408 ; case 0x5 03f8 780d |x | Jump 0x406 ; case 0x6 03f9 7800 |x | Jump 0x3fa ; case 0x7 03fa 4806 |H | Short_Literal 0x6 03fb 780d |x | Jump 0x409 03fc 4801 |H | Short_Literal 0x1 03fd 780b |x | Jump 0x409 03fe 4802 |H | Short_Literal 0x2 03ff 7809 |x | Jump 0x409 0400 4803 |H | Short_Literal 0x3 0401 7807 |x | Jump 0x409 0402 4804 |H | Short_Literal 0x4 0403 7805 |x | Jump 0x409 0404 4805 |H | Short_Literal 0x5 0405 7803 |x | Jump 0x409 0406 4807 |H | Short_Literal 0x7 0407 7801 |x | Jump 0x409 0408 4808 |H | Short_Literal 0x8 0409 e5ff | | Load 0x2,-0x1 040a 031b | | Declare_Type Variant_Record,Constrained 040b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 040c 00db | | Load_Top At_Offset_3 040d e5fe | | Load 0x2,-0x2 040e e5ff | | Load 0x2,-0x1 040f 1c06 | | Execute_Immediate Run_Utility,0x6 0410 e5ff | | Load 0x2,-0x1 0411 02fc | | Declare_Variable Variant_Record,With_Constraint 0412 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0413 0869 | i | Execute_Immediate Raise,0x69 0414 0000 0000 | | .DBL 0.0 0416 0000 0000 | | 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 044f | O | .CONST 0x044f ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 001a | | .CONST 0x001a ; Number of locals 041b INIT_0418: 041b 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 041d 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated 041f 00c4 | | Action Make_Default 0420 00c4 | | Action Make_Default 0421 00c4 | | Action Make_Default 0422 00c4 | | Action Make_Default 0423 00c4 | | Action Make_Default 0424 00c4 | | Action Make_Default 0425 00c4 | | Action Make_Default 0426 00c4 | | Action Make_Default 0427 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 0429 c215 | | Store 0x1,0x15 042a 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated 042c c214 | | Store 0x1,0x14 042d 029a 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call,Visible,Unelaborated 042f c21a | | Store 0x1,0x1a 0430 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated 0432 c216 | | Store 0x1,0x16 0433 029a 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call,Visible,Unelaborated 0435 c217 | | Store 0x1,0x17 0436 029a 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call,Visible,Unelaborated 0438 c218 | | Store 0x1,0x18 0439 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 043b c219 | | Store 0x1,0x19 043c 00bf | | Action Accept_Activation 043d 1d11 | | Execute_Immediate Reference_Lex_1,0x11 043e 00c7 | | Action Elaborate_Subprogram 043f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0440 00c7 | | Action Elaborate_Subprogram 0441 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0442 00c7 | | Action Elaborate_Subprogram 0443 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0444 00c7 | | Action Elaborate_Subprogram 0445 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0446 00c7 | | Action Elaborate_Subprogram 0447 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0448 00c7 | | Action Elaborate_Subprogram 0449 1d17 | | Execute_Immediate Reference_Lex_1,0x17 044a 00c7 | | Action Elaborate_Subprogram 044b 1d18 | | Execute_Immediate Reference_Lex_1,0x18 044c 00c7 | | Action Elaborate_Subprogram 044d 1d19 | | Execute_Immediate Reference_Lex_1,0x19 044e 00c7 | | Action Elaborate_Subprogram 044f BODY_0418: 044f 00bc | | Action Signal_Activated 0450 00bb | | Action Signal_Completion 0451 0000 0000 | | .BLANK 0000[0x7] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045b | [ | .CONST 0x045b ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0001 | | .CONST 0x0001 ; Number of locals 045b BODY_0458: 045b INIT_0458: 045b e20f | | Load 0x1,0xf 045c 680e |h | Jump_Zero 0x46b 045d 4805 |H | Short_Literal 0x5 045e e001 | | Load 0x0,0x1 045f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0460 1c08 | | Execute_Immediate Run_Utility,0x8 0461 00db | | Load_Top At_Offset_3 0462 e210 | | Load 0x1,0x10 0463 0122 | " | Execute Any,Make_Root_Type 0464 011c | | Execute Any,Convert_Unchecked 0465 1c01 | | Execute_Immediate Run_Utility,0x1 0466 e002 | | Load 0x0,0x2 0467 180f | | Execute Package,Field_Execute,Field_Number 0xf 0468 00d9 | | Load_Top At_Offset_1 0469 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 046a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 046b 4806 |H | Short_Literal 0x6 046c e001 | | Load 0x0,0x1 046d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 046e 1c08 | | Execute_Immediate Run_Utility,0x8 046f 00db | | Load_Top At_Offset_3 0470 00d9 | | Load_Top At_Offset_1 0471 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 0472 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0473 0000 0000 | | .BLANK 0000[0x5] 0478 ; -------------------------------------------------------------------------------------- 0478 ; SUBPROGRAM 0478 ; -------------------------------------------------------------------------------------- 0478 047b | { | .CONST 0x047b ; Address of begin 0479 0004 | | .CONST 0x0004 ; Address of exception handler 047a 0001 | | .CONST 0x0001 ; Number of locals 047b BODY_0478: 047b INIT_0478: 047b 00da | | Load_Top At_Offset_2 047c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 047d 0f05 | | Execute_Immediate Equal,0x5 047e 680d |h | Jump_Zero 0x48c 047f 00da | | Load_Top At_Offset_2 0480 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0481 e002 | | Load 0x0,0x2 0482 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0483 e210 | | Load 0x1,0x10 0484 0122 | " | Execute Any,Make_Root_Type 0485 1c02 | | Execute_Immediate Run_Utility,0x2 0486 00d8 | | Load_Top At_Offset_0 0487 e210 | | Load 0x1,0x10 0488 0260 | ` | Execute Discrete,In_Type 0489 7001 |p | Jump_Nonzero 0x48b 048a 0801 | | Execute_Immediate Raise,0x1 048b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 048c 00da | | Load_Top At_Offset_2 048d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 048e 0f06 | | Execute_Immediate Equal,0x6 048f 680e |h | Jump_Zero 0x49e 0490 00da | | Load_Top At_Offset_2 0491 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0492 00d8 | | Load_Top At_Offset_0 0493 e210 | | Load 0x1,0x10 0494 0122 | " | Execute Any,Make_Root_Type 0495 0260 | ` | Execute Discrete,In_Type 0496 7001 |p | Jump_Nonzero 0x498 0497 0801 | | Execute_Immediate Raise,0x1 0498 00d8 | | Load_Top At_Offset_0 0499 e210 | | Load 0x1,0x10 049a 0260 | ` | Execute Discrete,In_Type 049b 7001 |p | Jump_Nonzero 0x49d 049c 0801 | | Execute_Immediate Raise,0x1 049d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 049e e001 | | Load 0x0,0x1 049f 1b44 | D | Execute Package,Field_Read,Field_Number 0x44 04a0 0257 | W | Execute Discrete,Raise 04a1 0000 0000 | | .BLANK 0000[0x7] 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04af | | .CONST 0x04af ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0003 | | .CONST 0x0003 ; Number of locals 04ab INIT_04a8: 04ab 029f 057b | {| Declare_Subprogram INIT_0578,For_Call 04ad 029f 05a3 | | Declare_Subprogram INIT_05a0,For_Call 04af BODY_04a8: 04af e20f | | Load 0x1,0xf 04b0 6802 |h | Jump_Zero 0x4b3 04b1 8402 | | Call 0x2,0x2 04b2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04b3 8403 | | Call 0x2,0x3 04b4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04b5 0000 0000 | | .XXX[0x3] 04b7 0000 | | 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04bb | | .CONST 0x04bb ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0001 | | .CONST 0x0001 ; Number of locals 04bb BODY_04b8: 04bb INIT_04b8: 04bb 00da | | Load_Top At_Offset_2 04bc 8212 | | Call 0x1,0x12 04bd e210 | | Load 0x1,0x10 04be 0122 | " | Execute Any,Make_Root_Type 04bf 011c | | Execute Any,Convert_Unchecked 04c0 1c01 | | Execute_Immediate Run_Utility,0x1 04c1 e002 | | Load 0x0,0x2 04c2 180f | | Execute Package,Field_Execute,Field_Number 0xf 04c3 e002 | | Load 0x0,0x2 04c4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04c5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04c6 0000 0000 | | .XXX[0x2] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cb | | .CONST 0x04cb ; Address of begin 04c9 0004 | | .CONST 0x0004 ; Address of exception handler 04ca 0001 | | .CONST 0x0001 ; Number of locals 04cb BODY_04c8: 04cb INIT_04c8: 04cb 00da | | Load_Top At_Offset_2 04cc e210 | | Load 0x1,0x10 04cd 0122 | " | Execute Any,Make_Root_Type 04ce 011c | | Execute Any,Convert_Unchecked 04cf 1c01 | | Execute_Immediate Run_Utility,0x1 04d0 e002 | | Load 0x0,0x2 04d1 180f | | Execute Package,Field_Execute,Field_Number 0xf 04d2 e002 | | Load 0x0,0x2 04d3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04d5 0000 0000 | | .XXX[0x3] 04d7 0000 | | 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04db | | .CONST 0x04db ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0001 | | .CONST 0x0001 ; Number of locals 04db BODY_04d8: 04db INIT_04d8: 04db 00da | | Load_Top At_Offset_2 04dc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04dd e5fe | | Load 0x2,-0x2 04de 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04df 027f | | Execute Discrete,Equal 04e0 681a |h | Jump_Zero 0x4fb 04e1 00da | | Load_Top At_Offset_2 04e2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04e3 4607 |F | Jump_Case 0x8 04e4 7807 |x | Jump 0x4ec ; case 0x0 04e5 7806 |x | Jump 0x4ec ; case 0x1 04e6 7805 |x | Jump 0x4ec ; case 0x2 04e7 7804 |x | Jump 0x4ec ; case 0x3 04e8 7803 |x | Jump 0x4ec ; case 0x4 04e9 780b |x | Jump 0x4f5 ; case 0x5 04ea 7804 |x | Jump 0x4ef ; case 0x6 04eb 7800 |x | Jump 0x4ec ; case 0x7 04ec e001 | | Load 0x0,0x1 04ed 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 04ee 0257 | W | Execute Discrete,Raise 04ef 00da | | Load_Top At_Offset_2 04f0 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04f1 e5fe | | Load 0x2,-0x2 04f2 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04f3 027c | | | Execute Discrete,Less 04f4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04f5 00da | | Load_Top At_Offset_2 04f6 8212 | | Call 0x1,0x12 04f7 e5fe | | Load 0x2,-0x2 04f8 8212 | | Call 0x1,0x12 04f9 027c | | | Execute Discrete,Less 04fa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04fb e001 | | Load 0x0,0x1 04fc 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 04fd 0257 | W | Execute Discrete,Raise 04fe 0000 0000 | | .XXX[0x2] 0500 ; -------------------------------------------------------------------------------------- 0500 ; SUBPROGRAM 0500 ; -------------------------------------------------------------------------------------- 0500 0503 | | .CONST 0x0503 ; Address of begin 0501 0004 | | .CONST 0x0004 ; Address of exception handler 0502 0001 | | .CONST 0x0001 ; Number of locals 0503 BODY_0500: 0503 INIT_0500: 0503 00da | | Load_Top At_Offset_2 0504 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0505 e5fe | | Load 0x2,-0x2 0506 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0507 027f | | Execute Discrete,Equal 0508 681a |h | Jump_Zero 0x523 0509 00da | | Load_Top At_Offset_2 050a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 050b 4607 |F | Jump_Case 0x8 050c 7807 |x | Jump 0x514 ; case 0x0 050d 7806 |x | Jump 0x514 ; case 0x1 050e 7805 |x | Jump 0x514 ; case 0x2 050f 7804 |x | Jump 0x514 ; case 0x3 0510 7803 |x | Jump 0x514 ; case 0x4 0511 780b |x | Jump 0x51d ; case 0x5 0512 7804 |x | Jump 0x517 ; case 0x6 0513 7800 |x | Jump 0x514 ; case 0x7 0514 e001 | | Load 0x0,0x1 0515 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0516 0257 | W | Execute Discrete,Raise 0517 00da | | Load_Top At_Offset_2 0518 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0519 e5fe | | Load 0x2,-0x2 051a 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 051b 027a | z | Execute Discrete,Less_Equal 051c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 051d 00da | | Load_Top At_Offset_2 051e 8212 | | Call 0x1,0x12 051f e5fe | | Load 0x2,-0x2 0520 8212 | | Call 0x1,0x12 0521 027a | z | Execute Discrete,Less_Equal 0522 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0523 e001 | | Load 0x0,0x1 0524 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0525 0257 | W | Execute Discrete,Raise 0526 0000 0000 | | .XXX[0x2] 0528 ; -------------------------------------------------------------------------------------- 0528 ; SUBPROGRAM 0528 ; -------------------------------------------------------------------------------------- 0528 052b | + | .CONST 0x052b ; Address of begin 0529 0004 | | .CONST 0x0004 ; Address of exception handler 052a 0001 | | .CONST 0x0001 ; Number of locals 052b BODY_0528: 052b INIT_0528: 052b 00da | | Load_Top At_Offset_2 052c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 052d e5fe | | Load 0x2,-0x2 052e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 052f 027f | | Execute Discrete,Equal 0530 681a |h | Jump_Zero 0x54b 0531 00da | | Load_Top At_Offset_2 0532 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0533 4607 |F | Jump_Case 0x8 0534 7807 |x | Jump 0x53c ; case 0x0 0535 7806 |x | Jump 0x53c ; case 0x1 0536 7805 |x | Jump 0x53c ; case 0x2 0537 7804 |x | Jump 0x53c ; case 0x3 0538 7803 |x | Jump 0x53c ; case 0x4 0539 780b |x | Jump 0x545 ; case 0x5 053a 7804 |x | Jump 0x53f ; case 0x6 053b 7800 |x | Jump 0x53c ; case 0x7 053c e001 | | Load 0x0,0x1 053d 1b48 | H | Execute Package,Field_Read,Field_Number 0x48 053e 0257 | W | Execute Discrete,Raise 053f 00da | | Load_Top At_Offset_2 0540 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0541 e5fe | | Load 0x2,-0x2 0542 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0543 027d | } | Execute Discrete,Greater 0544 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0545 00da | | Load_Top At_Offset_2 0546 8212 | | Call 0x1,0x12 0547 e5fe | | Load 0x2,-0x2 0548 8212 | | Call 0x1,0x12 0549 027d | } | Execute Discrete,Greater 054a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 054b e001 | | Load 0x0,0x1 054c 1b48 | H | Execute Package,Field_Read,Field_Number 0x48 054d 0257 | W | Execute Discrete,Raise 054e 0000 0000 | | .XXX[0x2] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0553 | S | .CONST 0x0553 ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0001 | | .CONST 0x0001 ; Number of locals 0553 BODY_0550: 0553 INIT_0550: 0553 00da | | Load_Top At_Offset_2 0554 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0555 e5fe | | Load 0x2,-0x2 0556 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0557 027f | | Execute Discrete,Equal 0558 681a |h | Jump_Zero 0x573 0559 00da | | Load_Top At_Offset_2 055a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 055b 4607 |F | Jump_Case 0x8 055c 7807 |x | Jump 0x564 ; case 0x0 055d 7806 |x | Jump 0x564 ; case 0x1 055e 7805 |x | Jump 0x564 ; case 0x2 055f 7804 |x | Jump 0x564 ; case 0x3 0560 7803 |x | Jump 0x564 ; case 0x4 0561 780b |x | Jump 0x56d ; case 0x5 0562 7804 |x | Jump 0x567 ; case 0x6 0563 7800 |x | Jump 0x564 ; case 0x7 0564 e001 | | Load 0x0,0x1 0565 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0566 0257 | W | Execute Discrete,Raise 0567 00da | | Load_Top At_Offset_2 0568 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0569 e5fe | | Load 0x2,-0x2 056a 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 056b 027b | { | Execute Discrete,Greater_Equal 056c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 056d 00da | | Load_Top At_Offset_2 056e 8212 | | Call 0x1,0x12 056f e5fe | | Load 0x2,-0x2 0570 8212 | | Call 0x1,0x12 0571 027b | { | Execute Discrete,Greater_Equal 0572 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0573 e001 | | Load 0x0,0x1 0574 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0575 0257 | W | Execute Discrete,Raise 0576 0000 0000 | | .XXX[0x2] 0578 ; -------------------------------------------------------------------------------------- 0578 ; SUBPROGRAM 0578 ; -------------------------------------------------------------------------------------- 0578 057b | { | .CONST 0x057b ; Address of begin 0579 0004 | | .CONST 0x0004 ; Address of exception handler 057a 0001 | | .CONST 0x0001 ; Number of locals 057b BODY_0578: 057b INIT_0578: 057b e5fd | | Load 0x2,-0x3 057c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 057d 0f05 | | Execute_Immediate Equal,0x5 057e 680a |h | Jump_Zero 0x589 057f e5ff | | Load 0x2,-0x1 0580 e210 | | Load 0x1,0x10 0581 0122 | " | Execute Any,Make_Root_Type 0582 011c | | Execute Any,Convert_Unchecked 0583 1c01 | | Execute_Immediate Run_Utility,0x1 0584 e002 | | Load 0x0,0x2 0585 180f | | Execute Package,Field_Execute,Field_Number 0xf 0586 e5fd | | Load 0x2,-0x3 0587 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 0588 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0589 e5fe | | Load 0x2,-0x2 058a 6810 |h | Jump_Zero 0x59b 058b 4805 |H | Short_Literal 0x5 058c e001 | | Load 0x0,0x1 058d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 058e 1c08 | | Execute_Immediate Run_Utility,0x8 058f e5ff | | Load 0x2,-0x1 0590 e210 | | Load 0x1,0x10 0591 0122 | " | Execute Any,Make_Root_Type 0592 011c | | Execute Any,Convert_Unchecked 0593 1c01 | | Execute_Immediate Run_Utility,0x1 0594 e002 | | Load 0x0,0x2 0595 180f | | Execute Package,Field_Execute,Field_Number 0xf 0596 00d9 | | Load_Top At_Offset_1 0597 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 0598 e5fd | | Load 0x2,-0x3 0599 016d | m | Execute Variant_Record,Structure_Write 059a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 059b e001 | | Load 0x0,0x1 059c 1b45 | E | Execute Package,Field_Read,Field_Number 0x45 059d 0257 | W | Execute Discrete,Raise 059e 0000 0000 | | .XXX[0x2] 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05a3 | | .CONST 0x05a3 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0001 | | .CONST 0x0001 ; Number of locals 05a3 BODY_05a0: 05a3 INIT_05a0: 05a3 e5fd | | Load 0x2,-0x3 05a4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05a5 0f06 | | Execute_Immediate Equal,0x6 05a6 6804 |h | Jump_Zero 0x5ab 05a7 e5ff | | Load 0x2,-0x1 05a8 e5fd | | Load 0x2,-0x3 05a9 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 05aa 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05ab e5fe | | Load 0x2,-0x2 05ac 680a |h | Jump_Zero 0x5b7 05ad 4806 |H | Short_Literal 0x6 05ae e001 | | Load 0x0,0x1 05af 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05b0 1c08 | | Execute_Immediate Run_Utility,0x8 05b1 e5ff | | Load 0x2,-0x1 05b2 00d9 | | Load_Top At_Offset_1 05b3 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 05b4 e5fd | | Load 0x2,-0x3 05b5 016d | m | Execute Variant_Record,Structure_Write 05b6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05b7 e001 | | Load 0x0,0x1 05b8 1b45 | E | Execute Package,Field_Read,Field_Number 0x45 05b9 0257 | W | Execute Discrete,Raise 05ba 0000 0000 | | .BLANK 0000[0x6] 05c0 ; -------------------------------------------------------------------------------------- 05c0 ; SUBPROGRAM 05c0 ; -------------------------------------------------------------------------------------- 05c0 05d4 | | .CONST 0x05d4 ; Address of begin 05c1 0004 | | .CONST 0x0004 ; Address of exception handler 05c2 0010 | | .CONST 0x0010 ; Number of locals 05c3 INIT_05c0: 05c3 029a 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call,Visible,Unelaborated 05c5 029a 061b | | Declare_Subprogram INIT_0618,For_Outer_Call,Visible,Unelaborated 05c7 029a 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call,Visible,Unelaborated 05c9 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated 05cb 00bf | | Action Accept_Activation 05cc 1d0d | | Execute_Immediate Reference_Lex_1,0xd 05cd 00c7 | | Action Elaborate_Subprogram 05ce 1d0e | | Execute_Immediate Reference_Lex_1,0xe 05cf 00c7 | | Action Elaborate_Subprogram 05d0 1d0f | | Execute_Immediate Reference_Lex_1,0xf 05d1 00c7 | | Action Elaborate_Subprogram 05d2 1d10 | | Execute_Immediate Reference_Lex_1,0x10 05d3 00c7 | | Action Elaborate_Subprogram 05d4 BODY_05c0: 05d4 00bc | | Action Signal_Activated 05d5 00bb | | Action Signal_Completion 05d6 0000 0000 | | .XXX[0x2] 05d8 ; -------------------------------------------------------------------------------------- 05d8 ; SUBPROGRAM 05d8 ; -------------------------------------------------------------------------------------- 05d8 05db | | .CONST 0x05db ; Address of begin 05d9 0004 | | .CONST 0x0004 ; Address of exception handler 05da 0001 | | .CONST 0x0001 ; Number of locals 05db BODY_05d8: 05db INIT_05d8: 05db 00da | | Load_Top At_Offset_2 05dc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05dd e5fe | | Load 0x2,-0x2 05de 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05df 027f | | Execute Discrete,Equal 05e0 6834 |h4 | Jump_Zero 0x615 05e1 00da | | Load_Top At_Offset_2 05e2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05e3 4607 |F | Jump_Case 0x8 05e4 780a |x | Jump 0x5ef ; case 0x0 05e5 780f |x | Jump 0x5f5 ; case 0x1 05e6 7814 |x | Jump 0x5fb ; case 0x2 05e7 7819 |x | Jump 0x601 ; case 0x3 05e8 781e |x | Jump 0x607 ; case 0x4 05e9 7802 |x | Jump 0x5ec ; case 0x5 05ea 7824 |x$ | Jump 0x60f ; case 0x6 05eb 7800 |x | Jump 0x5ec ; case 0x7 05ec e001 | | Load 0x0,0x1 05ed 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 05ee 0257 | W | Execute Discrete,Raise 05ef 00da | | Load_Top At_Offset_2 05f0 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 05f1 e5fe | | Load 0x2,-0x2 05f2 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 05f3 027c | | | Execute Discrete,Less 05f4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05f5 00da | | Load_Top At_Offset_2 05f6 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 05f7 e5fe | | Load 0x2,-0x2 05f8 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 05f9 027c | | | Execute Discrete,Less 05fa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05fb 00da | | Load_Top At_Offset_2 05fc 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 05fd e5fe | | Load 0x2,-0x2 05fe 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 05ff 0244 | D | Execute Float,Less 0600 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0601 00da | | Load_Top At_Offset_2 0602 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0603 e5fe | | Load 0x2,-0x2 0604 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0605 027c | | | Execute Discrete,Less 0606 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0607 00db | | Load_Top At_Offset_3 0608 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0609 00db | | Load_Top At_Offset_3 060a 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 060b e002 | | Load 0x0,0x2 060c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 060d 180d | | Execute Package,Field_Execute,Field_Number 0xd 060e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 060f 00da | | Load_Top At_Offset_2 0610 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0611 e5fe | | Load 0x2,-0x2 0612 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0613 027c | | | Execute Discrete,Less 0614 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0615 e001 | | Load 0x0,0x1 0616 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0617 0257 | W | Execute Discrete,Raise 0618 ; -------------------------------------------------------------------------------------- 0618 ; SUBPROGRAM 0618 ; -------------------------------------------------------------------------------------- 0618 061b | | .CONST 0x061b ; Address of begin 0619 0004 | | .CONST 0x0004 ; Address of exception handler 061a 0001 | | .CONST 0x0001 ; Number of locals 061b BODY_0618: 061b INIT_0618: 061b 00da | | Load_Top At_Offset_2 061c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 061d e5fe | | Load 0x2,-0x2 061e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 061f 027f | | Execute Discrete,Equal 0620 6834 |h4 | Jump_Zero 0x655 0621 00da | | Load_Top At_Offset_2 0622 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0623 4607 |F | Jump_Case 0x8 0624 780a |x | Jump 0x62f ; case 0x0 0625 780f |x | Jump 0x635 ; case 0x1 0626 7814 |x | Jump 0x63b ; case 0x2 0627 7819 |x | Jump 0x641 ; case 0x3 0628 781e |x | Jump 0x647 ; case 0x4 0629 7802 |x | Jump 0x62c ; case 0x5 062a 7824 |x$ | Jump 0x64f ; case 0x6 062b 7800 |x | Jump 0x62c ; case 0x7 062c e001 | | Load 0x0,0x1 062d 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 062e 0257 | W | Execute Discrete,Raise 062f 00da | | Load_Top At_Offset_2 0630 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0631 e5fe | | Load 0x2,-0x2 0632 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0633 027a | z | Execute Discrete,Less_Equal 0634 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0635 00da | | Load_Top At_Offset_2 0636 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0637 e5fe | | Load 0x2,-0x2 0638 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0639 027a | z | Execute Discrete,Less_Equal 063a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 063b 00da | | Load_Top At_Offset_2 063c 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 063d e5fe | | Load 0x2,-0x2 063e 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 063f 0242 | B | Execute Float,Less_Equal 0640 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0641 00da | | Load_Top At_Offset_2 0642 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0643 e5fe | | Load 0x2,-0x2 0644 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0645 027a | z | Execute Discrete,Less_Equal 0646 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0647 00db | | Load_Top At_Offset_3 0648 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0649 00db | | Load_Top At_Offset_3 064a 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 064b e002 | | Load 0x0,0x2 064c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 064d 180f | | Execute Package,Field_Execute,Field_Number 0xf 064e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 064f 00da | | Load_Top At_Offset_2 0650 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0651 e5fe | | Load 0x2,-0x2 0652 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0653 027a | z | Execute Discrete,Less_Equal 0654 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0655 e001 | | Load 0x0,0x1 0656 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 0657 0257 | W | Execute Discrete,Raise 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065b | [ | .CONST 0x065b ; Address of begin 0659 0004 | | .CONST 0x0004 ; Address of exception handler 065a 0001 | | .CONST 0x0001 ; Number of locals 065b BODY_0658: 065b INIT_0658: 065b 00da | | Load_Top At_Offset_2 065c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 065d e5fe | | Load 0x2,-0x2 065e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 065f 027f | | Execute Discrete,Equal 0660 6834 |h4 | Jump_Zero 0x695 0661 00da | | Load_Top At_Offset_2 0662 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0663 4607 |F | Jump_Case 0x8 0664 780a |x | Jump 0x66f ; case 0x0 0665 780f |x | Jump 0x675 ; case 0x1 0666 7814 |x | Jump 0x67b ; case 0x2 0667 7819 |x | Jump 0x681 ; case 0x3 0668 781e |x | Jump 0x687 ; case 0x4 0669 7802 |x | Jump 0x66c ; case 0x5 066a 7824 |x$ | Jump 0x68f ; case 0x6 066b 7800 |x | Jump 0x66c ; case 0x7 066c e001 | | Load 0x0,0x1 066d 1b42 | B | Execute Package,Field_Read,Field_Number 0x42 066e 0257 | W | Execute Discrete,Raise 066f 00da | | Load_Top At_Offset_2 0670 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0671 e5fe | | Load 0x2,-0x2 0672 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0673 027d | } | Execute Discrete,Greater 0674 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0675 00da | | Load_Top At_Offset_2 0676 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0677 e5fe | | Load 0x2,-0x2 0678 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0679 027d | } | Execute Discrete,Greater 067a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 067b 00da | | Load_Top At_Offset_2 067c 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 067d e5fe | | Load 0x2,-0x2 067e 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 067f 0245 | E | Execute Float,Greater 0680 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0681 00da | | Load_Top At_Offset_2 0682 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0683 e5fe | | Load 0x2,-0x2 0684 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0685 027d | } | Execute Discrete,Greater 0686 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0687 00db | | Load_Top At_Offset_3 0688 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0689 00db | | Load_Top At_Offset_3 068a 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 068b e002 | | Load 0x0,0x2 068c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 068d 180e | | Execute Package,Field_Execute,Field_Number 0xe 068e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 068f 00da | | Load_Top At_Offset_2 0690 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0691 e5fe | | Load 0x2,-0x2 0692 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0693 027d | } | Execute Discrete,Greater 0694 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0695 e001 | | Load 0x0,0x1 0696 1b42 | B | Execute Package,Field_Read,Field_Number 0x42 0697 0257 | W | Execute Discrete,Raise 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 069b | | .CONST 0x069b ; Address of begin 0699 0004 | | .CONST 0x0004 ; Address of exception handler 069a 0001 | | .CONST 0x0001 ; Number of locals 069b BODY_0698: 069b INIT_0698: 069b 00da | | Load_Top At_Offset_2 069c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 069d e5fe | | Load 0x2,-0x2 069e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 069f 027f | | Execute Discrete,Equal 06a0 6834 |h4 | Jump_Zero 0x6d5 06a1 00da | | Load_Top At_Offset_2 06a2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 06a3 4607 |F | Jump_Case 0x8 06a4 780a |x | Jump 0x6af ; case 0x0 06a5 780f |x | Jump 0x6b5 ; case 0x1 06a6 7814 |x | Jump 0x6bb ; case 0x2 06a7 7819 |x | Jump 0x6c1 ; case 0x3 06a8 781e |x | Jump 0x6c7 ; case 0x4 06a9 7802 |x | Jump 0x6ac ; case 0x5 06aa 7824 |x$ | Jump 0x6cf ; case 0x6 06ab 7800 |x | Jump 0x6ac ; case 0x7 06ac e001 | | Load 0x0,0x1 06ad 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 06ae 0257 | W | Execute Discrete,Raise 06af 00da | | Load_Top At_Offset_2 06b0 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 06b1 e5fe | | Load 0x2,-0x2 06b2 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 06b3 027b | { | Execute Discrete,Greater_Equal 06b4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06b5 00da | | Load_Top At_Offset_2 06b6 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 06b7 e5fe | | Load 0x2,-0x2 06b8 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 06b9 027b | { | Execute Discrete,Greater_Equal 06ba 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06bb 00da | | Load_Top At_Offset_2 06bc 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 06bd e5fe | | Load 0x2,-0x2 06be 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 06bf 0243 | C | Execute Float,Greater_Equal 06c0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06c1 00da | | Load_Top At_Offset_2 06c2 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 06c3 e5fe | | Load 0x2,-0x2 06c4 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 06c5 027b | { | Execute Discrete,Greater_Equal 06c6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06c7 00db | | Load_Top At_Offset_3 06c8 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 06c9 00db | | Load_Top At_Offset_3 06ca 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 06cb e002 | | Load 0x0,0x2 06cc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 06cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06ce 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06cf 00da | | Load_Top At_Offset_2 06d0 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 06d1 e5fe | | Load 0x2,-0x2 06d2 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 06d3 027b | { | Execute Discrete,Greater_Equal 06d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06d5 e001 | | Load 0x0,0x1 06d6 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 06d7 0257 | W | Execute Discrete,Raise 06d8 ; -------------------------------------------------------------------------------------- 06d8 ; STRING TABLE 06d8 ; -------------------------------------------------------------------------------------- 06d8 0012 | | .STRTAB 0x0012->0x06e1 ; "INTEGER_VALUE" 06d9 001d | | .STRTAB 0x001d->0x06e7 ; "BOOLEAN_VALUE" 06da 0028 | ( | .STRTAB 0x0028->0x06ee ; "FLOAT_VALUE" 06db 0031 | 1 | .STRTAB 0x0031->0x06f3 ; "CHARACTER_VALUE" 06dc 003e | > | .STRTAB 0x003e->0x06fb ; "STRING_VALUE" 06dd 0048 | H | .STRTAB 0x0048->0x0701 ; "CHECKED_ENUMERATION_VALUE" 06de 005f | _ | .STRTAB 0x005f->0x070d ; "UNCHECKED_ENUMERATION_VALUE" 06df 0078 | x | .STRTAB 0x0078->0x071b ; "CLASS_VALUE" 06e0 0081 | | .STREND 0x0081->0x0720 06e1 494e 5445 |INTE| .STRTAB_STRINGS 0721 0000 0000 | | .BLANK 0000[0x7] 0728 ; -------------------------------------------------------------------------------------- 0728 ; Debug Table 0728 ; -------------------------------------------------------------------------------------- 0728 0004 0001 | | .DEBUG4 0x0004,0x0001,0xe18c,0x0000,0x0001,0x002b 072e 000b 07da | | .DBG4T 0x000b,0x07da,0x8000,0x0000 0732 010e 080f | | .DBG4T 0x010e,0x080f,0x8000,0x0000 0736 014b 0000 | K | .DBG4T 0x014b,0x0000,0x0005,0x0000 073a 0173 0827 | s '| .DBG4T 0x0173,0x0827,0x0002,0x0000 073e 0183 082a | *| .DBG4T 0x0183,0x082a,0x0002,0x0000 0742 0193 082d | -| .DBG4T 0x0193,0x082d,0x0002,0x0000 0746 01a3 0830 | 0| .DBG4T 0x01a3,0x0830,0x0002,0x0000 074a 01b3 0833 | 3| .DBG4T 0x01b3,0x0833,0x0002,0x0000 074e 01c3 0836 | 6| .DBG4T 0x01c3,0x0836,0x0002,0x0000 0752 01d3 0839 | 9| .DBG4T 0x01d3,0x0839,0x0002,0x4000 0756 01fb 0847 | G| .DBG4T 0x01fb,0x0847,0x0002,0x4000 075a 020b 084f | O| .DBG4T 0x020b,0x084f,0x0002,0x4000 075e 022b 085d | + ]| .DBG4T 0x022b,0x085d,0x0002,0x4000 0762 0253 086b | S k| .DBG4T 0x0253,0x086b,0x0002,0x4000 0766 0283 087d | }| .DBG4T 0x0283,0x087d,0x0002,0x0000 076a 0293 0882 | | .DBG4T 0x0293,0x0882,0x0001,0x4000 076e 02c3 0897 | | .DBG4T 0x02c3,0x0897,0x0001,0x0000 0772 02db 089e | | .DBG4T 0x02db,0x089e,0x0001,0x0000 0776 02f3 08a5 | | .DBG4T 0x02f3,0x08a5,0x0001,0x0000 077a 031b 08ae | | .DBG4T 0x031b,0x08ae,0x0001,0x0000 077e 033b 08b5 | ; | .DBG4T 0x033b,0x08b5,0x0001,0x0000 0782 0353 08bc | S | .DBG4T 0x0353,0x08bc,0x0002,0x0000 0786 0363 08bf | c | .DBG4T 0x0363,0x08bf,0x0002,0x4000 078a 039b 0000 | | .DBG4T 0x039b,0x0000,0x0005,0x0000 078e 041b 08d3 | | .DBG4T 0x041b,0x08d3,0x4000,0x8000 0792 043d 08e7 | = | .DBG4T 0x043d,0x08e7,0x4000,0x0000 0796 045b 08f2 | [ | .DBG4T 0x045b,0x08f2,0x1002,0x0000 079a 047b 08f7 | { | .DBG4T 0x047b,0x08f7,0x1002,0x0000 079e 04ab 08fe | | .DBG4T 0x04ab,0x08fe,0x1001,0x0000 07a2 04bb 0903 | | .DBG4T 0x04bb,0x0903,0x1002,0x0000 07a6 04cb 0906 | | .DBG4T 0x04cb,0x0906,0x1002,0x0000 07aa 04db 0909 | | .DBG4T 0x04db,0x0909,0x1002,0x4000 07ae 0503 0917 | | .DBG4T 0x0503,0x0917,0x1002,0x4000 07b2 052b 0925 | + %| .DBG4T 0x052b,0x0925,0x1002,0x4000 07b6 0553 0933 | S 3| .DBG4T 0x0553,0x0933,0x1002,0x4000 07ba 057b 0941 | { A| .DBG4T 0x057b,0x0941,0x1004,0x0000 07be 05a3 0948 | H| .DBG4T 0x05a3,0x0948,0x1004,0x0000 07c2 05c3 094f | O| .DBG4T 0x05c3,0x094f,0x0000,0x8000 07c6 05cc 0959 | Y| .DBG4T 0x05cc,0x0959,0x0000,0x8000 07ca 05db 0963 | c| .DBG4T 0x05db,0x0963,0x0002,0x4000 07ce 061b 0979 | y| .DBG4T 0x061b,0x0979,0x0002,0x4000 07d2 065b 098f | [ | .DBG4T 0x065b,0x098f,0x0002,0x4000 07d6 069b 09a5 | | .DBG4T 0x069b,0x09a5,0x0002,0x4000 07da ; -------------------------------------------------------------------------------------- 07da ; Debug chain 07da ; -------------------------------------------------------------------------------------- 07da 0033 0000 | 3 | .DBGLEN 0x0033,0x0000 07dc 000b 0010 | | .DBGLNO 0x000b,0x0010,0x0055,0x0057,0x0059,0x005c,0x005f,0x0062,0x0065,0x0068,0x006b,0x006e,0x0071,0x0074,0x0077,0x007a,0x007d,0x0080,0x0083,0x0086,0x0089,0x008c,0x008f,0x0092,0x0099,0x009c,0x00a2,0x00a5,0x00a8,0x00ab,0x00ae,0x00b1,0x00b4,0x00b7,0x00ba,0x00bd,0x00c0,0x00c3,0x00c6,0x00c9,0x00cc,0x00cf,0x00d2,0x00d5,0x00d8,0x00db,0x00de,0x00e1,0x00e4,0x00fd,0x0105 080f ; -------------------------------------------------------------------------------------- 080f ; Debug chain 080f ; -------------------------------------------------------------------------------------- 080f 0016 0000 | | .DBGLEN 0x0016,0x0000 0811 010e 0110 | | .DBGLNO 0x010e,0x0110,0x0112,0x0114,0x0116,0x0118,0x011a,0x011c,0x011e,0x0120,0x0122,0x0124,0x0126,0x0128,0x012a,0x012c,0x012e,0x0130,0x0132,0x0134,0x013b,0x013d 0827 ; -------------------------------------------------------------------------------------- 0827 ; Debug chain 0827 ; -------------------------------------------------------------------------------------- 0827 0000 0001 | | .DBGLEN 0x0000,0x0001 0829 0173 | s | .DBGLNO 0x0173 082a ; -------------------------------------------------------------------------------------- 082a ; Debug chain 082a ; -------------------------------------------------------------------------------------- 082a 0000 0001 | | .DBGLEN 0x0000,0x0001 082c 0183 | | .DBGLNO 0x0183 082d ; -------------------------------------------------------------------------------------- 082d ; Debug chain 082d ; -------------------------------------------------------------------------------------- 082d 0000 0001 | | .DBGLEN 0x0000,0x0001 082f 0193 | | .DBGLNO 0x0193 0830 ; -------------------------------------------------------------------------------------- 0830 ; Debug chain 0830 ; -------------------------------------------------------------------------------------- 0830 0000 0001 | | .DBGLEN 0x0000,0x0001 0832 01a3 | | .DBGLNO 0x01a3 0833 ; -------------------------------------------------------------------------------------- 0833 ; Debug chain 0833 ; -------------------------------------------------------------------------------------- 0833 0000 0001 | | .DBGLEN 0x0000,0x0001 0835 01b3 | | .DBGLNO 0x01b3 0836 ; -------------------------------------------------------------------------------------- 0836 ; Debug chain 0836 ; -------------------------------------------------------------------------------------- 0836 0000 0001 | | .DBGLEN 0x0000,0x0001 0838 01c3 | | .DBGLNO 0x01c3 0839 ; -------------------------------------------------------------------------------------- 0839 ; Debug chain 0839 ; -------------------------------------------------------------------------------------- 0839 0000 0006 | | .DBGLEN 0x0000,0x0006 083b 01d3 01de | | .DBGLNO 0x01d3,0x01de,0x01e0,0x01e3,0x01eb,0x01ee 0841 0001 0006 | | .XXX[0x6] 0843 0002 0003 | | 0845 0004 0005 | | 0847 ; -------------------------------------------------------------------------------------- 0847 ; Debug chain 0847 ; -------------------------------------------------------------------------------------- 0847 0000 0003 | | .DBGLEN 0x0000,0x0003 0849 01fb 01ff | | .DBGLNO 0x01fb,0x01ff,0x0201 084c 0001 0003 | | .XXX[0x3] 084e 0002 | | 084f ; -------------------------------------------------------------------------------------- 084f ; Debug chain 084f ; -------------------------------------------------------------------------------------- 084f 0000 0006 | | .DBGLEN 0x0000,0x0006 0851 020b 0216 | | .DBGLNO 0x020b,0x0216,0x0218,0x021b,0x021f,0x0223 0857 0001 0006 | | .XXX[0x6] 0859 0002 0003 | | 085b 0004 0005 | | 085d ; -------------------------------------------------------------------------------------- 085d ; Debug chain 085d ; -------------------------------------------------------------------------------------- 085d 0000 0006 | | .DBGLEN 0x0000,0x0006 085f 022b 0236 | + 6| .DBGLNO 0x022b,0x0236,0x0238,0x023b,0x0242,0x0249 0865 0001 0006 | | .XXX[0x6] 0867 0002 0003 | | 0869 0004 0005 | | 086b ; -------------------------------------------------------------------------------------- 086b ; Debug chain 086b ; -------------------------------------------------------------------------------------- 086b 0000 0008 | | .DBGLEN 0x0000,0x0008 086d 0253 025e | S ^| .DBGLNO 0x0253,0x025e,0x0260,0x0265,0x026a,0x026f,0x0274,0x0279 0875 0001 0008 | | .XXX[0x8] 0877 0002 0003 | | 0879 0004 0005 | | 087b 0006 0007 | | 087d ; -------------------------------------------------------------------------------------- 087d ; Debug chain 087d ; -------------------------------------------------------------------------------------- 087d 0000 0003 | | .DBGLEN 0x0000,0x0003 087f 0283 0287 | | .DBGLNO 0x0283,0x0287,0x028c 0882 ; -------------------------------------------------------------------------------------- 0882 ; Debug chain 0882 ; -------------------------------------------------------------------------------------- 0882 0001 0009 | | .DBGLEN 0x0001,0x0009 0884 0293 0295 | | .DBGLNO 0x0293,0x0295,0x02a0,0x02a4,0x02a7,0x02a9,0x02ad,0x02b5,0x02b7,0x02b9 088e 0001 0004 | | .XXX[0x9] 0890 0002 0003 | | 0892 0006 0007 | | 0894 0008 0009 | | 0896 000a | | 0897 ; -------------------------------------------------------------------------------------- 0897 ; Debug chain 0897 ; -------------------------------------------------------------------------------------- 0897 0000 0005 | | .DBGLEN 0x0000,0x0005 0899 02c3 02c7 | | .DBGLNO 0x02c3,0x02c7,0x02cb,0x02cd,0x02d6 089e ; -------------------------------------------------------------------------------------- 089e ; Debug chain 089e ; -------------------------------------------------------------------------------------- 089e 0000 0005 | | .DBGLEN 0x0000,0x0005 08a0 02db 02df | | .DBGLNO 0x02db,0x02df,0x02e3,0x02e5,0x02ee 08a5 ; -------------------------------------------------------------------------------------- 08a5 ; Debug chain 08a5 ; -------------------------------------------------------------------------------------- 08a5 0000 0007 | | .DBGLEN 0x0000,0x0007 08a7 02f3 02f7 | | .DBGLNO 0x02f3,0x02f7,0x02fb,0x02ff,0x0307,0x0309,0x0312 08ae ; -------------------------------------------------------------------------------------- 08ae ; Debug chain 08ae ; -------------------------------------------------------------------------------------- 08ae 0000 0005 | | .DBGLEN 0x0000,0x0005 08b0 031b 031f | | .DBGLNO 0x031b,0x031f,0x0325,0x0327,0x0332 08b5 ; -------------------------------------------------------------------------------------- 08b5 ; Debug chain 08b5 ; -------------------------------------------------------------------------------------- 08b5 0000 0005 | | .DBGLEN 0x0000,0x0005 08b7 033b 033f | ; ?| .DBGLNO 0x033b,0x033f,0x0343,0x0345,0x034e 08bc ; -------------------------------------------------------------------------------------- 08bc ; Debug chain 08bc ; -------------------------------------------------------------------------------------- 08bc 0000 0001 | | .DBGLEN 0x0000,0x0001 08be 0353 | S | .DBGLNO 0x0353 08bf ; -------------------------------------------------------------------------------------- 08bf ; Debug chain 08bf ; -------------------------------------------------------------------------------------- 08bf 0000 0009 | | .DBGLEN 0x0000,0x0009 08c1 0363 036e | c n| .DBGLNO 0x0363,0x036e,0x0373,0x0378,0x037c,0x0382,0x0388,0x038d,0x0392 08ca 0001 0007 | | .XXX[0x9] 08cc 0002 0003 | | 08ce 0004 0005 | | 08d0 0006 0008 | | 08d2 0009 | | 08d3 ; -------------------------------------------------------------------------------------- 08d3 ; Debug chain 08d3 ; -------------------------------------------------------------------------------------- 08d3 0009 0000 | | .DBGLEN 0x0009,0x0000 08d5 041b 041d | | .DBGLNO 0x041b,0x041d,0x0427,0x042a,0x042d,0x0430,0x0433,0x0436,0x0439 08de 0001 0002 | | .XXX[0x9] 08e0 0003 0004 | | 08e2 0005 0007 | | 08e4 0008 0009 | | 08e6 000a | | 08e7 ; -------------------------------------------------------------------------------------- 08e7 ; Debug chain 08e7 ; -------------------------------------------------------------------------------------- 08e7 0009 0000 | | .DBGLEN 0x0009,0x0000 08e9 043d 043f | = ?| .DBGLNO 0x043d,0x043f,0x0441,0x0443,0x0445,0x0447,0x0449,0x044b,0x044d 08f2 ; -------------------------------------------------------------------------------------- 08f2 ; Debug chain 08f2 ; -------------------------------------------------------------------------------------- 08f2 0000 0003 | | .DBGLEN 0x0000,0x0003 08f4 045b 045d | [ ]| .DBGLNO 0x045b,0x045d,0x046b 08f7 ; -------------------------------------------------------------------------------------- 08f7 ; Debug chain 08f7 ; -------------------------------------------------------------------------------------- 08f7 0000 0005 | | .DBGLEN 0x0000,0x0005 08f9 047b 047f | { | .DBGLNO 0x047b,0x047f,0x048c,0x0490,0x049e 08fe ; -------------------------------------------------------------------------------------- 08fe ; Debug chain 08fe ; -------------------------------------------------------------------------------------- 08fe 0000 0003 | | .DBGLEN 0x0000,0x0003 0900 04af 04b1 | | .DBGLNO 0x04af,0x04b1,0x04b3 0903 ; -------------------------------------------------------------------------------------- 0903 ; Debug chain 0903 ; -------------------------------------------------------------------------------------- 0903 0000 0001 | | .DBGLEN 0x0000,0x0001 0905 04bb | | .DBGLNO 0x04bb 0906 ; -------------------------------------------------------------------------------------- 0906 ; Debug chain 0906 ; -------------------------------------------------------------------------------------- 0906 0000 0001 | | .DBGLEN 0x0000,0x0001 0908 04cb | | .DBGLNO 0x04cb 0909 ; -------------------------------------------------------------------------------------- 0909 ; Debug chain 0909 ; -------------------------------------------------------------------------------------- 0909 0000 0006 | | .DBGLEN 0x0000,0x0006 090b 04db 04e1 | | .DBGLNO 0x04db,0x04e1,0x04ec,0x04ef,0x04f5,0x04fb 0911 0001 0002 | | .XXX[0x6] 0913 0005 0003 | | 0915 0004 0006 | | 0917 ; -------------------------------------------------------------------------------------- 0917 ; Debug chain 0917 ; -------------------------------------------------------------------------------------- 0917 0000 0006 | | .DBGLEN 0x0000,0x0006 0919 0503 0509 | | .DBGLNO 0x0503,0x0509,0x0514,0x0517,0x051d,0x0523 091f 0001 0002 | | .XXX[0x6] 0921 0005 0003 | | 0923 0004 0006 | | 0925 ; -------------------------------------------------------------------------------------- 0925 ; Debug chain 0925 ; -------------------------------------------------------------------------------------- 0925 0000 0006 | | .DBGLEN 0x0000,0x0006 0927 052b 0531 | + 1| .DBGLNO 0x052b,0x0531,0x053c,0x053f,0x0545,0x054b 092d 0001 0002 | | .XXX[0x6] 092f 0005 0003 | | 0931 0004 0006 | | 0933 ; -------------------------------------------------------------------------------------- 0933 ; Debug chain 0933 ; -------------------------------------------------------------------------------------- 0933 0000 0006 | | .DBGLEN 0x0000,0x0006 0935 0553 0559 | S Y| .DBGLNO 0x0553,0x0559,0x0564,0x0567,0x056d,0x0573 093b 0001 0002 | | .XXX[0x6] 093d 0005 0003 | | 093f 0004 0006 | | 0941 ; -------------------------------------------------------------------------------------- 0941 ; Debug chain 0941 ; -------------------------------------------------------------------------------------- 0941 0000 0005 | | .DBGLEN 0x0000,0x0005 0943 057b 057f | { | .DBGLNO 0x057b,0x057f,0x0589,0x058b,0x059b 0948 ; -------------------------------------------------------------------------------------- 0948 ; Debug chain 0948 ; -------------------------------------------------------------------------------------- 0948 0000 0005 | | .DBGLEN 0x0000,0x0005 094a 05a3 05a7 | | .DBGLNO 0x05a3,0x05a7,0x05ab,0x05ad,0x05b7 094f ; -------------------------------------------------------------------------------------- 094f ; Debug chain 094f ; -------------------------------------------------------------------------------------- 094f 0004 0000 | | .DBGLEN 0x0004,0x0000 0951 05c3 05c5 | | .DBGLNO 0x05c3,0x05c5,0x05c7,0x05c9 0955 0002 0003 | | .XXX[0x4] 0957 0004 0005 | | 0959 ; -------------------------------------------------------------------------------------- 0959 ; Debug chain 0959 ; -------------------------------------------------------------------------------------- 0959 0004 0000 | | .DBGLEN 0x0004,0x0000 095b 05cc 05ce | | .DBGLNO 0x05cc,0x05ce,0x05d0,0x05d2 095f 0002 0003 | | .XXX[0x4] 0961 0004 0005 | | 0963 ; -------------------------------------------------------------------------------------- 0963 ; Debug chain 0963 ; -------------------------------------------------------------------------------------- 0963 0000 000a | | .DBGLEN 0x0000,0x000a 0965 05db 05e1 | | .DBGLNO 0x05db,0x05e1,0x05ec,0x05ef,0x05f5,0x05fb,0x0601,0x0607,0x060f,0x0615 096f 0001 0002 | | .XXX[0xa] 0971 0009 0003 | | 0973 0004 0005 | | 0975 0006 0007 | | 0977 0008 000a | | 0979 ; -------------------------------------------------------------------------------------- 0979 ; Debug chain 0979 ; -------------------------------------------------------------------------------------- 0979 0000 000a | | .DBGLEN 0x0000,0x000a 097b 061b 0621 | !| .DBGLNO 0x061b,0x0621,0x062c,0x062f,0x0635,0x063b,0x0641,0x0647,0x064f,0x0655 0985 0001 0002 | | .XXX[0xa] 0987 0009 0003 | | 0989 0004 0005 | | 098b 0006 0007 | | 098d 0008 000a | | 098f ; -------------------------------------------------------------------------------------- 098f ; Debug chain 098f ; -------------------------------------------------------------------------------------- 098f 0000 000a | | .DBGLEN 0x0000,0x000a 0991 065b 0661 | [ a| .DBGLNO 0x065b,0x0661,0x066c,0x066f,0x0675,0x067b,0x0681,0x0687,0x068f,0x0695 099b 0001 0002 | | .XXX[0xa] 099d 0009 0003 | | 099f 0004 0005 | | 09a1 0006 0007 | | 09a3 0008 000a | | 09a5 ; -------------------------------------------------------------------------------------- 09a5 ; Debug chain 09a5 ; -------------------------------------------------------------------------------------- 09a5 0000 000a | | .DBGLEN 0x0000,0x000a 09a7 069b 06a1 | | .DBGLNO 0x069b,0x06a1,0x06ac,0x06af,0x06b5,0x06bb,0x06c1,0x06c7,0x06cf,0x06d5 09b1 0001 0002 | | .XXX[0xa] 09b3 0009 0003 | | 09b5 0004 0005 | | 09b7 0006 0007 | | 09b9 0008 000a | | 09bb 0000 0000 | | .BLANK 0000[0x45]