|
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: 18432 (0x4800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦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 2250 |"P | .CONST 0x2250 ; 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 8013 | | .CONST 0x8013 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0107 | | .CONST 0x0107 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0074 | t | .CONST 0x0074 ; 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 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated
0064 c247 | G | Store 0x1,0x47
0065 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated
0067 c248 | H | Store 0x1,0x48
0068 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated
006a c249 | I | Store 0x1,0x49
006b 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated
006d c24a | J | Store 0x1,0x4a
006e 029a 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call,Visible,Unelaborated
0070 c24b | K | Store 0x1,0x4b
0071 029a 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call,Visible,Unelaborated
0073 c212 | | Store 0x1,0x12
0074 029a 07e3 | | Declare_Subprogram INIT_07e0,For_Outer_Call,Visible,Unelaborated
0076 c252 | R | Store 0x1,0x52
0077 029a 082b | +| Declare_Subprogram INIT_0828,For_Outer_Call,Visible,Unelaborated
0079 c24d | M | Store 0x1,0x4d
007a 029a 0893 | | Declare_Subprogram INIT_0890,For_Outer_Call,Visible,Unelaborated
007c c253 | S | Store 0x1,0x53
007d 029a 09e3 | | Declare_Subprogram INIT_09e0,For_Outer_Call,Visible,Unelaborated
007f c254 | T | Store 0x1,0x54
0080 029a 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call,Visible,Unelaborated
0082 c255 | U | Store 0x1,0x55
0083 029a 0a83 | | Declare_Subprogram INIT_0a80,For_Outer_Call,Visible,Unelaborated
0085 c256 | V | Store 0x1,0x56
0086 029a 0b2b | +| Declare_Subprogram INIT_0b28,For_Outer_Call,Visible,Unelaborated
0088 c234 | 4 | Store 0x1,0x34
0089 029a 0b3b | ;| Declare_Subprogram INIT_0b38,For_Outer_Call,Visible,Unelaborated
008b c25f | _ | Store 0x1,0x5f
008c 029a 0c03 | | Declare_Subprogram INIT_0c00,For_Outer_Call,Visible,Unelaborated
008e c260 | ` | Store 0x1,0x60
008f 029a 0cab | | Declare_Subprogram INIT_0ca8,For_Outer_Call,Visible,Unelaborated
0091 c257 | W | Store 0x1,0x57
0092 029a 0e53 | S| Declare_Subprogram INIT_0e50,For_Outer_Call,Visible,Unelaborated
0094 c258 | X | Store 0x1,0x58
0095 029a 0f1b | | Declare_Subprogram INIT_0f18,For_Outer_Call,Visible,Unelaborated
0097 c259 | Y | Store 0x1,0x59
0098 029a 0f83 | | Declare_Subprogram INIT_0f80,For_Outer_Call,Visible,Unelaborated
009a c25a | Z | Store 0x1,0x5a
009b 029a 0fe3 | | Declare_Subprogram INIT_0fe0,For_Outer_Call,Visible,Unelaborated
009d c25b | [ | Store 0x1,0x5b
009e 029a 106b | k| Declare_Subprogram INIT_1068,For_Outer_Call,Visible,Unelaborated
00a0 c25c | \ | Store 0x1,0x5c
00a1 029a 10f3 | | Declare_Subprogram INIT_10f0,For_Outer_Call,Visible,Unelaborated
00a3 c25d | ] | Store 0x1,0x5d
00a4 029a 115b | [| Declare_Subprogram INIT_1158,For_Outer_Call,Visible,Unelaborated
00a6 c25e | ^ | Store 0x1,0x5e
00a7 029a 11bb | | Declare_Subprogram INIT_11b8,For_Outer_Call,Visible,Unelaborated
00a9 c262 | b | Store 0x1,0x62
00aa 029a 123b | ;| Declare_Subprogram INIT_1238,For_Outer_Call,Visible,Unelaborated
00ac c263 | c | Store 0x1,0x63
00ad 029a 12b3 | | Declare_Subprogram INIT_12b0,For_Outer_Call,Visible,Unelaborated
00af c261 | a | Store 0x1,0x61
00b0 00bf | | Action Accept_Activation
00b1 00e1 | | Load_Encached Boolean_Cache
00b2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00b3 029d 12fb | | Declare_Subprogram INIT_12f8,For_Outer_Call
00b5 029d 130b | | Declare_Subprogram INIT_1308,For_Outer_Call
00b7 1d47 | G | Execute_Immediate Reference_Lex_1,0x47
00b8 00c7 | | Action Elaborate_Subprogram
00b9 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
00ba 00c7 | | Action Elaborate_Subprogram
00bb 029d 1353 | S| Declare_Subprogram INIT_1350,For_Outer_Call
00bd 029d 1373 | s| Declare_Subprogram INIT_1370,For_Outer_Call
00bf 029d 1383 | | Declare_Subprogram INIT_1380,For_Outer_Call
00c1 1d52 | R | Execute_Immediate Reference_Lex_1,0x52
00c2 00c7 | | Action Elaborate_Subprogram
00c3 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d
00c4 00c7 | | Action Elaborate_Subprogram
00c5 1d53 | S | Execute_Immediate Reference_Lex_1,0x53
00c6 00c7 | | Action Elaborate_Subprogram
00c7 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
00c8 00c7 | | Action Elaborate_Subprogram
00c9 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
00ca 00c7 | | Action Elaborate_Subprogram
00cb 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
00cc 00c7 | | Action Elaborate_Subprogram
00cd 029d 139b | | Declare_Subprogram INIT_1398,For_Outer_Call
00cf 029d 144b | K| Declare_Subprogram INIT_1448,For_Outer_Call
00d1 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
00d2 00c7 | | Action Elaborate_Subprogram
00d3 029d 14eb | | Declare_Subprogram INIT_14e8,For_Outer_Call
00d5 029d 1563 | c| Declare_Subprogram INIT_1560,For_Outer_Call
00d7 029d 157b | {| Declare_Subprogram INIT_1578,For_Outer_Call
00d9 029d 159b | | Declare_Subprogram INIT_1598,For_Outer_Call
00db 029d 15eb | | Declare_Subprogram INIT_15e8,For_Outer_Call
00dd 029d 1693 | | Declare_Subprogram INIT_1690,For_Outer_Call
00df 029d 16db | | Declare_Subprogram INIT_16d8,For_Outer_Call
00e1 029d 17db | | Declare_Subprogram INIT_17d8,For_Outer_Call
00e3 029d 1833 | 3| Declare_Subprogram INIT_1830,For_Outer_Call
00e5 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
00e6 00c7 | | Action Elaborate_Subprogram
00e7 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a
00e8 00c7 | | Action Elaborate_Subprogram
00e9 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b
00ea 00c7 | | Action Elaborate_Subprogram
00eb 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00ec 00c7 | | Action Elaborate_Subprogram
00ed 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f
00ee 00c7 | | Action Elaborate_Subprogram
00ef 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60
00f0 00c7 | | Action Elaborate_Subprogram
00f1 1d57 | W | Execute_Immediate Reference_Lex_1,0x57
00f2 00c7 | | Action Elaborate_Subprogram
00f3 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
00f4 00c7 | | Action Elaborate_Subprogram
00f5 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
00f6 00c7 | | Action Elaborate_Subprogram
00f7 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
00f8 00c7 | | Action Elaborate_Subprogram
00f9 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
00fa 00c7 | | Action Elaborate_Subprogram
00fb 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
00fc 00c7 | | Action Elaborate_Subprogram
00fd 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
00fe 00c7 | | Action Elaborate_Subprogram
00ff 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e
0100 00c7 | | Action Elaborate_Subprogram
0101 1d62 | b | Execute_Immediate Reference_Lex_1,0x62
0102 00c7 | | Action Elaborate_Subprogram
0103 1d63 | c | Execute_Immediate Reference_Lex_1,0x63
0104 00c7 | | Action Elaborate_Subprogram
0105 1d61 | a | Execute_Immediate Reference_Lex_1,0x61
0106 00c7 | | Action Elaborate_Subprogram
0107 BODY_0008:
0107 00bc | | Action Signal_Activated
0108 00bb | | Action Signal_Completion
0109 0000 0000 | | .BLANK 0000[0x7]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0126 | & | .CONST 0x0126 ; Address of begin
0111 016e | n | .CONST 0x016e ; Address of exception handler
0112 0005 | | .CONST 0x0005 ; Number of locals
0113 INIT_0110:
0113 e001 | | Load 0x0,0x1
0114 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0115 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0116 02c7 | | Declare_Variable Any
0117 00d8 | | Load_Top At_Offset_0
0118 1c00 | | Execute_Immediate Run_Utility,0x0
0119 e002 | | Load 0x0,0x2
011a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
011b 02c7 | | Declare_Variable Any
011c 00d8 | | Load_Top At_Offset_0
011d 1c00 | | Execute_Immediate Run_Utility,0x0
011e 4800 |H | Short_Literal 0x0
011f e003 | | Load 0x0,0x3
0120 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0121 1c08 | | Execute_Immediate Run_Utility,0x8
0122 00d8 | | Load_Top At_Offset_0
0123 1c00 | | Execute_Immediate Run_Utility,0x0
0124 029f 184b | K| Declare_Subprogram INIT_1848,For_Call
0126 BODY_0110:
0126 4800 |H | Short_Literal 0x0
0127 00da | | Load_Top At_Offset_2
0128 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0129 e5ff | | Load 0x2,-0x1
012a 0227 | ' | Execute Access,All_Reference
012b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
012c e5fe | | Load 0x2,-0x2
012d e002 | | Load 0x0,0x2
012e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
012f 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0130 e001 | | Load 0x0,0x1
0131 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0132 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0133 c402 | | Store 0x2,0x2
0134 00db | | Load_Top At_Offset_3
0135 e001 | | Load 0x0,0x1
0136 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0137 180f | | Execute Package,Field_Execute,Field_Number 0xf
0138 6833 |h3 | Jump_Zero 0x16c
0139 e5fc | | Load 0x2,-0x4
013a 4801 |H | Short_Literal 0x1
013b 4801 |H | Short_Literal 0x1
013c e004 | | Load 0x0,0x4
013d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
013e 0334 | 4 | Declare_Variable Array,With_Constraint
013f e5fe | | Load 0x2,-0x2
0140 e004 | | Load 0x0,0x4
0141 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0142 e004 | | Load 0x0,0x4
0143 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0144 0119 | | Execute Any,Check_In_Formal_Type
0145 4801 |H | Short_Literal 0x1
0146 00da | | Load_Top At_Offset_2
0147 01d6 | | Execute Vector,Field_Write
0148 6077 |`w | Indirect_Literal Discrete,0x1c0,{0x00000000, 0x0000816f}
0149 e005 | | Load 0x0,0x5
014a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
014b 4801 |H | Short_Literal 0x1
014c 4802 |H | Short_Literal 0x2
014d e004 | | Load 0x0,0x4
014e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014f 0334 | 4 | Declare_Variable Array,With_Constraint
0150 e5ff | | Load 0x2,-0x1
0151 0227 | ' | Execute Access,All_Reference
0152 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0153 e001 | | Load 0x0,0x1
0154 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0155 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0156 e004 | | Load 0x0,0x4
0157 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0158 0119 | | Execute Any,Check_In_Formal_Type
0159 4801 |H | Short_Literal 0x1
015a 00da | | Load_Top At_Offset_2
015b 01d6 | | Execute Vector,Field_Write
015c e5fe | | Load 0x2,-0x2
015d e006 | | Load 0x0,0x6
015e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
015f e004 | | Load 0x0,0x4
0160 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0161 0119 | | Execute Any,Check_In_Formal_Type
0162 4802 |H | Short_Literal 0x2
0163 00da | | Load_Top At_Offset_2
0164 01d6 | | Execute Vector,Field_Write
0165 6056 |`V | Indirect_Literal Discrete,0x1bc,{0x00000000, 0x0000810c}
0166 e005 | | Load 0x0,0x5
0167 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0168 00da | | Load_Top At_Offset_2
0169 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
016a 00d9 | | Load_Top At_Offset_1
016b 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
016c 8405 | | Call 0x2,0x5
016d 0831 | 1 | Execute_Immediate Raise,0x31
016e TRAP_0110:
016e e005 | | Load 0x0,0x5
016f 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0170 010f | | Execute Exception,Equal
0171 6824 |h$ | Jump_Zero 0x196
0172 e005 | | Load 0x0,0x5
0173 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0174 00db | | Load_Top At_Offset_3
0175 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0176 e5fc | | Load 0x2,-0x4
0177 4801 |H | Short_Literal 0x1
0178 4802 |H | Short_Literal 0x2
0179 e004 | | Load 0x0,0x4
017a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
017b 0334 | 4 | Declare_Variable Array,With_Constraint
017c e5ff | | Load 0x2,-0x1
017d 0227 | ' | Execute Access,All_Reference
017e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
017f e001 | | Load 0x0,0x1
0180 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0181 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0182 e004 | | Load 0x0,0x4
0183 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0184 0119 | | Execute Any,Check_In_Formal_Type
0185 4801 |H | Short_Literal 0x1
0186 00da | | Load_Top At_Offset_2
0187 01d6 | | Execute Vector,Field_Write
0188 e5fe | | Load 0x2,-0x2
0189 e006 | | Load 0x0,0x6
018a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
018b e004 | | Load 0x0,0x4
018c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
018d 0119 | | Execute Any,Check_In_Formal_Type
018e 4802 |H | Short_Literal 0x2
018f 00da | | Load_Top At_Offset_2
0190 01d6 | | Execute Vector,Field_Write
0191 602a |`* | Indirect_Literal Discrete,0x1bc,{0x00000000, 0x0000810c}
0192 e005 | | Load 0x0,0x5
0193 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0194 00da | | Load_Top At_Offset_2
0195 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0196 e5fc | | Load 0x2,-0x4
0197 0092 1ea3 | | Action Push_String_Extended,0x1ea3 ; "Target_Builder.Unit.Referencers"
0199 e007 | | Load 0x0,0x7
019a 180f | | Execute Package,Field_Execute,Field_Number 0xf
019b 4801 |H | Short_Literal 0x1
019c 4802 |H | Short_Literal 0x2
019d e004 | | Load 0x0,0x4
019e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
019f 0334 | 4 | Declare_Variable Array,With_Constraint
01a0 e5ff | | Load 0x2,-0x1
01a1 0227 | ' | Execute Access,All_Reference
01a2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01a3 e001 | | Load 0x0,0x1
01a4 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
01a5 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01a6 e004 | | Load 0x0,0x4
01a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a8 0119 | | Execute Any,Check_In_Formal_Type
01a9 4801 |H | Short_Literal 0x1
01aa 00da | | Load_Top At_Offset_2
01ab 01d6 | | Execute Vector,Field_Write
01ac e5fe | | Load 0x2,-0x2
01ad e006 | | Load 0x0,0x6
01ae 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
01af e004 | | Load 0x0,0x4
01b0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b1 0119 | | Execute Any,Check_In_Formal_Type
01b2 4802 |H | Short_Literal 0x2
01b3 00da | | Load_Top At_Offset_2
01b4 01d6 | | Execute Vector,Field_Write
01b5 6006 |` | Indirect_Literal Discrete,0x1bc,{0x00000000, 0x0000810c}
01b6 e005 | | Load 0x0,0x5
01b7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01b8 00db | | Load_Top At_Offset_3
01b9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01ba 00da | | Load_Top At_Offset_2
01bb 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
01bc 0000 0000 | | .LITERAL {0x00000000, 0x0000810c}
01c0 0000 0000 | | .LITERAL {0x00000000, 0x0000816f}
01c4 0000 0000 | | .BLANK 0000[0x4]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01de | | .CONST 0x01de ; Address of begin
01c9 0226 | & | .CONST 0x0226 ; Address of exception handler
01ca 0005 | | .CONST 0x0005 ; Number of locals
01cb INIT_01c8:
01cb e001 | | Load 0x0,0x1
01cc 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
01cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ce 02c7 | | Declare_Variable Any
01cf 00d8 | | Load_Top At_Offset_0
01d0 1c00 | | Execute_Immediate Run_Utility,0x0
01d1 e002 | | Load 0x0,0x2
01d2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01d3 02c7 | | Declare_Variable Any
01d4 00d8 | | Load_Top At_Offset_0
01d5 1c00 | | Execute_Immediate Run_Utility,0x0
01d6 4800 |H | Short_Literal 0x0
01d7 e003 | | Load 0x0,0x3
01d8 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01d9 1c08 | | Execute_Immediate Run_Utility,0x8
01da 00d8 | | Load_Top At_Offset_0
01db 1c00 | | Execute_Immediate Run_Utility,0x0
01dc 029f 18e3 | | Declare_Subprogram INIT_18e0,For_Call
01de BODY_01c8:
01de 4800 |H | Short_Literal 0x0
01df 00da | | Load_Top At_Offset_2
01e0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01e1 e5ff | | Load 0x2,-0x1
01e2 0227 | ' | Execute Access,All_Reference
01e3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01e4 e5fe | | Load 0x2,-0x2
01e5 e002 | | Load 0x0,0x2
01e6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01e7 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
01e8 e001 | | Load 0x0,0x1
01e9 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
01ea 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
01eb c402 | | Store 0x2,0x2
01ec 00db | | Load_Top At_Offset_3
01ed e001 | | Load 0x0,0x1
01ee 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
01ef 180f | | Execute Package,Field_Execute,Field_Number 0xf
01f0 6833 |h3 | Jump_Zero 0x224
01f1 e5fc | | Load 0x2,-0x4
01f2 4801 |H | Short_Literal 0x1
01f3 4801 |H | Short_Literal 0x1
01f4 e004 | | Load 0x0,0x4
01f5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01f6 0334 | 4 | Declare_Variable Array,With_Constraint
01f7 e5fe | | Load 0x2,-0x2
01f8 e006 | | Load 0x0,0x6
01f9 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
01fa e004 | | Load 0x0,0x4
01fb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01fc 0119 | | Execute Any,Check_In_Formal_Type
01fd 4801 |H | Short_Literal 0x1
01fe 00da | | Load_Top At_Offset_2
01ff 01d6 | | Execute Vector,Field_Write
0200 67bf |g | Indirect_Literal Discrete,0x1c0,{0x00000000, 0x0000816f}
0201 e005 | | Load 0x0,0x5
0202 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0203 4801 |H | Short_Literal 0x1
0204 4802 |H | Short_Literal 0x2
0205 e004 | | Load 0x0,0x4
0206 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0207 0334 | 4 | Declare_Variable Array,With_Constraint
0208 e5ff | | Load 0x2,-0x1
0209 0227 | ' | Execute Access,All_Reference
020a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
020b e001 | | Load 0x0,0x1
020c 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
020d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
020e e004 | | Load 0x0,0x4
020f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0210 0119 | | Execute Any,Check_In_Formal_Type
0211 4801 |H | Short_Literal 0x1
0212 00da | | Load_Top At_Offset_2
0213 01d6 | | Execute Vector,Field_Write
0214 e5fe | | Load 0x2,-0x2
0215 e006 | | Load 0x0,0x6
0216 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0217 e004 | | Load 0x0,0x4
0218 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0219 0119 | | Execute Any,Check_In_Formal_Type
021a 4802 |H | Short_Literal 0x2
021b 00da | | Load_Top At_Offset_2
021c 01d6 | | Execute Vector,Field_Write
021d 605a |`Z | Indirect_Literal Discrete,0x278,{0x00000000, 0x0000810d}
021e e005 | | Load 0x0,0x5
021f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0220 00da | | Load_Top At_Offset_2
0221 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0222 00d9 | | Load_Top At_Offset_1
0223 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0224 8405 | | Call 0x2,0x5
0225 0831 | 1 | Execute_Immediate Raise,0x31
0226 TRAP_01c8:
0226 e005 | | Load 0x0,0x5
0227 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0228 010f | | Execute Exception,Equal
0229 6825 |h% | Jump_Zero 0x24f
022a e005 | | Load 0x0,0x5
022b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
022c 00db | | Load_Top At_Offset_3
022d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
022e e5fc | | Load 0x2,-0x4
022f 4801 |H | Short_Literal 0x1
0230 4802 |H | Short_Literal 0x2
0231 e004 | | Load 0x0,0x4
0232 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0233 0334 | 4 | Declare_Variable Array,With_Constraint
0234 e5ff | | Load 0x2,-0x1
0235 0227 | ' | Execute Access,All_Reference
0236 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0237 e001 | | Load 0x0,0x1
0238 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0239 1820 | | Execute Package,Field_Execute,Field_Number 0x20
023a e004 | | Load 0x0,0x4
023b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023c 0119 | | Execute Any,Check_In_Formal_Type
023d 4801 |H | Short_Literal 0x1
023e 00da | | Load_Top At_Offset_2
023f 01d6 | | Execute Vector,Field_Write
0240 e402 | | Load 0x2,0x2
0241 e001 | | Load 0x0,0x1
0242 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0243 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0244 e004 | | Load 0x0,0x4
0245 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0246 0119 | | Execute Any,Check_In_Formal_Type
0247 4802 |H | Short_Literal 0x2
0248 00da | | Load_Top At_Offset_2
0249 01d6 | | Execute Vector,Field_Write
024a 602d |`- | Indirect_Literal Discrete,0x278,{0x00000000, 0x0000810d}
024b e005 | | Load 0x0,0x5
024c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
024d 00da | | Load_Top At_Offset_2
024e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
024f e5fc | | Load 0x2,-0x4
0250 0092 1ea4 | | Action Push_String_Extended,0x1ea4 ; "Target_Builder.Unit.Suppliers"
0252 e007 | | Load 0x0,0x7
0253 180f | | Execute Package,Field_Execute,Field_Number 0xf
0254 4801 |H | Short_Literal 0x1
0255 4802 |H | Short_Literal 0x2
0256 e004 | | Load 0x0,0x4
0257 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0258 0334 | 4 | Declare_Variable Array,With_Constraint
0259 e5ff | | Load 0x2,-0x1
025a 0227 | ' | Execute Access,All_Reference
025b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
025c e001 | | Load 0x0,0x1
025d 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
025e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
025f e004 | | Load 0x0,0x4
0260 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0261 0119 | | Execute Any,Check_In_Formal_Type
0262 4801 |H | Short_Literal 0x1
0263 00da | | Load_Top At_Offset_2
0264 01d6 | | Execute Vector,Field_Write
0265 e402 | | Load 0x2,0x2
0266 e001 | | Load 0x0,0x1
0267 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0268 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0269 e004 | | Load 0x0,0x4
026a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
026b 0119 | | Execute Any,Check_In_Formal_Type
026c 4802 |H | Short_Literal 0x2
026d 00da | | Load_Top At_Offset_2
026e 01d6 | | Execute Vector,Field_Write
026f 6008 |` | Indirect_Literal Discrete,0x278,{0x00000000, 0x0000810d}
0270 e005 | | Load 0x0,0x5
0271 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0272 00db | | Load_Top At_Offset_3
0273 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0274 00da | | Load_Top At_Offset_2
0275 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0276 0000 0000 | | .XXX[0x2]
0278 0000 0000 | | .LITERAL {0x00000000, 0x0000810d}
027c 0000 0000 | | .BLANK 0000[0x4]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 02d5 | | .CONST 0x02d5 ; Address of begin
0281 03b8 | | .CONST 0x03b8 ; Address of exception handler
0282 0016 | | .CONST 0x0016 ; Number of locals
0283 INIT_0280:
0283 e001 | | Load 0x0,0x1
0284 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0285 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0286 02c7 | | Declare_Variable Any
0287 00d8 | | Load_Top At_Offset_0
0288 1c00 | | Execute_Immediate Run_Utility,0x0
0289 e002 | | Load 0x0,0x2
028a 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
028b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
028c e002 | | Load 0x0,0x2
028d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
028e 02c7 | | Declare_Variable Any
028f 00d8 | | Load_Top At_Offset_0
0290 1c00 | | Execute_Immediate Run_Utility,0x0
0291 e002 | | Load 0x0,0x2
0292 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0293 02ff | | Declare_Variable Variant_Record
0294 00d8 | | Load_Top At_Offset_0
0295 1c00 | | Execute_Immediate Run_Utility,0x0
0296 00e3 | | Load_Encached Natural_Cache
0297 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0298 e005 | | Load 0x0,0x5
0299 1b0d | | Execute Package,Field_Read,Field_Number 0xd
029a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
029b e002 | | Load 0x0,0x2
029c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
029d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
029e 02c7 | | Declare_Variable Any
029f 00d8 | | Load_Top At_Offset_0
02a0 1c00 | | Execute_Immediate Run_Utility,0x0
02a1 e002 | | Load 0x0,0x2
02a2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02a3 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02a4 02c7 | | Declare_Variable Any
02a5 00d8 | | Load_Top At_Offset_0
02a6 1c00 | | Execute_Immediate Run_Utility,0x0
02a7 e008 | | Load 0x0,0x8
02a8 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02a9 e002 | | Load 0x0,0x2
02aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ab 02c7 | | Declare_Variable Any
02ac 00d8 | | Load_Top At_Offset_0
02ad 1c00 | | Execute_Immediate Run_Utility,0x0
02ae e002 | | Load 0x0,0x2
02af 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02b0 02ff | | Declare_Variable Variant_Record
02b1 00d8 | | Load_Top At_Offset_0
02b2 1c00 | | Execute_Immediate Run_Utility,0x0
02b3 00e1 | | Load_Encached Boolean_Cache
02b4 00e1 | | Load_Encached Boolean_Cache
02b5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02b6 e5fe | | Load 0x2,-0x2
02b7 e002 | | Load 0x0,0x2
02b8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02b9 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
02ba e5fb | | Load 0x2,-0x5
02bb e009 | | Load 0x0,0x9
02bc 18c2 | | Execute Package,Field_Execute,Field_Number 0xc2
02bd e5fa | | Load 0x2,-0x6
02be e5fe | | Load 0x2,-0x2
02bf e5fb | | Load 0x2,-0x5
02c0 e009 | | Load 0x0,0x9
02c1 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
02c2 e5fa | | Load 0x2,-0x6
02c3 e5fb | | Load 0x2,-0x5
02c4 e5ff | | Load 0x2,-0x1
02c5 e003 | | Load 0x0,0x3
02c6 1b19 | | Execute Package,Field_Read,Field_Number 0x19
02c7 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
02c8 e5fa | | Load 0x2,-0x6
02c9 e5fe | | Load 0x2,-0x2
02ca e5fb | | Load 0x2,-0x5
02cb e009 | | Load 0x0,0x9
02cc 18ba | | Execute Package,Field_Execute,Field_Number 0xba
02cd 029f 195b | [| Declare_Subprogram INIT_1958,For_Call
02cf 029f 197b | {| Declare_Subprogram INIT_1978,For_Call
02d1 029f 1a0b | | Declare_Subprogram INIT_1a08,For_Call
02d3 029f 1b63 | c| Declare_Subprogram INIT_1b60,For_Call
02d5 BODY_0280:
02d5 4800 |H | Short_Literal 0x0
02d6 a5f9 | | Store_Unchecked 0x2,-0x7
02d7 e407 | | Load 0x2,0x7
02d8 e409 | | Load 0x2,0x9
02d9 e408 | | Load 0x2,0x8
02da e5fa | | Load 0x2,-0x6
02db e5fe | | Load 0x2,-0x2
02dc 826c | l | Call 0x1,0x6c
02dd c408 | | Store 0x2,0x8
02de c409 | | Store 0x2,0x9
02df c407 | | Store 0x2,0x7
02e0 e407 | | Load 0x2,0x7
02e1 6803 |h | Jump_Zero 0x2e5
02e2 e00a | | Load 0x0,0xa
02e3 1b18 | | Execute Package,Field_Read,Field_Number 0x18
02e4 0257 | W | Execute Discrete,Raise
02e5 e5fa | | Load 0x2,-0x6
02e6 e5fe | | Load 0x2,-0x2
02e7 8274 | t | Call 0x1,0x74
02e8 e40c | | Load 0x2,0xc
02e9 016d | m | Execute Variant_Record,Structure_Write
02ea e40c | | Load 0x2,0xc
02eb e00a | | Load 0x0,0xa
02ec 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
02ed e00a | | Load 0x0,0xa
02ee 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02ef a40d | | Store_Unchecked 0x2,0xd
02f0 e40c | | Load 0x2,0xc
02f1 e00a | | Load 0x0,0xa
02f2 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
02f3 e00a | | Load 0x0,0xa
02f4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f5 a40e | | Store_Unchecked 0x2,0xe
02f6 e40d | | Load 0x2,0xd
02f7 681f |h | Jump_Zero 0x317
02f8 e5fa | | Load 0x2,-0x6
02f9 4801 |H | Short_Literal 0x1
02fa 4802 |H | Short_Literal 0x2
02fb e004 | | Load 0x0,0x4
02fc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02fd 0334 | 4 | Declare_Variable Array,With_Constraint
02fe e5fe | | Load 0x2,-0x2
02ff e002 | | Load 0x0,0x2
0300 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0301 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0302 e004 | | Load 0x0,0x4
0303 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0304 e004 | | Load 0x0,0x4
0305 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0306 0119 | | Execute Any,Check_In_Formal_Type
0307 4801 |H | Short_Literal 0x1
0308 00da | | Load_Top At_Offset_2
0309 01d6 | | Execute Vector,Field_Write
030a 0092 1ea5 | | Action Push_String_Extended,0x1ea5 ; "Link"
030c e004 | | Load 0x0,0x4
030d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
030e e004 | | Load 0x0,0x4
030f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0310 0119 | | Execute Any,Check_In_Formal_Type
0311 4802 |H | Short_Literal 0x2
0312 00da | | Load_Top At_Offset_2
0313 01d6 | | Execute Vector,Field_Write
0314 615f |a_ | Indirect_Literal Discrete,0x474,{0x00000000, 0x0000817a}
0315 e005 | | Load 0x0,0x5
0316 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0317 e5ff | | Load 0x2,-0x1
0318 0227 | ' | Execute Access,All_Reference
0319 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
031a e5fe | | Load 0x2,-0x2
031b e002 | | Load 0x0,0x2
031c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
031d 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
031e e001 | | Load 0x0,0x1
031f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0320 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0321 c402 | | Store 0x2,0x2
0322 4801 |H | Short_Literal 0x1
0323 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
0325 e411 | | Load 0x2,0x11
0326 e00b | | Load 0x0,0xb
0327 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0328 6827 |h' | Jump_Zero 0x350
0329 e5fa | | Load 0x2,-0x6
032a 4801 |H | Short_Literal 0x1
032b 4801 |H | Short_Literal 0x1
032c e004 | | Load 0x0,0x4
032d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
032e 0334 | 4 | Declare_Variable Array,With_Constraint
032f e5fe | | Load 0x2,-0x2
0330 e006 | | Load 0x0,0x6
0331 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0332 e004 | | Load 0x0,0x4
0333 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0334 0119 | | Execute Any,Check_In_Formal_Type
0335 4801 |H | Short_Literal 0x1
0336 00da | | Load_Top At_Offset_2
0337 01d6 | | Execute Vector,Field_Write
0338 6137 |a7 | Indirect_Literal Discrete,0x470,{0x00000000, 0x00008111}
0339 e005 | | Load 0x0,0x5
033a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
033b 4801 |H | Short_Literal 0x1
033c 4801 |H | Short_Literal 0x1
033d e004 | | Load 0x0,0x4
033e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
033f 0334 | 4 | Declare_Variable Array,With_Constraint
0340 e5fe | | Load 0x2,-0x2
0341 e006 | | Load 0x0,0x6
0342 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0343 e004 | | Load 0x0,0x4
0344 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0345 0119 | | Execute Any,Check_In_Formal_Type
0346 4801 |H | Short_Literal 0x1
0347 00da | | Load_Top At_Offset_2
0348 01d6 | | Execute Vector,Field_Write
0349 6122 |a" | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000811a}
034a e005 | | Load 0x0,0x5
034b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
034c a5f9 | | Store_Unchecked 0x2,-0x7
034d e00a | | Load 0x0,0xa
034e 1b19 | | Execute Package,Field_Read,Field_Number 0x19
034f 0257 | W | Execute Discrete,Raise
0350 e402 | | Load 0x2,0x2
0351 e001 | | Load 0x0,0x1
0352 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0353 180f | | Execute Package,Field_Execute,Field_Number 0xf
0354 682f |h/ | Jump_Zero 0x384
0355 e5fa | | Load 0x2,-0x6
0356 4801 |H | Short_Literal 0x1
0357 4801 |H | Short_Literal 0x1
0358 e004 | | Load 0x0,0x4
0359 1b0f | | Execute Package,Field_Read,Field_Number 0xf
035a 0334 | 4 | Declare_Variable Array,With_Constraint
035b e5fe | | Load 0x2,-0x2
035c e006 | | Load 0x0,0x6
035d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
035e e004 | | Load 0x0,0x4
035f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0360 0119 | | Execute Any,Check_In_Formal_Type
0361 4801 |H | Short_Literal 0x1
0362 00da | | Load_Top At_Offset_2
0363 01d6 | | Execute Vector,Field_Write
0364 6103 |a | Indirect_Literal Discrete,0x468,{0x00000000, 0x0000816f}
0365 e005 | | Load 0x0,0x5
0366 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0367 4801 |H | Short_Literal 0x1
0368 4802 |H | Short_Literal 0x2
0369 e004 | | Load 0x0,0x4
036a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
036b 0334 | 4 | Declare_Variable Array,With_Constraint
036c e004 | | Load 0x0,0x4
036d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
036e e004 | | Load 0x0,0x4
036f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0370 0119 | | Execute Any,Check_In_Formal_Type
0371 4801 |H | Short_Literal 0x1
0372 00da | | Load_Top At_Offset_2
0373 01d6 | | Execute Vector,Field_Write
0374 e5fe | | Load 0x2,-0x2
0375 e006 | | Load 0x0,0x6
0376 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0377 e004 | | Load 0x0,0x4
0378 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0379 0119 | | Execute Any,Check_In_Formal_Type
037a 4802 |H | Short_Literal 0x2
037b 00da | | Load_Top At_Offset_2
037c 01d6 | | Execute Vector,Field_Write
037d 60e6 |` | Indirect_Literal Discrete,0x464,{0x00000000, 0x00008126}
037e e005 | | Load 0x0,0x5
037f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0380 a5f9 | | Store_Unchecked 0x2,-0x7
0381 e00a | | Load 0x0,0xa
0382 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0383 0257 | W | Execute Discrete,Raise
0384 8415 | | Call 0x2,0x15
0385 6802 |h | Jump_Zero 0x388
0386 8414 | | Call 0x2,0x14
0387 7828 |x( | Jump 0x3b0
0388 e5fc | | Load 0x2,-0x4
0389 6807 |h | Jump_Zero 0x391
038a e407 | | Load 0x2,0x7
038b 8416 | | Call 0x2,0x16
038c c407 | | Store 0x2,0x7
038d e407 | | Load 0x2,0x7
038e 7021 |p! | Jump_Nonzero 0x3b0
038f 8414 | | Call 0x2,0x14
0390 781f |x | Jump 0x3b0
0391 4801 |H | Short_Literal 0x1
0392 4802 |H | Short_Literal 0x2
0393 e004 | | Load 0x0,0x4
0394 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0395 0334 | 4 | Declare_Variable Array,With_Constraint
0396 0092 1ea7 | | Action Push_String_Extended,0x1ea7 ; "There are un-Coded Units."
0398 e004 | | Load 0x0,0x4
0399 1810 | | Execute Package,Field_Execute,Field_Number 0x10
039a e004 | | Load 0x0,0x4
039b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
039c 0119 | | Execute Any,Check_In_Formal_Type
039d 4801 |H | Short_Literal 0x1
039e 00da | | Load_Top At_Offset_2
039f 01d6 | | Execute Vector,Field_Write
03a0 e404 | | Load 0x2,0x4
03a1 e006 | | Load 0x0,0x6
03a2 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03a3 e004 | | Load 0x0,0x4
03a4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03a5 0119 | | Execute Any,Check_In_Formal_Type
03a6 4802 |H | Short_Literal 0x2
03a7 00da | | Load_Top At_Offset_2
03a8 01d6 | | Execute Vector,Field_Write
03a9 60ba |` | Indirect_Literal Discrete,0x464,{0x00000000, 0x00008126}
03aa e005 | | Load 0x0,0x5
03ab 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03ac a407 | | Store_Unchecked 0x2,0x7
03ad e00a | | Load 0x0,0xa
03ae 1b19 | | Execute Package,Field_Read,Field_Number 0x19
03af 0257 | W | Execute Discrete,Raise
03b0 e407 | | Load 0x2,0x7
03b1 a5f9 | | Store_Unchecked 0x2,-0x7
03b2 e407 | | Load 0x2,0x7
03b3 e5fa | | Load 0x2,-0x6
03b4 e409 | | Load 0x2,0x9
03b5 826d | m | Call 0x1,0x6d
03b6 c407 | | Store 0x2,0x7
03b7 4507 |E | Exit_Suprogram New_Top_Offset 0x7
03b8 TRAP_0280:
03b8 e00a | | Load 0x0,0xa
03b9 1b19 | | Execute Package,Field_Read,Field_Number 0x19
03ba 010f | | Execute Exception,Equal
03bb 6808 |h | Jump_Zero 0x3c4
03bc e407 | | Load 0x2,0x7
03bd a5f9 | | Store_Unchecked 0x2,-0x7
03be e407 | | Load 0x2,0x7
03bf e5fa | | Load 0x2,-0x6
03c0 e409 | | Load 0x2,0x9
03c1 826d | m | Call 0x1,0x6d
03c2 c407 | | Store 0x2,0x7
03c3 4507 |E | Exit_Suprogram New_Top_Offset 0x7
03c4 e00a | | Load 0x0,0xa
03c5 1b18 | | Execute Package,Field_Read,Field_Number 0x18
03c6 010f | | Execute Exception,Equal
03c7 6835 |h5 | Jump_Zero 0x3fd
03c8 4801 |H | Short_Literal 0x1
03c9 4802 |H | Short_Literal 0x2
03ca e004 | | Load 0x0,0x4
03cb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03cc 0334 | 4 | Declare_Variable Array,With_Constraint
03cd e004 | | Load 0x0,0x4
03ce 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
03cf e004 | | Load 0x0,0x4
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 e5fe | | Load 0x2,-0x2
03d6 e006 | | Load 0x0,0x6
03d7 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03d8 e004 | | Load 0x0,0x4
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 6085 |` | Indirect_Literal Discrete,0x464,{0x00000000, 0x00008126}
03df e005 | | Load 0x0,0x5
03e0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03e1 a5f9 | | Store_Unchecked 0x2,-0x7
03e2 e5fa | | Load 0x2,-0x6
03e3 4801 |H | Short_Literal 0x1
03e4 4802 |H | Short_Literal 0x2
03e5 e004 | | Load 0x0,0x4
03e6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03e7 0334 | 4 | Declare_Variable Array,With_Constraint
03e8 e004 | | Load 0x0,0x4
03e9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
03ea e004 | | Load 0x0,0x4
03eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ec 0119 | | Execute Any,Check_In_Formal_Type
03ed 4801 |H | Short_Literal 0x1
03ee 00da | | Load_Top At_Offset_2
03ef 01d6 | | Execute Vector,Field_Write
03f0 e5fe | | Load 0x2,-0x2
03f1 e006 | | Load 0x0,0x6
03f2 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03f3 e004 | | Load 0x0,0x4
03f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f5 0119 | | Execute Any,Check_In_Formal_Type
03f6 4802 |H | Short_Literal 0x2
03f7 00da | | Load_Top At_Offset_2
03f8 01d6 | | Execute Vector,Field_Write
03f9 606a |`j | Indirect_Literal Discrete,0x464,{0x00000000, 0x00008126}
03fa e005 | | Load 0x0,0x5
03fb 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03fc 4507 |E | Exit_Suprogram New_Top_Offset 0x7
03fd e005 | | Load 0x0,0x5
03fe 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03ff 010f | | Execute Exception,Equal
0400 6823 |h# | Jump_Zero 0x424
0401 e005 | | Load 0x0,0x5
0402 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0403 a5f9 | | Store_Unchecked 0x2,-0x7
0404 e407 | | Load 0x2,0x7
0405 e5fa | | Load 0x2,-0x6
0406 e409 | | Load 0x2,0x9
0407 826d | m | Call 0x1,0x6d
0408 c407 | | Store 0x2,0x7
0409 e5fa | | Load 0x2,-0x6
040a 4801 |H | Short_Literal 0x1
040b 4802 |H | Short_Literal 0x2
040c e004 | | Load 0x0,0x4
040d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
040e 0334 | 4 | Declare_Variable Array,With_Constraint
040f e004 | | Load 0x0,0x4
0410 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0411 e004 | | Load 0x0,0x4
0412 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0413 0119 | | Execute Any,Check_In_Formal_Type
0414 4801 |H | Short_Literal 0x1
0415 00da | | Load_Top At_Offset_2
0416 01d6 | | Execute Vector,Field_Write
0417 e5fe | | Load 0x2,-0x2
0418 e006 | | Load 0x0,0x6
0419 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
041a e004 | | Load 0x0,0x4
041b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
041c 0119 | | Execute Any,Check_In_Formal_Type
041d 4802 |H | Short_Literal 0x2
041e 00da | | Load_Top At_Offset_2
041f 01d6 | | Execute Vector,Field_Write
0420 6043 |`C | Indirect_Literal Discrete,0x464,{0x00000000, 0x00008126}
0421 e005 | | Load 0x0,0x5
0422 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0423 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0424 e407 | | Load 0x2,0x7
0425 e5fa | | Load 0x2,-0x6
0426 e409 | | Load 0x2,0x9
0427 826d | m | Call 0x1,0x6d
0428 c407 | | Store 0x2,0x7
0429 4801 |H | Short_Literal 0x1
042a 4802 |H | Short_Literal 0x2
042b e004 | | Load 0x0,0x4
042c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
042d 0334 | 4 | Declare_Variable Array,With_Constraint
042e e004 | | Load 0x0,0x4
042f 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0430 e004 | | Load 0x0,0x4
0431 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0432 0119 | | Execute Any,Check_In_Formal_Type
0433 4801 |H | Short_Literal 0x1
0434 00da | | Load_Top At_Offset_2
0435 01d6 | | Execute Vector,Field_Write
0436 e5fe | | Load 0x2,-0x2
0437 e006 | | Load 0x0,0x6
0438 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0439 e004 | | Load 0x0,0x4
043a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
043b 0119 | | Execute Any,Check_In_Formal_Type
043c 4802 |H | Short_Literal 0x2
043d 00da | | Load_Top At_Offset_2
043e 01d6 | | Execute Vector,Field_Write
043f 6024 |`$ | Indirect_Literal Discrete,0x464,{0x00000000, 0x00008126}
0440 e005 | | Load 0x0,0x5
0441 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0442 a5f9 | | Store_Unchecked 0x2,-0x7
0443 e5fa | | Load 0x2,-0x6
0444 4801 |H | Short_Literal 0x1
0445 4802 |H | Short_Literal 0x2
0446 e004 | | Load 0x0,0x4
0447 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0448 0334 | 4 | Declare_Variable Array,With_Constraint
0449 e004 | | Load 0x0,0x4
044a 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
044b e004 | | Load 0x0,0x4
044c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
044d 0119 | | Execute Any,Check_In_Formal_Type
044e 4801 |H | Short_Literal 0x1
044f 00da | | Load_Top At_Offset_2
0450 01d6 | | Execute Vector,Field_Write
0451 e5fe | | Load 0x2,-0x2
0452 e006 | | Load 0x0,0x6
0453 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0454 e004 | | Load 0x0,0x4
0455 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0456 0119 | | Execute Any,Check_In_Formal_Type
0457 4802 |H | Short_Literal 0x2
0458 00da | | Load_Top At_Offset_2
0459 01d6 | | Execute Vector,Field_Write
045a 6009 |` | Indirect_Literal Discrete,0x464,{0x00000000, 0x00008126}
045b e005 | | Load 0x0,0x5
045c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
045d e5fa | | Load 0x2,-0x6
045e 0092 1ea8 | | Action Push_String_Extended,0x1ea8 ; "Target_Builder.Unit.Link"
0460 e007 | | Load 0x0,0x7
0461 180f | | Execute Package,Field_Execute,Field_Number 0xf
0462 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0463 0000 | | .XXX[0x1]
0464 0000 0000 | | .LITERAL {0x00000000, 0x00008126}
0468 0000 0000 | | .LITERAL {0x00000000, 0x0000816f}
046c 0000 0000 | | .LITERAL {0x00000000, 0x0000811a}
0470 0000 0000 | | .LITERAL {0x00000000, 0x00008111}
0474 0000 0000 | | .LITERAL {0x00000000, 0x0000817a}
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 04ca | | .CONST 0x04ca ; Address of begin
0479 05f2 | | .CONST 0x05f2 ; Address of exception handler
047a 0016 | | .CONST 0x0016 ; Number of locals
047b INIT_0478:
047b e001 | | Load 0x0,0x1
047c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
047d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
047e 02c7 | | Declare_Variable Any
047f 00d8 | | Load_Top At_Offset_0
0480 1c00 | | Execute_Immediate Run_Utility,0x0
0481 e002 | | Load 0x0,0x2
0482 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0483 00e1 | | Load_Encached Boolean_Cache
0484 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0485 00e1 | | Load_Encached Boolean_Cache
0486 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0487 e002 | | Load 0x0,0x2
0488 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0489 1b18 | | Execute Package,Field_Read,Field_Number 0x18
048a 02c7 | | Declare_Variable Any
048b 00d8 | | Load_Top At_Offset_0
048c 1c00 | | Execute_Immediate Run_Utility,0x0
048d e001 | | Load 0x0,0x1
048e 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
048f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0490 02c7 | | Declare_Variable Any
0491 00d8 | | Load_Top At_Offset_0
0492 1c00 | | Execute_Immediate Run_Utility,0x0
0493 e002 | | Load 0x0,0x2
0494 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0495 02c7 | | Declare_Variable Any
0496 00d8 | | Load_Top At_Offset_0
0497 1c00 | | Execute_Immediate Run_Utility,0x0
0498 e002 | | Load 0x0,0x2
0499 1b0f | | Execute Package,Field_Read,Field_Number 0xf
049a 02c7 | | Declare_Variable Any
049b 00d8 | | Load_Top At_Offset_0
049c 1c00 | | Execute_Immediate Run_Utility,0x0
049d e002 | | Load 0x0,0x2
049e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
049f 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04a0 02c7 | | Declare_Variable Any
04a1 00d8 | | Load_Top At_Offset_0
04a2 1c00 | | Execute_Immediate Run_Utility,0x0
04a3 e002 | | Load 0x0,0x2
04a4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04a5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04a6 02c7 | | Declare_Variable Any
04a7 00d8 | | Load_Top At_Offset_0
04a8 1c00 | | Execute_Immediate Run_Utility,0x0
04a9 e005 | | Load 0x0,0x5
04aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ab 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
04ac e008 | | Load 0x0,0x8
04ad 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
04ae e002 | | Load 0x0,0x2
04af 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04b0 02ff | | Declare_Variable Variant_Record
04b1 00d8 | | Load_Top At_Offset_0
04b2 1c00 | | Execute_Immediate Run_Utility,0x0
04b3 00e1 | | Load_Encached Boolean_Cache
04b4 00e1 | | Load_Encached Boolean_Cache
04b5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
04b6 e00c | | Load 0x0,0xc
04b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04b8 02c7 | | Declare_Variable Any
04b9 00d8 | | Load_Top At_Offset_0
04ba 1c00 | | Execute_Immediate Run_Utility,0x0
04bb 00ea | | Load_Encached Null_String_Cache
04bc e5fc | | Load 0x2,-0x4
04bd e5fe | | Load 0x2,-0x2
04be e5fd | | Load 0x2,-0x3
04bf e009 | | Load 0x0,0x9
04c0 18ba | | Execute Package,Field_Execute,Field_Number 0xba
04c1 e5fc | | Load 0x2,-0x4
04c2 e5fe | | Load 0x2,-0x2
04c3 e5fd | | Load 0x2,-0x3
04c4 e009 | | Load 0x0,0x9
04c5 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
04c6 029f 1bf3 | | Declare_Subprogram INIT_1bf0,For_Call
04c8 029f 1c8b | | Declare_Subprogram INIT_1c88,For_Call
04ca BODY_0478:
04ca 4800 |H | Short_Literal 0x0
04cb a5fb | | Store_Unchecked 0x2,-0x5
04cc e40c | | Load 0x2,0xc
04cd e40b | | Load 0x2,0xb
04ce e40a | | Load 0x2,0xa
04cf e5fc | | Load 0x2,-0x4
04d0 e5fe | | Load 0x2,-0x2
04d1 826c | l | Call 0x1,0x6c
04d2 c40a | | Store 0x2,0xa
04d3 c40b | | Store 0x2,0xb
04d4 c40c | | Store 0x2,0xc
04d5 e40c | | Load 0x2,0xc
04d6 6803 |h | Jump_Zero 0x4da
04d7 e00a | | Load 0x0,0xa
04d8 1b18 | | Execute Package,Field_Read,Field_Number 0x18
04d9 0257 | W | Execute Discrete,Raise
04da e5fc | | Load 0x2,-0x4
04db e5fe | | Load 0x2,-0x2
04dc 8274 | t | Call 0x1,0x74
04dd e40e | | Load 0x2,0xe
04de 016d | m | Execute Variant_Record,Structure_Write
04df e40e | | Load 0x2,0xe
04e0 e00a | | Load 0x0,0xa
04e1 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
04e2 e00a | | Load 0x0,0xa
04e3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04e4 a40f | | Store_Unchecked 0x2,0xf
04e5 e40e | | Load 0x2,0xe
04e6 e00a | | Load 0x0,0xa
04e7 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
04e8 e00a | | Load 0x0,0xa
04e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04ea a410 | | Store_Unchecked 0x2,0x10
04eb e40f | | Load 0x2,0xf
04ec 681f |h | Jump_Zero 0x50c
04ed e5fc | | Load 0x2,-0x4
04ee 4801 |H | Short_Literal 0x1
04ef 4802 |H | Short_Literal 0x2
04f0 e004 | | Load 0x0,0x4
04f1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04f2 0334 | 4 | Declare_Variable Array,With_Constraint
04f3 e5fe | | Load 0x2,-0x2
04f4 e002 | | Load 0x0,0x2
04f5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04f6 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
04f7 e004 | | Load 0x0,0x4
04f8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04f9 e004 | | Load 0x0,0x4
04fa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04fb 0119 | | Execute Any,Check_In_Formal_Type
04fc 4801 |H | Short_Literal 0x1
04fd 00da | | Load_Top At_Offset_2
04fe 01d6 | | Execute Vector,Field_Write
04ff 0092 1ea9 | | Action Push_String_Extended,0x1ea9 ; "Compile"
0501 e004 | | Load 0x0,0x4
0502 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0503 e004 | | Load 0x0,0x4
0504 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0505 0119 | | Execute Any,Check_In_Formal_Type
0506 4802 |H | Short_Literal 0x2
0507 00da | | Load_Top At_Offset_2
0508 01d6 | | Execute Vector,Field_Write
0509 676a |gj | Indirect_Literal Discrete,0x474,{0x00000000, 0x0000817a}
050a e005 | | Load 0x0,0x5
050b 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
050c 4801 |H | Short_Literal 0x1
050d 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
050f e412 | | Load 0x2,0x12
0510 e00b | | Load 0x0,0xb
0511 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0512 6827 |h' | Jump_Zero 0x53a
0513 e5fc | | Load 0x2,-0x4
0514 4801 |H | Short_Literal 0x1
0515 4801 |H | Short_Literal 0x1
0516 e004 | | Load 0x0,0x4
0517 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0518 0334 | 4 | Declare_Variable Array,With_Constraint
0519 e5fe | | Load 0x2,-0x2
051a e004 | | Load 0x0,0x4
051b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
051c e004 | | Load 0x0,0x4
051d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
051e 0119 | | Execute Any,Check_In_Formal_Type
051f 4801 |H | Short_Literal 0x1
0520 00da | | Load_Top At_Offset_2
0521 01d6 | | Execute Vector,Field_Write
0522 674d |gM | Indirect_Literal Discrete,0x470,{0x00000000, 0x00008111}
0523 e005 | | Load 0x0,0x5
0524 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0525 4801 |H | Short_Literal 0x1
0526 4801 |H | Short_Literal 0x1
0527 e004 | | Load 0x0,0x4
0528 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0529 0334 | 4 | Declare_Variable Array,With_Constraint
052a e5fe | | Load 0x2,-0x2
052b e004 | | Load 0x0,0x4
052c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
052d e004 | | Load 0x0,0x4
052e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
052f 0119 | | Execute Any,Check_In_Formal_Type
0530 4801 |H | Short_Literal 0x1
0531 00da | | Load_Top At_Offset_2
0532 01d6 | | Execute Vector,Field_Write
0533 6738 |g8 | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000811a}
0534 e005 | | Load 0x0,0x5
0535 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0536 a5fb | | Store_Unchecked 0x2,-0x5
0537 e00a | | Load 0x0,0xa
0538 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0539 0257 | W | Execute Discrete,Raise
053a e5ff | | Load 0x2,-0x1
053b 0227 | ' | Execute Access,All_Reference
053c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
053d e5fe | | Load 0x2,-0x2
053e e002 | | Load 0x0,0x2
053f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0540 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0541 e001 | | Load 0x0,0x1
0542 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0543 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0544 c402 | | Store 0x2,0x2
0545 e402 | | Load 0x2,0x2
0546 e001 | | Load 0x0,0x1
0547 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0548 180f | | Execute Package,Field_Execute,Field_Number 0xf
0549 6827 |h' | Jump_Zero 0x571
054a e5fc | | Load 0x2,-0x4
054b 4801 |H | Short_Literal 0x1
054c 4801 |H | Short_Literal 0x1
054d e004 | | Load 0x0,0x4
054e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
054f 0334 | 4 | Declare_Variable Array,With_Constraint
0550 e5fe | | Load 0x2,-0x2
0551 e006 | | Load 0x0,0x6
0552 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0553 e004 | | Load 0x0,0x4
0554 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0555 0119 | | Execute Any,Check_In_Formal_Type
0556 4801 |H | Short_Literal 0x1
0557 00da | | Load_Top At_Offset_2
0558 01d6 | | Execute Vector,Field_Write
0559 670e |g | Indirect_Literal Discrete,0x468,{0x00000000, 0x0000816f}
055a e005 | | Load 0x0,0x5
055b 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
055c 4801 |H | Short_Literal 0x1
055d 4801 |H | Short_Literal 0x1
055e e004 | | Load 0x0,0x4
055f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0560 0334 | 4 | Declare_Variable Array,With_Constraint
0561 e5fe | | Load 0x2,-0x2
0562 e006 | | Load 0x0,0x6
0563 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0564 e004 | | Load 0x0,0x4
0565 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0566 0119 | | Execute Any,Check_In_Formal_Type
0567 4801 |H | Short_Literal 0x1
0568 00da | | Load_Top At_Offset_2
0569 01d6 | | Execute Vector,Field_Write
056a 6701 |g | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000811a}
056b e005 | | Load 0x0,0x5
056c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
056d a5fb | | Store_Unchecked 0x2,-0x5
056e e00a | | Load 0x0,0xa
056f 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0570 0257 | W | Execute Discrete,Raise
0571 e5fe | | Load 0x2,-0x2
0572 c408 | | Store 0x2,0x8
0573 e402 | | Load 0x2,0x2
0574 c407 | | Store 0x2,0x7
0575 e005 | | Load 0x0,0x5
0576 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0577 00e1 | | Load_Encached Boolean_Cache
0578 e5fc | | Load 0x2,-0x4
0579 e408 | | Load 0x2,0x8
057a e00d | | Load 0x0,0xd
057b 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
057c c405 | | Store 0x2,0x5
057d c40c | | Store 0x2,0xc
057e e40c | | Load 0x2,0xc
057f 6803 |h | Jump_Zero 0x583
0580 e005 | | Load 0x0,0x5
0581 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0582 0257 | W | Execute Discrete,Raise
0583 e405 | | Load 0x2,0x5
0584 6864 |hd | Jump_Zero 0x5e9
0585 e5fc | | Load 0x2,-0x4
0586 e408 | | Load 0x2,0x8
0587 e00d | | Load 0x0,0xd
0588 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
0589 6801 |h | Jump_Zero 0x58b
058a 8416 | | Call 0x2,0x16
058b e005 | | Load 0x0,0x5
058c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058d e406 | | Load 0x2,0x6
058e 0120 | | Execute Any,Is_Value
058f 6804 |h | Jump_Zero 0x594
0590 e002 | | Load 0x0,0x2
0591 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0592 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0593 7801 |x | Jump 0x595
0594 e406 | | Load 0x2,0x6
0595 e5fc | | Load 0x2,-0x4
0596 e408 | | Load 0x2,0x8
0597 e00d | | Load 0x0,0xd
0598 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0599 c406 | | Store 0x2,0x6
059a c40c | | Store 0x2,0xc
059b e40c | | Load 0x2,0xc
059c 6803 |h | Jump_Zero 0x5a0
059d e005 | | Load 0x0,0x5
059e 1b17 | | Execute Package,Field_Read,Field_Number 0x17
059f 0257 | W | Execute Discrete,Raise
05a0 4801 |H | Short_Literal 0x1
05a1 a404 | | Store_Unchecked 0x2,0x4
05a2 00cf | | Action Mark_Auxiliary
05a3 783e |x> | Jump 0x5e2
05a4 e002 | | Load 0x0,0x2
05a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05a6 e408 | | Load 0x2,0x8
05a7 0120 | | Execute Any,Is_Value
05a8 6803 |h | Jump_Zero 0x5ac
05a9 e002 | | Load 0x0,0x2
05aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05ab 7801 |x | Jump 0x5ad
05ac e408 | | Load 0x2,0x8
05ad e406 | | Load 0x2,0x6
05ae e002 | | Load 0x0,0x2
05af 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05b0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
05b1 c408 | | Store 0x2,0x8
05b2 c403 | | Store 0x2,0x3
05b3 e403 | | Load 0x2,0x3
05b4 6803 |h | Jump_Zero 0x5b8
05b5 e005 | | Load 0x0,0x5
05b6 1b17 | | Execute Package,Field_Read,Field_Number 0x17
05b7 0257 | W | Execute Discrete,Raise
05b8 e005 | | Load 0x0,0x5
05b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ba e409 | | Load 0x2,0x9
05bb 0120 | | Execute Any,Is_Value
05bc 6803 |h | Jump_Zero 0x5c0
05bd e002 | | Load 0x0,0x2
05be 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05bf 7801 |x | Jump 0x5c1
05c0 e409 | | Load 0x2,0x9
05c1 e5fc | | Load 0x2,-0x4
05c2 e408 | | Load 0x2,0x8
05c3 e00d | | Load 0x0,0xd
05c4 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
05c5 c409 | | Store 0x2,0x9
05c6 c40c | | Store 0x2,0xc
05c7 e40c | | Load 0x2,0xc
05c8 6803 |h | Jump_Zero 0x5cc
05c9 e005 | | Load 0x0,0x5
05ca 1b17 | | Execute Package,Field_Read,Field_Number 0x17
05cb 0257 | W | Execute Discrete,Raise
05cc 8416 | | Call 0x2,0x16
05cd e002 | | Load 0x0,0x2
05ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05cf 60a8 |` | Indirect_Literal Discrete,0x678,{0x00000000, 0x00004000}
05d0 e00e | | Load 0x0,0xe
05d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05d2 e409 | | Load 0x2,0x9
05d3 e002 | | Load 0x0,0x2
05d4 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
05d5 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05d6 c403 | | Store 0x2,0x3
05d7 e403 | | Load 0x2,0x3
05d8 6803 |h | Jump_Zero 0x5dc
05d9 e00a | | Load 0x0,0xa
05da 1b19 | | Execute Package,Field_Read,Field_Number 0x19
05db 0257 | W | Execute Discrete,Raise
05dc e406 | | Load 0x2,0x6
05dd e002 | | Load 0x0,0x2
05de 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05df 181d | | Execute Package,Field_Execute,Field_Number 0x1d
05e0 c406 | | Store 0x2,0x6
05e1 00c9 | | Action Pop_Auxiliary_Loop
05e2 e406 | | Load 0x2,0x6
05e3 e002 | | Load 0x0,0x2
05e4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05e5 181e | | Execute Package,Field_Execute,Field_Number 0x1e
05e6 6fbd |o | Jump_Zero 0x5a4
05e7 00ce | | Action Pop_Auxiliary
05e8 7801 |x | Jump 0x5ea
05e9 8416 | | Call 0x2,0x16
05ea e40c | | Load 0x2,0xc
05eb a5fb | | Store_Unchecked 0x2,-0x5
05ec e40c | | Load 0x2,0xc
05ed e5fc | | Load 0x2,-0x4
05ee e40b | | Load 0x2,0xb
05ef 826d | m | Call 0x1,0x6d
05f0 c40c | | Store 0x2,0xc
05f1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
05f2 TRAP_0478:
05f2 e00a | | Load 0x0,0xa
05f3 1b19 | | Execute Package,Field_Read,Field_Number 0x19
05f4 010f | | Execute Exception,Equal
05f5 6808 |h | Jump_Zero 0x5fe
05f6 e40c | | Load 0x2,0xc
05f7 a5fb | | Store_Unchecked 0x2,-0x5
05f8 e40c | | Load 0x2,0xc
05f9 e5fc | | Load 0x2,-0x4
05fa e40b | | Load 0x2,0xb
05fb 826d | m | Call 0x1,0x6d
05fc c40c | | Store 0x2,0xc
05fd 4505 |E | Exit_Suprogram New_Top_Offset 0x5
05fe e00a | | Load 0x0,0xa
05ff 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0600 010f | | Execute Exception,Equal
0601 6825 |h% | Jump_Zero 0x627
0602 4801 |H | Short_Literal 0x1
0603 4801 |H | Short_Literal 0x1
0604 e004 | | Load 0x0,0x4
0605 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0606 0334 | 4 | Declare_Variable Array,With_Constraint
0607 e5fe | | Load 0x2,-0x2
0608 e006 | | Load 0x0,0x6
0609 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
060a e004 | | Load 0x0,0x4
060b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
060c 0119 | | Execute Any,Check_In_Formal_Type
060d 4801 |H | Short_Literal 0x1
060e 00da | | Load_Top At_Offset_2
060f 01d6 | | Execute Vector,Field_Write
0610 665b |f[ | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000811a}
0611 e005 | | Load 0x0,0x5
0612 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0613 a5fb | | Store_Unchecked 0x2,-0x5
0614 e5fc | | Load 0x2,-0x4
0615 4801 |H | Short_Literal 0x1
0616 4801 |H | Short_Literal 0x1
0617 e004 | | Load 0x0,0x4
0618 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0619 0334 | 4 | Declare_Variable Array,With_Constraint
061a e5fe | | Load 0x2,-0x2
061b e006 | | Load 0x0,0x6
061c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
061d e004 | | Load 0x0,0x4
061e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
061f 0119 | | Execute Any,Check_In_Formal_Type
0620 4801 |H | Short_Literal 0x1
0621 00da | | Load_Top At_Offset_2
0622 01d6 | | Execute Vector,Field_Write
0623 6648 |fH | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000811a}
0624 e005 | | Load 0x0,0x5
0625 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0626 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0627 e005 | | Load 0x0,0x5
0628 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0629 010f | | Execute Exception,Equal
062a 681b |h | Jump_Zero 0x646
062b e005 | | Load 0x0,0x5
062c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
062d a5fb | | Store_Unchecked 0x2,-0x5
062e e40c | | Load 0x2,0xc
062f e5fc | | Load 0x2,-0x4
0630 e40b | | Load 0x2,0xb
0631 826d | m | Call 0x1,0x6d
0632 c40c | | Store 0x2,0xc
0633 e5fc | | Load 0x2,-0x4
0634 4801 |H | Short_Literal 0x1
0635 4801 |H | Short_Literal 0x1
0636 e004 | | Load 0x0,0x4
0637 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0638 0334 | 4 | Declare_Variable Array,With_Constraint
0639 e5fe | | Load 0x2,-0x2
063a e006 | | Load 0x0,0x6
063b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
063c e004 | | Load 0x0,0x4
063d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
063e 0119 | | Execute Any,Check_In_Formal_Type
063f 4801 |H | Short_Literal 0x1
0640 00da | | Load_Top At_Offset_2
0641 01d6 | | Execute Vector,Field_Write
0642 6629 |f) | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000811a}
0643 e005 | | Load 0x0,0x5
0644 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0645 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0646 e40c | | Load 0x2,0xc
0647 e5fc | | Load 0x2,-0x4
0648 e40b | | Load 0x2,0xb
0649 826d | m | Call 0x1,0x6d
064a c40c | | Store 0x2,0xc
064b 4801 |H | Short_Literal 0x1
064c 4801 |H | Short_Literal 0x1
064d e004 | | Load 0x0,0x4
064e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
064f 0334 | 4 | Declare_Variable Array,With_Constraint
0650 e5fe | | Load 0x2,-0x2
0651 e006 | | Load 0x0,0x6
0652 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0653 e004 | | Load 0x0,0x4
0654 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0655 0119 | | Execute Any,Check_In_Formal_Type
0656 4801 |H | Short_Literal 0x1
0657 00da | | Load_Top At_Offset_2
0658 01d6 | | Execute Vector,Field_Write
0659 6612 |f | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000811a}
065a e005 | | Load 0x0,0x5
065b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
065c a5fb | | Store_Unchecked 0x2,-0x5
065d e5fc | | Load 0x2,-0x4
065e 4801 |H | Short_Literal 0x1
065f 4801 |H | Short_Literal 0x1
0660 e004 | | Load 0x0,0x4
0661 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0662 0334 | 4 | Declare_Variable Array,With_Constraint
0663 e5fe | | Load 0x2,-0x2
0664 e006 | | Load 0x0,0x6
0665 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0666 e004 | | Load 0x0,0x4
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 65ff |e | Indirect_Literal Discrete,0x46c,{0x00000000, 0x0000811a}
066d e005 | | Load 0x0,0x5
066e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
066f e5fc | | Load 0x2,-0x4
0670 0092 1eaa | | Action Push_String_Extended,0x1eaa ; "Target_Builder.Unit.Promote"
0672 e007 | | Load 0x0,0x7
0673 180f | | Execute Package,Field_Execute,Field_Number 0xf
0674 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0675 0000 0000 | | .XXX[0x3]
0677 0000 | |
0678 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
067c 0000 0000 | | .BLANK 0000[0x4]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 06b6 | | .CONST 0x06b6 ; Address of begin
0681 073a | : | .CONST 0x073a ; Address of exception handler
0682 000b | | .CONST 0x000b ; Number of locals
0683 INIT_0680:
0683 e005 | | Load 0x0,0x5
0684 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0685 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0686 e002 | | Load 0x0,0x2
0687 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0688 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0689 02c7 | | Declare_Variable Any
068a 00d8 | | Load_Top At_Offset_0
068b 1c00 | | Execute_Immediate Run_Utility,0x0
068c e002 | | Load 0x0,0x2
068d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
068e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
068f 02c7 | | Declare_Variable Any
0690 00d8 | | Load_Top At_Offset_0
0691 1c00 | | Execute_Immediate Run_Utility,0x0
0692 e005 | | Load 0x0,0x5
0693 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0694 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0695 e008 | | Load 0x0,0x8
0696 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0697 e002 | | Load 0x0,0x2
0698 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0699 0322 | " | Declare_Variable Record
069a e5fd | | Load 0x2,-0x3
069b e009 | | Load 0x0,0x9
069c 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
069d 00d9 | | Load_Top At_Offset_1
069e 017d | } | Execute Record,Structure_Write
069f e5fc | | Load 0x2,-0x4
06a0 e5fe | | Load 0x2,-0x2
06a1 e5fd | | Load 0x2,-0x3
06a2 e009 | | Load 0x0,0x9
06a3 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
06a4 00ea | | Load_Encached Null_String_Cache
06a5 e5fc | | Load 0x2,-0x4
06a6 e5fe | | Load 0x2,-0x2
06a7 e5fd | | Load 0x2,-0x3
06a8 e009 | | Load 0x0,0x9
06a9 18ba | | Execute Package,Field_Execute,Field_Number 0xba
06aa e5fc | | Load 0x2,-0x4
06ab e407 | | Load 0x2,0x7
06ac e5fe | | Load 0x2,-0x2
06ad e5fc | | Load 0x2,-0x4
06ae 4801 |H | Short_Literal 0x1
06af e5fe | | Load 0x2,-0x2
06b0 e006 | | Load 0x0,0x6
06b1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06b2 e00d | | Load 0x0,0xd
06b3 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
06b4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06b5 0007 | | Action Break_Optional
06b6 BODY_0680:
06b6 e402 | | Load 0x2,0x2
06b7 e404 | | Load 0x2,0x4
06b8 e403 | | Load 0x2,0x3
06b9 e5fc | | Load 0x2,-0x4
06ba e5fe | | Load 0x2,-0x2
06bb 826c | l | Call 0x1,0x6c
06bc c403 | | Store 0x2,0x3
06bd c404 | | Store 0x2,0x4
06be c402 | | Store 0x2,0x2
06bf e402 | | Load 0x2,0x2
06c0 6803 |h | Jump_Zero 0x6c4
06c1 e00a | | Load 0x0,0xa
06c2 1b18 | | Execute Package,Field_Read,Field_Number 0x18
06c3 0257 | W | Execute Discrete,Raise
06c4 e5fc | | Load 0x2,-0x4
06c5 0092 1eab | | Action Push_String_Extended,0x1eab ; "Demoting => "
06c7 e5fe | | Load 0x2,-0x2
06c8 e002 | | Load 0x0,0x2
06c9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06ca 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
06cb 01cc | | Execute Vector,Catenate
06cc e007 | | Load 0x0,0x7
06cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06ce e407 | | Load 0x2,0x7
06cf e408 | | Load 0x2,0x8
06d0 00db | | Load_Top At_Offset_3
06d1 e409 | | Load 0x2,0x9
06d2 e40b | | Load 0x2,0xb
06d3 e5fe | | Load 0x2,-0x2
06d4 e00f | | Load 0x0,0xf
06d5 180f | | Execute Package,Field_Execute,Field_Number 0xf
06d6 7019 |p | Jump_Nonzero 0x6f0
06d7 e5fc | | Load 0x2,-0x4
06d8 4801 |H | Short_Literal 0x1
06d9 4801 |H | Short_Literal 0x1
06da e004 | | Load 0x0,0x4
06db 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06dc 0334 | 4 | Declare_Variable Array,With_Constraint
06dd e5fe | | Load 0x2,-0x2
06de e006 | | Load 0x0,0x6
06df 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
06e0 e004 | | Load 0x0,0x4
06e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06e2 0119 | | Execute Any,Check_In_Formal_Type
06e3 4801 |H | Short_Literal 0x1
06e4 00da | | Load_Top At_Offset_2
06e5 01d6 | | Execute Vector,Field_Write
06e6 60e1 |` | Indirect_Literal Discrete,0x7c8,{0x00000000, 0x000081c1}
06e7 e005 | | Load 0x0,0x5
06e8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
06e9 e004 | | Load 0x0,0x4
06ea 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
06eb 60dc |` | Indirect_Literal Discrete,0x7c8,{0x00000000, 0x000081c1}
06ec e005 | | Load 0x0,0x5
06ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06ee a5fb | | Store_Unchecked 0x2,-0x5
06ef 4505 |E | Exit_Suprogram New_Top_Offset 0x5
06f0 e405 | | Load 0x2,0x5
06f1 e406 | | Load 0x2,0x6
06f2 e5fc | | Load 0x2,-0x4
06f3 e002 | | Load 0x0,0x2
06f4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06f5 e5ff | | Load 0x2,-0x1
06f6 00ea | | Load_Encached Null_String_Cache
06f7 e409 | | Load 0x2,0x9
06f8 e40a | | Load 0x2,0xa
06f9 e408 | | Load 0x2,0x8
06fa e40b | | Load 0x2,0xb
06fb e5fe | | Load 0x2,-0x2
06fc 0092 1eac | | Action Push_String_Extended,0x1eac ; "Demote"
06fe e009 | | Load 0x0,0x9
06ff 18c8 | | Execute Package,Field_Execute,Field_Number 0xc8
0700 4800 |H | Short_Literal 0x0
0701 e5fd | | Load 0x2,-0x3
0702 e009 | | Load 0x0,0x9
0703 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0704 e010 | | Load 0x0,0x10
0705 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0706 c406 | | Store 0x2,0x6
0707 c405 | | Store 0x2,0x5
0708 e405 | | Load 0x2,0x5
0709 6806 |h | Jump_Zero 0x710
070a e011 | | Load 0x0,0x11
070b 180e | | Execute Package,Field_Execute,Field_Number 0xe
070c e405 | | Load 0x2,0x5
070d e005 | | Load 0x0,0x5
070e 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
070f 7822 |x" | Jump 0x732
0710 e407 | | Load 0x2,0x7
0711 e408 | | Load 0x2,0x8
0712 00db | | Load_Top At_Offset_3
0713 e409 | | Load 0x2,0x9
0714 e40b | | Load 0x2,0xb
0715 e5fe | | Load 0x2,-0x2
0716 e00f | | Load 0x0,0xf
0717 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0718 7019 |p | Jump_Nonzero 0x732
0719 e5fc | | Load 0x2,-0x4
071a 4801 |H | Short_Literal 0x1
071b 4801 |H | Short_Literal 0x1
071c e004 | | Load 0x0,0x4
071d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
071e 0334 | 4 | Declare_Variable Array,With_Constraint
071f e5fe | | Load 0x2,-0x2
0720 e006 | | Load 0x0,0x6
0721 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0722 e004 | | Load 0x0,0x4
0723 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0724 0119 | | Execute Any,Check_In_Formal_Type
0725 4801 |H | Short_Literal 0x1
0726 00da | | Load_Top At_Offset_2
0727 01d6 | | Execute Vector,Field_Write
0728 609b |` | Indirect_Literal Discrete,0x7c4,{0x00000000, 0x000081c2}
0729 e005 | | Load 0x0,0x5
072a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
072b e004 | | Load 0x0,0x4
072c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
072d 6096 |` | Indirect_Literal Discrete,0x7c4,{0x00000000, 0x000081c2}
072e e005 | | Load 0x0,0x5
072f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0730 a5fb | | Store_Unchecked 0x2,-0x5
0731 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0732 e402 | | Load 0x2,0x2
0733 a5fb | | Store_Unchecked 0x2,-0x5
0734 e402 | | Load 0x2,0x2
0735 e5fc | | Load 0x2,-0x4
0736 e404 | | Load 0x2,0x4
0737 826d | m | Call 0x1,0x6d
0738 c402 | | Store 0x2,0x2
0739 4505 |E | Exit_Suprogram New_Top_Offset 0x5
073a TRAP_0680:
073a e00a | | Load 0x0,0xa
073b 1b19 | | Execute Package,Field_Read,Field_Number 0x19
073c 010f | | Execute Exception,Equal
073d 6808 |h | Jump_Zero 0x746
073e e402 | | Load 0x2,0x2
073f e5fc | | Load 0x2,-0x4
0740 e404 | | Load 0x2,0x4
0741 826d | m | Call 0x1,0x6d
0742 c402 | | Store 0x2,0x2
0743 e402 | | Load 0x2,0x2
0744 a5fb | | Store_Unchecked 0x2,-0x5
0745 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0746 e00a | | Load 0x0,0xa
0747 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0748 010f | | Execute Exception,Equal
0749 6825 |h% | Jump_Zero 0x76f
074a 4801 |H | Short_Literal 0x1
074b 4801 |H | Short_Literal 0x1
074c e004 | | Load 0x0,0x4
074d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
074e 0334 | 4 | Declare_Variable Array,With_Constraint
074f e5fe | | Load 0x2,-0x2
0750 e006 | | Load 0x0,0x6
0751 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0752 e004 | | Load 0x0,0x4
0753 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0754 0119 | | Execute Any,Check_In_Formal_Type
0755 4801 |H | Short_Literal 0x1
0756 00da | | Load_Top At_Offset_2
0757 01d6 | | Execute Vector,Field_Write
0758 6067 |`g | Indirect_Literal Discrete,0x7c0,{0x00000000, 0x00008107}
0759 e005 | | Load 0x0,0x5
075a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
075b a5fb | | Store_Unchecked 0x2,-0x5
075c e5fc | | Load 0x2,-0x4
075d 4801 |H | Short_Literal 0x1
075e 4801 |H | Short_Literal 0x1
075f e004 | | Load 0x0,0x4
0760 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0761 0334 | 4 | Declare_Variable Array,With_Constraint
0762 e5fe | | Load 0x2,-0x2
0763 e006 | | Load 0x0,0x6
0764 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0765 e004 | | Load 0x0,0x4
0766 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0767 0119 | | Execute Any,Check_In_Formal_Type
0768 4801 |H | Short_Literal 0x1
0769 00da | | Load_Top At_Offset_2
076a 01d6 | | Execute Vector,Field_Write
076b 6054 |`T | Indirect_Literal Discrete,0x7c0,{0x00000000, 0x00008107}
076c e005 | | Load 0x0,0x5
076d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
076e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
076f e005 | | Load 0x0,0x5
0770 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0771 010f | | Execute Exception,Equal
0772 681b |h | Jump_Zero 0x78e
0773 e005 | | Load 0x0,0x5
0774 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0775 a5fb | | Store_Unchecked 0x2,-0x5
0776 e402 | | Load 0x2,0x2
0777 e5fc | | Load 0x2,-0x4
0778 e404 | | Load 0x2,0x4
0779 826d | m | Call 0x1,0x6d
077a c402 | | Store 0x2,0x2
077b e5fc | | Load 0x2,-0x4
077c 4801 |H | Short_Literal 0x1
077d 4801 |H | Short_Literal 0x1
077e e004 | | Load 0x0,0x4
077f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0780 0334 | 4 | Declare_Variable Array,With_Constraint
0781 e5fe | | Load 0x2,-0x2
0782 e006 | | Load 0x0,0x6
0783 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0784 e004 | | Load 0x0,0x4
0785 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0786 0119 | | Execute Any,Check_In_Formal_Type
0787 4801 |H | Short_Literal 0x1
0788 00da | | Load_Top At_Offset_2
0789 01d6 | | Execute Vector,Field_Write
078a 6035 |`5 | Indirect_Literal Discrete,0x7c0,{0x00000000, 0x00008107}
078b e005 | | Load 0x0,0x5
078c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
078d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
078e e402 | | Load 0x2,0x2
078f e5fc | | Load 0x2,-0x4
0790 e404 | | Load 0x2,0x4
0791 826d | m | Call 0x1,0x6d
0792 c402 | | Store 0x2,0x2
0793 4801 |H | Short_Literal 0x1
0794 4801 |H | Short_Literal 0x1
0795 e004 | | Load 0x0,0x4
0796 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0797 0334 | 4 | Declare_Variable Array,With_Constraint
0798 e5fe | | Load 0x2,-0x2
0799 e006 | | Load 0x0,0x6
079a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
079b e004 | | Load 0x0,0x4
079c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
079d 0119 | | Execute Any,Check_In_Formal_Type
079e 4801 |H | Short_Literal 0x1
079f 00da | | Load_Top At_Offset_2
07a0 01d6 | | Execute Vector,Field_Write
07a1 601e |` | Indirect_Literal Discrete,0x7c0,{0x00000000, 0x00008107}
07a2 e005 | | Load 0x0,0x5
07a3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07a4 a5fb | | Store_Unchecked 0x2,-0x5
07a5 e5fc | | Load 0x2,-0x4
07a6 4801 |H | Short_Literal 0x1
07a7 4801 |H | Short_Literal 0x1
07a8 e004 | | Load 0x0,0x4
07a9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07aa 0334 | 4 | Declare_Variable Array,With_Constraint
07ab e5fe | | Load 0x2,-0x2
07ac e006 | | Load 0x0,0x6
07ad 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
07ae e004 | | Load 0x0,0x4
07af 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07b0 0119 | | Execute Any,Check_In_Formal_Type
07b1 4801 |H | Short_Literal 0x1
07b2 00da | | Load_Top At_Offset_2
07b3 01d6 | | Execute Vector,Field_Write
07b4 600b |` | Indirect_Literal Discrete,0x7c0,{0x00000000, 0x00008107}
07b5 e005 | | Load 0x0,0x5
07b6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
07b7 e5fc | | Load 0x2,-0x4
07b8 0092 1ead | | Action Push_String_Extended,0x1ead ; "Target_Builder.Unit.Demote"
07ba e007 | | Load 0x0,0x7
07bb 180f | | Execute Package,Field_Execute,Field_Number 0xf
07bc 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07bd 0000 0000 | | .XXX[0x3]
07bf 0000 | |
07c0 0000 0000 | | .LITERAL {0x00000000, 0x00008107}
07c4 0000 0000 | | .LITERAL {0x00000000, 0x000081c2}
07c8 0000 0000 | | .LITERAL {0x00000000, 0x000081c1}
07cc 0000 0000 | | .BLANK 0000[0x4]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3 | | .CONST 0x07d3 ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0001 | | .CONST 0x0001 ; Number of locals
07d3 BODY_07d0:
07d3 INIT_07d0:
07d3 00da | | Load_Top At_Offset_2
07d4 00d8 | | Load_Top At_Offset_0
07d5 0120 | | Execute Any,Is_Value
07d6 7002 |p | Jump_Nonzero 0x7d9
07d7 00d8 | | Load_Top At_Offset_0
07d8 011e | | Execute Any,Convert
07d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07da 0000 0000 | | .BLANK 0000[0x6]
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 07ec | | .CONST 0x07ec ; Address of begin
07e1 0803 | | .CONST 0x0803 ; Address of exception handler
07e2 0003 | | .CONST 0x0003 ; Number of locals
07e3 INIT_07e0:
07e3 e005 | | Load 0x0,0x5
07e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07e5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
07e6 e001 | | Load 0x0,0x1
07e7 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
07e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07e9 02c7 | | Declare_Variable Any
07ea 00d8 | | Load_Top At_Offset_0
07eb 1c00 | | Execute_Immediate Run_Utility,0x0
07ec BODY_07e0:
07ec e5fc | | Load 0x2,-0x4
07ed 0092 1eae | | Action Push_String_Extended,0x1eae ; "Unit_Target_Name"
07ef 8265 | e | Call 0x1,0x65
07f0 e005 | | Load 0x0,0x5
07f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f2 00d9 | | Load_Top At_Offset_1
07f3 e5fc | | Load 0x2,-0x4
07f4 602f |`/ | Indirect_Literal Discrete,0x824,{0x00000000, 0x00008113}
07f5 e5fe | | Load 0x2,-0x2
07f6 e5ff | | Load 0x2,-0x1
07f7 8266 | f | Call 0x1,0x66
07f8 c403 | | Store 0x2,0x3
07f9 005a | Z | Store_Top Discrete,At_Offset_2
07fa 00d9 | | Load_Top At_Offset_1
07fb 6803 |h | Jump_Zero 0x7ff
07fc 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
07fe 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
07ff e5fd | | Load 0x2,-0x3
0800 00d9 | | Load_Top At_Offset_1
0801 8269 | i | Call 0x1,0x69
0802 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0803 TRAP_07e0:
0803 e005 | | Load 0x0,0x5
0804 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0805 010f | | Execute Exception,Equal
0806 6815 |h | Jump_Zero 0x81c
0807 e5fc | | Load 0x2,-0x4
0808 4801 |H | Short_Literal 0x1
0809 4801 |H | Short_Literal 0x1
080a e004 | | Load 0x0,0x4
080b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
080c 0334 | 4 | Declare_Variable Array,With_Constraint
080d e5fe | | Load 0x2,-0x2
080e e006 | | Load 0x0,0x6
080f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0810 e004 | | Load 0x0,0x4
0811 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0812 0119 | | Execute Any,Check_In_Formal_Type
0813 4801 |H | Short_Literal 0x1
0814 00da | | Load_Top At_Offset_2
0815 01d6 | | Execute Vector,Field_Write
0816 600d |` | Indirect_Literal Discrete,0x824,{0x00000000, 0x00008113}
0817 e005 | | Load 0x0,0x5
0818 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0819 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
081b 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
081c e5fc | | Load 0x2,-0x4
081d 0092 1eaf | | Action Push_String_Extended,0x1eaf ; "Target_Builder.Unit.Unit_Target_Name"
081f e007 | | Load 0x0,0x7
0820 180f | | Execute Package,Field_Execute,Field_Number 0xf
0821 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
0823 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0824 0000 0000 | | .LITERAL {0x00000000, 0x00008113}
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 083e | > | .CONST 0x083e ; Address of begin
0829 086a | j | .CONST 0x086a ; Address of exception handler
082a 0005 | | .CONST 0x0005 ; Number of locals
082b INIT_0828:
082b e5fd | | Load 0x2,-0x3
082c e009 | | Load 0x0,0x9
082d 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
082e e009 | | Load 0x0,0x9
082f 1bbf | | Execute Package,Field_Read,Field_Number 0xbf
0830 03f1 | | Declare_Variable Discrete,With_Value
0831 e005 | | Load 0x0,0x5
0832 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0833 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0834 e001 | | Load 0x0,0x1
0835 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0836 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0837 02c7 | | Declare_Variable Any
0838 e001 | | Load 0x0,0x1
0839 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
083a 180e | | Execute Package,Field_Execute,Field_Number 0xe
083b a404 | | Store_Unchecked 0x2,0x4
083c 029f 1d23 | #| Declare_Subprogram INIT_1d20,For_Call
083e BODY_0828:
083e e005 | | Load 0x0,0x5
083f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0840 e5fc | | Load 0x2,-0x4
0841 e5ff | | Load 0x2,-0x1
0842 8012 | | Call 0x0,0x12
0843 005b | [ | Store_Top Discrete,At_Offset_3
0844 00da | | Load_Top At_Offset_2
0845 6802 |h | Jump_Zero 0x848
0846 00ea | | Load_Encached Null_String_Cache
0847 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0848 e5fe | | Load 0x2,-0x2
0849 01db | | Execute Vector,Length
084a 7014 |p | Jump_Nonzero 0x85f
084b e5fc | | Load 0x2,-0x4
084c 4801 |H | Short_Literal 0x1
084d 4801 |H | Short_Literal 0x1
084e e004 | | Load 0x0,0x4
084f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0850 0334 | 4 | Declare_Variable Array,With_Constraint
0851 e5fe | | Load 0x2,-0x2
0852 e004 | | Load 0x0,0x4
0853 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0854 e004 | | Load 0x0,0x4
0855 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0856 0119 | | Execute Any,Check_In_Formal_Type
0857 4801 |H | Short_Literal 0x1
0858 00da | | Load_Top At_Offset_2
0859 01d6 | | Execute Vector,Field_Write
085a 6031 |`1 | Indirect_Literal Discrete,0x88c,{0x00000000, 0x00008108}
085b e005 | | Load 0x0,0x5
085c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
085d 00ea | | Load_Encached Null_String_Cache
085e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
085f 8405 | | Call 0x2,0x5
0860 00d9 | | Load_Top At_Offset_1
0861 e001 | | Load 0x0,0x1
0862 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0863 180f | | Execute Package,Field_Execute,Field_Number 0xf
0864 6802 |h | Jump_Zero 0x867
0865 00ea | | Load_Encached Null_String_Cache
0866 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0867 00d9 | | Load_Top At_Offset_1
0868 8013 | | Call 0x0,0x13
0869 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
086a TRAP_0828:
086a e005 | | Load 0x0,0x5
086b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
086c 010f | | Execute Exception,Equal
086d 6814 |h | Jump_Zero 0x882
086e e5fc | | Load 0x2,-0x4
086f 4801 |H | Short_Literal 0x1
0870 4801 |H | Short_Literal 0x1
0871 e004 | | Load 0x0,0x4
0872 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0873 0334 | 4 | Declare_Variable Array,With_Constraint
0874 e5fe | | Load 0x2,-0x2
0875 e004 | | Load 0x0,0x4
0876 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0877 e004 | | Load 0x0,0x4
0878 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0879 0119 | | Execute Any,Check_In_Formal_Type
087a 4801 |H | Short_Literal 0x1
087b 00da | | Load_Top At_Offset_2
087c 01d6 | | Execute Vector,Field_Write
087d 600e |` | Indirect_Literal Discrete,0x88c,{0x00000000, 0x00008108}
087e e005 | | Load 0x0,0x5
087f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0880 00ea | | Load_Encached Null_String_Cache
0881 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0882 e5fc | | Load 0x2,-0x4
0883 0092 1eb0 | | Action Push_String_Extended,0x1eb0 ; "Target_Builder.Unit.Unit_Name"
0885 e007 | | Load 0x0,0x7
0886 180f | | Execute Package,Field_Execute,Field_Number 0xf
0887 00ea | | Load_Encached Null_String_Cache
0888 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0889 0000 0000 | | .XXX[0x3]
088b 0000 | |
088c 0000 0000 | | .LITERAL {0x00000000, 0x00008108}
0890 ; --------------------------------------------------------------------------------------
0890 ; SUBPROGRAM
0890 ; --------------------------------------------------------------------------------------
0890 08ab | | .CONST 0x08ab ; Address of begin
0891 098d | | .CONST 0x098d ; Address of exception handler
0892 0006 | | .CONST 0x0006 ; Number of locals
0893 INIT_0890:
0893 e005 | | Load 0x0,0x5
0894 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0895 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0896 e001 | | Load 0x0,0x1
0897 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0898 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0899 02c7 | | Declare_Variable Any
089a 00d8 | | Load_Top At_Offset_0
089b 1c00 | | Execute_Immediate Run_Utility,0x0
089c 00e1 | | Load_Encached Boolean_Cache
089d 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
089e 4820 |H | Short_Literal 0x20
089f e5fe | | Load 0x2,-0x2
08a0 e00b | | Load 0x0,0xb
08a1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
08a2 4800 |H | Short_Literal 0x0
08a3 00d9 | | Load_Top At_Offset_1
08a4 e5fd | | Load 0x2,-0x3
08a5 e009 | | Load 0x0,0x9
08a6 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0
08a7 e00b | | Load 0x0,0xb
08a8 181f | | Execute Package,Field_Execute,Field_Number 0x1f
08a9 00e3 | | Load_Encached Natural_Cache
08aa 03f1 | | Declare_Variable Discrete,With_Value
08ab BODY_0890:
08ab 00d8 | | Load_Top At_Offset_0
08ac 00da | | Load_Top At_Offset_2
08ad 01dd | | Execute Vector,First
08ae 027c | | | Execute Discrete,Less
08af 6804 |h | Jump_Zero 0x8b4
08b0 00d9 | | Load_Top At_Offset_1
08b1 01dc | | Execute Vector,Last
08b2 0a01 | | Execute_Immediate Plus,0x1
08b3 0059 | Y | Store_Top Discrete,At_Offset_1
08b4 e5fc | | Load 0x2,-0x4
08b5 0092 1eb1 | | Action Push_String_Extended,0x1eb1 ; "Set_Unit_Target_Name"
08b7 8265 | e | Call 0x1,0x65
08b8 e005 | | Load 0x0,0x5
08b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ba e403 | | Load 0x2,0x3
08bb e5fc | | Load 0x2,-0x4
08bc 611f |a | Indirect_Literal Discrete,0x9dc,{0x00000000, 0x00008124}
08bd e5ff | | Load 0x2,-0x1
08be e5fb | | Load 0x2,-0x5
08bf 8266 | f | Call 0x1,0x66
08c0 c403 | | Store 0x2,0x3
08c1 c402 | | Store 0x2,0x2
08c2 e402 | | Load 0x2,0x2
08c3 6803 |h | Jump_Zero 0x8c7
08c4 e402 | | Load 0x2,0x2
08c5 a5fa | | Store_Unchecked 0x2,-0x6
08c6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
08c7 00d9 | | Load_Top At_Offset_1
08c8 01db | | Execute Vector,Length
08c9 6805 |h | Jump_Zero 0x8cf
08ca 00d9 | | Load_Top At_Offset_1
08cb 0092 1eb2 | | Action Push_String_Extended,0x1eb2 ; "*"
08cd 01df | | Execute Vector,Equal
08ce 6806 |h | Jump_Zero 0x8d5
08cf e402 | | Load 0x2,0x2
08d0 e5fd | | Load 0x2,-0x3
08d1 e403 | | Load 0x2,0x3
08d2 8014 | | Call 0x0,0x14
08d3 c402 | | Store 0x2,0x2
08d4 7855 |xU | Jump 0x92a
08d5 00d8 | | Load_Top At_Offset_0
08d6 00da | | Load_Top At_Offset_2
08d7 01dd | | Execute Vector,First
08d8 0272 | r | Execute Discrete,Minus
08d9 e5fd | | Load 0x2,-0x3
08da e009 | | Load 0x0,0x9
08db 1872 | r | Execute Package,Field_Execute,Field_Number 0x72
08dc 027d | } | Execute Discrete,Greater
08dd 6842 |hB | Jump_Zero 0x920
08de e5fc | | Load 0x2,-0x4
08df 4801 |H | Short_Literal 0x1
08e0 4803 |H | Short_Literal 0x3
08e1 e004 | | Load 0x0,0x4
08e2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08e3 0334 | 4 | Declare_Variable Array,With_Constraint
08e4 e5ff | | Load 0x2,-0x1
08e5 e006 | | Load 0x0,0x6
08e6 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
08e7 e004 | | Load 0x0,0x4
08e8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08e9 0119 | | Execute Any,Check_In_Formal_Type
08ea 4801 |H | Short_Literal 0x1
08eb 00da | | Load_Top At_Offset_2
08ec 01d6 | | Execute Vector,Field_Write
08ed e5fe | | Load 0x2,-0x2
08ee e004 | | Load 0x0,0x4
08ef 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08f0 e004 | | Load 0x0,0x4
08f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08f2 0119 | | Execute Any,Check_In_Formal_Type
08f3 4802 |H | Short_Literal 0x2
08f4 00da | | Load_Top At_Offset_2
08f5 01d6 | | Execute Vector,Field_Write
08f6 e5fd | | Load 0x2,-0x3
08f7 e009 | | Load 0x0,0x9
08f8 1872 | r | Execute Package,Field_Execute,Field_Number 0x72
08f9 e004 | | Load 0x0,0x4
08fa 1812 | | Execute Package,Field_Execute,Field_Number 0x12
08fb e004 | | Load 0x0,0x4
08fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08fd 0119 | | Execute Any,Check_In_Formal_Type
08fe 4803 |H | Short_Literal 0x3
08ff 00da | | Load_Top At_Offset_2
0900 01d6 | | Execute Vector,Field_Write
0901 60d6 |` | Indirect_Literal Discrete,0x9d8,{0x00000000, 0x0000813a}
0902 e005 | | Load 0x0,0x5
0903 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0904 4801 |H | Short_Literal 0x1
0905 4802 |H | Short_Literal 0x2
0906 e004 | | Load 0x0,0x4
0907 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0908 0334 | 4 | Declare_Variable Array,With_Constraint
0909 e5ff | | Load 0x2,-0x1
090a e006 | | Load 0x0,0x6
090b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
090c e004 | | Load 0x0,0x4
090d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
090e 0119 | | Execute Any,Check_In_Formal_Type
090f 4801 |H | Short_Literal 0x1
0910 00da | | Load_Top At_Offset_2
0911 01d6 | | Execute Vector,Field_Write
0912 e5fe | | Load 0x2,-0x2
0913 e004 | | Load 0x0,0x4
0914 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0915 e004 | | Load 0x0,0x4
0916 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0917 0119 | | Execute Any,Check_In_Formal_Type
0918 4802 |H | Short_Literal 0x2
0919 00da | | Load_Top At_Offset_2
091a 01d6 | | Execute Vector,Field_Write
091b 60c0 |` | Indirect_Literal Discrete,0x9dc,{0x00000000, 0x00008124}
091c e005 | | Load 0x0,0x5
091d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
091e a5fa | | Store_Unchecked 0x2,-0x6
091f 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0920 e402 | | Load 0x2,0x2
0921 e5fd | | Load 0x2,-0x3
0922 e009 | | Load 0x0,0x9
0923 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0924 00db | | Load_Top At_Offset_3
0925 e403 | | Load 0x2,0x3
0926 e001 | | Load 0x0,0x1
0927 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0928 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0929 c402 | | Store 0x2,0x2
092a e402 | | Load 0x2,0x2
092b 705e |p^ | Jump_Nonzero 0x98a
092c e5fc | | Load 0x2,-0x4
092d 0092 1eb3 | | Action Push_String_Extended,0x1eb3 ; "Target name for unit \x22"
092f e5ff | | Load 0x2,-0x1
0930 e006 | | Load 0x0,0x6
0931 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0932 01cc | | Execute Vector,Catenate
0933 0092 1eb4 | | Action Push_String_Extended,0x1eb4 ; "\x22 has been set to \x22"
0935 01cc | | Execute Vector,Catenate
0936 e5fd | | Load 0x2,-0x3
0937 e009 | | Load 0x0,0x9
0938 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0939 e403 | | Load 0x2,0x3
093a e001 | | Load 0x0,0x1
093b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
093c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
093d 01cc | | Execute Vector,Catenate
093e 0092 1eb5 | | Action Push_String_Extended,0x1eb5 ; "\x22"
0940 01cc | | Execute Vector,Catenate
0941 e007 | | Load 0x0,0x7
0942 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0943 00d9 | | Load_Top At_Offset_1
0944 0092 1eb2 | | Action Push_String_Extended,0x1eb2 ; "*"
0946 01df | | Execute Vector,Equal
0947 680e |h | Jump_Zero 0x956
0948 4800 |H | Short_Literal 0x0
0949 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
094a e5fc | | Load 0x2,-0x4
094b 0092 1eb6 | | Action Push_String_Extended,0x1eb6 ; "Unit \x22"
094d e5ff | | Load 0x2,-0x1
094e e006 | | Load 0x0,0x6
094f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0950 01cc | | Execute Vector,Catenate
0951 0092 1eb7 | | Action Push_String_Extended,0x1eb7 ; "\x22 will be made non-downloadable"
0953 01cc | | Execute Vector,Catenate
0954 e007 | | Load 0x0,0x7
0955 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0956 e5fd | | Load 0x2,-0x3
0957 e009 | | Load 0x0,0x9
0958 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0959 e403 | | Load 0x2,0x3
095a e001 | | Load 0x0,0x1
095b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
095c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
095d 00db | | Load_Top At_Offset_3
095e 027e | ~ | Execute Discrete,Not_Equal
095f 682a |h* | Jump_Zero 0x98a
0960 e402 | | Load 0x2,0x2
0961 e5fd | | Load 0x2,-0x3
0962 e009 | | Load 0x0,0x9
0963 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0964 e404 | | Load 0x2,0x4
0965 e403 | | Load 0x2,0x3
0966 e001 | | Load 0x0,0x1
0967 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0968 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0969 c402 | | Store 0x2,0x2
096a e402 | | Load 0x2,0x2
096b 701e |p | Jump_Nonzero 0x98a
096c e5fc | | Load 0x2,-0x4
096d 4801 |H | Short_Literal 0x1
096e 4802 |H | Short_Literal 0x2
096f e004 | | Load 0x0,0x4
0970 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0971 0334 | 4 | Declare_Variable Array,With_Constraint
0972 e5ff | | Load 0x2,-0x1
0973 e006 | | Load 0x0,0x6
0974 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0975 e004 | | Load 0x0,0x4
0976 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0977 0119 | | Execute Any,Check_In_Formal_Type
0978 4801 |H | Short_Literal 0x1
0979 00da | | Load_Top At_Offset_2
097a 01d6 | | Execute Vector,Field_Write
097b e404 | | Load 0x2,0x4
097c 00e1 | | Load_Encached Boolean_Cache
097d 011c | | Execute Any,Convert_Unchecked
097e 1c01 | | Execute_Immediate Run_Utility,0x1
097f e004 | | Load 0x0,0x4
0980 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0981 e004 | | Load 0x0,0x4
0982 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0983 0119 | | Execute Any,Check_In_Formal_Type
0984 4802 |H | Short_Literal 0x2
0985 00da | | Load_Top At_Offset_2
0986 01d6 | | Execute Vector,Field_Write
0987 604c |`L | Indirect_Literal Discrete,0x9d4,{0x00000000, 0x00008192}
0988 e005 | | Load 0x0,0x5
0989 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
098a e402 | | Load 0x2,0x2
098b a5fa | | Store_Unchecked 0x2,-0x6
098c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
098d TRAP_0890:
098d e005 | | Load 0x0,0x5
098e 1b17 | | Execute Package,Field_Read,Field_Number 0x17
098f 010f | | Execute Exception,Equal
0990 681f |h | Jump_Zero 0x9b0
0991 e005 | | Load 0x0,0x5
0992 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0993 a5fa | | Store_Unchecked 0x2,-0x6
0994 e5fc | | Load 0x2,-0x4
0995 4801 |H | Short_Literal 0x1
0996 4802 |H | Short_Literal 0x2
0997 e004 | | Load 0x0,0x4
0998 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0999 0334 | 4 | Declare_Variable Array,With_Constraint
099a e5ff | | Load 0x2,-0x1
099b e006 | | Load 0x0,0x6
099c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
099d e004 | | Load 0x0,0x4
099e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
099f 0119 | | Execute Any,Check_In_Formal_Type
09a0 4801 |H | Short_Literal 0x1
09a1 00da | | Load_Top At_Offset_2
09a2 01d6 | | Execute Vector,Field_Write
09a3 e5fe | | Load 0x2,-0x2
09a4 e004 | | Load 0x0,0x4
09a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09a6 e004 | | Load 0x0,0x4
09a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09a8 0119 | | Execute Any,Check_In_Formal_Type
09a9 4802 |H | Short_Literal 0x2
09aa 00da | | Load_Top At_Offset_2
09ab 01d6 | | Execute Vector,Field_Write
09ac 602f |`/ | Indirect_Literal Discrete,0x9dc,{0x00000000, 0x00008124}
09ad e005 | | Load 0x0,0x5
09ae 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
09af 4505 |E | Exit_Suprogram New_Top_Offset 0x5
09b0 e5fc | | Load 0x2,-0x4
09b1 0092 1eb8 | | Action Push_String_Extended,0x1eb8 ; "Target_Builder.Unit.Set_Unit_Target_Name"
09b3 e007 | | Load 0x0,0x7
09b4 180f | | Execute Package,Field_Execute,Field_Number 0xf
09b5 4801 |H | Short_Literal 0x1
09b6 4802 |H | Short_Literal 0x2
09b7 e004 | | Load 0x0,0x4
09b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09b9 0334 | 4 | Declare_Variable Array,With_Constraint
09ba e5ff | | Load 0x2,-0x1
09bb e006 | | Load 0x0,0x6
09bc 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
09bd e004 | | Load 0x0,0x4
09be 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09bf 0119 | | Execute Any,Check_In_Formal_Type
09c0 4801 |H | Short_Literal 0x1
09c1 00da | | Load_Top At_Offset_2
09c2 01d6 | | Execute Vector,Field_Write
09c3 e5fe | | Load 0x2,-0x2
09c4 e004 | | Load 0x0,0x4
09c5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09c6 e004 | | Load 0x0,0x4
09c7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09c8 0119 | | Execute Any,Check_In_Formal_Type
09c9 4802 |H | Short_Literal 0x2
09ca 00da | | Load_Top At_Offset_2
09cb 01d6 | | Execute Vector,Field_Write
09cc 600f |` | Indirect_Literal Discrete,0x9dc,{0x00000000, 0x00008124}
09cd e005 | | Load 0x0,0x5
09ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09cf a5fa | | Store_Unchecked 0x2,-0x6
09d0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
09d1 0000 0000 | | .XXX[0x3]
09d3 0000 | |
09d4 0000 0000 | | .LITERAL {0x00000000, 0x00008192}
09d8 0000 0000 | | .LITERAL {0x00000000, 0x0000813a}
09dc 0000 0000 | | .LITERAL {0x00000000, 0x00008124}
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09ec | | .CONST 0x09ec ; Address of begin
09e1 0a06 | | .CONST 0x0a06 ; Address of exception handler
09e2 0003 | | .CONST 0x0003 ; Number of locals
09e3 INIT_09e0:
09e3 e005 | | Load 0x0,0x5
09e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09e5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
09e6 e001 | | Load 0x0,0x1
09e7 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
09e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09e9 02c7 | | Declare_Variable Any
09ea 00d8 | | Load_Top At_Offset_0
09eb 1c00 | | Execute_Immediate Run_Utility,0x0
09ec BODY_09e0:
09ec e5fc | | Load 0x2,-0x4
09ed 0092 1eb9 | | Action Push_String_Extended,0x1eb9 ; "Has_Unit_Target_Name"
09ef 8265 | e | Call 0x1,0x65
09f0 e005 | | Load 0x0,0x5
09f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09f2 00d9 | | Load_Top At_Offset_1
09f3 e5fc | | Load 0x2,-0x4
09f4 6033 |`3 | Indirect_Literal Discrete,0xa28,{0x00000000, 0x00008113}
09f5 e5fe | | Load 0x2,-0x2
09f6 e5ff | | Load 0x2,-0x1
09f7 8266 | f | Call 0x1,0x66
09f8 c403 | | Store 0x2,0x3
09f9 005a | Z | Store_Top Discrete,At_Offset_2
09fa 00d9 | | Load_Top At_Offset_1
09fb 6802 |h | Jump_Zero 0x9fe
09fc 4800 |H | Short_Literal 0x0
09fd 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
09fe e5fd | | Load 0x2,-0x3
09ff e009 | | Load 0x0,0x9
0a00 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0a01 00d9 | | Load_Top At_Offset_1
0a02 e001 | | Load 0x0,0x1
0a03 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0a04 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0a05 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0a06 TRAP_09e0:
0a06 e005 | | Load 0x0,0x5
0a07 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0a08 010f | | Execute Exception,Equal
0a09 6814 |h | Jump_Zero 0xa1e
0a0a e5fc | | Load 0x2,-0x4
0a0b 4801 |H | Short_Literal 0x1
0a0c 4801 |H | Short_Literal 0x1
0a0d e004 | | Load 0x0,0x4
0a0e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a0f 0334 | 4 | Declare_Variable Array,With_Constraint
0a10 e5fe | | Load 0x2,-0x2
0a11 e006 | | Load 0x0,0x6
0a12 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0a13 e004 | | Load 0x0,0x4
0a14 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a15 0119 | | Execute Any,Check_In_Formal_Type
0a16 4801 |H | Short_Literal 0x1
0a17 00da | | Load_Top At_Offset_2
0a18 01d6 | | Execute Vector,Field_Write
0a19 600e |` | Indirect_Literal Discrete,0xa28,{0x00000000, 0x00008113}
0a1a e005 | | Load 0x0,0x5
0a1b 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0a1c 4800 |H | Short_Literal 0x0
0a1d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0a1e e5fc | | Load 0x2,-0x4
0a1f 0092 1eba | | Action Push_String_Extended,0x1eba ; "Target_Builder.Unit.Has_Unit_Target_Name"
0a21 e007 | | Load 0x0,0x7
0a22 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a23 4800 |H | Short_Literal 0x0
0a24 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0a25 0000 0000 | | .XXX[0x3]
0a27 0000 | |
0a28 0000 0000 | | .LITERAL {0x00000000, 0x00008113}
0a2c 0000 0000 | | .BLANK 0000[0x4]
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a3c | < | .CONST 0x0a3c ; Address of begin
0a31 0a56 | V | .CONST 0x0a56 ; Address of exception handler
0a32 0003 | | .CONST 0x0003 ; Number of locals
0a33 INIT_0a30:
0a33 e005 | | Load 0x0,0x5
0a34 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a35 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a36 e001 | | Load 0x0,0x1
0a37 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
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 BODY_0a30:
0a3c e5fc | | Load 0x2,-0x4
0a3d 0092 1ebb | | Action Push_String_Extended,0x1ebb ; "Download_Time"
0a3f 8265 | e | Call 0x1,0x65
0a40 e005 | | Load 0x0,0x5
0a41 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a42 00d9 | | Load_Top At_Offset_1
0a43 e5fc | | Load 0x2,-0x4
0a44 6033 |`3 | Indirect_Literal Discrete,0xa78,{0x00000000, 0x00008154}
0a45 e5fe | | Load 0x2,-0x2
0a46 e5ff | | Load 0x2,-0x1
0a47 8266 | f | Call 0x1,0x66
0a48 c403 | | Store 0x2,0x3
0a49 005a | Z | Store_Top Discrete,At_Offset_2
0a4a 00d9 | | Load_Top At_Offset_1
0a4b 6802 |h | Jump_Zero 0xa4e
0a4c 8234 | 4 | Call 0x1,0x34
0a4d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0a4e e5fd | | Load 0x2,-0x3
0a4f e009 | | Load 0x0,0x9
0a50 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0a51 00d9 | | Load_Top At_Offset_1
0a52 e001 | | Load 0x0,0x1
0a53 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0a54 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0a55 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0a56 TRAP_0a30:
0a56 e005 | | Load 0x0,0x5
0a57 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0a58 010f | | Execute Exception,Equal
0a59 6814 |h | Jump_Zero 0xa6e
0a5a e5fc | | Load 0x2,-0x4
0a5b 4801 |H | Short_Literal 0x1
0a5c 4801 |H | Short_Literal 0x1
0a5d e004 | | Load 0x0,0x4
0a5e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a5f 0334 | 4 | Declare_Variable Array,With_Constraint
0a60 e5fe | | Load 0x2,-0x2
0a61 e006 | | Load 0x0,0x6
0a62 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0a63 e004 | | Load 0x0,0x4
0a64 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a65 0119 | | Execute Any,Check_In_Formal_Type
0a66 4801 |H | Short_Literal 0x1
0a67 00da | | Load_Top At_Offset_2
0a68 01d6 | | Execute Vector,Field_Write
0a69 600e |` | Indirect_Literal Discrete,0xa78,{0x00000000, 0x00008154}
0a6a e005 | | Load 0x0,0x5
0a6b 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0a6c 8234 | 4 | Call 0x1,0x34
0a6d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0a6e e5fc | | Load 0x2,-0x4
0a6f 0092 1ebc | | Action Push_String_Extended,0x1ebc ; "Target_Builder.Unit.Download_Time"
0a71 e007 | | Load 0x0,0x7
0a72 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a73 8234 | 4 | Call 0x1,0x34
0a74 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0a75 0000 0000 | | .XXX[0x3]
0a77 0000 | |
0a78 0000 0000 | | .LITERAL {0x00000000, 0x00008154}
0a7c 0000 0000 | | .BLANK 0000[0x4]
0a80 ; --------------------------------------------------------------------------------------
0a80 ; SUBPROGRAM
0a80 ; --------------------------------------------------------------------------------------
0a80 0a8c | | .CONST 0x0a8c ; Address of begin
0a81 0ac2 | | .CONST 0x0ac2 ; Address of exception handler
0a82 0003 | | .CONST 0x0003 ; Number of locals
0a83 INIT_0a80:
0a83 e005 | | Load 0x0,0x5
0a84 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a85 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a86 e001 | | Load 0x0,0x1
0a87 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0a88 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a89 02c7 | | Declare_Variable Any
0a8a 00d8 | | Load_Top At_Offset_0
0a8b 1c00 | | Execute_Immediate Run_Utility,0x0
0a8c BODY_0a80:
0a8c e5fc | | Load 0x2,-0x4
0a8d 0092 1ebd | | Action Push_String_Extended,0x1ebd ; "Set_Download_Time"
0a8f 8265 | e | Call 0x1,0x65
0a90 e005 | | Load 0x0,0x5
0a91 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a92 00d9 | | Load_Top At_Offset_1
0a93 e5fc | | Load 0x2,-0x4
0a94 608b |` | Indirect_Literal Discrete,0xb20,{0x00000000, 0x00008120}
0a95 e5ff | | Load 0x2,-0x1
0a96 e5fb | | Load 0x2,-0x5
0a97 8266 | f | Call 0x1,0x66
0a98 c403 | | Store 0x2,0x3
0a99 005a | Z | Store_Top Discrete,At_Offset_2
0a9a 00d9 | | Load_Top At_Offset_1
0a9b 6803 |h | Jump_Zero 0xa9f
0a9c 00d9 | | Load_Top At_Offset_1
0a9d a5fa | | Store_Unchecked 0x2,-0x6
0a9e 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0a9f e5fc | | Load 0x2,-0x4
0aa0 0092 1ebe | | Action Push_String_Extended,0x1ebe ; "Setting download time for => "
0aa2 e5ff | | Load 0x2,-0x1
0aa3 e006 | | Load 0x0,0x6
0aa4 1841 | A | Execute Package,Field_Execute,Field_Number 0x41
0aa5 01cc | | Execute Vector,Catenate
0aa6 0092 1ebf | | Action Push_String_Extended,0x1ebf ; " to "
0aa8 01cc | | Execute Vector,Catenate
0aa9 4800 |H | Short_Literal 0x0
0aaa 4800 |H | Short_Literal 0x0
0aab 4800 |H | Short_Literal 0x0
0aac e5fe | | Load 0x2,-0x2
0aad e015 | | Load 0x0,0x15
0aae 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0aaf e015 | | Load 0x0,0x15
0ab0 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0ab1 01cc | | Execute Vector,Catenate
0ab2 e007 | | Load 0x0,0x7
0ab3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ab4 00d9 | | Load_Top At_Offset_1
0ab5 e5fd | | Load 0x2,-0x3
0ab6 e009 | | Load 0x0,0x9
0ab7 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0ab8 4801 |H | Short_Literal 0x1
0ab9 e5fe | | Load 0x2,-0x2
0aba e403 | | Load 0x2,0x3
0abb e001 | | Load 0x0,0x1
0abc 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0abd 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0abe 005a | Z | Store_Top Discrete,At_Offset_2
0abf 00d9 | | Load_Top At_Offset_1
0ac0 a5fa | | Store_Unchecked 0x2,-0x6
0ac1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0ac2 TRAP_0a80:
0ac2 e005 | | Load 0x0,0x5
0ac3 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0ac4 010f | | Execute Exception,Equal
0ac5 682b |h+ | Jump_Zero 0xaf1
0ac6 e005 | | Load 0x0,0x5
0ac7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ac8 a5fa | | Store_Unchecked 0x2,-0x6
0ac9 e5fc | | Load 0x2,-0x4
0aca 4801 |H | Short_Literal 0x1
0acb 4803 |H | Short_Literal 0x3
0acc e004 | | Load 0x0,0x4
0acd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ace 0334 | 4 | Declare_Variable Array,With_Constraint
0acf e5ff | | Load 0x2,-0x1
0ad0 e006 | | Load 0x0,0x6
0ad1 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0ad2 e004 | | Load 0x0,0x4
0ad3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ad4 0119 | | Execute Any,Check_In_Formal_Type
0ad5 4801 |H | Short_Literal 0x1
0ad6 00da | | Load_Top At_Offset_2
0ad7 01d6 | | Execute Vector,Field_Write
0ad8 e5fb | | Load 0x2,-0x5
0ad9 0227 | ' | Execute Access,All_Reference
0ada 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0adb e001 | | Load 0x0,0x1
0adc 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0add 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0ade e004 | | Load 0x0,0x4
0adf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ae0 0119 | | Execute Any,Check_In_Formal_Type
0ae1 4802 |H | Short_Literal 0x2
0ae2 00da | | Load_Top At_Offset_2
0ae3 01d6 | | Execute Vector,Field_Write
0ae4 e5fe | | Load 0x2,-0x2
0ae5 e004 | | Load 0x0,0x4
0ae6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ae7 e004 | | Load 0x0,0x4
0ae8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ae9 0119 | | Execute Any,Check_In_Formal_Type
0aea 4803 |H | Short_Literal 0x3
0aeb 00da | | Load_Top At_Offset_2
0aec 01d6 | | Execute Vector,Field_Write
0aed 6032 |`2 | Indirect_Literal Discrete,0xb20,{0x00000000, 0x00008120}
0aee e005 | | Load 0x0,0x5
0aef 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0af0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0af1 e5fc | | Load 0x2,-0x4
0af2 0092 1ec0 | | Action Push_String_Extended,0x1ec0 ; "Target_Builder.Unit.Set_Download_Time"
0af4 e007 | | Load 0x0,0x7
0af5 180f | | Execute Package,Field_Execute,Field_Number 0xf
0af6 4801 |H | Short_Literal 0x1
0af7 4803 |H | Short_Literal 0x3
0af8 e004 | | Load 0x0,0x4
0af9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0afa 0334 | 4 | Declare_Variable Array,With_Constraint
0afb e5ff | | Load 0x2,-0x1
0afc e006 | | Load 0x0,0x6
0afd 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0afe e004 | | Load 0x0,0x4
0aff 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b00 0119 | | Execute Any,Check_In_Formal_Type
0b01 4801 |H | Short_Literal 0x1
0b02 00da | | Load_Top At_Offset_2
0b03 01d6 | | Execute Vector,Field_Write
0b04 e5fb | | Load 0x2,-0x5
0b05 0227 | ' | Execute Access,All_Reference
0b06 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b07 e001 | | Load 0x0,0x1
0b08 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0b09 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b0a e004 | | Load 0x0,0x4
0b0b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b0c 0119 | | Execute Any,Check_In_Formal_Type
0b0d 4802 |H | Short_Literal 0x2
0b0e 00da | | Load_Top At_Offset_2
0b0f 01d6 | | Execute Vector,Field_Write
0b10 e5fe | | Load 0x2,-0x2
0b11 e004 | | Load 0x0,0x4
0b12 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b13 e004 | | Load 0x0,0x4
0b14 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b15 0119 | | Execute Any,Check_In_Formal_Type
0b16 4803 |H | Short_Literal 0x3
0b17 00da | | Load_Top At_Offset_2
0b18 01d6 | | Execute Vector,Field_Write
0b19 6006 |` | Indirect_Literal Discrete,0xb20,{0x00000000, 0x00008120}
0b1a e005 | | Load 0x0,0x5
0b1b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b1c a5fa | | Store_Unchecked 0x2,-0x6
0b1d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0b1e 0000 0000 | | .XXX[0x2]
0b20 0000 0000 | | .LITERAL {0x00000000, 0x00008120}
0b24 0000 0000 | | .BLANK 0000[0x4]
0b28 ; --------------------------------------------------------------------------------------
0b28 ; SUBPROGRAM
0b28 ; --------------------------------------------------------------------------------------
0b28 0b2b | + | .CONST 0x0b2b ; Address of begin
0b29 0004 | | .CONST 0x0004 ; Address of exception handler
0b2a 0001 | | .CONST 0x0001 ; Number of locals
0b2b BODY_0b28:
0b2b INIT_0b28:
0b2b 4800 |H | Short_Literal 0x0
0b2c 4801 |H | Short_Literal 0x1
0b2d 4801 |H | Short_Literal 0x1
0b2e 6005 |` | Indirect_Literal Discrete,0xb34,{0x00000000, 0x0000076d}
0b2f e00c | | Load 0x0,0xc
0b30 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b31 00ca | | Action Exit_Nullary_Function
0b32 0000 0000 | | .XXX[0x2]
0b34 0000 0000 | | .LITERAL {0x00000000, 0x0000076d}
0b38 ; --------------------------------------------------------------------------------------
0b38 ; SUBPROGRAM
0b38 ; --------------------------------------------------------------------------------------
0b38 0b4e | N | .CONST 0x0b4e ; Address of begin
0b39 0bd2 | | .CONST 0x0bd2 ; Address of exception handler
0b3a 0005 | | .CONST 0x0005 ; Number of locals
0b3b INIT_0b38:
0b3b e005 | | Load 0x0,0x5
0b3c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b3d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b3e e003 | | Load 0x0,0x3
0b3f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b40 03bc | | Declare_Variable Access,By_Allocation
0b41 00d8 | | Load_Top At_Offset_0
0b42 0227 | ' | Execute Access,All_Reference
0b43 1c00 | | Execute_Immediate Run_Utility,0x0
0b44 e5ff | | Load 0x2,-0x1
0b45 e002 | | Load 0x0,0x2
0b46 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0b47 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0b48 e001 | | Load 0x0,0x1
0b49 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0b4a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b4b 02c7 | | Declare_Variable Any
0b4c 00d8 | | Load_Top At_Offset_0
0b4d 1c00 | | Execute_Immediate Run_Utility,0x0
0b4e BODY_0b38:
0b4e e5fb | | Load 0x2,-0x5
0b4f 0092 1ec1 | | Action Push_String_Extended,0x1ec1 ; "Target_Builder.Unit.Refresh_Suppliers"
0b51 e007 | | Load 0x0,0x7
0b52 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b53 4800 |H | Short_Literal 0x0
0b54 a5fa | | Store_Unchecked 0x2,-0x6
0b55 e5fd | | Load 0x2,-0x3
0b56 0227 | ' | Execute Access,All_Reference
0b57 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b58 00db | | Load_Top At_Offset_3
0b59 0227 | ' | Execute Access,All_Reference
0b5a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0b5b 4801 |H | Short_Literal 0x1
0b5c e5fd | | Load 0x2,-0x3
0b5d 0227 | ' | Execute Access,All_Reference
0b5e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b5f e001 | | Load 0x0,0x1
0b60 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0b61 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0b62 00db | | Load_Top At_Offset_3
0b63 0227 | ' | Execute Access,All_Reference
0b64 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0b65 4801 |H | Short_Literal 0x1
0b66 4802 |H | Short_Literal 0x2
0b67 00db | | Load_Top At_Offset_3
0b68 e403 | | Load 0x2,0x3
0b69 0227 | ' | Execute Access,All_Reference
0b6a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b6b e403 | | Load 0x2,0x3
0b6c 0227 | ' | Execute Access,All_Reference
0b6d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b6e e001 | | Load 0x0,0x1
0b6f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0b70 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0b71 00da | | Load_Top At_Offset_2
0b72 0227 | ' | Execute Access,All_Reference
0b73 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b74 00da | | Load_Top At_Offset_2
0b75 e001 | | Load 0x0,0x1
0b76 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0b77 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0b78 c405 | | Store 0x2,0x5
0b79 00d8 | | Load_Top At_Offset_0
0b7a e001 | | Load 0x0,0x1
0b7b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0b7c 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b7d 7030 |p0 | Jump_Nonzero 0xbae
0b7e e5fc | | Load 0x2,-0x4
0b7f e009 | | Load 0x0,0x9
0b80 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0b81 00d9 | | Load_Top At_Offset_1
0b82 e001 | | Load 0x0,0x1
0b83 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0b84 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0b85 7028 |p( | Jump_Nonzero 0xbae
0b86 00db | | Load_Top At_Offset_3
0b87 e5fc | | Load 0x2,-0x4
0b88 00da | | Load_Top At_Offset_2
0b89 8014 | | Call 0x0,0x14
0b8a c402 | | Store 0x2,0x2
0b8b 00db | | Load_Top At_Offset_3
0b8c 6842 |hB | Jump_Zero 0xbcf
0b8d e011 | | Load 0x0,0x11
0b8e 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b8f 4801 |H | Short_Literal 0x1
0b90 4802 |H | Short_Literal 0x2
0b91 e004 | | Load 0x0,0x4
0b92 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b93 0334 | 4 | Declare_Variable Array,With_Constraint
0b94 00da | | Load_Top At_Offset_2
0b95 8016 | | Call 0x0,0x16
0b96 e004 | | Load 0x0,0x4
0b97 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b98 0119 | | Execute Any,Check_In_Formal_Type
0b99 4801 |H | Short_Literal 0x1
0b9a 00da | | Load_Top At_Offset_2
0b9b 01d6 | | Execute Vector,Field_Write
0b9c e403 | | Load 0x2,0x3
0b9d 0227 | ' | Execute Access,All_Reference
0b9e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b9f e001 | | Load 0x0,0x1
0ba0 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0ba1 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0ba2 e004 | | Load 0x0,0x4
0ba3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ba4 0119 | | Execute Any,Check_In_Formal_Type
0ba5 4802 |H | Short_Literal 0x2
0ba6 00da | | Load_Top At_Offset_2
0ba7 01d6 | | Execute Vector,Field_Write
0ba8 6053 |`S | Indirect_Literal Discrete,0xbfc,{0x00000000, 0x0000811f}
0ba9 e005 | | Load 0x0,0x5
0baa 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0bab 00db | | Load_Top At_Offset_3
0bac a5fa | | Store_Unchecked 0x2,-0x6
0bad 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0bae 00d8 | | Load_Top At_Offset_0
0baf e001 | | Load 0x0,0x1
0bb0 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0bb1 180f | | Execute Package,Field_Execute,Field_Number 0xf
0bb2 681c |h | Jump_Zero 0xbcf
0bb3 e011 | | Load 0x0,0x11
0bb4 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bb5 4801 |H | Short_Literal 0x1
0bb6 4802 |H | Short_Literal 0x2
0bb7 e004 | | Load 0x0,0x4
0bb8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bb9 0334 | 4 | Declare_Variable Array,With_Constraint
0bba e5ff | | Load 0x2,-0x1
0bbb e004 | | Load 0x0,0x4
0bbc 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0bbd e004 | | Load 0x0,0x4
0bbe 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0bbf 0119 | | Execute Any,Check_In_Formal_Type
0bc0 4801 |H | Short_Literal 0x1
0bc1 00da | | Load_Top At_Offset_2
0bc2 01d6 | | Execute Vector,Field_Write
0bc3 e5fe | | Load 0x2,-0x2
0bc4 e004 | | Load 0x0,0x4
0bc5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0bc6 e004 | | Load 0x0,0x4
0bc7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0bc8 0119 | | Execute Any,Check_In_Formal_Type
0bc9 4802 |H | Short_Literal 0x2
0bca 00da | | Load_Top At_Offset_2
0bcb 01d6 | | Execute Vector,Field_Write
0bcc 602b |`+ | Indirect_Literal Discrete,0xbf8,{0x00000000, 0x0000811e}
0bcd e005 | | Load 0x0,0x5
0bce 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0bcf 00db | | Load_Top At_Offset_3
0bd0 a5fa | | Store_Unchecked 0x2,-0x6
0bd1 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0bd2 TRAP_0b38:
0bd2 4884 |H | Short_Literal 0x84
0bd3 010f | | Execute Exception,Equal
0bd4 681b |h | Jump_Zero 0xbf0
0bd5 4801 |H | Short_Literal 0x1
0bd6 4802 |H | Short_Literal 0x2
0bd7 e004 | | Load 0x0,0x4
0bd8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bd9 0334 | 4 | Declare_Variable Array,With_Constraint
0bda e5ff | | Load 0x2,-0x1
0bdb e004 | | Load 0x0,0x4
0bdc 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0bdd e004 | | Load 0x0,0x4
0bde 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0bdf 0119 | | Execute Any,Check_In_Formal_Type
0be0 4801 |H | Short_Literal 0x1
0be1 00da | | Load_Top At_Offset_2
0be2 01d6 | | Execute Vector,Field_Write
0be3 e5fe | | Load 0x2,-0x2
0be4 e004 | | Load 0x0,0x4
0be5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0be6 e004 | | Load 0x0,0x4
0be7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0be8 0119 | | Execute Any,Check_In_Formal_Type
0be9 4802 |H | Short_Literal 0x2
0bea 00da | | Load_Top At_Offset_2
0beb 01d6 | | Execute Vector,Field_Write
0bec 600b |` | Indirect_Literal Discrete,0xbf8,{0x00000000, 0x0000811e}
0bed e005 | | Load 0x0,0x5
0bee 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0bef 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0bf0 0092 1ec2 | | Action Push_String_Extended,0x1ec2 ; "Refresh_Suppliers"
0bf2 e007 | | Load 0x0,0x7
0bf3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bf4 a5fa | | Store_Unchecked 0x2,-0x6
0bf5 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0bf6 0000 0000 | | .XXX[0x2]
0bf8 0000 0000 | | .LITERAL {0x00000000, 0x0000811e}
0bfc 0000 0000 | | .LITERAL {0x00000000, 0x0000811f}
0c00 ; --------------------------------------------------------------------------------------
0c00 ; SUBPROGRAM
0c00 ; --------------------------------------------------------------------------------------
0c00 0c16 | | .CONST 0x0c16 ; Address of begin
0c01 0c9b | | .CONST 0x0c9b ; Address of exception handler
0c02 0005 | | .CONST 0x0005 ; Number of locals
0c03 INIT_0c00:
0c03 e005 | | Load 0x0,0x5
0c04 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c05 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0c06 e003 | | Load 0x0,0x3
0c07 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c08 03bc | | Declare_Variable Access,By_Allocation
0c09 00d8 | | Load_Top At_Offset_0
0c0a 0227 | ' | Execute Access,All_Reference
0c0b 1c00 | | Execute_Immediate Run_Utility,0x0
0c0c e5ff | | Load 0x2,-0x1
0c0d e002 | | Load 0x0,0x2
0c0e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c0f 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0c10 e001 | | Load 0x0,0x1
0c11 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0c12 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c13 02c7 | | Declare_Variable Any
0c14 00d8 | | Load_Top At_Offset_0
0c15 1c00 | | Execute_Immediate Run_Utility,0x0
0c16 BODY_0c00:
0c16 e5fb | | Load 0x2,-0x5
0c17 0092 1ec3 | | Action Push_String_Extended,0x1ec3 ; "Target_Builder.Unit.Register"
0c19 e007 | | Load 0x0,0x7
0c1a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c1b 4800 |H | Short_Literal 0x0
0c1c a5fa | | Store_Unchecked 0x2,-0x6
0c1d e5fd | | Load 0x2,-0x3
0c1e 0227 | ' | Execute Access,All_Reference
0c1f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c20 00db | | Load_Top At_Offset_3
0c21 0227 | ' | Execute Access,All_Reference
0c22 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0c23 4801 |H | Short_Literal 0x1
0c24 e5fd | | Load 0x2,-0x3
0c25 0227 | ' | Execute Access,All_Reference
0c26 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c27 e001 | | Load 0x0,0x1
0c28 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0c29 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0c2a 00db | | Load_Top At_Offset_3
0c2b 0227 | ' | Execute Access,All_Reference
0c2c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0c2d 4801 |H | Short_Literal 0x1
0c2e 4800 |H | Short_Literal 0x0
0c2f 00db | | Load_Top At_Offset_3
0c30 e403 | | Load 0x2,0x3
0c31 0227 | ' | Execute Access,All_Reference
0c32 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c33 e403 | | Load 0x2,0x3
0c34 0227 | ' | Execute Access,All_Reference
0c35 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c36 e001 | | Load 0x0,0x1
0c37 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0c38 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0c39 00da | | Load_Top At_Offset_2
0c3a 0227 | ' | Execute Access,All_Reference
0c3b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c3c 00da | | Load_Top At_Offset_2
0c3d e001 | | Load 0x0,0x1
0c3e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0c3f 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0c40 c405 | | Store 0x2,0x5
0c41 00d8 | | Load_Top At_Offset_0
0c42 e001 | | Load 0x0,0x1
0c43 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0c44 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c45 7030 |p0 | Jump_Nonzero 0xc76
0c46 e5fc | | Load 0x2,-0x4
0c47 e009 | | Load 0x0,0x9
0c48 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0c49 00d9 | | Load_Top At_Offset_1
0c4a e001 | | Load 0x0,0x1
0c4b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0c4c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0c4d 7028 |p( | Jump_Nonzero 0xc76
0c4e 00db | | Load_Top At_Offset_3
0c4f e5fc | | Load 0x2,-0x4
0c50 00da | | Load_Top At_Offset_2
0c51 8014 | | Call 0x0,0x14
0c52 c402 | | Store 0x2,0x2
0c53 00db | | Load_Top At_Offset_3
0c54 6843 |hC | Jump_Zero 0xc98
0c55 e011 | | Load 0x0,0x11
0c56 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c57 4801 |H | Short_Literal 0x1
0c58 4802 |H | Short_Literal 0x2
0c59 e004 | | Load 0x0,0x4
0c5a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c5b 0334 | 4 | Declare_Variable Array,With_Constraint
0c5c 00da | | Load_Top At_Offset_2
0c5d 8016 | | Call 0x0,0x16
0c5e e004 | | Load 0x0,0x4
0c5f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c60 0119 | | Execute Any,Check_In_Formal_Type
0c61 4801 |H | Short_Literal 0x1
0c62 00da | | Load_Top At_Offset_2
0c63 01d6 | | Execute Vector,Field_Write
0c64 e403 | | Load 0x2,0x3
0c65 0227 | ' | Execute Access,All_Reference
0c66 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c67 e001 | | Load 0x0,0x1
0c68 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0c69 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c6a e004 | | Load 0x0,0x4
0c6b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c6c 0119 | | Execute Any,Check_In_Formal_Type
0c6d 4802 |H | Short_Literal 0x2
0c6e 00da | | Load_Top At_Offset_2
0c6f 01d6 | | Execute Vector,Field_Write
0c70 678b |g | Indirect_Literal Discrete,0xbfc,{0x00000000, 0x0000811f}
0c71 e005 | | Load 0x0,0x5
0c72 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c73 00db | | Load_Top At_Offset_3
0c74 a5fa | | Store_Unchecked 0x2,-0x6
0c75 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0c76 00d8 | | Load_Top At_Offset_0
0c77 e001 | | Load 0x0,0x1
0c78 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0c79 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c7a 681d |h | Jump_Zero 0xc98
0c7b e011 | | Load 0x0,0x11
0c7c 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c7d 4801 |H | Short_Literal 0x1
0c7e 4802 |H | Short_Literal 0x2
0c7f e004 | | Load 0x0,0x4
0c80 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c81 0334 | 4 | Declare_Variable Array,With_Constraint
0c82 e5ff | | Load 0x2,-0x1
0c83 e004 | | Load 0x0,0x4
0c84 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0c85 e004 | | Load 0x0,0x4
0c86 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c87 0119 | | Execute Any,Check_In_Formal_Type
0c88 4801 |H | Short_Literal 0x1
0c89 00da | | Load_Top At_Offset_2
0c8a 01d6 | | Execute Vector,Field_Write
0c8b 0092 1ec4 | | Action Push_String_Extended,0x1ec4 ; "register"
0c8d e004 | | Load 0x0,0x4
0c8e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c8f e004 | | Load 0x0,0x4
0c90 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c91 0119 | | Execute Any,Check_In_Formal_Type
0c92 4802 |H | Short_Literal 0x2
0c93 00da | | Load_Top At_Offset_2
0c94 01d6 | | Execute Vector,Field_Write
0c95 600e |` | Indirect_Literal Discrete,0xca4,{0x00000000, 0x0000811d}
0c96 e005 | | Load 0x0,0x5
0c97 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c98 00db | | Load_Top At_Offset_3
0c99 a5fa | | Store_Unchecked 0x2,-0x6
0c9a 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0c9b TRAP_0c00:
0c9b 0007 | | Action Break_Optional
0c9c 0092 1ec5 | | Action Push_String_Extended,0x1ec5 ; "Register"
0c9e e007 | | Load 0x0,0x7
0c9f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ca0 a5fa | | Store_Unchecked 0x2,-0x6
0ca1 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0ca2 0000 0000 | | .XXX[0x2]
0ca4 0000 0000 | | .LITERAL {0x00000000, 0x0000811d}
0ca8 ; --------------------------------------------------------------------------------------
0ca8 ; SUBPROGRAM
0ca8 ; --------------------------------------------------------------------------------------
0ca8 0cc2 | | .CONST 0x0cc2 ; Address of begin
0ca9 0e0b | | .CONST 0x0e0b ; Address of exception handler
0caa 0006 | | .CONST 0x0006 ; Number of locals
0cab INIT_0ca8:
0cab e001 | | Load 0x0,0x1
0cac 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0cad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cae 02c7 | | Declare_Variable Any
0caf 00d8 | | Load_Top At_Offset_0
0cb0 1c00 | | Execute_Immediate Run_Utility,0x0
0cb1 e005 | | Load 0x0,0x5
0cb2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cb3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0cb4 e001 | | Load 0x0,0x1
0cb5 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0cb6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cb7 02c7 | | Declare_Variable Any
0cb8 00d8 | | Load_Top At_Offset_0
0cb9 1c00 | | Execute_Immediate Run_Utility,0x0
0cba 00e1 | | Load_Encached Boolean_Cache
0cbb 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0cbc e001 | | Load 0x0,0x1
0cbd 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0cbe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cbf 02c7 | | Declare_Variable Any
0cc0 00d8 | | Load_Top At_Offset_0
0cc1 1c00 | | Execute_Immediate Run_Utility,0x0
0cc2 BODY_0ca8:
0cc2 e5fa | | Load 0x2,-0x6
0cc3 0092 1ec6 | | Action Push_String_Extended,0x1ec6 ; "Add_Secondary_Unit"
0cc5 8265 | e | Call 0x1,0x65
0cc6 e005 | | Load 0x0,0x5
0cc7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cc8 00db | | Load_Top At_Offset_3
0cc9 e5fa | | Load 0x2,-0x6
0cca 617d |a} | Indirect_Literal Discrete,0xe48,{0x00000000, 0x00008164}
0ccb e5fe | | Load 0x2,-0x2
0ccc e5ff | | Load 0x2,-0x1
0ccd 8266 | f | Call 0x1,0x66
0cce c404 | | Store 0x2,0x4
0ccf c403 | | Store 0x2,0x3
0cd0 00db | | Load_Top At_Offset_3
0cd1 6803 |h | Jump_Zero 0xcd5
0cd2 00db | | Load_Top At_Offset_3
0cd3 a5f9 | | Store_Unchecked 0x2,-0x7
0cd4 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0cd5 e5ff | | Load 0x2,-0x1
0cd6 0227 | ' | Execute Access,All_Reference
0cd7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0cd8 e5fd | | Load 0x2,-0x3
0cd9 e002 | | Load 0x0,0x2
0cda 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0cdb 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0cdc e001 | | Load 0x0,0x1
0cdd 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0cde 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0cdf c406 | | Store 0x2,0x6
0ce0 00d8 | | Load_Top At_Offset_0
0ce1 e001 | | Load 0x0,0x1
0ce2 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0ce3 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ce4 6866 |hf | Jump_Zero 0xd4b
0ce5 00db | | Load_Top At_Offset_3
0ce6 4802 |H | Short_Literal 0x2
0ce7 e5ff | | Load 0x2,-0x1
0ce8 0227 | ' | Execute Access,All_Reference
0ce9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0cea e5fd | | Load 0x2,-0x3
0ceb e001 | | Load 0x0,0x1
0cec 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0ced 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0cee c403 | | Store 0x2,0x3
0cef 00db | | Load_Top At_Offset_3
0cf0 6825 |h% | Jump_Zero 0xd16
0cf1 e5fa | | Load 0x2,-0x6
0cf2 4801 |H | Short_Literal 0x1
0cf3 4802 |H | Short_Literal 0x2
0cf4 e004 | | Load 0x0,0x4
0cf5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cf6 0334 | 4 | Declare_Variable Array,With_Constraint
0cf7 e5fd | | Load 0x2,-0x3
0cf8 e006 | | Load 0x0,0x6
0cf9 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0cfa e004 | | Load 0x0,0x4
0cfb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0cfc 0119 | | Execute Any,Check_In_Formal_Type
0cfd 4801 |H | Short_Literal 0x1
0cfe 00da | | Load_Top At_Offset_2
0cff 01d6 | | Execute Vector,Field_Write
0d00 e5ff | | Load 0x2,-0x1
0d01 0227 | ' | Execute Access,All_Reference
0d02 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0d03 e001 | | Load 0x0,0x1
0d04 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0d05 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0d06 e004 | | Load 0x0,0x4
0d07 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d08 0119 | | Execute Any,Check_In_Formal_Type
0d09 4802 |H | Short_Literal 0x2
0d0a 00da | | Load_Top At_Offset_2
0d0b 01d6 | | Execute Vector,Field_Write
0d0c 6797 |g | Indirect_Literal Discrete,0xca4,{0x00000000, 0x0000811d}
0d0d e005 | | Load 0x0,0x5
0d0e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d0f e004 | | Load 0x0,0x4
0d10 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0d11 6136 |a6 | Indirect_Literal Discrete,0xe48,{0x00000000, 0x00008164}
0d12 e005 | | Load 0x0,0x5
0d13 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d14 a5f9 | | Store_Unchecked 0x2,-0x7
0d15 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0d16 e5ff | | Load 0x2,-0x1
0d17 0227 | ' | Execute Access,All_Reference
0d18 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0d19 e5fd | | Load 0x2,-0x3
0d1a e002 | | Load 0x0,0x2
0d1b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0d1c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0d1d e001 | | Load 0x0,0x1
0d1e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0d1f 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0d20 c406 | | Store 0x2,0x6
0d21 00d8 | | Load_Top At_Offset_0
0d22 e001 | | Load 0x0,0x1
0d23 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0d24 180f | | Execute Package,Field_Execute,Field_Number 0xf
0d25 6856 |hV | Jump_Zero 0xd7c
0d26 e5fa | | Load 0x2,-0x6
0d27 4801 |H | Short_Literal 0x1
0d28 4802 |H | Short_Literal 0x2
0d29 e004 | | Load 0x0,0x4
0d2a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d2b 0334 | 4 | Declare_Variable Array,With_Constraint
0d2c e5fd | | Load 0x2,-0x3
0d2d e006 | | Load 0x0,0x6
0d2e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0d2f e004 | | Load 0x0,0x4
0d30 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d31 0119 | | Execute Any,Check_In_Formal_Type
0d32 4801 |H | Short_Literal 0x1
0d33 00da | | Load_Top At_Offset_2
0d34 01d6 | | Execute Vector,Field_Write
0d35 e5ff | | Load 0x2,-0x1
0d36 0227 | ' | Execute Access,All_Reference
0d37 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0d38 e001 | | Load 0x0,0x1
0d39 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0d3a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0d3b e004 | | Load 0x0,0x4
0d3c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d3d 0119 | | Execute Any,Check_In_Formal_Type
0d3e 4802 |H | Short_Literal 0x2
0d3f 00da | | Load_Top At_Offset_2
0d40 01d6 | | Execute Vector,Field_Write
0d41 6762 |gb | Indirect_Literal Discrete,0xca4,{0x00000000, 0x0000811d}
0d42 e005 | | Load 0x0,0x5
0d43 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d44 e004 | | Load 0x0,0x4
0d45 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0d46 6101 |a | Indirect_Literal Discrete,0xe48,{0x00000000, 0x00008164}
0d47 e005 | | Load 0x0,0x5
0d48 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d49 a5f9 | | Store_Unchecked 0x2,-0x7
0d4a 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0d4b 00d8 | | Load_Top At_Offset_0
0d4c e001 | | Load 0x0,0x1
0d4d 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0d4e 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0d4f 682c |h, | Jump_Zero 0xd7c
0d50 00d8 | | Load_Top At_Offset_0
0d51 e001 | | Load 0x0,0x1
0d52 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0d53 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0d54 c402 | | Store 0x2,0x2
0d55 e402 | | Load 0x2,0x2
0d56 e001 | | Load 0x0,0x1
0d57 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0d58 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0d59 00db | | Load_Top At_Offset_3
0d5a e001 | | Load 0x0,0x1
0d5b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0d5c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0d5d 01df | | Execute Vector,Equal
0d5e 6803 |h | Jump_Zero 0xd62
0d5f 4801 |H | Short_Literal 0x1
0d60 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0d61 781a |x | Jump 0xd7c
0d62 e5fa | | Load 0x2,-0x6
0d63 4801 |H | Short_Literal 0x1
0d64 4801 |H | Short_Literal 0x1
0d65 e004 | | Load 0x0,0x4
0d66 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d67 0334 | 4 | Declare_Variable Array,With_Constraint
0d68 e402 | | Load 0x2,0x2
0d69 e001 | | Load 0x0,0x1
0d6a 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0d6b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d6c e004 | | Load 0x0,0x4
0d6d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d6e 0119 | | Execute Any,Check_In_Formal_Type
0d6f 4801 |H | Short_Literal 0x1
0d70 00da | | Load_Top At_Offset_2
0d71 01d6 | | Execute Vector,Field_Write
0d72 60d1 |` | Indirect_Literal Discrete,0xe44,{0x00000000, 0x00008170}
0d73 e005 | | Load 0x0,0x5
0d74 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d75 e004 | | Load 0x0,0x4
0d76 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0d77 60d0 |` | Indirect_Literal Discrete,0xe48,{0x00000000, 0x00008164}
0d78 e005 | | Load 0x0,0x5
0d79 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d7a a5f9 | | Store_Unchecked 0x2,-0x7
0d7b 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0d7c e5fc | | Load 0x2,-0x4
0d7d 01db | | Execute Vector,Length
0d7e e5fb | | Load 0x2,-0x5
0d7f 01db | | Execute Vector,Length
0d80 0273 | s | Execute Discrete,Plus
0d81 4900 |I | Short_Literal 0x100
0d82 027d | } | Execute Discrete,Greater
0d83 6822 |h" | Jump_Zero 0xda6
0d84 e5fa | | Load 0x2,-0x6
0d85 4801 |H | Short_Literal 0x1
0d86 4802 |H | Short_Literal 0x2
0d87 e004 | | Load 0x0,0x4
0d88 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d89 0334 | 4 | Declare_Variable Array,With_Constraint
0d8a e5fd | | Load 0x2,-0x3
0d8b e006 | | Load 0x0,0x6
0d8c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0d8d e004 | | Load 0x0,0x4
0d8e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d8f 0119 | | Execute Any,Check_In_Formal_Type
0d90 4801 |H | Short_Literal 0x1
0d91 00da | | Load_Top At_Offset_2
0d92 01d6 | | Execute Vector,Field_Write
0d93 4900 |I | Short_Literal 0x100
0d94 e004 | | Load 0x0,0x4
0d95 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d96 e004 | | Load 0x0,0x4
0d97 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d98 0119 | | Execute Any,Check_In_Formal_Type
0d99 4802 |H | Short_Literal 0x2
0d9a 00da | | Load_Top At_Offset_2
0d9b 01d6 | | Execute Vector,Field_Write
0d9c 60a3 |` | Indirect_Literal Discrete,0xe40,{0x00000000, 0x00008163}
0d9d e005 | | Load 0x0,0x5
0d9e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d9f e004 | | Load 0x0,0x4
0da0 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0da1 60a6 |` | Indirect_Literal Discrete,0xe48,{0x00000000, 0x00008164}
0da2 e005 | | Load 0x0,0x5
0da3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0da4 a5f9 | | Store_Unchecked 0x2,-0x7
0da5 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0da6 00d9 | | Load_Top At_Offset_1
0da7 6834 |h4 | Jump_Zero 0xddc
0da8 e5fc | | Load 0x2,-0x4
0da9 00d9 | | Load_Top At_Offset_1
0daa 8017 | | Call 0x0,0x17
0dab e5fb | | Load 0x2,-0x5
0dac 00d9 | | Load_Top At_Offset_1
0dad 8018 | | Call 0x0,0x18
0dae e5fa | | Load 0x2,-0x6
0daf 4801 |H | Short_Literal 0x1
0db0 4804 |H | Short_Literal 0x4
0db1 e004 | | Load 0x0,0x4
0db2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0db3 0334 | 4 | Declare_Variable Array,With_Constraint
0db4 e5fd | | Load 0x2,-0x3
0db5 e006 | | Load 0x0,0x6
0db6 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0db7 e004 | | Load 0x0,0x4
0db8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0db9 0119 | | Execute Any,Check_In_Formal_Type
0dba 4801 |H | Short_Literal 0x1
0dbb 00da | | Load_Top At_Offset_2
0dbc 01d6 | | Execute Vector,Field_Write
0dbd e5fe | | Load 0x2,-0x2
0dbe e006 | | Load 0x0,0x6
0dbf 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0dc0 e004 | | Load 0x0,0x4
0dc1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0dc2 0119 | | Execute Any,Check_In_Formal_Type
0dc3 4802 |H | Short_Literal 0x2
0dc4 00da | | Load_Top At_Offset_2
0dc5 01d6 | | Execute Vector,Field_Write
0dc6 e5fc | | Load 0x2,-0x4
0dc7 e004 | | Load 0x0,0x4
0dc8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0dc9 e004 | | Load 0x0,0x4
0dca 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0dcb 0119 | | Execute Any,Check_In_Formal_Type
0dcc 4803 |H | Short_Literal 0x3
0dcd 00da | | Load_Top At_Offset_2
0dce 01d6 | | Execute Vector,Field_Write
0dcf e5fb | | Load 0x2,-0x5
0dd0 e004 | | Load 0x0,0x4
0dd1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0dd2 e004 | | Load 0x0,0x4
0dd3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0dd4 0119 | | Execute Any,Check_In_Formal_Type
0dd5 4804 |H | Short_Literal 0x4
0dd6 00da | | Load_Top At_Offset_2
0dd7 01d6 | | Execute Vector,Field_Write
0dd8 6063 |`c | Indirect_Literal Discrete,0xe3c,{0x00000000, 0x00008186}
0dd9 e005 | | Load 0x0,0x5
0dda 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0ddb 782c |x, | Jump 0xe08
0ddc 00db | | Load_Top At_Offset_3
0ddd 00d9 | | Load_Top At_Offset_1
0dde e404 | | Load 0x2,0x4
0ddf e001 | | Load 0x0,0x1
0de0 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0de1 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
0de2 c403 | | Store 0x2,0x3
0de3 00db | | Load_Top At_Offset_3
0de4 7023 |p# | Jump_Nonzero 0xe08
0de5 e5fc | | Load 0x2,-0x4
0de6 00d9 | | Load_Top At_Offset_1
0de7 8017 | | Call 0x0,0x17
0de8 e5fb | | Load 0x2,-0x5
0de9 00d9 | | Load_Top At_Offset_1
0dea 8018 | | Call 0x0,0x18
0deb e5fa | | Load 0x2,-0x6
0dec 0092 1ec7 | | Action Push_String_Extended,0x1ec7 ; "Added "
0dee e5fd | | Load 0x2,-0x3
0def e006 | | Load 0x0,0x6
0df0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0df1 01cc | | Execute Vector,Catenate
0df2 0092 1ec8 | | Action Push_String_Extended,0x1ec8 ; " as the secondary of unit "
0df4 01cc | | Execute Vector,Catenate
0df5 e5fe | | Load 0x2,-0x2
0df6 e006 | | Load 0x0,0x6
0df7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0df8 01cc | | Execute Vector,Catenate
0df9 0092 1ec9 | | Action Push_String_Extended,0x1ec9 ; ". Prefix = \x22"
0dfb 01cc | | Execute Vector,Catenate
0dfc e5fc | | Load 0x2,-0x4
0dfd 01cc | | Execute Vector,Catenate
0dfe 0092 1eca | | Action Push_String_Extended,0x1eca ; "\x22, Suffix = \x22"
0e00 01cc | | Execute Vector,Catenate
0e01 e5fb | | Load 0x2,-0x5
0e02 01cc | | Execute Vector,Catenate
0e03 0092 1eb5 | | Action Push_String_Extended,0x1eb5 ; "\x22"
0e05 01cc | | Execute Vector,Catenate
0e06 e007 | | Load 0x0,0x7
0e07 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e08 00db | | Load_Top At_Offset_3
0e09 a5f9 | | Store_Unchecked 0x2,-0x7
0e0a 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0e0b TRAP_0ca8:
0e0b e005 | | Load 0x0,0x5
0e0c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0e0d 010f | | Execute Exception,Equal
0e0e 681f |h | Jump_Zero 0xe2e
0e0f e005 | | Load 0x0,0x5
0e10 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0e11 a5f9 | | Store_Unchecked 0x2,-0x7
0e12 e5fa | | Load 0x2,-0x6
0e13 4801 |H | Short_Literal 0x1
0e14 4802 |H | Short_Literal 0x2
0e15 e004 | | Load 0x0,0x4
0e16 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e17 0334 | 4 | Declare_Variable Array,With_Constraint
0e18 e5fe | | Load 0x2,-0x2
0e19 e006 | | Load 0x0,0x6
0e1a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0e1b e004 | | Load 0x0,0x4
0e1c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0e1d 0119 | | Execute Any,Check_In_Formal_Type
0e1e 4801 |H | Short_Literal 0x1
0e1f 00da | | Load_Top At_Offset_2
0e20 01d6 | | Execute Vector,Field_Write
0e21 e5fd | | Load 0x2,-0x3
0e22 e006 | | Load 0x0,0x6
0e23 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0e24 e004 | | Load 0x0,0x4
0e25 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0e26 0119 | | Execute Any,Check_In_Formal_Type
0e27 4802 |H | Short_Literal 0x2
0e28 00da | | Load_Top At_Offset_2
0e29 01d6 | | Execute Vector,Field_Write
0e2a 601d |` | Indirect_Literal Discrete,0xe48,{0x00000000, 0x00008164}
0e2b e005 | | Load 0x0,0x5
0e2c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0e2d 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0e2e e5fa | | Load 0x2,-0x6
0e2f 0092 1ecb | | Action Push_String_Extended,0x1ecb ; "Target_Builder.Unit.Add_Secondary_Unit"
0e31 e007 | | Load 0x0,0x7
0e32 180f | | Execute Package,Field_Execute,Field_Number 0xf
0e33 e004 | | Load 0x0,0x4
0e34 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0e35 6012 |` | Indirect_Literal Discrete,0xe48,{0x00000000, 0x00008164}
0e36 e005 | | Load 0x0,0x5
0e37 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e38 a5f9 | | Store_Unchecked 0x2,-0x7
0e39 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0e3a 0000 0000 | | .XXX[0x2]
0e3c 0000 0000 | | .LITERAL {0x00000000, 0x00008186}
0e40 0000 0000 | | .LITERAL {0x00000000, 0x00008163}
0e44 0000 0000 | | .LITERAL {0x00000000, 0x00008170}
0e48 0000 0000 | | .LITERAL {0x00000000, 0x00008164}
0e4c 0000 0000 | | .BLANK 0000[0x4]
0e50 ; --------------------------------------------------------------------------------------
0e50 ; SUBPROGRAM
0e50 ; --------------------------------------------------------------------------------------
0e50 0e62 | b | .CONST 0x0e62 ; Address of begin
0e51 0edd | | .CONST 0x0edd ; Address of exception handler
0e52 0004 | | .CONST 0x0004 ; Number of locals
0e53 INIT_0e50:
0e53 e005 | | Load 0x0,0x5
0e54 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e55 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0e56 e001 | | Load 0x0,0x1
0e57 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0e58 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e59 02c7 | | Declare_Variable Any
0e5a 00d8 | | Load_Top At_Offset_0
0e5b 1c00 | | Execute_Immediate Run_Utility,0x0
0e5c e001 | | Load 0x0,0x1
0e5d 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0e5e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e5f 02c7 | | Declare_Variable Any
0e60 00d8 | | Load_Top At_Offset_0
0e61 1c00 | | Execute_Immediate Run_Utility,0x0
0e62 BODY_0e50:
0e62 e5fc | | Load 0x2,-0x4
0e63 0092 1ecc | | Action Push_String_Extended,0x1ecc ; "Remove_Secondary_Unit (Primary)"
0e65 8265 | e | Call 0x1,0x65
0e66 e005 | | Load 0x0,0x5
0e67 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e68 00da | | Load_Top At_Offset_2
0e69 e5fc | | Load 0x2,-0x4
0e6a 60a5 |` | Indirect_Literal Discrete,0xf10,{0x00000000, 0x00008169}
0e6b e5fe | | Load 0x2,-0x2
0e6c e5ff | | Load 0x2,-0x1
0e6d 8266 | f | Call 0x1,0x66
0e6e c403 | | Store 0x2,0x3
0e6f 005b | [ | Store_Top Discrete,At_Offset_3
0e70 00da | | Load_Top At_Offset_2
0e71 6803 |h | Jump_Zero 0xe75
0e72 00da | | Load_Top At_Offset_2
0e73 a5fb | | Store_Unchecked 0x2,-0x5
0e74 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e75 e5fc | | Load 0x2,-0x4
0e76 0092 1ecd | | Action Push_String_Extended,0x1ecd ; "Remove_Secondary_Unit (Secondary)"
0e78 8265 | e | Call 0x1,0x65
0e79 e005 | | Load 0x0,0x5
0e7a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e7b 00d9 | | Load_Top At_Offset_1
0e7c e5fc | | Load 0x2,-0x4
0e7d 6092 |` | Indirect_Literal Discrete,0xf10,{0x00000000, 0x00008169}
0e7e e5fd | | Load 0x2,-0x3
0e7f e5ff | | Load 0x2,-0x1
0e80 8266 | f | Call 0x1,0x66
0e81 c404 | | Store 0x2,0x4
0e82 005b | [ | Store_Top Discrete,At_Offset_3
0e83 00da | | Load_Top At_Offset_2
0e84 6803 |h | Jump_Zero 0xe88
0e85 00da | | Load_Top At_Offset_2
0e86 a5fb | | Store_Unchecked 0x2,-0x5
0e87 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e88 00d9 | | Load_Top At_Offset_1
0e89 e001 | | Load 0x0,0x1
0e8a 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0e8b 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0e8c 682e |h. | Jump_Zero 0xebb
0e8d 00d8 | | Load_Top At_Offset_0
0e8e e001 | | Load 0x0,0x1
0e8f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0e90 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0e91 6829 |h) | Jump_Zero 0xebb
0e92 00da | | Load_Top At_Offset_2
0e93 00d9 | | Load_Top At_Offset_1
0e94 00db | | Load_Top At_Offset_3
0e95 e001 | | Load 0x0,0x1
0e96 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0e97 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0e98 005b | [ | Store_Top Discrete,At_Offset_3
0e99 00da | | Load_Top At_Offset_2
0e9a 701d |p | Jump_Nonzero 0xeb8
0e9b 00d8 | | Load_Top At_Offset_0
0e9c 8019 | | Call 0x0,0x19
0e9d 00da | | Load_Top At_Offset_2
0e9e e5ff | | Load 0x2,-0x1
0e9f 0227 | ' | Execute Access,All_Reference
0ea0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ea1 00da | | Load_Top At_Offset_2
0ea2 e001 | | Load 0x0,0x1
0ea3 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0ea4 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0ea5 005b | [ | Store_Top Discrete,At_Offset_3
0ea6 00da | | Load_Top At_Offset_2
0ea7 7010 |p | Jump_Nonzero 0xeb8
0ea8 e5fc | | Load 0x2,-0x4
0ea9 0092 1ece | | Action Push_String_Extended,0x1ece ; "Removed "
0eab e5fd | | Load 0x2,-0x3
0eac e006 | | Load 0x0,0x6
0ead 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0eae 01cc | | Execute Vector,Catenate
0eaf 0092 1ec8 | | Action Push_String_Extended,0x1ec8 ; " as the secondary of unit "
0eb1 01cc | | Execute Vector,Catenate
0eb2 e5fe | | Load 0x2,-0x2
0eb3 e006 | | Load 0x0,0x6
0eb4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0eb5 01cc | | Execute Vector,Catenate
0eb6 e007 | | Load 0x0,0x7
0eb7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0eb8 00da | | Load_Top At_Offset_2
0eb9 a5fb | | Store_Unchecked 0x2,-0x5
0eba 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0ebb e5fc | | Load 0x2,-0x4
0ebc 4801 |H | Short_Literal 0x1
0ebd 4802 |H | Short_Literal 0x2
0ebe e004 | | Load 0x0,0x4
0ebf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ec0 0334 | 4 | Declare_Variable Array,With_Constraint
0ec1 e5fd | | Load 0x2,-0x3
0ec2 e006 | | Load 0x0,0x6
0ec3 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0ec4 e004 | | Load 0x0,0x4
0ec5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ec6 0119 | | Execute Any,Check_In_Formal_Type
0ec7 4801 |H | Short_Literal 0x1
0ec8 00da | | Load_Top At_Offset_2
0ec9 01d6 | | Execute Vector,Field_Write
0eca e5fe | | Load 0x2,-0x2
0ecb e006 | | Load 0x0,0x6
0ecc 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0ecd e004 | | Load 0x0,0x4
0ece 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ecf 0119 | | Execute Any,Check_In_Formal_Type
0ed0 4802 |H | Short_Literal 0x2
0ed1 00da | | Load_Top At_Offset_2
0ed2 01d6 | | Execute Vector,Field_Write
0ed3 6038 |`8 | Indirect_Literal Discrete,0xf0c,{0x00000000, 0x00008187}
0ed4 e005 | | Load 0x0,0x5
0ed5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0ed6 e004 | | Load 0x0,0x4
0ed7 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0ed8 6037 |`7 | Indirect_Literal Discrete,0xf10,{0x00000000, 0x00008169}
0ed9 e005 | | Load 0x0,0x5
0eda 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0edb a5fb | | Store_Unchecked 0x2,-0x5
0edc 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0edd TRAP_0e50:
0edd e005 | | Load 0x0,0x5
0ede 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0edf 010f | | Execute Exception,Equal
0ee0 681f |h | Jump_Zero 0xf00
0ee1 e005 | | Load 0x0,0x5
0ee2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ee3 a5fb | | Store_Unchecked 0x2,-0x5
0ee4 e5fc | | Load 0x2,-0x4
0ee5 4801 |H | Short_Literal 0x1
0ee6 4802 |H | Short_Literal 0x2
0ee7 e004 | | Load 0x0,0x4
0ee8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ee9 0334 | 4 | Declare_Variable Array,With_Constraint
0eea e5fd | | Load 0x2,-0x3
0eeb e006 | | Load 0x0,0x6
0eec 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0eed e004 | | Load 0x0,0x4
0eee 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0eef 0119 | | Execute Any,Check_In_Formal_Type
0ef0 4801 |H | Short_Literal 0x1
0ef1 00da | | Load_Top At_Offset_2
0ef2 01d6 | | Execute Vector,Field_Write
0ef3 e5fe | | Load 0x2,-0x2
0ef4 e006 | | Load 0x0,0x6
0ef5 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0ef6 e004 | | Load 0x0,0x4
0ef7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ef8 0119 | | Execute Any,Check_In_Formal_Type
0ef9 4802 |H | Short_Literal 0x2
0efa 00da | | Load_Top At_Offset_2
0efb 01d6 | | Execute Vector,Field_Write
0efc 6013 |` | Indirect_Literal Discrete,0xf10,{0x00000000, 0x00008169}
0efd e005 | | Load 0x0,0x5
0efe 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0eff 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0f00 e5fc | | Load 0x2,-0x4
0f01 0092 1ecf | | Action Push_String_Extended,0x1ecf ; "Target_Builder.Unit.Remove_Secondary_Unit"
0f03 e007 | | Load 0x0,0x7
0f04 180f | | Execute Package,Field_Execute,Field_Number 0xf
0f05 e004 | | Load 0x0,0x4
0f06 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0f07 6008 |` | Indirect_Literal Discrete,0xf10,{0x00000000, 0x00008169}
0f08 e005 | | Load 0x0,0x5
0f09 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f0a a5fb | | Store_Unchecked 0x2,-0x5
0f0b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0f0c 0000 0000 | | .LITERAL {0x00000000, 0x00008187}
0f10 0000 0000 | | .LITERAL {0x00000000, 0x00008169}
0f14 0000 0000 | | .BLANK 0000[0x4]
0f18 ; --------------------------------------------------------------------------------------
0f18 ; SUBPROGRAM
0f18 ; --------------------------------------------------------------------------------------
0f18 0f24 | $ | .CONST 0x0f24 ; Address of begin
0f19 0f41 | A | .CONST 0x0f41 ; Address of exception handler
0f1a 0003 | | .CONST 0x0003 ; Number of locals
0f1b INIT_0f18:
0f1b e005 | | Load 0x0,0x5
0f1c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f1d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0f1e e001 | | Load 0x0,0x1
0f1f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0f20 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f21 02c7 | | Declare_Variable Any
0f22 00d8 | | Load_Top At_Offset_0
0f23 1c00 | | Execute_Immediate Run_Utility,0x0
0f24 BODY_0f18:
0f24 e5fd | | Load 0x2,-0x3
0f25 0092 1ed0 | | Action Push_String_Extended,0x1ed0 ; "Has_Secondary_Unit"
0f27 8265 | e | Call 0x1,0x65
0f28 e005 | | Load 0x0,0x5
0f29 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f2a 00d9 | | Load_Top At_Offset_1
0f2b e5fd | | Load 0x2,-0x3
0f2c 604b |`K | Indirect_Literal Discrete,0xf78,{0x00000000, 0x00008166}
0f2d e5fe | | Load 0x2,-0x2
0f2e e5ff | | Load 0x2,-0x1
0f2f 8266 | f | Call 0x1,0x66
0f30 c403 | | Store 0x2,0x3
0f31 005a | Z | Store_Top Discrete,At_Offset_2
0f32 00d9 | | Load_Top At_Offset_1
0f33 6805 |h | Jump_Zero 0xf39
0f34 4800 |H | Short_Literal 0x0
0f35 a5fc | | Store_Unchecked 0x2,-0x4
0f36 00d9 | | Load_Top At_Offset_1
0f37 a5fb | | Store_Unchecked 0x2,-0x5
0f38 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f39 00d8 | | Load_Top At_Offset_0
0f3a e001 | | Load 0x0,0x1
0f3b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0f3c 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0f3d a5fc | | Store_Unchecked 0x2,-0x4
0f3e 00d9 | | Load_Top At_Offset_1
0f3f a5fb | | Store_Unchecked 0x2,-0x5
0f40 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f41 TRAP_0f18:
0f41 e005 | | Load 0x0,0x5
0f42 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0f43 010f | | Execute Exception,Equal
0f44 6818 |h | Jump_Zero 0xf5d
0f45 e005 | | Load 0x0,0x5
0f46 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0f47 a5fb | | Store_Unchecked 0x2,-0x5
0f48 e5fd | | Load 0x2,-0x3
0f49 4801 |H | Short_Literal 0x1
0f4a 4801 |H | Short_Literal 0x1
0f4b e004 | | Load 0x0,0x4
0f4c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f4d 0334 | 4 | Declare_Variable Array,With_Constraint
0f4e e5fe | | Load 0x2,-0x2
0f4f e006 | | Load 0x0,0x6
0f50 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0f51 e004 | | Load 0x0,0x4
0f52 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f53 0119 | | Execute Any,Check_In_Formal_Type
0f54 4801 |H | Short_Literal 0x1
0f55 00da | | Load_Top At_Offset_2
0f56 01d6 | | Execute Vector,Field_Write
0f57 6020 |` | Indirect_Literal Discrete,0xf78,{0x00000000, 0x00008166}
0f58 e005 | | Load 0x0,0x5
0f59 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0f5a 4800 |H | Short_Literal 0x0
0f5b a5fc | | Store_Unchecked 0x2,-0x4
0f5c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f5d e5fd | | Load 0x2,-0x3
0f5e 0092 1ed1 | | Action Push_String_Extended,0x1ed1 ; "Target_Builder.Unit.Has_Secondary_Unit"
0f60 e007 | | Load 0x0,0x7
0f61 180f | | Execute Package,Field_Execute,Field_Number 0xf
0f62 4800 |H | Short_Literal 0x0
0f63 a5fc | | Store_Unchecked 0x2,-0x4
0f64 4801 |H | Short_Literal 0x1
0f65 4801 |H | Short_Literal 0x1
0f66 e004 | | Load 0x0,0x4
0f67 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f68 0334 | 4 | Declare_Variable Array,With_Constraint
0f69 e5fe | | Load 0x2,-0x2
0f6a e006 | | Load 0x0,0x6
0f6b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0f6c e004 | | Load 0x0,0x4
0f6d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f6e 0119 | | Execute Any,Check_In_Formal_Type
0f6f 4801 |H | Short_Literal 0x1
0f70 00da | | Load_Top At_Offset_2
0f71 01d6 | | Execute Vector,Field_Write
0f72 6005 |` | Indirect_Literal Discrete,0xf78,{0x00000000, 0x00008166}
0f73 e005 | | Load 0x0,0x5
0f74 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f75 a5fb | | Store_Unchecked 0x2,-0x5
0f76 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f77 0000 | | .XXX[0x1]
0f78 0000 0000 | | .LITERAL {0x00000000, 0x00008166}
0f7c 0000 0000 | | .BLANK 0000[0x4]
0f80 ; --------------------------------------------------------------------------------------
0f80 ; SUBPROGRAM
0f80 ; --------------------------------------------------------------------------------------
0f80 0f8c | | .CONST 0x0f8c ; Address of begin
0f81 0fa9 | | .CONST 0x0fa9 ; Address of exception handler
0f82 0003 | | .CONST 0x0003 ; Number of locals
0f83 INIT_0f80:
0f83 e005 | | Load 0x0,0x5
0f84 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f85 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0f86 e001 | | Load 0x0,0x1
0f87 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0f88 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f89 02c7 | | Declare_Variable Any
0f8a 00d8 | | Load_Top At_Offset_0
0f8b 1c00 | | Execute_Immediate Run_Utility,0x0
0f8c BODY_0f80:
0f8c e5fd | | Load 0x2,-0x3
0f8d 0092 1ed2 | | Action Push_String_Extended,0x1ed2 ; "Is_Secondary_Unit"
0f8f 8265 | e | Call 0x1,0x65
0f90 e005 | | Load 0x0,0x5
0f91 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f92 00d9 | | Load_Top At_Offset_1
0f93 e5fd | | Load 0x2,-0x3
0f94 67e3 |g | Indirect_Literal Discrete,0xf78,{0x00000000, 0x00008166}
0f95 e5fe | | Load 0x2,-0x2
0f96 e5ff | | Load 0x2,-0x1
0f97 8266 | f | Call 0x1,0x66
0f98 c403 | | Store 0x2,0x3
0f99 005a | Z | Store_Top Discrete,At_Offset_2
0f9a 00d9 | | Load_Top At_Offset_1
0f9b 6805 |h | Jump_Zero 0xfa1
0f9c 4800 |H | Short_Literal 0x0
0f9d a5fc | | Store_Unchecked 0x2,-0x4
0f9e 00d9 | | Load_Top At_Offset_1
0f9f a5fb | | Store_Unchecked 0x2,-0x5
0fa0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0fa1 00d8 | | Load_Top At_Offset_0
0fa2 e001 | | Load 0x0,0x1
0fa3 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0fa4 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0fa5 a5fc | | Store_Unchecked 0x2,-0x4
0fa6 00d9 | | Load_Top At_Offset_1
0fa7 a5fb | | Store_Unchecked 0x2,-0x5
0fa8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0fa9 TRAP_0f80:
0fa9 e005 | | Load 0x0,0x5
0faa 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0fab 010f | | Execute Exception,Equal
0fac 6818 |h | Jump_Zero 0xfc5
0fad e005 | | Load 0x0,0x5
0fae 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0faf a5fb | | Store_Unchecked 0x2,-0x5
0fb0 e5fd | | Load 0x2,-0x3
0fb1 4801 |H | Short_Literal 0x1
0fb2 4801 |H | Short_Literal 0x1
0fb3 e004 | | Load 0x0,0x4
0fb4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0fb5 0334 | 4 | Declare_Variable Array,With_Constraint
0fb6 e5fe | | Load 0x2,-0x2
0fb7 e006 | | Load 0x0,0x6
0fb8 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0fb9 e004 | | Load 0x0,0x4
0fba 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fbb 0119 | | Execute Any,Check_In_Formal_Type
0fbc 4801 |H | Short_Literal 0x1
0fbd 00da | | Load_Top At_Offset_2
0fbe 01d6 | | Execute Vector,Field_Write
0fbf 67b8 |g | Indirect_Literal Discrete,0xf78,{0x00000000, 0x00008166}
0fc0 e005 | | Load 0x0,0x5
0fc1 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0fc2 4800 |H | Short_Literal 0x0
0fc3 a5fc | | Store_Unchecked 0x2,-0x4
0fc4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0fc5 e5fd | | Load 0x2,-0x3
0fc6 0092 1ed3 | | Action Push_String_Extended,0x1ed3 ; "Target_Builder.Unit.Is_Secondary_Unit"
0fc8 e007 | | Load 0x0,0x7
0fc9 180f | | Execute Package,Field_Execute,Field_Number 0xf
0fca 4800 |H | Short_Literal 0x0
0fcb a5fc | | Store_Unchecked 0x2,-0x4
0fcc 4801 |H | Short_Literal 0x1
0fcd 4801 |H | Short_Literal 0x1
0fce e004 | | Load 0x0,0x4
0fcf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0fd0 0334 | 4 | Declare_Variable Array,With_Constraint
0fd1 e5fe | | Load 0x2,-0x2
0fd2 e006 | | Load 0x0,0x6
0fd3 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0fd4 e004 | | Load 0x0,0x4
0fd5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fd6 0119 | | Execute Any,Check_In_Formal_Type
0fd7 4801 |H | Short_Literal 0x1
0fd8 00da | | Load_Top At_Offset_2
0fd9 01d6 | | Execute Vector,Field_Write
0fda 679d |g | Indirect_Literal Discrete,0xf78,{0x00000000, 0x00008166}
0fdb e005 | | Load 0x0,0x5
0fdc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0fdd a5fb | | Store_Unchecked 0x2,-0x5
0fde 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0fdf 0000 | | .XXX[0x1]
0fe0 ; --------------------------------------------------------------------------------------
0fe0 ; SUBPROGRAM
0fe0 ; --------------------------------------------------------------------------------------
0fe0 0ff2 | | .CONST 0x0ff2 ; Address of begin
0fe1 1027 | ' | .CONST 0x1027 ; Address of exception handler
0fe2 0004 | | .CONST 0x0004 ; Number of locals
0fe3 INIT_0fe0:
0fe3 e005 | | Load 0x0,0x5
0fe4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fe5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0fe6 e001 | | Load 0x0,0x1
0fe7 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0fe8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fe9 02c7 | | Declare_Variable Any
0fea 00d8 | | Load_Top At_Offset_0
0feb 1c00 | | Execute_Immediate Run_Utility,0x0
0fec e001 | | Load 0x0,0x1
0fed 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0fee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fef 02c7 | | Declare_Variable Any
0ff0 00d8 | | Load_Top At_Offset_0
0ff1 1c00 | | Execute_Immediate Run_Utility,0x0
0ff2 BODY_0fe0:
0ff2 e5fd | | Load 0x2,-0x3
0ff3 0092 1ed4 | | Action Push_String_Extended,0x1ed4 ; "Primary_Unit"
0ff5 8265 | e | Call 0x1,0x65
0ff6 e005 | | Load 0x0,0x5
0ff7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ff8 00d9 | | Load_Top At_Offset_1
0ff9 e5fd | | Load 0x2,-0x3
0ffa 6065 |`e | Indirect_Literal Discrete,0x1060,{0x00000000, 0x00008165}
0ffb e5fe | | Load 0x2,-0x2
0ffc e5ff | | Load 0x2,-0x1
0ffd 8266 | f | Call 0x1,0x66
0ffe c404 | | Store 0x2,0x4
0fff 005b | [ | Store_Top Discrete,At_Offset_3
1000 00da | | Load_Top At_Offset_2
1001 6806 |h | Jump_Zero 0x1008
1002 e002 | | Load 0x0,0x2
1003 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1004 c5fc | | Store 0x2,-0x4
1005 00da | | Load_Top At_Offset_2
1006 a5fb | | Store_Unchecked 0x2,-0x5
1007 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1008 00d8 | | Load_Top At_Offset_0
1009 e001 | | Load 0x0,0x1
100a 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
100b 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
100c c403 | | Store 0x2,0x3
100d 00d9 | | Load_Top At_Offset_1
100e e001 | | Load 0x0,0x1
100f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1010 180f | | Execute Package,Field_Execute,Field_Number 0xf
1011 700f |p | Jump_Nonzero 0x1021
1012 00da | | Load_Top At_Offset_2
1013 e5fc | | Load 0x2,-0x4
1014 0120 | | Execute Any,Is_Value
1015 6803 |h | Jump_Zero 0x1019
1016 e002 | | Load 0x0,0x2
1017 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1018 7801 |x | Jump 0x101a
1019 e5fc | | Load 0x2,-0x4
101a 00db | | Load_Top At_Offset_3
101b e001 | | Load 0x0,0x1
101c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
101d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
101e c5fc | | Store 0x2,-0x4
101f 005b | [ | Store_Top Discrete,At_Offset_3
1020 7803 |x | Jump 0x1024
1021 e002 | | Load 0x0,0x2
1022 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1023 c5fc | | Store 0x2,-0x4
1024 00da | | Load_Top At_Offset_2
1025 a5fb | | Store_Unchecked 0x2,-0x5
1026 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1027 TRAP_0fe0:
1027 e005 | | Load 0x0,0x5
1028 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1029 010f | | Execute Exception,Equal
102a 6819 |h | Jump_Zero 0x1044
102b e005 | | Load 0x0,0x5
102c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
102d a5fb | | Store_Unchecked 0x2,-0x5
102e e5fd | | Load 0x2,-0x3
102f 4801 |H | Short_Literal 0x1
1030 4801 |H | Short_Literal 0x1
1031 e004 | | Load 0x0,0x4
1032 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1033 0334 | 4 | Declare_Variable Array,With_Constraint
1034 e5fe | | Load 0x2,-0x2
1035 e006 | | Load 0x0,0x6
1036 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1037 e004 | | Load 0x0,0x4
1038 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1039 0119 | | Execute Any,Check_In_Formal_Type
103a 4801 |H | Short_Literal 0x1
103b 00da | | Load_Top At_Offset_2
103c 01d6 | | Execute Vector,Field_Write
103d 6022 |`" | Indirect_Literal Discrete,0x1060,{0x00000000, 0x00008165}
103e e005 | | Load 0x0,0x5
103f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1040 e002 | | Load 0x0,0x2
1041 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1042 c5fc | | Store 0x2,-0x4
1043 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1044 e5fd | | Load 0x2,-0x3
1045 0092 1ed5 | | Action Push_String_Extended,0x1ed5 ; "Target_Builder.Unit.Primary_Unit"
1047 e007 | | Load 0x0,0x7
1048 180f | | Execute Package,Field_Execute,Field_Number 0xf
1049 e002 | | Load 0x0,0x2
104a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
104b c5fc | | Store 0x2,-0x4
104c 4801 |H | Short_Literal 0x1
104d 4801 |H | Short_Literal 0x1
104e e004 | | Load 0x0,0x4
104f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1050 0334 | 4 | Declare_Variable Array,With_Constraint
1051 e5fe | | Load 0x2,-0x2
1052 e006 | | Load 0x0,0x6
1053 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1054 e004 | | Load 0x0,0x4
1055 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1056 0119 | | Execute Any,Check_In_Formal_Type
1057 4801 |H | Short_Literal 0x1
1058 00da | | Load_Top At_Offset_2
1059 01d6 | | Execute Vector,Field_Write
105a 6005 |` | Indirect_Literal Discrete,0x1060,{0x00000000, 0x00008165}
105b e005 | | Load 0x0,0x5
105c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
105d a5fb | | Store_Unchecked 0x2,-0x5
105e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
105f 0000 | | .XXX[0x1]
1060 0000 0000 | | .LITERAL {0x00000000, 0x00008165}
1064 0000 0000 | | .BLANK 0000[0x4]
1068 ; --------------------------------------------------------------------------------------
1068 ; SUBPROGRAM
1068 ; --------------------------------------------------------------------------------------
1068 107a | z | .CONST 0x107a ; Address of begin
1069 10af | | .CONST 0x10af ; Address of exception handler
106a 0004 | | .CONST 0x0004 ; Number of locals
106b INIT_1068:
106b e005 | | Load 0x0,0x5
106c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
106d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
106e e001 | | Load 0x0,0x1
106f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1070 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1071 02c7 | | Declare_Variable Any
1072 00d8 | | Load_Top At_Offset_0
1073 1c00 | | Execute_Immediate Run_Utility,0x0
1074 e001 | | Load 0x0,0x1
1075 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1076 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1077 02c7 | | Declare_Variable Any
1078 00d8 | | Load_Top At_Offset_0
1079 1c00 | | Execute_Immediate Run_Utility,0x0
107a BODY_1068:
107a e5fd | | Load 0x2,-0x3
107b 0092 1ed6 | | Action Push_String_Extended,0x1ed6 ; "Secondary_Unit"
107d 8265 | e | Call 0x1,0x65
107e e005 | | Load 0x0,0x5
107f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1080 00da | | Load_Top At_Offset_2
1081 e5fd | | Load 0x2,-0x3
1082 6065 |`e | Indirect_Literal Discrete,0x10e8,{0x00000000, 0x00008168}
1083 e5fe | | Load 0x2,-0x2
1084 e5ff | | Load 0x2,-0x1
1085 8266 | f | Call 0x1,0x66
1086 c403 | | Store 0x2,0x3
1087 005b | [ | Store_Top Discrete,At_Offset_3
1088 00da | | Load_Top At_Offset_2
1089 6806 |h | Jump_Zero 0x1090
108a e002 | | Load 0x0,0x2
108b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
108c c5fc | | Store 0x2,-0x4
108d 00da | | Load_Top At_Offset_2
108e a5fb | | Store_Unchecked 0x2,-0x5
108f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1090 00d9 | | Load_Top At_Offset_1
1091 e001 | | Load 0x0,0x1
1092 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1093 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
1094 c404 | | Store 0x2,0x4
1095 00d8 | | Load_Top At_Offset_0
1096 e001 | | Load 0x0,0x1
1097 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1098 180f | | Execute Package,Field_Execute,Field_Number 0xf
1099 700f |p | Jump_Nonzero 0x10a9
109a 00da | | Load_Top At_Offset_2
109b e5fc | | Load 0x2,-0x4
109c 0120 | | Execute Any,Is_Value
109d 6803 |h | Jump_Zero 0x10a1
109e e002 | | Load 0x0,0x2
109f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10a0 7801 |x | Jump 0x10a2
10a1 e5fc | | Load 0x2,-0x4
10a2 00da | | Load_Top At_Offset_2
10a3 e001 | | Load 0x0,0x1
10a4 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
10a5 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
10a6 c5fc | | Store 0x2,-0x4
10a7 005b | [ | Store_Top Discrete,At_Offset_3
10a8 7803 |x | Jump 0x10ac
10a9 e002 | | Load 0x0,0x2
10aa 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10ab c5fc | | Store 0x2,-0x4
10ac 00da | | Load_Top At_Offset_2
10ad a5fb | | Store_Unchecked 0x2,-0x5
10ae 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10af TRAP_1068:
10af e005 | | Load 0x0,0x5
10b0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
10b1 010f | | Execute Exception,Equal
10b2 6819 |h | Jump_Zero 0x10cc
10b3 e005 | | Load 0x0,0x5
10b4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
10b5 a5fb | | Store_Unchecked 0x2,-0x5
10b6 e5fd | | Load 0x2,-0x3
10b7 4801 |H | Short_Literal 0x1
10b8 4801 |H | Short_Literal 0x1
10b9 e004 | | Load 0x0,0x4
10ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10bb 0334 | 4 | Declare_Variable Array,With_Constraint
10bc e5fe | | Load 0x2,-0x2
10bd e006 | | Load 0x0,0x6
10be 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
10bf e004 | | Load 0x0,0x4
10c0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10c1 0119 | | Execute Any,Check_In_Formal_Type
10c2 4801 |H | Short_Literal 0x1
10c3 00da | | Load_Top At_Offset_2
10c4 01d6 | | Execute Vector,Field_Write
10c5 6022 |`" | Indirect_Literal Discrete,0x10e8,{0x00000000, 0x00008168}
10c6 e005 | | Load 0x0,0x5
10c7 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
10c8 e002 | | Load 0x0,0x2
10c9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10ca c5fc | | Store 0x2,-0x4
10cb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10cc e5fd | | Load 0x2,-0x3
10cd 0092 1ed7 | | Action Push_String_Extended,0x1ed7 ; "Target_Builder.Unit.Secondary_Unit"
10cf e007 | | Load 0x0,0x7
10d0 180f | | Execute Package,Field_Execute,Field_Number 0xf
10d1 e002 | | Load 0x0,0x2
10d2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10d3 c5fc | | Store 0x2,-0x4
10d4 4801 |H | Short_Literal 0x1
10d5 4801 |H | Short_Literal 0x1
10d6 e004 | | Load 0x0,0x4
10d7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10d8 0334 | 4 | Declare_Variable Array,With_Constraint
10d9 e5fe | | Load 0x2,-0x2
10da e006 | | Load 0x0,0x6
10db 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
10dc e004 | | Load 0x0,0x4
10dd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10de 0119 | | Execute Any,Check_In_Formal_Type
10df 4801 |H | Short_Literal 0x1
10e0 00da | | Load_Top At_Offset_2
10e1 01d6 | | Execute Vector,Field_Write
10e2 6005 |` | Indirect_Literal Discrete,0x10e8,{0x00000000, 0x00008168}
10e3 e005 | | Load 0x0,0x5
10e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
10e5 a5fb | | Store_Unchecked 0x2,-0x5
10e6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10e7 0000 | | .XXX[0x1]
10e8 0000 0000 | | .LITERAL {0x00000000, 0x00008168}
10ec 0000 0000 | | .BLANK 0000[0x4]
10f0 ; --------------------------------------------------------------------------------------
10f0 ; SUBPROGRAM
10f0 ; --------------------------------------------------------------------------------------
10f0 10fc | | .CONST 0x10fc ; Address of begin
10f1 112b | + | .CONST 0x112b ; Address of exception handler
10f2 0003 | | .CONST 0x0003 ; Number of locals
10f3 INIT_10f0:
10f3 e005 | | Load 0x0,0x5
10f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10f5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
10f6 e001 | | Load 0x0,0x1
10f7 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
10f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10f9 02c7 | | Declare_Variable Any
10fa 00d8 | | Load_Top At_Offset_0
10fb 1c00 | | Execute_Immediate Run_Utility,0x0
10fc BODY_10f0:
10fc e5fd | | Load 0x2,-0x3
10fd 0092 1ed8 | | Action Push_String_Extended,0x1ed8 ; "Secondary_Prefix"
10ff 8265 | e | Call 0x1,0x65
1100 e005 | | Load 0x0,0x5
1101 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1102 00d9 | | Load_Top At_Offset_1
1103 e5fd | | Load 0x2,-0x3
1104 604b |`K | Indirect_Literal Discrete,0x1150,{0x00000000, 0x00008167}
1105 e5fe | | Load 0x2,-0x2
1106 e5ff | | Load 0x2,-0x1
1107 8266 | f | Call 0x1,0x66
1108 c403 | | Store 0x2,0x3
1109 005a | Z | Store_Top Discrete,At_Offset_2
110a 00d9 | | Load_Top At_Offset_1
110b 6803 |h | Jump_Zero 0x110f
110c 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
110e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
110f 00d8 | | Load_Top At_Offset_0
1110 e001 | | Load 0x0,0x1
1111 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1112 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
1113 6803 |h | Jump_Zero 0x1117
1114 00d8 | | Load_Top At_Offset_0
1115 801a | | Call 0x0,0x1a
1116 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1117 e5fd | | Load 0x2,-0x3
1118 4801 |H | Short_Literal 0x1
1119 4801 |H | Short_Literal 0x1
111a e004 | | Load 0x0,0x4
111b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
111c 0334 | 4 | Declare_Variable Array,With_Constraint
111d e5fe | | Load 0x2,-0x2
111e e006 | | Load 0x0,0x6
111f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1120 e004 | | Load 0x0,0x4
1121 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1122 0119 | | Execute Any,Check_In_Formal_Type
1123 4801 |H | Short_Literal 0x1
1124 00da | | Load_Top At_Offset_2
1125 01d6 | | Execute Vector,Field_Write
1126 6025 |`% | Indirect_Literal Discrete,0x114c,{0x00000000, 0x00008188}
1127 e005 | | Load 0x0,0x5
1128 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1129 00ea | | Load_Encached Null_String_Cache
112a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
112b TRAP_10f0:
112b e005 | | Load 0x0,0x5
112c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
112d 010f | | Execute Exception,Equal
112e 6815 |h | Jump_Zero 0x1144
112f e5fd | | Load 0x2,-0x3
1130 4801 |H | Short_Literal 0x1
1131 4801 |H | Short_Literal 0x1
1132 e004 | | Load 0x0,0x4
1133 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1134 0334 | 4 | Declare_Variable Array,With_Constraint
1135 e5fe | | Load 0x2,-0x2
1136 e006 | | Load 0x0,0x6
1137 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1138 e004 | | Load 0x0,0x4
1139 1b0e | | Execute Package,Field_Read,Field_Number 0xe
113a 0119 | | Execute Any,Check_In_Formal_Type
113b 4801 |H | Short_Literal 0x1
113c 00da | | Load_Top At_Offset_2
113d 01d6 | | Execute Vector,Field_Write
113e 6011 |` | Indirect_Literal Discrete,0x1150,{0x00000000, 0x00008167}
113f e005 | | Load 0x0,0x5
1140 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1141 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
1143 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1144 e5fd | | Load 0x2,-0x3
1145 0092 1ed9 | | Action Push_String_Extended,0x1ed9 ; "Target_Builder.Unit.Secondary_Prefix"
1147 e007 | | Load 0x0,0x7
1148 180f | | Execute Package,Field_Execute,Field_Number 0xf
1149 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
114b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
114c 0000 0000 | | .LITERAL {0x00000000, 0x00008188}
1150 0000 0000 | | .LITERAL {0x00000000, 0x00008167}
1154 0000 0000 | | .BLANK 0000[0x4]
1158 ; --------------------------------------------------------------------------------------
1158 ; SUBPROGRAM
1158 ; --------------------------------------------------------------------------------------
1158 1164 | d | .CONST 0x1164 ; Address of begin
1159 1193 | | .CONST 0x1193 ; Address of exception handler
115a 0003 | | .CONST 0x0003 ; Number of locals
115b INIT_1158:
115b e005 | | Load 0x0,0x5
115c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
115d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
115e e001 | | Load 0x0,0x1
115f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1160 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1161 02c7 | | Declare_Variable Any
1162 00d8 | | Load_Top At_Offset_0
1163 1c00 | | Execute_Immediate Run_Utility,0x0
1164 BODY_1158:
1164 e5fd | | Load 0x2,-0x3
1165 0092 1eda | | Action Push_String_Extended,0x1eda ; "Secondary_Suffix"
1167 8265 | e | Call 0x1,0x65
1168 e005 | | Load 0x0,0x5
1169 1b0d | | Execute Package,Field_Read,Field_Number 0xd
116a 00d9 | | Load_Top At_Offset_1
116b e5fd | | Load 0x2,-0x3
116c 67e3 |g | Indirect_Literal Discrete,0x1150,{0x00000000, 0x00008167}
116d e5fe | | Load 0x2,-0x2
116e e5ff | | Load 0x2,-0x1
116f 8266 | f | Call 0x1,0x66
1170 c403 | | Store 0x2,0x3
1171 005a | Z | Store_Top Discrete,At_Offset_2
1172 00d9 | | Load_Top At_Offset_1
1173 6803 |h | Jump_Zero 0x1177
1174 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
1176 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1177 00d8 | | Load_Top At_Offset_0
1178 e001 | | Load 0x0,0x1
1179 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
117a 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
117b 6803 |h | Jump_Zero 0x117f
117c 00d8 | | Load_Top At_Offset_0
117d 801b | | Call 0x0,0x1b
117e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
117f e5fd | | Load 0x2,-0x3
1180 4801 |H | Short_Literal 0x1
1181 4801 |H | Short_Literal 0x1
1182 e004 | | Load 0x0,0x4
1183 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1184 0334 | 4 | Declare_Variable Array,With_Constraint
1185 e5fe | | Load 0x2,-0x2
1186 e006 | | Load 0x0,0x6
1187 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1188 e004 | | Load 0x0,0x4
1189 1b0e | | Execute Package,Field_Read,Field_Number 0xe
118a 0119 | | Execute Any,Check_In_Formal_Type
118b 4801 |H | Short_Literal 0x1
118c 00da | | Load_Top At_Offset_2
118d 01d6 | | Execute Vector,Field_Write
118e 6025 |`% | Indirect_Literal Discrete,0x11b4,{0x00000000, 0x00008189}
118f e005 | | Load 0x0,0x5
1190 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1191 00ea | | Load_Encached Null_String_Cache
1192 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1193 TRAP_1158:
1193 e005 | | Load 0x0,0x5
1194 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1195 010f | | Execute Exception,Equal
1196 6815 |h | Jump_Zero 0x11ac
1197 e5fd | | Load 0x2,-0x3
1198 4801 |H | Short_Literal 0x1
1199 4801 |H | Short_Literal 0x1
119a e004 | | Load 0x0,0x4
119b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
119c 0334 | 4 | Declare_Variable Array,With_Constraint
119d e5fe | | Load 0x2,-0x2
119e e006 | | Load 0x0,0x6
119f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
11a0 e004 | | Load 0x0,0x4
11a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
11a2 0119 | | Execute Any,Check_In_Formal_Type
11a3 4801 |H | Short_Literal 0x1
11a4 00da | | Load_Top At_Offset_2
11a5 01d6 | | Execute Vector,Field_Write
11a6 67a9 |g | Indirect_Literal Discrete,0x1150,{0x00000000, 0x00008167}
11a7 e005 | | Load 0x0,0x5
11a8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
11a9 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
11ab 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
11ac e5fd | | Load 0x2,-0x3
11ad 0092 1edb | | Action Push_String_Extended,0x1edb ; "Target_Builder.Unit.Secondary_Suffix"
11af e007 | | Load 0x0,0x7
11b0 180f | | Execute Package,Field_Execute,Field_Number 0xf
11b1 0092 1ea6 | | Action Push_String_Extended,0x1ea6 ; "<error>"
11b3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
11b4 0000 0000 | | .LITERAL {0x00000000, 0x00008189}
11b8 ; --------------------------------------------------------------------------------------
11b8 ; SUBPROGRAM
11b8 ; --------------------------------------------------------------------------------------
11b8 11c1 | | .CONST 0x11c1 ; Address of begin
11b9 0004 | | .CONST 0x0004 ; Address of exception handler
11ba 0002 | | .CONST 0x0002 ; Number of locals
11bb INIT_11b8:
11bb e001 | | Load 0x0,0x1
11bc 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
11bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11be 02c7 | | Declare_Variable Any
11bf 00d8 | | Load_Top At_Offset_0
11c0 1c00 | | Execute_Immediate Run_Utility,0x0
11c1 BODY_11b8:
11c1 4800 |H | Short_Literal 0x0
11c2 a5fb | | Store_Unchecked 0x2,-0x5
11c3 00db | | Load_Top At_Offset_3
11c4 0227 | ' | Execute Access,All_Reference
11c5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
11c6 e5fe | | Load 0x2,-0x2
11c7 e002 | | Load 0x0,0x2
11c8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
11c9 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
11ca e001 | | Load 0x0,0x1
11cb 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
11cc 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
11cd c402 | | Store 0x2,0x2
11ce 00d8 | | Load_Top At_Offset_0
11cf e001 | | Load 0x0,0x1
11d0 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
11d1 180f | | Execute Package,Field_Execute,Field_Number 0xf
11d2 6825 |h% | Jump_Zero 0x11f8
11d3 e5fc | | Load 0x2,-0x4
11d4 4801 |H | Short_Literal 0x1
11d5 4802 |H | Short_Literal 0x2
11d6 e004 | | Load 0x0,0x4
11d7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
11d8 0334 | 4 | Declare_Variable Array,With_Constraint
11d9 e5fe | | Load 0x2,-0x2
11da e006 | | Load 0x0,0x6
11db 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
11dc e004 | | Load 0x0,0x4
11dd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
11de 0119 | | Execute Any,Check_In_Formal_Type
11df 4801 |H | Short_Literal 0x1
11e0 00da | | Load_Top At_Offset_2
11e1 01d6 | | Execute Vector,Field_Write
11e2 e5ff | | Load 0x2,-0x1
11e3 0227 | ' | Execute Access,All_Reference
11e4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
11e5 e001 | | Load 0x0,0x1
11e6 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
11e7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
11e8 e004 | | Load 0x0,0x4
11e9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
11ea 0119 | | Execute Any,Check_In_Formal_Type
11eb 4802 |H | Short_Literal 0x2
11ec 00da | | Load_Top At_Offset_2
11ed 01d6 | | Execute Vector,Field_Write
11ee 6045 |`E | Indirect_Literal Discrete,0x1234,{0x00000000, 0x0000811d}
11ef e005 | | Load 0x0,0x5
11f0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
11f1 e004 | | Load 0x0,0x4
11f2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
11f3 603c |`< | Indirect_Literal Discrete,0x1230,{0x00000000, 0x00008193}
11f4 e005 | | Load 0x0,0x5
11f5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
11f6 a5fb | | Store_Unchecked 0x2,-0x5
11f7 4505 |E | Exit_Suprogram New_Top_Offset 0x5
11f8 e5fd | | Load 0x2,-0x3
11f9 01db | | Execute Vector,Length
11fa e5fc | | Load 0x2,-0x4
11fb e5fe | | Load 0x2,-0x2
11fc e5ff | | Load 0x2,-0x1
11fd 825e | ^ | Call 0x1,0x5e
11fe 01db | | Execute Vector,Length
11ff 0273 | s | Execute Discrete,Plus
1200 4900 |I | Short_Literal 0x100
1201 027d | } | Execute Discrete,Greater
1202 6822 |h" | Jump_Zero 0x1225
1203 e5fc | | Load 0x2,-0x4
1204 4801 |H | Short_Literal 0x1
1205 4802 |H | Short_Literal 0x2
1206 e004 | | Load 0x0,0x4
1207 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1208 0334 | 4 | Declare_Variable Array,With_Constraint
1209 e5fe | | Load 0x2,-0x2
120a e006 | | Load 0x0,0x6
120b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
120c e004 | | Load 0x0,0x4
120d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
120e 0119 | | Execute Any,Check_In_Formal_Type
120f 4801 |H | Short_Literal 0x1
1210 00da | | Load_Top At_Offset_2
1211 01d6 | | Execute Vector,Field_Write
1212 4900 |I | Short_Literal 0x100
1213 e004 | | Load 0x0,0x4
1214 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1215 e004 | | Load 0x0,0x4
1216 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1217 0119 | | Execute Any,Check_In_Formal_Type
1218 4802 |H | Short_Literal 0x2
1219 00da | | Load_Top At_Offset_2
121a 01d6 | | Execute Vector,Field_Write
121b 6010 |` | Indirect_Literal Discrete,0x122c,{0x00000000, 0x00008163}
121c e005 | | Load 0x0,0x5
121d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
121e e004 | | Load 0x0,0x4
121f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1220 600f |` | Indirect_Literal Discrete,0x1230,{0x00000000, 0x00008193}
1221 e005 | | Load 0x0,0x5
1222 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1223 a5fb | | Store_Unchecked 0x2,-0x5
1224 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1225 e5fd | | Load 0x2,-0x3
1226 00d9 | | Load_Top At_Offset_1
1227 8017 | | Call 0x0,0x17
1228 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1229 0000 0000 | | .XXX[0x3]
122b 0000 | |
122c 0000 0000 | | .LITERAL {0x00000000, 0x00008163}
1230 0000 0000 | | .LITERAL {0x00000000, 0x00008193}
1234 0000 0000 | | .LITERAL {0x00000000, 0x0000811d}
1238 ; --------------------------------------------------------------------------------------
1238 ; SUBPROGRAM
1238 ; --------------------------------------------------------------------------------------
1238 1241 | A | .CONST 0x1241 ; Address of begin
1239 0004 | | .CONST 0x0004 ; Address of exception handler
123a 0002 | | .CONST 0x0002 ; Number of locals
123b INIT_1238:
123b e001 | | Load 0x0,0x1
123c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
123d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
123e 02c7 | | Declare_Variable Any
123f 00d8 | | Load_Top At_Offset_0
1240 1c00 | | Execute_Immediate Run_Utility,0x0
1241 BODY_1238:
1241 4800 |H | Short_Literal 0x0
1242 a5fb | | Store_Unchecked 0x2,-0x5
1243 00db | | Load_Top At_Offset_3
1244 0227 | ' | Execute Access,All_Reference
1245 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1246 e5fe | | Load 0x2,-0x2
1247 e002 | | Load 0x0,0x2
1248 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1249 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
124a e001 | | Load 0x0,0x1
124b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
124c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
124d c402 | | Store 0x2,0x2
124e 00d8 | | Load_Top At_Offset_0
124f e001 | | Load 0x0,0x1
1250 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1251 180f | | Execute Package,Field_Execute,Field_Number 0xf
1252 6825 |h% | Jump_Zero 0x1278
1253 e5fc | | Load 0x2,-0x4
1254 4801 |H | Short_Literal 0x1
1255 4802 |H | Short_Literal 0x2
1256 e004 | | Load 0x0,0x4
1257 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1258 0334 | 4 | Declare_Variable Array,With_Constraint
1259 e5fe | | Load 0x2,-0x2
125a e006 | | Load 0x0,0x6
125b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
125c e004 | | Load 0x0,0x4
125d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
125e 0119 | | Execute Any,Check_In_Formal_Type
125f 4801 |H | Short_Literal 0x1
1260 00da | | Load_Top At_Offset_2
1261 01d6 | | Execute Vector,Field_Write
1262 e5ff | | Load 0x2,-0x1
1263 0227 | ' | Execute Access,All_Reference
1264 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1265 e001 | | Load 0x0,0x1
1266 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1267 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1268 e004 | | Load 0x0,0x4
1269 1b0e | | Execute Package,Field_Read,Field_Number 0xe
126a 0119 | | Execute Any,Check_In_Formal_Type
126b 4802 |H | Short_Literal 0x2
126c 00da | | Load_Top At_Offset_2
126d 01d6 | | Execute Vector,Field_Write
126e 67c5 |g | Indirect_Literal Discrete,0x1234,{0x00000000, 0x0000811d}
126f e005 | | Load 0x0,0x5
1270 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1271 e004 | | Load 0x0,0x4
1272 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1273 6038 |`8 | Indirect_Literal Discrete,0x12ac,{0x00000000, 0x00008194}
1274 e005 | | Load 0x0,0x5
1275 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1276 a5fb | | Store_Unchecked 0x2,-0x5
1277 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1278 e5fc | | Load 0x2,-0x4
1279 e5fe | | Load 0x2,-0x2
127a e5ff | | Load 0x2,-0x1
127b 825d | ] | Call 0x1,0x5d
127c 01db | | Execute Vector,Length
127d e5fd | | Load 0x2,-0x3
127e 01db | | Execute Vector,Length
127f 0273 | s | Execute Discrete,Plus
1280 4900 |I | Short_Literal 0x100
1281 027d | } | Execute Discrete,Greater
1282 6822 |h" | Jump_Zero 0x12a5
1283 e5fc | | Load 0x2,-0x4
1284 4801 |H | Short_Literal 0x1
1285 4802 |H | Short_Literal 0x2
1286 e004 | | Load 0x0,0x4
1287 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1288 0334 | 4 | Declare_Variable Array,With_Constraint
1289 e5fe | | Load 0x2,-0x2
128a e006 | | Load 0x0,0x6
128b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
128c e004 | | Load 0x0,0x4
128d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
128e 0119 | | Execute Any,Check_In_Formal_Type
128f 4801 |H | Short_Literal 0x1
1290 00da | | Load_Top At_Offset_2
1291 01d6 | | Execute Vector,Field_Write
1292 4900 |I | Short_Literal 0x100
1293 e004 | | Load 0x0,0x4
1294 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1295 e004 | | Load 0x0,0x4
1296 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1297 0119 | | Execute Any,Check_In_Formal_Type
1298 4802 |H | Short_Literal 0x2
1299 00da | | Load_Top At_Offset_2
129a 01d6 | | Execute Vector,Field_Write
129b 6790 |g | Indirect_Literal Discrete,0x122c,{0x00000000, 0x00008163}
129c e005 | | Load 0x0,0x5
129d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
129e e004 | | Load 0x0,0x4
129f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
12a0 600b |` | Indirect_Literal Discrete,0x12ac,{0x00000000, 0x00008194}
12a1 e005 | | Load 0x0,0x5
12a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
12a3 a5fb | | Store_Unchecked 0x2,-0x5
12a4 4505 |E | Exit_Suprogram New_Top_Offset 0x5
12a5 e5fd | | Load 0x2,-0x3
12a6 00d9 | | Load_Top At_Offset_1
12a7 8018 | | Call 0x0,0x18
12a8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
12a9 0000 0000 | | .XXX[0x3]
12ab 0000 | |
12ac 0000 0000 | | .LITERAL {0x00000000, 0x00008194}
12b0 ; --------------------------------------------------------------------------------------
12b0 ; SUBPROGRAM
12b0 ; --------------------------------------------------------------------------------------
12b0 12bc | | .CONST 0x12bc ; Address of begin
12b1 12d3 | | .CONST 0x12d3 ; Address of exception handler
12b2 0003 | | .CONST 0x0003 ; Number of locals
12b3 INIT_12b0:
12b3 e005 | | Load 0x0,0x5
12b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12b5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
12b6 e001 | | Load 0x0,0x1
12b7 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
12b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12b9 02c7 | | Declare_Variable Any
12ba 00d8 | | Load_Top At_Offset_0
12bb 1c00 | | Execute_Immediate Run_Utility,0x0
12bc BODY_12b0:
12bc e5fc | | Load 0x2,-0x4
12bd 0092 1edc | | Action Push_String_Extended,0x1edc ; "Serial_Number"
12bf 8265 | e | Call 0x1,0x65
12c0 e005 | | Load 0x0,0x5
12c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12c2 00d9 | | Load_Top At_Offset_1
12c3 e5fc | | Load 0x2,-0x4
12c4 602f |`/ | Indirect_Literal Discrete,0x12f4,{0x00000000, 0x00008190}
12c5 e5fe | | Load 0x2,-0x2
12c6 e5ff | | Load 0x2,-0x1
12c7 8266 | f | Call 0x1,0x66
12c8 c403 | | Store 0x2,0x3
12c9 005a | Z | Store_Top Discrete,At_Offset_2
12ca 00d9 | | Load_Top At_Offset_1
12cb 6802 |h | Jump_Zero 0x12ce
12cc 4800 |H | Short_Literal 0x0
12cd 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
12ce 00d8 | | Load_Top At_Offset_0
12cf e001 | | Load 0x0,0x1
12d0 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
12d1 181f | | Execute Package,Field_Execute,Field_Number 0x1f
12d2 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
12d3 TRAP_12b0:
12d3 e005 | | Load 0x0,0x5
12d4 1b17 | | Execute Package,Field_Read,Field_Number 0x17
12d5 010f | | Execute Exception,Equal
12d6 6814 |h | Jump_Zero 0x12eb
12d7 e5fc | | Load 0x2,-0x4
12d8 4801 |H | Short_Literal 0x1
12d9 4801 |H | Short_Literal 0x1
12da e004 | | Load 0x0,0x4
12db 1b0f | | Execute Package,Field_Read,Field_Number 0xf
12dc 0334 | 4 | Declare_Variable Array,With_Constraint
12dd e5fe | | Load 0x2,-0x2
12de e006 | | Load 0x0,0x6
12df 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
12e0 e004 | | Load 0x0,0x4
12e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
12e2 0119 | | Execute Any,Check_In_Formal_Type
12e3 4801 |H | Short_Literal 0x1
12e4 00da | | Load_Top At_Offset_2
12e5 01d6 | | Execute Vector,Field_Write
12e6 600d |` | Indirect_Literal Discrete,0x12f4,{0x00000000, 0x00008190}
12e7 e005 | | Load 0x0,0x5
12e8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
12e9 4800 |H | Short_Literal 0x0
12ea 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
12eb e5fc | | Load 0x2,-0x4
12ec 0092 1edd | | Action Push_String_Extended,0x1edd ; "Target_Builder.Unit.Serial_Number"
12ee e007 | | Load 0x0,0x7
12ef 180f | | Execute Package,Field_Execute,Field_Number 0xf
12f0 4800 |H | Short_Literal 0x0
12f1 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
12f2 0000 0000 | | .XXX[0x2]
12f4 0000 0000 | | .LITERAL {0x00000000, 0x00008190}
12f8 ; --------------------------------------------------------------------------------------
12f8 ; SUBPROGRAM
12f8 ; --------------------------------------------------------------------------------------
12f8 12fb | | .CONST 0x12fb ; Address of begin
12f9 0004 | | .CONST 0x0004 ; Address of exception handler
12fa 0001 | | .CONST 0x0001 ; Number of locals
12fb BODY_12f8:
12fb INIT_12f8:
12fb e264 | d | Load 0x1,0x64
12fc 6807 |h | Jump_Zero 0x1304
12fd 00db | | Load_Top At_Offset_3
12fe 0092 1ede | | Action Push_String_Extended,0x1ede ; "}?{ Check_Unit Target_Builder.Unit."
1300 e5ff | | Load 0x2,-0x1
1301 01cc | | Execute Vector,Catenate
1302 e007 | | Load 0x0,0x7
1303 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1304 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1305 0000 0000 | | .XXX[0x3]
1307 0000 | |
1308 ; --------------------------------------------------------------------------------------
1308 ; SUBPROGRAM
1308 ; --------------------------------------------------------------------------------------
1308 130e | | .CONST 0x130e ; Address of begin
1309 0004 | | .CONST 0x0004 ; Address of exception handler
130a 0002 | | .CONST 0x0002 ; Number of locals
130b INIT_1308:
130b e005 | | Load 0x0,0x5
130c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
130d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
130e BODY_1308:
130e e005 | | Load 0x0,0x5
130f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1310 e5fc | | Load 0x2,-0x4
1311 e5ff | | Load 0x2,-0x1
1312 8012 | | Call 0x0,0x12
1313 0059 | Y | Store_Top Discrete,At_Offset_1
1314 00d8 | | Load_Top At_Offset_0
1315 6803 |h | Jump_Zero 0x1319
1316 00d8 | | Load_Top At_Offset_0
1317 a5fa | | Store_Unchecked 0x2,-0x6
1318 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1319 00db | | Load_Top At_Offset_3
131a 0227 | ' | Execute Access,All_Reference
131b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
131c e5fe | | Load 0x2,-0x2
131d e002 | | Load 0x0,0x2
131e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
131f 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1320 e001 | | Load 0x0,0x1
1321 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1322 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1323 c5fb | | Store 0x2,-0x5
1324 e5fb | | Load 0x2,-0x5
1325 e001 | | Load 0x0,0x1
1326 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1327 180f | | Execute Package,Field_Execute,Field_Number 0xf
1328 6819 |h | Jump_Zero 0x1342
1329 e5fc | | Load 0x2,-0x4
132a 4801 |H | Short_Literal 0x1
132b 4801 |H | Short_Literal 0x1
132c e004 | | Load 0x0,0x4
132d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
132e 0334 | 4 | Declare_Variable Array,With_Constraint
132f e5fe | | Load 0x2,-0x2
1330 e004 | | Load 0x0,0x4
1331 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1332 e004 | | Load 0x0,0x4
1333 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1334 0119 | | Execute Any,Check_In_Formal_Type
1335 4801 |H | Short_Literal 0x1
1336 00da | | Load_Top At_Offset_2
1337 01d6 | | Execute Vector,Field_Write
1338 600f |` | Indirect_Literal Discrete,0x1348,{0x00000000, 0x0000816f}
1339 e005 | | Load 0x0,0x5
133a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
133b e004 | | Load 0x0,0x4
133c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
133d e5fd | | Load 0x2,-0x3
133e e005 | | Load 0x0,0x5
133f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1340 a5fa | | Store_Unchecked 0x2,-0x6
1341 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1342 4800 |H | Short_Literal 0x0
1343 a5fa | | Store_Unchecked 0x2,-0x6
1344 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1345 0000 0000 | | .XXX[0x3]
1347 0000 | |
1348 0000 0000 | | .LITERAL {0x00000000, 0x0000816f}
134c 0000 0000 | | .BLANK 0000[0x4]
1350 ; --------------------------------------------------------------------------------------
1350 ; SUBPROGRAM
1350 ; --------------------------------------------------------------------------------------
1350 1366 | f | .CONST 0x1366 ; Address of begin
1351 0004 | | .CONST 0x0004 ; Address of exception handler
1352 0002 | | .CONST 0x0002 ; Number of locals
1353 INIT_1350:
1353 e011 | | Load 0x0,0x11
1354 180e | | Execute Package,Field_Execute,Field_Number 0xe
1355 e011 | | Load 0x0,0x11
1356 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
1357 e011 | | Load 0x0,0x11
1358 180e | | Execute Package,Field_Execute,Field_Number 0xe
1359 e011 | | Load 0x0,0x11
135a 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
135b 484d |HM | Short_Literal 0x4d
135c e011 | | Load 0x0,0x11
135d 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
135e e011 | | Load 0x0,0x11
135f 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
1360 4800 |H | Short_Literal 0x0
1361 e011 | | Load 0x0,0x11
1362 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
1363 00db | | Load_Top At_Offset_3
1364 e00d | | Load 0x0,0xd
1365 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
1366 BODY_1350:
1366 00d8 | | Load_Top At_Offset_0
1367 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1368 6803 |h | Jump_Zero 0x136c
1369 e005 | | Load 0x0,0x5
136a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
136b 0257 | W | Execute Discrete,Raise
136c 00d8 | | Load_Top At_Offset_0
136d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
136e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
136f 0000 | | .XXX[0x1]
1370 ; --------------------------------------------------------------------------------------
1370 ; SUBPROGRAM
1370 ; --------------------------------------------------------------------------------------
1370 1375 | u | .CONST 0x1375 ; Address of begin
1371 0004 | | .CONST 0x0004 ; Address of exception handler
1372 0002 | | .CONST 0x0002 ; Number of locals
1373 INIT_1370:
1373 029f 1d53 | S| Declare_Subprogram INIT_1d50,For_Call
1375 BODY_1370:
1375 e5fd | | Load 0x2,-0x3
1376 6803 |h | Jump_Zero 0x137a
1377 00db | | Load_Top At_Offset_3
1378 8267 | g | Call 0x1,0x67
1379 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
137a 8402 | | Call 0x2,0x2
137b 0831 | 1 | Execute_Immediate Raise,0x31
137c 0000 0000 | | .BLANK 0000[0x4]
1380 ; --------------------------------------------------------------------------------------
1380 ; SUBPROGRAM
1380 ; --------------------------------------------------------------------------------------
1380 1383 | | .CONST 0x1383 ; Address of begin
1381 0004 | | .CONST 0x0004 ; Address of exception handler
1382 0001 | | .CONST 0x0001 ; Number of locals
1383 BODY_1380:
1383 INIT_1380:
1383 00db | | Load_Top At_Offset_3
1384 e009 | | Load 0x0,0x9
1385 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
1386 00db | | Load_Top At_Offset_3
1387 e001 | | Load 0x0,0x1
1388 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1389 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
138a 7002 |p | Jump_Nonzero 0x138d
138b 00ea | | Load_Encached Null_String_Cache
138c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
138d 00db | | Load_Top At_Offset_3
138e e009 | | Load 0x0,0x9
138f 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
1390 00db | | Load_Top At_Offset_3
1391 e001 | | Load 0x0,0x1
1392 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1393 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1394 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1395 0000 0000 | | .XXX[0x3]
1397 0000 | |
1398 ; --------------------------------------------------------------------------------------
1398 ; SUBPROGRAM
1398 ; --------------------------------------------------------------------------------------
1398 13b2 | | .CONST 0x13b2 ; Address of begin
1399 140b | | .CONST 0x140b ; Address of exception handler
139a 0005 | | .CONST 0x0005 ; Number of locals
139b INIT_1398:
139b e005 | | Load 0x0,0x5
139c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
139d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
139e e00c | | Load 0x0,0xc
139f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13a0 02c7 | | Declare_Variable Any
13a1 00d8 | | Load_Top At_Offset_0
13a2 1c00 | | Execute_Immediate Run_Utility,0x0
13a3 e5f8 | | Load 0x2,-0x8
13a4 e001 | | Load 0x0,0x1
13a5 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
13a6 181c | | Execute Package,Field_Execute,Field_Number 0x1c
13a7 e5fe | | Load 0x2,-0x2
13a8 e5fb | | Load 0x2,-0x5
13a9 e009 | | Load 0x0,0x9
13aa 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
13ab e5f8 | | Load 0x2,-0x8
13ac e001 | | Load 0x0,0x1
13ad 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
13ae 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
13af e5fb | | Load 0x2,-0x5
13b0 e009 | | Load 0x0,0x9
13b1 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
13b2 BODY_1398:
13b2 e5f9 | | Load 0x2,-0x7
13b3 0092 1edf | | Action Push_String_Extended,0x1edf ; "Target_Builder.Unit.Establish_Download_Time"
13b5 e007 | | Load 0x0,0x7
13b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
13b7 00db | | Load_Top At_Offset_3
13b8 6803 |h | Jump_Zero 0x13bc
13b9 00db | | Load_Top At_Offset_3
13ba a5f7 | | Store_Unchecked 0x2,-0x9
13bb 4508 |E | Exit_Suprogram New_Top_Offset 0x8
13bc 00da | | Load_Top At_Offset_2
13bd 0120 | | Execute Any,Is_Value
13be 6803 |h | Jump_Zero 0x13c2
13bf e00c | | Load 0x0,0xc
13c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13c1 7801 |x | Jump 0x13c3
13c2 00da | | Load_Top At_Offset_2
13c3 e005 | | Load 0x0,0x5
13c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13c5 e5fa | | Load 0x2,-0x6
13c6 e5fc | | Load 0x2,-0x4
13c7 e405 | | Load 0x2,0x5
13c8 e008 | | Load 0x0,0x8
13c9 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
13ca c402 | | Store 0x2,0x2
13cb c403 | | Store 0x2,0x3
13cc 00db | | Load_Top At_Offset_3
13cd 681c |h | Jump_Zero 0x13ea
13ce e5f9 | | Load 0x2,-0x7
13cf 4801 |H | Short_Literal 0x1
13d0 4802 |H | Short_Literal 0x2
13d1 e004 | | Load 0x0,0x4
13d2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
13d3 0334 | 4 | Declare_Variable Array,With_Constraint
13d4 00db | | Load_Top At_Offset_3
13d5 e004 | | Load 0x0,0x4
13d6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
13d7 e004 | | Load 0x0,0x4
13d8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
13d9 0119 | | Execute Any,Check_In_Formal_Type
13da 4801 |H | Short_Literal 0x1
13db 00da | | Load_Top At_Offset_2
13dc 01d6 | | Execute Vector,Field_Write
13dd e402 | | Load 0x2,0x2
13de e005 | | Load 0x0,0x5
13df 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
13e0 e004 | | Load 0x0,0x4
13e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
13e2 0119 | | Execute Any,Check_In_Formal_Type
13e3 4802 |H | Short_Literal 0x2
13e4 00da | | Load_Top At_Offset_2
13e5 01d6 | | Execute Vector,Field_Write
13e6 605d |`] | Indirect_Literal Discrete,0x1444,{0x00000000, 0x00008137}
13e7 e005 | | Load 0x0,0x5
13e8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
13e9 781e |x | Jump 0x1408
13ea e5f9 | | Load 0x2,-0x7
13eb 0092 1ebe | | Action Push_String_Extended,0x1ebe ; "Setting download time for => "
13ed 00db | | Load_Top At_Offset_3
13ee 01cc | | Execute Vector,Catenate
13ef 0092 1ebf | | Action Push_String_Extended,0x1ebf ; " to "
13f1 01cc | | Execute Vector,Catenate
13f2 4800 |H | Short_Literal 0x0
13f3 4800 |H | Short_Literal 0x0
13f4 4800 |H | Short_Literal 0x0
13f5 e403 | | Load 0x2,0x3
13f6 e015 | | Load 0x0,0x15
13f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
13f8 e015 | | Load 0x0,0x15
13f9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
13fa 01cc | | Execute Vector,Catenate
13fb e007 | | Load 0x0,0x7
13fc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
13fd 00db | | Load_Top At_Offset_3
13fe e5fb | | Load 0x2,-0x5
13ff e009 | | Load 0x0,0x9
1400 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
1401 e5fd | | Load 0x2,-0x3
1402 e403 | | Load 0x2,0x3
1403 e5f8 | | Load 0x2,-0x8
1404 e001 | | Load 0x0,0x1
1405 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1406 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
1407 c402 | | Store 0x2,0x2
1408 00db | | Load_Top At_Offset_3
1409 a5f7 | | Store_Unchecked 0x2,-0x9
140a 4508 |E | Exit_Suprogram New_Top_Offset 0x8
140b TRAP_1398:
140b e005 | | Load 0x0,0x5
140c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
140d 010f | | Execute Exception,Equal
140e 6816 |h | Jump_Zero 0x1425
140f e005 | | Load 0x0,0x5
1410 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1411 a5f7 | | Store_Unchecked 0x2,-0x9
1412 e5f9 | | Load 0x2,-0x7
1413 4801 |H | Short_Literal 0x1
1414 4801 |H | Short_Literal 0x1
1415 e004 | | Load 0x0,0x4
1416 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1417 0334 | 4 | Declare_Variable Array,With_Constraint
1418 e404 | | Load 0x2,0x4
1419 e004 | | Load 0x0,0x4
141a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
141b e004 | | Load 0x0,0x4
141c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
141d 0119 | | Execute Any,Check_In_Formal_Type
141e 4801 |H | Short_Literal 0x1
141f 00da | | Load_Top At_Offset_2
1420 01d6 | | Execute Vector,Field_Write
1421 601e |` | Indirect_Literal Discrete,0x1440,{0x00000000, 0x0000815e}
1422 e005 | | Load 0x0,0x5
1423 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1424 4508 |E | Exit_Suprogram New_Top_Offset 0x8
1425 e5f9 | | Load 0x2,-0x7
1426 0092 1edf | | Action Push_String_Extended,0x1edf ; "Target_Builder.Unit.Establish_Download_Time"
1428 e007 | | Load 0x0,0x7
1429 180f | | Execute Package,Field_Execute,Field_Number 0xf
142a 4801 |H | Short_Literal 0x1
142b 4801 |H | Short_Literal 0x1
142c e004 | | Load 0x0,0x4
142d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
142e 0334 | 4 | Declare_Variable Array,With_Constraint
142f 00db | | Load_Top At_Offset_3
1430 e004 | | Load 0x0,0x4
1431 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1432 e004 | | Load 0x0,0x4
1433 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1434 0119 | | Execute Any,Check_In_Formal_Type
1435 4801 |H | Short_Literal 0x1
1436 00da | | Load_Top At_Offset_2
1437 01d6 | | Execute Vector,Field_Write
1438 6007 |` | Indirect_Literal Discrete,0x1440,{0x00000000, 0x0000815e}
1439 e005 | | Load 0x0,0x5
143a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
143b a5f7 | | Store_Unchecked 0x2,-0x9
143c 4508 |E | Exit_Suprogram New_Top_Offset 0x8
143d 0000 0000 | | .XXX[0x3]
143f 0000 | |
1440 0000 0000 | | .LITERAL {0x00000000, 0x0000815e}
1444 0000 0000 | | .LITERAL {0x00000000, 0x00008137}
1448 ; --------------------------------------------------------------------------------------
1448 ; SUBPROGRAM
1448 ; --------------------------------------------------------------------------------------
1448 1459 | Y | .CONST 0x1459 ; Address of begin
1449 14af | | .CONST 0x14af ; Address of exception handler
144a 0004 | | .CONST 0x0004 ; Number of locals
144b INIT_1448:
144b e005 | | Load 0x0,0x5
144c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
144d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
144e e00c | | Load 0x0,0xc
144f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1450 02c7 | | Declare_Variable Any
1451 00d8 | | Load_Top At_Offset_0
1452 1c00 | | Execute_Immediate Run_Utility,0x0
1453 e5ff | | Load 0x2,-0x1
1454 e5fe | | Load 0x2,-0x2
1455 8267 | g | Call 0x1,0x67
1456 e5fb | | Load 0x2,-0x5
1457 e009 | | Load 0x0,0x9
1458 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
1459 BODY_1448:
1459 e5f9 | | Load 0x2,-0x7
145a 0092 1edf | | Action Push_String_Extended,0x1edf ; "Target_Builder.Unit.Establish_Download_Time"
145c e007 | | Load 0x0,0x7
145d 180e | | Execute Package,Field_Execute,Field_Number 0xe
145e 00da | | Load_Top At_Offset_2
145f 6803 |h | Jump_Zero 0x1463
1460 00da | | Load_Top At_Offset_2
1461 a5f8 | | Store_Unchecked 0x2,-0x8
1462 4508 |E | Exit_Suprogram New_Top_Offset 0x8
1463 00d9 | | Load_Top At_Offset_1
1464 0120 | | Execute Any,Is_Value
1465 6803 |h | Jump_Zero 0x1469
1466 e00c | | Load 0x0,0xc
1467 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1468 7801 |x | Jump 0x146a
1469 00d9 | | Load_Top At_Offset_1
146a e005 | | Load 0x0,0x5
146b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
146c e5fa | | Load 0x2,-0x6
146d e5fc | | Load 0x2,-0x4
146e e404 | | Load 0x2,0x4
146f e008 | | Load 0x0,0x8
1470 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1471 c402 | | Store 0x2,0x2
1472 c403 | | Store 0x2,0x3
1473 00da | | Load_Top At_Offset_2
1474 681c |h | Jump_Zero 0x1491
1475 e5f9 | | Load 0x2,-0x7
1476 4801 |H | Short_Literal 0x1
1477 4802 |H | Short_Literal 0x2
1478 e004 | | Load 0x0,0x4
1479 1b0f | | Execute Package,Field_Read,Field_Number 0xf
147a 0334 | 4 | Declare_Variable Array,With_Constraint
147b 00da | | Load_Top At_Offset_2
147c e004 | | Load 0x0,0x4
147d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
147e e004 | | Load 0x0,0x4
147f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1480 0119 | | Execute Any,Check_In_Formal_Type
1481 4801 |H | Short_Literal 0x1
1482 00da | | Load_Top At_Offset_2
1483 01d6 | | Execute Vector,Field_Write
1484 e402 | | Load 0x2,0x2
1485 e005 | | Load 0x0,0x5
1486 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1487 e004 | | Load 0x0,0x4
1488 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1489 0119 | | Execute Any,Check_In_Formal_Type
148a 4802 |H | Short_Literal 0x2
148b 00da | | Load_Top At_Offset_2
148c 01d6 | | Execute Vector,Field_Write
148d 67b6 |g | Indirect_Literal Discrete,0x1444,{0x00000000, 0x00008137}
148e e005 | | Load 0x0,0x5
148f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1490 781b |x | Jump 0x14ac
1491 e5f9 | | Load 0x2,-0x7
1492 0092 1ebe | | Action Push_String_Extended,0x1ebe ; "Setting download time for => "
1494 00da | | Load_Top At_Offset_2
1495 01cc | | Execute Vector,Catenate
1496 0092 1ebf | | Action Push_String_Extended,0x1ebf ; " to "
1498 01cc | | Execute Vector,Catenate
1499 4800 |H | Short_Literal 0x0
149a 4800 |H | Short_Literal 0x0
149b 4800 |H | Short_Literal 0x0
149c e403 | | Load 0x2,0x3
149d e015 | | Load 0x0,0x15
149e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
149f e015 | | Load 0x0,0x15
14a0 181f | | Execute Package,Field_Execute,Field_Number 0x1f
14a1 01cc | | Execute Vector,Catenate
14a2 e007 | | Load 0x0,0x7
14a3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
14a4 e005 | | Load 0x0,0x5
14a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
14a6 e5f9 | | Load 0x2,-0x7
14a7 00db | | Load_Top At_Offset_3
14a8 e5fe | | Load 0x2,-0x2
14a9 e00d | | Load 0x0,0xd
14aa 1877 | w | Execute Package,Field_Execute,Field_Number 0x77
14ab 005b | [ | Store_Top Discrete,At_Offset_3
14ac 00da | | Load_Top At_Offset_2
14ad a5f8 | | Store_Unchecked 0x2,-0x8
14ae 4508 |E | Exit_Suprogram New_Top_Offset 0x8
14af TRAP_1448:
14af e005 | | Load 0x0,0x5
14b0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
14b1 010f | | Execute Exception,Equal
14b2 6816 |h | Jump_Zero 0x14c9
14b3 e005 | | Load 0x0,0x5
14b4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
14b5 a5f8 | | Store_Unchecked 0x2,-0x8
14b6 e5f9 | | Load 0x2,-0x7
14b7 4801 |H | Short_Literal 0x1
14b8 4801 |H | Short_Literal 0x1
14b9 e004 | | Load 0x0,0x4
14ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf
14bb 0334 | 4 | Declare_Variable Array,With_Constraint
14bc 00db | | Load_Top At_Offset_3
14bd e004 | | Load 0x0,0x4
14be 1810 | | Execute Package,Field_Execute,Field_Number 0x10
14bf e004 | | Load 0x0,0x4
14c0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
14c1 0119 | | Execute Any,Check_In_Formal_Type
14c2 4801 |H | Short_Literal 0x1
14c3 00da | | Load_Top At_Offset_2
14c4 01d6 | | Execute Vector,Field_Write
14c5 677a |gz | Indirect_Literal Discrete,0x1440,{0x00000000, 0x0000815e}
14c6 e005 | | Load 0x0,0x5
14c7 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
14c8 4508 |E | Exit_Suprogram New_Top_Offset 0x8
14c9 e5f9 | | Load 0x2,-0x7
14ca 0092 1edf | | Action Push_String_Extended,0x1edf ; "Target_Builder.Unit.Establish_Download_Time"
14cc e007 | | Load 0x0,0x7
14cd 180f | | Execute Package,Field_Execute,Field_Number 0xf
14ce 4801 |H | Short_Literal 0x1
14cf 4801 |H | Short_Literal 0x1
14d0 e004 | | Load 0x0,0x4
14d1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
14d2 0334 | 4 | Declare_Variable Array,With_Constraint
14d3 00da | | Load_Top At_Offset_2
14d4 e004 | | Load 0x0,0x4
14d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
14d6 e004 | | Load 0x0,0x4
14d7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
14d8 0119 | | Execute Any,Check_In_Formal_Type
14d9 4801 |H | Short_Literal 0x1
14da 00da | | Load_Top At_Offset_2
14db 01d6 | | Execute Vector,Field_Write
14dc 6763 |gc | Indirect_Literal Discrete,0x1440,{0x00000000, 0x0000815e}
14dd e005 | | Load 0x0,0x5
14de 1813 | | Execute Package,Field_Execute,Field_Number 0x13
14df a5f8 | | Store_Unchecked 0x2,-0x8
14e0 4508 |E | Exit_Suprogram New_Top_Offset 0x8
14e1 0000 0000 | | .BLANK 0000[0x7]
14e8 ; --------------------------------------------------------------------------------------
14e8 ; SUBPROGRAM
14e8 ; --------------------------------------------------------------------------------------
14e8 14ed | | .CONST 0x14ed ; Address of begin
14e9 0004 | | .CONST 0x0004 ; Address of exception handler
14ea 0002 | | .CONST 0x0002 ; Number of locals
14eb INIT_14e8:
14eb e002 | | Load 0x0,0x2
14ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
14ed BODY_14e8:
14ed e002 | | Load 0x0,0x2
14ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
14ef e5fd | | Load 0x2,-0x3
14f0 0120 | | Execute Any,Is_Value
14f1 6804 |h | Jump_Zero 0x14f6
14f2 e002 | | Load 0x0,0x2
14f3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
14f4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
14f5 7801 |x | Jump 0x14f7
14f6 e5fd | | Load 0x2,-0x3
14f7 6064 |`d | Indirect_Literal Discrete,0x155c,{0x00000000, 0x00004000}
14f8 e00e | | Load 0x0,0xe
14f9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
14fa 4800 |H | Short_Literal 0x0
14fb e5ff | | Load 0x2,-0x1
14fc e002 | | Load 0x0,0x2
14fd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
14fe 1813 | | Execute Package,Field_Execute,Field_Number 0x13
14ff c5fd | | Store 0x2,-0x3
1500 0059 | Y | Store_Top Discrete,At_Offset_1
1501 00d8 | | Load_Top At_Offset_0
1502 6820 |h | Jump_Zero 0x1523
1503 4801 |H | Short_Literal 0x1
1504 4802 |H | Short_Literal 0x2
1505 e004 | | Load 0x0,0x4
1506 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1507 0334 | 4 | Declare_Variable Array,With_Constraint
1508 e5ff | | Load 0x2,-0x1
1509 e004 | | Load 0x0,0x4
150a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
150b e004 | | Load 0x0,0x4
150c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
150d 0119 | | Execute Any,Check_In_Formal_Type
150e 4801 |H | Short_Literal 0x1
150f 00da | | Load_Top At_Offset_2
1510 01d6 | | Execute Vector,Field_Write
1511 00d9 | | Load_Top At_Offset_1
1512 e004 | | Load 0x0,0x4
1513 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1514 e004 | | Load 0x0,0x4
1515 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1516 0119 | | Execute Any,Check_In_Formal_Type
1517 4802 |H | Short_Literal 0x2
1518 00da | | Load_Top At_Offset_2
1519 01d6 | | Execute Vector,Field_Write
151a 603d |`= | Indirect_Literal Discrete,0x1558,{0x00000000, 0x0000813d}
151b e005 | | Load 0x0,0x5
151c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
151d a5fb | | Store_Unchecked 0x2,-0x5
151e e5fe | | Load 0x2,-0x2
151f e5fb | | Load 0x2,-0x5
1520 e005 | | Load 0x0,0x5
1521 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1522 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1523 e01c | | Load 0x0,0x1c
1524 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1525 e002 | | Load 0x0,0x2
1526 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1527 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1528 c5fc | | Store 0x2,-0x4
1529 e002 | | Load 0x0,0x2
152a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
152b e01c | | Load 0x0,0x1c
152c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
152d e5fd | | Load 0x2,-0x3
152e e002 | | Load 0x0,0x2
152f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1530 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1531 0059 | Y | Store_Top Discrete,At_Offset_1
1532 00d8 | | Load_Top At_Offset_0
1533 681f |h | Jump_Zero 0x1553
1534 4801 |H | Short_Literal 0x1
1535 4802 |H | Short_Literal 0x2
1536 e004 | | Load 0x0,0x4
1537 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1538 0334 | 4 | Declare_Variable Array,With_Constraint
1539 e5ff | | Load 0x2,-0x1
153a e004 | | Load 0x0,0x4
153b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
153c e004 | | Load 0x0,0x4
153d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
153e 0119 | | Execute Any,Check_In_Formal_Type
153f 4801 |H | Short_Literal 0x1
1540 00da | | Load_Top At_Offset_2
1541 01d6 | | Execute Vector,Field_Write
1542 00d9 | | Load_Top At_Offset_1
1543 e004 | | Load 0x0,0x4
1544 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1545 e004 | | Load 0x0,0x4
1546 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1547 0119 | | Execute Any,Check_In_Formal_Type
1548 4802 |H | Short_Literal 0x2
1549 00da | | Load_Top At_Offset_2
154a 01d6 | | Execute Vector,Field_Write
154b 6008 |` | Indirect_Literal Discrete,0x1554,{0x00000000, 0x00008159}
154c e005 | | Load 0x0,0x5
154d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
154e a5fb | | Store_Unchecked 0x2,-0x5
154f e5fe | | Load 0x2,-0x2
1550 e5fb | | Load 0x2,-0x5
1551 e005 | | Load 0x0,0x5
1552 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1553 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1554 0000 0000 | | .LITERAL {0x00000000, 0x00008159}
1558 0000 0000 | | .LITERAL {0x00000000, 0x0000813d}
155c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
1560 ; --------------------------------------------------------------------------------------
1560 ; SUBPROGRAM
1560 ; --------------------------------------------------------------------------------------
1560 1565 | e | .CONST 0x1565 ; Address of begin
1561 0004 | | .CONST 0x0004 ; Address of exception handler
1562 0002 | | .CONST 0x0002 ; Number of locals
1563 INIT_1560:
1563 e002 | | Load 0x0,0x2
1564 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1565 BODY_1560:
1565 4800 |H | Short_Literal 0x0
1566 a5fd | | Store_Unchecked 0x2,-0x3
1567 e002 | | Load 0x0,0x2
1568 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1569 e01c | | Load 0x0,0x1c
156a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
156b e5ff | | Load 0x2,-0x1
156c e002 | | Load 0x0,0x2
156d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
156e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
156f 0059 | Y | Store_Top Discrete,At_Offset_1
1570 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1571 0000 0000 | | .BLANK 0000[0x7]
1578 ; --------------------------------------------------------------------------------------
1578 ; SUBPROGRAM
1578 ; --------------------------------------------------------------------------------------
1578 157b | { | .CONST 0x157b ; Address of begin
1579 0004 | | .CONST 0x0004 ; Address of exception handler
157a 0001 | | .CONST 0x0001 ; Number of locals
157b BODY_1578:
157b INIT_1578:
157b e5fc | | Load 0x2,-0x4
157c 0092 1ee0 | | Action Push_String_Extended,0x1ee0 ; "Acquiring Remote Connection => "
157e e5ff | | Load 0x2,-0x1
157f 01cc | | Execute Vector,Catenate
1580 e007 | | Load 0x0,0x7
1581 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1582 e005 | | Load 0x0,0x5
1583 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1584 e008 | | Load 0x0,0x8
1585 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
1586 e5fd | | Load 0x2,-0x3
1587 e01d | | Load 0x0,0x1d
1588 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1589 e01d | | Load 0x0,0x1d
158a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
158b e5ff | | Load 0x2,-0x1
158c e5fe | | Load 0x2,-0x2
158d e008 | | Load 0x0,0x8
158e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
158f c5fb | | Store 0x2,-0x5
1590 c5fa | | Store 0x2,-0x6
1591 e5fa | | Load 0x2,-0x6
1592 6804 |h | Jump_Zero 0x1597
1593 e5fc | | Load 0x2,-0x4
1594 e5fa | | Load 0x2,-0x6
1595 e005 | | Load 0x0,0x5
1596 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1597 4505 |E | Exit_Suprogram New_Top_Offset 0x5
1598 ; --------------------------------------------------------------------------------------
1598 ; SUBPROGRAM
1598 ; --------------------------------------------------------------------------------------
1598 159d | | .CONST 0x159d ; Address of begin
1599 0004 | | .CONST 0x0004 ; Address of exception handler
159a 0002 | | .CONST 0x0002 ; Number of locals
159b INIT_1598:
159b 029f 1d63 | c| Declare_Subprogram INIT_1d60,For_Call
159d BODY_1598:
159d e5fe | | Load 0x2,-0x2
159e 01db | | Execute Vector,Length
159f 7008 |p | Jump_Nonzero 0x15a8
15a0 e004 | | Load 0x0,0x4
15a1 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
15a2 4806 |H | Short_Literal 0x6
15a3 603c |`< | Indirect_Literal Discrete,0x15e0,{0x00000000, 0x0000818b}
15a4 e005 | | Load 0x0,0x5
15a5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
15a6 a5f9 | | Store_Unchecked 0x2,-0x7
15a7 782a |x* | Jump 0x15d2
15a8 e5fb | | Load 0x2,-0x5
15a9 6813 |h | Jump_Zero 0x15bd
15aa e5fa | | Load 0x2,-0x6
15ab 4801 |H | Short_Literal 0x1
15ac 4801 |H | Short_Literal 0x1
15ad e004 | | Load 0x0,0x4
15ae 1b0f | | Execute Package,Field_Read,Field_Number 0xf
15af 0334 | 4 | Declare_Variable Array,With_Constraint
15b0 e5fe | | Load 0x2,-0x2
15b1 e004 | | Load 0x0,0x4
15b2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
15b3 e004 | | Load 0x0,0x4
15b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
15b5 0119 | | Execute Any,Check_In_Formal_Type
15b6 4801 |H | Short_Literal 0x1
15b7 00da | | Load_Top At_Offset_2
15b8 01d6 | | Execute Vector,Field_Write
15b9 6022 |`" | Indirect_Literal Discrete,0x15dc,{0x00000000, 0x0000818e}
15ba e005 | | Load 0x0,0x5
15bb 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
15bc 4507 |E | Exit_Suprogram New_Top_Offset 0x7
15bd e005 | | Load 0x0,0x5
15be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
15bf e5fc | | Load 0x2,-0x4
15c0 e00a | | Load 0x0,0xa
15c1 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
15c2 e00a | | Load 0x0,0xa
15c3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
15c4 4801 |H | Short_Literal 0x1
15c5 e5ff | | Load 0x2,-0x1
15c6 e009 | | Load 0x0,0x9
15c7 1868 | h | Execute Package,Field_Execute,Field_Number 0x68
15c8 e5ff | | Load 0x2,-0x1
15c9 e009 | | Load 0x0,0x9
15ca 1869 | i | Execute Package,Field_Execute,Field_Number 0x69
15cb e5ff | | Load 0x2,-0x1
15cc 8402 | | Call 0x2,0x2
15cd e5fd | | Load 0x2,-0x3
15ce e5fe | | Load 0x2,-0x2
15cf e008 | | Load 0x0,0x8
15d0 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
15d1 c5f9 | | Store 0x2,-0x7
15d2 e5f9 | | Load 0x2,-0x7
15d3 6804 |h | Jump_Zero 0x15d8
15d4 e5fa | | Load 0x2,-0x6
15d5 e5f9 | | Load 0x2,-0x7
15d6 e005 | | Load 0x0,0x5
15d7 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
15d8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
15d9 0000 0000 | | .XXX[0x3]
15db 0000 | |
15dc 0000 0000 | | .LITERAL {0x00000000, 0x0000818e}
15e0 0000 0000 | | .LITERAL {0x00000000, 0x0000818b}
15e4 0000 0000 | | .BLANK 0000[0x4]
15e8 ; --------------------------------------------------------------------------------------
15e8 ; SUBPROGRAM
15e8 ; --------------------------------------------------------------------------------------
15e8 15f3 | | .CONST 0x15f3 ; Address of begin
15e9 165b | [ | .CONST 0x165b ; Address of exception handler
15ea 0002 | | .CONST 0x0002 ; Number of locals
15eb INIT_15e8:
15eb e002 | | Load 0x0,0x2
15ec 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
15ed 0322 | " | Declare_Variable Record
15ee 00db | | Load_Top At_Offset_3
15ef e009 | | Load 0x0,0x9
15f0 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
15f1 00d9 | | Load_Top At_Offset_1
15f2 017d | } | Execute Record,Structure_Write
15f3 BODY_15e8:
15f3 00d8 | | Load_Top At_Offset_0
15f4 e5fe | | Load 0x2,-0x2
15f5 e5fb | | Load 0x2,-0x5
15f6 e5fc | | Load 0x2,-0x4
15f7 e00f | | Load 0x0,0xf
15f8 1814 | | Execute Package,Field_Execute,Field_Number 0x14
15f9 7022 |p" | Jump_Nonzero 0x161c
15fa e5f9 | | Load 0x2,-0x7
15fb 4801 |H | Short_Literal 0x1
15fc 4802 |H | Short_Literal 0x2
15fd e004 | | Load 0x0,0x4
15fe 1b0f | | Execute Package,Field_Read,Field_Number 0xf
15ff 0334 | 4 | Declare_Variable Array,With_Constraint
1600 e5fc | | Load 0x2,-0x4
1601 e004 | | Load 0x0,0x4
1602 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1603 e004 | | Load 0x0,0x4
1604 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1605 0119 | | Execute Any,Check_In_Formal_Type
1606 4801 |H | Short_Literal 0x1
1607 00da | | Load_Top At_Offset_2
1608 01d6 | | Execute Vector,Field_Write
1609 e5fb | | Load 0x2,-0x5
160a e004 | | Load 0x0,0x4
160b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
160c e004 | | Load 0x0,0x4
160d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
160e 0119 | | Execute Any,Check_In_Formal_Type
160f 4802 |H | Short_Literal 0x2
1610 00da | | Load_Top At_Offset_2
1611 01d6 | | Execute Vector,Field_Write
1612 6079 |`y | Indirect_Literal Discrete,0x168c,{0x00000000, 0x000081c5}
1613 e005 | | Load 0x0,0x5
1614 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1615 e004 | | Load 0x0,0x4
1616 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1617 6074 |`t | Indirect_Literal Discrete,0x168c,{0x00000000, 0x000081c5}
1618 e005 | | Load 0x0,0x5
1619 1813 | | Execute Package,Field_Execute,Field_Number 0x13
161a a5f8 | | Store_Unchecked 0x2,-0x8
161b 4508 |E | Exit_Suprogram New_Top_Offset 0x8
161c 00db | | Load_Top At_Offset_3
161d e009 | | Load 0x0,0x9
161e 188c | | Execute Package,Field_Execute,Field_Number 0x8c
161f 01db | | Execute Vector,Length
1620 7001 |p | Jump_Nonzero 0x1622
1621 4508 |E | Exit_Suprogram New_Top_Offset 0x8
1622 e5f8 | | Load 0x2,-0x8
1623 e5f9 | | Load 0x2,-0x7
1624 e5fa | | Load 0x2,-0x6
1625 e5fd | | Load 0x2,-0x3
1626 e5fe | | Load 0x2,-0x2
1627 00ea | | Load_Encached Null_String_Cache
1628 e5fc | | Load 0x2,-0x4
1629 e5ff | | Load 0x2,-0x1
162a e009 | | Load 0x0,0x9
162b 18b8 | | Execute Package,Field_Execute,Field_Number 0xb8
162c e5ff | | Load 0x2,-0x1
162d 826f | o | Call 0x1,0x6f
162e c5f8 | | Store 0x2,-0x8
162f e5f8 | | Load 0x2,-0x8
1630 7029 |p) | Jump_Nonzero 0x165a
1631 00d8 | | Load_Top At_Offset_0
1632 e5fe | | Load 0x2,-0x2
1633 e5fb | | Load 0x2,-0x5
1634 e5fc | | Load 0x2,-0x4
1635 e00f | | Load 0x0,0xf
1636 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1637 7022 |p" | Jump_Nonzero 0x165a
1638 e5f9 | | Load 0x2,-0x7
1639 4801 |H | Short_Literal 0x1
163a 4802 |H | Short_Literal 0x2
163b e004 | | Load 0x0,0x4
163c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
163d 0334 | 4 | Declare_Variable Array,With_Constraint
163e e5fc | | Load 0x2,-0x4
163f e004 | | Load 0x0,0x4
1640 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1641 e004 | | Load 0x0,0x4
1642 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1643 0119 | | Execute Any,Check_In_Formal_Type
1644 4801 |H | Short_Literal 0x1
1645 00da | | Load_Top At_Offset_2
1646 01d6 | | Execute Vector,Field_Write
1647 e5fb | | Load 0x2,-0x5
1648 e004 | | Load 0x0,0x4
1649 1810 | | Execute Package,Field_Execute,Field_Number 0x10
164a e004 | | Load 0x0,0x4
164b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
164c 0119 | | Execute Any,Check_In_Formal_Type
164d 4802 |H | Short_Literal 0x2
164e 00da | | Load_Top At_Offset_2
164f 01d6 | | Execute Vector,Field_Write
1650 6037 |`7 | Indirect_Literal Discrete,0x1688,{0x00000000, 0x000081c6}
1651 e005 | | Load 0x0,0x5
1652 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1653 e004 | | Load 0x0,0x4
1654 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1655 6032 |`2 | Indirect_Literal Discrete,0x1688,{0x00000000, 0x000081c6}
1656 e005 | | Load 0x0,0x5
1657 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1658 a5f8 | | Store_Unchecked 0x2,-0x8
1659 4508 |E | Exit_Suprogram New_Top_Offset 0x8
165a 4508 |E | Exit_Suprogram New_Top_Offset 0x8
165b TRAP_15e8:
165b e009 | | Load 0x0,0x9
165c 1bbc | | Execute Package,Field_Read,Field_Number 0xbc
165d 010f | | Execute Exception,Equal
165e 6823 |h# | Jump_Zero 0x1682
165f 4801 |H | Short_Literal 0x1
1660 4802 |H | Short_Literal 0x2
1661 e004 | | Load 0x0,0x4
1662 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1663 0334 | 4 | Declare_Variable Array,With_Constraint
1664 0092 1ee1 | | Action Push_String_Extended,0x1ee1 ; "Change Directory Context"
1666 e004 | | Load 0x0,0x4
1667 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1668 e004 | | Load 0x0,0x4
1669 1b0e | | Execute Package,Field_Read,Field_Number 0xe
166a 0119 | | Execute Any,Check_In_Formal_Type
166b 4801 |H | Short_Literal 0x1
166c 00da | | Load_Top At_Offset_2
166d 01d6 | | Execute Vector,Field_Write
166e e5ff | | Load 0x2,-0x1
166f e009 | | Load 0x0,0x9
1670 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1671 e006 | | Load 0x0,0x6
1672 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
1673 e004 | | Load 0x0,0x4
1674 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1675 0119 | | Execute Any,Check_In_Formal_Type
1676 4802 |H | Short_Literal 0x2
1677 00da | | Load_Top At_Offset_2
1678 01d6 | | Execute Vector,Field_Write
1679 600a |` | Indirect_Literal Discrete,0x1684,{0x00000000, 0x0000818c}
167a e005 | | Load 0x0,0x5
167b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
167c a5f8 | | Store_Unchecked 0x2,-0x8
167d e5f9 | | Load 0x2,-0x7
167e e5f8 | | Load 0x2,-0x8
167f e005 | | Load 0x0,0x5
1680 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1681 4508 |E | Exit_Suprogram New_Top_Offset 0x8
1682 0100 | | Execute Exception,Raise
1683 0000 | | .XXX[0x1]
1684 0000 0000 | | .LITERAL {0x00000000, 0x0000818c}
1688 0000 0000 | | .LITERAL {0x00000000, 0x000081c6}
168c 0000 0000 | | .LITERAL {0x00000000, 0x000081c5}
1690 ; --------------------------------------------------------------------------------------
1690 ; SUBPROGRAM
1690 ; --------------------------------------------------------------------------------------
1690 1696 | | .CONST 0x1696 ; Address of begin
1691 16a9 | | .CONST 0x16a9 ; Address of exception handler
1692 0002 | | .CONST 0x0002 ; Number of locals
1693 INIT_1690:
1693 00da | | Load_Top At_Offset_2
1694 e009 | | Load 0x0,0x9
1695 1890 | | Execute Package,Field_Execute,Field_Number 0x90
1696 BODY_1690:
1696 00d8 | | Load_Top At_Offset_0
1697 01db | | Execute Vector,Length
1698 7001 |p | Jump_Nonzero 0x169a
1699 4508 |E | Exit_Suprogram New_Top_Offset 0x8
169a e5f8 | | Load 0x2,-0x8
169b e5f9 | | Load 0x2,-0x7
169c e5fa | | Load 0x2,-0x6
169d e5fd | | Load 0x2,-0x3
169e e5fe | | Load 0x2,-0x2
169f 00ea | | Load_Encached Null_String_Cache
16a0 e5fb | | Load 0x2,-0x5
16a1 e5fc | | Load 0x2,-0x4
16a2 e5ff | | Load 0x2,-0x1
16a3 e009 | | Load 0x0,0x9
16a4 18b9 | | Execute Package,Field_Execute,Field_Number 0xb9
16a5 e5ff | | Load 0x2,-0x1
16a6 826f | o | Call 0x1,0x6f
16a7 c5f8 | | Store 0x2,-0x8
16a8 4508 |E | Exit_Suprogram New_Top_Offset 0x8
16a9 TRAP_1690:
16a9 e009 | | Load 0x0,0x9
16aa 1bbc | | Execute Package,Field_Read,Field_Number 0xbc
16ab 010f | | Execute Exception,Equal
16ac 6823 |h# | Jump_Zero 0x16d0
16ad 4801 |H | Short_Literal 0x1
16ae 4802 |H | Short_Literal 0x2
16af e004 | | Load 0x0,0x4
16b0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
16b1 0334 | 4 | Declare_Variable Array,With_Constraint
16b2 0092 1ee2 | | Action Push_String_Extended,0x1ee2 ; "Change Library Context"
16b4 e004 | | Load 0x0,0x4
16b5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
16b6 e004 | | Load 0x0,0x4
16b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
16b8 0119 | | Execute Any,Check_In_Formal_Type
16b9 4801 |H | Short_Literal 0x1
16ba 00da | | Load_Top At_Offset_2
16bb 01d6 | | Execute Vector,Field_Write
16bc e5ff | | Load 0x2,-0x1
16bd e009 | | Load 0x0,0x9
16be 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
16bf e006 | | Load 0x0,0x6
16c0 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
16c1 e004 | | Load 0x0,0x4
16c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
16c3 0119 | | Execute Any,Check_In_Formal_Type
16c4 4802 |H | Short_Literal 0x2
16c5 00da | | Load_Top At_Offset_2
16c6 01d6 | | Execute Vector,Field_Write
16c7 67bc |g | Indirect_Literal Discrete,0x1684,{0x00000000, 0x0000818c}
16c8 e005 | | Load 0x0,0x5
16c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
16ca a5f8 | | Store_Unchecked 0x2,-0x8
16cb e5f9 | | Load 0x2,-0x7
16cc e5f8 | | Load 0x2,-0x8
16cd e005 | | Load 0x0,0x5
16ce 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
16cf 4508 |E | Exit_Suprogram New_Top_Offset 0x8
16d0 0100 | | Execute Exception,Raise
16d1 0000 0000 | | .BLANK 0000[0x7]
16d8 ; --------------------------------------------------------------------------------------
16d8 ; SUBPROGRAM
16d8 ; --------------------------------------------------------------------------------------
16d8 1715 | | .CONST 0x1715 ; Address of begin
16d9 17a4 | | .CONST 0x17a4 ; Address of exception handler
16da 000a | | .CONST 0x000a ; Number of locals
16db INIT_16d8:
16db e5f7 | | Load 0x2,-0x9
16dc e5fd | | Load 0x2,-0x3
16dd e5fe | | Load 0x2,-0x2
16de e009 | | Load 0x0,0x9
16df 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
16e0 00ea | | Load_Encached Null_String_Cache
16e1 e5f7 | | Load 0x2,-0x9
16e2 e5fd | | Load 0x2,-0x3
16e3 e5fe | | Load 0x2,-0x2
16e4 e009 | | Load 0x0,0x9
16e5 18ba | | Execute Package,Field_Execute,Field_Number 0xba
16e6 e002 | | Load 0x0,0x2
16e7 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
16e8 0322 | " | Declare_Variable Record
16e9 e5fe | | Load 0x2,-0x2
16ea e009 | | Load 0x0,0x9
16eb 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
16ec 00d9 | | Load_Top At_Offset_1
16ed 017d | } | Execute Record,Structure_Write
16ee e5f7 | | Load 0x2,-0x9
16ef e5fd | | Load 0x2,-0x3
16f0 e5fb | | Load 0x2,-0x5
16f1 e00a | | Load 0x0,0xa
16f2 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
16f3 e00a | | Load 0x0,0xa
16f4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
16f5 4800 |H | Short_Literal 0x0
16f6 4801 |H | Short_Literal 0x1
16f7 e5fe | | Load 0x2,-0x2
16f8 e009 | | Load 0x0,0x9
16f9 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
16fa e5ff | | Load 0x2,-0x1
16fb e01e | | Load 0x0,0x1e
16fc 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
16fd e5f7 | | Load 0x2,-0x9
16fe e5fd | | Load 0x2,-0x3
16ff e5fb | | Load 0x2,-0x5
1700 e00a | | Load 0x0,0xa
1701 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
1702 e00a | | Load 0x0,0xa
1703 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1704 4801 |H | Short_Literal 0x1
1705 4801 |H | Short_Literal 0x1
1706 e5fe | | Load 0x2,-0x2
1707 e009 | | Load 0x0,0x9
1708 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1709 e5ff | | Load 0x2,-0x1
170a e01e | | Load 0x0,0x1e
170b 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
170c 00da | | Load_Top At_Offset_2
170d e01f | | Load 0x0,0x1f
170e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
170f e020 | | Load 0x0,0x20
1710 1843 | C | Execute Package,Field_Execute,Field_Number 0x43
1711 029f 1d7b | {| Declare_Subprogram INIT_1d78,For_Call
1713 029f 1d93 | | Declare_Subprogram INIT_1d90,For_Call
1715 BODY_16d8:
1715 e405 | | Load 0x2,0x5
1716 e5f9 | | Load 0x2,-0x7
1717 e5fc | | Load 0x2,-0x4
1718 e408 | | Load 0x2,0x8
1719 e407 | | Load 0x2,0x7
171a e406 | | Load 0x2,0x6
171b e402 | | Load 0x2,0x2
171c e404 | | Load 0x2,0x4
171d e403 | | Load 0x2,0x3
171e e5fa | | Load 0x2,-0x6
171f e5fd | | Load 0x2,-0x3
1720 e00f | | Load 0x0,0xf
1721 180d | | Execute Package,Field_Execute,Field_Number 0xd
1722 7019 |p | Jump_Nonzero 0x173c
1723 e5f7 | | Load 0x2,-0x9
1724 4801 |H | Short_Literal 0x1
1725 4801 |H | Short_Literal 0x1
1726 e004 | | Load 0x0,0x4
1727 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1728 0334 | 4 | Declare_Variable Array,With_Constraint
1729 e5fd | | Load 0x2,-0x3
172a e006 | | Load 0x0,0x6
172b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
172c e004 | | Load 0x0,0x4
172d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
172e 0119 | | Execute Any,Check_In_Formal_Type
172f 4801 |H | Short_Literal 0x1
1730 00da | | Load_Top At_Offset_2
1731 01d6 | | Execute Vector,Field_Write
1732 60a1 |` | Indirect_Literal Discrete,0x17d4,{0x00000000, 0x000081bf}
1733 e005 | | Load 0x0,0x5
1734 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1735 e004 | | Load 0x0,0x4
1736 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1737 609c |` | Indirect_Literal Discrete,0x17d4,{0x00000000, 0x000081bf}
1738 e005 | | Load 0x0,0x5
1739 1813 | | Execute Package,Field_Execute,Field_Number 0x13
173a a5f6 | | Store_Unchecked 0x2,-0xa
173b 450a |E | Exit_Suprogram New_Top_Offset 0xa
173c e5fe | | Load 0x2,-0x2
173d e009 | | Load 0x0,0x9
173e 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
173f 01db | | Execute Vector,Length
1740 0c01 | | Execute_Immediate Greater_Equal,0x1
1741 6838 |h8 | Jump_Zero 0x177a
1742 8409 | | Call 0x2,0x9
1743 e5f9 | | Load 0x2,-0x7
1744 680a |h | Jump_Zero 0x174f
1745 e5f6 | | Load 0x2,-0xa
1746 e5f7 | | Load 0x2,-0x9
1747 e5f8 | | Load 0x2,-0x8
1748 e5fb | | Load 0x2,-0x5
1749 e5fc | | Load 0x2,-0x4
174a e5fa | | Load 0x2,-0x6
174b e5fe | | Load 0x2,-0x2
174c 826f | o | Call 0x1,0x6f
174d c5f6 | | Store 0x2,-0xa
174e 782a |x* | Jump 0x1779
174f e5f6 | | Load 0x2,-0xa
1750 e5f7 | | Load 0x2,-0x9
1751 e5f8 | | Load 0x2,-0x8
1752 e5fb | | Load 0x2,-0x5
1753 e5fc | | Load 0x2,-0x4
1754 e5f7 | | Load 0x2,-0x9
1755 e5fd | | Load 0x2,-0x3
1756 e5fb | | Load 0x2,-0x5
1757 e00a | | Load 0x0,0xa
1758 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
1759 e00a | | Load 0x0,0xa
175a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
175b 4801 |H | Short_Literal 0x1
175c 4801 |H | Short_Literal 0x1
175d e5fe | | Load 0x2,-0x2
175e e009 | | Load 0x0,0x9
175f 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1760 e5ff | | Load 0x2,-0x1
1761 e01e | | Load 0x0,0x1e
1762 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1763 e5f7 | | Load 0x2,-0x9
1764 e5fd | | Load 0x2,-0x3
1765 e5fb | | Load 0x2,-0x5
1766 e00a | | Load 0x0,0xa
1767 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
1768 e00a | | Load 0x0,0xa
1769 1815 | | Execute Package,Field_Execute,Field_Number 0x15
176a 4800 |H | Short_Literal 0x0
176b 4801 |H | Short_Literal 0x1
176c e5fe | | Load 0x2,-0x2
176d e009 | | Load 0x0,0x9
176e 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
176f e5ff | | Load 0x2,-0x1
1770 e01e | | Load 0x0,0x1e
1771 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1772 e5fa | | Load 0x2,-0x6
1773 e5fe | | Load 0x2,-0x2
1774 e009 | | Load 0x0,0x9
1775 18d6 | | Execute Package,Field_Execute,Field_Number 0xd6
1776 e5fe | | Load 0x2,-0x2
1777 826f | o | Call 0x1,0x6f
1778 c5f6 | | Store 0x2,-0xa
1779 840a | | Call 0x2,0xa
177a e5f6 | | Load 0x2,-0xa
177b 7027 |p' | Jump_Nonzero 0x17a3
177c e405 | | Load 0x2,0x5
177d e5f9 | | Load 0x2,-0x7
177e e5fc | | Load 0x2,-0x4
177f e408 | | Load 0x2,0x8
1780 e407 | | Load 0x2,0x7
1781 e406 | | Load 0x2,0x6
1782 e402 | | Load 0x2,0x2
1783 e404 | | Load 0x2,0x4
1784 e403 | | Load 0x2,0x3
1785 e5fa | | Load 0x2,-0x6
1786 e5fd | | Load 0x2,-0x3
1787 e00f | | Load 0x0,0xf
1788 180e | | Execute Package,Field_Execute,Field_Number 0xe
1789 7019 |p | Jump_Nonzero 0x17a3
178a e5f7 | | Load 0x2,-0x9
178b 4801 |H | Short_Literal 0x1
178c 4801 |H | Short_Literal 0x1
178d e004 | | Load 0x0,0x4
178e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
178f 0334 | 4 | Declare_Variable Array,With_Constraint
1790 e5fd | | Load 0x2,-0x3
1791 e006 | | Load 0x0,0x6
1792 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1793 e004 | | Load 0x0,0x4
1794 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1795 0119 | | Execute Any,Check_In_Formal_Type
1796 4801 |H | Short_Literal 0x1
1797 00da | | Load_Top At_Offset_2
1798 01d6 | | Execute Vector,Field_Write
1799 6036 |`6 | Indirect_Literal Discrete,0x17d0,{0x00000000, 0x000081c0}
179a e005 | | Load 0x0,0x5
179b 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
179c e004 | | Load 0x0,0x4
179d 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
179e 6031 |`1 | Indirect_Literal Discrete,0x17d0,{0x00000000, 0x000081c0}
179f e005 | | Load 0x0,0x5
17a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
17a1 a5f6 | | Store_Unchecked 0x2,-0xa
17a2 450a |E | Exit_Suprogram New_Top_Offset 0xa
17a3 450a |E | Exit_Suprogram New_Top_Offset 0xa
17a4 TRAP_16d8:
17a4 e009 | | Load 0x0,0x9
17a5 1bbc | | Execute Package,Field_Read,Field_Number 0xbc
17a6 010f | | Execute Exception,Equal
17a7 6823 |h# | Jump_Zero 0x17cb
17a8 4801 |H | Short_Literal 0x1
17a9 4802 |H | Short_Literal 0x2
17aa e004 | | Load 0x0,0x4
17ab 1b0f | | Execute Package,Field_Read,Field_Number 0xf
17ac 0334 | 4 | Declare_Variable Array,With_Constraint
17ad 0092 1ea9 | | Action Push_String_Extended,0x1ea9 ; "Compile"
17af e004 | | Load 0x0,0x4
17b0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
17b1 e004 | | Load 0x0,0x4
17b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
17b3 0119 | | Execute Any,Check_In_Formal_Type
17b4 4801 |H | Short_Literal 0x1
17b5 00da | | Load_Top At_Offset_2
17b6 01d6 | | Execute Vector,Field_Write
17b7 e5fe | | Load 0x2,-0x2
17b8 e009 | | Load 0x0,0x9
17b9 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
17ba e006 | | Load 0x0,0x6
17bb 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
17bc e004 | | Load 0x0,0x4
17bd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
17be 0119 | | Execute Any,Check_In_Formal_Type
17bf 4802 |H | Short_Literal 0x2
17c0 00da | | Load_Top At_Offset_2
17c1 01d6 | | Execute Vector,Field_Write
17c2 6009 |` | Indirect_Literal Discrete,0x17cc,{0x00000000, 0x0000818c}
17c3 e005 | | Load 0x0,0x5
17c4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
17c5 a5f6 | | Store_Unchecked 0x2,-0xa
17c6 e5f7 | | Load 0x2,-0x9
17c7 e5f6 | | Load 0x2,-0xa
17c8 e005 | | Load 0x0,0x5
17c9 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
17ca 450a |E | Exit_Suprogram New_Top_Offset 0xa
17cb 0100 | | Execute Exception,Raise
17cc 0000 0000 | | .LITERAL {0x00000000, 0x0000818c}
17d0 0000 0000 | | .LITERAL {0x00000000, 0x000081c0}
17d4 0000 0000 | | .LITERAL {0x00000000, 0x000081bf}
17d8 ; --------------------------------------------------------------------------------------
17d8 ; SUBPROGRAM
17d8 ; --------------------------------------------------------------------------------------
17d8 17ec | | .CONST 0x17ec ; Address of begin
17d9 1806 | | .CONST 0x1806 ; Address of exception handler
17da 0006 | | .CONST 0x0006 ; Number of locals
17db INIT_17d8:
17db e020 | | Load 0x0,0x20
17dc 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
17dd 02c7 | | Declare_Variable Any
17de e5fe | | Load 0x2,-0x2
17df e009 | | Load 0x0,0x9
17e0 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
17e1 e01f | | Load 0x0,0x1f
17e2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
17e3 a402 | | Store_Unchecked 0x2,0x2
17e4 029f 1dab | | Declare_Subprogram INIT_1da8,For_Call
17e6 029f 1dc3 | | Declare_Subprogram INIT_1dc0,For_Call
17e8 029f 1e13 | | Declare_Subprogram INIT_1e10,For_Call
17ea 029f 1e2b | +| Declare_Subprogram INIT_1e28,For_Call
17ec BODY_17d8:
17ec e5fe | | Load 0x2,-0x2
17ed e009 | | Load 0x0,0x9
17ee 1887 | | Execute Package,Field_Execute,Field_Number 0x87
17ef 01db | | Execute Vector,Length
17f0 7001 |p | Jump_Nonzero 0x17f2
17f1 450a |E | Exit_Suprogram New_Top_Offset 0xa
17f2 8405 | | Call 0x2,0x5
17f3 e5f6 | | Load 0x2,-0xa
17f4 e5f7 | | Load 0x2,-0x9
17f5 e5f8 | | Load 0x2,-0x8
17f6 e5fc | | Load 0x2,-0x4
17f7 e5fd | | Load 0x2,-0x3
17f8 00ea | | Load_Encached Null_String_Cache
17f9 4800 |H | Short_Literal 0x0
17fa 8404 | | Call 0x2,0x4
17fb 4801 |H | Short_Literal 0x1
17fc 8404 | | Call 0x2,0x4
17fd e5fa | | Load 0x2,-0x6
17fe e5fe | | Load 0x2,-0x2
17ff e009 | | Load 0x0,0x9
1800 18d7 | | Execute Package,Field_Execute,Field_Number 0xd7
1801 e5fe | | Load 0x2,-0x2
1802 826f | o | Call 0x1,0x6f
1803 c5f6 | | Store 0x2,-0xa
1804 8406 | | Call 0x2,0x6
1805 450a |E | Exit_Suprogram New_Top_Offset 0xa
1806 TRAP_17d8:
1806 e009 | | Load 0x0,0x9
1807 1bbc | | Execute Package,Field_Read,Field_Number 0xbc
1808 010f | | Execute Exception,Equal
1809 6823 |h# | Jump_Zero 0x182d
180a 4801 |H | Short_Literal 0x1
180b 4802 |H | Short_Literal 0x2
180c e004 | | Load 0x0,0x4
180d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
180e 0334 | 4 | Declare_Variable Array,With_Constraint
180f 0092 1ea5 | | Action Push_String_Extended,0x1ea5 ; "Link"
1811 e004 | | Load 0x0,0x4
1812 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1813 e004 | | Load 0x0,0x4
1814 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1815 0119 | | Execute Any,Check_In_Formal_Type
1816 4801 |H | Short_Literal 0x1
1817 00da | | Load_Top At_Offset_2
1818 01d6 | | Execute Vector,Field_Write
1819 e5fe | | Load 0x2,-0x2
181a e009 | | Load 0x0,0x9
181b 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
181c e006 | | Load 0x0,0x6
181d 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
181e e004 | | Load 0x0,0x4
181f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1820 0119 | | Execute Any,Check_In_Formal_Type
1821 4802 |H | Short_Literal 0x2
1822 00da | | Load_Top At_Offset_2
1823 01d6 | | Execute Vector,Field_Write
1824 67a7 |g | Indirect_Literal Discrete,0x17cc,{0x00000000, 0x0000818c}
1825 e005 | | Load 0x0,0x5
1826 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1827 a5f6 | | Store_Unchecked 0x2,-0xa
1828 e5f7 | | Load 0x2,-0x9
1829 e5f6 | | Load 0x2,-0xa
182a e005 | | Load 0x0,0x5
182b 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
182c 450a |E | Exit_Suprogram New_Top_Offset 0xa
182d 0100 | | Execute Exception,Raise
182e 0000 0000 | | .XXX[0x2]
1830 ; --------------------------------------------------------------------------------------
1830 ; SUBPROGRAM
1830 ; --------------------------------------------------------------------------------------
1830 1838 | 8 | .CONST 0x1838 ; Address of begin
1831 1844 | D | .CONST 0x1844 ; Address of exception handler
1832 0002 | | .CONST 0x0002 ; Number of locals
1833 INIT_1830:
1833 e002 | | Load 0x0,0x2
1834 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1835 02c7 | | Declare_Variable Any
1836 00d8 | | Load_Top At_Offset_0
1837 1c00 | | Execute_Immediate Run_Utility,0x0
1838 BODY_1830:
1838 e5fe | | Load 0x2,-0x2
1839 4800 |H | Short_Literal 0x0
183a e5ff | | Load 0x2,-0x1
183b e006 | | Load 0x0,0x6
183c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
183d c402 | | Store 0x2,0x2
183e e5fe | | Load 0x2,-0x2
183f 4800 |H | Short_Literal 0x0
1840 00da | | Load_Top At_Offset_2
1841 e006 | | Load 0x0,0x6
1842 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1843 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1844 TRAP_1830:
1844 0007 | | Action Break_Optional
1845 e002 | | Load 0x0,0x2
1846 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1847 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1848 ; --------------------------------------------------------------------------------------
1848 ; SUBPROGRAM
1848 ; --------------------------------------------------------------------------------------
1848 1859 | Y | .CONST 0x1859 ; Address of begin
1849 0004 | | .CONST 0x0004 ; Address of exception handler
184a 0003 | | .CONST 0x0003 ; Number of locals
184b INIT_1848:
184b e5ff | | Load 0x2,-0x1
184c 0227 | ' | Execute Access,All_Reference
184d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
184e e402 | | Load 0x2,0x2
184f e001 | | Load 0x0,0x1
1850 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
1851 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1852 00d8 | | Load_Top At_Offset_0
1853 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1854 e003 | | Load 0x0,0x3
1855 1b10 | | Execute Package,Field_Read,Field_Number 0x10
1856 1c08 | | Execute_Immediate Run_Utility,0x8
1857 00d8 | | Load_Top At_Offset_0
1858 1c00 | | Execute_Immediate Run_Utility,0x0
1859 BODY_1848:
1859 00d9 | | Load_Top At_Offset_1
185a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
185b 6807 |h | Jump_Zero 0x1863
185c 00d9 | | Load_Top At_Offset_1
185d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
185e e404 | | Load 0x2,0x4
185f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1860 e404 | | Load 0x2,0x4
1861 00cb | | Action Pop_Block_With_Result
1862 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
1863 4800 |H | Short_Literal 0x0
1864 00d9 | | Load_Top At_Offset_1
1865 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1866 00cf | | Action Mark_Auxiliary
1867 00d9 | | Load_Top At_Offset_1
1868 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1869 4801 |H | Short_Literal 0x1
186a 0263 | c | Execute Discrete,Above_Bound
186b 7066 |pf | Jump_Nonzero 0x18d2
186c e404 | | Load 0x2,0x4
186d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
186e e403 | | Load 0x2,0x3
186f 0120 | | Execute Any,Is_Value
1870 6803 |h | Jump_Zero 0x1874
1871 e002 | | Load 0x0,0x2
1872 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1873 7801 |x | Jump 0x1875
1874 e403 | | Load 0x2,0x3
1875 00da | | Load_Top At_Offset_2
1876 e602 | | Load 0x3,0x2
1877 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1878 01d7 | | Execute Vector,Field_Read
1879 e001 | | Load 0x0,0x1
187a 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
187b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
187c c403 | | Store 0x2,0x3
187d e404 | | Load 0x2,0x4
187e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
187f 00d8 | | Load_Top At_Offset_0
1880 e602 | | Load 0x3,0x2
1881 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1882 01d7 | | Execute Vector,Field_Read
1883 e001 | | Load 0x0,0x1
1884 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1885 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1886 7044 |pD | Jump_Nonzero 0x18cb
1887 e5fc | | Load 0x2,-0x4
1888 4801 |H | Short_Literal 0x1
1889 4802 |H | Short_Literal 0x2
188a e004 | | Load 0x0,0x4
188b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
188c 0334 | 4 | Declare_Variable Array,With_Constraint
188d 00da | | Load_Top At_Offset_2
188e e602 | | Load 0x3,0x2
188f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1890 01d7 | | Execute Vector,Field_Read
1891 e001 | | Load 0x0,0x1
1892 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1893 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1894 e004 | | Load 0x0,0x4
1895 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1896 0119 | | Execute Any,Check_In_Formal_Type
1897 4801 |H | Short_Literal 0x1
1898 00da | | Load_Top At_Offset_2
1899 01d6 | | Execute Vector,Field_Write
189a e5ff | | Load 0x2,-0x1
189b 0227 | ' | Execute Access,All_Reference
189c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
189d e001 | | Load 0x0,0x1
189e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
189f 1820 | | Execute Package,Field_Execute,Field_Number 0x20
18a0 e004 | | Load 0x0,0x4
18a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
18a2 0119 | | Execute Any,Check_In_Formal_Type
18a3 4802 |H | Short_Literal 0x2
18a4 00da | | Load_Top At_Offset_2
18a5 01d6 | | Execute Vector,Field_Write
18a6 6035 |`5 | Indirect_Literal Discrete,0x18dc,{0x00000000, 0x0000815a}
18a7 e005 | | Load 0x0,0x5
18a8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
18a9 4801 |H | Short_Literal 0x1
18aa 4802 |H | Short_Literal 0x2
18ab e004 | | Load 0x0,0x4
18ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
18ad 0334 | 4 | Declare_Variable Array,With_Constraint
18ae e5ff | | Load 0x2,-0x1
18af 0227 | ' | Execute Access,All_Reference
18b0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
18b1 e001 | | Load 0x0,0x1
18b2 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
18b3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
18b4 e004 | | Load 0x0,0x4
18b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
18b6 0119 | | Execute Any,Check_In_Formal_Type
18b7 4801 |H | Short_Literal 0x1
18b8 00da | | Load_Top At_Offset_2
18b9 01d6 | | Execute Vector,Field_Write
18ba e5fe | | Load 0x2,-0x2
18bb e006 | | Load 0x0,0x6
18bc 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
18bd e004 | | Load 0x0,0x4
18be 1b0e | | Execute Package,Field_Read,Field_Number 0xe
18bf 0119 | | Execute Any,Check_In_Formal_Type
18c0 4802 |H | Short_Literal 0x2
18c1 00da | | Load_Top At_Offset_2
18c2 01d6 | | Execute Vector,Field_Write
18c3 6014 |` | Indirect_Literal Discrete,0x18d8,{0x00000000, 0x0000810c}
18c4 e005 | | Load 0x0,0x5
18c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
18c6 e404 | | Load 0x2,0x4
18c7 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
18c8 e404 | | Load 0x2,0x4
18c9 00cb | | Action Pop_Block_With_Result
18ca 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
18cb e403 | | Load 0x2,0x3
18cc 00d9 | | Load_Top At_Offset_1
18cd e603 | | Load 0x3,0x3
18ce 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
18cf 01d6 | | Execute Vector,Field_Write
18d0 00c8 | | Action Pop_Auxiliary_Range
18d1 3f9a |? | Loop_Increasing 0x186c
18d2 00ce | | Action Pop_Auxiliary
18d3 00d8 | | Load_Top At_Offset_0
18d4 00cb | | Action Pop_Block_With_Result
18d5 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
18d6 0000 0000 | | .XXX[0x2]
18d8 0000 0000 | | .LITERAL {0x00000000, 0x0000810c}
18dc 0000 0000 | | .LITERAL {0x00000000, 0x0000815a}
18e0 ; --------------------------------------------------------------------------------------
18e0 ; SUBPROGRAM
18e0 ; --------------------------------------------------------------------------------------
18e0 1905 | | .CONST 0x1905 ; Address of begin
18e1 0004 | | .CONST 0x0004 ; Address of exception handler
18e2 0003 | | .CONST 0x0003 ; Number of locals
18e3 INIT_18e0:
18e3 e001 | | Load 0x0,0x1
18e4 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
18e5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
18e6 0337 | 7 | Declare_Variable Array
18e7 4800 |H | Short_Literal 0x0
18e8 4804 |H | Short_Literal 0x4
18e9 00da | | Load_Top At_Offset_2
18ea 01d6 | | Execute Vector,Field_Write
18eb 4803 |H | Short_Literal 0x3
18ec 4800 |H | Short_Literal 0x0
18ed 4801 |H | Short_Literal 0x1
18ee 00d9 | | Load_Top At_Offset_1
18ef e602 | | Load 0x3,0x2
18f0 01d6 | | Execute Vector,Field_Write
18f1 3ffb |? | Loop_Increasing 0x18ed
18f2 4801 |H | Short_Literal 0x1
18f3 4805 |H | Short_Literal 0x5
18f4 00da | | Load_Top At_Offset_2
18f5 01d6 | | Execute Vector,Field_Write
18f6 e001 | | Load 0x0,0x1
18f7 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
18f8 1b17 | | Execute Package,Field_Read,Field_Number 0x17
18f9 01c3 | | Execute Vector,Check_In_Type
18fa e402 | | Load 0x2,0x2
18fb e001 | | Load 0x0,0x1
18fc 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
18fd 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
18fe 00d8 | | Load_Top At_Offset_0
18ff 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1900 e003 | | Load 0x0,0x3
1901 1b10 | | Execute Package,Field_Read,Field_Number 0x10
1902 1c08 | | Execute_Immediate Run_Utility,0x8
1903 00d8 | | Load_Top At_Offset_0
1904 1c00 | | Execute_Immediate Run_Utility,0x0
1905 BODY_18e0:
1905 00d9 | | Load_Top At_Offset_1
1906 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1907 6807 |h | Jump_Zero 0x190f
1908 00d9 | | Load_Top At_Offset_1
1909 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
190a e404 | | Load 0x2,0x4
190b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
190c e404 | | Load 0x2,0x4
190d 00cb | | Action Pop_Block_With_Result
190e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
190f 4800 |H | Short_Literal 0x0
1910 00d9 | | Load_Top At_Offset_1
1911 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1912 00cf | | Action Mark_Auxiliary
1913 00d9 | | Load_Top At_Offset_1
1914 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1915 4801 |H | Short_Literal 0x1
1916 0263 | c | Execute Discrete,Above_Bound
1917 7038 |p8 | Jump_Nonzero 0x1950
1918 00d8 | | Load_Top At_Offset_0
1919 e602 | | Load 0x3,0x2
191a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
191b 01d7 | | Execute Vector,Field_Read
191c e001 | | Load 0x0,0x1
191d 1b22 | " | Execute Package,Field_Read,Field_Number 0x22
191e 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
191f c403 | | Store 0x2,0x3
1920 e403 | | Load 0x2,0x3
1921 e002 | | Load 0x0,0x2
1922 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1923 6825 |h% | Jump_Zero 0x1949
1924 e5fc | | Load 0x2,-0x4
1925 4801 |H | Short_Literal 0x1
1926 4802 |H | Short_Literal 0x2
1927 e004 | | Load 0x0,0x4
1928 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1929 0334 | 4 | Declare_Variable Array,With_Constraint
192a e403 | | Load 0x2,0x3
192b e006 | | Load 0x0,0x6
192c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
192d e004 | | Load 0x0,0x4
192e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
192f 0119 | | Execute Any,Check_In_Formal_Type
1930 4801 |H | Short_Literal 0x1
1931 00da | | Load_Top At_Offset_2
1932 01d6 | | Execute Vector,Field_Write
1933 e5ff | | Load 0x2,-0x1
1934 0227 | ' | Execute Access,All_Reference
1935 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1936 e001 | | Load 0x0,0x1
1937 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1938 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1939 e004 | | Load 0x0,0x4
193a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
193b 0119 | | Execute Any,Check_In_Formal_Type
193c 4802 |H | Short_Literal 0x2
193d 00da | | Load_Top At_Offset_2
193e 01d6 | | Execute Vector,Field_Write
193f 679c |g | Indirect_Literal Discrete,0x18dc,{0x00000000, 0x0000815a}
1940 e005 | | Load 0x0,0x5
1941 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1942 e002 | | Load 0x0,0x2
1943 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1944 00d9 | | Load_Top At_Offset_1
1945 e603 | | Load 0x3,0x3
1946 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1947 01d6 | | Execute Vector,Field_Write
1948 7805 |x | Jump 0x194e
1949 e403 | | Load 0x2,0x3
194a 00d9 | | Load_Top At_Offset_1
194b e603 | | Load 0x3,0x3
194c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
194d 01d6 | | Execute Vector,Field_Write
194e 00c8 | | Action Pop_Auxiliary_Range
194f 3fc8 |? | Loop_Increasing 0x1918
1950 00ce | | Action Pop_Auxiliary
1951 00d8 | | Load_Top At_Offset_0
1952 00cb | | Action Pop_Block_With_Result
1953 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
1954 0000 0000 | | .BLANK 0000[0x4]
1958 ; --------------------------------------------------------------------------------------
1958 ; SUBPROGRAM
1958 ; --------------------------------------------------------------------------------------
1958 195b | [ | .CONST 0x195b ; Address of begin
1959 0004 | | .CONST 0x0004 ; Address of exception handler
195a 0001 | | .CONST 0x0001 ; Number of locals
195b BODY_1958:
195b INIT_1958:
195b e5fd | | Load 0x2,-0x3
195c 01db | | Execute Vector,Length
195d 7012 |p | Jump_Nonzero 0x1970
195e 4801 |H | Short_Literal 0x1
195f 0092 1ee3 | | Action Push_String_Extended,0x1ee3 ; "Rs6000_Aix_Ibm"
1961 e5fb | | Load 0x2,-0x5
1962 e009 | | Load 0x0,0x9
1963 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1964 e021 | ! | Load 0x0,0x21
1965 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1966 e00b | | Load 0x0,0xb
1967 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1968 6805 |h | Jump_Zero 0x196e
1969 e40f | | Load 0x2,0xf
196a 0092 1ee4 | | Action Push_String_Extended,0x1ee4 ; ".exe"
196c 01cc | | Execute Vector,Catenate
196d 00ca | | Action Exit_Nullary_Function
196e 00ea | | Load_Encached Null_String_Cache
196f 00ca | | Action Exit_Nullary_Function
1970 e5fd | | Load 0x2,-0x3
1971 0335 | 5 | Declare_Variable Array,Duplicate
1972 00cd | | Action Spare6_Action
1973 00ca | | Action Exit_Nullary_Function
1974 0000 0000 | | .BLANK 0000[0x4]
1978 ; --------------------------------------------------------------------------------------
1978 ; SUBPROGRAM
1978 ; --------------------------------------------------------------------------------------
1978 198d | | .CONST 0x198d ; Address of begin
1979 0004 | | .CONST 0x0004 ; Address of exception handler
197a 0004 | | .CONST 0x0004 ; Number of locals
197b INIT_1978:
197b e005 | | Load 0x0,0x5
197c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
197d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
197e e001 | | Load 0x0,0x1
197f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
1980 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1981 02c7 | | Declare_Variable Any
1982 00d8 | | Load_Top At_Offset_0
1983 1c00 | | Execute_Immediate Run_Utility,0x0
1984 e002 | | Load 0x0,0x2
1985 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1986 02c7 | | Declare_Variable Any
1987 e5fa | | Load 0x2,-0x6
1988 4800 |H | Short_Literal 0x0
1989 e5fe | | Load 0x2,-0x2
198a e006 | | Load 0x0,0x6
198b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
198c a604 | | Store_Unchecked 0x3,0x4
198d BODY_1978:
198d e40d | | Load 0x2,0xd
198e 700f |p | Jump_Nonzero 0x199e
198f e407 | | Load 0x2,0x7
1990 e008 | | Load 0x0,0x8
1991 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
1992 e5fa | | Load 0x2,-0x6
1993 e40e | | Load 0x2,0xe
1994 e5fb | | Load 0x2,-0x5
1995 e412 | | Load 0x2,0x12
1996 826e | n | Call 0x1,0x6e
1997 c40a | | Store 0x2,0xa
1998 c407 | | Store 0x2,0x7
1999 e407 | | Load 0x2,0x7
199a 6803 |h | Jump_Zero 0x199e
199b e00a | | Load 0x0,0xa
199c 1b19 | | Execute Package,Field_Read,Field_Number 0x19
199d 0257 | W | Execute Discrete,Raise
199e e407 | | Load 0x2,0x7
199f e5fa | | Load 0x2,-0x6
19a0 e40d | | Load 0x2,0xd
19a1 e411 | | Load 0x2,0x11
19a2 e410 | | Load 0x2,0x10
19a3 e40c | | Load 0x2,0xc
19a4 e40a | | Load 0x2,0xa
19a5 e5fb | | Load 0x2,-0x5
19a6 8270 | p | Call 0x1,0x70
19a7 c407 | | Store 0x2,0x7
19a8 e407 | | Load 0x2,0x7
19a9 6803 |h | Jump_Zero 0x19ad
19aa e00a | | Load 0x0,0xa
19ab 1b19 | | Execute Package,Field_Read,Field_Number 0x19
19ac 0257 | W | Execute Discrete,Raise
19ad e407 | | Load 0x2,0x7
19ae e5fa | | Load 0x2,-0x6
19af e40d | | Load 0x2,0xd
19b0 e411 | | Load 0x2,0x11
19b1 e410 | | Load 0x2,0x10
19b2 e40c | | Load 0x2,0xc
19b3 e40a | | Load 0x2,0xa
19b4 e5fb | | Load 0x2,-0x5
19b5 8271 | q | Call 0x1,0x71
19b6 c407 | | Store 0x2,0x7
19b7 e407 | | Load 0x2,0x7
19b8 6803 |h | Jump_Zero 0x19bc
19b9 e00a | | Load 0x0,0xa
19ba 1b19 | | Execute Package,Field_Read,Field_Number 0x19
19bb 0257 | W | Execute Discrete,Raise
19bc e407 | | Load 0x2,0x7
19bd e5fa | | Load 0x2,-0x6
19be e40d | | Load 0x2,0xd
19bf 8413 | | Call 0x2,0x13
19c0 e40f | | Load 0x2,0xf
19c1 e5fe | | Load 0x2,-0x2
19c2 e40c | | Load 0x2,0xc
19c3 e40a | | Load 0x2,0xa
19c4 e5fb | | Load 0x2,-0x5
19c5 e5ff | | Load 0x2,-0x1
19c6 8273 | s | Call 0x1,0x73
19c7 c407 | | Store 0x2,0x7
19c8 e407 | | Load 0x2,0x7
19c9 6803 |h | Jump_Zero 0x19cd
19ca e00a | | Load 0x0,0xa
19cb 1b19 | | Execute Package,Field_Read,Field_Number 0x19
19cc 0257 | W | Execute Discrete,Raise
19cd e407 | | Load 0x2,0x7
19ce e40a | | Load 0x2,0xa
19cf e5fa | | Load 0x2,-0x6
19d0 e40c | | Load 0x2,0xc
19d1 e5ff | | Load 0x2,-0x1
19d2 8413 | | Call 0x2,0x13
19d3 e411 | | Load 0x2,0x11
19d4 e412 | | Load 0x2,0x12
19d5 e410 | | Load 0x2,0x10
19d6 e5fb | | Load 0x2,-0x5
19d7 e009 | | Load 0x0,0x9
19d8 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
19d9 e402 | | Load 0x2,0x2
19da e001 | | Load 0x0,0x1
19db 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
19dc 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
19dd e5fb | | Load 0x2,-0x5
19de e009 | | Load 0x0,0x9
19df 18c2 | | Execute Package,Field_Execute,Field_Number 0xc2
19e0 e5fe | | Load 0x2,-0x2
19e1 0092 1ea5 | | Action Push_String_Extended,0x1ea5 ; "Link"
19e3 e009 | | Load 0x0,0x9
19e4 18c8 | | Execute Package,Field_Execute,Field_Number 0xc8
19e5 e407 | | Load 0x2,0x7
19e6 0f00 | | Execute_Immediate Equal,0x0
19e7 e009 | | Load 0x0,0x9
19e8 18c7 | | Execute Package,Field_Execute,Field_Number 0xc7
19e9 e5fb | | Load 0x2,-0x5
19ea e009 | | Load 0x0,0x9
19eb 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
19ec e010 | | Load 0x0,0x10
19ed 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
19ee c40a | | Store 0x2,0xa
19ef c407 | | Store 0x2,0x7
19f0 e40d | | Load 0x2,0xd
19f1 6801 |h | Jump_Zero 0x19f3
19f2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
19f3 e005 | | Load 0x0,0x5
19f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
19f5 e40e | | Load 0x2,0xe
19f6 e40a | | Load 0x2,0xa
19f7 e008 | | Load 0x0,0x8
19f8 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
19f9 c407 | | Store 0x2,0x7
19fa e407 | | Load 0x2,0x7
19fb 6805 |h | Jump_Zero 0x1a01
19fc e407 | | Load 0x2,0x7
19fd a5f9 | | Store_Unchecked 0x2,-0x7
19fe e00a | | Load 0x0,0xa
19ff 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1a00 0257 | W | Execute Discrete,Raise
1a01 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a02 0000 0000 | | .BLANK 0000[0x6]
1a08 ; --------------------------------------------------------------------------------------
1a08 ; SUBPROGRAM
1a08 ; --------------------------------------------------------------------------------------
1a08 1a15 | | .CONST 0x1a15 ; Address of begin
1a09 0004 | | .CONST 0x0004 ; Address of exception handler
1a0a 0003 | | .CONST 0x0003 ; Number of locals
1a0b INIT_1a08:
1a0b 4801 |H | Short_Literal 0x1
1a0c e5ff | | Load 0x2,-0x1
1a0d 0227 | ' | Execute Access,All_Reference
1a0e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1a0f e402 | | Load 0x2,0x2
1a10 e001 | | Load 0x0,0x1
1a11 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
1a12 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1a13 e002 | | Load 0x0,0x2
1a14 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1a15 BODY_1a08:
1a15 00d9 | | Load_Top At_Offset_1
1a16 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1a17 6806 |h | Jump_Zero 0x1a1e
1a18 00d9 | | Load_Top At_Offset_1
1a19 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1a1a a5f9 | | Store_Unchecked 0x2,-0x7
1a1b e00a | | Load 0x0,0xa
1a1c 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1a1d 0257 | W | Execute Discrete,Raise
1a1e 00cf | | Action Mark_Auxiliary
1a1f 00da | | Load_Top At_Offset_2
1a20 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a21 01dc | | Execute Vector,Last
1a22 4801 |H | Short_Literal 0x1
1a23 0263 | c | Execute Discrete,Above_Bound
1a24 711d |q | Jump_Nonzero 0x1b42
1a25 e407 | | Load 0x2,0x7
1a26 e404 | | Load 0x2,0x4
1a27 0120 | | Execute Any,Is_Value
1a28 6803 |h | Jump_Zero 0x1a2c
1a29 e002 | | Load 0x0,0x2
1a2a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1a2b 7801 |x | Jump 0x1a2d
1a2c e404 | | Load 0x2,0x4
1a2d 00da | | Load_Top At_Offset_2
1a2e e602 | | Load 0x3,0x2
1a2f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a30 01d7 | | Execute Vector,Field_Read
1a31 e001 | | Load 0x0,0x1
1a32 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1a33 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1a34 c404 | | Store 0x2,0x4
1a35 c407 | | Store 0x2,0x7
1a36 e407 | | Load 0x2,0x7
1a37 6805 |h | Jump_Zero 0x1a3d
1a38 e407 | | Load 0x2,0x7
1a39 a5f9 | | Store_Unchecked 0x2,-0x7
1a3a e00a | | Load 0x0,0xa
1a3b 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1a3c 0257 | W | Execute Discrete,Raise
1a3d 00d8 | | Load_Top At_Offset_0
1a3e e602 | | Load 0x3,0x2
1a3f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a40 01d7 | | Execute Vector,Field_Read
1a41 e001 | | Load 0x0,0x1
1a42 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1a43 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1a44 703f |p? | Jump_Nonzero 0x1a84
1a45 e5fa | | Load 0x2,-0x6
1a46 4801 |H | Short_Literal 0x1
1a47 4802 |H | Short_Literal 0x2
1a48 e004 | | Load 0x0,0x4
1a49 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1a4a 0334 | 4 | Declare_Variable Array,With_Constraint
1a4b 00da | | Load_Top At_Offset_2
1a4c e602 | | Load 0x3,0x2
1a4d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a4e 01d7 | | Execute Vector,Field_Read
1a4f e001 | | Load 0x0,0x1
1a50 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1a51 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1a52 e004 | | Load 0x0,0x4
1a53 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1a54 0119 | | Execute Any,Check_In_Formal_Type
1a55 4801 |H | Short_Literal 0x1
1a56 00da | | Load_Top At_Offset_2
1a57 01d6 | | Execute Vector,Field_Write
1a58 e5ff | | Load 0x2,-0x1
1a59 0227 | ' | Execute Access,All_Reference
1a5a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1a5b e001 | | Load 0x0,0x1
1a5c 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1a5d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1a5e e004 | | Load 0x0,0x4
1a5f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1a60 0119 | | Execute Any,Check_In_Formal_Type
1a61 4802 |H | Short_Literal 0x2
1a62 00da | | Load_Top At_Offset_2
1a63 01d6 | | Execute Vector,Field_Write
1a64 60f7 |` | Indirect_Literal Discrete,0x1b5c,{0x00000000, 0x0000815a}
1a65 e005 | | Load 0x0,0x5
1a66 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1a67 4801 |H | Short_Literal 0x1
1a68 4802 |H | Short_Literal 0x2
1a69 e004 | | Load 0x0,0x4
1a6a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1a6b 0334 | 4 | Declare_Variable Array,With_Constraint
1a6c e004 | | Load 0x0,0x4
1a6d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1a6e e004 | | Load 0x0,0x4
1a6f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1a70 0119 | | Execute Any,Check_In_Formal_Type
1a71 4801 |H | Short_Literal 0x1
1a72 00da | | Load_Top At_Offset_2
1a73 01d6 | | Execute Vector,Field_Write
1a74 e5fe | | Load 0x2,-0x2
1a75 e006 | | Load 0x0,0x6
1a76 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1a77 e004 | | Load 0x0,0x4
1a78 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1a79 0119 | | Execute Any,Check_In_Formal_Type
1a7a 4802 |H | Short_Literal 0x2
1a7b 00da | | Load_Top At_Offset_2
1a7c 01d6 | | Execute Vector,Field_Write
1a7d 60da |` | Indirect_Literal Discrete,0x1b58,{0x00000000, 0x00008126}
1a7e e005 | | Load 0x0,0x5
1a7f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1a80 a5f9 | | Store_Unchecked 0x2,-0x7
1a81 e00a | | Load 0x0,0xa
1a82 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1a83 0257 | W | Execute Discrete,Raise
1a84 e002 | | Load 0x0,0x2
1a85 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1a86 e405 | | Load 0x2,0x5
1a87 60cc |` | Indirect_Literal Discrete,0x1b54,{0x00000000, 0x00004000}
1a88 e00e | | Load 0x0,0xe
1a89 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1a8a 4800 |H | Short_Literal 0x0
1a8b e404 | | Load 0x2,0x4
1a8c e002 | | Load 0x0,0x2
1a8d 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
1a8e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1a8f 00d1 | | Pop_Control Pop_Count_1
1a90 c603 | | Store 0x3,0x3
1a91 00db | | Load_Top At_Offset_3
1a92 6844 |hD | Jump_Zero 0x1ad7
1a93 e5fa | | Load 0x2,-0x6
1a94 4801 |H | Short_Literal 0x1
1a95 4803 |H | Short_Literal 0x3
1a96 e004 | | Load 0x0,0x4
1a97 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1a98 0334 | 4 | Declare_Variable Array,With_Constraint
1a99 e404 | | Load 0x2,0x4
1a9a e004 | | Load 0x0,0x4
1a9b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1a9c e004 | | Load 0x0,0x4
1a9d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1a9e 0119 | | Execute Any,Check_In_Formal_Type
1a9f 4801 |H | Short_Literal 0x1
1aa0 00da | | Load_Top At_Offset_2
1aa1 01d6 | | Execute Vector,Field_Write
1aa2 e5ff | | Load 0x2,-0x1
1aa3 0227 | ' | Execute Access,All_Reference
1aa4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1aa5 e001 | | Load 0x0,0x1
1aa6 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1aa7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1aa8 e004 | | Load 0x0,0x4
1aa9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1aaa 0119 | | Execute Any,Check_In_Formal_Type
1aab 4802 |H | Short_Literal 0x2
1aac 00da | | Load_Top At_Offset_2
1aad 01d6 | | Execute Vector,Field_Write
1aae e603 | | Load 0x3,0x3
1aaf e004 | | Load 0x0,0x4
1ab0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1ab1 e004 | | Load 0x0,0x4
1ab2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1ab3 0119 | | Execute Any,Check_In_Formal_Type
1ab4 4803 |H | Short_Literal 0x3
1ab5 00da | | Load_Top At_Offset_2
1ab6 01d6 | | Execute Vector,Field_Write
1ab7 6098 |` | Indirect_Literal Discrete,0x1b50,{0x00000000, 0x00008158}
1ab8 e005 | | Load 0x0,0x5
1ab9 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1aba 4801 |H | Short_Literal 0x1
1abb 4802 |H | Short_Literal 0x2
1abc e004 | | Load 0x0,0x4
1abd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1abe 0334 | 4 | Declare_Variable Array,With_Constraint
1abf e004 | | Load 0x0,0x4
1ac0 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1ac1 e004 | | Load 0x0,0x4
1ac2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1ac3 0119 | | Execute Any,Check_In_Formal_Type
1ac4 4801 |H | Short_Literal 0x1
1ac5 00da | | Load_Top At_Offset_2
1ac6 01d6 | | Execute Vector,Field_Write
1ac7 e5fe | | Load 0x2,-0x2
1ac8 e006 | | Load 0x0,0x6
1ac9 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1aca e004 | | Load 0x0,0x4
1acb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1acc 0119 | | Execute Any,Check_In_Formal_Type
1acd 4802 |H | Short_Literal 0x2
1ace 00da | | Load_Top At_Offset_2
1acf 01d6 | | Execute Vector,Field_Write
1ad0 6087 |` | Indirect_Literal Discrete,0x1b58,{0x00000000, 0x00008126}
1ad1 e005 | | Load 0x0,0x5
1ad2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1ad3 a5f9 | | Store_Unchecked 0x2,-0x7
1ad4 e00a | | Load 0x0,0xa
1ad5 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1ad6 0257 | W | Execute Discrete,Raise
1ad7 e002 | | Load 0x0,0x2
1ad8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1ad9 e002 | | Load 0x0,0x2
1ada 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
1adb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1adc 6077 |`w | Indirect_Literal Discrete,0x1b54,{0x00000000, 0x00004000}
1add e00e | | Load 0x0,0xe
1ade 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1adf e405 | | Load 0x2,0x5
1ae0 e002 | | Load 0x0,0x2
1ae1 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
1ae2 180e | | Execute Package,Field_Execute,Field_Number 0xe
1ae3 c403 | | Store 0x2,0x3
1ae4 c603 | | Store 0x3,0x3
1ae5 00db | | Load_Top At_Offset_3
1ae6 6838 |h8 | Jump_Zero 0x1b1f
1ae7 e5fa | | Load 0x2,-0x6
1ae8 4801 |H | Short_Literal 0x1
1ae9 4802 |H | Short_Literal 0x2
1aea e004 | | Load 0x0,0x4
1aeb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1aec 0334 | 4 | Declare_Variable Array,With_Constraint
1aed e404 | | Load 0x2,0x4
1aee e004 | | Load 0x0,0x4
1aef 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1af0 e004 | | Load 0x0,0x4
1af1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1af2 0119 | | Execute Any,Check_In_Formal_Type
1af3 4801 |H | Short_Literal 0x1
1af4 00da | | Load_Top At_Offset_2
1af5 01d6 | | Execute Vector,Field_Write
1af6 e603 | | Load 0x3,0x3
1af7 e004 | | Load 0x0,0x4
1af8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1af9 e004 | | Load 0x0,0x4
1afa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1afb 0119 | | Execute Any,Check_In_Formal_Type
1afc 4802 |H | Short_Literal 0x2
1afd 00da | | Load_Top At_Offset_2
1afe 01d6 | | Execute Vector,Field_Write
1aff 604c |`L | Indirect_Literal Discrete,0x1b4c,{0x00000000, 0x00008157}
1b00 e005 | | Load 0x0,0x5
1b01 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1b02 4801 |H | Short_Literal 0x1
1b03 4802 |H | Short_Literal 0x2
1b04 e004 | | Load 0x0,0x4
1b05 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1b06 0334 | 4 | Declare_Variable Array,With_Constraint
1b07 e004 | | Load 0x0,0x4
1b08 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1b09 e004 | | Load 0x0,0x4
1b0a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1b0b 0119 | | Execute Any,Check_In_Formal_Type
1b0c 4801 |H | Short_Literal 0x1
1b0d 00da | | Load_Top At_Offset_2
1b0e 01d6 | | Execute Vector,Field_Write
1b0f e5fe | | Load 0x2,-0x2
1b10 e006 | | Load 0x0,0x6
1b11 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1b12 e004 | | Load 0x0,0x4
1b13 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1b14 0119 | | Execute Any,Check_In_Formal_Type
1b15 4802 |H | Short_Literal 0x2
1b16 00da | | Load_Top At_Offset_2
1b17 01d6 | | Execute Vector,Field_Write
1b18 603f |`? | Indirect_Literal Discrete,0x1b58,{0x00000000, 0x00008126}
1b19 e005 | | Load 0x0,0x5
1b1a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1b1b a5f9 | | Store_Unchecked 0x2,-0x7
1b1c e00a | | Load 0x0,0xa
1b1d 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1b1e 0257 | W | Execute Discrete,Raise
1b1f e403 | | Load 0x2,0x3
1b20 0e04 | | Execute_Immediate Not_Equal,0x4
1b21 681e |h | Jump_Zero 0x1b40
1b22 e406 | | Load 0x2,0x6
1b23 0a01 | | Execute_Immediate Plus,0x1
1b24 c406 | | Store 0x2,0x6
1b25 e5fa | | Load 0x2,-0x6
1b26 4801 |H | Short_Literal 0x1
1b27 4802 |H | Short_Literal 0x2
1b28 e004 | | Load 0x0,0x4
1b29 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1b2a 0334 | 4 | Declare_Variable Array,With_Constraint
1b2b e404 | | Load 0x2,0x4
1b2c e006 | | Load 0x0,0x6
1b2d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1b2e e004 | | Load 0x0,0x4
1b2f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1b30 0119 | | Execute Any,Check_In_Formal_Type
1b31 4801 |H | Short_Literal 0x1
1b32 00da | | Load_Top At_Offset_2
1b33 01d6 | | Execute Vector,Field_Write
1b34 e5fe | | Load 0x2,-0x2
1b35 e006 | | Load 0x0,0x6
1b36 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1b37 e004 | | Load 0x0,0x4
1b38 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1b39 0119 | | Execute Any,Check_In_Formal_Type
1b3a 4802 |H | Short_Literal 0x2
1b3b 00da | | Load_Top At_Offset_2
1b3c 01d6 | | Execute Vector,Field_Write
1b3d 600a |` | Indirect_Literal Discrete,0x1b48,{0x00000000, 0x00008127}
1b3e e005 | | Load 0x0,0x5
1b3f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1b40 00c8 | | Action Pop_Auxiliary_Range
1b41 3ee3 |> | Loop_Increasing 0x1a25
1b42 00ce | | Action Pop_Auxiliary
1b43 e406 | | Load 0x2,0x6
1b44 0f00 | | Execute_Immediate Equal,0x0
1b45 00ca | | Action Exit_Nullary_Function
1b46 0000 0000 | | .XXX[0x2]
1b48 0000 0000 | | .LITERAL {0x00000000, 0x00008127}
1b4c 0000 0000 | | .LITERAL {0x00000000, 0x00008157}
1b50 0000 0000 | | .LITERAL {0x00000000, 0x00008158}
1b54 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
1b58 0000 0000 | | .LITERAL {0x00000000, 0x00008126}
1b5c 0000 0000 | | .LITERAL {0x00000000, 0x0000815a}
1b60 ; --------------------------------------------------------------------------------------
1b60 ; SUBPROGRAM
1b60 ; --------------------------------------------------------------------------------------
1b60 1b75 | u | .CONST 0x1b75 ; Address of begin
1b61 0004 | | .CONST 0x0004 ; Address of exception handler
1b62 0006 | | .CONST 0x0006 ; Number of locals
1b63 INIT_1b60:
1b63 e402 | | Load 0x2,0x2
1b64 e001 | | Load 0x0,0x1
1b65 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
1b66 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
1b67 e001 | | Load 0x0,0x1
1b68 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
1b69 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1b6a e402 | | Load 0x2,0x2
1b6b e001 | | Load 0x0,0x1
1b6c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1b6d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1b6e e011 | | Load 0x0,0x11
1b6f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1b70 e005 | | Load 0x0,0x5
1b71 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1b72 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1b73 029f 1e43 | C| Declare_Subprogram INIT_1e40,For_Call
1b75 BODY_1b60:
1b75 e5fa | | Load 0x2,-0x6
1b76 4801 |H | Short_Literal 0x1
1b77 4801 |H | Short_Literal 0x1
1b78 e004 | | Load 0x0,0x4
1b79 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1b7a 0334 | 4 | Declare_Variable Array,With_Constraint
1b7b e603 | | Load 0x3,0x3
1b7c e004 | | Load 0x0,0x4
1b7d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1b7e e004 | | Load 0x0,0x4
1b7f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1b80 0119 | | Execute Any,Check_In_Formal_Type
1b81 4801 |H | Short_Literal 0x1
1b82 00da | | Load_Top At_Offset_2
1b83 01d6 | | Execute Vector,Field_Write
1b84 6063 |`c | Indirect_Literal Discrete,0x1be8,{0x00000000, 0x0000816b}
1b85 e005 | | Load 0x0,0x5
1b86 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1b87 e5ff | | Load 0x2,-0x1
1b88 0229 | ) | Execute Access,All_Read
1b89 00d8 | | Load_Top At_Offset_0
1b8a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1b8b e001 | | Load 0x0,0x1
1b8c 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1b8d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1b8e 00d9 | | Load_Top At_Offset_1
1b8f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1b90 00d1 | | Pop_Control Pop_Count_1
1b91 e011 | | Load 0x0,0x11
1b92 180e | | Execute Package,Field_Execute,Field_Number 0xe
1b93 e011 | | Load 0x0,0x11
1b94 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1b95 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
1b96 4803 |H | Short_Literal 0x3
1b97 e011 | | Load 0x0,0x11
1b98 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1b99 8606 | | Call 0x3,0x6
1b9a e005 | | Load 0x0,0x5
1b9b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1b9c e5fa | | Load 0x2,-0x6
1b9d e022 | " | Load 0x0,0x22
1b9e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1b9f 005a | Z | Store_Top Discrete,At_Offset_2
1ba0 00d9 | | Load_Top At_Offset_1
1ba1 6805 |h | Jump_Zero 0x1ba7
1ba2 e5fa | | Load 0x2,-0x6
1ba3 00da | | Load_Top At_Offset_2
1ba4 e005 | | Load 0x0,0x5
1ba5 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1ba6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1ba7 00da | | Load_Top At_Offset_2
1ba8 e011 | | Load 0x0,0x11
1ba9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1baa e5fa | | Load 0x2,-0x6
1bab 0092 1ee5 | | Action Push_String_Extended,0x1ee5 ; "Target_Builder.Unit.Link (in Make_Closure)"
1bad e007 | | Load 0x0,0x7
1bae 180e | | Execute Package,Field_Execute,Field_Number 0xe
1baf e5ff | | Load 0x2,-0x1
1bb0 0229 | ) | Execute Access,All_Read
1bb1 e7ff | | Load 0x3,-0x1
1bb2 00d9 | | Load_Top At_Offset_1
1bb3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1bb4 0120 | | Execute Any,Is_Value
1bb5 6804 |h | Jump_Zero 0x1bba
1bb6 e001 | | Load 0x0,0x1
1bb7 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1bb8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1bb9 7802 |x | Jump 0x1bbc
1bba 00d9 | | Load_Top At_Offset_1
1bbb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1bbc 4801 |H | Short_Literal 0x1
1bbd e5fb | | Load 0x2,-0x5
1bbe e009 | | Load 0x0,0x9
1bbf 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
1bc0 4801 |H | Short_Literal 0x1
1bc1 e602 | | Load 0x3,0x2
1bc2 e001 | | Load 0x0,0x1
1bc3 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1bc4 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1bc5 00da | | Load_Top At_Offset_2
1bc6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1bc7 c7ff | | Store 0x3,-0x1
1bc8 00d1 | | Pop_Control Pop_Count_1
1bc9 e7ff | | Load 0x3,-0x1
1bca 6801 |h | Jump_Zero 0x1bcc
1bcb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1bcc 4800 |H | Short_Literal 0x0
1bcd 4800 |H | Short_Literal 0x0
1bce e603 | | Load 0x3,0x3
1bcf 4801 |H | Short_Literal 0x1
1bd0 e5ff | | Load 0x2,-0x1
1bd1 0227 | ' | Execute Access,All_Reference
1bd2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1bd3 e001 | | Load 0x0,0x1
1bd4 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1bd5 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
1bd6 e5ff | | Load 0x2,-0x1
1bd7 0227 | ' | Execute Access,All_Reference
1bd8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1bd9 e001 | | Load 0x0,0x1
1bda 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1bdb 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
1bdc e5ff | | Load 0x2,-0x1
1bdd 0227 | ' | Execute Access,All_Reference
1bde 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1bdf e5fe | | Load 0x2,-0x2
1be0 e002 | | Load 0x0,0x2
1be1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1be2 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1be3 e001 | | Load 0x0,0x1
1be4 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1be5 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1be6 c402 | | Store 0x2,0x2
1be7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1be8 0000 0000 | | .LITERAL {0x00000000, 0x0000816b}
1bec 0000 0000 | | .BLANK 0000[0x4]
1bf0 ; --------------------------------------------------------------------------------------
1bf0 ; SUBPROGRAM
1bf0 ; --------------------------------------------------------------------------------------
1bf0 1c03 | | .CONST 0x1c03 ; Address of begin
1bf1 0004 | | .CONST 0x0004 ; Address of exception handler
1bf2 0003 | | .CONST 0x0003 ; Number of locals
1bf3 INIT_1bf0:
1bf3 e002 | | Load 0x0,0x2
1bf4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1bf5 02c7 | | Declare_Variable Any
1bf6 00d8 | | Load_Top At_Offset_0
1bf7 1c00 | | Execute_Immediate Run_Utility,0x0
1bf8 e414 | | Load 0x2,0x14
1bf9 e5fd | | Load 0x2,-0x3
1bfa e009 | | Load 0x0,0x9
1bfb 186f | o | Execute Package,Field_Execute,Field_Number 0x6f
1bfc e5fd | | Load 0x2,-0x3
1bfd e404 | | Load 0x2,0x4
1bfe e407 | | Load 0x2,0x7
1bff e408 | | Load 0x2,0x8
1c00 8268 | h | Call 0x1,0x68
1c01 01cc | | Execute Vector,Catenate
1c02 0007 | | Action Break_Optional
1c03 BODY_1bf0:
1c03 e5fc | | Load 0x2,-0x4
1c04 0092 1ee6 | | Action Push_String_Extended,0x1ee6 ; "Transferring => "
1c06 e408 | | Load 0x2,0x8
1c07 e002 | | Load 0x0,0x2
1c08 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1c09 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1c0a 01cc | | Execute Vector,Catenate
1c0b e007 | | Load 0x0,0x7
1c0c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1c0d e404 | | Load 0x2,0x4
1c0e 6803 |h | Jump_Zero 0x1c12
1c0f e409 | | Load 0x2,0x9
1c10 c602 | | Store 0x3,0x2
1c11 7802 |x | Jump 0x1c14
1c12 e408 | | Load 0x2,0x8
1c13 c602 | | Store 0x3,0x2
1c14 e005 | | Load 0x0,0x5
1c15 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1c16 e40e | | Load 0x2,0xe
1c17 e00a | | Load 0x0,0xa
1c18 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1c19 e00a | | Load 0x0,0xa
1c1a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1c1b 4800 |H | Short_Literal 0x0
1c1c e40d | | Load 0x2,0xd
1c1d e603 | | Load 0x3,0x3
1c1e e602 | | Load 0x3,0x2
1c1f e002 | | Load 0x0,0x2
1c20 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1c21 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1c22 e008 | | Load 0x0,0x8
1c23 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
1c24 c40c | | Store 0x2,0xc
1c25 e40c | | Load 0x2,0xc
1c26 6809 |h | Jump_Zero 0x1c30
1c27 e5fc | | Load 0x2,-0x4
1c28 e40c | | Load 0x2,0xc
1c29 e005 | | Load 0x0,0x5
1c2a 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1c2b e40c | | Load 0x2,0xc
1c2c a5fb | | Store_Unchecked 0x2,-0x5
1c2d e00a | | Load 0x0,0xa
1c2e 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1c2f 0257 | W | Execute Discrete,Raise
1c30 e5fc | | Load 0x2,-0x4
1c31 0092 1ee7 | | Action Push_String_Extended,0x1ee7 ; "Retrieving remote update time for host unit => "
1c33 e408 | | Load 0x2,0x8
1c34 e002 | | Load 0x0,0x2
1c35 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1c36 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1c37 01cc | | Execute Vector,Catenate
1c38 e007 | | Load 0x0,0x7
1c39 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1c3a e00c | | Load 0x0,0xc
1c3b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1c3c c411 | | Store 0x2,0x11
1c3d e404 | | Load 0x2,0x4
1c3e 680b |h | Jump_Zero 0x1c4a
1c3f e40c | | Load 0x2,0xc
1c40 e5fc | | Load 0x2,-0x4
1c41 4800 |H | Short_Literal 0x0
1c42 e5fd | | Load 0x2,-0x3
1c43 e40d | | Load 0x2,0xd
1c44 4801 |H | Short_Literal 0x1
1c45 e408 | | Load 0x2,0x8
1c46 e414 | | Load 0x2,0x14
1c47 826b | k | Call 0x1,0x6b
1c48 c40c | | Store 0x2,0xc
1c49 780c |x | Jump 0x1c56
1c4a e40c | | Load 0x2,0xc
1c4b e407 | | Load 0x2,0x7
1c4c e5fc | | Load 0x2,-0x4
1c4d 4800 |H | Short_Literal 0x0
1c4e e5fd | | Load 0x2,-0x3
1c4f e40d | | Load 0x2,0xd
1c50 4801 |H | Short_Literal 0x1
1c51 e414 | | Load 0x2,0x14
1c52 e5ff | | Load 0x2,-0x1
1c53 826a | j | Call 0x1,0x6a
1c54 c407 | | Store 0x2,0x7
1c55 c40c | | Store 0x2,0xc
1c56 e40c | | Load 0x2,0xc
1c57 6815 |h | Jump_Zero 0x1c6d
1c58 e5fc | | Load 0x2,-0x4
1c59 4801 |H | Short_Literal 0x1
1c5a 4801 |H | Short_Literal 0x1
1c5b e004 | | Load 0x0,0x4
1c5c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1c5d 0334 | 4 | Declare_Variable Array,With_Constraint
1c5e e408 | | Load 0x2,0x8
1c5f e006 | | Load 0x0,0x6
1c60 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1c61 e004 | | Load 0x0,0x4
1c62 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1c63 0119 | | Execute Any,Check_In_Formal_Type
1c64 4801 |H | Short_Literal 0x1
1c65 00da | | Load_Top At_Offset_2
1c66 01d6 | | Execute Vector,Field_Write
1c67 6018 |` | Indirect_Literal Discrete,0x1c80,{0x00000000, 0x0000815e}
1c68 e005 | | Load 0x0,0x5
1c69 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1c6a 4800 |H | Short_Literal 0x0
1c6b a40c | | Store_Unchecked 0x2,0xc
1c6c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1c6d e5fc | | Load 0x2,-0x4
1c6e 0092 1ee8 | | Action Push_String_Extended,0x1ee8 ; "Elapsed time for setting download time => "
1c70 e411 | | Load 0x2,0x11
1c71 e00c | | Load 0x0,0xc
1c72 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1c73 e00c | | Load 0x0,0xc
1c74 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1c75 e023 | # | Load 0x0,0x23
1c76 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1c77 01cc | | Execute Vector,Catenate
1c78 0092 1ee9 | | Action Push_String_Extended,0x1ee9 ; " seconds."
1c7a 01cc | | Execute Vector,Catenate
1c7b e007 | | Load 0x0,0x7
1c7c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1c7d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1c7e 0000 0000 | | .XXX[0x2]
1c80 0000 0000 | | .LITERAL {0x00000000, 0x0000815e}
1c84 0000 0000 | | .BLANK 0000[0x4]
1c88 ; --------------------------------------------------------------------------------------
1c88 ; SUBPROGRAM
1c88 ; --------------------------------------------------------------------------------------
1c88 1c9f | | .CONST 0x1c9f ; Address of begin
1c89 0004 | | .CONST 0x0004 ; Address of exception handler
1c8a 0005 | | .CONST 0x0005 ; Number of locals
1c8b INIT_1c88:
1c8b e005 | | Load 0x0,0x5
1c8c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1c8d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1c8e e001 | | Load 0x0,0x1
1c8f 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
1c90 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1c91 02c7 | | Declare_Variable Any
1c92 00d8 | | Load_Top At_Offset_0
1c93 1c00 | | Execute_Immediate Run_Utility,0x0
1c94 e002 | | Load 0x0,0x2
1c95 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1c96 02c7 | | Declare_Variable Any
1c97 e5fc | | Load 0x2,-0x4
1c98 4800 |H | Short_Literal 0x0
1c99 e5fe | | Load 0x2,-0x2
1c9a e006 | | Load 0x0,0x6
1c9b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1c9c a604 | | Store_Unchecked 0x3,0x4
1c9d 029f 1e8b | | Declare_Subprogram INIT_1e88,For_Call
1c9f BODY_1c88:
1c9f e5fc | | Load 0x2,-0x4
1ca0 0092 1eea | | Action Push_String_Extended,0x1eea ; "Promoting => "
1ca2 e408 | | Load 0x2,0x8
1ca3 e002 | | Load 0x0,0x2
1ca4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1ca5 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1ca6 01cc | | Execute Vector,Catenate
1ca7 e007 | | Load 0x0,0x7
1ca8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1ca9 e40f | | Load 0x2,0xf
1caa 700f |p | Jump_Nonzero 0x1cba
1cab e40c | | Load 0x2,0xc
1cac e008 | | Load 0x0,0x8
1cad 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
1cae e5fc | | Load 0x2,-0x4
1caf e410 | | Load 0x2,0x10
1cb0 e5fd | | Load 0x2,-0x3
1cb1 e413 | | Load 0x2,0x13
1cb2 826e | n | Call 0x1,0x6e
1cb3 c40d | | Store 0x2,0xd
1cb4 c40c | | Store 0x2,0xc
1cb5 e40c | | Load 0x2,0xc
1cb6 6803 |h | Jump_Zero 0x1cba
1cb7 e00a | | Load 0x0,0xa
1cb8 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1cb9 0257 | W | Execute Discrete,Raise
1cba e40c | | Load 0x2,0xc
1cbb e5fc | | Load 0x2,-0x4
1cbc e40f | | Load 0x2,0xf
1cbd e412 | | Load 0x2,0x12
1cbe e414 | | Load 0x2,0x14
1cbf e40e | | Load 0x2,0xe
1cc0 e40d | | Load 0x2,0xd
1cc1 e5fd | | Load 0x2,-0x3
1cc2 8270 | p | Call 0x1,0x70
1cc3 c40c | | Store 0x2,0xc
1cc4 e40c | | Load 0x2,0xc
1cc5 6803 |h | Jump_Zero 0x1cc9
1cc6 e00a | | Load 0x0,0xa
1cc7 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1cc8 0257 | W | Execute Discrete,Raise
1cc9 e40f | | Load 0x2,0xf
1cca 7001 |p | Jump_Nonzero 0x1ccc
1ccb 8415 | | Call 0x2,0x15
1ccc e40c | | Load 0x2,0xc
1ccd e5fc | | Load 0x2,-0x4
1cce e40f | | Load 0x2,0xf
1ccf e412 | | Load 0x2,0x12
1cd0 e414 | | Load 0x2,0x14
1cd1 e40e | | Load 0x2,0xe
1cd2 e40d | | Load 0x2,0xd
1cd3 e5fd | | Load 0x2,-0x3
1cd4 8271 | q | Call 0x1,0x71
1cd5 c40c | | Store 0x2,0xc
1cd6 e40c | | Load 0x2,0xc
1cd7 6803 |h | Jump_Zero 0x1cdb
1cd8 e00a | | Load 0x0,0xa
1cd9 1b19 | | Execute Package,Field_Read,Field_Number 0x19
1cda 0257 | W | Execute Discrete,Raise
1cdb e404 | | Load 0x2,0x4
1cdc 6802 |h | Jump_Zero 0x1cdf
1cdd 8605 | | Call 0x3,0x5
1cde 7832 |x2 | Jump 0x1d11
1cdf e40c | | Load 0x2,0xc
1ce0 e5fc | | Load 0x2,-0x4
1ce1 e40f | | Load 0x2,0xf
1ce2 4800 |H | Short_Literal 0x0
1ce3 e5fd | | Load 0x2,-0x3
1ce4 e009 | | Load 0x0,0x9
1ce5 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
1ce6 e407 | | Load 0x2,0x7
1ce7 e001 | | Load 0x0,0x1
1ce8 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1ce9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1cea e40e | | Load 0x2,0xe
1ceb e40d | | Load 0x2,0xd
1cec e5fe | | Load 0x2,-0x2
1ced e5fd | | Load 0x2,-0x3
1cee e5ff | | Load 0x2,-0x1
1cef 8272 | r | Call 0x1,0x72
1cf0 c40c | | Store 0x2,0xc
1cf1 00db | | Load_Top At_Offset_3
1cf2 e40d | | Load 0x2,0xd
1cf3 e5fc | | Load 0x2,-0x4
1cf4 e40e | | Load 0x2,0xe
1cf5 e5ff | | Load 0x2,-0x1
1cf6 00ea | | Load_Encached Null_String_Cache
1cf7 e412 | | Load 0x2,0x12
1cf8 e413 | | Load 0x2,0x13
1cf9 e414 | | Load 0x2,0x14
1cfa e5fd | | Load 0x2,-0x3
1cfb e009 | | Load 0x0,0x9
1cfc 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
1cfd e407 | | Load 0x2,0x7
1cfe e001 | | Load 0x0,0x1
1cff 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1d00 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1d01 e5fe | | Load 0x2,-0x2
1d02 0092 1eeb | | Action Push_String_Extended,0x1eeb ; "Promote"
1d04 e009 | | Load 0x0,0x9
1d05 18c8 | | Execute Package,Field_Execute,Field_Number 0xc8
1d06 e40c | | Load 0x2,0xc
1d07 0f00 | | Execute_Immediate Equal,0x0
1d08 e009 | | Load 0x0,0x9
1d09 18c7 | | Execute Package,Field_Execute,Field_Number 0xc7
1d0a e5fd | | Load 0x2,-0x3
1d0b e009 | | Load 0x0,0x9
1d0c 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1d0d e010 | | Load 0x0,0x10
1d0e 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
1d0f c40d | | Store 0x2,0xd
1d10 c602 | | Store 0x3,0x2
1d11 e40f | | Load 0x2,0xf
1d12 6801 |h | Jump_Zero 0x1d14
1d13 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1d14 00db | | Load_Top At_Offset_3
1d15 6805 |h | Jump_Zero 0x1d1b
1d16 e011 | | Load 0x0,0x11
1d17 180e | | Execute Package,Field_Execute,Field_Number 0xe
1d18 e602 | | Load 0x3,0x2
1d19 e005 | | Load 0x0,0x5
1d1a 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1d1b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1d1c 0000 0000 | | .BLANK 0000[0x4]
1d20 ; --------------------------------------------------------------------------------------
1d20 ; SUBPROGRAM
1d20 ; --------------------------------------------------------------------------------------
1d20 1d2b | + | .CONST 0x1d2b ; Address of begin
1d21 0004 | | .CONST 0x0004 ; Address of exception handler
1d22 0002 | | .CONST 0x0002 ; Number of locals
1d23 INIT_1d20:
1d23 e5ff | | Load 0x2,-0x1
1d24 0227 | ' | Execute Access,All_Reference
1d25 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1d26 0092 1eec | | Action Push_String_Extended,0x1eec ; "?'IS(DOWNLOADABLE)"
1d28 e001 | | Load 0x0,0x1
1d29 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1d2a 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
1d2b BODY_1d20:
1d2b 00cf | | Action Mark_Auxiliary
1d2c 00d9 | | Load_Top At_Offset_1
1d2d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1d2e 4801 |H | Short_Literal 0x1
1d2f 0263 | c | Execute Discrete,Above_Bound
1d30 7019 |p | Jump_Nonzero 0x1d4a
1d31 e5fd | | Load 0x2,-0x3
1d32 e009 | | Load 0x0,0x9
1d33 18d3 | | Execute Package,Field_Execute,Field_Number 0xd3
1d34 0f00 | | Execute_Immediate Equal,0x0
1d35 e5fe | | Load 0x2,-0x2
1d36 e402 | | Load 0x2,0x2
1d37 00db | | Load_Top At_Offset_3
1d38 e602 | | Load 0x3,0x2
1d39 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1d3a 01d7 | | Execute Vector,Field_Read
1d3b e001 | | Load 0x0,0x1
1d3c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1d3d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1d3e e00b | | Load 0x0,0xb
1d3f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1d40 6807 |h | Jump_Zero 0x1d48
1d41 00d8 | | Load_Top At_Offset_0
1d42 e602 | | Load 0x3,0x2
1d43 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1d44 01d7 | | Execute Vector,Field_Read
1d45 c404 | | Store 0x2,0x4
1d46 00d2 | | Pop_Control Pop_Count_2
1d47 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1d48 00c8 | | Action Pop_Auxiliary_Range
1d49 3fe7 |? | Loop_Increasing 0x1d31
1d4a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1d4b 0000 0000 | | .BLANK 0000[0x5]
1d50 ; --------------------------------------------------------------------------------------
1d50 ; SUBPROGRAM
1d50 ; --------------------------------------------------------------------------------------
1d50 1d5a | Z | .CONST 0x1d5a ; Address of begin
1d51 0004 | | .CONST 0x0004 ; Address of exception handler
1d52 0002 | | .CONST 0x0002 ; Number of locals
1d53 INIT_1d50:
1d53 e5fc | | Load 0x2,-0x4
1d54 e009 | | Load 0x0,0x9
1d55 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
1d56 e5fe | | Load 0x2,-0x2
1d57 e001 | | Load 0x0,0x1
1d58 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
1d59 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1d5a BODY_1d50:
1d5a 00d8 | | Load_Top At_Offset_0
1d5b 00cb | | Action Pop_Block_With_Result
1d5c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
1d5d 0000 0000 | | .XXX[0x3]
1d5f 0000 | |
1d60 ; --------------------------------------------------------------------------------------
1d60 ; SUBPROGRAM
1d60 ; --------------------------------------------------------------------------------------
1d60 1d65 | e | .CONST 0x1d65 ; Address of begin
1d61 0004 | | .CONST 0x0004 ; Address of exception handler
1d62 0002 | | .CONST 0x0002 ; Number of locals
1d63 INIT_1d60:
1d63 e020 | | Load 0x0,0x20
1d64 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1d65 BODY_1d60:
1d65 00db | | Load_Top At_Offset_3
1d66 e009 | | Load 0x0,0x9
1d67 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1d68 e01f | | Load 0x0,0x1f
1d69 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1d6a e020 | | Load 0x0,0x20
1d6b 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
1d6c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
1d6d 00d8 | | Load_Top At_Offset_0
1d6e 7003 |p | Jump_Nonzero 0x1d72
1d6f 0092 1eed | | Action Push_String_Extended,0x1eed ; "Unix"
1d71 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1d72 0092 1eee | | Action Push_String_Extended,0x1eee ; "Other"
1d74 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1d75 0000 0000 | | .XXX[0x3]
1d77 0000 | |
1d78 ; --------------------------------------------------------------------------------------
1d78 ; SUBPROGRAM
1d78 ; --------------------------------------------------------------------------------------
1d78 1d7e | ~ | .CONST 0x1d7e ; Address of begin
1d79 0004 | | .CONST 0x0004 ; Address of exception handler
1d7a 0002 | | .CONST 0x0002 ; Number of locals
1d7b INIT_1d78:
1d7b e5fe | | Load 0x2,-0x2
1d7c e009 | | Load 0x0,0x9
1d7d 18cc | | Execute Package,Field_Execute,Field_Number 0xcc
1d7e BODY_1d78:
1d7e 00d8 | | Load_Top At_Offset_0
1d7f 01db | | Execute Vector,Length
1d80 0c01 | | Execute_Immediate Greater_Equal,0x1
1d81 6809 |h | Jump_Zero 0x1d8b
1d82 e5f6 | | Load 0x2,-0xa
1d83 e5f7 | | Load 0x2,-0x9
1d84 e5f8 | | Load 0x2,-0x8
1d85 e5fb | | Load 0x2,-0x5
1d86 e5fc | | Load 0x2,-0x4
1d87 e602 | | Load 0x3,0x2
1d88 e5fe | | Load 0x2,-0x2
1d89 826f | o | Call 0x1,0x6f
1d8a c5f6 | | Store 0x2,-0xa
1d8b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1d8c 0000 0000 | | .BLANK 0000[0x4]
1d90 ; --------------------------------------------------------------------------------------
1d90 ; SUBPROGRAM
1d90 ; --------------------------------------------------------------------------------------
1d90 1d98 | | .CONST 0x1d98 ; Address of begin
1d91 0004 | | .CONST 0x0004 ; Address of exception handler
1d92 0003 | | .CONST 0x0003 ; Number of locals
1d93 INIT_1d90:
1d93 e005 | | Load 0x0,0x5
1d94 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1d95 e5fe | | Load 0x2,-0x2
1d96 e009 | | Load 0x0,0x9
1d97 18cd | | Execute Package,Field_Execute,Field_Number 0xcd
1d98 BODY_1d90:
1d98 00d8 | | Load_Top At_Offset_0
1d99 01db | | Execute Vector,Length
1d9a 0c01 | | Execute_Immediate Greater_Equal,0x1
1d9b 6809 |h | Jump_Zero 0x1da5
1d9c 00d9 | | Load_Top At_Offset_1
1d9d e5f7 | | Load 0x2,-0x9
1d9e e5f8 | | Load 0x2,-0x8
1d9f e5fb | | Load 0x2,-0x5
1da0 e5fc | | Load 0x2,-0x4
1da1 e603 | | Load 0x3,0x3
1da2 e5fe | | Load 0x2,-0x2
1da3 826f | o | Call 0x1,0x6f
1da4 005a | Z | Store_Top Discrete,At_Offset_2
1da5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1da6 0000 0000 | | .XXX[0x2]
1da8 ; --------------------------------------------------------------------------------------
1da8 ; SUBPROGRAM
1da8 ; --------------------------------------------------------------------------------------
1da8 1dab | | .CONST 0x1dab ; Address of begin
1da9 0004 | | .CONST 0x0004 ; Address of exception handler
1daa 0001 | | .CONST 0x0001 ; Number of locals
1dab BODY_1da8:
1dab INIT_1da8:
1dab 00da | | Load_Top At_Offset_2
1dac 6806 |h | Jump_Zero 0x1db3
1dad e5fc | | Load 0x2,-0x4
1dae e00a | | Load 0x0,0xa
1daf 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
1db0 e00a | | Load 0x0,0xa
1db1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1db2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1db3 e5fc | | Load 0x2,-0x4
1db4 e00a | | Load 0x0,0xa
1db5 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1db6 e00a | | Load 0x0,0xa
1db7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1db8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1db9 0000 0000 | | .BLANK 0000[0x7]
1dc0 ; --------------------------------------------------------------------------------------
1dc0 ; SUBPROGRAM
1dc0 ; --------------------------------------------------------------------------------------
1dc0 1dd7 | | .CONST 0x1dd7 ; Address of begin
1dc1 0004 | | .CONST 0x0004 ; Address of exception handler
1dc2 0002 | | .CONST 0x0002 ; Number of locals
1dc3 INIT_1dc0:
1dc3 e5f7 | | Load 0x2,-0x9
1dc4 e5fb | | Load 0x2,-0x5
1dc5 e7ff | | Load 0x3,-0x1
1dc6 8403 | | Call 0x2,0x3
1dc7 4801 |H | Short_Literal 0x1
1dc8 e7ff | | Load 0x3,-0x1
1dc9 0272 | r | Execute Discrete,Minus
1dca 00d8 | | Load_Top At_Offset_0
1dcb e01e | | Load 0x0,0x1e
1dcc 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
1dcd 0260 | ` | Execute Discrete,In_Type
1dce 7001 |p | Jump_Nonzero 0x1dd0
1dcf 0801 | | Execute_Immediate Raise,0x1
1dd0 4803 |H | Short_Literal 0x3
1dd1 e5fe | | Load 0x2,-0x2
1dd2 e009 | | Load 0x0,0x9
1dd3 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
1dd4 e5ff | | Load 0x2,-0x1
1dd5 e01e | | Load 0x0,0x1e
1dd6 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1dd7 BODY_1dc0:
1dd7 e5f9 | | Load 0x2,-0x7
1dd8 01db | | Execute Vector,Length
1dd9 7002 |p | Jump_Nonzero 0x1ddc
1dda 00d8 | | Load_Top At_Offset_0
1ddb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1ddc e5fe | | Load 0x2,-0x2
1ddd e009 | | Load 0x0,0x9
1dde 18d2 | | Execute Package,Field_Execute,Field_Number 0xd2
1ddf e7ff | | Load 0x3,-0x1
1de0 027f | | Execute Discrete,Equal
1de1 6825 |h% | Jump_Zero 0x1e07
1de2 00d8 | | Load_Top At_Offset_0
1de3 01db | | Execute Vector,Length
1de4 700e |p | Jump_Nonzero 0x1df3
1de5 e402 | | Load 0x2,0x2
1de6 e020 | | Load 0x0,0x20
1de7 1844 | D | Execute Package,Field_Execute,Field_Number 0x44
1de8 e5fe | | Load 0x2,-0x2
1de9 e009 | | Load 0x0,0x9
1dea 18d1 | | Execute Package,Field_Execute,Field_Number 0xd1
1deb 01cc | | Execute Vector,Catenate
1dec e402 | | Load 0x2,0x2
1ded e020 | | Load 0x0,0x20
1dee 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
1def 01cc | | Execute Vector,Catenate
1df0 e5f9 | | Load 0x2,-0x7
1df1 01cc | | Execute Vector,Catenate
1df2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1df3 00d8 | | Load_Top At_Offset_0
1df4 e402 | | Load 0x2,0x2
1df5 e020 | | Load 0x0,0x20
1df6 1843 | C | Execute Package,Field_Execute,Field_Number 0x43
1df7 01cc | | Execute Vector,Catenate
1df8 e402 | | Load 0x2,0x2
1df9 e020 | | Load 0x0,0x20
1dfa 1844 | D | Execute Package,Field_Execute,Field_Number 0x44
1dfb 01cc | | Execute Vector,Catenate
1dfc e5fe | | Load 0x2,-0x2
1dfd e009 | | Load 0x0,0x9
1dfe 18d1 | | Execute Package,Field_Execute,Field_Number 0xd1
1dff 01cc | | Execute Vector,Catenate
1e00 e402 | | Load 0x2,0x2
1e01 e020 | | Load 0x0,0x20
1e02 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
1e03 01cc | | Execute Vector,Catenate
1e04 e5f9 | | Load 0x2,-0x7
1e05 01cc | | Execute Vector,Catenate
1e06 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1e07 00d8 | | Load_Top At_Offset_0
1e08 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1e09 0000 0000 | | .BLANK 0000[0x7]
1e10 ; --------------------------------------------------------------------------------------
1e10 ; SUBPROGRAM
1e10 ; --------------------------------------------------------------------------------------
1e10 1e16 | | .CONST 0x1e16 ; Address of begin
1e11 0004 | | .CONST 0x0004 ; Address of exception handler
1e12 0002 | | .CONST 0x0002 ; Number of locals
1e13 INIT_1e10:
1e13 e5fe | | Load 0x2,-0x2
1e14 e009 | | Load 0x0,0x9
1e15 18ce | | Execute Package,Field_Execute,Field_Number 0xce
1e16 BODY_1e10:
1e16 00d8 | | Load_Top At_Offset_0
1e17 01db | | Execute Vector,Length
1e18 0c01 | | Execute_Immediate Greater_Equal,0x1
1e19 6809 |h | Jump_Zero 0x1e23
1e1a e5f6 | | Load 0x2,-0xa
1e1b e5f7 | | Load 0x2,-0x9
1e1c e5f8 | | Load 0x2,-0x8
1e1d e5fc | | Load 0x2,-0x4
1e1e e5fd | | Load 0x2,-0x3
1e1f e602 | | Load 0x3,0x2
1e20 e5fe | | Load 0x2,-0x2
1e21 826f | o | Call 0x1,0x6f
1e22 c5f6 | | Store 0x2,-0xa
1e23 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1e24 0000 0000 | | .BLANK 0000[0x4]
1e28 ; --------------------------------------------------------------------------------------
1e28 ; SUBPROGRAM
1e28 ; --------------------------------------------------------------------------------------
1e28 1e30 | 0 | .CONST 0x1e30 ; Address of begin
1e29 0004 | | .CONST 0x0004 ; Address of exception handler
1e2a 0003 | | .CONST 0x0003 ; Number of locals
1e2b INIT_1e28:
1e2b e005 | | Load 0x0,0x5
1e2c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1e2d e5fe | | Load 0x2,-0x2
1e2e e009 | | Load 0x0,0x9
1e2f 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
1e30 BODY_1e28:
1e30 00d8 | | Load_Top At_Offset_0
1e31 01db | | Execute Vector,Length
1e32 0c01 | | Execute_Immediate Greater_Equal,0x1
1e33 6809 |h | Jump_Zero 0x1e3d
1e34 00d9 | | Load_Top At_Offset_1
1e35 e5f7 | | Load 0x2,-0x9
1e36 e5f8 | | Load 0x2,-0x8
1e37 e5fc | | Load 0x2,-0x4
1e38 e5fd | | Load 0x2,-0x3
1e39 e603 | | Load 0x3,0x3
1e3a e5fe | | Load 0x2,-0x2
1e3b 826f | o | Call 0x1,0x6f
1e3c 005a | Z | Store_Top Discrete,At_Offset_2
1e3d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1e3e 0000 0000 | | .XXX[0x2]
1e40 ; --------------------------------------------------------------------------------------
1e40 ; SUBPROGRAM
1e40 ; --------------------------------------------------------------------------------------
1e40 1e43 | C | .CONST 0x1e43 ; Address of begin
1e41 1e58 | X | .CONST 0x1e58 ; Address of exception handler
1e42 0001 | | .CONST 0x0001 ; Number of locals
1e43 BODY_1e40:
1e43 INIT_1e40:
1e43 4800 |H | Short_Literal 0x0
1e44 4801 |H | Short_Literal 0x1
1e45 4800 |H | Short_Literal 0x0
1e46 4801 |H | Short_Literal 0x1
1e47 e5fa | | Load 0x2,-0x6
1e48 e006 | | Load 0x0,0x6
1e49 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1e4a e011 | | Load 0x0,0x11
1e4b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
1e4c 4800 |H | Short_Literal 0x0
1e4d 0092 1eef | | Action Push_String_Extended,0x1eef ; "<ALL_WORLDS>"
1e4f 4803 |H | Short_Literal 0x3
1e50 4803 |H | Short_Literal 0x3
1e51 e5fe | | Load 0x2,-0x2
1e52 e002 | | Load 0x0,0x2
1e53 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1e54 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1e55 e024 | $ | Load 0x0,0x24
1e56 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1e57 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1e58 TRAP_1e40:
1e58 0007 | | Action Break_Optional
1e59 e604 | | Load 0x3,0x4
1e5a e011 | | Load 0x0,0x11
1e5b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1e5c 4801 |H | Short_Literal 0x1
1e5d 4802 |H | Short_Literal 0x2
1e5e e004 | | Load 0x0,0x4
1e5f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1e60 0334 | 4 | Declare_Variable Array,With_Constraint
1e61 0092 1ef0 | | Action Push_String_Extended,0x1ef0 ; "Failed while compiling closure of "
1e63 e5fe | | Load 0x2,-0x2
1e64 e002 | | Load 0x0,0x2
1e65 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1e66 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1e67 01cc | | Execute Vector,Catenate
1e68 e004 | | Load 0x0,0x4
1e69 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1e6a e004 | | Load 0x0,0x4
1e6b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1e6c 0119 | | Execute Any,Check_In_Formal_Type
1e6d 4801 |H | Short_Literal 0x1
1e6e 00da | | Load_Top At_Offset_2
1e6f 01d6 | | Execute Vector,Field_Write
1e70 e404 | | Load 0x2,0x4
1e71 e006 | | Load 0x0,0x6
1e72 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1e73 e004 | | Load 0x0,0x4
1e74 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1e75 0119 | | Execute Any,Check_In_Formal_Type
1e76 4802 |H | Short_Literal 0x2
1e77 00da | | Load_Top At_Offset_2
1e78 01d6 | | Execute Vector,Field_Write
1e79 600a |` | Indirect_Literal Discrete,0x1e84,{0x00000000, 0x00008126}
1e7a e005 | | Load 0x0,0x5
1e7b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1e7c a7ff | | Store_Unchecked 0x3,-0x1
1e7d e5fa | | Load 0x2,-0x6
1e7e e7ff | | Load 0x3,-0x1
1e7f e005 | | Load 0x0,0x5
1e80 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1e81 00cc | | Action Pop_Block
1e82 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1e83 0000 | | .XXX[0x1]
1e84 0000 0000 | | .LITERAL {0x00000000, 0x00008126}
1e88 ; --------------------------------------------------------------------------------------
1e88 ; SUBPROGRAM
1e88 ; --------------------------------------------------------------------------------------
1e88 1e8f | | .CONST 0x1e8f ; Address of begin
1e89 0004 | | .CONST 0x0004 ; Address of exception handler
1e8a 0002 | | .CONST 0x0002 ; Number of locals
1e8b INIT_1e88:
1e8b e5fc | | Load 0x2,-0x4
1e8c e408 | | Load 0x2,0x8
1e8d e00d | | Load 0x0,0xd
1e8e 1870 | p | Execute Package,Field_Execute,Field_Number 0x70
1e8f BODY_1e88:
1e8f 00d8 | | Load_Top At_Offset_0
1e90 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1e91 6803 |h | Jump_Zero 0x1e95
1e92 e005 | | Load 0x0,0x5
1e93 1b17 | | Execute Package,Field_Read,Field_Number 0x17
1e94 0257 | W | Execute Discrete,Raise
1e95 e40c | | Load 0x2,0xc
1e96 e5fc | | Load 0x2,-0x4
1e97 e40f | | Load 0x2,0xf
1e98 4801 |H | Short_Literal 0x1
1e99 e802 | | Load 0x4,0x2
1e9a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1e9b e40e | | Load 0x2,0xe
1e9c e40d | | Load 0x2,0xd
1e9d e5fe | | Load 0x2,-0x2
1e9e e5fd | | Load 0x2,-0x3
1e9f e5ff | | Load 0x2,-0x1
1ea0 8272 | r | Call 0x1,0x72
1ea1 c40c | | Store 0x2,0xc
1ea2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1ea3 ; --------------------------------------------------------------------------------------
1ea3 ; STRING TABLE
1ea3 ; --------------------------------------------------------------------------------------
1ea3 009e | | .STRTAB 0x009e->0x1ef2 ; "Target_Builder.Unit.Referencers"
1ea4 00bb | | .STRTAB 0x00bb->0x1f01 ; "Target_Builder.Unit.Suppliers"
1ea5 00d6 | | .STRTAB 0x00d6->0x1f10 ; "Link"
1ea6 00d8 | | .STRTAB 0x00d8->0x1f12 ; "<error>"
1ea7 00dd | | .STRTAB 0x00dd->0x1f15 ; "There are un-Coded Units."
1ea8 00f4 | | .STRTAB 0x00f4->0x1f22 ; "Target_Builder.Unit.Link"
1ea9 010a | | .STRTAB 0x010a->0x1f2e ; "Compile"
1eaa 010f | | .STRTAB 0x010f->0x1f31 ; "Target_Builder.Unit.Promote"
1eab 0128 | ( | .STRTAB 0x0128->0x1f3f ; "Demoting => "
1eac 0133 | 3 | .STRTAB 0x0133->0x1f45 ; "Demote"
1ead 0137 | 7 | .STRTAB 0x0137->0x1f48 ; "Target_Builder.Unit.Demote"
1eae 014f | O | .STRTAB 0x014f->0x1f55 ; "Unit_Target_Name"
1eaf 015d | ] | .STRTAB 0x015d->0x1f5d ; "Target_Builder.Unit.Unit_Target_Name"
1eb0 017f | | .STRTAB 0x017f->0x1f6f ; "Target_Builder.Unit.Unit_Name"
1eb1 019a | | .STRTAB 0x019a->0x1f7e ; "Set_Unit_Target_Name"
1eb2 01ac | | .STRTAB 0x01ac->0x1f88 ; "*"
1eb3 01ab | | .STRTAB 0x01ab->0x1f88 ; "Target name for unit \x22"
1eb4 01bf | | .STRTAB 0x01bf->0x1f93 ; "\x22 has been set to \x22"
1eb5 01d0 | | .STRTAB 0x01d0->0x1f9d ; "\x22"
1eb6 01cf | | .STRTAB 0x01cf->0x1f9d ; "Unit \x22"
1eb7 01d3 | | .STRTAB 0x01d3->0x1fa0 ; "\x22 will be made non-downloadable"
1eb8 01f0 | | .STRTAB 0x01f0->0x1fb0 ; "Target_Builder.Unit.Set_Unit_Target_Name"
1eb9 0216 | | .STRTAB 0x0216->0x1fc4 ; "Has_Unit_Target_Name"
1eba 0228 | ( | .STRTAB 0x0228->0x1fce ; "Target_Builder.Unit.Has_Unit_Target_Name"
1ebb 024e | N | .STRTAB 0x024e->0x1fe2 ; "Download_Time"
1ebc 0259 | Y | .STRTAB 0x0259->0x1fe8 ; "Target_Builder.Unit.Download_Time"
1ebd 0278 | x | .STRTAB 0x0278->0x1ff9 ; "Set_Download_Time"
1ebe 0287 | | .STRTAB 0x0287->0x2001 ; "Setting download time for => "
1ebf 02a3 | | .STRTAB 0x02a3->0x2010 ; " to "
1ec0 02a5 | | .STRTAB 0x02a5->0x2012 ; "Target_Builder.Unit.Set_Download_Time"
1ec1 02c8 | | .STRTAB 0x02c8->0x2025 ; "Target_Builder.Unit.Refresh_Suppliers"
1ec2 02eb | | .STRTAB 0x02eb->0x2037 ; "Refresh_Suppliers"
1ec3 02fa | | .STRTAB 0x02fa->0x2040 ; "Target_Builder.Unit.Register"
1ec4 0314 | | .STRTAB 0x0314->0x204e ; "register"
1ec5 031a | | .STRTAB 0x031a->0x2052 ; "Register"
1ec6 0320 | | .STRTAB 0x0320->0x2056 ; "Add_Secondary_Unit"
1ec7 0330 | 0 | .STRTAB 0x0330->0x205f ; "Added "
1ec8 0334 | 4 | .STRTAB 0x0334->0x2062 ; " as the secondary of unit "
1ec9 034c | L | .STRTAB 0x034c->0x206f ; ". Prefix = \x22"
1eca 0357 | W | .STRTAB 0x0357->0x2075 ; "\x22, Suffix = \x22"
1ecb 0362 | b | .STRTAB 0x0362->0x207c ; "Target_Builder.Unit.Add_Secondary_Unit"
1ecc 0386 | | .STRTAB 0x0386->0x208f ; "Remove_Secondary_Unit (Primary)"
1ecd 03a3 | | .STRTAB 0x03a3->0x209e ; "Remove_Secondary_Unit (Secondary)"
1ece 03c2 | | .STRTAB 0x03c2->0x20af ; "Removed "
1ecf 03c8 | | .STRTAB 0x03c8->0x20b3 ; "Target_Builder.Unit.Remove_Secondary_Unit"
1ed0 03ef | | .STRTAB 0x03ef->0x20c7 ; "Has_Secondary_Unit"
1ed1 03ff | | .STRTAB 0x03ff->0x20d0 ; "Target_Builder.Unit.Has_Secondary_Unit"
1ed2 0423 | # | .STRTAB 0x0423->0x20e3 ; "Is_Secondary_Unit"
1ed3 0432 | 2 | .STRTAB 0x0432->0x20ec ; "Target_Builder.Unit.Is_Secondary_Unit"
1ed4 0455 | U | .STRTAB 0x0455->0x20fe ; "Primary_Unit"
1ed5 045f | _ | .STRTAB 0x045f->0x2104 ; "Target_Builder.Unit.Primary_Unit"
1ed6 047d | } | .STRTAB 0x047d->0x2114 ; "Secondary_Unit"
1ed7 0489 | | .STRTAB 0x0489->0x211b ; "Target_Builder.Unit.Secondary_Unit"
1ed8 04a9 | | .STRTAB 0x04a9->0x212c ; "Secondary_Prefix"
1ed9 04b7 | | .STRTAB 0x04b7->0x2134 ; "Target_Builder.Unit.Secondary_Prefix"
1eda 04d9 | | .STRTAB 0x04d9->0x2146 ; "Secondary_Suffix"
1edb 04e7 | | .STRTAB 0x04e7->0x214e ; "Target_Builder.Unit.Secondary_Suffix"
1edc 0509 | | .STRTAB 0x0509->0x2160 ; "Serial_Number"
1edd 0514 | | .STRTAB 0x0514->0x2167 ; "Target_Builder.Unit.Serial_Number"
1ede 0533 | 3 | .STRTAB 0x0533->0x2177 ; "}?{ Check_Unit Target_Builder.Unit."
1edf 0557 | W | .STRTAB 0x0557->0x218a ; "Target_Builder.Unit.Establish_Download_Time"
1ee0 0580 | | .STRTAB 0x0580->0x21a0 ; "Acquiring Remote Connection => "
1ee1 059e | | .STRTAB 0x059e->0x21b0 ; "Change Directory Context"
1ee2 05b4 | | .STRTAB 0x05b4->0x21bc ; "Change Library Context"
1ee3 05c8 | | .STRTAB 0x05c8->0x21c7 ; "Rs6000_Aix_Ibm"
1ee4 05d4 | | .STRTAB 0x05d4->0x21ce ; ".exe"
1ee5 05d6 | | .STRTAB 0x05d6->0x21d0 ; "Target_Builder.Unit.Link (in Make_Closure)"
1ee6 05fe | | .STRTAB 0x05fe->0x21e5 ; "Transferring => "
1ee7 060d | | .STRTAB 0x060d->0x21ed ; "Retrieving remote update time for host unit => "
1ee8 063b | ; | .STRTAB 0x063b->0x2205 ; "Elapsed time for setting download time => "
1ee9 0663 | c | .STRTAB 0x0663->0x221a ; " seconds."
1eea 066a | j | .STRTAB 0x066a->0x221f ; "Promoting => "
1eeb 0676 | v | .STRTAB 0x0676->0x2226 ; "Promote"
1eec 067b | { | .STRTAB 0x067b->0x2229 ; "?'IS(DOWNLOADABLE)"
1eed 068b | | .STRTAB 0x068b->0x2232 ; "Unix"
1eee 068d | | .STRTAB 0x068d->0x2234 ; "Other"
1eef 0690 | | .STRTAB 0x0690->0x2237 ; "<ALL_WORLDS>"
1ef0 069a | | .STRTAB 0x069a->0x223d ; "Failed while compiling closure of "
1ef1 06ba | | .STREND 0x06ba->0x224e
1ef2 5461 7267 |Targ| .STRTAB_STRINGS
224e 0000 0000 | | .XXX[0x2]
2250 ; --------------------------------------------------------------------------------------
2250 ; Debug Table
2250 ; --------------------------------------------------------------------------------------
2250 0004 000c | | .DEBUG4 0x0004,0x000c,0x2dff,0x0000,0x0001,0x0000
2256 0b00 0000 | | .XXX[0x1aa]
2258 8047 2a29 | G*)|
225a 0000 000b | |
225c 0f6a d50b | j |
225e 0000 0080 | |
2260 0f6a d50b | j |
2262 0000 0080 | |
2264 4467 a100 |Dg |
2266 0000 0b0f | |
2268 6ad9 0b00 |j |
226a 0000 800f | |
226c 6ad9 0b00 |j |
226e 0000 8049 | I|
2270 e7a9 0000 | |
2272 000b 0f6a | j|
2274 dd0b 0000 | |
2276 0080 0f6a | j|
2278 dd0b 0000 | |
227a 0080 4a05 | J |
227c 2100 0000 |! |
227e 0b0e 3c3d | <=|
2280 0a00 0000 | |
2282 800e 3c3d | <=|
2284 0a00 0000 | |
2286 8049 a921 | I !|
2288 0000 000b | |
228a 0e3c 7d0a | <} |
228c 0000 0080 | |
228e 0e4c 050a | L |
2290 0000 0080 | |
2292 25f1 e900 |% |
2294 0000 0b0e | |
2296 3c85 0a00 |< |
2298 0000 800e | |
229a 3c85 0a00 |< |
229c 0000 8044 | D|
229e 9711 0000 | |
22a0 000b 0e3c | <|
22a2 890a 0000 | |
22a4 0080 0e3c | <|
22a6 890a 0000 | |
22a8 0080 49a8 | I |
22aa 6900 0000 |i |
22ac 0b0e 3c8d | < |
22ae 0a00 0000 | |
22b0 800e 3c8d | < |
22b2 0a00 0000 | |
22b4 804a 08b9 | J |
22b6 0000 000b | |
22b8 0e3c ad0a | < |
22ba 0000 0080 | |
22bc 0e3c ad0a | < |
22be 0000 0080 | |
22c0 472a e100 |G* |
22c2 0000 0b0f | |
22c4 6b81 0b00 |k |
22c6 0000 800f | |
22c8 8f3d 0b00 | = |
22ca 0000 8040 | @|
22cc 17a1 0000 | |
22ce 000b 0f6b | k|
22d0 890b 0000 | |
22d2 0080 0f6b | k|
22d4 890b 0000 | |
22d6 0080 4019 | @ |
22d8 1100 0000 | |
22da 0b0f 6b8d | k |
22dc 0b00 0000 | |
22de 800f 6b8d | k |
22e0 0b00 0000 | |
22e2 804a 0c51 | J Q|
22e4 0000 000b | |
22e6 0f6b a90b | k |
22e8 0000 0080 | |
22ea 0f8f 550b | U |
22ec 0000 0080 | |
22ee 4019 c900 |@ |
22f0 0000 0b0f | |
22f2 6bb1 0b00 |k |
22f4 0000 800f | |
22f6 6bb1 0b00 |k |
22f8 0000 8045 | E|
22fa 1c09 0000 | |
22fc 000b 0f6b | k|
22fe b50b 0000 | |
2300 0080 0f6b | k|
2302 b50b 0000 | |
2304 0080 4a0e | J |
2306 7900 0000 |y |
2308 0b0f 6bf5 | k |
230a 0b00 0000 | |
230c 800f 6bf5 | k |
230e 0b00 0000 | |
2310 8047 2fe9 | G/ |
2312 0000 000b | |
2314 0f6c 210b | l! |
2316 0000 0080 | |
2318 0f8f 250b | % |
231a 0000 0080 | |
231c 4732 c900 |G2 |
231e 0000 0b0f | |
2320 6c29 0b00 |l) |
2322 0000 800f | |
2324 6c29 0b00 |l) |
2326 0000 8044 | D|
2328 e341 0000 | A |
232a 000b 0f6c | l|
232c 2d0b 0000 |- |
232e 0080 0f6c | l|
2330 2d0b 0000 |- |
2332 0080 4a11 | J |
2334 5900 0000 |Y |
2336 0b0f 6c8d | l |
2338 0b00 0000 | |
233a 800f 8f2d | -|
233c 0b00 0000 | |
233e 803d 3bf1 | =; |
2340 0000 000b | |
2342 0f6c 950b | l |
2344 0000 0080 | |
2346 0f6c 950b | l |
2348 0000 0080 | |
234a 4735 a900 |G5 |
234c 0000 0b0f | |
234e 6c99 0b00 |l |
2350 0000 800f | |
2352 6c99 0b00 |l |
2354 0000 804a | J|
2356 1381 0000 | |
2358 000b 0e3d | =|
235a 090a 0000 | |
235c 0080 0e3d | =|
235e 090a 0000 | |
2360 0080 4737 | G7|
2362 1900 0000 | |
2364 0b0f 6cc9 | l |
2366 0b00 0000 | |
2368 800f 6cc9 | l |
236a 0b00 0000 | |
236c 8047 3941 | G9A|
236e 0000 000b | |
2370 0f6c fd0b | l |
2372 0000 0080 | |
2374 0f6d 850b | m |
2376 0000 0080 | |
2378 4739 f900 |G9 |
237a 0000 0b0f | |
237c 6d05 0b00 |m |
237e 0000 800f | |
2380 6d05 0b00 |m |
2382 0000 8039 | 9|
2384 b6a1 0000 | |
2386 000b 0f6d | m|
2388 090b 0000 | |
238a 0080 0f6d | m|
238c 090b 0000 | |
238e 0080 4a17 | J |
2390 1900 0000 | |
2392 0b0e 3d55 | =U|
2394 0a00 0000 | |
2396 800e 3d55 | =U|
2398 0a00 0000 | |
239a 803d 4491 | =D |
239c 0000 000b | |
239e 0e3d 7d0a | =} |
23a0 0000 0080 | |
23a2 0e3d 7d0a | =} |
23a4 0000 0080 | |
23a6 4895 2100 |H ! |
23a8 0000 0b0f | |
23aa 6d85 0b00 |m |
23ac 0000 800f | |
23ae 6d85 0b00 |m |
23b0 0000 804a | J|
23b2 17d1 0000 | |
23b4 000b 0e3d | =|
23b6 d90a 0000 | |
23b8 0080 0e3e | >|
23ba 1d0a 0000 | |
23bc 0080 4741 | GA|
23be e100 0000 | |
23c0 0b0e 3de5 | = |
23c2 0a00 0000 | |
23c4 800e 3de5 | = |
23c6 0a00 0000 | |
23c8 8041 9f59 | A Y|
23ca 0000 000b | |
23cc 0e3d e90a | = |
23ce 0000 0080 | |
23d0 0e3d e90a | = |
23d2 0000 0080 | |
23d4 4894 6900 |H i |
23d6 0000 0b0e | |
23d8 3ded 0a00 |= |
23da 0000 800e | |
23dc 3ded 0a00 |= |
23de 0000 804a | J|
23e0 1b69 0000 | i |
23e2 000b 0e3d | =|
23e4 fd0a 0000 | |
23e6 0080 0e3d | =|
23e8 fd0a 0000 | |
23ea 0080 41a0 | A |
23ec 1100 0000 | |
23ee 0b0f 6d95 | m |
23f0 0b00 0000 | |
23f2 800f 6d95 | m |
23f4 0b00 0000 | |
23f6 8047 4579 | GEy|
23f8 0000 000b | |
23fa 0e3e 1d0a | > |
23fc 0000 0080 | |
23fe 0e3e 1d0a | > |