|
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_05d0e3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 06b8 | | .CONST 0x06b8 ; 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 00dc | | .CONST 0x00dc ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 003c | < | .CONST 0x003c ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4807 |H | Short_Literal 0x7 000d 029f 00e3 | | Declare_Subprogram INIT_00e0,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 0333 | 3| Declare_Subprogram INIT_0330,For_Call 0018 00d9 | | Load_Top At_Offset_1 0019 012a | * | Execute Any,Change_Utility 001a 0007 | | Action Break_Optional 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 001f 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 0021 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 0023 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 0025 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0027 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated 0029 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated 002b 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 002d 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated 002f 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0031 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0033 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 0035 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 0037 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 0039 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated 003b 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 003d 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated 003f 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated 0041 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated 0043 4800 |H | Short_Literal 0x0 0044 0093 0553 | S| push_full_address INIT_0550 0046 02a0 | | Declare_Subprogram Null_Subprogram 0047 038f | | Declare_Type Package,Defined,Visible 0048 0386 | | Declare_Variable Package,Visible 0049 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated 004b 4804 |H | Short_Literal 0x4 004c 0093 03bb | | push_full_address INIT_03b8 004e 02a0 | | Declare_Subprogram Null_Subprogram 004f 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 0050 e002 | | Load 0x0,0x2 0051 0129 | ) | Execute Any,Make_Visible 0052 e003 | | Load 0x0,0x3 0053 0129 | ) | Execute Any,Make_Visible 0054 e004 | | Load 0x0,0x4 0055 0129 | ) | Execute Any,Make_Visible 0056 e005 | | Load 0x0,0x5 0057 0129 | ) | Execute Any,Make_Visible 0058 e006 | | Load 0x0,0x6 0059 0129 | ) | Execute Any,Make_Visible 005a e007 | | Load 0x0,0x7 005b 0129 | ) | Execute Any,Make_Visible 005c e008 | | Load 0x0,0x8 005d 0129 | ) | Execute Any,Make_Visible 005e e009 | | Load 0x0,0x9 005f 0129 | ) | Execute Any,Make_Visible 0060 e00a | | Load 0x0,0xa 0061 0129 | ) | Execute Any,Make_Visible 0062 e00b | | Load 0x0,0xb 0063 0129 | ) | Execute Any,Make_Visible 0064 e00c | | Load 0x0,0xc 0065 0129 | ) | Execute Any,Make_Visible 0066 e00d | | Load 0x0,0xd 0067 0129 | ) | Execute Any,Make_Visible 0068 e00e | | Load 0x0,0xe 0069 0129 | ) | Execute Any,Make_Visible 006a e00f | | Load 0x0,0xf 006b 0129 | ) | Execute Any,Make_Visible 006c e010 | | Load 0x0,0x10 006d 0129 | ) | Execute Any,Make_Visible 006e e011 | | Load 0x0,0x11 006f 0129 | ) | Execute Any,Make_Visible 0070 e012 | | Load 0x0,0x12 0071 0129 | ) | Execute Any,Make_Visible 0072 e013 | | Load 0x0,0x13 0073 0129 | ) | Execute Any,Make_Visible 0074 e014 | | Load 0x0,0x14 0075 0129 | ) | Execute Any,Make_Visible 0076 e015 | | Load 0x0,0x15 0077 0129 | ) | Execute Any,Make_Visible 0078 e016 | | Load 0x0,0x16 0079 0129 | ) | Execute Any,Make_Visible 007a e017 | | Load 0x0,0x17 007b 0129 | ) | Execute Any,Make_Visible 007c 4801 |H | Short_Literal 0x1 007d 00e2 | | Load_Encached Integer_Cache 007e 4801 |H | Short_Literal 0x1 007f 00e6 | | Load_Encached Float_Cache 0080 4801 |H | Short_Literal 0x1 0081 00e1 | | Load_Encached Boolean_Cache 0082 4801 |H | Short_Literal 0x1 0083 00e8 | | Load_Encached Character_Cache 0084 4801 |H | Short_Literal 0x1 0085 e018 | | Load 0x0,0x18 0086 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0087 4801 |H | Short_Literal 0x1 0088 e001 | | Load 0x0,0x1 0089 1b0d | | Execute Package,Field_Read,Field_Number 0xd 008a 4801 |H | Short_Literal 0x1 008b 00e2 | | Load_Encached Integer_Cache 008c 4801 |H | Short_Literal 0x1 008d e018 | | Load 0x0,0x18 008e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 008f 029f 0333 | 3| Declare_Subprogram INIT_0330,For_Call 0091 4808 |H | Short_Literal 0x8 0092 4800 |H | Short_Literal 0x0 0093 e20e | | Load 0x1,0xe 0094 0307 | | Complete_Type Variant_Record,By_Defining 0095 4801 |H | Short_Literal 0x1 0096 e20e | | Load 0x1,0xe 0097 1c08 | | Execute_Immediate Run_Utility,0x8 0098 4801 |H | Short_Literal 0x1 0099 00d9 | | Load_Top At_Offset_1 009a 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 009b 0129 | ) | Execute Any,Make_Visible 009c c20f | | Store 0x1,0xf 009d 4801 |H | Short_Literal 0x1 009e e20e | | Load 0x1,0xe 009f 1c08 | | Execute_Immediate Run_Utility,0x8 00a0 4800 |H | Short_Literal 0x0 00a1 00d9 | | Load_Top At_Offset_1 00a2 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 00a3 0129 | ) | Execute Any,Make_Visible 00a4 c210 | | Store 0x1,0x10 00a5 00bf | | Action Accept_Activation 00a6 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00a7 00c7 | | Action Elaborate_Subprogram 00a8 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00a9 00c7 | | Action Elaborate_Subprogram 00aa 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00ab 00c7 | | Action Elaborate_Subprogram 00ac 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00ad 00c7 | | Action Elaborate_Subprogram 00ae 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00af 00c7 | | Action Elaborate_Subprogram 00b0 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00b1 00c7 | | Action Elaborate_Subprogram 00b2 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00b3 00c7 | | Action Elaborate_Subprogram 00b4 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00b5 00c7 | | Action Elaborate_Subprogram 00b6 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00b7 00c7 | | Action Elaborate_Subprogram 00b8 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00b9 00c7 | | Action Elaborate_Subprogram 00ba 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00bb 00c7 | | Action Elaborate_Subprogram 00bc 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00bd 00c7 | | Action Elaborate_Subprogram 00be 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00bf 00c7 | | Action Elaborate_Subprogram 00c0 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00c1 00c7 | | Action Elaborate_Subprogram 00c2 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00c3 00c7 | | Action Elaborate_Subprogram 00c4 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00c5 00c7 | | Action Elaborate_Subprogram 00c6 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00c7 00c7 | | Action Elaborate_Subprogram 00c8 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00c9 00c7 | | Action Elaborate_Subprogram 00ca 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 00cb 00c7 | | Action Elaborate_Subprogram 00cc 00b6 | | Action Make_Scope 00cd e018 | | Load 0x0,0x18 00ce 4802 |H | Short_Literal 0x2 00cf e224 | $ | Load 0x1,0x24 00d0 020e | | Execute Module,Augment_Imports 00d1 e224 | $ | Load 0x1,0x24 00d2 020f | | Execute Module,Activate 00d3 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 00d4 00c7 | | Action Elaborate_Subprogram 00d5 00b6 | | Action Make_Scope 00d6 e018 | | Load 0x0,0x18 00d7 4802 |H | Short_Literal 0x2 00d8 e226 | & | Load 0x1,0x26 00d9 020e | | Execute Module,Augment_Imports 00da e226 | & | Load 0x1,0x26 00db 020d | | Execute Module,Elaborate 00dc BODY_0008: 00dc 00bc | | Action Signal_Activated 00dd 00bb | | Action Signal_Completion 00de 0000 0000 | | .XXX[0x2] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e3 | | .CONST 0x00e3 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0001 | | .CONST 0x0001 ; Number of locals 00e3 BODY_00e0: 00e3 INIT_00e0: 00e3 4607 |F | Jump_Case 0x8 00e4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00e5 7806 |x | Jump 0xec ; case 0x1 00e6 7809 |x | Jump 0xf0 ; case 0x2 00e7 780d |x | Jump 0xf5 ; case 0x3 00e8 7810 |x | Jump 0xf9 ; case 0x4 00e9 7811 |x | Jump 0xfb ; case 0x5 00ea 7812 |x | Jump 0xfd ; case 0x6 00eb 7815 |x | Jump 0x101 ; case 0x7 00ec 00da | | Load_Top At_Offset_2 00ed 0091 0668 | h| Action Push_String_Extended_Indexed,0x668 ; "INTEGER_VALUE" 00ef 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00f0 00db | | Load_Top At_Offset_3 00f1 00db | | Load_Top At_Offset_3 00f2 00e0 | | Load_Encached Standard_Cache 00f3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00f4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00f5 00da | | Load_Top At_Offset_2 00f6 00e0 | | Load_Encached Standard_Cache 00f7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00f8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00f9 00db | | Load_Top At_Offset_3 00fa 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00fb 00db | | Load_Top At_Offset_3 00fc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00fd e20d | | Load 0x1,0xd 00fe 00dc | | Load_Top At_Offset_4 00ff 0267 | g | Execute Discrete,Predecessor 0100 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0101 e20d | | Load 0x1,0xd 0102 00dc | | Load_Top At_Offset_4 0103 0268 | h | Execute Discrete,Successor 0104 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0105 0000 0000 | | .XXX[0x3] 0107 0000 | | 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010b | | .CONST 0x010b ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0001 | | .CONST 0x0001 ; Number of locals 010b BODY_0108: 010b INIT_0108: 010b 4800 |H | Short_Literal 0x0 010c e20e | | Load 0x1,0xe 010d 1c08 | | Execute_Immediate Run_Utility,0x8 010e 00db | | Load_Top At_Offset_3 010f 00d9 | | Load_Top At_Offset_1 0110 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0111 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0112 0000 0000 | | .BLANK 0000[0x6] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 4802 |H | Short_Literal 0x2 011c e20e | | Load 0x1,0xe 011d 1c08 | | Execute_Immediate Run_Utility,0x8 011e 00db | | Load_Top At_Offset_3 011f 00d9 | | Load_Top At_Offset_1 0120 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 0121 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0122 0000 0000 | | .BLANK 0000[0x6] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012b | + | .CONST 0x012b ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0001 | | .CONST 0x0001 ; Number of locals 012b BODY_0128: 012b INIT_0128: 012b 4801 |H | Short_Literal 0x1 012c e20e | | Load 0x1,0xe 012d 1c08 | | Execute_Immediate Run_Utility,0x8 012e 00db | | Load_Top At_Offset_3 012f 00d9 | | Load_Top At_Offset_1 0130 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 0131 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0132 0000 0000 | | .BLANK 0000[0x6] 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 4803 |H | Short_Literal 0x3 013c e20e | | Load 0x1,0xe 013d 1c08 | | Execute_Immediate Run_Utility,0x8 013e 00db | | Load_Top At_Offset_3 013f 00d9 | | Load_Top At_Offset_1 0140 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 0141 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0142 0000 0000 | | .BLANK 0000[0x6] 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 4804 |H | Short_Literal 0x4 014c e20e | | Load 0x1,0xe 014d 1c08 | | Execute_Immediate Run_Utility,0x8 014e 00db | | Load_Top At_Offset_3 014f e018 | | Load 0x0,0x18 0150 180f | | Execute Package,Field_Execute,Field_Number 0xf 0151 00d9 | | Load_Top At_Offset_1 0152 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 0153 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0154 0000 0000 | | .BLANK 0000[0x4] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b 4807 |H | Short_Literal 0x7 015c e20e | | Load 0x1,0xe 015d 1c08 | | Execute_Immediate Run_Utility,0x8 015e 00db | | Load_Top At_Offset_3 015f 00d9 | | Load_Top At_Offset_1 0160 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 0161 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0162 0000 0000 | | .BLANK 0000[0x6] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016b | k | .CONST 0x016b ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0001 | | .CONST 0x0001 ; Number of locals 016b BODY_0168: 016b INIT_0168: 016b 00da | | Load_Top At_Offset_2 016c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 016d 4607 |F | Jump_Case 0x8 016e 7809 |x | Jump 0x178 ; case 0x0 016f 780b |x | Jump 0x17b ; case 0x1 0170 7815 |x | Jump 0x186 ; case 0x2 0171 7804 |x | Jump 0x176 ; case 0x3 0172 7803 |x | Jump 0x176 ; case 0x4 0173 7802 |x | Jump 0x176 ; case 0x5 0174 780e |x | Jump 0x183 ; case 0x6 0175 7800 |x | Jump 0x176 ; case 0x7 0176 e227 | ' | Load 0x1,0x27 0177 0257 | W | Execute Discrete,Raise 0178 00da | | Load_Top At_Offset_2 0179 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 017a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 017b 00da | | Load_Top At_Offset_2 017c 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 017d 00d8 | | Load_Top At_Offset_0 017e 00e2 | | Load_Encached Integer_Cache 017f 0260 | ` | Execute Discrete,In_Type 0180 7001 |p | Jump_Nonzero 0x182 0181 0801 | | Execute_Immediate Raise,0x1 0182 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0183 00da | | Load_Top At_Offset_2 0184 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0185 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0186 00da | | Load_Top At_Offset_2 0187 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0188 0235 | 5 | Execute Float,Round_To_Discrete 0189 00e2 | | Load_Encached Integer_Cache 018a 025e | ^ | Execute Discrete,Convert 018b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018c 0000 0000 | | .BLANK 0000[0x4] 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 00da | | Load_Top At_Offset_2 0194 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0195 0f01 | | Execute_Immediate Equal,0x1 0196 7002 |p | Jump_Nonzero 0x199 0197 e228 | ( | Load 0x1,0x28 0198 0257 | W | Execute Discrete,Raise 0199 00da | | Load_Top At_Offset_2 019a 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 019b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019c 0000 0000 | | .BLANK 0000[0x4] 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 00da | | Load_Top At_Offset_2 01a4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 01a5 4607 |F | Jump_Case 0x8 01a6 780c |x | Jump 0x1b3 ; case 0x0 01a7 780f |x | Jump 0x1b7 ; case 0x1 01a8 7807 |x | Jump 0x1b0 ; case 0x2 01a9 7804 |x | Jump 0x1ae ; case 0x3 01aa 7803 |x | Jump 0x1ae ; case 0x4 01ab 7802 |x | Jump 0x1ae ; case 0x5 01ac 780e |x | Jump 0x1bb ; case 0x6 01ad 7800 |x | Jump 0x1ae ; case 0x7 01ae e229 | ) | Load 0x1,0x29 01af 0257 | W | Execute Discrete,Raise 01b0 00da | | Load_Top At_Offset_2 01b1 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 01b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b3 00da | | Load_Top At_Offset_2 01b4 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 01b5 0237 | 7 | Execute Float,Convert_From_Discrete 01b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b7 00da | | Load_Top At_Offset_2 01b8 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 01b9 0237 | 7 | Execute Float,Convert_From_Discrete 01ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bb 00da | | Load_Top At_Offset_2 01bc 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 01bd 0237 | 7 | Execute Float,Convert_From_Discrete 01be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bf 0000 | | .XXX[0x1] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 00da | | Load_Top At_Offset_2 01c4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 01c5 4607 |F | Jump_Case 0x8 01c6 7807 |x | Jump 0x1ce ; case 0x0 01c7 7806 |x | Jump 0x1ce ; case 0x1 01c8 7805 |x | Jump 0x1ce ; case 0x2 01c9 7806 |x | Jump 0x1d0 ; case 0x3 01ca 7808 |x | Jump 0x1d3 ; case 0x4 01cb 7802 |x | Jump 0x1ce ; case 0x5 01cc 7801 |x | Jump 0x1ce ; case 0x6 01cd 7800 |x | Jump 0x1ce ; case 0x7 01ce e22a | * | Load 0x1,0x2a 01cf 0257 | W | Execute Discrete,Raise 01d0 00da | | Load_Top At_Offset_2 01d1 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 01d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d3 00da | | Load_Top At_Offset_2 01d4 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 01d5 e018 | | Load 0x0,0x18 01d6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01d7 01db | | Execute Vector,Length 01d8 0f01 | | Execute_Immediate Equal,0x1 01d9 6807 |h | Jump_Zero 0x1e1 01da 4801 |H | Short_Literal 0x1 01db 00db | | Load_Top At_Offset_3 01dc 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 01dd e018 | | Load 0x0,0x18 01de 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01df 01d7 | | Execute Vector,Field_Read 01e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e1 e22a | * | Load 0x1,0x2a 01e2 0257 | W | Execute Discrete,Raise 01e3 0000 0000 | | .BLANK 0000[0x5] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 00da | | Load_Top At_Offset_2 01ec 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 01ed 4607 |F | Jump_Case 0x8 01ee 7813 |x | Jump 0x202 ; case 0x0 01ef 7821 |x! | Jump 0x211 ; case 0x1 01f0 7805 |x | Jump 0x1f6 ; case 0x2 01f1 780b |x | Jump 0x1fd ; case 0x3 01f2 7805 |x | Jump 0x1f8 ; case 0x4 01f3 7818 |x | Jump 0x20c ; case 0x5 01f4 7812 |x | Jump 0x207 ; case 0x6 01f5 7800 |x | Jump 0x1f6 ; case 0x7 01f6 e22b | + | Load 0x1,0x2b 01f7 0257 | W | Execute Discrete,Raise 01f8 00da | | Load_Top At_Offset_2 01f9 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 01fa e018 | | Load 0x0,0x18 01fb 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01fc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01fd 00da | | Load_Top At_Offset_2 01fe 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 01ff 00ea | | Load_Encached Null_String_Cache 0200 01cb | | Execute Vector,Append 0201 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0202 00da | | Load_Top At_Offset_2 0203 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0204 00e0 | | Load_Encached Standard_Cache 0205 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0206 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0207 00da | | Load_Top At_Offset_2 0208 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0209 00e0 | | Load_Encached Standard_Cache 020a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 020b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 020c 00da | | Load_Top At_Offset_2 020d 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 020e e018 | | Load 0x0,0x18 020f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0210 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0211 00da | | Load_Top At_Offset_2 0212 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0213 00e1 | | Load_Encached Boolean_Cache 0214 011c | | Execute Any,Convert_Unchecked 0215 1c01 | | Execute_Immediate Run_Utility,0x1 0216 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0217 0000 | | .XXX[0x1] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021b | | .CONST 0x021b ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0001 | | .CONST 0x0001 ; Number of locals 021b BODY_0218: 021b INIT_0218: 021b 00da | | Load_Top At_Offset_2 021c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 021d 0f07 | | Execute_Immediate Equal,0x7 021e 6805 |h | Jump_Zero 0x224 021f 00da | | Load_Top At_Offset_2 0220 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 0221 02fd | | Declare_Variable Variant_Record,Duplicate 0222 00cd | | Action Spare6_Action 0223 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0224 e22c | , | Load 0x1,0x2c 0225 0257 | W | Execute Discrete,Raise 0226 0000 0000 | | .XXX[0x2] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022d | - | .CONST 0x022d ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0002 | | .CONST 0x0002 ; Number of locals 022b INIT_0228: 022b 00e1 | | Load_Encached Boolean_Cache 022c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 022d BODY_0228: 022d e5fd | | Load 0x2,-0x3 022e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 022f 4607 |F | Jump_Case 0x8 0230 780b |x | Jump 0x23c ; case 0x0 0231 780f |x | Jump 0x241 ; case 0x1 0232 780e |x | Jump 0x241 ; case 0x2 0233 780d |x | Jump 0x241 ; case 0x3 0234 780c |x | Jump 0x241 ; case 0x4 0235 780b |x | Jump 0x241 ; case 0x5 0236 7801 |x | Jump 0x238 ; case 0x6 0237 7809 |x | Jump 0x241 ; case 0x7 0238 00db | | Load_Top At_Offset_3 0239 e5fd | | Load 0x2,-0x3 023a 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 023b 7805 |x | Jump 0x241 023c 00db | | Load_Top At_Offset_3 023d e5fd | | Load 0x2,-0x3 023e 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 023f 4801 |H | Short_Literal 0x1 0240 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0241 00d8 | | Load_Top At_Offset_0 0242 700c |p | Jump_Nonzero 0x24f 0243 e5fe | | Load 0x2,-0x2 0244 680a |h | Jump_Zero 0x24f 0245 4800 |H | Short_Literal 0x0 0246 e20e | | Load 0x1,0xe 0247 1c08 | | Execute_Immediate Run_Utility,0x8 0248 e5ff | | Load 0x2,-0x1 0249 00d9 | | Load_Top At_Offset_1 024a 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 024b e5fd | | Load 0x2,-0x3 024c 016d | m | Execute Variant_Record,Structure_Write 024d 4801 |H | Short_Literal 0x1 024e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 024f 00d8 | | Load_Top At_Offset_0 0250 7002 |p | Jump_Nonzero 0x253 0251 e22d | - | Load 0x1,0x2d 0252 0257 | W | Execute Discrete,Raise 0253 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0254 0000 0000 | | .BLANK 0000[0x4] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b e5fd | | Load 0x2,-0x3 025c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 025d 0f01 | | Execute_Immediate Equal,0x1 025e 6804 |h | Jump_Zero 0x263 025f 00da | | Load_Top At_Offset_2 0260 e5fd | | Load 0x2,-0x3 0261 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 0262 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0263 00db | | Load_Top At_Offset_3 0264 6809 |h | Jump_Zero 0x26e 0265 4801 |H | Short_Literal 0x1 0266 e20e | | Load 0x1,0xe 0267 1c08 | | Execute_Immediate Run_Utility,0x8 0268 00db | | Load_Top At_Offset_3 0269 00d9 | | Load_Top At_Offset_1 026a 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 026b e5fd | | Load 0x2,-0x3 026c 016d | m | Execute Variant_Record,Structure_Write 026d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 026e e22e | . | Load 0x1,0x2e 026f 0257 | W | Execute Discrete,Raise 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0273 | s | .CONST 0x0273 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0001 | | .CONST 0x0001 ; Number of locals 0273 BODY_0270: 0273 INIT_0270: 0273 e5fd | | Load 0x2,-0x3 0274 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0275 0f02 | | Execute_Immediate Equal,0x2 0276 6804 |h | Jump_Zero 0x27b 0277 00da | | Load_Top At_Offset_2 0278 e5fd | | Load 0x2,-0x3 0279 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 027a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 027b 00db | | Load_Top At_Offset_3 027c 6809 |h | Jump_Zero 0x286 027d 4802 |H | Short_Literal 0x2 027e e20e | | Load 0x1,0xe 027f 1c08 | | Execute_Immediate Run_Utility,0x8 0280 00db | | Load_Top At_Offset_3 0281 00d9 | | Load_Top At_Offset_1 0282 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 0283 e5fd | | Load 0x2,-0x3 0284 016d | m | Execute Variant_Record,Structure_Write 0285 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0286 e22f | / | Load 0x1,0x2f 0287 0257 | W | Execute Discrete,Raise 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b e5fd | | Load 0x2,-0x3 028c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 028d 0f03 | | Execute_Immediate Equal,0x3 028e 6804 |h | Jump_Zero 0x293 028f 00da | | Load_Top At_Offset_2 0290 e5fd | | Load 0x2,-0x3 0291 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 0292 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0293 e5fd | | Load 0x2,-0x3 0294 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0295 0f04 | | Execute_Immediate Equal,0x4 0296 6808 |h | Jump_Zero 0x29f 0297 00da | | Load_Top At_Offset_2 0298 00ea | | Load_Encached Null_String_Cache 0299 01cb | | Execute Vector,Append 029a e018 | | Load 0x0,0x18 029b 180f | | Execute Package,Field_Execute,Field_Number 0xf 029c e5fd | | Load 0x2,-0x3 029d 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 029e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 029f 00db | | Load_Top At_Offset_3 02a0 6809 |h | Jump_Zero 0x2aa 02a1 4803 |H | Short_Literal 0x3 02a2 e20e | | Load 0x1,0xe 02a3 1c08 | | Execute_Immediate Run_Utility,0x8 02a4 00db | | Load_Top At_Offset_3 02a5 00d9 | | Load_Top At_Offset_1 02a6 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 02a7 e5fd | | Load 0x2,-0x3 02a8 016d | m | Execute Variant_Record,Structure_Write 02a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02aa e230 | 0 | Load 0x1,0x30 02ab 0257 | W | Execute Discrete,Raise 02ac 0000 0000 | | .BLANK 0000[0x4] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 e5fd | | Load 0x2,-0x3 02b4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02b5 0f04 | | Execute_Immediate Equal,0x4 02b6 6806 |h | Jump_Zero 0x2bd 02b7 00da | | Load_Top At_Offset_2 02b8 e018 | | Load 0x0,0x18 02b9 180f | | Execute Package,Field_Execute,Field_Number 0xf 02ba e5fd | | Load 0x2,-0x3 02bb 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 02bc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02bd 00db | | Load_Top At_Offset_3 02be 680b |h | Jump_Zero 0x2ca 02bf 4804 |H | Short_Literal 0x4 02c0 e20e | | Load 0x1,0xe 02c1 1c08 | | Execute_Immediate Run_Utility,0x8 02c2 00db | | Load_Top At_Offset_3 02c3 e018 | | Load 0x0,0x18 02c4 180f | | Execute Package,Field_Execute,Field_Number 0xf 02c5 00d9 | | Load_Top At_Offset_1 02c6 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 02c7 e5fd | | Load 0x2,-0x3 02c8 016d | m | Execute Variant_Record,Structure_Write 02c9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02ca e231 | 1 | Load 0x1,0x31 02cb 0257 | W | Execute Discrete,Raise 02cc 0000 0000 | | .BLANK 0000[0x4] 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d3 | | .CONST 0x02d3 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0001 | | .CONST 0x0001 ; Number of locals 02d3 BODY_02d0: 02d3 INIT_02d0: 02d3 e5fd | | Load 0x2,-0x3 02d4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02d5 0f07 | | Execute_Immediate Equal,0x7 02d6 6804 |h | Jump_Zero 0x2db 02d7 00da | | Load_Top At_Offset_2 02d8 e5fd | | Load 0x2,-0x3 02d9 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 02da 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02db 00db | | Load_Top At_Offset_3 02dc 6809 |h | Jump_Zero 0x2e6 02dd 4807 |H | Short_Literal 0x7 02de e20e | | Load 0x1,0xe 02df 1c08 | | Execute_Immediate Run_Utility,0x8 02e0 00db | | Load_Top At_Offset_3 02e1 00d9 | | Load_Top At_Offset_1 02e2 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 02e3 e5fd | | Load 0x2,-0x3 02e4 016d | m | Execute Variant_Record,Structure_Write 02e5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02e6 e232 | 2 | Load 0x1,0x32 02e7 0257 | W | Execute Discrete,Raise 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02eb | | .CONST 0x02eb ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0001 | | .CONST 0x0001 ; Number of locals 02eb BODY_02e8: 02eb INIT_02e8: 02eb 00da | | Load_Top At_Offset_2 02ec 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02ed e5fe | | Load 0x2,-0x2 02ee 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02ef 027f | | Execute Discrete,Equal 02f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02f1 0000 0000 | | .BLANK 0000[0x7] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02fb | | .CONST 0x02fb ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0001 | | .CONST 0x0001 ; Number of locals 02fb BODY_02f8: 02fb INIT_02f8: 02fb 00da | | Load_Top At_Offset_2 02fc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02fd 4607 |F | Jump_Case 0x8 02fe 780c |x | Jump 0x30b ; case 0x0 02ff 7814 |x | Jump 0x314 ; case 0x1 0300 780f |x | Jump 0x310 ; case 0x2 0301 7818 |x | Jump 0x31a ; case 0x3 0302 781d |x | Jump 0x320 ; case 0x4 0303 7821 |x! | Jump 0x325 ; case 0x5 0304 7825 |x% | Jump 0x32a ; case 0x6 0305 7800 |x | Jump 0x306 ; case 0x7 0306 00da | | Load_Top At_Offset_2 0307 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 0308 e001 | | Load 0x0,0x1 0309 1818 | | Execute Package,Field_Execute,Field_Number 0x18 030a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 030b 00da | | Load_Top At_Offset_2 030c 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 030d 00e0 | | Load_Encached Standard_Cache 030e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 030f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0310 00da | | Load_Top At_Offset_2 0311 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0312 8019 | | Call 0x0,0x19 0313 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0314 00da | | Load_Top At_Offset_2 0315 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0316 00e1 | | Load_Encached Boolean_Cache 0317 011c | | Execute Any,Convert_Unchecked 0318 1c01 | | Execute_Immediate Run_Utility,0x1 0319 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 031a 00da | | Load_Top At_Offset_2 031b 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 031c 00e8 | | Load_Encached Character_Cache 031d 011c | | Execute Any,Convert_Unchecked 031e 1c01 | | Execute_Immediate Run_Utility,0x1 031f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0320 00da | | Load_Top At_Offset_2 0321 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0322 e018 | | Load 0x0,0x18 0323 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0324 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0325 00da | | Load_Top At_Offset_2 0326 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0327 e018 | | Load 0x0,0x18 0328 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0329 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 032a 00da | | Load_Top At_Offset_2 032b 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 032c 00e0 | | Load_Encached Standard_Cache 032d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 032e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 032f 0000 | | .XXX[0x1] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0333 | 3 | .CONST 0x0333 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0001 | | .CONST 0x0001 ; Number of locals 0333 BODY_0330: 0333 BODY_0330: 0333 INIT_0330: 0333 INIT_0330: 0333 4608 |F | Jump_Case 0x9 0334 7808 |x | Jump 0x33d ; case 0x0 0335 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0336 7876 |xv | Jump 0x3ad ; case 0x2 0337 7875 |xu | Jump 0x3ad ; case 0x3 0338 7874 |xt | Jump 0x3ad ; case 0x4 0339 7873 |xs | Jump 0x3ad ; case 0x5 033a 7834 |x4 | Jump 0x36f ; case 0x6 033b 784d |xM | Jump 0x389 ; case 0x7 033c 7869 |xi | Jump 0x3a6 ; case 0x8 033d 00da | | Load_Top At_Offset_2 033e 016c | l | Execute Variant_Record,Is_Constrained 033f 7009 |p | Jump_Nonzero 0x349 0340 00cf | | Action Mark_Auxiliary 0341 4800 |H | Short_Literal 0x0 0342 e5ff | | Load 0x2,-0x1 0343 1c08 | | Execute_Immediate Run_Utility,0x8 0344 00d8 | | Load_Top At_Offset_0 0345 1c00 | | Execute_Immediate Run_Utility,0x0 0346 c5ff | | Store 0x2,-0x1 0347 00ce | | Action Pop_Auxiliary 0348 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0349 00da | | Load_Top At_Offset_2 034a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 034b 4607 |F | Jump_Case 0x8 034c 780e |x | Jump 0x35b ; case 0x0 034d 7815 |x | Jump 0x363 ; case 0x1 034e 7810 |x | Jump 0x35f ; case 0x2 034f 7817 |x | Jump 0x367 ; case 0x3 0350 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0351 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0352 7818 |x | Jump 0x36b ; case 0x6 0353 7800 |x | Jump 0x354 ; case 0x7 0354 00da | | Load_Top At_Offset_2 0355 2207 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x7 0356 e001 | | Load 0x0,0x1 0357 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0358 00db | | Load_Top At_Offset_3 0359 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 035a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 035b 4800 |H | Short_Literal 0x0 035c 00db | | Load_Top At_Offset_3 035d 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 035e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 035f 5850 |XP | Indirect_Literal Float,0x3b0,0.0 0360 00db | | Load_Top At_Offset_3 0361 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 0362 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0363 4800 |H | Short_Literal 0x0 0364 00db | | Load_Top At_Offset_3 0365 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 0366 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0367 4800 |H | Short_Literal 0x0 0368 00db | | Load_Top At_Offset_3 0369 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 036a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 036b 4800 |H | Short_Literal 0x0 036c 00db | | Load_Top At_Offset_3 036d 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 036e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 036f 00db | | Load_Top At_Offset_3 0370 4607 |F | Jump_Case 0x8 0371 7809 |x | Jump 0x37b ; case 0x0 0372 780c |x | Jump 0x37f ; case 0x1 0373 7809 |x | Jump 0x37d ; case 0x2 0374 780c |x | Jump 0x381 ; case 0x3 0375 780d |x | Jump 0x383 ; case 0x4 0376 7810 |x | Jump 0x387 ; case 0x5 0377 780d |x | Jump 0x385 ; case 0x6 0378 7800 |x | Jump 0x379 ; case 0x7 0379 4806 |H | Short_Literal 0x6 037a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 037b 4801 |H | Short_Literal 0x1 037c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 037d 4802 |H | Short_Literal 0x2 037e 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 037f 4803 |H | Short_Literal 0x3 0380 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0381 4804 |H | Short_Literal 0x4 0382 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0383 4805 |H | Short_Literal 0x5 0384 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0385 4807 |H | Short_Literal 0x7 0386 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0387 4808 |H | Short_Literal 0x8 0388 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0389 00db | | Load_Top At_Offset_3 038a e5fe | | Load 0x2,-0x2 038b 4607 |F | Jump_Case 0x8 038c 7809 |x | Jump 0x396 ; case 0x0 038d 780c |x | Jump 0x39a ; case 0x1 038e 7809 |x | Jump 0x398 ; case 0x2 038f 780c |x | Jump 0x39c ; case 0x3 0390 780d |x | Jump 0x39e ; case 0x4 0391 7810 |x | Jump 0x3a2 ; case 0x5 0392 780d |x | Jump 0x3a0 ; case 0x6 0393 7800 |x | Jump 0x394 ; case 0x7 0394 4806 |H | Short_Literal 0x6 0395 780d |x | Jump 0x3a3 0396 4801 |H | Short_Literal 0x1 0397 780b |x | Jump 0x3a3 0398 4802 |H | Short_Literal 0x2 0399 7809 |x | Jump 0x3a3 039a 4803 |H | Short_Literal 0x3 039b 7807 |x | Jump 0x3a3 039c 4804 |H | Short_Literal 0x4 039d 7805 |x | Jump 0x3a3 039e 4805 |H | Short_Literal 0x5 039f 7803 |x | Jump 0x3a3 03a0 4807 |H | Short_Literal 0x7 03a1 7801 |x | Jump 0x3a3 03a2 4808 |H | Short_Literal 0x8 03a3 e5ff | | Load 0x2,-0x1 03a4 031b | | Declare_Type Variant_Record,Constrained 03a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03a6 00db | | Load_Top At_Offset_3 03a7 e5fe | | Load 0x2,-0x2 03a8 e5ff | | Load 0x2,-0x1 03a9 1c06 | | Execute_Immediate Run_Utility,0x6 03aa e5ff | | Load 0x2,-0x1 03ab 02fc | | Declare_Variable Variant_Record,With_Constraint 03ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03ad 0869 | i | Execute_Immediate Raise,0x69 03ae 0000 0000 | | .XXX[0x2] 03b0 0000 0000 | | .DBL 0.0 03b2 0000 0000 | | 03b4 0000 0000 | | .BLANK 0000[0x4] 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03e0 | | .CONST 0x03e0 ; Address of begin 03b9 0004 | | .CONST 0x0004 ; Address of exception handler 03ba 0019 | | .CONST 0x0019 ; Number of locals 03bb INIT_03b8: 03bb 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated 03bd 029a 040b | | Declare_Subprogram INIT_0408,For_Outer_Call,Visible,Unelaborated 03bf 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated 03c1 029a 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call,Visible,Unelaborated 03c3 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 03c5 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated 03c7 029a 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call,Visible,Unelaborated 03c9 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated 03cb 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated 03cd 00bf | | Action Accept_Activation 03ce 1d11 | | Execute_Immediate Reference_Lex_1,0x11 03cf 00c7 | | Action Elaborate_Subprogram 03d0 1d15 | | Execute_Immediate Reference_Lex_1,0x15 03d1 00c7 | | Action Elaborate_Subprogram 03d2 1d12 | | Execute_Immediate Reference_Lex_1,0x12 03d3 00c7 | | Action Elaborate_Subprogram 03d4 1d14 | | Execute_Immediate Reference_Lex_1,0x14 03d5 00c7 | | Action Elaborate_Subprogram 03d6 1d13 | | Execute_Immediate Reference_Lex_1,0x13 03d7 00c7 | | Action Elaborate_Subprogram 03d8 1d16 | | Execute_Immediate Reference_Lex_1,0x16 03d9 00c7 | | Action Elaborate_Subprogram 03da 1d17 | | Execute_Immediate Reference_Lex_1,0x17 03db 00c7 | | Action Elaborate_Subprogram 03dc 1d18 | | Execute_Immediate Reference_Lex_1,0x18 03dd 00c7 | | Action Elaborate_Subprogram 03de 1d19 | | Execute_Immediate Reference_Lex_1,0x19 03df 00c7 | | Action Elaborate_Subprogram 03e0 BODY_03b8: 03e0 00bc | | Action Signal_Activated 03e1 00bb | | Action Signal_Completion 03e2 0000 0000 | | .BLANK 0000[0x6] 03e8 ; -------------------------------------------------------------------------------------- 03e8 ; SUBPROGRAM 03e8 ; -------------------------------------------------------------------------------------- 03e8 03eb | | .CONST 0x03eb ; Address of begin 03e9 0004 | | .CONST 0x0004 ; Address of exception handler 03ea 0001 | | .CONST 0x0001 ; Number of locals 03eb BODY_03e8: 03eb INIT_03e8: 03eb e20f | | Load 0x1,0xf 03ec 680e |h | Jump_Zero 0x3fb 03ed 4805 |H | Short_Literal 0x5 03ee e001 | | Load 0x0,0x1 03ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03f0 1c08 | | Execute_Immediate Run_Utility,0x8 03f1 00db | | Load_Top At_Offset_3 03f2 e210 | | Load 0x1,0x10 03f3 0122 | " | Execute Any,Make_Root_Type 03f4 011c | | Execute Any,Convert_Unchecked 03f5 1c01 | | Execute_Immediate Run_Utility,0x1 03f6 e002 | | Load 0x0,0x2 03f7 180f | | Execute Package,Field_Execute,Field_Number 0xf 03f8 00d9 | | Load_Top At_Offset_1 03f9 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 03fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03fb 4806 |H | Short_Literal 0x6 03fc e001 | | Load 0x0,0x1 03fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03fe 1c08 | | Execute_Immediate Run_Utility,0x8 03ff 00db | | Load_Top At_Offset_3 0400 00d9 | | Load_Top At_Offset_1 0401 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 0402 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0403 0000 0000 | | .BLANK 0000[0x5] 0408 ; -------------------------------------------------------------------------------------- 0408 ; SUBPROGRAM 0408 ; -------------------------------------------------------------------------------------- 0408 040b | | .CONST 0x040b ; Address of begin 0409 0004 | | .CONST 0x0004 ; Address of exception handler 040a 0001 | | .CONST 0x0001 ; Number of locals 040b BODY_0408: 040b INIT_0408: 040b 00da | | Load_Top At_Offset_2 040c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 040d 0f05 | | Execute_Immediate Equal,0x5 040e 680d |h | Jump_Zero 0x41c 040f 00da | | Load_Top At_Offset_2 0410 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0411 e002 | | Load 0x0,0x2 0412 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0413 e210 | | Load 0x1,0x10 0414 0122 | " | Execute Any,Make_Root_Type 0415 1c02 | | Execute_Immediate Run_Utility,0x2 0416 00d8 | | Load_Top At_Offset_0 0417 e210 | | Load 0x1,0x10 0418 0260 | ` | Execute Discrete,In_Type 0419 7001 |p | Jump_Nonzero 0x41b 041a 0801 | | Execute_Immediate Raise,0x1 041b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 041c 00da | | Load_Top At_Offset_2 041d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 041e 0f06 | | Execute_Immediate Equal,0x6 041f 680e |h | Jump_Zero 0x42e 0420 00da | | Load_Top At_Offset_2 0421 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0422 00d8 | | Load_Top At_Offset_0 0423 e210 | | Load 0x1,0x10 0424 0122 | " | Execute Any,Make_Root_Type 0425 0260 | ` | Execute Discrete,In_Type 0426 7001 |p | Jump_Nonzero 0x428 0427 0801 | | Execute_Immediate Raise,0x1 0428 00d8 | | Load_Top At_Offset_0 0429 e210 | | Load 0x1,0x10 042a 0260 | ` | Execute Discrete,In_Type 042b 7001 |p | Jump_Nonzero 0x42d 042c 0801 | | Execute_Immediate Raise,0x1 042d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 042e e001 | | Load 0x0,0x1 042f 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37 0430 0257 | W | Execute Discrete,Raise 0431 0000 0000 | | .BLANK 0000[0x7] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 043f | ? | .CONST 0x043f ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0003 | | .CONST 0x0003 ; Number of locals 043b INIT_0438: 043b 029f 050b | | Declare_Subprogram INIT_0508,For_Call 043d 029f 0533 | 3| Declare_Subprogram INIT_0530,For_Call 043f BODY_0438: 043f e20f | | Load 0x1,0xf 0440 6802 |h | Jump_Zero 0x443 0441 8402 | | Call 0x2,0x2 0442 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0443 8403 | | Call 0x2,0x3 0444 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0445 0000 0000 | | .XXX[0x3] 0447 0000 | | 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044b | K | .CONST 0x044b ; Address of begin 0449 0004 | | .CONST 0x0004 ; Address of exception handler 044a 0001 | | .CONST 0x0001 ; Number of locals 044b BODY_0448: 044b INIT_0448: 044b 00da | | Load_Top At_Offset_2 044c 8212 | | Call 0x1,0x12 044d e210 | | Load 0x1,0x10 044e 0122 | " | Execute Any,Make_Root_Type 044f 011c | | Execute Any,Convert_Unchecked 0450 1c01 | | Execute_Immediate Run_Utility,0x1 0451 e002 | | Load 0x0,0x2 0452 180f | | Execute Package,Field_Execute,Field_Number 0xf 0453 e002 | | Load 0x0,0x2 0454 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0455 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0456 0000 0000 | | .XXX[0x2] 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 00da | | Load_Top At_Offset_2 045c e210 | | Load 0x1,0x10 045d 0122 | " | Execute Any,Make_Root_Type 045e 011c | | Execute Any,Convert_Unchecked 045f 1c01 | | Execute_Immediate Run_Utility,0x1 0460 e002 | | Load 0x0,0x2 0461 180f | | Execute Package,Field_Execute,Field_Number 0xf 0462 e002 | | Load 0x0,0x2 0463 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0464 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0465 0000 0000 | | .XXX[0x3] 0467 0000 | | 0468 ; -------------------------------------------------------------------------------------- 0468 ; SUBPROGRAM 0468 ; -------------------------------------------------------------------------------------- 0468 046b | k | .CONST 0x046b ; Address of begin 0469 0004 | | .CONST 0x0004 ; Address of exception handler 046a 0001 | | .CONST 0x0001 ; Number of locals 046b BODY_0468: 046b INIT_0468: 046b 00da | | Load_Top At_Offset_2 046c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 046d e5fe | | Load 0x2,-0x2 046e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 046f 027f | | Execute Discrete,Equal 0470 681a |h | Jump_Zero 0x48b 0471 00da | | Load_Top At_Offset_2 0472 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0473 4607 |F | Jump_Case 0x8 0474 7807 |x | Jump 0x47c ; case 0x0 0475 7806 |x | Jump 0x47c ; case 0x1 0476 7805 |x | Jump 0x47c ; case 0x2 0477 7804 |x | Jump 0x47c ; case 0x3 0478 7803 |x | Jump 0x47c ; case 0x4 0479 780b |x | Jump 0x485 ; case 0x5 047a 7804 |x | Jump 0x47f ; case 0x6 047b 7800 |x | Jump 0x47c ; case 0x7 047c e001 | | Load 0x0,0x1 047d 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 047e 0257 | W | Execute Discrete,Raise 047f 00da | | Load_Top At_Offset_2 0480 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0481 e5fe | | Load 0x2,-0x2 0482 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0483 027c | | | Execute Discrete,Less 0484 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0485 00da | | Load_Top At_Offset_2 0486 8212 | | Call 0x1,0x12 0487 e5fe | | Load 0x2,-0x2 0488 8212 | | Call 0x1,0x12 0489 027c | | | Execute Discrete,Less 048a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 048b e001 | | Load 0x0,0x1 048c 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 048d 0257 | W | Execute Discrete,Raise 048e 0000 0000 | | .XXX[0x2] 0490 ; -------------------------------------------------------------------------------------- 0490 ; SUBPROGRAM 0490 ; -------------------------------------------------------------------------------------- 0490 0493 | | .CONST 0x0493 ; Address of begin 0491 0004 | | .CONST 0x0004 ; Address of exception handler 0492 0001 | | .CONST 0x0001 ; Number of locals 0493 BODY_0490: 0493 INIT_0490: 0493 00da | | Load_Top At_Offset_2 0494 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0495 e5fe | | Load 0x2,-0x2 0496 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0497 027f | | Execute Discrete,Equal 0498 681a |h | Jump_Zero 0x4b3 0499 00da | | Load_Top At_Offset_2 049a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 049b 4607 |F | Jump_Case 0x8 049c 7807 |x | Jump 0x4a4 ; case 0x0 049d 7806 |x | Jump 0x4a4 ; case 0x1 049e 7805 |x | Jump 0x4a4 ; case 0x2 049f 7804 |x | Jump 0x4a4 ; case 0x3 04a0 7803 |x | Jump 0x4a4 ; case 0x4 04a1 780b |x | Jump 0x4ad ; case 0x5 04a2 7804 |x | Jump 0x4a7 ; case 0x6 04a3 7800 |x | Jump 0x4a4 ; case 0x7 04a4 e001 | | Load 0x0,0x1 04a5 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 04a6 0257 | W | Execute Discrete,Raise 04a7 00da | | Load_Top At_Offset_2 04a8 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04a9 e5fe | | Load 0x2,-0x2 04aa 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04ab 027a | z | Execute Discrete,Less_Equal 04ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04ad 00da | | Load_Top At_Offset_2 04ae 8212 | | Call 0x1,0x12 04af e5fe | | Load 0x2,-0x2 04b0 8212 | | Call 0x1,0x12 04b1 027a | z | Execute Discrete,Less_Equal 04b2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04b3 e001 | | Load 0x0,0x1 04b4 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 04b5 0257 | W | Execute Discrete,Raise 04b6 0000 0000 | | .XXX[0x2] 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 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04bd e5fe | | Load 0x2,-0x2 04be 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04bf 027f | | Execute Discrete,Equal 04c0 681a |h | Jump_Zero 0x4db 04c1 00da | | Load_Top At_Offset_2 04c2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04c3 4607 |F | Jump_Case 0x8 04c4 7807 |x | Jump 0x4cc ; case 0x0 04c5 7806 |x | Jump 0x4cc ; case 0x1 04c6 7805 |x | Jump 0x4cc ; case 0x2 04c7 7804 |x | Jump 0x4cc ; case 0x3 04c8 7803 |x | Jump 0x4cc ; case 0x4 04c9 780b |x | Jump 0x4d5 ; case 0x5 04ca 7804 |x | Jump 0x4cf ; case 0x6 04cb 7800 |x | Jump 0x4cc ; case 0x7 04cc e001 | | Load 0x0,0x1 04cd 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 04ce 0257 | W | Execute Discrete,Raise 04cf 00da | | Load_Top At_Offset_2 04d0 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04d1 e5fe | | Load 0x2,-0x2 04d2 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04d3 027d | } | Execute Discrete,Greater 04d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04d5 00da | | Load_Top At_Offset_2 04d6 8212 | | Call 0x1,0x12 04d7 e5fe | | Load 0x2,-0x2 04d8 8212 | | Call 0x1,0x12 04d9 027d | } | Execute Discrete,Greater 04da 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04db e001 | | Load 0x0,0x1 04dc 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 04dd 0257 | W | Execute Discrete,Raise 04de 0000 0000 | | .XXX[0x2] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e3 | | .CONST 0x04e3 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0001 | | .CONST 0x0001 ; Number of locals 04e3 BODY_04e0: 04e3 INIT_04e0: 04e3 00da | | Load_Top At_Offset_2 04e4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04e5 e5fe | | Load 0x2,-0x2 04e6 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04e7 027f | | Execute Discrete,Equal 04e8 681a |h | Jump_Zero 0x503 04e9 00da | | Load_Top At_Offset_2 04ea 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04eb 4607 |F | Jump_Case 0x8 04ec 7807 |x | Jump 0x4f4 ; case 0x0 04ed 7806 |x | Jump 0x4f4 ; case 0x1 04ee 7805 |x | Jump 0x4f4 ; case 0x2 04ef 7804 |x | Jump 0x4f4 ; case 0x3 04f0 7803 |x | Jump 0x4f4 ; case 0x4 04f1 780b |x | Jump 0x4fd ; case 0x5 04f2 7804 |x | Jump 0x4f7 ; case 0x6 04f3 7800 |x | Jump 0x4f4 ; case 0x7 04f4 e001 | | Load 0x0,0x1 04f5 1b3c | < | Execute Package,Field_Read,Field_Number 0x3c 04f6 0257 | W | Execute Discrete,Raise 04f7 00da | | Load_Top At_Offset_2 04f8 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04f9 e5fe | | Load 0x2,-0x2 04fa 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04fb 027b | { | Execute Discrete,Greater_Equal 04fc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04fd 00da | | Load_Top At_Offset_2 04fe 8212 | | Call 0x1,0x12 04ff e5fe | | Load 0x2,-0x2 0500 8212 | | Call 0x1,0x12 0501 027b | { | Execute Discrete,Greater_Equal 0502 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0503 e001 | | Load 0x0,0x1 0504 1b3c | < | Execute Package,Field_Read,Field_Number 0x3c 0505 0257 | W | Execute Discrete,Raise 0506 0000 0000 | | .XXX[0x2] 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 050b | | .CONST 0x050b ; Address of begin 0509 0004 | | .CONST 0x0004 ; Address of exception handler 050a 0001 | | .CONST 0x0001 ; Number of locals 050b BODY_0508: 050b INIT_0508: 050b e5fd | | Load 0x2,-0x3 050c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 050d 0f05 | | Execute_Immediate Equal,0x5 050e 680a |h | Jump_Zero 0x519 050f e5ff | | Load 0x2,-0x1 0510 e210 | | Load 0x1,0x10 0511 0122 | " | Execute Any,Make_Root_Type 0512 011c | | Execute Any,Convert_Unchecked 0513 1c01 | | Execute_Immediate Run_Utility,0x1 0514 e002 | | Load 0x0,0x2 0515 180f | | Execute Package,Field_Execute,Field_Number 0xf 0516 e5fd | | Load 0x2,-0x3 0517 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 0518 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0519 e5fe | | Load 0x2,-0x2 051a 6810 |h | Jump_Zero 0x52b 051b 4805 |H | Short_Literal 0x5 051c e001 | | Load 0x0,0x1 051d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 051e 1c08 | | Execute_Immediate Run_Utility,0x8 051f e5ff | | Load 0x2,-0x1 0520 e210 | | Load 0x1,0x10 0521 0122 | " | Execute Any,Make_Root_Type 0522 011c | | Execute Any,Convert_Unchecked 0523 1c01 | | Execute_Immediate Run_Utility,0x1 0524 e002 | | Load 0x0,0x2 0525 180f | | Execute Package,Field_Execute,Field_Number 0xf 0526 00d9 | | Load_Top At_Offset_1 0527 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 0528 e5fd | | Load 0x2,-0x3 0529 016d | m | Execute Variant_Record,Structure_Write 052a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 052b e001 | | Load 0x0,0x1 052c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 052d 0257 | W | Execute Discrete,Raise 052e 0000 0000 | | .XXX[0x2] 0530 ; -------------------------------------------------------------------------------------- 0530 ; SUBPROGRAM 0530 ; -------------------------------------------------------------------------------------- 0530 0533 | 3 | .CONST 0x0533 ; Address of begin 0531 0004 | | .CONST 0x0004 ; Address of exception handler 0532 0001 | | .CONST 0x0001 ; Number of locals 0533 BODY_0530: 0533 INIT_0530: 0533 e5fd | | Load 0x2,-0x3 0534 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0535 0f06 | | Execute_Immediate Equal,0x6 0536 6804 |h | Jump_Zero 0x53b 0537 e5ff | | Load 0x2,-0x1 0538 e5fd | | Load 0x2,-0x3 0539 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 053a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 053b e5fe | | Load 0x2,-0x2 053c 680a |h | Jump_Zero 0x547 053d 4806 |H | Short_Literal 0x6 053e e001 | | Load 0x0,0x1 053f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0540 1c08 | | Execute_Immediate Run_Utility,0x8 0541 e5ff | | Load 0x2,-0x1 0542 00d9 | | Load_Top At_Offset_1 0543 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 0544 e5fd | | Load 0x2,-0x3 0545 016d | m | Execute Variant_Record,Structure_Write 0546 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0547 e001 | | Load 0x0,0x1 0548 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0549 0257 | W | Execute Discrete,Raise 054a 0000 0000 | | .BLANK 0000[0x6] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0564 | d | .CONST 0x0564 ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0010 | | .CONST 0x0010 ; Number of locals 0553 INIT_0550: 0553 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated 0555 029a 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call,Visible,Unelaborated 0557 029a 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Visible,Unelaborated 0559 029a 062b | +| Declare_Subprogram INIT_0628,For_Outer_Call,Visible,Unelaborated 055b 00bf | | Action Accept_Activation 055c 1d0d | | Execute_Immediate Reference_Lex_1,0xd 055d 00c7 | | Action Elaborate_Subprogram 055e 1d0e | | Execute_Immediate Reference_Lex_1,0xe 055f 00c7 | | Action Elaborate_Subprogram 0560 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0561 00c7 | | Action Elaborate_Subprogram 0562 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0563 00c7 | | Action Elaborate_Subprogram 0564 BODY_0550: 0564 00bc | | Action Signal_Activated 0565 00bb | | Action Signal_Completion 0566 0000 0000 | | .XXX[0x2] 0568 ; -------------------------------------------------------------------------------------- 0568 ; SUBPROGRAM 0568 ; -------------------------------------------------------------------------------------- 0568 056b | k | .CONST 0x056b ; Address of begin 0569 0004 | | .CONST 0x0004 ; Address of exception handler 056a 0001 | | .CONST 0x0001 ; Number of locals 056b BODY_0568: 056b INIT_0568: 056b 00da | | Load_Top At_Offset_2 056c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 056d e5fe | | Load 0x2,-0x2 056e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 056f 027f | | Execute Discrete,Equal 0570 6834 |h4 | Jump_Zero 0x5a5 0571 00da | | Load_Top At_Offset_2 0572 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0573 4607 |F | Jump_Case 0x8 0574 780a |x | Jump 0x57f ; case 0x0 0575 780f |x | Jump 0x585 ; case 0x1 0576 7814 |x | Jump 0x58b ; case 0x2 0577 7819 |x | Jump 0x591 ; case 0x3 0578 781e |x | Jump 0x597 ; case 0x4 0579 7802 |x | Jump 0x57c ; case 0x5 057a 7824 |x$ | Jump 0x59f ; case 0x6 057b 7800 |x | Jump 0x57c ; case 0x7 057c e001 | | Load 0x0,0x1 057d 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33 057e 0257 | W | Execute Discrete,Raise 057f 00da | | Load_Top At_Offset_2 0580 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0581 e5fe | | Load 0x2,-0x2 0582 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0583 027c | | | Execute Discrete,Less 0584 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0585 00da | | Load_Top At_Offset_2 0586 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0587 e5fe | | Load 0x2,-0x2 0588 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0589 027c | | | Execute Discrete,Less 058a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 058b 00da | | Load_Top At_Offset_2 058c 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 058d e5fe | | Load 0x2,-0x2 058e 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 058f 0244 | D | Execute Float,Less 0590 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0591 00da | | Load_Top At_Offset_2 0592 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0593 e5fe | | Load 0x2,-0x2 0594 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0595 027c | | | Execute Discrete,Less 0596 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0597 00db | | Load_Top At_Offset_3 0598 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0599 00db | | Load_Top At_Offset_3 059a 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 059b e002 | | Load 0x0,0x2 059c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 059d 180d | | Execute Package,Field_Execute,Field_Number 0xd 059e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 059f 00da | | Load_Top At_Offset_2 05a0 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 05a1 e5fe | | Load 0x2,-0x2 05a2 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 05a3 027c | | | Execute Discrete,Less 05a4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05a5 e001 | | Load 0x0,0x1 05a6 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33 05a7 0257 | W | Execute Discrete,Raise 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05ab | | .CONST 0x05ab ; Address of begin 05a9 0004 | | .CONST 0x0004 ; Address of exception handler 05aa 0001 | | .CONST 0x0001 ; Number of locals 05ab BODY_05a8: 05ab INIT_05a8: 05ab 00da | | Load_Top At_Offset_2 05ac 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05ad e5fe | | Load 0x2,-0x2 05ae 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05af 027f | | Execute Discrete,Equal 05b0 6834 |h4 | Jump_Zero 0x5e5 05b1 00da | | Load_Top At_Offset_2 05b2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05b3 4607 |F | Jump_Case 0x8 05b4 780a |x | Jump 0x5bf ; case 0x0 05b5 780f |x | Jump 0x5c5 ; case 0x1 05b6 7814 |x | Jump 0x5cb ; case 0x2 05b7 7819 |x | Jump 0x5d1 ; case 0x3 05b8 781e |x | Jump 0x5d7 ; case 0x4 05b9 7802 |x | Jump 0x5bc ; case 0x5 05ba 7824 |x$ | Jump 0x5df ; case 0x6 05bb 7800 |x | Jump 0x5bc ; case 0x7 05bc e001 | | Load 0x0,0x1 05bd 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 05be 0257 | W | Execute Discrete,Raise 05bf 00da | | Load_Top At_Offset_2 05c0 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 05c1 e5fe | | Load 0x2,-0x2 05c2 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 05c3 027a | z | Execute Discrete,Less_Equal 05c4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05c5 00da | | Load_Top At_Offset_2 05c6 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 05c7 e5fe | | Load 0x2,-0x2 05c8 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 05c9 027a | z | Execute Discrete,Less_Equal 05ca 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05cb 00da | | Load_Top At_Offset_2 05cc 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 05cd e5fe | | Load 0x2,-0x2 05ce 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 05cf 0242 | B | Execute Float,Less_Equal 05d0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05d1 00da | | Load_Top At_Offset_2 05d2 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 05d3 e5fe | | Load 0x2,-0x2 05d4 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 05d5 027a | z | Execute Discrete,Less_Equal 05d6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05d7 00db | | Load_Top At_Offset_3 05d8 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 05d9 00db | | Load_Top At_Offset_3 05da 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 05db e002 | | Load 0x0,0x2 05dc 1b11 | | Execute Package,Field_Read,Field_Number 0x11 05dd 180f | | Execute Package,Field_Execute,Field_Number 0xf 05de 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05df 00da | | Load_Top At_Offset_2 05e0 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 05e1 e5fe | | Load 0x2,-0x2 05e2 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 05e3 027a | z | Execute Discrete,Less_Equal 05e4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05e5 e001 | | Load 0x0,0x1 05e6 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 05e7 0257 | W | Execute Discrete,Raise 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05eb | | .CONST 0x05eb ; Address of begin 05e9 0004 | | .CONST 0x0004 ; Address of exception handler 05ea 0001 | | .CONST 0x0001 ; Number of locals 05eb BODY_05e8: 05eb INIT_05e8: 05eb 00da | | Load_Top At_Offset_2 05ec 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05ed e5fe | | Load 0x2,-0x2 05ee 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05ef 027f | | Execute Discrete,Equal 05f0 6834 |h4 | Jump_Zero 0x625 05f1 00da | | Load_Top At_Offset_2 05f2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05f3 4607 |F | Jump_Case 0x8 05f4 780a |x | Jump 0x5ff ; case 0x0 05f5 780f |x | Jump 0x605 ; case 0x1 05f6 7814 |x | Jump 0x60b ; case 0x2 05f7 7819 |x | Jump 0x611 ; case 0x3 05f8 781e |x | Jump 0x617 ; case 0x4 05f9 7802 |x | Jump 0x5fc ; case 0x5 05fa 7824 |x$ | Jump 0x61f ; case 0x6 05fb 7800 |x | Jump 0x5fc ; case 0x7 05fc e001 | | Load 0x0,0x1 05fd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05fe 0257 | W | Execute Discrete,Raise 05ff 00da | | Load_Top At_Offset_2 0600 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0601 e5fe | | Load 0x2,-0x2 0602 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0603 027d | } | Execute Discrete,Greater 0604 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0605 00da | | Load_Top At_Offset_2 0606 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0607 e5fe | | Load 0x2,-0x2 0608 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0609 027d | } | Execute Discrete,Greater 060a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 060b 00da | | Load_Top At_Offset_2 060c 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 060d e5fe | | Load 0x2,-0x2 060e 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 060f 0245 | E | Execute Float,Greater 0610 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0611 00da | | Load_Top At_Offset_2 0612 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0613 e5fe | | Load 0x2,-0x2 0614 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0615 027d | } | Execute Discrete,Greater 0616 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0617 00db | | Load_Top At_Offset_3 0618 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0619 00db | | Load_Top At_Offset_3 061a 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 061b e002 | | Load 0x0,0x2 061c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 061d 180e | | Execute Package,Field_Execute,Field_Number 0xe 061e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 061f 00da | | Load_Top At_Offset_2 0620 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0621 e5fe | | Load 0x2,-0x2 0622 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0623 027d | } | Execute Discrete,Greater 0624 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0625 e001 | | Load 0x0,0x1 0626 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0627 0257 | W | Execute Discrete,Raise 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 062b | + | .CONST 0x062b ; Address of begin 0629 0004 | | .CONST 0x0004 ; Address of exception handler 062a 0001 | | .CONST 0x0001 ; Number of locals 062b BODY_0628: 062b INIT_0628: 062b 00da | | Load_Top At_Offset_2 062c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 062d e5fe | | Load 0x2,-0x2 062e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 062f 027f | | Execute Discrete,Equal 0630 6834 |h4 | Jump_Zero 0x665 0631 00da | | Load_Top At_Offset_2 0632 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0633 4607 |F | Jump_Case 0x8 0634 780a |x | Jump 0x63f ; case 0x0 0635 780f |x | Jump 0x645 ; case 0x1 0636 7814 |x | Jump 0x64b ; case 0x2 0637 7819 |x | Jump 0x651 ; case 0x3 0638 781e |x | Jump 0x657 ; case 0x4 0639 7802 |x | Jump 0x63c ; case 0x5 063a 7824 |x$ | Jump 0x65f ; case 0x6 063b 7800 |x | Jump 0x63c ; case 0x7 063c e001 | | Load 0x0,0x1 063d 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36 063e 0257 | W | Execute Discrete,Raise 063f 00da | | Load_Top At_Offset_2 0640 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0641 e5fe | | Load 0x2,-0x2 0642 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0643 027b | { | Execute Discrete,Greater_Equal 0644 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0645 00da | | Load_Top At_Offset_2 0646 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0647 e5fe | | Load 0x2,-0x2 0648 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0649 027b | { | Execute Discrete,Greater_Equal 064a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 064b 00da | | Load_Top At_Offset_2 064c 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 064d e5fe | | Load 0x2,-0x2 064e 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 064f 0243 | C | Execute Float,Greater_Equal 0650 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0651 00da | | Load_Top At_Offset_2 0652 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0653 e5fe | | Load 0x2,-0x2 0654 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0655 027b | { | Execute Discrete,Greater_Equal 0656 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0657 00db | | Load_Top At_Offset_3 0658 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0659 00db | | Load_Top At_Offset_3 065a 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 065b e002 | | Load 0x0,0x2 065c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 065d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 065e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 065f 00da | | Load_Top At_Offset_2 0660 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0661 e5fe | | Load 0x2,-0x2 0662 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0663 027b | { | Execute Discrete,Greater_Equal 0664 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0665 e001 | | Load 0x0,0x1 0666 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36 0667 0257 | W | Execute Discrete,Raise 0668 ; -------------------------------------------------------------------------------------- 0668 ; STRING TABLE 0668 ; -------------------------------------------------------------------------------------- 0668 0012 | | .STRTAB 0x0012->0x0671 ; "INTEGER_VALUE" 0669 001d | | .STRTAB 0x001d->0x0677 ; "BOOLEAN_VALUE" 066a 0028 | ( | .STRTAB 0x0028->0x067e ; "FLOAT_VALUE" 066b 0031 | 1 | .STRTAB 0x0031->0x0683 ; "CHARACTER_VALUE" 066c 003e | > | .STRTAB 0x003e->0x068b ; "STRING_VALUE" 066d 0048 | H | .STRTAB 0x0048->0x0691 ; "CHECKED_ENUMERATION_VALUE" 066e 005f | _ | .STRTAB 0x005f->0x069d ; "UNCHECKED_ENUMERATION_VALUE" 066f 0078 | x | .STRTAB 0x0078->0x06ab ; "CLASS_VALUE" 0670 0081 | | .STREND 0x0081->0x06b0 0671 494e 5445 |INTE| .STRTAB_STRINGS 06b1 0000 0000 | | .BLANK 0000[0x7] 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; Debug Table 06b8 ; -------------------------------------------------------------------------------------- 06b8 0004 0001 | | .DEBUG4 0x0004,0x0001,0xe682,0x0000,0x0001,0x002b 06be 000b 076a | j| .DBG4T 0x000b,0x076a,0x8000,0x0000 06c2 00a6 079f | | .DBG4T 0x00a6,0x079f,0x8000,0x0000 06c6 00e3 0000 | | .DBG4T 0x00e3,0x0000,0x0005,0x0000 06ca 010b 07b7 | | .DBG4T 0x010b,0x07b7,0x0002,0x0000 06ce 011b 07ba | | .DBG4T 0x011b,0x07ba,0x0002,0x0000 06d2 012b 07bd | + | .DBG4T 0x012b,0x07bd,0x0002,0x0000 06d6 013b 07c0 | ; | .DBG4T 0x013b,0x07c0,0x0002,0x0000 06da 014b 07c3 | K | .DBG4T 0x014b,0x07c3,0x0002,0x0000 06de 015b 07c6 | [ | .DBG4T 0x015b,0x07c6,0x0002,0x0000 06e2 016b 07c9 | k | .DBG4T 0x016b,0x07c9,0x0002,0x4000 06e6 0193 07d7 | | .DBG4T 0x0193,0x07d7,0x0002,0x4000 06ea 01a3 07df | | .DBG4T 0x01a3,0x07df,0x0002,0x4000 06ee 01c3 07ed | | .DBG4T 0x01c3,0x07ed,0x0002,0x4000 06f2 01eb 07fb | | .DBG4T 0x01eb,0x07fb,0x0002,0x4000 06f6 021b 080d | | .DBG4T 0x021b,0x080d,0x0002,0x0000 06fa 022b 0812 | + | .DBG4T 0x022b,0x0812,0x0001,0x4000 06fe 025b 0827 | [ '| .DBG4T 0x025b,0x0827,0x0001,0x0000 0702 0273 082e | s .| .DBG4T 0x0273,0x082e,0x0001,0x0000 0706 028b 0835 | 5| .DBG4T 0x028b,0x0835,0x0001,0x0000 070a 02b3 083e | >| .DBG4T 0x02b3,0x083e,0x0001,0x0000 070e 02d3 0845 | E| .DBG4T 0x02d3,0x0845,0x0001,0x0000 0712 02eb 084c | L| .DBG4T 0x02eb,0x084c,0x0002,0x0000 0716 02fb 084f | O| .DBG4T 0x02fb,0x084f,0x0002,0x4000 071a 0333 0000 | 3 | .DBG4T 0x0333,0x0000,0x0005,0x0000 071e 03bb 0863 | c| .DBG4T 0x03bb,0x0863,0x4000,0x8000 0722 03ce 0877 | w| .DBG4T 0x03ce,0x0877,0x4000,0x0000 0726 03eb 0882 | | .DBG4T 0x03eb,0x0882,0x1002,0x0000 072a 040b 0887 | | .DBG4T 0x040b,0x0887,0x1002,0x0000 072e 043b 088e | ; | .DBG4T 0x043b,0x088e,0x1001,0x0000 0732 044b 0893 | K | .DBG4T 0x044b,0x0893,0x1002,0x0000 0736 045b 0896 | [ | .DBG4T 0x045b,0x0896,0x1002,0x0000 073a 046b 0899 | k | .DBG4T 0x046b,0x0899,0x1002,0x4000 073e 0493 08a7 | | .DBG4T 0x0493,0x08a7,0x1002,0x4000 0742 04bb 08b5 | | .DBG4T 0x04bb,0x08b5,0x1002,0x4000 0746 04e3 08c3 | | .DBG4T 0x04e3,0x08c3,0x1002,0x4000 074a 050b 08d1 | | .DBG4T 0x050b,0x08d1,0x1004,0x0000 074e 0533 08d8 | 3 | .DBG4T 0x0533,0x08d8,0x1004,0x0000 0752 0553 08df | S | .DBG4T 0x0553,0x08df,0x0000,0x8000 0756 055c 08e9 | \ | .DBG4T 0x055c,0x08e9,0x0000,0x8000 075a 056b 08f3 | k | .DBG4T 0x056b,0x08f3,0x0002,0x4000 075e 05ab 0909 | | .DBG4T 0x05ab,0x0909,0x0002,0x4000 0762 05eb 091f | | .DBG4T 0x05eb,0x091f,0x0002,0x4000 0766 062b 0935 | + 5| .DBG4T 0x062b,0x0935,0x0002,0x4000 076a ; -------------------------------------------------------------------------------------- 076a ; Debug chain 076a ; -------------------------------------------------------------------------------------- 076a 0033 0000 | 3 | .DBGLEN 0x0033,0x0000 076c 000b 0010 | | .DBGLNO 0x000b,0x0010,0x001b,0x001c,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f,0x0041,0x0043,0x0049,0x004b,0x0050,0x0052,0x0054,0x0056,0x0058,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068,0x006a,0x006c,0x006e,0x0070,0x0072,0x0074,0x0076,0x0078,0x007a,0x007c,0x0095,0x009d 079f ; -------------------------------------------------------------------------------------- 079f ; Debug chain 079f ; -------------------------------------------------------------------------------------- 079f 0016 0000 | | .DBGLEN 0x0016,0x0000 07a1 00a6 00a8 | | .DBGLNO 0x00a6,0x00a8,0x00aa,0x00ac,0x00ae,0x00b0,0x00b2,0x00b4,0x00b6,0x00b8,0x00ba,0x00bc,0x00be,0x00c0,0x00c2,0x00c4,0x00c6,0x00c8,0x00ca,0x00cc,0x00d3,0x00d5 07b7 ; -------------------------------------------------------------------------------------- 07b7 ; Debug chain 07b7 ; -------------------------------------------------------------------------------------- 07b7 0000 0001 | | .DBGLEN 0x0000,0x0001 07b9 010b | | .DBGLNO 0x010b 07ba ; -------------------------------------------------------------------------------------- 07ba ; Debug chain 07ba ; -------------------------------------------------------------------------------------- 07ba 0000 0001 | | .DBGLEN 0x0000,0x0001 07bc 011b | | .DBGLNO 0x011b 07bd ; -------------------------------------------------------------------------------------- 07bd ; Debug chain 07bd ; -------------------------------------------------------------------------------------- 07bd 0000 0001 | | .DBGLEN 0x0000,0x0001 07bf 012b | + | .DBGLNO 0x012b 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; Debug chain 07c0 ; -------------------------------------------------------------------------------------- 07c0 0000 0001 | | .DBGLEN 0x0000,0x0001 07c2 013b | ; | .DBGLNO 0x013b 07c3 ; -------------------------------------------------------------------------------------- 07c3 ; Debug chain 07c3 ; -------------------------------------------------------------------------------------- 07c3 0000 0001 | | .DBGLEN 0x0000,0x0001 07c5 014b | K | .DBGLNO 0x014b 07c6 ; -------------------------------------------------------------------------------------- 07c6 ; Debug chain 07c6 ; -------------------------------------------------------------------------------------- 07c6 0000 0001 | | .DBGLEN 0x0000,0x0001 07c8 015b | [ | .DBGLNO 0x015b 07c9 ; -------------------------------------------------------------------------------------- 07c9 ; Debug chain 07c9 ; -------------------------------------------------------------------------------------- 07c9 0000 0006 | | .DBGLEN 0x0000,0x0006 07cb 016b 0176 | k v| .DBGLNO 0x016b,0x0176,0x0178,0x017b,0x0183,0x0186 07d1 0001 0006 | | .XXX[0x6] 07d3 0002 0003 | | 07d5 0004 0005 | | 07d7 ; -------------------------------------------------------------------------------------- 07d7 ; Debug chain 07d7 ; -------------------------------------------------------------------------------------- 07d7 0000 0003 | | .DBGLEN 0x0000,0x0003 07d9 0193 0197 | | .DBGLNO 0x0193,0x0197,0x0199 07dc 0001 0003 | | .XXX[0x3] 07de 0002 | | 07df ; -------------------------------------------------------------------------------------- 07df ; Debug chain 07df ; -------------------------------------------------------------------------------------- 07df 0000 0006 | | .DBGLEN 0x0000,0x0006 07e1 01a3 01ae | | .DBGLNO 0x01a3,0x01ae,0x01b0,0x01b3,0x01b7,0x01bb 07e7 0001 0006 | | .XXX[0x6] 07e9 0002 0003 | | 07eb 0004 0005 | | 07ed ; -------------------------------------------------------------------------------------- 07ed ; Debug chain 07ed ; -------------------------------------------------------------------------------------- 07ed 0000 0006 | | .DBGLEN 0x0000,0x0006 07ef 01c3 01ce | | .DBGLNO 0x01c3,0x01ce,0x01d0,0x01d3,0x01da,0x01e1 07f5 0001 0006 | | .XXX[0x6] 07f7 0002 0003 | | 07f9 0004 0005 | | 07fb ; -------------------------------------------------------------------------------------- 07fb ; Debug chain 07fb ; -------------------------------------------------------------------------------------- 07fb 0000 0008 | | .DBGLEN 0x0000,0x0008 07fd 01eb 01f6 | | .DBGLNO 0x01eb,0x01f6,0x01f8,0x01fd,0x0202,0x0207,0x020c,0x0211 0805 0001 0008 | | .XXX[0x8] 0807 0002 0003 | | 0809 0004 0005 | | 080b 0006 0007 | | 080d ; -------------------------------------------------------------------------------------- 080d ; Debug chain 080d ; -------------------------------------------------------------------------------------- 080d 0000 0003 | | .DBGLEN 0x0000,0x0003 080f 021b 021f | | .DBGLNO 0x021b,0x021f,0x0224 0812 ; -------------------------------------------------------------------------------------- 0812 ; Debug chain 0812 ; -------------------------------------------------------------------------------------- 0812 0001 0009 | | .DBGLEN 0x0001,0x0009 0814 022b 022d | + -| .DBGLNO 0x022b,0x022d,0x0238,0x023c,0x023f,0x0241,0x0245,0x024d,0x024f,0x0251 081e 0001 0004 | | .XXX[0x9] 0820 0002 0003 | | 0822 0006 0007 | | 0824 0008 0009 | | 0826 000a | | 0827 ; -------------------------------------------------------------------------------------- 0827 ; Debug chain 0827 ; -------------------------------------------------------------------------------------- 0827 0000 0005 | | .DBGLEN 0x0000,0x0005 0829 025b 025f | [ _| .DBGLNO 0x025b,0x025f,0x0263,0x0265,0x026e 082e ; -------------------------------------------------------------------------------------- 082e ; Debug chain 082e ; -------------------------------------------------------------------------------------- 082e 0000 0005 | | .DBGLEN 0x0000,0x0005 0830 0273 0277 | s w| .DBGLNO 0x0273,0x0277,0x027b,0x027d,0x0286 0835 ; -------------------------------------------------------------------------------------- 0835 ; Debug chain 0835 ; -------------------------------------------------------------------------------------- 0835 0000 0007 | | .DBGLEN 0x0000,0x0007 0837 028b 028f | | .DBGLNO 0x028b,0x028f,0x0293,0x0297,0x029f,0x02a1,0x02aa 083e ; -------------------------------------------------------------------------------------- 083e ; Debug chain 083e ; -------------------------------------------------------------------------------------- 083e 0000 0005 | | .DBGLEN 0x0000,0x0005 0840 02b3 02b7 | | .DBGLNO 0x02b3,0x02b7,0x02bd,0x02bf,0x02ca 0845 ; -------------------------------------------------------------------------------------- 0845 ; Debug chain 0845 ; -------------------------------------------------------------------------------------- 0845 0000 0005 | | .DBGLEN 0x0000,0x0005 0847 02d3 02d7 | | .DBGLNO 0x02d3,0x02d7,0x02db,0x02dd,0x02e6 084c ; -------------------------------------------------------------------------------------- 084c ; Debug chain 084c ; -------------------------------------------------------------------------------------- 084c 0000 0001 | | .DBGLEN 0x0000,0x0001 084e 02eb | | .DBGLNO 0x02eb 084f ; -------------------------------------------------------------------------------------- 084f ; Debug chain 084f ; -------------------------------------------------------------------------------------- 084f 0000 0009 | | .DBGLEN 0x0000,0x0009 0851 02fb 0306 | | .DBGLNO 0x02fb,0x0306,0x030b,0x0310,0x0314,0x031a,0x0320,0x0325,0x032a 085a 0001 0007 | | .XXX[0x9] 085c 0002 0003 | | 085e 0004 0005 | | 0860 0006 0008 | | 0862 0009 | | 0863 ; -------------------------------------------------------------------------------------- 0863 ; Debug chain 0863 ; -------------------------------------------------------------------------------------- 0863 0009 0000 | | .DBGLEN 0x0009,0x0000 0865 03bb 03bd | | .DBGLNO 0x03bb,0x03bd,0x03bf,0x03c1,0x03c3,0x03c5,0x03c7,0x03c9,0x03cb 086e 0001 0002 | | .XXX[0x9] 0870 0003 0004 | | 0872 0005 0007 | | 0874 0008 0009 | | 0876 000a | | 0877 ; -------------------------------------------------------------------------------------- 0877 ; Debug chain 0877 ; -------------------------------------------------------------------------------------- 0877 0009 0000 | | .DBGLEN 0x0009,0x0000 0879 03ce 03d0 | | .DBGLNO 0x03ce,0x03d0,0x03d2,0x03d4,0x03d6,0x03d8,0x03da,0x03dc,0x03de 0882 ; -------------------------------------------------------------------------------------- 0882 ; Debug chain 0882 ; -------------------------------------------------------------------------------------- 0882 0000 0003 | | .DBGLEN 0x0000,0x0003 0884 03eb 03ed | | .DBGLNO 0x03eb,0x03ed,0x03fb 0887 ; -------------------------------------------------------------------------------------- 0887 ; Debug chain 0887 ; -------------------------------------------------------------------------------------- 0887 0000 0005 | | .DBGLEN 0x0000,0x0005 0889 040b 040f | | .DBGLNO 0x040b,0x040f,0x041c,0x0420,0x042e 088e ; -------------------------------------------------------------------------------------- 088e ; Debug chain 088e ; -------------------------------------------------------------------------------------- 088e 0000 0003 | | .DBGLEN 0x0000,0x0003 0890 043f 0441 | ? A| .DBGLNO 0x043f,0x0441,0x0443 0893 ; -------------------------------------------------------------------------------------- 0893 ; Debug chain 0893 ; -------------------------------------------------------------------------------------- 0893 0000 0001 | | .DBGLEN 0x0000,0x0001 0895 044b | K | .DBGLNO 0x044b 0896 ; -------------------------------------------------------------------------------------- 0896 ; Debug chain 0896 ; -------------------------------------------------------------------------------------- 0896 0000 0001 | | .DBGLEN 0x0000,0x0001 0898 045b | [ | .DBGLNO 0x045b 0899 ; -------------------------------------------------------------------------------------- 0899 ; Debug chain 0899 ; -------------------------------------------------------------------------------------- 0899 0000 0006 | | .DBGLEN 0x0000,0x0006 089b 046b 0471 | k q| .DBGLNO 0x046b,0x0471,0x047c,0x047f,0x0485,0x048b 08a1 0001 0002 | | .XXX[0x6] 08a3 0005 0003 | | 08a5 0004 0006 | | 08a7 ; -------------------------------------------------------------------------------------- 08a7 ; Debug chain 08a7 ; -------------------------------------------------------------------------------------- 08a7 0000 0006 | | .DBGLEN 0x0000,0x0006 08a9 0493 0499 | | .DBGLNO 0x0493,0x0499,0x04a4,0x04a7,0x04ad,0x04b3 08af 0001 0002 | | .XXX[0x6] 08b1 0005 0003 | | 08b3 0004 0006 | | 08b5 ; -------------------------------------------------------------------------------------- 08b5 ; Debug chain 08b5 ; -------------------------------------------------------------------------------------- 08b5 0000 0006 | | .DBGLEN 0x0000,0x0006 08b7 04bb 04c1 | | .DBGLNO 0x04bb,0x04c1,0x04cc,0x04cf,0x04d5,0x04db 08bd 0001 0002 | | .XXX[0x6] 08bf 0005 0003 | | 08c1 0004 0006 | | 08c3 ; -------------------------------------------------------------------------------------- 08c3 ; Debug chain 08c3 ; -------------------------------------------------------------------------------------- 08c3 0000 0006 | | .DBGLEN 0x0000,0x0006 08c5 04e3 04e9 | | .DBGLNO 0x04e3,0x04e9,0x04f4,0x04f7,0x04fd,0x0503 08cb 0001 0002 | | .XXX[0x6] 08cd 0005 0003 | | 08cf 0004 0006 | | 08d1 ; -------------------------------------------------------------------------------------- 08d1 ; Debug chain 08d1 ; -------------------------------------------------------------------------------------- 08d1 0000 0005 | | .DBGLEN 0x0000,0x0005 08d3 050b 050f | | .DBGLNO 0x050b,0x050f,0x0519,0x051b,0x052b 08d8 ; -------------------------------------------------------------------------------------- 08d8 ; Debug chain 08d8 ; -------------------------------------------------------------------------------------- 08d8 0000 0005 | | .DBGLEN 0x0000,0x0005 08da 0533 0537 | 3 7| .DBGLNO 0x0533,0x0537,0x053b,0x053d,0x0547 08df ; -------------------------------------------------------------------------------------- 08df ; Debug chain 08df ; -------------------------------------------------------------------------------------- 08df 0004 0000 | | .DBGLEN 0x0004,0x0000 08e1 0553 0555 | S U| .DBGLNO 0x0553,0x0555,0x0557,0x0559 08e5 0002 0003 | | .XXX[0x4] 08e7 0004 0005 | | 08e9 ; -------------------------------------------------------------------------------------- 08e9 ; Debug chain 08e9 ; -------------------------------------------------------------------------------------- 08e9 0004 0000 | | .DBGLEN 0x0004,0x0000 08eb 055c 055e | \ ^| .DBGLNO 0x055c,0x055e,0x0560,0x0562 08ef 0002 0003 | | .XXX[0x4] 08f1 0004 0005 | | 08f3 ; -------------------------------------------------------------------------------------- 08f3 ; Debug chain 08f3 ; -------------------------------------------------------------------------------------- 08f3 0000 000a | | .DBGLEN 0x0000,0x000a 08f5 056b 0571 | k q| .DBGLNO 0x056b,0x0571,0x057c,0x057f,0x0585,0x058b,0x0591,0x0597,0x059f,0x05a5 08ff 0001 0002 | | .XXX[0xa] 0901 0009 0003 | | 0903 0004 0005 | | 0905 0006 0007 | | 0907 0008 000a | | 0909 ; -------------------------------------------------------------------------------------- 0909 ; Debug chain 0909 ; -------------------------------------------------------------------------------------- 0909 0000 000a | | .DBGLEN 0x0000,0x000a 090b 05ab 05b1 | | .DBGLNO 0x05ab,0x05b1,0x05bc,0x05bf,0x05c5,0x05cb,0x05d1,0x05d7,0x05df,0x05e5 0915 0001 0002 | | .XXX[0xa] 0917 0009 0003 | | 0919 0004 0005 | | 091b 0006 0007 | | 091d 0008 000a | | 091f ; -------------------------------------------------------------------------------------- 091f ; Debug chain 091f ; -------------------------------------------------------------------------------------- 091f 0000 000a | | .DBGLEN 0x0000,0x000a 0921 05eb 05f1 | | .DBGLNO 0x05eb,0x05f1,0x05fc,0x05ff,0x0605,0x060b,0x0611,0x0617,0x061f,0x0625 092b 0001 0002 | | .XXX[0xa] 092d 0009 0003 | | 092f 0004 0005 | | 0931 0006 0007 | | 0933 0008 000a | | 0935 ; -------------------------------------------------------------------------------------- 0935 ; Debug chain 0935 ; -------------------------------------------------------------------------------------- 0935 0000 000a | | .DBGLEN 0x0000,0x000a 0937 062b 0631 | + 1| .DBGLNO 0x062b,0x0631,0x063c,0x063f,0x0645,0x064b,0x0651,0x0657,0x065f,0x0665 0941 0001 0002 | | .XXX[0xa] 0943 0009 0003 | | 0945 0004 0005 | | 0947 0006 0007 | | 0949 0008 000a | | 094b 0000 0000 | | .BLANK 0000[0xb5]