|
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: 12288 (0x3000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦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 1670 | p | .CONST 0x1670 ; 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 800d | | .CONST 0x800d ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0121 | ! | .CONST 0x0121 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0082 | | .CONST 0x0082 ; Number of locals 000b INIT_0008: 000b 00c4 | | Action Make_Default 000c 00c4 | | Action Make_Default 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 00c4 | | Action Make_Default 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 00c4 | | Action Make_Default 0028 00c4 | | Action Make_Default 0029 00c4 | | Action Make_Default 002a 00c4 | | Action Make_Default 002b 00c4 | | Action Make_Default 002c 00c4 | | Action Make_Default 002d 00c4 | | Action Make_Default 002e 00c4 | | Action Make_Default 002f 00c4 | | Action Make_Default 0030 00c4 | | Action Make_Default 0031 00c4 | | Action Make_Default 0032 00c4 | | Action Make_Default 0033 00c4 | | Action Make_Default 0034 00c4 | | Action Make_Default 0035 00c4 | | Action Make_Default 0036 00c4 | | Action Make_Default 0037 00c4 | | Action Make_Default 0038 00c4 | | Action Make_Default 0039 00c4 | | Action Make_Default 003a 00c4 | | Action Make_Default 003b 00c4 | | Action Make_Default 003c 00c4 | | Action Make_Default 003d 00c4 | | Action Make_Default 003e 00c4 | | Action Make_Default 003f 00c4 | | Action Make_Default 0040 00c4 | | Action Make_Default 0041 00c4 | | Action Make_Default 0042 00c4 | | Action Make_Default 0043 00c4 | | Action Make_Default 0044 00c4 | | Action Make_Default 0045 00c4 | | Action Make_Default 0046 00c4 | | Action Make_Default 0047 00c4 | | Action Make_Default 0048 00c4 | | Action Make_Default 0049 00c4 | | Action Make_Default 004a 00c4 | | Action Make_Default 004b 00c4 | | Action Make_Default 004c 00c4 | | Action Make_Default 004d 00c4 | | Action Make_Default 004e 00c4 | | Action Make_Default 004f 00c4 | | Action Make_Default 0050 00c4 | | Action Make_Default 0051 00c4 | | Action Make_Default 0052 00c4 | | Action Make_Default 0053 00c4 | | Action Make_Default 0054 00c4 | | Action Make_Default 0055 00c4 | | Action Make_Default 0056 00c4 | | Action Make_Default 0057 00c4 | | Action Make_Default 0058 00c4 | | Action Make_Default 0059 00c4 | | Action Make_Default 005a 00c4 | | Action Make_Default 005b 00c4 | | Action Make_Default 005c 00c4 | | Action Make_Default 005d 00c4 | | Action Make_Default 005e 00c4 | | Action Make_Default 005f 00c4 | | Action Make_Default 0060 00c4 | | Action Make_Default 0061 00c4 | | Action Make_Default 0062 00c4 | | Action Make_Default 0063 00c4 | | Action Make_Default 0064 00c4 | | Action Make_Default 0065 00c4 | | Action Make_Default 0066 00c4 | | Action Make_Default 0067 00c4 | | Action Make_Default 0068 00c4 | | Action Make_Default 0069 00c4 | | Action Make_Default 006a 00c4 | | Action Make_Default 006b 00c4 | | Action Make_Default 006c 00c4 | | Action Make_Default 006d 00c4 | | Action Make_Default 006e 00c4 | | Action Make_Default 006f 00c4 | | Action Make_Default 0070 00c4 | | Action Make_Default 0071 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 0073 c269 | i | Store 0x1,0x69 0074 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 0076 c26a | j | Store 0x1,0x6a 0077 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 0079 c219 | | Store 0x1,0x19 007a 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated 007c c256 | V | Store 0x1,0x56 007d 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 007f c257 | W | Store 0x1,0x57 0080 029a 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Visible,Unelaborated 0082 c258 | X | Store 0x1,0x58 0083 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated 0085 c259 | Y | Store 0x1,0x59 0086 029a 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call,Visible,Unelaborated 0088 c25a | Z | Store 0x1,0x5a 0089 029a 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call,Visible,Unelaborated 008b c25b | [ | Store 0x1,0x5b 008c 029a 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call,Visible,Unelaborated 008e c25c | \ | Store 0x1,0x5c 008f 029a 070b | | Declare_Subprogram INIT_0708,For_Outer_Call,Visible,Unelaborated 0091 c25d | ] | Store 0x1,0x5d 0092 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated 0094 c26b | k | Store 0x1,0x6b 0095 029a 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call,Visible,Unelaborated 0097 c25f | _ | Store 0x1,0x5f 0098 029a 07fb | | Declare_Subprogram INIT_07f8,For_Outer_Call,Visible,Unelaborated 009a c214 | | Store 0x1,0x14 009b 029a 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call,Visible,Unelaborated 009d c260 | ` | Store 0x1,0x60 009e 029a 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call,Visible,Unelaborated 00a0 c261 | a | Store 0x1,0x61 00a1 029a 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call,Visible,Unelaborated 00a3 c262 | b | Store 0x1,0x62 00a4 029a 0923 | #| Declare_Subprogram INIT_0920,For_Outer_Call,Visible,Unelaborated 00a6 c263 | c | Store 0x1,0x63 00a7 029a 0993 | | Declare_Subprogram INIT_0990,For_Outer_Call,Visible,Unelaborated 00a9 c264 | d | Store 0x1,0x64 00aa 029a 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call,Visible,Unelaborated 00ac c271 | q | Store 0x1,0x71 00ad 029a 0adb | | Declare_Subprogram INIT_0ad8,For_Outer_Call,Visible,Unelaborated 00af c266 | f | Store 0x1,0x66 00b0 029a 0b83 | | Declare_Subprogram INIT_0b80,For_Outer_Call,Visible,Unelaborated 00b2 c24f | O | Store 0x1,0x4f 00b3 029a 0beb | | Declare_Subprogram INIT_0be8,For_Outer_Call,Visible,Unelaborated 00b5 c26c | l | Store 0x1,0x6c 00b6 029a 0c7b | {| Declare_Subprogram INIT_0c78,For_Outer_Call,Visible,Unelaborated 00b8 c272 | r | Store 0x1,0x72 00b9 00bf | | Action Accept_Activation 00ba e001 | | Load 0x0,0x1 00bb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00bc 00e3 | | Load_Encached Natural_Cache 00bd 0266 | f | Execute Discrete,Bounds 00be 00da | | Load_Top At_Offset_2 00bf 029f 0c8b | | Declare_Subprogram INIT_0c88,For_Call 00c1 4801 |H | Short_Literal 0x1 00c2 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 00c3 00e3 | | Load_Encached Natural_Cache 00c4 0266 | f | Execute Discrete,Bounds 00c5 e002 | | Load 0x0,0x2 00c6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00c7 029f 0ca3 | | Declare_Subprogram INIT_0ca0,For_Call 00c9 4801 |H | Short_Literal 0x1 00ca 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 00cb 00e5 | | Load_Encached Long_Integer_Cache 00cc 029b 0cbb | | Declare_Subprogram INIT_0cb8,For_Outer_Call,Unelaborated 00ce e003 | | Load 0x0,0x3 00cf e004 | | Load 0x0,0x4 00d0 e002 | | Load 0x0,0x2 00d1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00d2 00e1 | | Load_Encached Boolean_Cache 00d3 e276 | v | Load 0x1,0x76 00d4 1d77 | w | Execute_Immediate Reference_Lex_1,0x77 00d5 e005 | | Load 0x0,0x5 00d6 0387 | | Declare_Variable Package 00d7 00d8 | | Load_Top At_Offset_0 00d8 020f | | Execute Module,Activate 00d9 029b 0cc3 | | Declare_Subprogram INIT_0cc0,For_Outer_Call,Unelaborated 00db 1d77 | w | Execute_Immediate Reference_Lex_1,0x77 00dc 00c7 | | Action Elaborate_Subprogram 00dd 029d 0d5b | [| Declare_Subprogram INIT_0d58,For_Outer_Call 00df 1d69 | i | Execute_Immediate Reference_Lex_1,0x69 00e0 00c7 | | Action Elaborate_Subprogram 00e1 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a 00e2 00c7 | | Action Elaborate_Subprogram 00e3 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 00e4 00c7 | | Action Elaborate_Subprogram 00e5 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00e6 00c7 | | Action Elaborate_Subprogram 00e7 1d56 | V | Execute_Immediate Reference_Lex_1,0x56 00e8 00c7 | | Action Elaborate_Subprogram 00e9 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 00ea 00c7 | | Action Elaborate_Subprogram 00eb 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 00ec 00c7 | | Action Elaborate_Subprogram 00ed 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 00ee 00c7 | | Action Elaborate_Subprogram 00ef 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a 00f0 00c7 | | Action Elaborate_Subprogram 00f1 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b 00f2 00c7 | | Action Elaborate_Subprogram 00f3 1d6b | k | Execute_Immediate Reference_Lex_1,0x6b 00f4 00c7 | | Action Elaborate_Subprogram 00f5 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 00f6 00c7 | | Action Elaborate_Subprogram 00f7 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00f8 00c7 | | Action Elaborate_Subprogram 00f9 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60 00fa 00c7 | | Action Elaborate_Subprogram 00fb 1d61 | a | Execute_Immediate Reference_Lex_1,0x61 00fc 00c7 | | Action Elaborate_Subprogram 00fd 1d62 | b | Execute_Immediate Reference_Lex_1,0x62 00fe 00c7 | | Action Elaborate_Subprogram 00ff 1d63 | c | Execute_Immediate Reference_Lex_1,0x63 0100 00c7 | | Action Elaborate_Subprogram 0101 1d64 | d | Execute_Immediate Reference_Lex_1,0x64 0102 00c7 | | Action Elaborate_Subprogram 0103 029d 0d6b | k| Declare_Subprogram INIT_0d68,For_Outer_Call 0105 029d 0d7b | {| Declare_Subprogram INIT_0d78,For_Outer_Call 0107 1d71 | q | Execute_Immediate Reference_Lex_1,0x71 0108 00c7 | | Action Elaborate_Subprogram 0109 1d66 | f | Execute_Immediate Reference_Lex_1,0x66 010a 00c7 | | Action Elaborate_Subprogram 010b 029d 0d93 | | Declare_Subprogram INIT_0d90,For_Outer_Call 010d 029d 0e5b | [| Declare_Subprogram INIT_0e58,For_Outer_Call 010f 029d 0f1b | | Declare_Subprogram INIT_0f18,For_Outer_Call 0111 029d 0fab | | Declare_Subprogram INIT_0fa8,For_Outer_Call 0113 029d 1033 | 3| Declare_Subprogram INIT_1030,For_Outer_Call 0115 1d79 | y | Execute_Immediate Reference_Lex_1,0x79 0116 00c7 | | Action Elaborate_Subprogram 0117 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c 0118 00c7 | | Action Elaborate_Subprogram 0119 029d 1053 | S| Declare_Subprogram INIT_1050,For_Outer_Call 011b 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d 011c 00c7 | | Action Elaborate_Subprogram 011d 1d6c | l | Execute_Immediate Reference_Lex_1,0x6c 011e 00c7 | | Action Elaborate_Subprogram 011f 1d72 | r | Execute_Immediate Reference_Lex_1,0x72 0120 00c7 | | Action Elaborate_Subprogram 0121 BODY_0008: 0121 00bc | | Action Signal_Activated 0122 00bb | | Action Signal_Completion 0123 0000 0000 | | .BLANK 0000[0x5] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 0136 | 6 | .CONST 0x0136 ; Address of begin 0129 01b1 | | .CONST 0x01b1 ; Address of exception handler 012a 0006 | | .CONST 0x0006 ; Number of locals 012b INIT_0128: 012b e006 | | Load 0x0,0x6 012c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 012d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 012e e007 | | Load 0x0,0x7 012f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0130 029f 10eb | | Declare_Subprogram INIT_10e8,For_Call 0132 029f 10fb | | Declare_Subprogram INIT_10f8,For_Call 0134 029f 1123 | #| Declare_Subprogram INIT_1120,For_Call 0136 BODY_0128: 0136 e402 | | Load 0x2,0x2 0137 e008 | | Load 0x0,0x8 0138 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0139 e5f5 | | Load 0x2,-0xb 013a e009 | | Load 0x0,0x9 013b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 013c 4805 |H | Short_Literal 0x5 013d 0092 13c9 | | Action Push_String_Extended,0x13c9 ; "?'C(ADA)" 013f 0092 13ca | | Action Push_String_Extended,0x13ca ; "[Units,,[]$]" 0141 e5ff | | Load 0x2,-0x1 0142 e00a | | Load 0x0,0xa 0143 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0144 e008 | | Load 0x0,0x8 0145 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0146 187a | z | Execute Package,Field_Execute,Field_Number 0x7a 0147 c402 | | Store 0x2,0x2 0148 4800 |H | Short_Literal 0x0 0149 e402 | | Load 0x2,0x2 014a e006 | | Load 0x0,0x6 014b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 014c 7002 |p | Jump_Nonzero 0x14f 014d e00b | | Load 0x0,0xb 014e 0257 | W | Execute Discrete,Raise 014f 8406 | | Call 0x2,0x6 0150 e006 | | Load 0x0,0x6 0151 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0152 e007 | | Load 0x0,0x7 0153 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0154 e5f2 | | Load 0x2,-0xe 0155 4800 |H | Short_Literal 0x0 0156 4801 |H | Short_Literal 0x1 0157 e5f3 | | Load 0x2,-0xd 0158 e5f5 | | Load 0x2,-0xb 0159 e5ff | | Load 0x2,-0x1 015a 826a | j | Call 0x1,0x6a 015b c403 | | Store 0x2,0x3 015c c402 | | Store 0x2,0x2 015d 4800 |H | Short_Literal 0x0 015e e402 | | Load 0x2,0x2 015f e006 | | Load 0x0,0x6 0160 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0161 7002 |p | Jump_Nonzero 0x164 0162 e00b | | Load 0x0,0xb 0163 0257 | W | Execute Discrete,Raise 0164 e402 | | Load 0x2,0x2 0165 e5f5 | | Load 0x2,-0xb 0166 e009 | | Load 0x0,0x9 0167 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 0168 e5fb | | Load 0x2,-0x5 0169 e403 | | Load 0x2,0x3 016a 0227 | ' | Execute Access,All_Reference 016b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 016c e008 | | Load 0x0,0x8 016d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 016e 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 016f c402 | | Store 0x2,0x2 0170 4800 |H | Short_Literal 0x0 0171 e402 | | Load 0x2,0x2 0172 e006 | | Load 0x0,0x6 0173 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0174 7002 |p | Jump_Nonzero 0x177 0175 e00b | | Load 0x0,0xb 0176 0257 | W | Execute Discrete,Raise 0177 e402 | | Load 0x2,0x2 0178 4801 |H | Short_Literal 0x1 0179 e403 | | Load 0x2,0x3 017a 0227 | ' | Execute Access,All_Reference 017b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 017c e008 | | Load 0x0,0x8 017d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 017e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 017f c402 | | Store 0x2,0x2 0180 4800 |H | Short_Literal 0x0 0181 e402 | | Load 0x2,0x2 0182 e006 | | Load 0x0,0x6 0183 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0184 7002 |p | Jump_Nonzero 0x187 0185 e00b | | Load 0x0,0xb 0186 0257 | W | Execute Discrete,Raise 0187 e402 | | Load 0x2,0x2 0188 4801 |H | Short_Literal 0x1 0189 e403 | | Load 0x2,0x3 018a 0227 | ' | Execute Access,All_Reference 018b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 018c e008 | | Load 0x0,0x8 018d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 018e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 018f c402 | | Store 0x2,0x2 0190 4800 |H | Short_Literal 0x0 0191 e402 | | Load 0x2,0x2 0192 e006 | | Load 0x0,0x6 0193 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0194 7002 |p | Jump_Nonzero 0x197 0195 e00b | | Load 0x0,0xb 0196 0257 | W | Execute Discrete,Raise 0197 00db | | Load_Top At_Offset_3 0198 0229 | ) | Execute Access,All_Read 0199 00d8 | | Load_Top At_Offset_0 019a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 019b e008 | | Load 0x0,0x8 019c 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 019d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 019e 00d9 | | Load_Top At_Offset_1 019f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01a0 00d1 | | Pop_Control Pop_Count_1 01a1 e5f3 | | Load 0x2,-0xd 01a2 e00c | | Load 0x0,0xc 01a3 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 01a4 e5ff | | Load 0x2,-0x1 01a5 e00a | | Load 0x0,0xa 01a6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01a7 0092 13cb | | Action Push_String_Extended,0x13cb ; ".state.tool_state.@state_file" 01a9 01cc | | Execute Vector,Catenate 01aa 0092 13cc | | Action Push_String_Extended,0x13cc ; "Network_Public => RWCOD" 01ac e00d | | Load 0x0,0xd 01ad 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01ae e402 | | Load 0x2,0x2 01af a5f1 | | Store_Unchecked 0x2,-0xf 01b0 450f |E | Exit_Suprogram New_Top_Offset 0xf 01b1 TRAP_0128: 01b1 e00b | | Load 0x0,0xb 01b2 010f | | Execute Exception,Equal 01b3 680f |h | Jump_Zero 0x1c3 01b4 e402 | | Load 0x2,0x2 01b5 a5f1 | | Store_Unchecked 0x2,-0xf 01b6 e403 | | Load 0x2,0x3 01b7 680a |h | Jump_Zero 0x1c2 01b8 e403 | | Load 0x2,0x3 01b9 0229 | ) | Execute Access,All_Read 01ba 00d8 | | Load_Top At_Offset_0 01bb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01bc e008 | | Load 0x0,0x8 01bd 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01be 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 01bf 00d9 | | Load_Top At_Offset_1 01c0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01c1 00d1 | | Pop_Control Pop_Count_1 01c2 450f |E | Exit_Suprogram New_Top_Offset 0xf 01c3 e006 | | Load 0x0,0x6 01c4 1b17 | | Execute Package,Field_Read,Field_Number 0x17 01c5 010f | | Execute Exception,Equal 01c6 6823 |h# | Jump_Zero 0x1ea 01c7 e006 | | Load 0x0,0x6 01c8 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01c9 a5f1 | | Store_Unchecked 0x2,-0xf 01ca e5f3 | | Load 0x2,-0xd 01cb 4801 |H | Short_Literal 0x1 01cc 4801 |H | Short_Literal 0x1 01cd e00e | | Load 0x0,0xe 01ce 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01cf 035b | [ | Declare_Type Array,Constrained 01d0 0337 | 7 | Declare_Variable Array 01d1 e5ff | | Load 0x2,-0x1 01d2 e00e | | Load 0x0,0xe 01d3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01d4 e00e | | Load 0x0,0xe 01d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01d6 0119 | | Execute Any,Check_In_Formal_Type 01d7 4801 |H | Short_Literal 0x1 01d8 00da | | Load_Top At_Offset_2 01d9 01d6 | | Execute Vector,Field_Write 01da 6035 |`5 | Indirect_Literal Discrete,0x210,{0x00000000, 0x00008116} 01db e006 | | Load 0x0,0x6 01dc 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 01dd e403 | | Load 0x2,0x3 01de 680a |h | Jump_Zero 0x1e9 01df e403 | | Load 0x2,0x3 01e0 0229 | ) | Execute Access,All_Read 01e1 00d8 | | Load_Top At_Offset_0 01e2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01e3 e008 | | Load 0x0,0x8 01e4 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01e5 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 01e6 00d9 | | Load_Top At_Offset_1 01e7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01e8 00d1 | | Pop_Control Pop_Count_1 01e9 450f |E | Exit_Suprogram New_Top_Offset 0xf 01ea e5f3 | | Load 0x2,-0xd 01eb 0092 13cd | | Action Push_String_Extended,0x13cd ; "Target_Builder.Library.Initialize" 01ed e00f | | Load 0x0,0xf 01ee 180f | | Execute Package,Field_Execute,Field_Number 0xf 01ef e403 | | Load 0x2,0x3 01f0 680a |h | Jump_Zero 0x1fb 01f1 e403 | | Load 0x2,0x3 01f2 0229 | ) | Execute Access,All_Read 01f3 00d8 | | Load_Top At_Offset_0 01f4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01f5 e008 | | Load 0x0,0x8 01f6 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01f7 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 01f8 00d9 | | Load_Top At_Offset_1 01f9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01fa 00d1 | | Pop_Control Pop_Count_1 01fb 4801 |H | Short_Literal 0x1 01fc 4801 |H | Short_Literal 0x1 01fd e00e | | Load 0x0,0xe 01fe 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01ff 035b | [ | Declare_Type Array,Constrained 0200 0337 | 7 | Declare_Variable Array 0201 e5ff | | Load 0x2,-0x1 0202 e00e | | Load 0x0,0xe 0203 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0204 e00e | | Load 0x0,0xe 0205 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0206 0119 | | Execute Any,Check_In_Formal_Type 0207 4801 |H | Short_Literal 0x1 0208 00da | | Load_Top At_Offset_2 0209 01d6 | | Execute Vector,Field_Write 020a 6005 |` | Indirect_Literal Discrete,0x210,{0x00000000, 0x00008116} 020b e006 | | Load 0x0,0x6 020c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 020d a5f1 | | Store_Unchecked 0x2,-0xf 020e 450f |E | Exit_Suprogram New_Top_Offset 0xf 020f 0000 | | .XXX[0x1] 0210 0000 0000 | | .LITERAL {0x00000000, 0x00008116} 0214 0000 0000 | | .BLANK 0000[0x4] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0238 | 8 | .CONST 0x0238 ; Address of begin 0219 02ee | | .CONST 0x02ee ; Address of exception handler 021a 000a | | .CONST 0x000a ; Number of locals 021b INIT_0218: 021b e006 | | Load 0x0,0x6 021c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 021d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 021e e008 | | Load 0x0,0x8 021f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0220 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0221 02c7 | | Declare_Variable Any 0222 00d8 | | Load_Top At_Offset_0 0223 1c00 | | Execute_Immediate Run_Utility,0x0 0224 e5fb | | Load 0x2,-0x5 0225 00e1 | | Load_Encached Boolean_Cache 0226 03f1 | | Declare_Variable Discrete,With_Value 0227 e5fa | | Load 0x2,-0x6 0228 00e1 | | Load_Encached Boolean_Cache 0229 03f1 | | Declare_Variable Discrete,With_Value 022a e007 | | Load 0x0,0x7 022b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 022c 03bc | | Declare_Variable Access,By_Allocation 022d 00d8 | | Load_Top At_Offset_0 022e 0227 | ' | Execute Access,All_Reference 022f 1c00 | | Execute_Immediate Run_Utility,0x0 0230 029f 1163 | c| Declare_Subprogram INIT_1160,For_Call 0232 029f 1173 | s| Declare_Subprogram INIT_1170,For_Call 0234 029f 11c3 | | Declare_Subprogram INIT_11c0,For_Call 0236 029f 11d3 | | Declare_Subprogram INIT_11d0,For_Call 0238 BODY_0218: 0238 e5fd | | Load 0x2,-0x3 0239 0092 13ce | | Action Push_String_Extended,0x13ce ; "Target_Builder.Library.Open" 023b e00f | | Load 0x0,0xf 023c 180e | | Execute Package,Field_Execute,Field_Number 0xe 023d e402 | | Load 0x2,0x2 023e e403 | | Load 0x2,0x3 023f 0120 | | Execute Any,Is_Value 0240 6804 |h | Jump_Zero 0x245 0241 e008 | | Load 0x0,0x8 0242 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0243 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0244 7801 |x | Jump 0x246 0245 e403 | | Load 0x2,0x3 0246 4801 |H | Short_Literal 0x1 0247 e5fe | | Load 0x2,-0x2 0248 e009 | | Load 0x0,0x9 0249 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 024a e5fc | | Load 0x2,-0x4 024b e5ff | | Load 0x2,-0x1 024c e00a | | Load 0x0,0xa 024d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 024e e008 | | Load 0x0,0x8 024f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0250 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0251 c403 | | Store 0x2,0x3 0252 c402 | | Store 0x2,0x2 0253 4800 |H | Short_Literal 0x0 0254 e402 | | Load 0x2,0x2 0255 e006 | | Load 0x0,0x6 0256 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0257 7021 |p! | Jump_Nonzero 0x279 0258 e5fd | | Load 0x2,-0x3 0259 e402 | | Load 0x2,0x2 025a e006 | | Load 0x0,0x6 025b 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 025c e403 | | Load 0x2,0x3 025d e008 | | Load 0x0,0x8 025e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 025f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0260 7011 |p | Jump_Nonzero 0x272 0261 e5fd | | Load 0x2,-0x3 0262 4822 |H" | Short_Literal 0x22 0263 0092 13cf | | Action Push_String_Extended,0x13cf ; "Null Handle after failed Open for view \x22" 0265 e5ff | | Load 0x2,-0x1 0266 e00a | | Load 0x0,0xa 0267 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0268 01cc | | Execute Vector,Catenate 0269 01cb | | Execute Vector,Append 026a e00f | | Load 0x0,0xf 026b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 026c e007 | | Load 0x0,0x7 026d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 026e a5f9 | | Store_Unchecked 0x2,-0x7 026f e402 | | Load 0x2,0x2 0270 a5f8 | | Store_Unchecked 0x2,-0x8 0271 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0272 840a | | Call 0x2,0xa 0273 e007 | | Load 0x0,0x7 0274 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0275 a5f9 | | Store_Unchecked 0x2,-0x7 0276 e402 | | Load 0x2,0x2 0277 a5f8 | | Store_Unchecked 0x2,-0x8 0278 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0279 e403 | | Load 0x2,0x3 027a e406 | | Load 0x2,0x6 027b 0227 | ' | Execute Access,All_Reference 027c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 027d 4801 |H | Short_Literal 0x1 027e e403 | | Load 0x2,0x3 027f e008 | | Load 0x0,0x8 0280 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0281 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0282 e406 | | Load 0x2,0x6 0283 0227 | ' | Execute Access,All_Reference 0284 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0285 e406 | | Load 0x2,0x6 0286 0227 | ' | Execute Access,All_Reference 0287 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0288 8407 | | Call 0x2,0x7 0289 701b |p | Jump_Nonzero 0x2a5 028a e5fc | | Load 0x2,-0x4 028b 0f01 | | Execute_Immediate Equal,0x1 028c 6806 |h | Jump_Zero 0x293 028d 4801 |H | Short_Literal 0x1 028e a404 | | Store_Unchecked 0x2,0x4 028f 4801 |H | Short_Literal 0x1 0290 a405 | | Store_Unchecked 0x2,0x5 0291 8408 | | Call 0x2,0x8 0292 7812 |x | Jump 0x2a5 0293 e00c | | Load 0x0,0xc 0294 180e | | Execute Package,Field_Execute,Field_Number 0xe 0295 4801 |H | Short_Literal 0x1 0296 e5ff | | Load 0x2,-0x1 0297 e00a | | Load 0x0,0xa 0298 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0299 0092 13d0 | | Action Push_String_Extended,0x13d0 ; " has obsolete state information." 029b 01cc | | Execute Vector,Catenate 029c e010 | | Load 0x0,0x10 029d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 029e e00c | | Load 0x0,0xc 029f 180e | | Execute Package,Field_Execute,Field_Number 0xe 02a0 4801 |H | Short_Literal 0x1 02a1 0092 13d1 | | Action Push_String_Extended,0x13d1 ; "Run Rci.Refresh_Views to refresh." 02a3 e010 | | Load 0x0,0x10 02a4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02a5 e5fc | | Load 0x2,-0x4 02a6 0f01 | | Execute_Immediate Equal,0x1 02a7 681a |h | Jump_Zero 0x2c2 02a8 e404 | | Load 0x2,0x4 02a9 680c |h | Jump_Zero 0x2b6 02aa e405 | | Load 0x2,0x5 02ab 4802 |H | Short_Literal 0x2 02ac e405 | | Load 0x2,0x5 02ad 8409 | | Call 0x2,0x9 02ae e008 | | Load 0x0,0x8 02af 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 02b0 180e | | Execute Package,Field_Execute,Field_Number 0xe 02b1 e403 | | Load 0x2,0x3 02b2 e008 | | Load 0x0,0x8 02b3 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 02b4 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 02b5 7817 |x | Jump 0x2cd 02b6 e405 | | Load 0x2,0x5 02b7 4800 |H | Short_Literal 0x0 02b8 e405 | | Load 0x2,0x5 02b9 8409 | | Call 0x2,0x9 02ba e008 | | Load 0x0,0x8 02bb 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 02bc 180e | | Execute Package,Field_Execute,Field_Number 0xe 02bd e403 | | Load 0x2,0x3 02be e008 | | Load 0x0,0x8 02bf 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 02c0 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 02c1 780b |x | Jump 0x2cd 02c2 4800 |H | Short_Literal 0x0 02c3 4800 |H | Short_Literal 0x0 02c4 4800 |H | Short_Literal 0x0 02c5 8409 | | Call 0x2,0x9 02c6 e008 | | Load 0x0,0x8 02c7 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 02c8 180e | | Execute Package,Field_Execute,Field_Number 0xe 02c9 e403 | | Load 0x2,0x3 02ca e008 | | Load 0x0,0x8 02cb 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 02cc 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 02cd e405 | | Load 0x2,0x5 02ce 681a |h | Jump_Zero 0x2e9 02cf e5fc | | Load 0x2,-0x4 02d0 0f01 | | Execute_Immediate Equal,0x1 02d1 6817 |h | Jump_Zero 0x2e9 02d2 e006 | | Load 0x0,0x6 02d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02d4 e5fd | | Load 0x2,-0x3 02d5 e5fe | | Load 0x2,-0x2 02d6 e403 | | Load 0x2,0x3 02d7 827a | z | Call 0x1,0x7a 02d8 c402 | | Store 0x2,0x2 02d9 4800 |H | Short_Literal 0x0 02da e402 | | Load 0x2,0x2 02db e006 | | Load 0x0,0x6 02dc 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 02dd 700b |p | Jump_Nonzero 0x2e9 02de e403 | | Load 0x2,0x3 02df e008 | | Load 0x0,0x8 02e0 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 02e1 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 02e2 c403 | | Store 0x2,0x3 02e3 e007 | | Load 0x0,0x7 02e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02e5 a5f9 | | Store_Unchecked 0x2,-0x7 02e6 e402 | | Load 0x2,0x2 02e7 a5f8 | | Store_Unchecked 0x2,-0x8 02e8 4507 |E | Exit_Suprogram New_Top_Offset 0x7 02e9 e406 | | Load 0x2,0x6 02ea a5f9 | | Store_Unchecked 0x2,-0x7 02eb e402 | | Load 0x2,0x2 02ec a5f8 | | Store_Unchecked 0x2,-0x8 02ed 4507 |E | Exit_Suprogram New_Top_Offset 0x7 02ee TRAP_0218: 02ee e006 | | Load 0x0,0x6 02ef 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02f0 010f | | Execute Exception,Equal 02f1 681f |h | Jump_Zero 0x311 02f2 e006 | | Load 0x0,0x6 02f3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02f4 a5f8 | | Store_Unchecked 0x2,-0x8 02f5 e5fd | | Load 0x2,-0x3 02f6 4801 |H | Short_Literal 0x1 02f7 4801 |H | Short_Literal 0x1 02f8 e00e | | Load 0x0,0xe 02f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02fa 035b | [ | Declare_Type Array,Constrained 02fb 0337 | 7 | Declare_Variable Array 02fc e5ff | | Load 0x2,-0x1 02fd e00e | | Load 0x0,0xe 02fe 181a | | Execute Package,Field_Execute,Field_Number 0x1a 02ff e00e | | Load 0x0,0xe 0300 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0301 0119 | | Execute Any,Check_In_Formal_Type 0302 4801 |H | Short_Literal 0x1 0303 00da | | Load_Top At_Offset_2 0304 01d6 | | Execute Vector,Field_Write 0305 602e |`. | Indirect_Literal Discrete,0x334,{0x00000000, 0x00008118} 0306 e006 | | Load 0x0,0x6 0307 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0308 e403 | | Load 0x2,0x3 0309 e008 | | Load 0x0,0x8 030a 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 030b 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 030c c403 | | Store 0x2,0x3 030d e007 | | Load 0x0,0x7 030e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 030f a5f9 | | Store_Unchecked 0x2,-0x7 0310 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0311 e5fd | | Load 0x2,-0x3 0312 0092 13ce | | Action Push_String_Extended,0x13ce ; "Target_Builder.Library.Open" 0314 e00f | | Load 0x0,0xf 0315 180f | | Execute Package,Field_Execute,Field_Number 0xf 0316 e403 | | Load 0x2,0x3 0317 e008 | | Load 0x0,0x8 0318 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0319 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 031a c403 | | Store 0x2,0x3 031b e007 | | Load 0x0,0x7 031c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 031d a5f9 | | Store_Unchecked 0x2,-0x7 031e 4801 |H | Short_Literal 0x1 031f 4801 |H | Short_Literal 0x1 0320 e00e | | Load 0x0,0xe 0321 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0322 035b | [ | Declare_Type Array,Constrained 0323 0337 | 7 | Declare_Variable Array 0324 e5ff | | Load 0x2,-0x1 0325 e00e | | Load 0x0,0xe 0326 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0327 e00e | | Load 0x0,0xe 0328 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0329 0119 | | Execute Any,Check_In_Formal_Type 032a 4801 |H | Short_Literal 0x1 032b 00da | | Load_Top At_Offset_2 032c 01d6 | | Execute Vector,Field_Write 032d 6006 |` | Indirect_Literal Discrete,0x334,{0x00000000, 0x00008118} 032e e006 | | Load 0x0,0x6 032f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0330 a5f8 | | Store_Unchecked 0x2,-0x8 0331 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0332 0000 0000 | | .XXX[0x2] 0334 0000 0000 | | .LITERAL {0x00000000, 0x00008118} 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033e | > | .CONST 0x033e ; Address of begin 0339 0366 | f | .CONST 0x0366 ; Address of exception handler 033a 0002 | | .CONST 0x0002 ; Number of locals 033b INIT_0338: 033b e006 | | Load 0x0,0x6 033c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 033d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 033e BODY_0338: 033e e006 | | Load 0x0,0x6 033f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0340 e5ff | | Load 0x2,-0x1 0341 e5fe | | Load 0x2,-0x2 0342 8011 | | Call 0x0,0x11 0343 0059 | Y | Store_Top Discrete,At_Offset_1 0344 00db | | Load_Top At_Offset_3 0345 0092 13d2 | | Action Push_String_Extended,0x13d2 ; "After Check_State in Close" 0347 e00f | | Load 0x0,0xf 0348 180e | | Execute Package,Field_Execute,Field_Number 0xe 0349 4800 |H | Short_Literal 0x0 034a 00d9 | | Load_Top At_Offset_1 034b e006 | | Load 0x0,0x6 034c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 034d 6815 |h | Jump_Zero 0x363 034e e5fe | | Load 0x2,-0x2 034f 0229 | ) | Execute Access,All_Read 0350 00d8 | | Load_Top At_Offset_0 0351 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0352 e008 | | Load 0x0,0x8 0353 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0354 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0355 00d9 | | Load_Top At_Offset_1 0356 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0357 00d1 | | Pop_Control Pop_Count_1 0358 00db | | Load_Top At_Offset_3 0359 0092 13d3 | | Action Push_String_Extended,0x13d3 ; "After Bdomain.Close in Close" 035b e00f | | Load 0x0,0xf 035c 180e | | Execute Package,Field_Execute,Field_Number 0xe 035d e007 | | Load 0x0,0x7 035e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 035f a5fe | | Store_Unchecked 0x2,-0x2 0360 4800 |H | Short_Literal 0x0 0361 a5fd | | Store_Unchecked 0x2,-0x3 0362 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0363 00d8 | | Load_Top At_Offset_0 0364 a5fd | | Store_Unchecked 0x2,-0x3 0365 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0366 TRAP_0338: 0366 e006 | | Load 0x0,0x6 0367 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0368 010f | | Execute Exception,Equal 0369 6804 |h | Jump_Zero 0x36e 036a e006 | | Load 0x0,0x6 036b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 036c a5fd | | Store_Unchecked 0x2,-0x3 036d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 036e e5ff | | Load 0x2,-0x1 036f 0092 13d4 | | Action Push_String_Extended,0x13d4 ; "Target_Builder.Library.Close" 0371 e00f | | Load 0x0,0xf 0372 180f | | Execute Package,Field_Execute,Field_Number 0xf 0373 4801 |H | Short_Literal 0x1 0374 4801 |H | Short_Literal 0x1 0375 e00e | | Load 0x0,0xe 0376 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0377 035b | [ | Declare_Type Array,Constrained 0378 0337 | 7 | Declare_Variable Array 0379 e5fe | | Load 0x2,-0x2 037a 0227 | ' | Execute Access,All_Reference 037b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 037c e008 | | Load 0x0,0x8 037d 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 037e 1820 | | Execute Package,Field_Execute,Field_Number 0x20 037f e00e | | Load 0x0,0xe 0380 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0381 0119 | | Execute Any,Check_In_Formal_Type 0382 4801 |H | Short_Literal 0x1 0383 00da | | Load_Top At_Offset_2 0384 01d6 | | Execute Vector,Field_Write 0385 6006 |` | Indirect_Literal Discrete,0x38c,{0x00000000, 0x00008106} 0386 e006 | | Load 0x0,0x6 0387 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0388 a5fd | | Store_Unchecked 0x2,-0x3 0389 4502 |E | Exit_Suprogram New_Top_Offset 0x2 038a 0000 0000 | | .XXX[0x2] 038c 0000 0000 | | .LITERAL {0x00000000, 0x00008106} 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; -------------------------------------------------------------------------------------- 0390 0396 | | .CONST 0x0396 ; Address of begin 0391 0403 | | .CONST 0x0403 ; Address of exception handler 0392 0002 | | .CONST 0x0002 ; Number of locals 0393 INIT_0390: 0393 e006 | | Load 0x0,0x6 0394 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0395 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0396 BODY_0390: 0396 e006 | | Load 0x0,0x6 0397 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0398 e5fd | | Load 0x2,-0x3 0399 e5fc | | Load 0x2,-0x4 039a 8011 | | Call 0x0,0x11 039b 0059 | Y | Store_Top Discrete,At_Offset_1 039c 4800 |H | Short_Literal 0x0 039d 00d9 | | Load_Top At_Offset_1 039e e006 | | Load 0x0,0x6 039f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 03a0 685f |h_ | Jump_Zero 0x400 03a1 00db | | Load_Top At_Offset_3 03a2 01db | | Execute Vector,Length 03a3 703f |p? | Jump_Nonzero 0x3e3 03a4 e5fd | | Load 0x2,-0x3 03a5 4801 |H | Short_Literal 0x1 03a6 4802 |H | Short_Literal 0x2 03a7 e00e | | Load 0x0,0xe 03a8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03a9 035b | [ | Declare_Type Array,Constrained 03aa 0337 | 7 | Declare_Variable Array 03ab e5fc | | Load 0x2,-0x4 03ac 0227 | ' | Execute Access,All_Reference 03ad 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03ae e008 | | Load 0x0,0x8 03af 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 03b0 1820 | | Execute Package,Field_Execute,Field_Number 0x20 03b1 e00e | | Load 0x0,0xe 03b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03b3 0119 | | Execute Any,Check_In_Formal_Type 03b4 4801 |H | Short_Literal 0x1 03b5 00da | | Load_Top At_Offset_2 03b6 01d6 | | Execute Vector,Field_Write 03b7 e5ff | | Load 0x2,-0x1 03b8 e00e | | Load 0x0,0xe 03b9 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03ba e00e | | Load 0x0,0xe 03bb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03bc 0119 | | Execute Any,Check_In_Formal_Type 03bd 4802 |H | Short_Literal 0x2 03be 00da | | Load_Top At_Offset_2 03bf 01d6 | | Execute Vector,Field_Write 03c0 608f |` | Indirect_Literal Discrete,0x450,{0x00000000, 0x00008121} 03c1 e006 | | Load 0x0,0x6 03c2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 03c3 4801 |H | Short_Literal 0x1 03c4 4802 |H | Short_Literal 0x2 03c5 e00e | | Load 0x0,0xe 03c6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03c7 035b | [ | Declare_Type Array,Constrained 03c8 0337 | 7 | Declare_Variable Array 03c9 e5fc | | Load 0x2,-0x4 03ca 0227 | ' | Execute Access,All_Reference 03cb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03cc e008 | | Load 0x0,0x8 03cd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03ce 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 03cf e00e | | Load 0x0,0xe 03d0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03d1 0119 | | Execute Any,Check_In_Formal_Type 03d2 4801 |H | Short_Literal 0x1 03d3 00da | | Load_Top At_Offset_2 03d4 01d6 | | Execute Vector,Field_Write 03d5 e5ff | | Load 0x2,-0x1 03d6 e00e | | Load 0x0,0xe 03d7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03d8 e00e | | Load 0x0,0xe 03d9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03da 0119 | | Execute Any,Check_In_Formal_Type 03db 4802 |H | Short_Literal 0x2 03dc 00da | | Load_Top At_Offset_2 03dd 01d6 | | Execute Vector,Field_Write 03de 6071 |`q | Indirect_Literal Discrete,0x450,{0x00000000, 0x00008121} 03df e006 | | Load 0x0,0x6 03e0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03e1 a5fb | | Store_Unchecked 0x2,-0x5 03e2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03e3 00d8 | | Load_Top At_Offset_0 03e4 e5fe | | Load 0x2,-0x2 03e5 e009 | | Load 0x0,0x9 03e6 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 03e7 e5ff | | Load 0x2,-0x1 03e8 e5fc | | Load 0x2,-0x4 03e9 8012 | | Call 0x0,0x12 03ea e008 | | Load 0x0,0x8 03eb 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03ec 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 03ed 0059 | Y | Store_Top Discrete,At_Offset_1 03ee 4800 |H | Short_Literal 0x0 03ef 00d9 | | Load_Top At_Offset_1 03f0 e006 | | Load 0x0,0x6 03f1 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 03f2 7003 |p | Jump_Nonzero 0x3f6 03f3 00d8 | | Load_Top At_Offset_0 03f4 a5fb | | Store_Unchecked 0x2,-0x5 03f5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03f6 e5fd | | Load 0x2,-0x3 03f7 0092 13d5 | | Action Push_String_Extended,0x13d5 ; "Target directory name has been set to \x22" 03f9 e5ff | | Load 0x2,-0x1 03fa 01cc | | Execute Vector,Catenate 03fb 0092 13d6 | | Action Push_String_Extended,0x13d6 ; "\x22" 03fd 01cc | | Execute Vector,Catenate 03fe e00f | | Load 0x0,0xf 03ff 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0400 00d8 | | Load_Top At_Offset_0 0401 a5fb | | Store_Unchecked 0x2,-0x5 0402 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0403 TRAP_0390: 0403 e006 | | Load 0x0,0x6 0404 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0405 010f | | Execute Exception,Equal 0406 6823 |h# | Jump_Zero 0x42a 0407 e006 | | Load 0x0,0x6 0408 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0409 a5fb | | Store_Unchecked 0x2,-0x5 040a e5fd | | Load 0x2,-0x3 040b 4801 |H | Short_Literal 0x1 040c 4802 |H | Short_Literal 0x2 040d e00e | | Load 0x0,0xe 040e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 040f 035b | [ | Declare_Type Array,Constrained 0410 0337 | 7 | Declare_Variable Array 0411 e5fc | | Load 0x2,-0x4 0412 0227 | ' | Execute Access,All_Reference 0413 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0414 e008 | | Load 0x0,0x8 0415 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0416 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0417 e00e | | Load 0x0,0xe 0418 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0419 0119 | | Execute Any,Check_In_Formal_Type 041a 4801 |H | Short_Literal 0x1 041b 00da | | Load_Top At_Offset_2 041c 01d6 | | Execute Vector,Field_Write 041d e5ff | | Load 0x2,-0x1 041e e00e | | Load 0x0,0xe 041f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0420 e00e | | Load 0x0,0xe 0421 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0422 0119 | | Execute Any,Check_In_Formal_Type 0423 4802 |H | Short_Literal 0x2 0424 00da | | Load_Top At_Offset_2 0425 01d6 | | Execute Vector,Field_Write 0426 6029 |`) | Indirect_Literal Discrete,0x450,{0x00000000, 0x00008121} 0427 e006 | | Load 0x0,0x6 0428 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0429 4504 |E | Exit_Suprogram New_Top_Offset 0x4 042a e5fd | | Load 0x2,-0x3 042b 0092 13d7 | | Action Push_String_Extended,0x13d7 ; "Target_Builder.Library.Set_Target_Directory_Name" 042d e00f | | Load 0x0,0xf 042e 180f | | Execute Package,Field_Execute,Field_Number 0xf 042f 4801 |H | Short_Literal 0x1 0430 4802 |H | Short_Literal 0x2 0431 e00e | | Load 0x0,0xe 0432 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0433 035b | [ | Declare_Type Array,Constrained 0434 0337 | 7 | Declare_Variable Array 0435 e5fc | | Load 0x2,-0x4 0436 0227 | ' | Execute Access,All_Reference 0437 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0438 e008 | | Load 0x0,0x8 0439 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 043a 1820 | | Execute Package,Field_Execute,Field_Number 0x20 043b e00e | | Load 0x0,0xe 043c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 043d 0119 | | Execute Any,Check_In_Formal_Type 043e 4801 |H | Short_Literal 0x1 043f 00da | | Load_Top At_Offset_2 0440 01d6 | | Execute Vector,Field_Write 0441 e5ff | | Load 0x2,-0x1 0442 e00e | | Load 0x0,0xe 0443 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0444 e00e | | Load 0x0,0xe 0445 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0446 0119 | | Execute Any,Check_In_Formal_Type 0447 4802 |H | Short_Literal 0x2 0448 00da | | Load_Top At_Offset_2 0449 01d6 | | Execute Vector,Field_Write 044a 6005 |` | Indirect_Literal Discrete,0x450,{0x00000000, 0x00008121} 044b e006 | | Load 0x0,0x6 044c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 044d a5fb | | Store_Unchecked 0x2,-0x5 044e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 044f 0000 | | .XXX[0x1] 0450 0000 0000 | | .LITERAL {0x00000000, 0x00008121} 0454 0000 0000 | | .BLANK 0000[0x4] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045e | ^ | .CONST 0x045e ; Address of begin 0459 0475 | u | .CONST 0x0475 ; Address of exception handler 045a 0002 | | .CONST 0x0002 ; Number of locals 045b INIT_0458: 045b e006 | | Load 0x0,0x6 045c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 045d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 045e BODY_0458: 045e e006 | | Load 0x0,0x6 045f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0460 e5fd | | Load 0x2,-0x3 0461 e5ff | | Load 0x2,-0x1 0462 8011 | | Call 0x0,0x11 0463 0059 | Y | Store_Top Discrete,At_Offset_1 0464 4800 |H | Short_Literal 0x0 0465 00d9 | | Load_Top At_Offset_1 0466 e006 | | Load 0x0,0x6 0467 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0468 6809 |h | Jump_Zero 0x472 0469 e5fe | | Load 0x2,-0x2 046a e009 | | Load 0x0,0x9 046b 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 046c e5ff | | Load 0x2,-0x1 046d 8012 | | Call 0x0,0x12 046e e008 | | Load 0x0,0x8 046f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0470 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0471 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0472 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 0474 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0475 TRAP_0458: 0475 e006 | | Load 0x0,0x6 0476 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0477 010f | | Execute Exception,Equal 0478 6819 |h | Jump_Zero 0x492 0479 e5fd | | Load 0x2,-0x3 047a 4801 |H | Short_Literal 0x1 047b 4801 |H | Short_Literal 0x1 047c e00e | | Load 0x0,0xe 047d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 047e 035b | [ | Declare_Type Array,Constrained 047f 0337 | 7 | Declare_Variable Array 0480 e5ff | | Load 0x2,-0x1 0481 0227 | ' | Execute Access,All_Reference 0482 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0483 e008 | | Load 0x0,0x8 0484 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0485 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0486 e00e | | Load 0x0,0xe 0487 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0488 0119 | | Execute Any,Check_In_Formal_Type 0489 4801 |H | Short_Literal 0x1 048a 00da | | Load_Top At_Offset_2 048b 01d6 | | Execute Vector,Field_Write 048c 600f |` | Indirect_Literal Discrete,0x49c,{0x00000000, 0x00008110} 048d e006 | | Load 0x0,0x6 048e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 048f 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 0491 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0492 e5fd | | Load 0x2,-0x3 0493 0092 13d9 | | Action Push_String_Extended,0x13d9 ; "Target_Builder.Library.Target_Directory_Name" 0495 e00f | | Load 0x0,0xf 0496 180f | | Execute Package,Field_Execute,Field_Number 0xf 0497 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 0499 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 049a 0000 0000 | | .XXX[0x2] 049c 0000 0000 | | .LITERAL {0x00000000, 0x00008110} 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a6 | | .CONST 0x04a6 ; Address of begin 04a1 0513 | | .CONST 0x0513 ; Address of exception handler 04a2 0002 | | .CONST 0x0002 ; Number of locals 04a3 INIT_04a0: 04a3 e006 | | Load 0x0,0x6 04a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04a5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 04a6 BODY_04a0: 04a6 e006 | | Load 0x0,0x6 04a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04a8 e5fd | | Load 0x2,-0x3 04a9 e5fc | | Load 0x2,-0x4 04aa 8011 | | Call 0x0,0x11 04ab 0059 | Y | Store_Top Discrete,At_Offset_1 04ac 4800 |H | Short_Literal 0x0 04ad 00d9 | | Load_Top At_Offset_1 04ae e006 | | Load 0x0,0x6 04af 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 04b0 685f |h_ | Jump_Zero 0x510 04b1 00db | | Load_Top At_Offset_3 04b2 01db | | Execute Vector,Length 04b3 703f |p? | Jump_Nonzero 0x4f3 04b4 e5fd | | Load 0x2,-0x3 04b5 4801 |H | Short_Literal 0x1 04b6 4802 |H | Short_Literal 0x2 04b7 e00e | | Load 0x0,0xe 04b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04b9 035b | [ | Declare_Type Array,Constrained 04ba 0337 | 7 | Declare_Variable Array 04bb e5fc | | Load 0x2,-0x4 04bc 0227 | ' | Execute Access,All_Reference 04bd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04be e008 | | Load 0x0,0x8 04bf 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 04c0 1820 | | Execute Package,Field_Execute,Field_Number 0x20 04c1 e00e | | Load 0x0,0xe 04c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04c3 0119 | | Execute Any,Check_In_Formal_Type 04c4 4801 |H | Short_Literal 0x1 04c5 00da | | Load_Top At_Offset_2 04c6 01d6 | | Execute Vector,Field_Write 04c7 e5ff | | Load 0x2,-0x1 04c8 e00e | | Load 0x0,0xe 04c9 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04ca e00e | | Load 0x0,0xe 04cb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04cc 0119 | | Execute Any,Check_In_Formal_Type 04cd 4802 |H | Short_Literal 0x2 04ce 00da | | Load_Top At_Offset_2 04cf 01d6 | | Execute Vector,Field_Write 04d0 608f |` | Indirect_Literal Discrete,0x560,{0x00000000, 0x00008123} 04d1 e006 | | Load 0x0,0x6 04d2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 04d3 4801 |H | Short_Literal 0x1 04d4 4802 |H | Short_Literal 0x2 04d5 e00e | | Load 0x0,0xe 04d6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04d7 035b | [ | Declare_Type Array,Constrained 04d8 0337 | 7 | Declare_Variable Array 04d9 e5fc | | Load 0x2,-0x4 04da 0227 | ' | Execute Access,All_Reference 04db 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04dc e008 | | Load 0x0,0x8 04dd 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 04de 1820 | | Execute Package,Field_Execute,Field_Number 0x20 04df e00e | | Load 0x0,0xe 04e0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04e1 0119 | | Execute Any,Check_In_Formal_Type 04e2 4801 |H | Short_Literal 0x1 04e3 00da | | Load_Top At_Offset_2 04e4 01d6 | | Execute Vector,Field_Write 04e5 e5ff | | Load 0x2,-0x1 04e6 e00e | | Load 0x0,0xe 04e7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04e8 e00e | | Load 0x0,0xe 04e9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04ea 0119 | | Execute Any,Check_In_Formal_Type 04eb 4802 |H | Short_Literal 0x2 04ec 00da | | Load_Top At_Offset_2 04ed 01d6 | | Execute Vector,Field_Write 04ee 6071 |`q | Indirect_Literal Discrete,0x560,{0x00000000, 0x00008123} 04ef e006 | | Load 0x0,0x6 04f0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04f1 a5fb | | Store_Unchecked 0x2,-0x5 04f2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 04f3 00d8 | | Load_Top At_Offset_0 04f4 e5fe | | Load 0x2,-0x2 04f5 e009 | | Load 0x0,0x9 04f6 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 04f7 e5ff | | Load 0x2,-0x1 04f8 e5fc | | Load 0x2,-0x4 04f9 8012 | | Call 0x0,0x12 04fa e008 | | Load 0x0,0x8 04fb 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 04fc 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 04fd 0059 | Y | Store_Top Discrete,At_Offset_1 04fe 4800 |H | Short_Literal 0x0 04ff 00d9 | | Load_Top At_Offset_1 0500 e006 | | Load 0x0,0x6 0501 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0502 7003 |p | Jump_Nonzero 0x506 0503 00d8 | | Load_Top At_Offset_0 0504 a5fb | | Store_Unchecked 0x2,-0x5 0505 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0506 e5fd | | Load 0x2,-0x3 0507 0092 13da | | Action Push_String_Extended,0x13da ; "Target machine name has been set to \x22" 0509 e5ff | | Load 0x2,-0x1 050a 01cc | | Execute Vector,Catenate 050b 0092 13d6 | | Action Push_String_Extended,0x13d6 ; "\x22" 050d 01cc | | Execute Vector,Catenate 050e e00f | | Load 0x0,0xf 050f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0510 00d8 | | Load_Top At_Offset_0 0511 a5fb | | Store_Unchecked 0x2,-0x5 0512 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0513 TRAP_04a0: 0513 e006 | | Load 0x0,0x6 0514 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0515 010f | | Execute Exception,Equal 0516 6823 |h# | Jump_Zero 0x53a 0517 e006 | | Load 0x0,0x6 0518 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0519 a5fb | | Store_Unchecked 0x2,-0x5 051a e5fd | | Load 0x2,-0x3 051b 4801 |H | Short_Literal 0x1 051c 4802 |H | Short_Literal 0x2 051d e00e | | Load 0x0,0xe 051e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 051f 035b | [ | Declare_Type Array,Constrained 0520 0337 | 7 | Declare_Variable Array 0521 e5fc | | Load 0x2,-0x4 0522 0227 | ' | Execute Access,All_Reference 0523 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0524 e008 | | Load 0x0,0x8 0525 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0526 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0527 e00e | | Load 0x0,0xe 0528 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0529 0119 | | Execute Any,Check_In_Formal_Type 052a 4801 |H | Short_Literal 0x1 052b 00da | | Load_Top At_Offset_2 052c 01d6 | | Execute Vector,Field_Write 052d e5ff | | Load 0x2,-0x1 052e e00e | | Load 0x0,0xe 052f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0530 e00e | | Load 0x0,0xe 0531 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0532 0119 | | Execute Any,Check_In_Formal_Type 0533 4802 |H | Short_Literal 0x2 0534 00da | | Load_Top At_Offset_2 0535 01d6 | | Execute Vector,Field_Write 0536 6029 |`) | Indirect_Literal Discrete,0x560,{0x00000000, 0x00008123} 0537 e006 | | Load 0x0,0x6 0538 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0539 4504 |E | Exit_Suprogram New_Top_Offset 0x4 053a e5fd | | Load 0x2,-0x3 053b 0092 13db | | Action Push_String_Extended,0x13db ; "Target_Builder.Library.Set_Target_Machine_Name" 053d e00f | | Load 0x0,0xf 053e 180f | | Execute Package,Field_Execute,Field_Number 0xf 053f 4801 |H | Short_Literal 0x1 0540 4802 |H | Short_Literal 0x2 0541 e00e | | Load 0x0,0xe 0542 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0543 035b | [ | Declare_Type Array,Constrained 0544 0337 | 7 | Declare_Variable Array 0545 e5fc | | Load 0x2,-0x4 0546 0227 | ' | Execute Access,All_Reference 0547 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0548 e008 | | Load 0x0,0x8 0549 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 054a 1820 | | Execute Package,Field_Execute,Field_Number 0x20 054b e00e | | Load 0x0,0xe 054c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 054d 0119 | | Execute Any,Check_In_Formal_Type 054e 4801 |H | Short_Literal 0x1 054f 00da | | Load_Top At_Offset_2 0550 01d6 | | Execute Vector,Field_Write 0551 e5ff | | Load 0x2,-0x1 0552 e00e | | Load 0x0,0xe 0553 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0554 e00e | | Load 0x0,0xe 0555 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0556 0119 | | Execute Any,Check_In_Formal_Type 0557 4802 |H | Short_Literal 0x2 0558 00da | | Load_Top At_Offset_2 0559 01d6 | | Execute Vector,Field_Write 055a 6005 |` | Indirect_Literal Discrete,0x560,{0x00000000, 0x00008123} 055b e006 | | Load 0x0,0x6 055c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 055d a5fb | | Store_Unchecked 0x2,-0x5 055e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 055f 0000 | | .XXX[0x1] 0560 0000 0000 | | .LITERAL {0x00000000, 0x00008123} 0564 0000 0000 | | .BLANK 0000[0x4] 0568 ; -------------------------------------------------------------------------------------- 0568 ; SUBPROGRAM 0568 ; -------------------------------------------------------------------------------------- 0568 056e | n | .CONST 0x056e ; Address of begin 0569 0585 | | .CONST 0x0585 ; Address of exception handler 056a 0002 | | .CONST 0x0002 ; Number of locals 056b INIT_0568: 056b e006 | | Load 0x0,0x6 056c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 056d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 056e BODY_0568: 056e e006 | | Load 0x0,0x6 056f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0570 e5fd | | Load 0x2,-0x3 0571 e5ff | | Load 0x2,-0x1 0572 8011 | | Call 0x0,0x11 0573 0059 | Y | Store_Top Discrete,At_Offset_1 0574 4800 |H | Short_Literal 0x0 0575 00d9 | | Load_Top At_Offset_1 0576 e006 | | Load 0x0,0x6 0577 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0578 6809 |h | Jump_Zero 0x582 0579 e5fe | | Load 0x2,-0x2 057a e009 | | Load 0x0,0x9 057b 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 057c e5ff | | Load 0x2,-0x1 057d 8012 | | Call 0x0,0x12 057e e008 | | Load 0x0,0x8 057f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0580 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0581 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0582 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 0584 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0585 TRAP_0568: 0585 e006 | | Load 0x0,0x6 0586 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0587 010f | | Execute Exception,Equal 0588 6819 |h | Jump_Zero 0x5a2 0589 e5fd | | Load 0x2,-0x3 058a 4801 |H | Short_Literal 0x1 058b 4801 |H | Short_Literal 0x1 058c e00e | | Load 0x0,0xe 058d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 058e 035b | [ | Declare_Type Array,Constrained 058f 0337 | 7 | Declare_Variable Array 0590 e5ff | | Load 0x2,-0x1 0591 0227 | ' | Execute Access,All_Reference 0592 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0593 e008 | | Load 0x0,0x8 0594 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0595 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0596 e00e | | Load 0x0,0xe 0597 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0598 0119 | | Execute Any,Check_In_Formal_Type 0599 4801 |H | Short_Literal 0x1 059a 00da | | Load_Top At_Offset_2 059b 01d6 | | Execute Vector,Field_Write 059c 600f |` | Indirect_Literal Discrete,0x5ac,{0x00000000, 0x00008112} 059d e006 | | Load 0x0,0x6 059e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 059f 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 05a1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 05a2 e5fd | | Load 0x2,-0x3 05a3 0092 13dc | | Action Push_String_Extended,0x13dc ; "Target_Builder.Library.Target_Machine_Name" 05a5 e00f | | Load 0x0,0xf 05a6 180f | | Execute Package,Field_Execute,Field_Number 0xf 05a7 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 05a9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 05aa 0000 0000 | | .XXX[0x2] 05ac 0000 0000 | | .LITERAL {0x00000000, 0x00008112} 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; SUBPROGRAM 05b0 ; -------------------------------------------------------------------------------------- 05b0 05b6 | | .CONST 0x05b6 ; Address of begin 05b1 05e1 | | .CONST 0x05e1 ; Address of exception handler 05b2 0002 | | .CONST 0x0002 ; Number of locals 05b3 INIT_05b0: 05b3 e006 | | Load 0x0,0x6 05b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05b5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 05b6 BODY_05b0: 05b6 e006 | | Load 0x0,0x6 05b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05b8 e5fd | | Load 0x2,-0x3 05b9 e5fc | | Load 0x2,-0x4 05ba 8011 | | Call 0x0,0x11 05bb 0059 | Y | Store_Top Discrete,At_Offset_1 05bc 4800 |H | Short_Literal 0x0 05bd 00d9 | | Load_Top At_Offset_1 05be e006 | | Load 0x0,0x6 05bf 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 05c0 681d |h | Jump_Zero 0x5de 05c1 00d8 | | Load_Top At_Offset_0 05c2 e5fe | | Load 0x2,-0x2 05c3 e009 | | Load 0x0,0x9 05c4 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 05c5 e5ff | | Load 0x2,-0x1 05c6 e5fc | | Load 0x2,-0x4 05c7 8012 | | Call 0x0,0x12 05c8 e008 | | Load 0x0,0x8 05c9 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 05ca 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 05cb 0059 | Y | Store_Top Discrete,At_Offset_1 05cc 4800 |H | Short_Literal 0x0 05cd 00d9 | | Load_Top At_Offset_1 05ce e006 | | Load 0x0,0x6 05cf 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 05d0 7003 |p | Jump_Nonzero 0x5d4 05d1 00d8 | | Load_Top At_Offset_0 05d2 a5fb | | Store_Unchecked 0x2,-0x5 05d3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05d4 e5fd | | Load 0x2,-0x3 05d5 0092 13dd | | Action Push_String_Extended,0x13dd ; "Target library name has been set to \x22" 05d7 e5ff | | Load 0x2,-0x1 05d8 01cc | | Execute Vector,Catenate 05d9 0092 13d6 | | Action Push_String_Extended,0x13d6 ; "\x22" 05db 01cc | | Execute Vector,Catenate 05dc e00f | | Load 0x0,0xf 05dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05de 00d8 | | Load_Top At_Offset_0 05df a5fb | | Store_Unchecked 0x2,-0x5 05e0 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05e1 TRAP_05b0: 05e1 e006 | | Load 0x0,0x6 05e2 1b17 | | Execute Package,Field_Read,Field_Number 0x17 05e3 010f | | Execute Exception,Equal 05e4 6823 |h# | Jump_Zero 0x608 05e5 e006 | | Load 0x0,0x6 05e6 181b | | Execute Package,Field_Execute,Field_Number 0x1b 05e7 a5fb | | Store_Unchecked 0x2,-0x5 05e8 e5fd | | Load 0x2,-0x3 05e9 4801 |H | Short_Literal 0x1 05ea 4802 |H | Short_Literal 0x2 05eb e00e | | Load 0x0,0xe 05ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05ed 035b | [ | Declare_Type Array,Constrained 05ee 0337 | 7 | Declare_Variable Array 05ef e5fc | | Load 0x2,-0x4 05f0 0227 | ' | Execute Access,All_Reference 05f1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05f2 e008 | | Load 0x0,0x8 05f3 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 05f4 1820 | | Execute Package,Field_Execute,Field_Number 0x20 05f5 e00e | | Load 0x0,0xe 05f6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05f7 0119 | | Execute Any,Check_In_Formal_Type 05f8 4801 |H | Short_Literal 0x1 05f9 00da | | Load_Top At_Offset_2 05fa 01d6 | | Execute Vector,Field_Write 05fb e5ff | | Load 0x2,-0x1 05fc e00e | | Load 0x0,0xe 05fd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05fe e00e | | Load 0x0,0xe 05ff 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0600 0119 | | Execute Any,Check_In_Formal_Type 0601 4802 |H | Short_Literal 0x2 0602 00da | | Load_Top At_Offset_2 0603 01d6 | | Execute Vector,Field_Write 0604 602b |`+ | Indirect_Literal Discrete,0x630,{0x00000000, 0x00008122} 0605 e006 | | Load 0x0,0x6 0606 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0607 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0608 e5fd | | Load 0x2,-0x3 0609 0092 13de | | Action Push_String_Extended,0x13de ; "Target_Builder.Library.Set_Target_Library_Name" 060b e00f | | Load 0x0,0xf 060c 180f | | Execute Package,Field_Execute,Field_Number 0xf 060d 4801 |H | Short_Literal 0x1 060e 4802 |H | Short_Literal 0x2 060f e00e | | Load 0x0,0xe 0610 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0611 035b | [ | Declare_Type Array,Constrained 0612 0337 | 7 | Declare_Variable Array 0613 e5fc | | Load 0x2,-0x4 0614 0227 | ' | Execute Access,All_Reference 0615 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0616 e008 | | Load 0x0,0x8 0617 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0618 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0619 e00e | | Load 0x0,0xe 061a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 061b 0119 | | Execute Any,Check_In_Formal_Type 061c 4801 |H | Short_Literal 0x1 061d 00da | | Load_Top At_Offset_2 061e 01d6 | | Execute Vector,Field_Write 061f e5ff | | Load 0x2,-0x1 0620 e00e | | Load 0x0,0xe 0621 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0622 e00e | | Load 0x0,0xe 0623 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0624 0119 | | Execute Any,Check_In_Formal_Type 0625 4802 |H | Short_Literal 0x2 0626 00da | | Load_Top At_Offset_2 0627 01d6 | | Execute Vector,Field_Write 0628 6007 |` | Indirect_Literal Discrete,0x630,{0x00000000, 0x00008122} 0629 e006 | | Load 0x0,0x6 062a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 062b a5fb | | Store_Unchecked 0x2,-0x5 062c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 062d 0000 0000 | | .XXX[0x3] 062f 0000 | | 0630 0000 0000 | | .LITERAL {0x00000000, 0x00008122} 0634 0000 0000 | | .BLANK 0000[0x4] 0638 ; -------------------------------------------------------------------------------------- 0638 ; SUBPROGRAM 0638 ; -------------------------------------------------------------------------------------- 0638 063e | > | .CONST 0x063e ; Address of begin 0639 0655 | U | .CONST 0x0655 ; Address of exception handler 063a 0002 | | .CONST 0x0002 ; Number of locals 063b INIT_0638: 063b e006 | | Load 0x0,0x6 063c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 063d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 063e BODY_0638: 063e e006 | | Load 0x0,0x6 063f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0640 e5fd | | Load 0x2,-0x3 0641 e5ff | | Load 0x2,-0x1 0642 8011 | | Call 0x0,0x11 0643 0059 | Y | Store_Top Discrete,At_Offset_1 0644 4800 |H | Short_Literal 0x0 0645 00d9 | | Load_Top At_Offset_1 0646 e006 | | Load 0x0,0x6 0647 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0648 6809 |h | Jump_Zero 0x652 0649 e5fe | | Load 0x2,-0x2 064a e009 | | Load 0x0,0x9 064b 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 064c e5ff | | Load 0x2,-0x1 064d 8012 | | Call 0x0,0x12 064e e008 | | Load 0x0,0x8 064f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0650 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0651 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0652 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 0654 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0655 TRAP_0638: 0655 e006 | | Load 0x0,0x6 0656 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0657 010f | | Execute Exception,Equal 0658 6819 |h | Jump_Zero 0x672 0659 e5fd | | Load 0x2,-0x3 065a 4801 |H | Short_Literal 0x1 065b 4801 |H | Short_Literal 0x1 065c e00e | | Load 0x0,0xe 065d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 065e 035b | [ | Declare_Type Array,Constrained 065f 0337 | 7 | Declare_Variable Array 0660 e5ff | | Load 0x2,-0x1 0661 0227 | ' | Execute Access,All_Reference 0662 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0663 e008 | | Load 0x0,0x8 0664 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0665 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0666 e00e | | Load 0x0,0xe 0667 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0668 0119 | | Execute Any,Check_In_Formal_Type 0669 4801 |H | Short_Literal 0x1 066a 00da | | Load_Top At_Offset_2 066b 01d6 | | Execute Vector,Field_Write 066c 600f |` | Indirect_Literal Discrete,0x67c,{0x00000000, 0x00008111} 066d e006 | | Load 0x0,0x6 066e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 066f 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 0671 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0672 e5fd | | Load 0x2,-0x3 0673 0092 13df | | Action Push_String_Extended,0x13df ; "Target_Builder.Library.Target_Library_Name" 0675 e00f | | Load 0x0,0xf 0676 180f | | Execute Package,Field_Execute,Field_Number 0xf 0677 0092 13d8 | | Action Push_String_Extended,0x13d8 ; "<error>" 0679 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 067a 0000 0000 | | .XXX[0x2] 067c 0000 0000 | | .LITERAL {0x00000000, 0x00008111} 0680 ; -------------------------------------------------------------------------------------- 0680 ; SUBPROGRAM 0680 ; -------------------------------------------------------------------------------------- 0680 0693 | | .CONST 0x0693 ; Address of begin 0681 06e1 | | .CONST 0x06e1 ; Address of exception handler 0682 0005 | | .CONST 0x0005 ; Number of locals 0683 INIT_0680: 0683 e5fd | | Load 0x2,-0x3 0684 0227 | ' | Execute Access,All_Reference 0685 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0686 e008 | | Load 0x0,0x8 0687 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0688 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0689 e278 | x | Load 0x1,0x78 068a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 068b e006 | | Load 0x0,0x6 068c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 068d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 068e e002 | | Load 0x0,0x2 068f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0690 02c7 | | Declare_Variable Any 0691 00d8 | | Load_Top At_Offset_0 0692 1c00 | | Execute_Immediate Run_Utility,0x0 0693 BODY_0680: 0693 e278 | x | Load 0x1,0x78 0694 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0695 e013 | | Load 0x0,0x13 0696 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0697 e014 | | Load 0x0,0x14 0698 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0699 e278 | x | Load 0x1,0x78 069a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 069b 0033 | 3 | Store_Top Heap_Access,At_Offset_3 069c 00cf | | Action Mark_Auxiliary 069d e402 | | Load 0x2,0x2 069e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 069f 01dc | | Execute Vector,Last 06a0 4801 |H | Short_Literal 0x1 06a1 0263 | c | Execute Discrete,Above_Bound 06a2 7037 |p7 | Jump_Nonzero 0x6da 06a3 e404 | | Load 0x2,0x4 06a4 e405 | | Load 0x2,0x5 06a5 0120 | | Execute Any,Is_Value 06a6 6803 |h | Jump_Zero 0x6aa 06a7 e002 | | Load 0x0,0x2 06a8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 06a9 7801 |x | Jump 0x6ab 06aa e405 | | Load 0x2,0x5 06ab 00da | | Load_Top At_Offset_2 06ac e402 | | Load 0x2,0x2 06ad 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 06ae 01d7 | | Execute Vector,Field_Read 06af e008 | | Load 0x0,0x8 06b0 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 06b1 1817 | | Execute Package,Field_Execute,Field_Number 0x17 06b2 c405 | | Store 0x2,0x5 06b3 c404 | | Store 0x2,0x4 06b4 4800 |H | Short_Literal 0x0 06b5 e404 | | Load 0x2,0x4 06b6 e006 | | Load 0x0,0x6 06b7 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 06b8 7003 |p | Jump_Nonzero 0x6bc 06b9 e404 | | Load 0x2,0x4 06ba a5fc | | Store_Unchecked 0x2,-0x4 06bb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06bc 4800 |H | Short_Literal 0x0 06bd 4801 |H | Short_Literal 0x1 06be e405 | | Load 0x2,0x5 06bf e403 | | Load 0x2,0x3 06c0 e278 | x | Load 0x1,0x78 06c1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06c2 e006 | | Load 0x0,0x6 06c3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06c4 e403 | | Load 0x2,0x3 06c5 e5fe | | Load 0x2,-0x2 06c6 e5fd | | Load 0x2,-0x3 06c7 0227 | ' | Execute Access,All_Reference 06c8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 06c9 e405 | | Load 0x2,0x5 06ca 8279 | y | Call 0x1,0x79 06cb c403 | | Store 0x2,0x3 06cc c404 | | Store 0x2,0x4 06cd 4800 |H | Short_Literal 0x0 06ce e404 | | Load 0x2,0x4 06cf e006 | | Load 0x0,0x6 06d0 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 06d1 7006 |p | Jump_Nonzero 0x6d8 06d2 e403 | | Load 0x2,0x3 06d3 e278 | x | Load 0x1,0x78 06d4 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06d5 e404 | | Load 0x2,0x4 06d6 a5fc | | Store_Unchecked 0x2,-0x4 06d7 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06d8 00c8 | | Action Pop_Auxiliary_Range 06d9 3fc9 |? | Loop_Increasing 0x6a3 06da 00ce | | Action Pop_Auxiliary 06db 00da | | Load_Top At_Offset_2 06dc e278 | x | Load 0x1,0x78 06dd 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06de 00d9 | | Load_Top At_Offset_1 06df a5fc | | Store_Unchecked 0x2,-0x4 06e0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06e1 TRAP_0680: 06e1 e006 | | Load 0x0,0x6 06e2 1b17 | | Execute Package,Field_Read,Field_Number 0x17 06e3 010f | | Execute Exception,Equal 06e4 680d |h | Jump_Zero 0x6f2 06e5 00db | | Load_Top At_Offset_3 06e6 e278 | x | Load 0x1,0x78 06e7 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06e8 e006 | | Load 0x0,0x6 06e9 181b | | Execute Package,Field_Execute,Field_Number 0x1b 06ea a5fc | | Store_Unchecked 0x2,-0x4 06eb e5fe | | Load 0x2,-0x2 06ec e00e | | Load 0x0,0xe 06ed 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 06ee 6015 |` | Indirect_Literal Discrete,0x704,{0x00000000, 0x00008105} 06ef e006 | | Load 0x0,0x6 06f0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 06f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06f2 00db | | Load_Top At_Offset_3 06f3 e278 | x | Load 0x1,0x78 06f4 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06f5 e00e | | Load 0x0,0xe 06f6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 06f7 600c |` | Indirect_Literal Discrete,0x704,{0x00000000, 0x00008105} 06f8 e006 | | Load 0x0,0x6 06f9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 06fa a5fc | | Store_Unchecked 0x2,-0x4 06fb e5fe | | Load 0x2,-0x2 06fc 0092 13e0 | | Action Push_String_Extended,0x13e0 ; "Target_Builder.Library.Supplier_Domain" 06fe e00f | | Load 0x0,0xf 06ff 180f | | Execute Package,Field_Execute,Field_Number 0xf 0700 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0701 0000 0000 | | .XXX[0x3] 0703 0000 | | 0704 0000 0000 | | .LITERAL {0x00000000, 0x00008105} 0708 ; -------------------------------------------------------------------------------------- 0708 ; SUBPROGRAM 0708 ; -------------------------------------------------------------------------------------- 0708 071b | | .CONST 0x071b ; Address of begin 0709 0766 | f | .CONST 0x0766 ; Address of exception handler 070a 0005 | | .CONST 0x0005 ; Number of locals 070b INIT_0708: 070b e5fd | | Load 0x2,-0x3 070c 0227 | ' | Execute Access,All_Reference 070d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 070e e008 | | Load 0x0,0x8 070f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0710 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0711 e278 | x | Load 0x1,0x78 0712 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0713 e006 | | Load 0x0,0x6 0714 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0715 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0716 e002 | | Load 0x0,0x2 0717 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0718 02c7 | | Declare_Variable Any 0719 00d8 | | Load_Top At_Offset_0 071a 1c00 | | Execute_Immediate Run_Utility,0x0 071b BODY_0708: 071b e278 | x | Load 0x1,0x78 071c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 071d e013 | | Load 0x0,0x13 071e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 071f e014 | | Load 0x0,0x14 0720 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0721 e278 | x | Load 0x1,0x78 0722 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0723 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0724 00cf | | Action Mark_Auxiliary 0725 e402 | | Load 0x2,0x2 0726 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0727 01dc | | Execute Vector,Last 0728 4801 |H | Short_Literal 0x1 0729 0263 | c | Execute Discrete,Above_Bound 072a 7034 |p4 | Jump_Nonzero 0x75f 072b e404 | | Load 0x2,0x4 072c e405 | | Load 0x2,0x5 072d 0120 | | Execute Any,Is_Value 072e 6803 |h | Jump_Zero 0x732 072f e002 | | Load 0x0,0x2 0730 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0731 7801 |x | Jump 0x733 0732 e405 | | Load 0x2,0x5 0733 00da | | Load_Top At_Offset_2 0734 e402 | | Load 0x2,0x2 0735 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0736 01d7 | | Execute Vector,Field_Read 0737 e008 | | Load 0x0,0x8 0738 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0739 1817 | | Execute Package,Field_Execute,Field_Number 0x17 073a c405 | | Store 0x2,0x5 073b c404 | | Store 0x2,0x4 073c 4800 |H | Short_Literal 0x0 073d e404 | | Load 0x2,0x4 073e e006 | | Load 0x0,0x6 073f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0740 7003 |p | Jump_Nonzero 0x744 0741 e404 | | Load 0x2,0x4 0742 a5fc | | Store_Unchecked 0x2,-0x4 0743 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0744 4800 |H | Short_Literal 0x0 0745 4801 |H | Short_Literal 0x1 0746 e405 | | Load 0x2,0x5 0747 e403 | | Load 0x2,0x3 0748 e278 | x | Load 0x1,0x78 0749 1818 | | Execute Package,Field_Execute,Field_Number 0x18 074a e006 | | Load 0x0,0x6 074b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 074c e403 | | Load 0x2,0x3 074d e5fe | | Load 0x2,-0x2 074e e5fd | | Load 0x2,-0x3 074f 0227 | ' | Execute Access,All_Reference 0750 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0751 e405 | | Load 0x2,0x5 0752 8282 | | Call 0x1,0x82 0753 c403 | | Store 0x2,0x3 0754 c404 | | Store 0x2,0x4 0755 4800 |H | Short_Literal 0x0 0756 e404 | | Load 0x2,0x4 0757 e006 | | Load 0x0,0x6 0758 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0759 6803 |h | Jump_Zero 0x75d 075a e404 | | Load 0x2,0x4 075b a5fc | | Store_Unchecked 0x2,-0x4 075c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 075d 00c8 | | Action Pop_Auxiliary_Range 075e 3fcc |? | Loop_Increasing 0x72b 075f 00ce | | Action Pop_Auxiliary 0760 00da | | Load_Top At_Offset_2 0761 e278 | x | Load 0x1,0x78 0762 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0763 00d9 | | Load_Top At_Offset_1 0764 a5fc | | Store_Unchecked 0x2,-0x4 0765 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0766 TRAP_0708: 0766 e006 | | Load 0x0,0x6 0767 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0768 010f | | Execute Exception,Equal 0769 680d |h | Jump_Zero 0x777 076a 00db | | Load_Top At_Offset_3 076b e278 | x | Load 0x1,0x78 076c 181d | | Execute Package,Field_Execute,Field_Number 0x1d 076d e006 | | Load 0x0,0x6 076e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 076f a5fc | | Store_Unchecked 0x2,-0x4 0770 e5fe | | Load 0x2,-0x2 0771 e00e | | Load 0x0,0xe 0772 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0773 6014 |` | Indirect_Literal Discrete,0x788,{0x00000000, 0x00008104} 0774 e006 | | Load 0x0,0x6 0775 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0776 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0777 00db | | Load_Top At_Offset_3 0778 e278 | x | Load 0x1,0x78 0779 181d | | Execute Package,Field_Execute,Field_Number 0x1d 077a e00e | | Load 0x0,0xe 077b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 077c 600b |` | Indirect_Literal Discrete,0x788,{0x00000000, 0x00008104} 077d e006 | | Load 0x0,0x6 077e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 077f a5fc | | Store_Unchecked 0x2,-0x4 0780 e5fe | | Load 0x2,-0x2 0781 0092 13e1 | | Action Push_String_Extended,0x13e1 ; "Target_Builder.Library.Referencer_Domain" 0783 e00f | | Load 0x0,0xf 0784 180f | | Execute Package,Field_Execute,Field_Number 0xf 0785 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0786 0000 0000 | | .XXX[0x2] 0788 0000 0000 | | .LITERAL {0x00000000, 0x00008104} 078c 0000 0000 | | .BLANK 0000[0x4] 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 0799 | | .CONST 0x0799 ; Address of begin 0791 07c9 | | .CONST 0x07c9 ; Address of exception handler 0792 0003 | | .CONST 0x0003 ; Number of locals 0793 INIT_0790: 0793 00db | | Load_Top At_Offset_3 0794 e002 | | Load 0x0,0x2 0795 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0796 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0797 029f 11fb | | Declare_Subprogram INIT_11f8,For_Call 0799 BODY_0790: 0799 e5ff | | Load 0x2,-0x1 079a 0227 | ' | Execute Access,All_Reference 079b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 079c 00da | | Load_Top At_Offset_2 079d e008 | | Load 0x0,0x8 079e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 079f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 07a0 4800 |H | Short_Literal 0x0 07a1 e5ff | | Load 0x2,-0x1 07a2 0227 | ' | Execute Access,All_Reference 07a3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07a4 e008 | | Load 0x0,0x8 07a5 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 07a6 181c | | Execute Package,Field_Execute,Field_Number 0x1c 07a7 e006 | | Load 0x0,0x6 07a8 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 07a9 7002 |p | Jump_Nonzero 0x7ac 07aa 8403 | | Call 0x2,0x3 07ab 4505 |E | Exit_Suprogram New_Top_Offset 0x5 07ac 4800 |H | Short_Literal 0x0 07ad 4800 |H | Short_Literal 0x0 07ae 0092 13e2 | | Action Push_String_Extended,0x13e2 ; "<DEFAULT>" 07b0 e5ff | | Load 0x2,-0x1 07b1 0227 | ' | Execute Access,All_Reference 07b2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07b3 e402 | | Load 0x2,0x2 07b4 e008 | | Load 0x0,0x8 07b5 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 07b6 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 07b7 e5ff | | Load 0x2,-0x1 07b8 0227 | ' | Execute Access,All_Reference 07b9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07ba e008 | | Load 0x0,0x8 07bb 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 07bc 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 07bd 4800 |H | Short_Literal 0x0 07be e5ff | | Load 0x2,-0x1 07bf 0227 | ' | Execute Access,All_Reference 07c0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07c1 e008 | | Load 0x0,0x8 07c2 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 07c3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 07c4 e006 | | Load 0x0,0x6 07c5 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 07c6 7001 |p | Jump_Nonzero 0x7c8 07c7 8403 | | Call 0x2,0x3 07c8 4505 |E | Exit_Suprogram New_Top_Offset 0x5 07c9 TRAP_0790: 07c9 0007 | | Action Break_Optional 07ca 8403 | | Call 0x2,0x3 07cb 4505 |E | Exit_Suprogram New_Top_Offset 0x5 07cc 0000 0000 | | .BLANK 0000[0x4] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07dd | | .CONST 0x07dd ; Address of begin 07d1 07e7 | | .CONST 0x07e7 ; Address of exception handler 07d2 0004 | | .CONST 0x0004 ; Number of locals 07d3 INIT_07d0: 07d3 e002 | | Load 0x0,0x2 07d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07d5 02c7 | | Declare_Variable Any 07d6 00d8 | | Load_Top At_Offset_0 07d7 1c00 | | Execute_Immediate Run_Utility,0x0 07d8 e006 | | Load 0x0,0x6 07d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07da 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 07db 029f 121b | | Declare_Subprogram INIT_1218,For_Call 07dd BODY_07d0: 07dd e5ff | | Load 0x2,-0x1 07de 0227 | ' | Execute Access,All_Reference 07df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 07e0 e008 | | Load 0x0,0x8 07e1 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 07e2 1814 | | Execute Package,Field_Execute,Field_Number 0x14 07e3 6801 |h | Jump_Zero 0x7e5 07e4 8404 | | Call 0x2,0x4 07e5 4800 |H | Short_Literal 0x0 07e6 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 07e7 TRAP_07d0: 07e7 e006 | | Load 0x0,0x6 07e8 1b17 | | Execute Package,Field_Read,Field_Number 0x17 07e9 010f | | Execute Exception,Equal 07ea 6802 |h | Jump_Zero 0x7ed 07eb 4800 |H | Short_Literal 0x0 07ec 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 07ed e5fc | | Load 0x2,-0x4 07ee 0092 13e3 | | Action Push_String_Extended,0x13e3 ; "Target_Builder.Library.Member_Of_Domain" 07f0 e00f | | Load 0x0,0xf 07f1 180f | | Execute Package,Field_Execute,Field_Number 0xf 07f2 4800 |H | Short_Literal 0x0 07f3 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 07f4 0000 0000 | | .BLANK 0000[0x4] 07f8 ; -------------------------------------------------------------------------------------- 07f8 ; SUBPROGRAM 07f8 ; -------------------------------------------------------------------------------------- 07f8 07fb | | .CONST 0x07fb ; Address of begin 07f9 0004 | | .CONST 0x0004 ; Address of exception handler 07fa 0001 | | .CONST 0x0001 ; Number of locals 07fb BODY_07f8: 07fb INIT_07f8: 07fb e007 | | Load 0x0,0x7 07fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07fd 00ca | | Action Exit_Nullary_Function 07fe 0000 0000 | | .XXX[0x2] 0800 ; -------------------------------------------------------------------------------------- 0800 ; SUBPROGRAM 0800 ; -------------------------------------------------------------------------------------- 0800 0803 | | .CONST 0x0803 ; Address of begin 0801 0004 | | .CONST 0x0004 ; Address of exception handler 0802 0001 | | .CONST 0x0001 ; Number of locals 0803 BODY_0800: 0803 INIT_0800: 0803 00db | | Load_Top At_Offset_3 0804 e009 | | Load 0x0,0x9 0805 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0806 00db | | Load_Top At_Offset_3 0807 e00a | | Load 0x0,0xa 0808 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0809 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 080a 0000 0000 | | .BLANK 0000[0x6] 0810 ; -------------------------------------------------------------------------------------- 0810 ; SUBPROGRAM 0810 ; -------------------------------------------------------------------------------------- 0810 0816 | | .CONST 0x0816 ; Address of begin 0811 082c | , | .CONST 0x082c ; Address of exception handler 0812 0002 | | .CONST 0x0002 ; Number of locals 0813 INIT_0810: 0813 e006 | | Load 0x0,0x6 0814 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0815 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0816 BODY_0810: 0816 e006 | | Load 0x0,0x6 0817 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0818 e5fd | | Load 0x2,-0x3 0819 e5fc | | Load 0x2,-0x4 081a 8011 | | Call 0x0,0x11 081b 0059 | Y | Store_Top Discrete,At_Offset_1 081c 4800 |H | Short_Literal 0x0 081d 00d9 | | Load_Top At_Offset_1 081e e006 | | Load 0x0,0x6 081f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0820 6808 |h | Jump_Zero 0x829 0821 00d8 | | Load_Top At_Offset_0 0822 e5fc | | Load 0x2,-0x4 0823 8012 | | Call 0x0,0x12 0824 e5ff | | Load 0x2,-0x1 0825 e008 | | Load 0x0,0x8 0826 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0827 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0828 0059 | Y | Store_Top Discrete,At_Offset_1 0829 00d8 | | Load_Top At_Offset_0 082a a5fb | | Store_Unchecked 0x2,-0x5 082b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 082c TRAP_0810: 082c e006 | | Load 0x0,0x6 082d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 082e 010f | | Execute Exception,Equal 082f 6823 |h# | Jump_Zero 0x853 0830 e006 | | Load 0x0,0x6 0831 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0832 a5fb | | Store_Unchecked 0x2,-0x5 0833 e5fd | | Load 0x2,-0x3 0834 4801 |H | Short_Literal 0x1 0835 4802 |H | Short_Literal 0x2 0836 e00e | | Load 0x0,0xe 0837 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0838 035b | [ | Declare_Type Array,Constrained 0839 0337 | 7 | Declare_Variable Array 083a e5fc | | Load 0x2,-0x4 083b 0227 | ' | Execute Access,All_Reference 083c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 083d e008 | | Load 0x0,0x8 083e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 083f 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0840 e00e | | Load 0x0,0xe 0841 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0842 0119 | | Execute Any,Check_In_Formal_Type 0843 4801 |H | Short_Literal 0x1 0844 00da | | Load_Top At_Offset_2 0845 01d6 | | Execute Vector,Field_Write 0846 e5ff | | Load 0x2,-0x1 0847 e00e | | Load 0x0,0xe 0848 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0849 e00e | | Load 0x0,0xe 084a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 084b 0119 | | Execute Any,Check_In_Formal_Type 084c 4802 |H | Short_Literal 0x2 084d 00da | | Load_Top At_Offset_2 084e 01d6 | | Execute Vector,Field_Write 084f 6028 |`( | Indirect_Literal Discrete,0x878,{0x00000000, 0x00008142} 0850 e006 | | Load 0x0,0x6 0851 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0852 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0853 e5fd | | Load 0x2,-0x3 0854 0092 13e4 | | Action Push_String_Extended,0x13e4 ; "Target_Builder.Library.Add_Import" 0856 e00f | | Load 0x0,0xf 0857 180f | | Execute Package,Field_Execute,Field_Number 0xf 0858 4801 |H | Short_Literal 0x1 0859 4802 |H | Short_Literal 0x2 085a e00e | | Load 0x0,0xe 085b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 085c 035b | [ | Declare_Type Array,Constrained 085d 0337 | 7 | Declare_Variable Array 085e e5fc | | Load 0x2,-0x4 085f 0227 | ' | Execute Access,All_Reference 0860 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0861 e008 | | Load 0x0,0x8 0862 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0863 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0864 e00e | | Load 0x0,0xe 0865 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0866 0119 | | Execute Any,Check_In_Formal_Type 0867 4801 |H | Short_Literal 0x1 0868 00da | | Load_Top At_Offset_2 0869 01d6 | | Execute Vector,Field_Write 086a e5ff | | Load 0x2,-0x1 086b e00e | | Load 0x0,0xe 086c 181a | | Execute Package,Field_Execute,Field_Number 0x1a 086d e00e | | Load 0x0,0xe 086e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 086f 0119 | | Execute Any,Check_In_Formal_Type 0870 4802 |H | Short_Literal 0x2 0871 00da | | Load_Top At_Offset_2 0872 01d6 | | Execute Vector,Field_Write 0873 6004 |` | Indirect_Literal Discrete,0x878,{0x00000000, 0x00008142} 0874 e006 | | Load 0x0,0x6 0875 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0876 a5fb | | Store_Unchecked 0x2,-0x5 0877 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0878 0000 0000 | | .LITERAL {0x00000000, 0x00008142} 087c 0000 0000 | | .BLANK 0000[0x4] 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 088b | | .CONST 0x088b ; Address of begin 0881 08c7 | | .CONST 0x08c7 ; Address of exception handler 0882 0003 | | .CONST 0x0003 ; Number of locals 0883 INIT_0880: 0883 e006 | | Load 0x0,0x6 0884 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0885 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0886 e002 | | Load 0x0,0x2 0887 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0888 02c7 | | Declare_Variable Any 0889 00d8 | | Load_Top At_Offset_0 088a 1c00 | | Execute_Immediate Run_Utility,0x0 088b BODY_0880: 088b e006 | | Load 0x0,0x6 088c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 088d e5fe | | Load 0x2,-0x2 088e e5fd | | Load 0x2,-0x3 088f 8011 | | Call 0x0,0x11 0890 005a | Z | Store_Top Discrete,At_Offset_2 0891 4800 |H | Short_Literal 0x0 0892 00da | | Load_Top At_Offset_2 0893 e006 | | Load 0x0,0x6 0894 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0895 682e |h. | Jump_Zero 0x8c4 0896 00cf | | Action Mark_Auxiliary 0897 7826 |x& | Jump 0x8be 0898 e5fe | | Load 0x2,-0x2 0899 4801 |H | Short_Literal 0x1 089a e5fc | | Load 0x2,-0x4 089b e00a | | Load 0x0,0xa 089c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 089d c403 | | Store 0x2,0x3 089e 00da | | Load_Top At_Offset_2 089f e5fd | | Load 0x2,-0x3 08a0 8012 | | Call 0x0,0x12 08a1 00db | | Load_Top At_Offset_3 08a2 e008 | | Load 0x0,0x8 08a3 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 08a4 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 08a5 005b | [ | Store_Top Discrete,At_Offset_3 08a6 4800 |H | Short_Literal 0x0 08a7 00db | | Load_Top At_Offset_3 08a8 e006 | | Load 0x0,0x6 08a9 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 08aa 7003 |p | Jump_Nonzero 0x8ae 08ab 00da | | Load_Top At_Offset_2 08ac a5fb | | Store_Unchecked 0x2,-0x5 08ad 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08ae e5fe | | Load 0x2,-0x2 08af 0092 13e5 | | Action Push_String_Extended,0x13e5 ; "Added import " 08b1 e5fc | | Load 0x2,-0x4 08b2 e002 | | Load 0x0,0x2 08b3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08b4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 08b5 01cc | | Execute Vector,Catenate 08b6 e00f | | Load 0x0,0xf 08b7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08b8 e5fc | | Load 0x2,-0x4 08b9 e002 | | Load 0x0,0x2 08ba 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08bb 181d | | Execute Package,Field_Execute,Field_Number 0x1d 08bc c5fc | | Store 0x2,-0x4 08bd 00c9 | | Action Pop_Auxiliary_Loop 08be e5fc | | Load 0x2,-0x4 08bf e002 | | Load 0x0,0x2 08c0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08c1 181e | | Execute Package,Field_Execute,Field_Number 0x1e 08c2 6fd5 |o | Jump_Zero 0x898 08c3 00ce | | Action Pop_Auxiliary 08c4 00d9 | | Load_Top At_Offset_1 08c5 a5fb | | Store_Unchecked 0x2,-0x5 08c6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08c7 TRAP_0880: 08c7 e006 | | Load 0x0,0x6 08c8 1b17 | | Execute Package,Field_Read,Field_Number 0x17 08c9 010f | | Execute Exception,Equal 08ca 6826 |h& | Jump_Zero 0x8f1 08cb e006 | | Load 0x0,0x6 08cc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 08cd a5fb | | Store_Unchecked 0x2,-0x5 08ce e5fe | | Load 0x2,-0x2 08cf 4801 |H | Short_Literal 0x1 08d0 4802 |H | Short_Literal 0x2 08d1 e00e | | Load 0x0,0xe 08d2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08d3 035b | [ | Declare_Type Array,Constrained 08d4 0337 | 7 | Declare_Variable Array 08d5 e5fd | | Load 0x2,-0x3 08d6 0227 | ' | Execute Access,All_Reference 08d7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08d8 e008 | | Load 0x0,0x8 08d9 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 08da 1820 | | Execute Package,Field_Execute,Field_Number 0x20 08db e00e | | Load 0x0,0xe 08dc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08dd 0119 | | Execute Any,Check_In_Formal_Type 08de 4801 |H | Short_Literal 0x1 08df 00da | | Load_Top At_Offset_2 08e0 01d6 | | Execute Vector,Field_Write 08e1 e5fc | | Load 0x2,-0x4 08e2 e002 | | Load 0x0,0x2 08e3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08e4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 08e5 e00e | | Load 0x0,0xe 08e6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08e7 e00e | | Load 0x0,0xe 08e8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08e9 0119 | | Execute Any,Check_In_Formal_Type 08ea 4802 |H | Short_Literal 0x2 08eb 00da | | Load_Top At_Offset_2 08ec 01d6 | | Execute Vector,Field_Write 08ed 678a |g | Indirect_Literal Discrete,0x878,{0x00000000, 0x00008142} 08ee e006 | | Load 0x0,0x6 08ef 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 08f0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08f1 e5fe | | Load 0x2,-0x2 08f2 0092 13e4 | | Action Push_String_Extended,0x13e4 ; "Target_Builder.Library.Add_Import" 08f4 e00f | | Load 0x0,0xf 08f5 180f | | Execute Package,Field_Execute,Field_Number 0xf 08f6 4801 |H | Short_Literal 0x1 08f7 4802 |H | Short_Literal 0x2 08f8 e00e | | Load 0x0,0xe 08f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08fa 035b | [ | Declare_Type Array,Constrained 08fb 0337 | 7 | Declare_Variable Array 08fc e5fd | | Load 0x2,-0x3 08fd 0227 | ' | Execute Access,All_Reference 08fe 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08ff e008 | | Load 0x0,0x8 0900 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0901 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0902 e00e | | Load 0x0,0xe 0903 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0904 0119 | | Execute Any,Check_In_Formal_Type 0905 4801 |H | Short_Literal 0x1 0906 00da | | Load_Top At_Offset_2 0907 01d6 | | Execute Vector,Field_Write 0908 e5fc | | Load 0x2,-0x4 0909 e002 | | Load 0x0,0x2 090a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 090b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 090c e00e | | Load 0x0,0xe 090d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 090e e00e | | Load 0x0,0xe 090f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0910 0119 | | Execute Any,Check_In_Formal_Type 0911 4802 |H | Short_Literal 0x2 0912 00da | | Load_Top At_Offset_2 0913 01d6 | | Execute Vector,Field_Write 0914 6763 |gc | Indirect_Literal Discrete,0x878,{0x00000000, 0x00008142} 0915 e006 | | Load 0x0,0x6 0916 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0917 a5fb | | Store_Unchecked 0x2,-0x5 0918 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0919 0000 0000 | | .BLANK 0000[0x7] 0920 ; -------------------------------------------------------------------------------------- 0920 ; SUBPROGRAM 0920 ; -------------------------------------------------------------------------------------- 0920 0926 | & | .CONST 0x0926 ; Address of begin 0921 093c | < | .CONST 0x093c ; Address of exception handler 0922 0002 | | .CONST 0x0002 ; Number of locals 0923 INIT_0920: 0923 e006 | | Load 0x0,0x6 0924 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0925 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0926 BODY_0920: 0926 e006 | | Load 0x0,0x6 0927 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0928 e5fd | | Load 0x2,-0x3 0929 e5fc | | Load 0x2,-0x4 092a 8011 | | Call 0x0,0x11 092b 0059 | Y | Store_Top Discrete,At_Offset_1 092c 4800 |H | Short_Literal 0x0 092d 00d9 | | Load_Top At_Offset_1 092e e006 | | Load 0x0,0x6 092f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0930 6808 |h | Jump_Zero 0x939 0931 00d8 | | Load_Top At_Offset_0 0932 e5fc | | Load 0x2,-0x4 0933 8012 | | Call 0x0,0x12 0934 e5ff | | Load 0x2,-0x1 0935 e008 | | Load 0x0,0x8 0936 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0937 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0938 0059 | Y | Store_Top Discrete,At_Offset_1 0939 00d8 | | Load_Top At_Offset_0 093a a5fb | | Store_Unchecked 0x2,-0x5 093b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 093c TRAP_0920: 093c e006 | | Load 0x0,0x6 093d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 093e 010f | | Execute Exception,Equal 093f 6823 |h# | Jump_Zero 0x963 0940 e006 | | Load 0x0,0x6 0941 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0942 a5fb | | Store_Unchecked 0x2,-0x5 0943 e5fd | | Load 0x2,-0x3 0944 4801 |H | Short_Literal 0x1 0945 4802 |H | Short_Literal 0x2 0946 e00e | | Load 0x0,0xe 0947 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0948 035b | [ | Declare_Type Array,Constrained 0949 0337 | 7 | Declare_Variable Array 094a e5fc | | Load 0x2,-0x4 094b 0227 | ' | Execute Access,All_Reference 094c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 094d e008 | | Load 0x0,0x8 094e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 094f 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0950 e00e | | Load 0x0,0xe 0951 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0952 0119 | | Execute Any,Check_In_Formal_Type 0953 4801 |H | Short_Literal 0x1 0954 00da | | Load_Top At_Offset_2 0955 01d6 | | Execute Vector,Field_Write 0956 e5ff | | Load 0x2,-0x1 0957 e00e | | Load 0x0,0xe 0958 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0959 e00e | | Load 0x0,0xe 095a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 095b 0119 | | Execute Any,Check_In_Formal_Type 095c 4802 |H | Short_Literal 0x2 095d 00da | | Load_Top At_Offset_2 095e 01d6 | | Execute Vector,Field_Write 095f 6028 |`( | Indirect_Literal Discrete,0x988,{0x00000000, 0x00008143} 0960 e006 | | Load 0x0,0x6 0961 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0962 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0963 e5fd | | Load 0x2,-0x3 0964 0092 13e6 | | Action Push_String_Extended,0x13e6 ; "Target_Builder.Library.Remove_Import" 0966 e00f | | Load 0x0,0xf 0967 180f | | Execute Package,Field_Execute,Field_Number 0xf 0968 4801 |H | Short_Literal 0x1 0969 4802 |H | Short_Literal 0x2 096a e00e | | Load 0x0,0xe 096b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 096c 035b | [ | Declare_Type Array,Constrained 096d 0337 | 7 | Declare_Variable Array 096e e5fc | | Load 0x2,-0x4 096f 0227 | ' | Execute Access,All_Reference 0970 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0971 e008 | | Load 0x0,0x8 0972 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0973 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0974 e00e | | Load 0x0,0xe 0975 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0976 0119 | | Execute Any,Check_In_Formal_Type 0977 4801 |H | Short_Literal 0x1 0978 00da | | Load_Top At_Offset_2 0979 01d6 | | Execute Vector,Field_Write 097a e5ff | | Load 0x2,-0x1 097b e00e | | Load 0x0,0xe 097c 181a | | Execute Package,Field_Execute,Field_Number 0x1a 097d e00e | | Load 0x0,0xe 097e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 097f 0119 | | Execute Any,Check_In_Formal_Type 0980 4802 |H | Short_Literal 0x2 0981 00da | | Load_Top At_Offset_2 0982 01d6 | | Execute Vector,Field_Write 0983 6004 |` | Indirect_Literal Discrete,0x988,{0x00000000, 0x00008143} 0984 e006 | | Load 0x0,0x6 0985 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0986 a5fb | | Store_Unchecked 0x2,-0x5 0987 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0988 0000 0000 | | .LITERAL {0x00000000, 0x00008143} 098c 0000 0000 | | .BLANK 0000[0x4] 0990 ; -------------------------------------------------------------------------------------- 0990 ; SUBPROGRAM 0990 ; -------------------------------------------------------------------------------------- 0990 099b | | .CONST 0x099b ; Address of begin 0991 09d7 | | .CONST 0x09d7 ; Address of exception handler 0992 0003 | | .CONST 0x0003 ; Number of locals 0993 INIT_0990: 0993 e006 | | Load 0x0,0x6 0994 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0995 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0996 e002 | | Load 0x0,0x2 0997 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0998 02c7 | | Declare_Variable Any 0999 00d8 | | Load_Top At_Offset_0 099a 1c00 | | Execute_Immediate Run_Utility,0x0 099b BODY_0990: 099b e006 | | Load 0x0,0x6 099c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 099d e5fe | | Load 0x2,-0x2 099e e5fd | | Load 0x2,-0x3 099f 8011 | | Call 0x0,0x11 09a0 005a | Z | Store_Top Discrete,At_Offset_2 09a1 4800 |H | Short_Literal 0x0 09a2 00da | | Load_Top At_Offset_2 09a3 e006 | | Load 0x0,0x6 09a4 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 09a5 682e |h. | Jump_Zero 0x9d4 09a6 00cf | | Action Mark_Auxiliary 09a7 7826 |x& | Jump 0x9ce 09a8 e5fe | | Load 0x2,-0x2 09a9 4801 |H | Short_Literal 0x1 09aa e5fc | | Load 0x2,-0x4 09ab e00a | | Load 0x0,0xa 09ac 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 09ad c403 | | Store 0x2,0x3 09ae 00da | | Load_Top At_Offset_2 09af e5fd | | Load 0x2,-0x3 09b0 8012 | | Call 0x0,0x12 09b1 00db | | Load_Top At_Offset_3 09b2 e008 | | Load 0x0,0x8 09b3 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 09b4 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 09b5 005b | [ | Store_Top Discrete,At_Offset_3 09b6 4800 |H | Short_Literal 0x0 09b7 00db | | Load_Top At_Offset_3 09b8 e006 | | Load 0x0,0x6 09b9 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 09ba 7003 |p | Jump_Nonzero 0x9be 09bb 00da | | Load_Top At_Offset_2 09bc a5fb | | Store_Unchecked 0x2,-0x5 09bd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09be e5fe | | Load 0x2,-0x2 09bf 0092 13e7 | | Action Push_String_Extended,0x13e7 ; "Removed import " 09c1 e5fc | | Load 0x2,-0x4 09c2 e002 | | Load 0x0,0x2 09c3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 09c4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 09c5 01cc | | Execute Vector,Catenate 09c6 e00f | | Load 0x0,0xf 09c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09c8 e5fc | | Load 0x2,-0x4 09c9 e002 | | Load 0x0,0x2 09ca 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 09cb 181d | | Execute Package,Field_Execute,Field_Number 0x1d 09cc c5fc | | Store 0x2,-0x4 09cd 00c9 | | Action Pop_Auxiliary_Loop 09ce e5fc | | Load 0x2,-0x4 09cf e002 | | Load 0x0,0x2 09d0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 09d1 181e | | Execute Package,Field_Execute,Field_Number 0x1e 09d2 6fd5 |o | Jump_Zero 0x9a8 09d3 00ce | | Action Pop_Auxiliary 09d4 00d9 | | Load_Top At_Offset_1 09d5 a5fb | | Store_Unchecked 0x2,-0x5 09d6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09d7 TRAP_0990: 09d7 e006 | | Load 0x0,0x6 09d8 1b17 | | Execute Package,Field_Read,Field_Number 0x17 09d9 010f | | Execute Exception,Equal 09da 6826 |h& | Jump_Zero 0xa01 09db e006 | | Load 0x0,0x6 09dc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 09dd a5fb | | Store_Unchecked 0x2,-0x5 09de e5fe | | Load 0x2,-0x2 09df 4801 |H | Short_Literal 0x1 09e0 4802 |H | Short_Literal 0x2 09e1 e00e | | Load 0x0,0xe 09e2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 09e3 035b | [ | Declare_Type Array,Constrained 09e4 0337 | 7 | Declare_Variable Array 09e5 e5fd | | Load 0x2,-0x3 09e6 0227 | ' | Execute Access,All_Reference 09e7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09e8 e008 | | Load 0x0,0x8 09e9 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 09ea 1820 | | Execute Package,Field_Execute,Field_Number 0x20 09eb e00e | | Load 0x0,0xe 09ec 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09ed 0119 | | Execute Any,Check_In_Formal_Type 09ee 4801 |H | Short_Literal 0x1 09ef 00da | | Load_Top At_Offset_2 09f0 01d6 | | Execute Vector,Field_Write 09f1 e5fc | | Load 0x2,-0x4 09f2 e002 | | Load 0x0,0x2 09f3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 09f4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 09f5 e00e | | Load 0x0,0xe 09f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 09f7 e00e | | Load 0x0,0xe 09f8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09f9 0119 | | Execute Any,Check_In_Formal_Type 09fa 4802 |H | Short_Literal 0x2 09fb 00da | | Load_Top At_Offset_2 09fc 01d6 | | Execute Vector,Field_Write 09fd 678a |g | Indirect_Literal Discrete,0x988,{0x00000000, 0x00008143} 09fe e006 | | Load 0x0,0x6 09ff 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0a00 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a01 e5fe | | Load 0x2,-0x2 0a02 0092 13e6 | | Action Push_String_Extended,0x13e6 ; "Target_Builder.Library.Remove_Import" 0a04 e00f | | Load 0x0,0xf 0a05 180f | | Execute Package,Field_Execute,Field_Number 0xf 0a06 4801 |H | Short_Literal 0x1 0a07 4802 |H | Short_Literal 0x2 0a08 e00e | | Load 0x0,0xe 0a09 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a0a 035b | [ | Declare_Type Array,Constrained 0a0b 0337 | 7 | Declare_Variable Array 0a0c e5fd | | Load 0x2,-0x3 0a0d 0227 | ' | Execute Access,All_Reference 0a0e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0a0f e008 | | Load 0x0,0x8 0a10 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0a11 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0a12 e00e | | Load 0x0,0xe 0a13 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0a14 0119 | | Execute Any,Check_In_Formal_Type 0a15 4801 |H | Short_Literal 0x1 0a16 00da | | Load_Top At_Offset_2 0a17 01d6 | | Execute Vector,Field_Write 0a18 e5fc | | Load 0x2,-0x4 0a19 e002 | | Load 0x0,0x2 0a1a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a1b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0a1c e00e | | Load 0x0,0xe 0a1d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0a1e e00e | | Load 0x0,0xe 0a1f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0a20 0119 | | Execute Any,Check_In_Formal_Type 0a21 4802 |H | Short_Literal 0x2 0a22 00da | | Load_Top At_Offset_2 0a23 01d6 | | Execute Vector,Field_Write 0a24 6763 |gc | Indirect_Literal Discrete,0x988,{0x00000000, 0x00008143} 0a25 e006 | | Load 0x0,0x6 0a26 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a27 a5fb | | Store_Unchecked 0x2,-0x5 0a28 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a29 0000 0000 | | .BLANK 0000[0x7] 0a30 ; -------------------------------------------------------------------------------------- 0a30 ; SUBPROGRAM 0a30 ; -------------------------------------------------------------------------------------- 0a30 0a4f | O | .CONST 0x0a4f ; Address of begin 0a31 0aa8 | | .CONST 0x0aa8 ; Address of exception handler 0a32 0007 | | .CONST 0x0007 ; Number of locals 0a33 INIT_0a30: 0a33 e006 | | Load 0x0,0x6 0a34 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a35 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a36 e002 | | Load 0x0,0x2 0a37 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0a38 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a39 02c7 | | Declare_Variable Any 0a3a 00d8 | | Load_Top At_Offset_0 0a3b 1c00 | | Execute_Immediate Run_Utility,0x0 0a3c e002 | | Load 0x0,0x2 0a3d 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0a3e 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0a3f 02c7 | | Declare_Variable Any 0a40 00d8 | | Load_Top At_Offset_0 0a41 1c00 | | Execute_Immediate Run_Utility,0x0 0a42 e002 | | Load 0x0,0x2 0a43 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a44 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a45 02c7 | | Declare_Variable Any 0a46 00d8 | | Load_Top At_Offset_0 0a47 1c00 | | Execute_Immediate Run_Utility,0x0 0a48 e002 | | Load 0x0,0x2 0a49 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a4a e002 | | Load 0x0,0x2 0a4b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a4c 02c7 | | Declare_Variable Any 0a4d 00d8 | | Load_Top At_Offset_0 0a4e 1c00 | | Execute_Immediate Run_Utility,0x0 0a4f BODY_0a30: 0a4f 4800 |H | Short_Literal 0x0 0a50 a5fa | | Store_Unchecked 0x2,-0x6 0a51 e403 | | Load 0x2,0x3 0a52 0120 | | Execute Any,Is_Value 0a53 6804 |h | Jump_Zero 0xa58 0a54 e002 | | Load 0x0,0x2 0a55 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0a56 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a57 7801 |x | Jump 0xa59 0a58 e403 | | Load 0x2,0x3 0a59 e013 | | Load 0x0,0x13 0a5a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a5b e014 | | Load 0x0,0x14 0a5c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a5d e002 | | Load 0x0,0x2 0a5e 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0a5f 180f | | Execute Package,Field_Execute,Field_Number 0xf 0a60 c403 | | Store 0x2,0x3 0a61 00da | | Load_Top At_Offset_2 0a62 0120 | | Execute Any,Is_Value 0a63 6804 |h | Jump_Zero 0xa68 0a64 e002 | | Load 0x0,0x2 0a65 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a66 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0a67 7801 |x | Jump 0xa69 0a68 00da | | Load_Top At_Offset_2 0a69 e5fc | | Load 0x2,-0x4 0a6a e5fe | | Load 0x2,-0x2 0a6b e5ff | | Load 0x2,-0x1 0a6c e00a | | Load 0x0,0xa 0a6d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0a6e 827c | | | Call 0x1,0x7c 0a6f c405 | | Store 0x2,0x5 0a70 00cf | | Action Mark_Auxiliary 0a71 781c |x | Jump 0xa8e 0a72 e002 | | Load 0x0,0x2 0a73 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a74 00da | | Load_Top At_Offset_2 0a75 0120 | | Execute Any,Is_Value 0a76 6803 |h | Jump_Zero 0xa7a 0a77 e002 | | Load 0x0,0x2 0a78 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a79 7801 |x | Jump 0xa7b 0a7a 00da | | Load_Top At_Offset_2 0a7b e405 | | Load 0x2,0x5 0a7c e002 | | Load 0x0,0x2 0a7d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a7e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0a7f c407 | | Store 0x2,0x7 0a80 005b | [ | Store_Top Discrete,At_Offset_3 0a81 00da | | Load_Top At_Offset_2 0a82 7005 |p | Jump_Nonzero 0xa88 0a83 00d9 | | Load_Top At_Offset_1 0a84 e403 | | Load 0x2,0x3 0a85 e002 | | Load 0x0,0x2 0a86 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0a87 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0a88 00db | | Load_Top At_Offset_3 0a89 e002 | | Load 0x0,0x2 0a8a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a8b 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0a8c c405 | | Store 0x2,0x5 0a8d 00c9 | | Action Pop_Auxiliary_Loop 0a8e 00db | | Load_Top At_Offset_3 0a8f e002 | | Load 0x0,0x2 0a90 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a91 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0a92 6fdf |o | Jump_Zero 0xa72 0a93 00ce | | Action Pop_Auxiliary 0a94 00db | | Load_Top At_Offset_3 0a95 0120 | | Execute Any,Is_Value 0a96 6804 |h | Jump_Zero 0xa9b 0a97 e002 | | Load 0x0,0x2 0a98 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0a99 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0a9a 7801 |x | Jump 0xa9c 0a9b 00db | | Load_Top At_Offset_3 0a9c e013 | | Load 0x0,0x13 0a9d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a9e e014 | | Load 0x0,0x14 0a9f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0aa0 e403 | | Load 0x2,0x3 0aa1 e002 | | Load 0x0,0x2 0aa2 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0aa3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0aa4 c404 | | Store 0x2,0x4 0aa5 00db | | Load_Top At_Offset_3 0aa6 c5fb | | Store 0x2,-0x5 0aa7 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0aa8 TRAP_0a30: 0aa8 0007 | | Action Break_Optional 0aa9 e5fc | | Load 0x2,-0x4 0aaa 4801 |H | Short_Literal 0x1 0aab 4801 |H | Short_Literal 0x1 0aac e00e | | Load 0x0,0xe 0aad 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0aae 035b | [ | Declare_Type Array,Constrained 0aaf 0337 | 7 | Declare_Variable Array 0ab0 e5ff | | Load 0x2,-0x1 0ab1 e00a | | Load 0x0,0xa 0ab2 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0ab3 e00e | | Load 0x0,0xe 0ab4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0ab5 e00e | | Load 0x0,0xe 0ab6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ab7 0119 | | Execute Any,Check_In_Formal_Type 0ab8 4801 |H | Short_Literal 0x1 0ab9 00da | | Load_Top At_Offset_2 0aba 01d6 | | Execute Vector,Field_Write 0abb 6018 |` | Indirect_Literal Discrete,0xad4,{0x00000000, 0x00008144} 0abc e006 | | Load 0x0,0x6 0abd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0abe e5fb | | Load 0x2,-0x5 0abf 0120 | | Execute Any,Is_Value 0ac0 6804 |h | Jump_Zero 0xac5 0ac1 e002 | | Load 0x0,0x2 0ac2 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0ac3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0ac4 7801 |x | Jump 0xac6 0ac5 e5fb | | Load 0x2,-0x5 0ac6 e013 | | Load 0x0,0x13 0ac7 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ac8 e014 | | Load 0x0,0x14 0ac9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0aca e002 | | Load 0x0,0x2 0acb 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0acc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0acd e002 | | Load 0x0,0x2 0ace 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0acf 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ad0 c5fb | | Store 0x2,-0x5 0ad1 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0ad2 0000 0000 | | .XXX[0x2] 0ad4 0000 0000 | | .LITERAL {0x00000000, 0x00008144} 0ad8 ; -------------------------------------------------------------------------------------- 0ad8 ; SUBPROGRAM 0ad8 ; -------------------------------------------------------------------------------------- 0ad8 0ae7 | | .CONST 0x0ae7 ; Address of begin 0ad9 0b56 | V | .CONST 0x0b56 ; Address of exception handler 0ada 0004 | | .CONST 0x0004 ; Number of locals 0adb INIT_0ad8: 0adb e002 | | Load 0x0,0x2 0adc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0add 02c7 | | Declare_Variable Any 0ade 00d8 | | Load_Top At_Offset_0 0adf 1c00 | | Execute_Immediate Run_Utility,0x0 0ae0 e001 | | Load 0x0,0x1 0ae1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ae2 02c7 | | Declare_Variable Any 0ae3 00d8 | | Load_Top At_Offset_0 0ae4 1c00 | | Execute_Immediate Run_Utility,0x0 0ae5 e002 | | Load 0x0,0x2 0ae6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0ae7 BODY_0ad8: 0ae7 e5ff | | Load 0x2,-0x1 0ae8 e002 | | Load 0x0,0x2 0ae9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0aea 7069 |pi | Jump_Nonzero 0xb54 0aeb e5fd | | Load 0x2,-0x3 0aec 4801 |H | Short_Literal 0x1 0aed e5ff | | Load 0x2,-0x1 0aee e00a | | Load 0x0,0xa 0aef 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0af0 0092 13e8 | | Action Push_String_Extended,0x13e8 ; ".state.imports" 0af2 01cc | | Execute Vector,Catenate 0af3 e00a | | Load 0x0,0xa 0af4 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0af5 c402 | | Store 0x2,0x2 0af6 00da | | Load_Top At_Offset_2 0af7 e001 | | Load 0x0,0x1 0af8 180d | | Execute Package,Field_Execute,Field_Number 0xd 0af9 701d |p | Jump_Nonzero 0xb17 0afa e5fd | | Load 0x2,-0x3 0afb 4801 |H | Short_Literal 0x1 0afc 4802 |H | Short_Literal 0x2 0afd e00e | | Load 0x0,0xe 0afe 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0aff 035b | [ | Declare_Type Array,Constrained 0b00 0337 | 7 | Declare_Variable Array 0b01 e5ff | | Load 0x2,-0x1 0b02 e00e | | Load 0x0,0xe 0b03 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0b04 e00e | | Load 0x0,0xe 0b05 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b06 0119 | | Execute Any,Check_In_Formal_Type 0b07 4801 |H | Short_Literal 0x1 0b08 00da | | Load_Top At_Offset_2 0b09 01d6 | | Execute Vector,Field_Write 0b0a e402 | | Load 0x2,0x2 0b0b e00e | | Load 0x0,0xe 0b0c 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0b0d e00e | | Load 0x0,0xe 0b0e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b0f 0119 | | Execute Any,Check_In_Formal_Type 0b10 4802 |H | Short_Literal 0x2 0b11 00da | | Load_Top At_Offset_2 0b12 01d6 | | Execute Vector,Field_Write 0b13 6068 |`h | Indirect_Literal Discrete,0xb7c,{0x00000000, 0x00008146} 0b14 e006 | | Load 0x0,0x6 0b15 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0b16 783d |x= | Jump 0xb54 0b17 e002 | | Load 0x0,0x2 0b18 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b19 00da | | Load_Top At_Offset_2 0b1a 0120 | | Execute Any,Is_Value 0b1b 6803 |h | Jump_Zero 0xb1f 0b1c e001 | | Load 0x0,0x1 0b1d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b1e 7801 |x | Jump 0xb20 0b1f 00da | | Load_Top At_Offset_2 0b20 4800 |H | Short_Literal 0x0 0b21 4800 |H | Short_Literal 0x0 0b22 e015 | | Load 0x0,0x15 0b23 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b24 e402 | | Load 0x2,0x2 0b25 e001 | | Load 0x0,0x1 0b26 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0b27 c403 | | Store 0x2,0x3 0b28 0059 | Y | Store_Top Discrete,At_Offset_1 0b29 00d8 | | Load_Top At_Offset_0 0b2a 6829 |h) | Jump_Zero 0xb54 0b2b e5fd | | Load 0x2,-0x3 0b2c 4801 |H | Short_Literal 0x1 0b2d 4803 |H | Short_Literal 0x3 0b2e e00e | | Load 0x0,0xe 0b2f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b30 035b | [ | Declare_Type Array,Constrained 0b31 0337 | 7 | Declare_Variable Array 0b32 e5ff | | Load 0x2,-0x1 0b33 e00e | | Load 0x0,0xe 0b34 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0b35 e00e | | Load 0x0,0xe 0b36 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b37 0119 | | Execute Any,Check_In_Formal_Type 0b38 4801 |H | Short_Literal 0x1 0b39 00da | | Load_Top At_Offset_2 0b3a 01d6 | | Execute Vector,Field_Write 0b3b e402 | | Load 0x2,0x2 0b3c e00e | | Load 0x0,0xe 0b3d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0b3e e00e | | Load 0x0,0xe 0b3f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b40 0119 | | Execute Any,Check_In_Formal_Type 0b41 4802 |H | Short_Literal 0x2 0b42 00da | | Load_Top At_Offset_2 0b43 01d6 | | Execute Vector,Field_Write 0b44 00da | | Load_Top At_Offset_2 0b45 e00e | | Load 0x0,0xe 0b46 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0b47 e00e | | Load 0x0,0xe 0b48 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b49 0119 | | Execute Any,Check_In_Formal_Type 0b4a 4803 |H | Short_Literal 0x3 0b4b 00da | | Load_Top At_Offset_2 0b4c 01d6 | | Execute Vector,Field_Write 0b4d 602e |`. | Indirect_Literal Discrete,0xb7c,{0x00000000, 0x00008146} 0b4e e006 | | Load 0x0,0x6 0b4f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0b50 00d9 | | Load_Top At_Offset_1 0b51 e001 | | Load 0x0,0x1 0b52 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b53 c403 | | Store 0x2,0x3 0b54 00d9 | | Load_Top At_Offset_1 0b55 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b56 TRAP_0ad8: 0b56 e006 | | Load 0x0,0x6 0b57 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0b58 010f | | Execute Exception,Equal 0b59 6815 |h | Jump_Zero 0xb6f 0b5a e5fd | | Load 0x2,-0x3 0b5b 4801 |H | Short_Literal 0x1 0b5c 4801 |H | Short_Literal 0x1 0b5d e00e | | Load 0x0,0xe 0b5e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b5f 035b | [ | Declare_Type Array,Constrained 0b60 0337 | 7 | Declare_Variable Array 0b61 e5ff | | Load 0x2,-0x1 0b62 e00e | | Load 0x0,0xe 0b63 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0b64 e00e | | Load 0x0,0xe 0b65 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b66 0119 | | Execute Any,Check_In_Formal_Type 0b67 4801 |H | Short_Literal 0x1 0b68 00da | | Load_Top At_Offset_2 0b69 01d6 | | Execute Vector,Field_Write 0b6a 600d |` | Indirect_Literal Discrete,0xb78,{0x00000000, 0x00008156} 0b6b e006 | | Load 0x0,0x6 0b6c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0b6d 00da | | Load_Top At_Offset_2 0b6e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b6f e5fd | | Load 0x2,-0x3 0b70 0092 13e9 | | Action Push_String_Extended,0x13e9 ; "Target_Builder.Library.Get_Spec_View_Imports" 0b72 e00f | | Load 0x0,0xf 0b73 180f | | Execute Package,Field_Execute,Field_Number 0xf 0b74 00da | | Load_Top At_Offset_2 0b75 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b76 0000 0000 | | .XXX[0x2] 0b78 0000 0000 | | .LITERAL {0x00000000, 0x00008156} 0b7c 0000 0000 | | .LITERAL {0x00000000, 0x00008146} 0b80 ; -------------------------------------------------------------------------------------- 0b80 ; SUBPROGRAM 0b80 ; -------------------------------------------------------------------------------------- 0b80 0b86 | | .CONST 0x0b86 ; Address of begin 0b81 0ba4 | | .CONST 0x0ba4 ; Address of exception handler 0b82 0002 | | .CONST 0x0002 ; Number of locals 0b83 INIT_0b80: 0b83 e006 | | Load 0x0,0x6 0b84 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b85 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0b86 BODY_0b80: 0b86 e006 | | Load 0x0,0x6 0b87 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b88 e5ff | | Load 0x2,-0x1 0b89 e5fe | | Load 0x2,-0x2 0b8a 8011 | | Call 0x0,0x11 0b8b 0059 | Y | Store_Top Discrete,At_Offset_1 0b8c 4800 |H | Short_Literal 0x0 0b8d 00d9 | | Load_Top At_Offset_1 0b8e e006 | | Load 0x0,0x6 0b8f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0b90 6810 |h | Jump_Zero 0xba1 0b91 e5fe | | Load 0x2,-0x2 0b92 0229 | ) | Execute Access,All_Read 0b93 00d8 | | Load_Top At_Offset_0 0b94 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b95 e008 | | Load 0x0,0x8 0b96 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0b97 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0b98 00d9 | | Load_Top At_Offset_1 0b99 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0b9a 00d1 | | Pop_Control Pop_Count_1 0b9b e007 | | Load 0x0,0x7 0b9c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b9d a5fe | | Store_Unchecked 0x2,-0x2 0b9e 4800 |H | Short_Literal 0x0 0b9f a5fd | | Store_Unchecked 0x2,-0x3 0ba0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0ba1 00d8 | | Load_Top At_Offset_0 0ba2 a5fd | | Store_Unchecked 0x2,-0x3 0ba3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0ba4 TRAP_0b80: 0ba4 e006 | | Load 0x0,0x6 0ba5 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0ba6 010f | | Execute Exception,Equal 0ba7 681a |h | Jump_Zero 0xbc2 0ba8 e006 | | Load 0x0,0x6 0ba9 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0baa a5fd | | Store_Unchecked 0x2,-0x3 0bab e5ff | | Load 0x2,-0x1 0bac 4801 |H | Short_Literal 0x1 0bad 4801 |H | Short_Literal 0x1 0bae e00e | | Load 0x0,0xe 0baf 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0bb0 035b | [ | Declare_Type Array,Constrained 0bb1 0337 | 7 | Declare_Variable Array 0bb2 e5fe | | Load 0x2,-0x2 0bb3 0227 | ' | Execute Access,All_Reference 0bb4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0bb5 e008 | | Load 0x0,0x8 0bb6 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0bb7 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0bb8 e00e | | Load 0x0,0xe 0bb9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0bba 0119 | | Execute Any,Check_In_Formal_Type 0bbb 4801 |H | Short_Literal 0x1 0bbc 00da | | Load_Top At_Offset_2 0bbd 01d6 | | Execute Vector,Field_Write 0bbe 6021 |`! | Indirect_Literal Discrete,0xbe0,{0x00000000, 0x00008151} 0bbf e006 | | Load 0x0,0x6 0bc0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0bc1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0bc2 e5ff | | Load 0x2,-0x1 0bc3 0092 13ea | | Action Push_String_Extended,0x13ea ; "Target_Builder.Library.Abandon" 0bc5 e00f | | Load 0x0,0xf 0bc6 180f | | Execute Package,Field_Execute,Field_Number 0xf 0bc7 4801 |H | Short_Literal 0x1 0bc8 4801 |H | Short_Literal 0x1 0bc9 e00e | | Load 0x0,0xe 0bca 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0bcb 035b | [ | Declare_Type Array,Constrained 0bcc 0337 | 7 | Declare_Variable Array 0bcd e5fe | | Load 0x2,-0x2 0bce 0227 | ' | Execute Access,All_Reference 0bcf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0bd0 e008 | | Load 0x0,0x8 0bd1 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0bd2 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0bd3 e00e | | Load 0x0,0xe 0bd4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0bd5 0119 | | Execute Any,Check_In_Formal_Type 0bd6 4801 |H | Short_Literal 0x1 0bd7 00da | | Load_Top At_Offset_2 0bd8 01d6 | | Execute Vector,Field_Write 0bd9 6006 |` | Indirect_Literal Discrete,0xbe0,{0x00000000, 0x00008151} 0bda e006 | | Load 0x0,0x6 0bdb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0bdc a5fd | | Store_Unchecked 0x2,-0x3 0bdd 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0bde 0000 0000 | | .XXX[0x2] 0be0 0000 0000 | | .LITERAL {0x00000000, 0x00008151} 0be4 0000 0000 | | .BLANK 0000[0x4] 0be8 ; -------------------------------------------------------------------------------------- 0be8 ; SUBPROGRAM 0be8 ; -------------------------------------------------------------------------------------- 0be8 0c03 | | .CONST 0x0c03 ; Address of begin 0be9 0c6b | k | .CONST 0x0c6b ; Address of exception handler 0bea 0006 | | .CONST 0x0006 ; Number of locals 0beb INIT_0be8: 0beb e008 | | Load 0x0,0x8 0bec 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0bed 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0bee 02c7 | | Declare_Variable Any 0bef 00d8 | | Load_Top At_Offset_0 0bf0 1c00 | | Execute_Immediate Run_Utility,0x0 0bf1 e006 | | Load 0x0,0x6 0bf2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0bf3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0bf4 e007 | | Load 0x0,0x7 0bf5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0bf6 03bc | | Declare_Variable Access,By_Allocation 0bf7 00d8 | | Load_Top At_Offset_0 0bf8 0227 | ' | Execute Access,All_Reference 0bf9 1c00 | | Execute_Immediate Run_Utility,0x0 0bfa e5ff | | Load 0x2,-0x1 0bfb e00a | | Load 0x0,0xa 0bfc 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0bfd e008 | | Load 0x0,0x8 0bfe 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0bff 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0c00 02c7 | | Declare_Variable Any 0c01 00d8 | | Load_Top At_Offset_0 0c02 1c00 | | Execute_Immediate Run_Utility,0x0 0c03 BODY_0be8: 0c03 e5fc | | Load 0x2,-0x4 0c04 0092 13eb | | Action Push_String_Extended,0x13eb ; "Unregistering " 0c06 00db | | Load_Top At_Offset_3 0c07 01cc | | Execute Vector,Catenate 0c08 0092 13ec | | Action Push_String_Extended,0x13ec ; " from " 0c0a 01cc | | Execute Vector,Catenate 0c0b e5fe | | Load 0x2,-0x2 0c0c e00a | | Load 0x0,0xa 0c0d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0c0e 01cc | | Execute Vector,Catenate 0c0f e00f | | Load 0x0,0xf 0c10 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c11 e5fc | | Load 0x2,-0x4 0c12 0092 13ed | | Action Push_String_Extended,0x13ed ; "Target_Builder.Library.Unregister" 0c14 e00f | | Load 0x0,0xf 0c15 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c16 00db | | Load_Top At_Offset_3 0c17 e402 | | Load 0x2,0x2 0c18 0120 | | Execute Any,Is_Value 0c19 6804 |h | Jump_Zero 0xc1e 0c1a e008 | | Load 0x0,0x8 0c1b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0c1c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0c1d 7801 |x | Jump 0xc1f 0c1e e402 | | Load 0x2,0x2 0c1f 4801 |H | Short_Literal 0x1 0c20 e5fd | | Load 0x2,-0x3 0c21 e009 | | Load 0x0,0x9 0c22 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0c23 4801 |H | Short_Literal 0x1 0c24 e5fe | | Load 0x2,-0x2 0c25 e00a | | Load 0x0,0xa 0c26 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0c27 e008 | | Load 0x0,0x8 0c28 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0c29 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0c2a c402 | | Store 0x2,0x2 0c2b c403 | | Store 0x2,0x3 0c2c 4800 |H | Short_Literal 0x0 0c2d e403 | | Load 0x2,0x3 0c2e e006 | | Load 0x0,0x6 0c2f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0c30 7008 |p | Jump_Nonzero 0xc39 0c31 00db | | Load_Top At_Offset_3 0c32 a5fb | | Store_Unchecked 0x2,-0x5 0c33 e402 | | Load 0x2,0x2 0c34 e008 | | Load 0x0,0x8 0c35 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0c36 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0c37 c402 | | Store 0x2,0x2 0c38 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0c39 e402 | | Load 0x2,0x2 0c3a 00db | | Load_Top At_Offset_3 0c3b 0227 | ' | Execute Access,All_Reference 0c3c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0c3d 4801 |H | Short_Literal 0x1 0c3e e402 | | Load 0x2,0x2 0c3f e008 | | Load 0x0,0x8 0c40 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0c41 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0c42 00db | | Load_Top At_Offset_3 0c43 0227 | ' | Execute Access,All_Reference 0c44 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0c45 e402 | | Load 0x2,0x2 0c46 00da | | Load_Top At_Offset_2 0c47 e008 | | Load 0x0,0x8 0c48 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0c49 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0c4a c406 | | Store 0x2,0x6 0c4b 00db | | Load_Top At_Offset_3 0c4c 00db | | Load_Top At_Offset_3 0c4d 0227 | ' | Execute Access,All_Reference 0c4e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c4f 00da | | Load_Top At_Offset_2 0c50 e008 | | Load 0x0,0x8 0c51 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0c52 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0c53 c403 | | Store 0x2,0x3 0c54 4800 |H | Short_Literal 0x0 0c55 e403 | | Load 0x2,0x3 0c56 e006 | | Load 0x0,0x6 0c57 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0c58 7003 |p | Jump_Nonzero 0xc5c 0c59 00db | | Load_Top At_Offset_3 0c5a a5fb | | Store_Unchecked 0x2,-0x5 0c5b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0c5c e5fc | | Load 0x2,-0x4 0c5d 0092 13ee | | Action Push_String_Extended,0x13ee ; "Unregistered unit " 0c5f 00db | | Load_Top At_Offset_3 0c60 01cc | | Execute Vector,Catenate 0c61 e00f | | Load 0x0,0xf 0c62 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c63 e402 | | Load 0x2,0x2 0c64 e008 | | Load 0x0,0x8 0c65 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0c66 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0c67 c402 | | Store 0x2,0x2 0c68 00db | | Load_Top At_Offset_3 0c69 a5fb | | Store_Unchecked 0x2,-0x5 0c6a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0c6b TRAP_0be8: 0c6b 0007 | | Action Break_Optional 0c6c e402 | | Load 0x2,0x2 0c6d e008 | | Load 0x0,0x8 0c6e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0c6f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0c70 c402 | | Store 0x2,0x2 0c71 0092 13ed | | Action Push_String_Extended,0x13ed ; "Target_Builder.Library.Unregister" 0c73 e00f | | Load 0x0,0xf 0c74 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0c75 a5fb | | Store_Unchecked 0x2,-0x5 0c76 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0c77 0000 | | .XXX[0x1] 0c78 ; -------------------------------------------------------------------------------------- 0c78 ; SUBPROGRAM 0c78 ; -------------------------------------------------------------------------------------- 0c78 0c7b | { | .CONST 0x0c7b ; Address of begin 0c79 0004 | | .CONST 0x0004 ; Address of exception handler 0c7a 0001 | | .CONST 0x0001 ; Number of locals 0c7b BODY_0c78: 0c7b INIT_0c78: 0c7b 00da | | Load_Top At_Offset_2 0c7c 0227 | ' | Execute Access,All_Reference 0c7d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c7e e008 | | Load 0x0,0x8 0c7f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0c80 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 0c81 00d8 | | Load_Top At_Offset_0 0c82 00e4 | | Load_Encached Positive_Cache 0c83 0260 | ` | Execute Discrete,In_Type 0c84 7001 |p | Jump_Nonzero 0xc86 0c85 0801 | | Execute_Immediate Raise,0x1 0c86 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0c87 0000 | | .XXX[0x1] 0c88 ; -------------------------------------------------------------------------------------- 0c88 ; SUBPROGRAM 0c88 ; -------------------------------------------------------------------------------------- 0c88 0c8b | | .CONST 0x0c8b ; Address of begin 0c89 0004 | | .CONST 0x0004 ; Address of exception handler 0c8a 0001 | | .CONST 0x0001 ; Number of locals 0c8b BODY_0c88: 0c8b INIT_0c88: 0c8b 00d1 | | Pop_Control Pop_Count_1 0c8c 00da | | Load_Top At_Offset_2 0c8d 01dc | | Execute Vector,Last 0c8e 00db | | Load_Top At_Offset_3 0c8f 01dd | | Execute Vector,First 0c90 0263 | c | Execute Discrete,Above_Bound 0c91 700a |p | Jump_Nonzero 0xc9c 0c92 00d8 | | Load_Top At_Offset_0 0c93 e5ff | | Load 0x2,-0x1 0c94 01d5 | | Execute Vector,Field_Reference 0c95 0125 | % | Execute Any,Set_Constraint 0c96 00d8 | | Load_Top At_Offset_0 0c97 e5ff | | Load 0x2,-0x1 0c98 01d5 | | Execute Vector,Field_Reference 0c99 1c00 | | Execute_Immediate Run_Utility,0x0 0c9a 0a01 | | Execute_Immediate Plus,0x1 0c9b 7ff4 | | Jump 0xc90 0c9c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0c9d 0000 0000 | | .XXX[0x3] 0c9f 0000 | | 0ca0 ; -------------------------------------------------------------------------------------- 0ca0 ; SUBPROGRAM 0ca0 ; -------------------------------------------------------------------------------------- 0ca0 0ca3 | | .CONST 0x0ca3 ; Address of begin 0ca1 0004 | | .CONST 0x0004 ; Address of exception handler 0ca2 0001 | | .CONST 0x0001 ; Number of locals 0ca3 BODY_0ca0: 0ca3 INIT_0ca0: 0ca3 00d1 | | Pop_Control Pop_Count_1 0ca4 00da | | Load_Top At_Offset_2 0ca5 01dc | | Execute Vector,Last 0ca6 00db | | Load_Top At_Offset_3 0ca7 01dd | | Execute Vector,First 0ca8 0263 | c | Execute Discrete,Above_Bound 0ca9 700a |p | Jump_Nonzero 0xcb4 0caa 00d8 | | Load_Top At_Offset_0 0cab e5ff | | Load 0x2,-0x1 0cac 01d5 | | Execute Vector,Field_Reference 0cad 0125 | % | Execute Any,Set_Constraint 0cae 00d8 | | Load_Top At_Offset_0 0caf e5ff | | Load 0x2,-0x1 0cb0 01d5 | | Execute Vector,Field_Reference 0cb1 1c00 | | Execute_Immediate Run_Utility,0x0 0cb2 0a01 | | Execute_Immediate Plus,0x1 0cb3 7ff4 | | Jump 0xca8 0cb4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0cb5 0000 0000 | | .XXX[0x3] 0cb7 0000 | | 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 ; SUBPROGRAM 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 0cbb | | .CONST 0x0cbb ; Address of begin 0cb9 0004 | | .CONST 0x0004 ; Address of exception handler 0cba 0001 | | .CONST 0x0001 ; Number of locals 0cbb BODY_0cb8: 0cbb INIT_0cb8: 0cbb 00da | | Load_Top At_Offset_2 0cbc e002 | | Load 0x0,0x2 0cbd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0cbe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0cbf 0000 | | .XXX[0x1] 0cc0 ; -------------------------------------------------------------------------------------- 0cc0 ; SUBPROGRAM 0cc0 ; -------------------------------------------------------------------------------------- 0cc0 0cd9 | | .CONST 0x0cd9 ; Address of begin 0cc1 0004 | | .CONST 0x0004 ; Address of exception handler 0cc2 0008 | | .CONST 0x0008 ; Number of locals 0cc3 INIT_0cc0: 0cc3 e001 | | Load 0x0,0x1 0cc4 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0cc5 02c7 | | Declare_Variable Any 0cc6 00d8 | | Load_Top At_Offset_0 0cc7 1c00 | | Execute_Immediate Run_Utility,0x0 0cc8 e002 | | Load 0x0,0x2 0cc9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cca e006 | | Load 0x0,0x6 0ccb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0ccc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0ccd e002 | | Load 0x0,0x2 0cce 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ccf 02c7 | | Declare_Variable Any 0cd0 00d8 | | Load_Top At_Offset_0 0cd1 1c00 | | Execute_Immediate Run_Utility,0x0 0cd2 e5fd | | Load 0x2,-0x3 0cd3 e5fe | | Load 0x2,-0x2 0cd4 e5ff | | Load 0x2,-0x1 0cd5 8280 | | Call 0x1,0x80 0cd6 00e1 | | Load_Encached Boolean_Cache 0cd7 029f 1253 | S| Declare_Subprogram INIT_1250,For_Call 0cd9 BODY_0cc0: 0cd9 00be | | Action Activate_Tasks 0cda 4800 |H | Short_Literal 0x0 0cdb a5fb | | Store_Unchecked 0x2,-0x5 0cdc 00cf | | Action Mark_Auxiliary 0cdd 00db | | Load_Top At_Offset_3 0cde 01dc | | Execute Vector,Last 0cdf e406 | | Load 0x2,0x6 0ce0 01dd | | Execute Vector,First 0ce1 0263 | c | Execute Discrete,Above_Bound 0ce2 706f |po | Jump_Nonzero 0xd52 0ce3 00d8 | | Load_Top At_Offset_0 0ce4 e406 | | Load 0x2,0x6 0ce5 01d7 | | Execute Vector,Field_Read 0ce6 e001 | | Load 0x0,0x1 0ce7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0ce8 7040 |p@ | Jump_Nonzero 0xd29 0ce9 e402 | | Load 0x2,0x2 0cea 0120 | | Execute Any,Is_Value 0ceb 6803 |h | Jump_Zero 0xcef 0cec e001 | | Load 0x0,0x1 0ced 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0cee 7801 |x | Jump 0xcf0 0cef e402 | | Load 0x2,0x2 0cf0 00d9 | | Load_Top At_Offset_1 0cf1 e406 | | Load 0x2,0x6 0cf2 01d7 | | Execute Vector,Field_Read 0cf3 e001 | | Load 0x0,0x1 0cf4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0cf5 c402 | | Store 0x2,0x2 0cf6 00cf | | Action Mark_Auxiliary 0cf7 782c |x, | Jump 0xd24 0cf8 e402 | | Load 0x2,0x2 0cf9 e001 | | Load 0x0,0x1 0cfa 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0cfb c405 | | Store 0x2,0x5 0cfc e405 | | Load 0x2,0x5 0cfd 8281 | | Call 0x1,0x81 0cfe 6820 |h | Jump_Zero 0xd1f 0cff e405 | | Load 0x2,0x5 0d00 e5fc | | Load 0x2,-0x4 0d01 827b | { | Call 0x1,0x7b 0d02 701c |p | Jump_Nonzero 0xd1f 0d03 4800 |H | Short_Literal 0x0 0d04 4801 |H | Short_Literal 0x1 0d05 e405 | | Load 0x2,0x5 0d06 e5fc | | Load 0x2,-0x4 0d07 e278 | x | Load 0x1,0x78 0d08 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0d09 00e1 | | Load_Encached Boolean_Cache 0d0a 8408 | | Call 0x2,0x8 0d0b c407 | | Store 0x2,0x7 0d0c e407 | | Load 0x2,0x7 0d0d 6811 |h | Jump_Zero 0xd1f 0d0e e006 | | Load 0x0,0x6 0d0f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d10 e5fc | | Load 0x2,-0x4 0d11 e5fd | | Load 0x2,-0x3 0d12 e5fe | | Load 0x2,-0x2 0d13 e405 | | Load 0x2,0x5 0d14 8279 | y | Call 0x1,0x79 0d15 c5fc | | Store 0x2,-0x4 0d16 c404 | | Store 0x2,0x4 0d17 4800 |H | Short_Literal 0x0 0d18 e404 | | Load 0x2,0x4 0d19 e006 | | Load 0x0,0x6 0d1a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0d1b 7003 |p | Jump_Nonzero 0xd1f 0d1c e404 | | Load 0x2,0x4 0d1d a5fb | | Store_Unchecked 0x2,-0x5 0d1e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0d1f e402 | | Load 0x2,0x2 0d20 e001 | | Load 0x0,0x1 0d21 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0d22 c402 | | Store 0x2,0x2 0d23 00c9 | | Action Pop_Auxiliary_Loop 0d24 e402 | | Load 0x2,0x2 0d25 e001 | | Load 0x0,0x1 0d26 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0d27 6fd0 |o | Jump_Zero 0xcf8 0d28 00ce | | Action Pop_Auxiliary 0d29 e002 | | Load 0x0,0x2 0d2a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d2b 00d9 | | Load_Top At_Offset_1 0d2c e406 | | Load 0x2,0x6 0d2d 01d7 | | Execute Vector,Field_Read 0d2e e001 | | Load 0x0,0x1 0d2f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d30 c403 | | Store 0x2,0x3 0d31 e403 | | Load 0x2,0x3 0d32 681d |h | Jump_Zero 0xd50 0d33 4801 |H | Short_Literal 0x1 0d34 4802 |H | Short_Literal 0x2 0d35 e00e | | Load 0x0,0xe 0d36 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d37 035b | [ | Declare_Type Array,Constrained 0d38 0337 | 7 | Declare_Variable Array 0d39 e5ff | | Load 0x2,-0x1 0d3a e00e | | Load 0x0,0xe 0d3b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0d3c e00e | | Load 0x0,0xe 0d3d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0d3e 0119 | | Execute Any,Check_In_Formal_Type 0d3f 4801 |H | Short_Literal 0x1 0d40 00da | | Load_Top At_Offset_2 0d41 01d6 | | Execute Vector,Field_Write 0d42 e403 | | Load 0x2,0x3 0d43 e00e | | Load 0x0,0xe 0d44 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0d45 e00e | | Load 0x0,0xe 0d46 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0d47 0119 | | Execute Any,Check_In_Formal_Type 0d48 4802 |H | Short_Literal 0x2 0d49 00da | | Load_Top At_Offset_2 0d4a 01d6 | | Execute Vector,Field_Write 0d4b 6008 |` | Indirect_Literal Discrete,0xd54,{0x00000000, 0x00008153} 0d4c e006 | | Load 0x0,0x6 0d4d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0d4e a5fb | | Store_Unchecked 0x2,-0x5 0d4f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0d50 00c8 | | Action Pop_Auxiliary_Range 0d51 3f91 |? | Loop_Increasing 0xce3 0d52 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0d53 0000 | | .XXX[0x1] 0d54 0000 0000 | | .LITERAL {0x00000000, 0x00008153} 0d58 ; -------------------------------------------------------------------------------------- 0d58 ; SUBPROGRAM 0d58 ; -------------------------------------------------------------------------------------- 0d58 0d60 | ` | .CONST 0x0d60 ; Address of begin 0d59 0004 | | .CONST 0x0004 ; Address of exception handler 0d5a 0003 | | .CONST 0x0003 ; Number of locals 0d5b INIT_0d58: 0d5b e006 | | Load 0x0,0x6 0d5c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d5d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0d5e 029f 128b | | Declare_Subprogram INIT_1288,For_Call 0d60 BODY_0d58: 0d60 8403 | | Call 0x2,0x3 0d61 00d9 | | Load_Top At_Offset_1 0d62 a5fc | | Store_Unchecked 0x2,-0x4 0d63 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0d64 0000 0000 | | .BLANK 0000[0x4] 0d68 ; -------------------------------------------------------------------------------------- 0d68 ; SUBPROGRAM 0d68 ; -------------------------------------------------------------------------------------- 0d68 0d6d | m | .CONST 0x0d6d ; Address of begin 0d69 0d74 | t | .CONST 0x0d74 ; Address of exception handler 0d6a 0002 | | .CONST 0x0002 ; Number of locals 0d6b INIT_0d68: 0d6b 00e1 | | Load_Encached Boolean_Cache 0d6c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0d6d BODY_0d68: 0d6d e5fe | | Load 0x2,-0x2 0d6e e5ff | | Load 0x2,-0x1 0d6f e278 | x | Load 0x1,0x78 0d70 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0d71 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0d72 00d8 | | Load_Top At_Offset_0 0d73 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0d74 TRAP_0d68: 0d74 0007 | | Action Break_Optional 0d75 4800 |H | Short_Literal 0x0 0d76 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0d77 0000 | | .XXX[0x1] 0d78 ; -------------------------------------------------------------------------------------- 0d78 ; SUBPROGRAM 0d78 ; -------------------------------------------------------------------------------------- 0d78 0d82 | | .CONST 0x0d82 ; Address of begin 0d79 0d89 | | .CONST 0x0d89 ; Address of exception handler 0d7a 0002 | | .CONST 0x0002 ; Number of locals 0d7b INIT_0d78: 0d7b 0092 13ef | | Action Push_String_Extended,0x13ef ; "<QUIET>" 0d7d 4800 |H | Short_Literal 0x0 0d7e e5fe | | Load 0x2,-0x2 0d7f e5ff | | Load 0x2,-0x1 0d80 e016 | | Load 0x0,0x16 0d81 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0d82 BODY_0d78: 0d82 e5fd | | Load 0x2,-0x3 0d83 4801 |H | Short_Literal 0x1 0d84 00da | | Load_Top At_Offset_2 0d85 e00a | | Load 0x0,0xa 0d86 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0d87 c5fc | | Store 0x2,-0x4 0d88 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0d89 TRAP_0d78: 0d89 0007 | | Action Break_Optional 0d8a e002 | | Load 0x0,0x2 0d8b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d8c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0d8d c5fc | | Store 0x2,-0x4 0d8e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0d8f 0000 | | .XXX[0x1] 0d90 ; -------------------------------------------------------------------------------------- 0d90 ; SUBPROGRAM 0d90 ; -------------------------------------------------------------------------------------- 0d90 0da6 | | .CONST 0x0da6 ; Address of begin 0d91 0e1b | | .CONST 0x0e1b ; Address of exception handler 0d92 0006 | | .CONST 0x0006 ; Number of locals 0d93 INIT_0d90: 0d93 e002 | | Load 0x0,0x2 0d94 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d95 02c7 | | Declare_Variable Any 0d96 00d8 | | Load_Top At_Offset_0 0d97 1c00 | | Execute_Immediate Run_Utility,0x0 0d98 e017 | | Load 0x0,0x17 0d99 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0d9a 02c7 | | Declare_Variable Any 0d9b 00d8 | | Load_Top At_Offset_0 0d9c 1c00 | | Execute_Immediate Run_Utility,0x0 0d9d e002 | | Load 0x0,0x2 0d9e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d9f e002 | | Load 0x0,0x2 0da0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0da1 02c7 | | Declare_Variable Any 0da2 00d8 | | Load_Top At_Offset_0 0da3 1c00 | | Execute_Immediate Run_Utility,0x0 0da4 e002 | | Load 0x0,0x2 0da5 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0da6 BODY_0d90: 0da6 00be | | Action Activate_Tasks 0da7 e5fe | | Load 0x2,-0x2 0da8 e008 | | Load 0x0,0x8 0da9 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0daa 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0dab c402 | | Store 0x2,0x2 0dac e402 | | Load 0x2,0x2 0dad e002 | | Load 0x0,0x2 0dae 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0daf 6805 |h | Jump_Zero 0xdb5 0db0 e00c | | Load 0x0,0xc 0db1 180e | | Execute Package,Field_Execute,Field_Number 0xe 0db2 e00c | | Load 0x0,0xc 0db3 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 0db4 c402 | | Store 0x2,0x2 0db5 e5ff | | Load 0x2,-0x1 0db6 e00a | | Load 0x0,0xa 0db7 180f | | Execute Package,Field_Execute,Field_Number 0xf 0db8 6806 |h | Jump_Zero 0xdbf 0db9 e5ff | | Load 0x2,-0x1 0dba e00a | | Load 0x0,0xa 0dbb 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0dbc 6802 |h | Jump_Zero 0xdbf 0dbd e5ff | | Load 0x2,-0x1 0dbe 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0dbf e002 | | Load 0x0,0x2 0dc0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0dc1 e403 | | Load 0x2,0x3 0dc2 4800 |H | Short_Literal 0x0 0dc3 4800 |H | Short_Literal 0x0 0dc4 e015 | | Load 0x0,0x15 0dc5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0dc6 e402 | | Load 0x2,0x2 0dc7 e017 | | Load 0x0,0x17 0dc8 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0dc9 c403 | | Store 0x2,0x3 0dca 005b | [ | Store_Top Discrete,At_Offset_3 0dcb 00da | | Load_Top At_Offset_2 0dcc 681f |h | Jump_Zero 0xdec 0dcd e5fd | | Load 0x2,-0x3 0dce 4801 |H | Short_Literal 0x1 0dcf 4802 |H | Short_Literal 0x2 0dd0 e00e | | Load 0x0,0xe 0dd1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0dd2 035b | [ | Declare_Type Array,Constrained 0dd3 0337 | 7 | Declare_Variable Array 0dd4 e402 | | Load 0x2,0x2 0dd5 e00e | | Load 0x0,0xe 0dd6 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0dd7 e00e | | Load 0x0,0xe 0dd8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0dd9 0119 | | Execute Any,Check_In_Formal_Type 0dda 4801 |H | Short_Literal 0x1 0ddb 00da | | Load_Top At_Offset_2 0ddc 01d6 | | Execute Vector,Field_Write 0ddd e404 | | Load 0x2,0x4 0dde e00e | | Load 0x0,0xe 0ddf 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0de0 e00e | | Load 0x0,0xe 0de1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0de2 0119 | | Execute Any,Check_In_Formal_Type 0de3 4802 |H | Short_Literal 0x2 0de4 00da | | Load_Top At_Offset_2 0de5 01d6 | | Execute Vector,Field_Write 0de6 6069 |`i | Indirect_Literal Discrete,0xe50,{0x00000000, 0x00008117} 0de7 e006 | | Load 0x0,0x6 0de8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0de9 e002 | | Load 0x0,0x2 0dea 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0deb 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0dec 00db | | Load_Top At_Offset_3 0ded e5ff | | Load 0x2,-0x1 0dee e017 | | Load 0x0,0x17 0def 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0df0 c405 | | Store 0x2,0x5 0df1 e002 | | Load 0x0,0x2 0df2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0df3 e403 | | Load 0x2,0x3 0df4 e017 | | Load 0x0,0x17 0df5 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0df6 c403 | | Store 0x2,0x3 0df7 005b | [ | Store_Top Discrete,At_Offset_3 0df8 00da | | Load_Top At_Offset_2 0df9 681f |h | Jump_Zero 0xe19 0dfa e5fd | | Load 0x2,-0x3 0dfb 4801 |H | Short_Literal 0x1 0dfc 4802 |H | Short_Literal 0x2 0dfd e00e | | Load 0x0,0xe 0dfe 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0dff 035b | [ | Declare_Type Array,Constrained 0e00 0337 | 7 | Declare_Variable Array 0e01 e402 | | Load 0x2,0x2 0e02 e00e | | Load 0x0,0xe 0e03 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0e04 e00e | | Load 0x0,0xe 0e05 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e06 0119 | | Execute Any,Check_In_Formal_Type 0e07 4801 |H | Short_Literal 0x1 0e08 00da | | Load_Top At_Offset_2 0e09 01d6 | | Execute Vector,Field_Write 0e0a e404 | | Load 0x2,0x4 0e0b e00e | | Load 0x0,0xe 0e0c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0e0d e00e | | Load 0x0,0xe 0e0e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e0f 0119 | | Execute Any,Check_In_Formal_Type 0e10 4802 |H | Short_Literal 0x2 0e11 00da | | Load_Top At_Offset_2 0e12 01d6 | | Execute Vector,Field_Write 0e13 6038 |`8 | Indirect_Literal Discrete,0xe4c,{0x00000000, 0x00008152} 0e14 e006 | | Load 0x0,0x6 0e15 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0e16 e002 | | Load 0x0,0x2 0e17 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0e18 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0e19 00d9 | | Load_Top At_Offset_1 0e1a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0e1b TRAP_0d90: 0e1b e017 | | Load 0x0,0x17 0e1c 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0e1d 010f | | Execute Exception,Equal 0e1e 6826 |h& | Jump_Zero 0xe45 0e1f e002 | | Load 0x0,0x2 0e20 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0e21 e403 | | Load 0x2,0x3 0e22 e017 | | Load 0x0,0x17 0e23 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0e24 c403 | | Store 0x2,0x3 0e25 c404 | | Store 0x2,0x4 0e26 e5fd | | Load 0x2,-0x3 0e27 4801 |H | Short_Literal 0x1 0e28 4802 |H | Short_Literal 0x2 0e29 e00e | | Load 0x0,0xe 0e2a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e2b 035b | [ | Declare_Type Array,Constrained 0e2c 0337 | 7 | Declare_Variable Array 0e2d e5ff | | Load 0x2,-0x1 0e2e e00e | | Load 0x0,0xe 0e2f 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0e30 e00e | | Load 0x0,0xe 0e31 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e32 0119 | | Execute Any,Check_In_Formal_Type 0e33 4801 |H | Short_Literal 0x1 0e34 00da | | Load_Top At_Offset_2 0e35 01d6 | | Execute Vector,Field_Write 0e36 e402 | | Load 0x2,0x2 0e37 e00e | | Load 0x0,0xe 0e38 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0e39 e00e | | Load 0x0,0xe 0e3a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e3b 0119 | | Execute Any,Check_In_Formal_Type 0e3c 4802 |H | Short_Literal 0x2 0e3d 00da | | Load_Top At_Offset_2 0e3e 01d6 | | Execute Vector,Field_Write 0e3f 6008 |` | Indirect_Literal Discrete,0xe48,{0x00000000, 0x00008139} 0e40 e006 | | Load 0x0,0x6 0e41 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0e42 e002 | | Load 0x0,0x2 0e43 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0e44 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0e45 0100 | | Execute Exception,Raise 0e46 0000 0000 | | .XXX[0x2] 0e48 0000 0000 | | .LITERAL {0x00000000, 0x00008139} 0e4c 0000 0000 | | .LITERAL {0x00000000, 0x00008152} 0e50 0000 0000 | | .LITERAL {0x00000000, 0x00008117} 0e54 0000 0000 | | .BLANK 0000[0x4] 0e58 ; -------------------------------------------------------------------------------------- 0e58 ; SUBPROGRAM 0e58 ; -------------------------------------------------------------------------------------- 0e58 0e6a | j | .CONST 0x0e6a ; Address of begin 0e59 0ed8 | | .CONST 0x0ed8 ; Address of exception handler 0e5a 0005 | | .CONST 0x0005 ; Number of locals 0e5b INIT_0e58: 0e5b e002 | | Load 0x0,0x2 0e5c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e5d 02c7 | | Declare_Variable Any 0e5e 00d8 | | Load_Top At_Offset_0 0e5f 1c00 | | Execute_Immediate Run_Utility,0x0 0e60 e001 | | Load 0x0,0x1 0e61 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e62 02c7 | | Declare_Variable Any 0e63 00d8 | | Load_Top At_Offset_0 0e64 1c00 | | Execute_Immediate Run_Utility,0x0 0e65 e002 | | Load 0x0,0x2 0e66 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e67 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e68 e002 | | Load 0x0,0x2 0e69 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0e6a BODY_0e58: 0e6a e5fd | | Load 0x2,-0x3 0e6b 4801 |H | Short_Literal 0x1 0e6c e5ff | | Load 0x2,-0x1 0e6d e00a | | Load 0x0,0xa 0e6e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0e6f 0092 13f0 | | Action Push_String_Extended,0x13f0 ; ".state." 0e71 01cc | | Execute Vector,Catenate 0e72 e5fe | | Load 0x2,-0x2 0e73 01cc | | Execute Vector,Catenate 0e74 e00a | | Load 0x0,0xa 0e75 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0e76 c402 | | Store 0x2,0x2 0e77 00db | | Load_Top At_Offset_3 0e78 e001 | | Load 0x0,0x1 0e79 180d | | Execute Package,Field_Execute,Field_Number 0xd 0e7a 701d |p | Jump_Nonzero 0xe98 0e7b e5fd | | Load 0x2,-0x3 0e7c 4801 |H | Short_Literal 0x1 0e7d 4802 |H | Short_Literal 0x2 0e7e e00e | | Load 0x0,0xe 0e7f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e80 035b | [ | Declare_Type Array,Constrained 0e81 0337 | 7 | Declare_Variable Array 0e82 e5ff | | Load 0x2,-0x1 0e83 e00e | | Load 0x0,0xe 0e84 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0e85 e00e | | Load 0x0,0xe 0e86 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e87 0119 | | Execute Any,Check_In_Formal_Type 0e88 4801 |H | Short_Literal 0x1 0e89 00da | | Load_Top At_Offset_2 0e8a 01d6 | | Execute Vector,Field_Write 0e8b e402 | | Load 0x2,0x2 0e8c e00e | | Load 0x0,0xe 0e8d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0e8e e00e | | Load 0x0,0xe 0e8f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e90 0119 | | Execute Any,Check_In_Formal_Type 0e91 4802 |H | Short_Literal 0x2 0e92 00da | | Load_Top At_Offset_2 0e93 01d6 | | Execute Vector,Field_Write 0e94 607f |` | Indirect_Literal Discrete,0xf14,{0x00000000, 0x0000811b} 0e95 e006 | | Load 0x0,0x6 0e96 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0e97 783d |x= | Jump 0xed5 0e98 e002 | | Load 0x0,0x2 0e99 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0e9a 00db | | Load_Top At_Offset_3 0e9b 0120 | | Execute Any,Is_Value 0e9c 6803 |h | Jump_Zero 0xea0 0e9d e001 | | Load 0x0,0x1 0e9e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e9f 7801 |x | Jump 0xea1 0ea0 00db | | Load_Top At_Offset_3 0ea1 4800 |H | Short_Literal 0x0 0ea2 4800 |H | Short_Literal 0x0 0ea3 e015 | | Load 0x0,0x15 0ea4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ea5 e402 | | Load 0x2,0x2 0ea6 e001 | | Load 0x0,0x1 0ea7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0ea8 c403 | | Store 0x2,0x3 0ea9 0059 | Y | Store_Top Discrete,At_Offset_1 0eaa 00d8 | | Load_Top At_Offset_0 0eab 6829 |h) | Jump_Zero 0xed5 0eac e5fd | | Load 0x2,-0x3 0ead 4801 |H | Short_Literal 0x1 0eae 4803 |H | Short_Literal 0x3 0eaf e00e | | Load 0x0,0xe 0eb0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0eb1 035b | [ | Declare_Type Array,Constrained 0eb2 0337 | 7 | Declare_Variable Array 0eb3 e5ff | | Load 0x2,-0x1 0eb4 e00e | | Load 0x0,0xe 0eb5 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0eb6 e00e | | Load 0x0,0xe 0eb7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0eb8 0119 | | Execute Any,Check_In_Formal_Type 0eb9 4801 |H | Short_Literal 0x1 0eba 00da | | Load_Top At_Offset_2 0ebb 01d6 | | Execute Vector,Field_Write 0ebc e402 | | Load 0x2,0x2 0ebd e00e | | Load 0x0,0xe 0ebe 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0ebf e00e | | Load 0x0,0xe 0ec0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ec1 0119 | | Execute Any,Check_In_Formal_Type 0ec2 4802 |H | Short_Literal 0x2 0ec3 00da | | Load_Top At_Offset_2 0ec4 01d6 | | Execute Vector,Field_Write 0ec5 00da | | Load_Top At_Offset_2 0ec6 e00e | | Load 0x0,0xe 0ec7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0ec8 e00e | | Load 0x0,0xe 0ec9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0eca 0119 | | Execute Any,Check_In_Formal_Type 0ecb 4803 |H | Short_Literal 0x3 0ecc 00da | | Load_Top At_Offset_2 0ecd 01d6 | | Execute Vector,Field_Write 0ece 6045 |`E | Indirect_Literal Discrete,0xf14,{0x00000000, 0x0000811b} 0ecf e006 | | Load 0x0,0x6 0ed0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0ed1 00da | | Load_Top At_Offset_2 0ed2 e001 | | Load 0x0,0x1 0ed3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0ed4 c403 | | Store 0x2,0x3 0ed5 00da | | Load_Top At_Offset_2 0ed6 c5fc | | Store 0x2,-0x4 0ed7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0ed8 TRAP_0e58: 0ed8 e006 | | Load 0x0,0x6 0ed9 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0eda 010f | | Execute Exception,Equal 0edb 682c |h, | Jump_Zero 0xf08 0edc e5fd | | Load 0x2,-0x3 0edd 4801 |H | Short_Literal 0x1 0ede 4803 |H | Short_Literal 0x3 0edf e00e | | Load 0x0,0xe 0ee0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ee1 035b | [ | Declare_Type Array,Constrained 0ee2 0337 | 7 | Declare_Variable Array 0ee3 e5ff | | Load 0x2,-0x1 0ee4 e00e | | Load 0x0,0xe 0ee5 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0ee6 e00e | | Load 0x0,0xe 0ee7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ee8 0119 | | Execute Any,Check_In_Formal_Type 0ee9 4801 |H | Short_Literal 0x1 0eea 00da | | Load_Top At_Offset_2 0eeb 01d6 | | Execute Vector,Field_Write 0eec e402 | | Load 0x2,0x2 0eed e00e | | Load 0x0,0xe 0eee 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0eef e00e | | Load 0x0,0xe 0ef0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ef1 0119 | | Execute Any,Check_In_Formal_Type 0ef2 4802 |H | Short_Literal 0x2 0ef3 00da | | Load_Top At_Offset_2 0ef4 01d6 | | Execute Vector,Field_Write 0ef5 e404 | | Load 0x2,0x4 0ef6 e00e | | Load 0x0,0xe 0ef7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0ef8 e00e | | Load 0x0,0xe 0ef9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0efa 0119 | | Execute Any,Check_In_Formal_Type 0efb 4803 |H | Short_Literal 0x3 0efc 00da | | Load_Top At_Offset_2 0efd 01d6 | | Execute Vector,Field_Write 0efe 6015 |` | Indirect_Literal Discrete,0xf14,{0x00000000, 0x0000811b} 0eff e006 | | Load 0x0,0x6 0f00 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0f01 00db | | Load_Top At_Offset_3 0f02 e001 | | Load 0x0,0x1 0f03 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f04 c403 | | Store 0x2,0x3 0f05 00db | | Load_Top At_Offset_3 0f06 c5fc | | Store 0x2,-0x4 0f07 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f08 e5fd | | Load 0x2,-0x3 0f09 0092 13f1 | | Action Push_String_Extended,0x13f1 ; "Target_Builder.Library.Open_Object_Set" 0f0b e00f | | Load 0x0,0xf 0f0c 180f | | Execute Package,Field_Execute,Field_Number 0xf 0f0d 00db | | Load_Top At_Offset_3 0f0e e001 | | Load 0x0,0x1 0f0f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0f10 c403 | | Store 0x2,0x3 0f11 00db | | Load_Top At_Offset_3 0f12 c5fc | | Store 0x2,-0x4 0f13 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f14 0000 0000 | | .LITERAL {0x00000000, 0x0000811b} 0f18 ; -------------------------------------------------------------------------------------- 0f18 ; SUBPROGRAM 0f18 ; -------------------------------------------------------------------------------------- 0f18 0f42 | B | .CONST 0x0f42 ; Address of begin 0f19 0004 | | .CONST 0x0004 ; Address of exception handler 0f1a 0009 | | .CONST 0x0009 ; Number of locals 0f1b INIT_0f18: 0f1b e001 | | Load 0x0,0x1 0f1c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0f1d 02c7 | | Declare_Variable Any 0f1e 00d8 | | Load_Top At_Offset_0 0f1f 1c00 | | Execute_Immediate Run_Utility,0x0 0f20 e002 | | Load 0x0,0x2 0f21 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0f22 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0f23 02c7 | | Declare_Variable Any 0f24 00d8 | | Load_Top At_Offset_0 0f25 1c00 | | Execute_Immediate Run_Utility,0x0 0f26 e002 | | Load 0x0,0x2 0f27 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0f28 02c7 | | Declare_Variable Any 0f29 00d8 | | Load_Top At_Offset_0 0f2a 1c00 | | Execute_Immediate Run_Utility,0x0 0f2b e002 | | Load 0x0,0x2 0f2c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0f2d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0f2e e002 | | Load 0x0,0x2 0f2f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0f30 e002 | | Load 0x0,0x2 0f31 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0f32 02c7 | | Declare_Variable Any 0f33 00d8 | | Load_Top At_Offset_0 0f34 1c00 | | Execute_Immediate Run_Utility,0x0 0f35 e002 | | Load 0x0,0x2 0f36 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f37 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0f38 02c7 | | Declare_Variable Any 0f39 00d8 | | Load_Top At_Offset_0 0f3a 1c00 | | Execute_Immediate Run_Utility,0x0 0f3b 4801 |H | Short_Literal 0x1 0f3c 4800 |H | Short_Literal 0x0 0f3d e274 | t | Load 0x1,0x74 0f3e 035b | [ | Declare_Type Array,Constrained 0f3f 0337 | 7 | Declare_Variable Array 0f40 00d8 | | Load_Top At_Offset_0 0f41 1c00 | | Execute_Immediate Run_Utility,0x0 0f42 BODY_0f18: 0f42 e002 | | Load 0x0,0x2 0f43 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0f44 00da | | Load_Top At_Offset_2 0f45 0120 | | Execute Any,Is_Value 0f46 6804 |h | Jump_Zero 0xf4b 0f47 e002 | | Load 0x0,0x2 0f48 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f49 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0f4a 7801 |x | Jump 0xf4c 0f4b 00da | | Load_Top At_Offset_2 0f4c 6057 |`W | Indirect_Literal Discrete,0xfa4,{0x00000000, 0x00004000} 0f4d e015 | | Load 0x0,0x15 0f4e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0f4f 4800 |H | Short_Literal 0x0 0f50 e5ff | | Load 0x2,-0x1 0f51 e002 | | Load 0x0,0x2 0f52 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f53 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0f54 c408 | | Store 0x2,0x8 0f55 c406 | | Store 0x2,0x6 0f56 00db | | Load_Top At_Offset_3 0f57 6820 |h | Jump_Zero 0xf78 0f58 e5fd | | Load 0x2,-0x3 0f59 4801 |H | Short_Literal 0x1 0f5a 4802 |H | Short_Literal 0x2 0f5b e00e | | Load 0x0,0xe 0f5c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0f5d 035b | [ | Declare_Type Array,Constrained 0f5e 0337 | 7 | Declare_Variable Array 0f5f e5ff | | Load 0x2,-0x1 0f60 e00e | | Load 0x0,0xe 0f61 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0f62 e00e | | Load 0x0,0xe 0f63 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0f64 0119 | | Execute Any,Check_In_Formal_Type 0f65 4801 |H | Short_Literal 0x1 0f66 00da | | Load_Top At_Offset_2 0f67 01d6 | | Execute Vector,Field_Write 0f68 e406 | | Load 0x2,0x6 0f69 e00e | | Load 0x0,0xe 0f6a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0f6b e00e | | Load 0x0,0xe 0f6c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0f6d 0119 | | Execute Any,Check_In_Formal_Type 0f6e 4802 |H | Short_Literal 0x2 0f6f 00da | | Load_Top At_Offset_2 0f70 01d6 | | Execute Vector,Field_Write 0f71 602e |`. | Indirect_Literal Discrete,0xfa0,{0x00000000, 0x00008141} 0f72 e006 | | Load 0x0,0x6 0f73 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0f74 00d8 | | Load_Top At_Offset_0 0f75 e274 | t | Load 0x1,0x74 0f76 01c6 | | Execute Vector,Convert_To_Formal 0f77 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0f78 00d9 | | Load_Top At_Offset_1 0f79 e002 | | Load 0x0,0x2 0f7a 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f7b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0f7c e018 | | Load 0x0,0x18 0f7d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0f7e 027f | | Execute Discrete,Equal 0f7f 681c |h | Jump_Zero 0xf9c 0f80 e402 | | Load 0x2,0x2 0f81 0120 | | Execute Any,Is_Value 0f82 6803 |h | Jump_Zero 0xf86 0f83 e001 | | Load 0x0,0x1 0f84 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0f85 7801 |x | Jump 0xf87 0f86 e402 | | Load 0x2,0x2 0f87 e5fd | | Load 0x2,-0x3 0f88 0092 13f2 | | Action Push_String_Extended,0x13f2 ; "referencers" 0f8a e5ff | | Load 0x2,-0x1 0f8b 827e | ~ | Call 0x1,0x7e 0f8c c402 | | Store 0x2,0x2 0f8d 4801 |H | Short_Literal 0x1 0f8e 4801 |H | Short_Literal 0x1 0f8f e274 | t | Load 0x1,0x74 0f90 035b | [ | Declare_Type Array,Constrained 0f91 0337 | 7 | Declare_Variable Array 0f92 e402 | | Load 0x2,0x2 0f93 e001 | | Load 0x0,0x1 0f94 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0f95 0119 | | Execute Any,Check_In_Formal_Type 0f96 4801 |H | Short_Literal 0x1 0f97 00da | | Load_Top At_Offset_2 0f98 01d6 | | Execute Vector,Field_Write 0f99 e274 | t | Load 0x1,0x74 0f9a 01c6 | | Execute Vector,Convert_To_Formal 0f9b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0f9c 0831 | 1 | Execute_Immediate Raise,0x31 0f9d 0000 0000 | | .XXX[0x3] 0f9f 0000 | | 0fa0 0000 0000 | | .LITERAL {0x00000000, 0x00008141} 0fa4 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0fa8 ; -------------------------------------------------------------------------------------- 0fa8 ; SUBPROGRAM 0fa8 ; -------------------------------------------------------------------------------------- 0fa8 0fd2 | | .CONST 0x0fd2 ; Address of begin 0fa9 0004 | | .CONST 0x0004 ; Address of exception handler 0faa 0009 | | .CONST 0x0009 ; Number of locals 0fab INIT_0fa8: 0fab 4801 |H | Short_Literal 0x1 0fac 4800 |H | Short_Literal 0x0 0fad e274 | t | Load 0x1,0x74 0fae 035b | [ | Declare_Type Array,Constrained 0faf 0337 | 7 | Declare_Variable Array 0fb0 00d8 | | Load_Top At_Offset_0 0fb1 1c00 | | Execute_Immediate Run_Utility,0x0 0fb2 e001 | | Load 0x0,0x1 0fb3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0fb4 02c7 | | Declare_Variable Any 0fb5 00d8 | | Load_Top At_Offset_0 0fb6 1c00 | | Execute_Immediate Run_Utility,0x0 0fb7 e002 | | Load 0x0,0x2 0fb8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0fb9 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0fba 02c7 | | Declare_Variable Any 0fbb 00d8 | | Load_Top At_Offset_0 0fbc 1c00 | | Execute_Immediate Run_Utility,0x0 0fbd e002 | | Load 0x0,0x2 0fbe 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0fbf 02c7 | | Declare_Variable Any 0fc0 00d8 | | Load_Top At_Offset_0 0fc1 1c00 | | Execute_Immediate Run_Utility,0x0 0fc2 e002 | | Load 0x0,0x2 0fc3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0fc4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0fc5 e002 | | Load 0x0,0x2 0fc6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0fc7 e002 | | Load 0x0,0x2 0fc8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0fc9 02c7 | | Declare_Variable Any 0fca 00d8 | | Load_Top At_Offset_0 0fcb 1c00 | | Execute_Immediate Run_Utility,0x0 0fcc e002 | | Load 0x0,0x2 0fcd 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0fce 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0fcf 02c7 | | Declare_Variable Any 0fd0 00d8 | | Load_Top At_Offset_0 0fd1 1c00 | | Execute_Immediate Run_Utility,0x0 0fd2 BODY_0fa8: 0fd2 e002 | | Load 0x0,0x2 0fd3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0fd4 00d9 | | Load_Top At_Offset_1 0fd5 0120 | | Execute Any,Is_Value 0fd6 6804 |h | Jump_Zero 0xfdb 0fd7 e002 | | Load 0x0,0x2 0fd8 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0fd9 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0fda 7801 |x | Jump 0xfdc 0fdb 00d9 | | Load_Top At_Offset_1 0fdc 67c7 |g | Indirect_Literal Discrete,0xfa4,{0x00000000, 0x00004000} 0fdd e015 | | Load 0x0,0x15 0fde 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0fdf 4800 |H | Short_Literal 0x0 0fe0 e5ff | | Load 0x2,-0x1 0fe1 e002 | | Load 0x0,0x2 0fe2 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0fe3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0fe4 c409 | | Store 0x2,0x9 0fe5 005b | [ | Store_Top Discrete,At_Offset_3 0fe6 00da | | Load_Top At_Offset_2 0fe7 6820 |h | Jump_Zero 0x1008 0fe8 e5fd | | Load 0x2,-0x3 0fe9 4801 |H | Short_Literal 0x1 0fea 4802 |H | Short_Literal 0x2 0feb e00e | | Load 0x0,0xe 0fec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0fed 035b | [ | Declare_Type Array,Constrained 0fee 0337 | 7 | Declare_Variable Array 0fef e5ff | | Load 0x2,-0x1 0ff0 e00e | | Load 0x0,0xe 0ff1 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0ff2 e00e | | Load 0x0,0xe 0ff3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ff4 0119 | | Execute Any,Check_In_Formal_Type 0ff5 4801 |H | Short_Literal 0x1 0ff6 00da | | Load_Top At_Offset_2 0ff7 01d6 | | Execute Vector,Field_Write 0ff8 e407 | | Load 0x2,0x7 0ff9 e00e | | Load 0x0,0xe 0ffa 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0ffb e00e | | Load 0x0,0xe 0ffc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ffd 0119 | | Execute Any,Check_In_Formal_Type 0ffe 4802 |H | Short_Literal 0x2 0fff 00da | | Load_Top At_Offset_2 1000 01d6 | | Execute Vector,Field_Write 1001 679e |g | Indirect_Literal Discrete,0xfa0,{0x00000000, 0x00008141} 1002 e006 | | Load 0x0,0x6 1003 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 1004 e402 | | Load 0x2,0x2 1005 e274 | t | Load 0x1,0x74 1006 01c6 | | Execute Vector,Convert_To_Formal 1007 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 1008 00d8 | | Load_Top At_Offset_0 1009 e002 | | Load 0x0,0x2 100a 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 100b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 100c e018 | | Load 0x0,0x18 100d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 100e 027f | | Execute Discrete,Equal 100f 680d |h | Jump_Zero 0x101d 1010 e403 | | Load 0x2,0x3 1011 0120 | | Execute Any,Is_Value 1012 6803 |h | Jump_Zero 0x1016 1013 e001 | | Load 0x0,0x1 1014 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1015 7801 |x | Jump 0x1017 1016 e403 | | Load 0x2,0x3 1017 e5fd | | Load 0x2,-0x3 1018 0092 13f3 | | Action Push_String_Extended,0x13f3 ; "imports" 101a e5ff | | Load 0x2,-0x1 101b 827e | ~ | Call 0x1,0x7e 101c c403 | | Store 0x2,0x3 101d 4801 |H | Short_Literal 0x1 101e 4801 |H | Short_Literal 0x1 101f e274 | t | Load 0x1,0x74 1020 035b | [ | Declare_Type Array,Constrained 1021 0337 | 7 | Declare_Variable Array 1022 e403 | | Load 0x2,0x3 1023 e001 | | Load 0x0,0x1 1024 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1025 0119 | | Execute Any,Check_In_Formal_Type 1026 4801 |H | Short_Literal 0x1 1027 00da | | Load_Top At_Offset_2 1028 01d6 | | Execute Vector,Field_Write 1029 e274 | t | Load 0x1,0x74 102a 01c6 | | Execute Vector,Convert_To_Formal 102b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 102c 0000 0000 | | .BLANK 0000[0x4] 1030 ; -------------------------------------------------------------------------------------- 1030 ; SUBPROGRAM 1030 ; -------------------------------------------------------------------------------------- 1030 103b | ; | .CONST 0x103b ; Address of begin 1031 0004 | | .CONST 0x0004 ; Address of exception handler 1032 0003 | | .CONST 0x0003 ; Number of locals 1033 INIT_1030: 1033 e002 | | Load 0x0,0x2 1034 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 1035 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1036 02c7 | | Declare_Variable Any 1037 00d8 | | Load_Top At_Offset_0 1038 1c00 | | Execute_Immediate Run_Utility,0x0 1039 e002 | | Load 0x0,0x2 103a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 103b BODY_1030: 103b e002 | | Load 0x0,0x2 103c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 103d 00da | | Load_Top At_Offset_2 103e 0120 | | Execute Any,Is_Value 103f 6804 |h | Jump_Zero 0x1044 1040 e002 | | Load 0x0,0x2 1041 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 1042 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1043 7801 |x | Jump 0x1045 1044 00da | | Load_Top At_Offset_2 1045 e5ff | | Load 0x2,-0x1 1046 e002 | | Load 0x0,0x2 1047 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 1048 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1049 c402 | | Store 0x2,0x2 104a 0059 | Y | Store_Top Discrete,At_Offset_1 104b 00d8 | | Load_Top At_Offset_0 104c 0f00 | | Execute_Immediate Equal,0x0 104d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 104e 0000 0000 | | .XXX[0x2] 1050 ; -------------------------------------------------------------------------------------- 1050 ; SUBPROGRAM 1050 ; -------------------------------------------------------------------------------------- 1050 1069 | i | .CONST 0x1069 ; Address of begin 1051 0004 | | .CONST 0x0004 ; Address of exception handler 1052 0008 | | .CONST 0x0008 ; Number of locals 1053 INIT_1050: 1053 e001 | | Load 0x0,0x1 1054 1b17 | | Execute Package,Field_Read,Field_Number 0x17 1055 02c7 | | Declare_Variable Any 1056 00d8 | | Load_Top At_Offset_0 1057 1c00 | | Execute_Immediate Run_Utility,0x0 1058 e002 | | Load 0x0,0x2 1059 1b0d | | Execute Package,Field_Read,Field_Number 0xd 105a e006 | | Load 0x0,0x6 105b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 105c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 105d e002 | | Load 0x0,0x2 105e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 105f 02c7 | | Declare_Variable Any 1060 00d8 | | Load_Top At_Offset_0 1061 1c00 | | Execute_Immediate Run_Utility,0x0 1062 e5fd | | Load 0x2,-0x3 1063 e5fe | | Load 0x2,-0x2 1064 e5ff | | Load 0x2,-0x1 1065 827f | | Call 0x1,0x7f 1066 00e1 | | Load_Encached Boolean_Cache 1067 029f 1303 | | Declare_Subprogram INIT_1300,For_Call 1069 BODY_1050: 1069 00be | | Action Activate_Tasks 106a 4800 |H | Short_Literal 0x0 106b a5fb | | Store_Unchecked 0x2,-0x5 106c 00cf | | Action Mark_Auxiliary 106d 00db | | Load_Top At_Offset_3 106e 01dc | | Execute Vector,Last 106f e406 | | Load 0x2,0x6 1070 01dd | | Execute Vector,First 1071 0263 | c | Execute Discrete,Above_Bound 1072 706f |po | Jump_Nonzero 0x10e2 1073 00d8 | | Load_Top At_Offset_0 1074 e406 | | Load 0x2,0x6 1075 01d7 | | Execute Vector,Field_Read 1076 e001 | | Load 0x0,0x1 1077 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1078 7040 |p@ | Jump_Nonzero 0x10b9 1079 e402 | | Load 0x2,0x2 107a 0120 | | Execute Any,Is_Value 107b 6803 |h | Jump_Zero 0x107f 107c e001 | | Load 0x0,0x1 107d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 107e 7801 |x | Jump 0x1080 107f e402 | | Load 0x2,0x2 1080 00d9 | | Load_Top At_Offset_1 1081 e406 | | Load 0x2,0x6 1082 01d7 | | Execute Vector,Field_Read 1083 e001 | | Load 0x0,0x1 1084 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1085 c402 | | Store 0x2,0x2 1086 00cf | | Action Mark_Auxiliary 1087 782c |x, | Jump 0x10b4 1088 e402 | | Load 0x2,0x2 1089 e001 | | Load 0x0,0x1 108a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 108b c405 | | Store 0x2,0x5 108c e405 | | Load 0x2,0x5 108d 8281 | | Call 0x1,0x81 108e 6820 |h | Jump_Zero 0x10af 108f e405 | | Load 0x2,0x5 1090 e5fc | | Load 0x2,-0x4 1091 827b | { | Call 0x1,0x7b 1092 701c |p | Jump_Nonzero 0x10af 1093 4800 |H | Short_Literal 0x0 1094 4801 |H | Short_Literal 0x1 1095 e405 | | Load 0x2,0x5 1096 e5fc | | Load 0x2,-0x4 1097 e278 | x | Load 0x1,0x78 1098 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1099 00e1 | | Load_Encached Boolean_Cache 109a 8408 | | Call 0x2,0x8 109b c407 | | Store 0x2,0x7 109c e407 | | Load 0x2,0x7 109d 6811 |h | Jump_Zero 0x10af 109e e006 | | Load 0x0,0x6 109f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 10a0 e5fc | | Load 0x2,-0x4 10a1 e5fd | | Load 0x2,-0x3 10a2 e5fe | | Load 0x2,-0x2 10a3 e405 | | Load 0x2,0x5 10a4 8282 | | Call 0x1,0x82 10a5 c5fc | | Store 0x2,-0x4 10a6 c404 | | Store 0x2,0x4 10a7 4800 |H | Short_Literal 0x0 10a8 e404 | | Load 0x2,0x4 10a9 e006 | | Load 0x0,0x6 10aa 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 10ab 7003 |p | Jump_Nonzero 0x10af 10ac e404 | | Load 0x2,0x4 10ad a5fb | | Store_Unchecked 0x2,-0x5 10ae 4504 |E | Exit_Suprogram New_Top_Offset 0x4 10af e402 | | Load 0x2,0x2 10b0 e001 | | Load 0x0,0x1 10b1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 10b2 c402 | | Store 0x2,0x2 10b3 00c9 | | Action Pop_Auxiliary_Loop 10b4 e402 | | Load 0x2,0x2 10b5 e001 | | Load 0x0,0x1 10b6 181b | | Execute Package,Field_Execute,Field_Number 0x1b 10b7 6fd0 |o | Jump_Zero 0x1088 10b8 00ce | | Action Pop_Auxiliary 10b9 e002 | | Load 0x0,0x2 10ba 1b0d | | Execute Package,Field_Read,Field_Number 0xd 10bb 00d9 | | Load_Top At_Offset_1 10bc e406 | | Load 0x2,0x6 10bd 01d7 | | Execute Vector,Field_Read 10be e001 | | Load 0x0,0x1 10bf 1811 | | Execute Package,Field_Execute,Field_Number 0x11 10c0 c403 | | Store 0x2,0x3 10c1 e403 | | Load 0x2,0x3 10c2 681d |h | Jump_Zero 0x10e0 10c3 4801 |H | Short_Literal 0x1 10c4 4802 |H | Short_Literal 0x2 10c5 e00e | | Load 0x0,0xe 10c6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 10c7 035b | [ | Declare_Type Array,Constrained 10c8 0337 | 7 | Declare_Variable Array 10c9 e5ff | | Load 0x2,-0x1 10ca e00e | | Load 0x0,0xe 10cb 181a | | Execute Package,Field_Execute,Field_Number 0x1a 10cc e00e | | Load 0x0,0xe 10cd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 10ce 0119 | | Execute Any,Check_In_Formal_Type 10cf 4801 |H | Short_Literal 0x1 10d0 00da | | Load_Top At_Offset_2 10d1 01d6 | | Execute Vector,Field_Write 10d2 e403 | | Load 0x2,0x3 10d3 e00e | | Load 0x0,0xe 10d4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 10d5 e00e | | Load 0x0,0xe 10d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 10d7 0119 | | Execute Any,Check_In_Formal_Type 10d8 4802 |H | Short_Literal 0x2 10d9 00da | | Load_Top At_Offset_2 10da 01d6 | | Execute Vector,Field_Write 10db 6008 |` | Indirect_Literal Discrete,0x10e4,{0x00000000, 0x00008153} 10dc e006 | | Load 0x0,0x6 10dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 10de a5fb | | Store_Unchecked 0x2,-0x5 10df 4504 |E | Exit_Suprogram New_Top_Offset 0x4 10e0 00c8 | | Action Pop_Auxiliary_Range 10e1 3f91 |? | Loop_Increasing 0x1073 10e2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 10e3 0000 | | .XXX[0x1] 10e4 0000 0000 | | .LITERAL {0x00000000, 0x00008153} 10e8 ; -------------------------------------------------------------------------------------- 10e8 ; SUBPROGRAM 10e8 ; -------------------------------------------------------------------------------------- 10e8 10eb | | .CONST 0x10eb ; Address of begin 10e9 10f0 | | .CONST 0x10f0 ; Address of exception handler 10ea 0001 | | .CONST 0x0001 ; Number of locals 10eb BODY_10e8: 10eb INIT_10e8: 10eb e019 | | Load 0x0,0x19 10ec 180e | | Execute Package,Field_Execute,Field_Number 0xe 10ed 00e0 | | Load_Encached Standard_Cache 10ee 1818 | | Execute Package,Field_Execute,Field_Number 0x18 10ef 00ca | | Action Exit_Nullary_Function 10f0 TRAP_10e8: 10f0 0007 | | Action Break_Optional 10f1 00ea | | Load_Encached Null_String_Cache 10f2 00ca | | Action Exit_Nullary_Function 10f3 0000 0000 | | .BLANK 0000[0x5] 10f8 ; -------------------------------------------------------------------------------------- 10f8 ; SUBPROGRAM 10f8 ; -------------------------------------------------------------------------------------- 10f8 1107 | | .CONST 0x1107 ; Address of begin 10f9 111e | | .CONST 0x111e ; Address of exception handler 10fa 0004 | | .CONST 0x0004 ; Number of locals 10fb INIT_10f8: 10fb e01a | | Load 0x0,0x1a 10fc 0322 | " | Declare_Variable Record 10fd 00d8 | | Load_Top At_Offset_0 10fe 1c00 | | Execute_Immediate Run_Utility,0x0 10ff e5ff | | Load 0x2,-0x1 1100 e002 | | Load 0x0,0x2 1101 1813 | | Execute Package,Field_Execute,Field_Number 0x13 1102 00e0 | | Load_Encached Standard_Cache 1103 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1104 e006 | | Load 0x0,0x6 1105 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1106 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1107 BODY_10f8: 1107 00d9 | | Load_Top At_Offset_1 1108 4801 |H | Short_Literal 0x1 1109 00db | | Load_Top At_Offset_3 110a 01db | | Execute Vector,Length 110b 00d8 | | Load_Top At_Offset_0 110c 00e2 | | Load_Encached Integer_Cache 110d 0260 | ` | Execute Discrete,In_Type 110e 7001 |p | Jump_Nonzero 0x1110 110f 0801 | | Execute_Immediate Raise,0x1 1110 e602 | | Load 0x3,0x2 1111 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1112 01ce | | Execute Vector,Slice_Write 1113 00d9 | | Load_Top At_Offset_1 1114 01db | | Execute Vector,Length 1115 00db | | Load_Top At_Offset_3 1116 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 1117 00d8 | | Load_Top At_Offset_0 1118 00db | | Load_Top At_Offset_3 1119 e7ff | | Load 0x3,-0x1 111a e01b | | Load 0x0,0x1b 111b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 111c 0059 | Y | Store_Top Discrete,At_Offset_1 111d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 111e TRAP_10f8: 111e 0007 | | Action Break_Optional 111f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1120 ; -------------------------------------------------------------------------------------- 1120 ; SUBPROGRAM 1120 ; -------------------------------------------------------------------------------------- 1120 1132 | 2 | .CONST 0x1132 ; Address of begin 1121 1157 | W | .CONST 0x1157 ; Address of exception handler 1122 0004 | | .CONST 0x0004 ; Number of locals 1123 INIT_1120: 1123 e006 | | Load 0x0,0x6 1124 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1125 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1126 e008 | | Load 0x0,0x8 1127 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1128 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1129 02c7 | | Declare_Variable Any 112a 00d8 | | Load_Top At_Offset_0 112b 1c00 | | Execute_Immediate Run_Utility,0x0 112c e008 | | Load 0x0,0x8 112d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 112e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 112f 02c7 | | Declare_Variable Any 1130 00d8 | | Load_Top At_Offset_0 1131 1c00 | | Execute_Immediate Run_Utility,0x0 1132 BODY_1120: 1132 00da | | Load_Top At_Offset_2 1133 00da | | Load_Top At_Offset_2 1134 0120 | | Execute Any,Is_Value 1135 6804 |h | Jump_Zero 0x113a 1136 e008 | | Load 0x0,0x8 1137 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1138 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1139 7801 |x | Jump 0x113b 113a 00da | | Load_Top At_Offset_2 113b 4800 |H | Short_Literal 0x0 113c e5f5 | | Load 0x2,-0xb 113d e009 | | Load 0x0,0x9 113e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 113f 4801 |H | Short_Literal 0x1 1140 e5ff | | Load 0x2,-0x1 1141 e00a | | Load 0x0,0xa 1142 1817 | | Execute Package,Field_Execute,Field_Number 0x17 1143 e008 | | Load 0x0,0x8 1144 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1145 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 1146 c603 | | Store 0x3,0x3 1147 005b | [ | Store_Top Discrete,At_Offset_3 1148 4801 |H | Short_Literal 0x1 1149 00da | | Load_Top At_Offset_2 114a e008 | | Load 0x0,0x8 114b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 114c 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 114d c604 | | Store 0x3,0x4 114e 00d8 | | Load_Top At_Offset_0 114f 8405 | | Call 0x2,0x5 1150 c604 | | Store 0x3,0x4 1151 00d9 | | Load_Top At_Offset_1 1152 e008 | | Load 0x0,0x8 1153 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1154 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1155 c603 | | Store 0x3,0x3 1156 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1157 TRAP_1120: 1157 0007 | | Action Break_Optional 1158 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1159 0000 0000 | | .BLANK 0000[0x7] 1160 ; -------------------------------------------------------------------------------------- 1160 ; SUBPROGRAM 1160 ; -------------------------------------------------------------------------------------- 1160 1167 | g | .CONST 0x1167 ; Address of begin 1161 0004 | | .CONST 0x0004 ; Address of exception handler 1162 0003 | | .CONST 0x0003 ; Number of locals 1163 INIT_1160: 1163 e01b | | Load 0x0,0x1b 1164 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1165 029f 133b | ;| Declare_Subprogram INIT_1338,For_Call 1167 BODY_1160: 1167 e7ff | | Load 0x3,-0x1 1168 e01b | | Load 0x0,0x1b 1169 1816 | | Execute Package,Field_Execute,Field_Number 0x16 116a 0032 | 2 | Store_Top Heap_Access,At_Offset_2 116b 8603 | | Call 0x3,0x3 116c 0831 | 1 | Execute_Immediate Raise,0x31 116d 0000 0000 | | .XXX[0x3] 116f 0000 | | 1170 ; -------------------------------------------------------------------------------------- 1170 ; SUBPROGRAM 1170 ; -------------------------------------------------------------------------------------- 1170 1176 | v | .CONST 0x1176 ; Address of begin 1171 0004 | | .CONST 0x0004 ; Address of exception handler 1172 0002 | | .CONST 0x0002 ; Number of locals 1173 INIT_1170: 1173 e006 | | Load 0x0,0x6 1174 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1175 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1176 BODY_1170: 1176 e403 | | Load 0x2,0x3 1177 e008 | | Load 0x0,0x8 1178 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1179 1811 | | Execute Package,Field_Execute,Field_Number 0x11 117a c403 | | Store 0x2,0x3 117b e00c | | Load 0x0,0xc 117c 180e | | Execute Package,Field_Execute,Field_Number 0xe 117d 4803 |H | Short_Literal 0x3 117e 0092 13f4 | | Action Push_String_Extended,0x13f4 ; "Refreshing obsolete state information for " 1180 e5ff | | Load 0x2,-0x1 1181 e00a | | Load 0x0,0xa 1182 1817 | | Execute Package,Field_Execute,Field_Number 0x17 1183 01cc | | Execute Vector,Catenate 1184 0092 13f5 | | Action Push_String_Extended,0x13f5 ; "." 1186 01cc | | Execute Vector,Catenate 1187 e010 | | Load 0x0,0x10 1188 1813 | | Execute Package,Field_Execute,Field_Number 0x13 1189 e006 | | Load 0x0,0x6 118a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 118b 4801 |H | Short_Literal 0x1 118c e5fd | | Load 0x2,-0x3 118d 4800 |H | Short_Literal 0x0 118e e5fe | | Load 0x2,-0x2 118f 00ea | | Load_Encached Null_String_Cache 1190 00ea | | Load_Encached Null_String_Cache 1191 00ea | | Load_Encached Null_String_Cache 1192 00ea | | Load_Encached Null_String_Cache 1193 00ea | | Load_Encached Null_String_Cache 1194 00ea | | Load_Encached Null_String_Cache 1195 00ea | | Load_Encached Null_String_Cache 1196 00ea | | Load_Encached Null_String_Cache 1197 00ea | | Load_Encached Null_String_Cache 1198 e5ff | | Load 0x2,-0x1 1199 8269 | i | Call 0x1,0x69 119a 0059 | Y | Store_Top Discrete,At_Offset_1 119b e402 | | Load 0x2,0x2 119c e403 | | Load 0x2,0x3 119d 0120 | | Execute Any,Is_Value 119e 6804 |h | Jump_Zero 0x11a3 119f e008 | | Load 0x0,0x8 11a0 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 11a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 11a2 7801 |x | Jump 0x11a4 11a3 e403 | | Load 0x2,0x3 11a4 4801 |H | Short_Literal 0x1 11a5 e5fe | | Load 0x2,-0x2 11a6 e009 | | Load 0x0,0x9 11a7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 11a8 e5fc | | Load 0x2,-0x4 11a9 e5ff | | Load 0x2,-0x1 11aa e00a | | Load 0x0,0xa 11ab 1817 | | Execute Package,Field_Execute,Field_Number 0x17 11ac e008 | | Load 0x0,0x8 11ad 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 11ae 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 11af c403 | | Store 0x2,0x3 11b0 c402 | | Store 0x2,0x2 11b1 e403 | | Load 0x2,0x3 11b2 e406 | | Load 0x2,0x6 11b3 0227 | ' | Execute Access,All_Reference 11b4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 11b5 4801 |H | Short_Literal 0x1 11b6 e403 | | Load 0x2,0x3 11b7 e008 | | Load 0x0,0x8 11b8 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 11b9 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 11ba e406 | | Load 0x2,0x6 11bb 0227 | ' | Execute Access,All_Reference 11bc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 11bd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 11be 0000 0000 | | .XXX[0x2] 11c0 ; -------------------------------------------------------------------------------------- 11c0 ; SUBPROGRAM 11c0 ; -------------------------------------------------------------------------------------- 11c0 11c3 | | .CONST 0x11c3 ; Address of begin 11c1 0004 | | .CONST 0x0004 ; Address of exception handler 11c2 0001 | | .CONST 0x0001 ; Number of locals 11c3 BODY_11c0: 11c3 INIT_11c0: 11c3 00da | | Load_Top At_Offset_2 11c4 6803 |h | Jump_Zero 0x11c8 11c5 0092 13e2 | | Action Push_String_Extended,0x13e2 ; "<DEFAULT>" 11c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 11c8 00ea | | Load_Encached Null_String_Cache 11c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 11ca 0000 0000 | | .BLANK 0000[0x6] 11d0 ; -------------------------------------------------------------------------------------- 11d0 ; SUBPROGRAM 11d0 ; -------------------------------------------------------------------------------------- 11d0 11e3 | | .CONST 0x11e3 ; Address of begin 11d1 0004 | | .CONST 0x0004 ; Address of exception handler 11d2 0003 | | .CONST 0x0003 ; Number of locals 11d3 INIT_11d0: 11d3 e403 | | Load 0x2,0x3 11d4 e008 | | Load 0x0,0x8 11d5 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 11d6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 11d7 00e3 | | Load_Encached Natural_Cache 11d8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 11d9 e008 | | Load 0x0,0x8 11da 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 11db 1b0d | | Execute Package,Field_Read,Field_Number 0xd 11dc 02c7 | | Declare_Variable Any 11dd 4801 |H | Short_Literal 0x1 11de e403 | | Load 0x2,0x3 11df e008 | | Load 0x0,0x8 11e0 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 11e1 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 11e2 a603 | | Store_Unchecked 0x3,0x3 11e3 BODY_11d0: 11e3 00d9 | | Load_Top At_Offset_1 11e4 6805 |h | Jump_Zero 0x11ea 11e5 00d8 | | Load_Top At_Offset_0 11e6 e008 | | Load 0x0,0x8 11e7 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 11e8 1816 | | Execute Package,Field_Execute,Field_Number 0x16 11e9 700b |p | Jump_Nonzero 0x11f5 11ea e5fd | | Load 0x2,-0x3 11eb 4822 |H" | Short_Literal 0x22 11ec 0092 13f6 | | Action Push_String_Extended,0x13f6 ; "There is no state file for view \x22" 11ee e5ff | | Load 0x2,-0x1 11ef e00a | | Load 0x0,0xa 11f0 1817 | | Execute Package,Field_Execute,Field_Number 0x17 11f1 01cc | | Execute Vector,Catenate 11f2 01cb | | Execute Vector,Append 11f3 e00f | | Load 0x0,0xf 11f4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 11f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 11f6 0000 0000 | | .XXX[0x2] 11f8 ; -------------------------------------------------------------------------------------- 11f8 ; SUBPROGRAM 11f8 ; -------------------------------------------------------------------------------------- 11f8 11fb | | .CONST 0x11fb ; Address of begin 11f9 0004 | | .CONST 0x0004 ; Address of exception handler 11fa 0001 | | .CONST 0x0001 ; Number of locals 11fb BODY_11f8: 11fb INIT_11f8: 11fb e006 | | Load 0x0,0x6 11fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 11fd 4801 |H | Short_Literal 0x1 11fe 4801 |H | Short_Literal 0x1 11ff e00e | | Load 0x0,0xe 1200 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1201 035b | [ | Declare_Type Array,Constrained 1202 0337 | 7 | Declare_Variable Array 1203 e5fe | | Load 0x2,-0x2 1204 e00e | | Load 0x0,0xe 1205 181a | | Execute Package,Field_Execute,Field_Number 0x1a 1206 e00e | | Load 0x0,0xe 1207 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1208 0119 | | Execute Any,Check_In_Formal_Type 1209 4801 |H | Short_Literal 0x1 120a 00da | | Load_Top At_Offset_2 120b 01d6 | | Execute Vector,Field_Write 120c 6007 |` | Indirect_Literal Discrete,0x1214,{0x00000000, 0x0000816c} 120d e006 | | Load 0x0,0x6 120e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 120f c5fb | | Store 0x2,-0x5 1210 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1211 0000 0000 | | .XXX[0x3] 1213 0000 | | 1214 0000 0000 | | .LITERAL {0x00000000, 0x0000816c} 1218 ; -------------------------------------------------------------------------------------- 1218 ; SUBPROGRAM 1218 ; -------------------------------------------------------------------------------------- 1218 1221 | ! | .CONST 0x1221 ; Address of begin 1219 0004 | | .CONST 0x0004 ; Address of exception handler 121a 0002 | | .CONST 0x0002 ; Number of locals 121b INIT_1218: 121b e5ff | | Load 0x2,-0x1 121c 0227 | ' | Execute Access,All_Reference 121d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 121e e008 | | Load 0x0,0x8 121f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1220 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 1221 BODY_1218: 1221 00cf | | Action Mark_Auxiliary 1222 00d9 | | Load_Top At_Offset_1 1223 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 1224 01dc | | Execute Vector,Last 1225 4801 |H | Short_Literal 0x1 1226 0263 | c | Execute Discrete,Above_Bound 1227 7024 |p$ | Jump_Nonzero 0x124c 1228 e403 | | Load 0x2,0x3 1229 e402 | | Load 0x2,0x2 122a 0120 | | Execute Any,Is_Value 122b 6803 |h | Jump_Zero 0x122f 122c e002 | | Load 0x0,0x2 122d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 122e 7801 |x | Jump 0x1230 122f e402 | | Load 0x2,0x2 1230 00da | | Load_Top At_Offset_2 1231 e602 | | Load 0x3,0x2 1232 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 1233 01d7 | | Execute Vector,Field_Read 1234 e008 | | Load 0x0,0x8 1235 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 1236 1817 | | Execute Package,Field_Execute,Field_Number 0x17 1237 c402 | | Store 0x2,0x2 1238 c403 | | Store 0x2,0x3 1239 4800 |H | Short_Literal 0x0 123a e403 | | Load 0x2,0x3 123b e006 | | Load 0x0,0x6 123c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 123d 7005 |p | Jump_Nonzero 0x1243 123e e00c | | Load 0x0,0xc 123f 180e | | Execute Package,Field_Execute,Field_Number 0xe 1240 e403 | | Load 0x2,0x3 1241 e006 | | Load 0x0,0x6 1242 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 1243 e5fe | | Load 0x2,-0x2 1244 e402 | | Load 0x2,0x2 1245 012f | / | Execute Any,Equal 1246 6803 |h | Jump_Zero 0x124a 1247 4801 |H | Short_Literal 0x1 1248 00cb | | Action Pop_Block_With_Result 1249 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 124a 00c8 | | Action Pop_Auxiliary_Range 124b 3fdc |? | Loop_Increasing 0x1228 124c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 124d 0000 0000 | | .XXX[0x3] 124f 0000 | | 1250 ; -------------------------------------------------------------------------------------- 1250 ; SUBPROGRAM 1250 ; -------------------------------------------------------------------------------------- 1250 1255 | U | .CONST 0x1255 ; Address of begin 1251 1280 | | .CONST 0x1280 ; Address of exception handler 1252 0002 | | .CONST 0x0002 ; Number of locals 1253 INIT_1250: 1253 029f 135b | [| Declare_Subprogram INIT_1358,For_Call 1255 BODY_1250: 1255 4801 |H | Short_Literal 0x1 1256 a7ff | | Store_Unchecked 0x3,-0x1 1257 e5fe | | Load 0x2,-0x2 1258 e405 | | Load 0x2,0x5 1259 e002 | | Load 0x0,0x2 125a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 125b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 125c e008 | | Load 0x0,0x8 125d 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 125e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 125f 4800 |H | Short_Literal 0x0 1260 e5fe | | Load 0x2,-0x2 1261 e008 | | Load 0x0,0x8 1262 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1263 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1264 e006 | | Load 0x0,0x6 1265 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 1266 7002 |p | Jump_Nonzero 0x1269 1267 8602 | | Call 0x3,0x2 1268 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1269 4800 |H | Short_Literal 0x0 126a 4800 |H | Short_Literal 0x0 126b 0092 13e2 | | Action Push_String_Extended,0x13e2 ; "<DEFAULT>" 126d e5fe | | Load 0x2,-0x2 126e e405 | | Load 0x2,0x5 126f e008 | | Load 0x0,0x8 1270 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1271 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 1272 e5fe | | Load 0x2,-0x2 1273 e008 | | Load 0x0,0x8 1274 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1275 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 1276 4800 |H | Short_Literal 0x0 1277 e5fe | | Load 0x2,-0x2 1278 e008 | | Load 0x0,0x8 1279 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 127a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 127b e006 | | Load 0x0,0x6 127c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 127d 7001 |p | Jump_Nonzero 0x127f 127e 8602 | | Call 0x3,0x2 127f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1280 TRAP_1250: 1280 0007 | | Action Break_Optional 1281 8602 | | Call 0x3,0x2 1282 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1283 0000 0000 | | .BLANK 0000[0x5] 1288 ; -------------------------------------------------------------------------------------- 1288 ; SUBPROGRAM 1288 ; -------------------------------------------------------------------------------------- 1288 1291 | | .CONST 0x1291 ; Address of begin 1289 0004 | | .CONST 0x0004 ; Address of exception handler 128a 0002 | | .CONST 0x0002 ; Number of locals 128b INIT_1288: 128b e5ff | | Load 0x2,-0x1 128c 0092 13f7 | | Action Push_String_Extended,0x13f7 ; "?'HAS(~TARGET_NAME)" 128e e008 | | Load 0x0,0x8 128f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1290 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 1291 BODY_1288: 1291 00d8 | | Load_Top At_Offset_0 1292 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 1293 a402 | | Store_Unchecked 0x2,0x2 1294 4800 |H | Short_Literal 0x0 1295 e402 | | Load 0x2,0x2 1296 e006 | | Load 0x0,0x6 1297 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 1298 7022 |p" | Jump_Nonzero 0x12bb 1299 e5fd | | Load 0x2,-0x3 129a 4801 |H | Short_Literal 0x1 129b 4802 |H | Short_Literal 0x2 129c e00e | | Load 0x0,0xe 129d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 129e 035b | [ | Declare_Type Array,Constrained 129f 0337 | 7 | Declare_Variable Array 12a0 0092 13f7 | | Action Push_String_Extended,0x13f7 ; "?'HAS(~TARGET_NAME)" 12a2 e00e | | Load 0x0,0xe 12a3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 12a4 e00e | | Load 0x0,0xe 12a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 12a6 0119 | | Execute Any,Check_In_Formal_Type 12a7 4801 |H | Short_Literal 0x1 12a8 00da | | Load_Top At_Offset_2 12a9 01d6 | | Execute Vector,Field_Write 12aa e5ff | | Load 0x2,-0x1 12ab e008 | | Load 0x0,0x8 12ac 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 12ad 1820 | | Execute Package,Field_Execute,Field_Number 0x20 12ae e00e | | Load 0x0,0xe 12af 1b0e | | Execute Package,Field_Read,Field_Number 0xe 12b0 0119 | | Execute Any,Check_In_Formal_Type 12b1 4802 |H | Short_Literal 0x2 12b2 00da | | Load_Top At_Offset_2 12b3 01d6 | | Execute Vector,Field_Write 12b4 6043 |`C | Indirect_Literal Discrete,0x12f8,{0x00000000, 0x0000811c} 12b5 e006 | | Load 0x0,0x6 12b6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 12b7 e402 | | Load 0x2,0x2 12b8 a5fc | | Store_Unchecked 0x2,-0x4 12b9 00cc | | Action Pop_Block 12ba 4504 |E | Exit_Suprogram New_Top_Offset 0x4 12bb 00cf | | Action Mark_Auxiliary 12bc 00d9 | | Load_Top At_Offset_1 12bd 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 12be 4801 |H | Short_Literal 0x1 12bf 0263 | c | Execute Discrete,Above_Bound 12c0 7032 |p2 | Jump_Nonzero 0x12f3 12c1 e402 | | Load 0x2,0x2 12c2 e5fe | | Load 0x2,-0x2 12c3 00da | | Load_Top At_Offset_2 12c4 e602 | | Load 0x3,0x2 12c5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 12c6 01d7 | | Execute Vector,Field_Read 12c7 801c | | Call 0x0,0x1c 12c8 c402 | | Store 0x2,0x2 12c9 4800 |H | Short_Literal 0x0 12ca e402 | | Load 0x2,0x2 12cb e006 | | Load 0x0,0x6 12cc 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 12cd 7023 |p# | Jump_Nonzero 0x12f1 12ce e5fd | | Load 0x2,-0x3 12cf 4801 |H | Short_Literal 0x1 12d0 4802 |H | Short_Literal 0x2 12d1 e00e | | Load 0x0,0xe 12d2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 12d3 035b | [ | Declare_Type Array,Constrained 12d4 0337 | 7 | Declare_Variable Array 12d5 00da | | Load_Top At_Offset_2 12d6 e602 | | Load 0x3,0x2 12d7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 12d8 01d7 | | Execute Vector,Field_Read 12d9 801d | | Call 0x0,0x1d 12da e00e | | Load 0x0,0xe 12db 1b0e | | Execute Package,Field_Read,Field_Number 0xe 12dc 0119 | | Execute Any,Check_In_Formal_Type 12dd 4801 |H | Short_Literal 0x1 12de 00da | | Load_Top At_Offset_2 12df 01d6 | | Execute Vector,Field_Write 12e0 e5ff | | Load 0x2,-0x1 12e1 e008 | | Load 0x0,0x8 12e2 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 12e3 1820 | | Execute Package,Field_Execute,Field_Number 0x20 12e4 e00e | | Load 0x0,0xe 12e5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 12e6 0119 | | Execute Any,Check_In_Formal_Type 12e7 4802 |H | Short_Literal 0x2 12e8 00da | | Load_Top At_Offset_2 12e9 01d6 | | Execute Vector,Field_Write 12ea 6009 |` | Indirect_Literal Discrete,0x12f4,{0x00000000, 0x0000811f} 12eb e006 | | Load 0x0,0x6 12ec 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 12ed e402 | | Load 0x2,0x2 12ee a5fc | | Store_Unchecked 0x2,-0x4 12ef 00cc | | Action Pop_Block 12f0 4504 |E | Exit_Suprogram New_Top_Offset 0x4 12f1 00c8 | | Action Pop_Auxiliary_Range 12f2 3fce |? | Loop_Increasing 0x12c1 12f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 12f4 0000 0000 | | .LITERAL {0x00000000, 0x0000811f} 12f8 0000 0000 | | .LITERAL {0x00000000, 0x0000811c} 12fc 0000 0000 | | .BLANK 0000[0x4] 1300 ; -------------------------------------------------------------------------------------- 1300 ; SUBPROGRAM 1300 ; -------------------------------------------------------------------------------------- 1300 1305 | | .CONST 0x1305 ; Address of begin 1301 1330 | 0 | .CONST 0x1330 ; Address of exception handler 1302 0002 | | .CONST 0x0002 ; Number of locals 1303 INIT_1300: 1303 029f 139b | | Declare_Subprogram INIT_1398,For_Call 1305 BODY_1300: 1305 4801 |H | Short_Literal 0x1 1306 a7ff | | Store_Unchecked 0x3,-0x1 1307 e5fe | | Load 0x2,-0x2 1308 e405 | | Load 0x2,0x5 1309 e002 | | Load 0x0,0x2 130a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 130b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 130c e008 | | Load 0x0,0x8 130d 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 130e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 130f 4800 |H | Short_Literal 0x0 1310 e5fe | | Load 0x2,-0x2 1311 e008 | | Load 0x0,0x8 1312 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1313 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1314 e006 | | Load 0x0,0x6 1315 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 1316 7002 |p | Jump_Nonzero 0x1319 1317 8602 | | Call 0x3,0x2 1318 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1319 4800 |H | Short_Literal 0x0 131a 4800 |H | Short_Literal 0x0 131b 0092 13e2 | | Action Push_String_Extended,0x13e2 ; "<DEFAULT>" 131d e5fe | | Load 0x2,-0x2 131e e405 | | Load 0x2,0x5 131f e008 | | Load 0x0,0x8 1320 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1321 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 1322 e5fe | | Load 0x2,-0x2 1323 e008 | | Load 0x0,0x8 1324 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1325 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 1326 4800 |H | Short_Literal 0x0 1327 e5fe | | Load 0x2,-0x2 1328 e008 | | Load 0x0,0x8 1329 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 132a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 132b e006 | | Load 0x0,0x6 132c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 132d 7001 |p | Jump_Nonzero 0x132f 132e 8602 | | Call 0x3,0x2 132f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1330 TRAP_1300: 1330 0007 | | Action Break_Optional 1331 8602 | | Call 0x3,0x2 1332 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1333 0000 0000 | | .BLANK 0000[0x5] 1338 ; -------------------------------------------------------------------------------------- 1338 ; SUBPROGRAM 1338 ; -------------------------------------------------------------------------------------- 1338 1340 | @ | .CONST 0x1340 ; Address of begin 1339 134e | N | .CONST 0x134e ; Address of exception handler 133a 0002 | | .CONST 0x0002 ; Number of locals 133b INIT_1338: 133b e5ff | | Load 0x2,-0x1 133c e002 | | Load 0x0,0x2 133d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 133e 00e0 | | Load_Encached Standard_Cache 133f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1340 BODY_1338: 1340 4801 |H | Short_Literal 0x1 1341 4801 |H | Short_Literal 0x1 1342 e602 | | Load 0x3,0x2 1343 0217 | | Execute Heap_Access,All_Reference 1344 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1345 e602 | | Load 0x3,0x2 1346 0217 | | Execute Heap_Access,All_Reference 1347 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 1348 01cf | | Execute Vector,Slice_Read 1349 00da | | Load_Top At_Offset_2 134a e01e | | Load 0x0,0x1e 134b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 134c 00cb | | Action Pop_Block_With_Result 134d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 134e TRAP_1338: 134e 010e | | Execute Exception,Is_Constraint_Error 134f 6803 |h | Jump_Zero 0x1353 1350 4800 |H | Short_Literal 0x0 1351 00cb | | Action Pop_Block_With_Result 1352 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1353 0100 | | Execute Exception,Raise 1354 0000 0000 | | .BLANK 0000[0x4] 1358 ; -------------------------------------------------------------------------------------- 1358 ; SUBPROGRAM 1358 ; -------------------------------------------------------------------------------------- 1358 135b | [ | .CONST 0x135b ; Address of begin 1359 0004 | | .CONST 0x0004 ; Address of exception handler 135a 0001 | | .CONST 0x0001 ; Number of locals 135b BODY_1358: 135b INIT_1358: 135b 4800 |H | Short_Literal 0x0 135c a7ff | | Store_Unchecked 0x3,-0x1 135d e5fd | | Load 0x2,-0x3 135e 4801 |H | Short_Literal 0x1 135f 4801 |H | Short_Literal 0x1 1360 e00e | | Load 0x0,0xe 1361 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1362 035b | [ | Declare_Type Array,Constrained 1363 0337 | 7 | Declare_Variable Array 1364 e405 | | Load 0x2,0x5 1365 e00e | | Load 0x0,0xe 1366 181a | | Execute Package,Field_Execute,Field_Number 0x1a 1367 e00e | | Load 0x0,0xe 1368 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1369 0119 | | Execute Any,Check_In_Formal_Type 136a 4801 |H | Short_Literal 0x1 136b 00da | | Load_Top At_Offset_2 136c 01d6 | | Execute Vector,Field_Write 136d 6022 |`" | Indirect_Literal Discrete,0x1390,{0x00000000, 0x0000816c} 136e e006 | | Load 0x0,0x6 136f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 1370 e5fd | | Load 0x2,-0x3 1371 4801 |H | Short_Literal 0x1 1372 4801 |H | Short_Literal 0x1 1373 e00e | | Load 0x0,0xe 1374 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1375 035b | [ | Declare_Type Array,Constrained 1376 0337 | 7 | Declare_Variable Array 1377 e405 | | Load 0x2,0x5 1378 e00e | | Load 0x0,0xe 1379 181a | | Execute Package,Field_Execute,Field_Number 0x1a 137a e00e | | Load 0x0,0xe 137b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 137c 0119 | | Execute Any,Check_In_Formal_Type 137d 4801 |H | Short_Literal 0x1 137e 00da | | Load_Top At_Offset_2 137f 01d6 | | Execute Vector,Field_Write 1380 600b |` | Indirect_Literal Discrete,0x138c,{0x00000000, 0x0000816d} 1381 e006 | | Load 0x0,0x6 1382 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 1383 4800 |H | Short_Literal 0x0 1384 e5fe | | Load 0x2,-0x2 1385 e008 | | Load 0x0,0x8 1386 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 1387 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1388 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1389 0000 0000 | | .XXX[0x3] 138b 0000 | | 138c 0000 0000 | | .LITERAL {0x00000000, 0x0000816d} 1390 0000 0000 | | .LITERAL {0x00000000, 0x0000816c} 1394 0000 0000 | | .BLANK 0000[0x4] 1398 ; -------------------------------------------------------------------------------------- 1398 ; SUBPROGRAM 1398 ; -------------------------------------------------------------------------------------- 1398 139b | | .CONST 0x139b ; Address of begin 1399 0004 | | .CONST 0x0004 ; Address of exception handler 139a 0001 | | .CONST 0x0001 ; Number of locals 139b BODY_1398: 139b INIT_1398: 139b 4800 |H | Short_Literal 0x0 139c a7ff | | Store_Unchecked 0x3,-0x1 139d e5fd | | Load 0x2,-0x3 139e 4801 |H | Short_Literal 0x1 139f 4801 |H | Short_Literal 0x1 13a0 e00e | | Load 0x0,0xe 13a1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 13a2 035b | [ | Declare_Type Array,Constrained 13a3 0337 | 7 | Declare_Variable Array 13a4 e405 | | Load 0x2,0x5 13a5 e00e | | Load 0x0,0xe 13a6 181a | | Execute Package,Field_Execute,Field_Number 0x1a 13a7 e00e | | Load 0x0,0xe 13a8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 13a9 0119 | | Execute Any,Check_In_Formal_Type 13aa 4801 |H | Short_Literal 0x1 13ab 00da | | Load_Top At_Offset_2 13ac 01d6 | | Execute Vector,Field_Write 13ad 67e2 |g | Indirect_Literal Discrete,0x1390,{0x00000000, 0x0000816c} 13ae e006 | | Load 0x0,0x6 13af 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 13b0 e5fd | | Load 0x2,-0x3 13b1 4801 |H | Short_Literal 0x1 13b2 4801 |H | Short_Literal 0x1 13b3 e00e | | Load 0x0,0xe 13b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 13b5 035b | [ | Declare_Type Array,Constrained 13b6 0337 | 7 | Declare_Variable Array 13b7 e405 | | Load 0x2,0x5 13b8 e00e | | Load 0x0,0xe 13b9 181a | | Execute Package,Field_Execute,Field_Number 0x1a 13ba e00e | | Load 0x0,0xe 13bb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 13bc 0119 | | Execute Any,Check_In_Formal_Type 13bd 4801 |H | Short_Literal 0x1 13be 00da | | Load_Top At_Offset_2 13bf 01d6 | | Execute Vector,Field_Write 13c0 67cb |g | Indirect_Literal Discrete,0x138c,{0x00000000, 0x0000816d} 13c1 e006 | | Load 0x0,0x6 13c2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 13c3 4800 |H | Short_Literal 0x0 13c4 e5fe | | Load 0x2,-0x2 13c5 e008 | | Load 0x0,0x8 13c6 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 13c7 181d | | Execute Package,Field_Execute,Field_Number 0x1d 13c8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 13c9 ; -------------------------------------------------------------------------------------- 13c9 ; STRING TABLE 13c9 ; -------------------------------------------------------------------------------------- 13c9 0060 | ` | .STRTAB 0x0060->0x13f9 ; "?'C(ADA)" 13ca 0066 | f | .STRTAB 0x0066->0x13fd ; "[Units,,[]$]" 13cb 0070 | p | .STRTAB 0x0070->0x1403 ; ".state.tool_state.@state_file" 13cc 008b | | .STRTAB 0x008b->0x1411 ; "Network_Public => RWCOD" 13cd 00a0 | | .STRTAB 0x00a0->0x141d ; "Target_Builder.Library.Initialize" 13ce 00bf | | .STRTAB 0x00bf->0x142d ; "Target_Builder.Library.Open" 13cf 00d8 | | .STRTAB 0x00d8->0x143b ; "Null Handle after failed Open for view \x22" 13d0 00fe | | .STRTAB 0x00fe->0x144f ; " has obsolete state information." 13d1 011c | | .STRTAB 0x011c->0x145f ; "Run Rci.Refresh_Views to refresh." 13d2 013b | ; | .STRTAB 0x013b->0x146f ; "After Check_State in Close" 13d3 0153 | S | .STRTAB 0x0153->0x147c ; "After Bdomain.Close in Close" 13d4 016d | m | .STRTAB 0x016d->0x148a ; "Target_Builder.Library.Close" 13d5 0187 | | .STRTAB 0x0187->0x1498 ; "Target directory name has been set to \x22" 13d6 01ac | | .STRTAB 0x01ac->0x14ac ; "\x22" 13d7 01ab | | .STRTAB 0x01ab->0x14ac ; "Target_Builder.Library.Set_Target_Directory_Name" 13d8 01d9 | | .STRTAB 0x01d9->0x14c4 ; "<error>" 13d9 01de | | .STRTAB 0x01de->0x14c8 ; "Target_Builder.Library.Target_Directory_Name" 13da 0208 | | .STRTAB 0x0208->0x14de ; "Target machine name has been set to \x22" 13db 022b | + | .STRTAB 0x022b->0x14f0 ; "Target_Builder.Library.Set_Target_Machine_Name" 13dc 0257 | W | .STRTAB 0x0257->0x1507 ; "Target_Builder.Library.Target_Machine_Name" 13dd 027f | | .STRTAB 0x027f->0x151c ; "Target library name has been set to \x22" 13de 02a2 | | .STRTAB 0x02a2->0x152f ; "Target_Builder.Library.Set_Target_Library_Name" 13df 02ce | | .STRTAB 0x02ce->0x1546 ; "Target_Builder.Library.Target_Library_Name" 13e0 02f6 | | .STRTAB 0x02f6->0x155b ; "Target_Builder.Library.Supplier_Domain" 13e1 031a | | .STRTAB 0x031a->0x156e ; "Target_Builder.Library.Referencer_Domain" 13e2 0340 | @ | .STRTAB 0x0340->0x1582 ; "<DEFAULT>" 13e3 0347 | G | .STRTAB 0x0347->0x1586 ; "Target_Builder.Library.Member_Of_Domain" 13e4 036c | l | .STRTAB 0x036c->0x159a ; "Target_Builder.Library.Add_Import" 13e5 038b | | .STRTAB 0x038b->0x15aa ; "Added import " 13e6 0396 | | .STRTAB 0x0396->0x15b1 ; "Target_Builder.Library.Remove_Import" 13e7 03b8 | | .STRTAB 0x03b8->0x15c3 ; "Removed import " 13e8 03c5 | | .STRTAB 0x03c5->0x15ca ; ".state.imports" 13e9 03d1 | | .STRTAB 0x03d1->0x15d1 ; "Target_Builder.Library.Get_Spec_View_Imports" 13ea 03fb | | .STRTAB 0x03fb->0x15e7 ; "Target_Builder.Library.Abandon" 13eb 0417 | | .STRTAB 0x0417->0x15f6 ; "Unregistering " 13ec 0423 | # | .STRTAB 0x0423->0x15fd ; " from " 13ed 0427 | ' | .STRTAB 0x0427->0x1600 ; "Target_Builder.Library.Unregister" 13ee 0446 | F | .STRTAB 0x0446->0x1611 ; "Unregistered unit " 13ef 0456 | V | .STRTAB 0x0456->0x161a ; "<QUIET>" 13f0 045b | [ | .STRTAB 0x045b->0x161d ; ".state." 13f1 0460 | ` | .STRTAB 0x0460->0x1621 ; "Target_Builder.Library.Open_Object_Set" 13f2 0484 | | .STRTAB 0x0484->0x1634 ; "referencers" 13f3 048d | | .STRTAB 0x048d->0x1639 ; "imports" 13f4 0492 | | .STRTAB 0x0492->0x163d ; "Refreshing obsolete state information for " 13f5 04ba | | .STRTAB 0x04ba->0x1652 ; "." 13f6 04b9 | | .STRTAB 0x04b9->0x1652 ; "There is no state file for view \x22" 13f7 04d8 | | .STRTAB 0x04d8->0x1663 ; "?'HAS(~TARGET_NAME)" 13f8 04e9 | | .STREND 0x04e9->0x166c 13f9 3f27 4328 |?'C(| .STRTAB_STRINGS 166d 0000 0000 | | .XXX[0x3] 166f 0000 | | 1670 ; -------------------------------------------------------------------------------------- 1670 ; Debug Table 1670 ; -------------------------------------------------------------------------------------- 1670 0004 000f | | .DEBUG4 0x0004,0x000f,0x2ef3,0x0000,0x0001,0x0000 1676 0000 306b | 0k| .XXX[0x186] 1678 0644 0000 | D | 167a 2069 cd34 | i 4| 167c 0000 5070 | Pp| 167e fbd4 0000 | | 1680 306b 5c64 |0k\d| 1682 0000 306a | 0j| 1684 b704 0000 | | 1686 2069 fc14 | i | 1688 0000 6076 | `v| 168a aea4 0000 | | 168c 306b 1504 |0k | 168e 0000 406e | @n| 1690 1304 0000 | | 1692 306a a6f4 |0j | 1694 0000 306a | 0j| 1696 b764 0000 | d | 1698 2069 ef74 | i t| 169a 0000 306b | 0k| 169c 2af4 0000 |* | 169e 206a 0f24 | j $| 16a0 0000 306c | 0l| 16a2 0dc4 0000 | | 16a4 306a 9b54 |0j T| 16a6 0000 306b | 0k| 16a8 1c34 0000 | 4 | 16aa 306a 9b64 |0j d| 16ac 0000 306b | 0k| 16ae a1c4 0000 | | 16b0 306a 9b84 |0j | 16b2 0000 306b | 0k| 16b4 6d54 0000 |mT | 16b6 306b a1e4 |0k | 16b8 0000 306a | 0j| 16ba 9b34 0000 | 4 | 16bc 206a 0094 | j | 16be 0000 306b | 0k| 16c0 1954 0000 | T | 16c2 2069 d0c4 | i | 16c4 0000 2069 | i| 16c6 98e4 0000 | | 16c8 2069 8b24 | i $| 16ca 0000 306a | 0j| 16cc 9b44 0000 | D | 16ce 306a 9b24 |0j $| 16d0 0000 306b | 0k| 16d2 daa4 0000 | | 16d4 306b d994 |0k | 16d6 0000 306b | 0k| 16d8 dac4 0000 | | 16da 406e 4b44 |@nKD| 16dc 0000 306b | 0k| 16de d9a4 0000 | | 16e0 306b dc04 |0k | 16e2 0000 306a | 0j| 16e4 fd84 0000 | | 16e6 306b 04a4 |0k | 16e8 0000 306a | 0j| 16ea 4454 0000 |DT | 16ec 306a 7b64 |0j{d| 16ee 0000 306b | 0k| 16f0 14b4 0000 | | 16f2 306a 9d44 |0j D| 16f4 0000 306b | 0k| 16f6 d6d4 0000 | | 16f8 306b 8e44 |0k D| 16fa 0000 306b | 0k| 16fc dc34 0000 | 4 | 16fe 206a 1044 | j D| 1700 0000 306b | 0k| 1702 c6f4 0000 | | 1704 306b fa24 |0k $| 1706 0000 306a | 0j| 1708 8914 0000 | | 170a 306b fa14 |0k | 170c 0000 306b | 0k| 170e d6c4 0000 | | 1710 6076 bf54 |`v T| 1712 0000 6076 | `v| 1714 bfe4 0000 | | 1716 306b 8e14 |0k | 1718 0000 206a | j| 171a 2184 0000 |! | 171c 2069 c274 | i t| 171e 0000 2069 | i| 1720 c334 0000 | 4 | 1722 2069 f844 | i D| 1724 0000 306c | 0l| 1726 0744 0000 | D | 1728 206a 2194 | j! | 172a 0000 306a | 0j| 172c f874 0000 | t | 172e 2069 c254 | i T| 1730 0000 306b | 0k| 1732 3034 0000 |04 | 1734 306b b964 |0k d| 1736 0000 306b | 0k| 1738 b8d4 0000 | | 173a 306b 2d64 |0k-d| 173c 0000 306a | 0j| 173e e7d4 0000 | | 1740 2069 f474 | i t| 1742 0000 306b | 0k| 1744 b944 0000 | D | 1746 2069 cb94 | i | 1748 0000 2069 | i| 174a c414 0000 | | 174c 306b e024 |0k $| 174e 0000 306b | 0k| 1750 d2f4 0000 | | 1752 306c 0354 |0l T| 1754 0000 406d | @m| 1756 fee4 0000 | | 1758 306b ac54 |0k T| 175a 0000 306c | 0l| 175c b1e4 0000 | | 175e 306b 3004 |0k0 | 1760 0000 306b | 0k| 1762 3674 0000 |6t | 1764 306c 0554 |0l T| 1766 0000 306c | 0l| 1768 05d4 0000 | | 176a 306b 7844 |0kxD| 176c 0000 306c | 0l| 176e 0544 0000 | D | 1770 2069 c504 | i | 1772 0000 306c | 0l| 1774 0574 0000 | t | 1776 306a 36f4 |0j6 | 1778 0000 206a | j| 177a 2914 0000 |) | 177c 306b ae94 |0k | 177e 0000 306b | 0k| 1780 4204 0000 |B | 1782 406e 4d74 |@nMt| 1784 0000 306c | 0l| 1786 08c4 0000 | | 1788 306a e664 |0j d| 178a 0000 306c | 0l| 178c 0494 0000 | | 178e 306a 9d74 |0j t| 1790 0000 206a | j| 1792 2214 0000 |" | 1794 306a 8c44 |0j D| 1796 0000 306a | 0j| 1798 8dd4 0000 | | 179a 306a 35c4 |0j5 | 179c 0000 306a | 0j| 179e adf4 0000 | | 17a0 2069 be14 | i | 17a2 0000 306b | 0k| 17a4 e5f4 0000 | | 17a6 306a 3594 |0j5 | 17a8 0000 2069 | i| 17aa cd74 0000 | t | 17ac 306b 2fb4 |0k/ | 17ae 0000 2069 | i| 17b0 fa34 0000 | 4 | 17b2 306b 3bd4 |0k; | 17b4 0000 306b | 0k| 17b6 5ae4 0000 |Z | 17b8 2069 ca54 | i T| 17ba 0000 306a | 0j| 17bc fb14 0000 | | 17be 306a 9d24 |0j $| 17c0 0000 306b | 0k| 17c2 ca24 0000 | $ | 17c4 306b 4584 |0kE | 17c6 0000 306b | 0k| 17c8 cb14 0000 | | 17ca 306b ca44 |0k D| 17cc 0000 306b | 0k| 17ce cb64 0000 | d | 17d0 306b 5a44 |0kZD| 17d2 0000 306b | 0k| 17d4 c9f4 0000 | | 17d6 306b c9e4 |0k | 17d8 0000 306a | 0j| 17da 45b4 0000 |E | 17dc 306b 3634 |0k64| 17de 0000 306c | 0l| 17e0 5e34 0000 |^4 | 17e2 306b e444 |0k D| 17e4 0000 306c | 0l| 17e6 b134 0000 | 4 | 17e8 306a e464 |0j d| 17ea 0000 306b | 0k| 17ec d184 0000 | | 17ee 306b 8064 |0k d| 17f0 0000 406d | @m| 17f2 f184 0000 | | 17f4 306b 51d4 |0kQ | 17f6 0000 5072 | Pr| 17f8 f624 0000 | $ | 17fa 306b 8f10 |0k | 17fc 0000 0000 | | .BLANK 0000[0x4]