|
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: 11264 (0x2c00)
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 15e0 | | .CONST 0x15e0 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 800d | | .CONST 0x800d ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0222 | " | .CONST 0x0222 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0076 | v | .CONST 0x0076 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
000d 0129 | ) | Execute Any,Make_Visible
000e 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated
0010 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
0012 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
0014 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated
0016 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated
0018 00e3 | | Load_Encached Natural_Cache
0019 0266 | f | Execute Discrete,Bounds
001a e20d | | Load 0x1,0xd
001b 02a0 | | Declare_Subprogram Null_Subprogram
001c 4801 |H | Short_Literal 0x1
001d 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
001e 00e3 | | Load_Encached Natural_Cache
001f e002 | | Load 0x0,0x2
0020 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0021 4801 |H | Short_Literal 0x1
0022 620d |b | Indirect_Literal Discrete,0x230,{0x00000000, 0x7fffffff}
0023 e213 | | Load 0x1,0x13
0024 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object
0025 029f 14c3 | | Declare_Subprogram INIT_14c0,For_Call
0027 4800 |H | Short_Literal 0x0
0028 4801 |H | Short_Literal 0x1
0029 4801 |H | Short_Literal 0x1
002a 4800 |H | Short_Literal 0x0
002b 4801 |H | Short_Literal 0x1
002c 4801 |H | Short_Literal 0x1
002d 031e | | Declare_Type Variant_Record,Defined,Visible
002e 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
0030 00c4 | | Action Make_Default
0031 00c4 | | Action Make_Default
0032 00c4 | | Action Make_Default
0033 00c4 | | Action Make_Default
0034 00c4 | | Action Make_Default
0035 00c4 | | Action Make_Default
0036 00c4 | | Action Make_Default
0037 00c4 | | Action Make_Default
0038 00c4 | | Action Make_Default
0039 00c4 | | Action Make_Default
003a 00c4 | | Action Make_Default
003b 00c4 | | Action Make_Default
003c 00c4 | | Action Make_Default
003d 00c4 | | Action Make_Default
003e 00c4 | | Action Make_Default
003f 00c4 | | Action Make_Default
0040 00c4 | | Action Make_Default
0041 00c4 | | Action Make_Default
0042 00c4 | | Action Make_Default
0043 00c4 | | Action Make_Default
0044 00c4 | | Action Make_Default
0045 00c4 | | Action Make_Default
0046 00c4 | | Action Make_Default
0047 00c4 | | Action Make_Default
0048 00c4 | | Action Make_Default
0049 00c4 | | Action Make_Default
004a 00c4 | | Action Make_Default
004b 00c4 | | Action Make_Default
004c 00c4 | | Action Make_Default
004d 00c4 | | Action Make_Default
004e 00c4 | | Action Make_Default
004f 00c4 | | Action Make_Default
0050 00c4 | | Action Make_Default
0051 00c4 | | Action Make_Default
0052 00c4 | | Action Make_Default
0053 00c4 | | Action Make_Default
0054 00c4 | | Action Make_Default
0055 00c4 | | Action Make_Default
0056 00c4 | | Action Make_Default
0057 00c4 | | Action Make_Default
0058 00c4 | | Action Make_Default
0059 00c4 | | Action Make_Default
005a 00c4 | | Action Make_Default
005b 00c4 | | Action Make_Default
005c 00c4 | | Action Make_Default
005d 00c4 | | Action Make_Default
005e 00c4 | | Action Make_Default
005f 00c4 | | Action Make_Default
0060 00c4 | | Action Make_Default
0061 00c4 | | Action Make_Default
0062 00c4 | | Action Make_Default
0063 00c4 | | Action Make_Default
0064 00c4 | | Action Make_Default
0065 00c4 | | Action Make_Default
0066 00c4 | | Action Make_Default
0067 00c4 | | Action Make_Default
0068 00c4 | | Action Make_Default
0069 00c4 | | Action Make_Default
006a 00c4 | | Action Make_Default
006b 00c4 | | Action Make_Default
006c 00c4 | | Action Make_Default
006d 00c4 | | Action Make_Default
006e 00c4 | | Action Make_Default
006f 00c4 | | Action Make_Default
0070 00c4 | | Action Make_Default
0071 00c4 | | Action Make_Default
0072 00c4 | | Action Make_Default
0073 00c4 | | Action Make_Default
0074 00c4 | | Action Make_Default
0075 00c4 | | Action Make_Default
0076 00c4 | | Action Make_Default
0077 00c4 | | Action Make_Default
0078 e003 | | Load 0x0,0x3
0079 1b0f | | Execute Package,Field_Read,Field_Number 0xf
007a e003 | | Load 0x0,0x3
007b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
007c 029f 14eb | | Declare_Subprogram INIT_14e8,For_Call
007e 4802 |H | Short_Literal 0x2
007f 032e | . | Declare_Type Record,Defined,Visible
0080 c257 | W | Store 0x1,0x57
0081 00e3 | | Load_Encached Natural_Cache
0082 0266 | f | Execute Discrete,Bounds
0083 e257 | W | Load 0x1,0x57
0084 029f 028b | | Declare_Subprogram INIT_0288,For_Call
0086 4801 |H | Short_Literal 0x1
0087 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0088 c258 | X | Store 0x1,0x58
0089 4801 |H | Short_Literal 0x1
008a 4801 |H | Short_Literal 0x1
008b e258 | X | Load 0x1,0x58
008c 035b | [ | Declare_Type Array,Constrained
008d 0336 | 6 | Declare_Variable Array,Visible
008e 00d8 | | Load_Top At_Offset_0
008f 0335 | 5 | Declare_Variable Array,Duplicate
0090 00cd | | Action Spare6_Action
0091 e257 | W | Load 0x1,0x57
0092 0322 | " | Declare_Variable Record
0093 e003 | | Load 0x0,0x3
0094 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0095 e257 | W | Load 0x1,0x57
0096 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0097 0119 | | Execute Any,Check_In_Formal_Type
0098 00d9 | | Load_Top At_Offset_1
0099 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
009a e003 | | Load 0x0,0x3
009b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
009c e257 | W | Load 0x1,0x57
009d 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
009e 0119 | | Execute Any,Check_In_Formal_Type
009f 00d9 | | Load_Top At_Offset_1
00a0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00a1 4801 |H | Short_Literal 0x1
00a2 00da | | Load_Top At_Offset_2
00a3 01d6 | | Execute Vector,Field_Write
00a4 00d9 | | Load_Top At_Offset_1
00a5 01d4 | | Execute Vector,Structure_Write
00a6 c259 | Y | Store 0x1,0x59
00a7 e004 | | Load 0x0,0x4
00a8 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00a9 0129 | ) | Execute Any,Make_Visible
00aa c24b | K | Store 0x1,0x4b
00ab 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
00ad c25a | Z | Store 0x1,0x5a
00ae 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated
00b0 c25b | [ | Store 0x1,0x5b
00b1 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated
00b3 c218 | | Store 0x1,0x18
00b4 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated
00b6 c219 | | Store 0x1,0x19
00b7 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
00b9 c24e | N | Store 0x1,0x4e
00ba 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated
00bc c24f | O | Store 0x1,0x4f
00bd 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
00bf c21c | | Store 0x1,0x1c
00c0 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated
00c2 c21d | | Store 0x1,0x1d
00c3 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated
00c5 c21e | | Store 0x1,0x1e
00c6 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated
00c8 c21f | | Store 0x1,0x1f
00c9 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated
00cb c220 | | Store 0x1,0x20
00cc 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated
00ce c221 | ! | Store 0x1,0x21
00cf 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated
00d1 c222 | " | Store 0x1,0x22
00d2 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated
00d4 c223 | # | Store 0x1,0x23
00d5 029a 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call,Visible,Unelaborated
00d7 c224 | $ | Store 0x1,0x24
00d8 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated
00da c225 | % | Store 0x1,0x25
00db 029a 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call,Visible,Unelaborated
00dd c226 | & | Store 0x1,0x26
00de 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated
00e0 c227 | ' | Store 0x1,0x27
00e1 029a 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call,Visible,Unelaborated
00e3 c228 | ( | Store 0x1,0x28
00e4 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated
00e6 c250 | P | Store 0x1,0x50
00e7 029a 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call,Visible,Unelaborated
00e9 c251 | Q | Store 0x1,0x51
00ea 029a 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Visible,Unelaborated
00ec c252 | R | Store 0x1,0x52
00ed 029a 051b | | Declare_Subprogram INIT_0518,For_Outer_Call,Visible,Unelaborated
00ef c253 | S | Store 0x1,0x53
00f0 029a 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call,Visible,Unelaborated
00f2 c254 | T | Store 0x1,0x54
00f3 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated
00f5 c255 | U | Store 0x1,0x55
00f6 029a 059b | | Declare_Subprogram INIT_0598,For_Outer_Call,Visible,Unelaborated
00f8 c229 | ) | Store 0x1,0x29
00f9 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated
00fb c22a | * | Store 0x1,0x2a
00fc 029a 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Visible,Unelaborated
00fe c22b | + | Store 0x1,0x2b
00ff 029a 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call,Visible,Unelaborated
0101 c22c | , | Store 0x1,0x2c
0102 029a 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call,Visible,Unelaborated
0104 c22d | - | Store 0x1,0x2d
0105 029a 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call,Visible,Unelaborated
0107 c22e | . | Store 0x1,0x2e
0108 029a 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call,Visible,Unelaborated
010a c22f | / | Store 0x1,0x2f
010b 029a 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call,Visible,Unelaborated
010d c230 | 0 | Store 0x1,0x30
010e 029a 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call,Visible,Unelaborated
0110 c231 | 1 | Store 0x1,0x31
0111 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated
0113 c256 | V | Store 0x1,0x56
0114 029a 07cb | | Declare_Subprogram INIT_07c8,For_Outer_Call,Visible,Unelaborated
0116 c233 | 3 | Store 0x1,0x33
0117 029a 080b | | Declare_Subprogram INIT_0808,For_Outer_Call,Visible,Unelaborated
0119 c234 | 4 | Store 0x1,0x34
011a 029a 083b | ;| Declare_Subprogram INIT_0838,For_Outer_Call,Visible,Unelaborated
011c c235 | 5 | Store 0x1,0x35
011d 029a 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call,Visible,Unelaborated
011f c236 | 6 | Store 0x1,0x36
0120 029a 085b | [| Declare_Subprogram INIT_0858,For_Outer_Call,Visible,Unelaborated
0122 c237 | 7 | Store 0x1,0x37
0123 029a 086b | k| Declare_Subprogram INIT_0868,For_Outer_Call,Visible,Unelaborated
0125 c238 | 8 | Store 0x1,0x38
0126 029a 088b | | Declare_Subprogram INIT_0888,For_Outer_Call,Visible,Unelaborated
0128 c239 | 9 | Store 0x1,0x39
0129 029a 08ab | | Declare_Subprogram INIT_08a8,For_Outer_Call,Visible,Unelaborated
012b c23a | : | Store 0x1,0x3a
012c 029a 08cb | | Declare_Subprogram INIT_08c8,For_Outer_Call,Visible,Unelaborated
012e c23b | ; | Store 0x1,0x3b
012f 029a 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call,Visible,Unelaborated
0131 c23c | < | Store 0x1,0x3c
0132 029a 08fb | | Declare_Subprogram INIT_08f8,For_Outer_Call,Visible,Unelaborated
0134 c23d | = | Store 0x1,0x3d
0135 029a 0973 | s| Declare_Subprogram INIT_0970,For_Outer_Call,Visible,Unelaborated
0137 c23e | > | Store 0x1,0x3e
0138 029a 09eb | | Declare_Subprogram INIT_09e8,For_Outer_Call,Visible,Unelaborated
013a c23f | ? | Store 0x1,0x3f
013b 029a 0a23 | #| Declare_Subprogram INIT_0a20,For_Outer_Call,Visible,Unelaborated
013d c240 | @ | Store 0x1,0x40
013e 029a 0a63 | c| Declare_Subprogram INIT_0a60,For_Outer_Call,Visible,Unelaborated
0140 c241 | A | Store 0x1,0x41
0141 029a 0aa3 | | Declare_Subprogram INIT_0aa0,For_Outer_Call,Visible,Unelaborated
0143 c242 | B | Store 0x1,0x42
0144 029a 0afb | | Declare_Subprogram INIT_0af8,For_Outer_Call,Visible,Unelaborated
0146 c243 | C | Store 0x1,0x43
0147 029a 0b3b | ;| Declare_Subprogram INIT_0b38,For_Outer_Call,Visible,Unelaborated
0149 c244 | D | Store 0x1,0x44
014a 029a 0b7b | {| Declare_Subprogram INIT_0b78,For_Outer_Call,Visible,Unelaborated
014c c245 | E | Store 0x1,0x45
014d 029a 0bbb | | Declare_Subprogram INIT_0bb8,For_Outer_Call,Visible,Unelaborated
014f c246 | F | Store 0x1,0x46
0150 029a 0bd3 | | Declare_Subprogram INIT_0bd0,For_Outer_Call,Visible,Unelaborated
0152 c247 | G | Store 0x1,0x47
0153 029a 0beb | | Declare_Subprogram INIT_0be8,For_Outer_Call,Visible,Unelaborated
0155 c248 | H | Store 0x1,0x48
0156 029a 0bfb | | Declare_Subprogram INIT_0bf8,For_Outer_Call,Visible,Unelaborated
0158 c249 | I | Store 0x1,0x49
0159 4808 |H | Short_Literal 0x8
015a 0093 150b | | push_full_address INIT_1508
015c 02a0 | | Declare_Subprogram Null_Subprogram
015d 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
015e c24a | J | Store 0x1,0x4a
015f 029a 0c0b | | Declare_Subprogram INIT_0c08,For_Outer_Call,Visible,Unelaborated
0161 c25c | \ | Store 0x1,0x5c
0162 029a 0c1b | | Declare_Subprogram INIT_0c18,For_Outer_Call,Visible,Unelaborated
0164 c25d | ] | Store 0x1,0x5d
0165 00bf | | Action Accept_Activation
0166 029d 0c23 | #| Declare_Subprogram INIT_0c20,For_Outer_Call
0168 029d 0c33 | 3| Declare_Subprogram INIT_0c30,For_Outer_Call
016a 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
016b 00c7 | | Action Elaborate_Subprogram
016c 029d 0c43 | C| Declare_Subprogram INIT_0c40,For_Outer_Call
016e 029d 0d03 | | Declare_Subprogram INIT_0d00,For_Outer_Call
0170 029d 0deb | | Declare_Subprogram INIT_0de8,For_Outer_Call
0172 029d 0e13 | | Declare_Subprogram INIT_0e10,For_Outer_Call
0174 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0175 00c7 | | Action Elaborate_Subprogram
0176 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0177 00c7 | | Action Elaborate_Subprogram
0178 e005 | | Load 0x0,0x5
0179 193c | < | Execute Package,Field_Reference,Field_Number 0x3c
017a 00c6 | | Action Check_Subprogram_Elaborated
017b e20d | | Load 0x1,0xd
017c 480f |H | Short_Literal 0xf
017d e006 | | Load 0x0,0x6
017e 1911 | | Execute Package,Field_Reference,Field_Number 0x11
017f e006 | | Load 0x0,0x6
0180 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0181 e007 | | Load 0x0,0x7
0182 e008 | | Load 0x0,0x8
0183 4800 |H | Short_Literal 0x0
0184 0007 | | Action Break_Optional
0185 029d 0e3b | ;| Declare_Subprogram INIT_0e38,For_Outer_Call
0187 e005 | | Load 0x0,0x5
0188 193d | = | Execute Package,Field_Reference,Field_Number 0x3d
0189 00c6 | | Action Check_Subprogram_Elaborated
018a e20d | | Load 0x1,0xd
018b 480f |H | Short_Literal 0xf
018c 1d6b | k | Execute_Immediate Reference_Lex_1,0x6b
018d e001 | | Load 0x0,0x1
018e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
018f e009 | | Load 0x0,0x9
0190 e00a | | Load 0x0,0xa
0191 4800 |H | Short_Literal 0x0
0192 0007 | | Action Break_Optional
0193 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0194 00c7 | | Action Elaborate_Subprogram
0195 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0196 00c7 | | Action Elaborate_Subprogram
0197 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0198 00c7 | | Action Elaborate_Subprogram
0199 1d15 | | Execute_Immediate Reference_Lex_1,0x15
019a 00c7 | | Action Elaborate_Subprogram
019b 029d 0e53 | S| Declare_Subprogram INIT_0e50,For_Outer_Call
019d 029d 0ed3 | | Declare_Subprogram INIT_0ed0,For_Outer_Call
019f 029d 0feb | | Declare_Subprogram INIT_0fe8,For_Outer_Call
01a1 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
01a2 00c7 | | Action Elaborate_Subprogram
01a3 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
01a4 00c7 | | Action Elaborate_Subprogram
01a5 1d18 | | Execute_Immediate Reference_Lex_1,0x18
01a6 00c7 | | Action Elaborate_Subprogram
01a7 1d19 | | Execute_Immediate Reference_Lex_1,0x19
01a8 00c7 | | Action Elaborate_Subprogram
01a9 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e
01aa 00c7 | | Action Elaborate_Subprogram
01ab 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
01ac 00c7 | | Action Elaborate_Subprogram
01ad 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
01ae 00c7 | | Action Elaborate_Subprogram
01af 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
01b0 00c7 | | Action Elaborate_Subprogram
01b1 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
01b2 00c7 | | Action Elaborate_Subprogram
01b3 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
01b4 00c7 | | Action Elaborate_Subprogram
01b5 1d20 | | Execute_Immediate Reference_Lex_1,0x20
01b6 00c7 | | Action Elaborate_Subprogram
01b7 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
01b8 00c7 | | Action Elaborate_Subprogram
01b9 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
01ba 00c7 | | Action Elaborate_Subprogram
01bb 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
01bc 00c7 | | Action Elaborate_Subprogram
01bd 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
01be 00c7 | | Action Elaborate_Subprogram
01bf 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
01c0 00c7 | | Action Elaborate_Subprogram
01c1 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
01c2 00c7 | | Action Elaborate_Subprogram
01c3 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
01c4 00c7 | | Action Elaborate_Subprogram
01c5 1d50 | P | Execute_Immediate Reference_Lex_1,0x50
01c6 00c7 | | Action Elaborate_Subprogram
01c7 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51
01c8 00c7 | | Action Elaborate_Subprogram
01c9 1d52 | R | Execute_Immediate Reference_Lex_1,0x52
01ca 00c7 | | Action Elaborate_Subprogram
01cb 1d53 | S | Execute_Immediate Reference_Lex_1,0x53
01cc 00c7 | | Action Elaborate_Subprogram
01cd 029d 1013 | | Declare_Subprogram INIT_1010,For_Outer_Call
01cf 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
01d0 00c7 | | Action Elaborate_Subprogram
01d1 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
01d2 00c7 | | Action Elaborate_Subprogram
01d3 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
01d4 00c7 | | Action Elaborate_Subprogram
01d5 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
01d6 00c7 | | Action Elaborate_Subprogram
01d7 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
01d8 00c7 | | Action Elaborate_Subprogram
01d9 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
01da 00c7 | | Action Elaborate_Subprogram
01db 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
01dc 00c7 | | Action Elaborate_Subprogram
01dd 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
01de 00c7 | | Action Elaborate_Subprogram
01df 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
01e0 00c7 | | Action Elaborate_Subprogram
01e1 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
01e2 00c7 | | Action Elaborate_Subprogram
01e3 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
01e4 00c7 | | Action Elaborate_Subprogram
01e5 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
01e6 00c7 | | Action Elaborate_Subprogram
01e7 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
01e8 00c7 | | Action Elaborate_Subprogram
01e9 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
01ea 00c7 | | Action Elaborate_Subprogram
01eb 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
01ec 00c7 | | Action Elaborate_Subprogram
01ed 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
01ee 00c7 | | Action Elaborate_Subprogram
01ef 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
01f0 00c7 | | Action Elaborate_Subprogram
01f1 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
01f2 00c7 | | Action Elaborate_Subprogram
01f3 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
01f4 00c7 | | Action Elaborate_Subprogram
01f5 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
01f6 00c7 | | Action Elaborate_Subprogram
01f7 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
01f8 00c7 | | Action Elaborate_Subprogram
01f9 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
01fa 00c7 | | Action Elaborate_Subprogram
01fb 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d
01fc 00c7 | | Action Elaborate_Subprogram
01fd 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
01fe 00c7 | | Action Elaborate_Subprogram
01ff 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
0200 00c7 | | Action Elaborate_Subprogram
0201 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
0202 00c7 | | Action Elaborate_Subprogram
0203 1d41 | A | Execute_Immediate Reference_Lex_1,0x41
0204 00c7 | | Action Elaborate_Subprogram
0205 1d42 | B | Execute_Immediate Reference_Lex_1,0x42
0206 00c7 | | Action Elaborate_Subprogram
0207 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
0208 00c7 | | Action Elaborate_Subprogram
0209 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
020a 00c7 | | Action Elaborate_Subprogram
020b 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
020c 00c7 | | Action Elaborate_Subprogram
020d 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
020e 00c7 | | Action Elaborate_Subprogram
020f 1d47 | G | Execute_Immediate Reference_Lex_1,0x47
0210 00c7 | | Action Elaborate_Subprogram
0211 1d48 | H | Execute_Immediate Reference_Lex_1,0x48
0212 00c7 | | Action Elaborate_Subprogram
0213 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
0214 00c7 | | Action Elaborate_Subprogram
0215 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
0216 00c7 | | Action Elaborate_Subprogram
0217 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
0218 00c7 | | Action Elaborate_Subprogram
0219 e00b | | Load 0x0,0xb
021a e00c | | Load 0x0,0xc
021b e00d | | Load 0x0,0xd
021c 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f
021d 4804 |H | Short_Literal 0x4
021e e24a | J | Load 0x1,0x4a
021f 020e | | Execute Module,Augment_Imports
0220 e24a | J | Load 0x1,0x4a
0221 020d | | Execute Module,Elaborate
0222 BODY_0008:
0222 00bc | | Action Signal_Activated
0223 00bb | | Action Signal_Completion
0224 0000 0000 | | .BLANK 0000[0x4]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b e001 | | Load 0x0,0x1
022c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
022d 00ca | | Action Exit_Nullary_Function
022e 0000 0000 | | .XXX[0x2]
0230 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0234 0000 0000 | | .BLANK 0000[0x4]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b | ; | .CONST 0x023b ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0001 | | .CONST 0x0001 ; Number of locals
023b BODY_0238:
023b INIT_0238:
023b 00da | | Load_Top At_Offset_2
023c 021d | | Execute Heap_Access,Is_Null
023d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
023e 0000 0000 | | .XXX[0x2]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 00da | | Load_Top At_Offset_2
0244 e264 | d | Load 0x1,0x64
0245 e265 | e | Load 0x1,0x65
0246 1d66 | f | Execute_Immediate Reference_Lex_1,0x66
0247 1d67 | g | Execute_Immediate Reference_Lex_1,0x67
0248 1d68 | h | Execute_Immediate Reference_Lex_1,0x68
0249 e005 | | Load 0x0,0x5
024a 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
024b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
024c 0000 0000 | | .BLANK 0000[0x4]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253 | S | .CONST 0x0253 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0001 | | .CONST 0x0001 ; Number of locals
0253 BODY_0250:
0253 INIT_0250:
0253 00da | | Load_Top At_Offset_2
0254 e26c | l | Load 0x1,0x6c
0255 e26d | m | Load 0x1,0x6d
0256 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e
0257 e26f | o | Load 0x1,0x6f
0258 1d70 | p | Execute_Immediate Reference_Lex_1,0x70
0259 e005 | | Load 0x0,0x5
025a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
025b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
025c 0000 0000 | | .BLANK 0000[0x4]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 00da | | Load_Top At_Offset_2
0264 821c | | Call 0x1,0x1c
0265 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0266 0000 0000 | | .XXX[0x2]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b 4800 |H | Short_Literal 0x0
026c e214 | | Load 0x1,0x14
026d 1c08 | | Execute_Immediate Run_Utility,0x8
026e 4800 |H | Short_Literal 0x0
026f 00d9 | | Load_Top At_Offset_1
0270 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0271 4801 |H | Short_Literal 0x1
0272 4800 |H | Short_Literal 0x0
0273 e213 | | Load 0x1,0x13
0274 0334 | 4 | Declare_Variable Array,With_Constraint
0275 00d9 | | Load_Top At_Offset_1
0276 00d8 | | Load_Top At_Offset_0
0277 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0278 00da | | Load_Top At_Offset_2
0279 01da | | Execute Vector,Bounds
027a 00da | | Load_Top At_Offset_2
027b 01da | | Execute Vector,Bounds
027c 00da | | Load_Top At_Offset_2
027d 027f | | Execute Discrete,Equal
027e 7001 |p | Jump_Nonzero 0x280
027f 08e0 | | Execute_Immediate Raise,0xe0
0280 00cd | | Action Spare6_Action
0281 027f | | Execute Discrete,Equal
0282 7001 |p | Jump_Nonzero 0x284
0283 08e0 | | Execute_Immediate Raise,0xe0
0284 00d2 | | Pop_Control Pop_Count_2
0285 00d9 | | Load_Top At_Offset_1
0286 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0287 00ca | | Action Exit_Nullary_Function
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b | | .CONST 0x028b ; Address of begin
0289 0004 | | .CONST 0x0004 ; Address of exception handler
028a 0001 | | .CONST 0x0001 ; Number of locals
028b BODY_0288:
028b INIT_0288:
028b 00d1 | | Pop_Control Pop_Count_1
028c 00da | | Load_Top At_Offset_2
028d 01dc | | Execute Vector,Last
028e 00db | | Load_Top At_Offset_3
028f 01dd | | Execute Vector,First
0290 0263 | c | Execute Discrete,Above_Bound
0291 7006 |p | Jump_Nonzero 0x298
0292 00d8 | | Load_Top At_Offset_0
0293 e5ff | | Load 0x2,-0x1
0294 01d5 | | Execute Vector,Field_Reference
0295 1c00 | | Execute_Immediate Run_Utility,0x0
0296 0a01 | | Execute_Immediate Plus,0x1
0297 7ff8 | | Jump 0x290
0298 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0299 0000 0000 | | .BLANK 0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02b1 | | .CONST 0x02b1 ; Address of begin
02a1 0319 | | .CONST 0x0319 ; Address of exception handler
02a2 0004 | | .CONST 0x0004 ; Number of locals
02a3 INIT_02a0:
02a3 e00e | | Load 0x0,0xe
02a4 0322 | " | Declare_Variable Record
02a5 00d8 | | Load_Top At_Offset_0
02a6 1c00 | | Execute_Immediate Run_Utility,0x0
02a7 e00f | | Load 0x0,0xf
02a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a9 02c7 | | Declare_Variable Any
02aa 00d8 | | Load_Top At_Offset_0
02ab 1c00 | | Execute_Immediate Run_Utility,0x0
02ac e00f | | Load 0x0,0xf
02ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ae 02c7 | | Declare_Variable Any
02af 00d8 | | Load_Top At_Offset_0
02b0 1c00 | | Execute_Immediate Run_Utility,0x0
02b1 BODY_02a0:
02b1 e5fd | | Load 0x2,-0x3
02b2 6865 |he | Jump_Zero 0x318
02b3 0092 154b | K| Action Push_String_Extended,0x154b ; "Refreshing unit "
02b5 e5ff | | Load 0x2,-0x1
02b6 0217 | | Execute Heap_Access,All_Reference
02b7 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
02b8 e010 | | Load 0x0,0x10
02b9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02ba 01cc | | Execute Vector,Catenate
02bb 8011 | | Call 0x0,0x11
02bc e5fc | | Load 0x2,-0x4
02bd 00db | | Load_Top At_Offset_3
02be e5ff | | Load 0x2,-0x1
02bf 8260 | ` | Call 0x1,0x60
02c0 00d1 | | Pop_Control Pop_Count_1
02c1 c5fc | | Store 0x2,-0x4
02c2 e5fc | | Load 0x2,-0x4
02c3 7054 |pT | Jump_Nonzero 0x318
02c4 e5fc | | Load 0x2,-0x4
02c5 00d9 | | Load_Top At_Offset_1
02c6 0120 | | Execute Any,Is_Value
02c7 6803 |h | Jump_Zero 0x2cb
02c8 e00f | | Load 0x0,0xf
02c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ca 7801 |x | Jump 0x2cc
02cb 00d9 | | Load_Top At_Offset_1
02cc 00db | | Load_Top At_Offset_3
02cd 0120 | | Execute Any,Is_Value
02ce 6803 |h | Jump_Zero 0x2d2
02cf e00f | | Load 0x0,0xf
02d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d1 7801 |x | Jump 0x2d3
02d2 00db | | Load_Top At_Offset_3
02d3 e5ff | | Load 0x2,-0x1
02d4 8261 | a | Call 0x1,0x61
02d5 c403 | | Store 0x2,0x3
02d6 c404 | | Store 0x2,0x4
02d7 c5fc | | Store 0x2,-0x4
02d8 e5fc | | Load 0x2,-0x4
02d9 703e |p> | Jump_Nonzero 0x318
02da 4801 |H | Short_Literal 0x1
02db e5ff | | Load 0x2,-0x1
02dc 0217 | | Execute Heap_Access,All_Reference
02dd 3811 |8 | Execute Record,Field_Write,Field_Number 0x11
02de e00f | | Load 0x0,0xf
02df 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02e0 e5ff | | Load 0x2,-0x1
02e1 0217 | | Execute Heap_Access,All_Reference
02e2 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
02e3 e5fd | | Load 0x2,-0x3
02e4 0f02 | | Execute_Immediate Equal,0x2
02e5 6832 |h2 | Jump_Zero 0x318
02e6 00da | | Load_Top At_Offset_2
02e7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02e8 e003 | | Load 0x0,0x3
02e9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02ea 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02eb 012f | / | Execute Any,Equal
02ec 6822 |h" | Jump_Zero 0x30f
02ed e5ff | | Load 0x2,-0x1
02ee 0217 | | Execute Heap_Access,All_Reference
02ef 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02f0 681e |h | Jump_Zero 0x30f
02f1 e5ff | | Load 0x2,-0x1
02f2 0217 | | Execute Heap_Access,All_Reference
02f3 3c11 |< | Execute Record,Field_Read,Field_Number 0x11
02f4 0e02 | | Execute_Immediate Not_Equal,0x2
02f5 7007 |p | Jump_Nonzero 0x2fd
02f6 e5ff | | Load 0x2,-0x1
02f7 0217 | | Execute Heap_Access,All_Reference
02f8 3c10 |< | Execute Record,Field_Read,Field_Number 0x10
02f9 00da | | Load_Top At_Offset_2
02fa e00f | | Load 0x0,0xf
02fb 181f | | Execute Package,Field_Execute,Field_Number 0x1f
02fc 6808 |h | Jump_Zero 0x305
02fd e5ff | | Load 0x2,-0x1
02fe 8275 | u | Call 0x1,0x75
02ff 6805 |h | Jump_Zero 0x305
0300 e5fc | | Load 0x2,-0x4
0301 e5fe | | Load 0x2,-0x2
0302 e5ff | | Load 0x2,-0x1
0303 8274 | t | Call 0x1,0x74
0304 c5fc | | Store 0x2,-0x4
0305 4802 |H | Short_Literal 0x2
0306 e5ff | | Load 0x2,-0x1
0307 0217 | | Execute Heap_Access,All_Reference
0308 3811 |8 | Execute Record,Field_Write,Field_Number 0x11
0309 e00f | | Load 0x0,0xf
030a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
030b e5ff | | Load 0x2,-0x1
030c 0217 | | Execute Heap_Access,All_Reference
030d 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
030e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
030f 4802 |H | Short_Literal 0x2
0310 e5ff | | Load 0x2,-0x1
0311 0217 | | Execute Heap_Access,All_Reference
0312 3811 |8 | Execute Record,Field_Write,Field_Number 0x11
0313 e00f | | Load 0x0,0xf
0314 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0315 e5ff | | Load 0x2,-0x1
0316 0217 | | Execute Heap_Access,All_Reference
0317 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
0318 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0319 TRAP_02a0:
0319 4885 |H | Short_Literal 0x85
031a 010f | | Execute Exception,Equal
031b 6811 |h | Jump_Zero 0x32d
031c e002 | | Load 0x0,0x2
031d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
031e 4801 |H | Short_Literal 0x1
031f 4801 |H | Short_Literal 0x1
0320 e005 | | Load 0x0,0x5
0321 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0322 0334 | 4 | Declare_Variable Array,With_Constraint
0323 e5ff | | Load 0x2,-0x1
0324 8210 | | Call 0x1,0x10
0325 4801 |H | Short_Literal 0x1
0326 00da | | Load_Top At_Offset_2
0327 01d6 | | Execute Vector,Field_Write
0328 6007 |` | Indirect_Literal Discrete,0x330,{0x00000000, 0x0000200e}
0329 e002 | | Load 0x0,0x2
032a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
032b c5fc | | Store 0x2,-0x4
032c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
032d 0100 | | Execute Exception,Raise
032e 0000 0000 | | .XXX[0x2]
0330 0000 0000 | | .LITERAL {0x00000000, 0x0000200e}
0334 0000 0000 | | .BLANK 0000[0x4]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b | ; | .CONST 0x033b ; Address of begin
0339 0004 | | .CONST 0x0004 ; Address of exception handler
033a 0001 | | .CONST 0x0001 ; Number of locals
033b BODY_0338:
033b INIT_0338:
033b 00cf | | Action Mark_Auxiliary
033c 00db | | Load_Top At_Offset_3
033d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
033e 4801 |H | Short_Literal 0x1
033f 0263 | c | Execute Discrete,Above_Bound
0340 700b |p | Jump_Nonzero 0x34c
0341 e5fc | | Load 0x2,-0x4
0342 e5fd | | Load 0x2,-0x3
0343 e5fe | | Load 0x2,-0x2
0344 00db | | Load_Top At_Offset_3
0345 e5ff | | Load 0x2,-0x1
0346 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0347 01d7 | | Execute Vector,Field_Read
0348 825a | Z | Call 0x1,0x5a
0349 c5fc | | Store 0x2,-0x4
034a 00c8 | | Action Pop_Auxiliary_Range
034b 3ff5 |? | Loop_Increasing 0x341
034c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
034d 0000 0000 | | .XXX[0x3]
034f 0000 | |
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0353 | S | .CONST 0x0353 ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0001 | | .CONST 0x0001 ; Number of locals
0353 BODY_0350:
0353 INIT_0350:
0353 00da | | Load_Top At_Offset_2
0354 6804 |h | Jump_Zero 0x359
0355 00da | | Load_Top At_Offset_2
0356 0217 | | Execute Heap_Access,All_Reference
0357 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0358 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0359 4800 |H | Short_Literal 0x0
035a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
035b 0000 0000 | | .BLANK 0000[0x5]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363 | c | .CONST 0x0363 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0001 | | .CONST 0x0001 ; Number of locals
0363 BODY_0360:
0363 INIT_0360:
0363 00db | | Load_Top At_Offset_3
0364 00db | | Load_Top At_Offset_3
0365 0217 | | Execute Heap_Access,All_Reference
0366 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0367 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b | k | .CONST 0x036b ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0001 | | .CONST 0x0001 ; Number of locals
036b BODY_0368:
036b INIT_0368:
036b 00da | | Load_Top At_Offset_2
036c 6806 |h | Jump_Zero 0x373
036d 00da | | Load_Top At_Offset_2
036e 0217 | | Execute Heap_Access,All_Reference
036f 3c11 |< | Execute Record,Field_Read,Field_Number 0x11
0370 e5fe | | Load 0x2,-0x2
0371 027b | { | Execute Discrete,Greater_Equal
0372 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0373 4800 |H | Short_Literal 0x0
0374 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0375 0000 0000 | | .XXX[0x3]
0377 0000 | |
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b | { | .CONST 0x037b ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0001 | | .CONST 0x0001 ; Number of locals
037b BODY_0378:
037b INIT_0378:
037b 00db | | Load_Top At_Offset_3
037c 00db | | Load_Top At_Offset_3
037d 824e | N | Call 0x1,0x4e
037e 6809 |h | Jump_Zero 0x388
037f 00da | | Load_Top At_Offset_2
0380 0217 | | Execute Heap_Access,All_Reference
0381 3c10 |< | Execute Record,Field_Read,Field_Number 0x10
0382 00d8 | | Load_Top At_Offset_0
0383 0120 | | Execute Any,Is_Value
0384 7002 |p | Jump_Nonzero 0x387
0385 00d8 | | Load_Top At_Offset_0
0386 011e | | Execute Any,Convert
0387 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0388 e004 | | Load 0x0,0x4
0389 180f | | Execute Package,Field_Execute,Field_Number 0xf
038a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
038b 0000 0000 | | .BLANK 0000[0x5]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 00da | | Load_Top At_Offset_2
0394 6806 |h | Jump_Zero 0x39b
0395 00da | | Load_Top At_Offset_2
0396 0217 | | Execute Heap_Access,All_Reference
0397 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
0398 e010 | | Load 0x0,0x10
0399 1812 | | Execute Package,Field_Execute,Field_Number 0x12
039a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
039b 00ea | | Load_Encached Null_String_Cache
039c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
039d 0000 0000 | | .XXX[0x3]
039f 0000 | |
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03af | | .CONST 0x03af ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0003 | | .CONST 0x0003 ; Number of locals
03a3 INIT_03a0:
03a3 00da | | Load_Top At_Offset_2
03a4 0217 | | Execute Heap_Access,All_Reference
03a5 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
03a6 e010 | | Load 0x0,0x10
03a7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03a8 4800 |H | Short_Literal 0x0
03a9 00d9 | | Load_Top At_Offset_1
03aa 4827 |H' | Short_Literal 0x27
03ab e012 | | Load 0x0,0x12
03ac 1820 | | Execute Package,Field_Execute,Field_Number 0x20
03ad 00e2 | | Load_Encached Integer_Cache
03ae 03f1 | | Declare_Variable Discrete,With_Value
03af BODY_03a0:
03af 00d8 | | Load_Top At_Offset_0
03b0 680e |h | Jump_Zero 0x3bf
03b1 e5ff | | Load 0x2,-0x1
03b2 0217 | | Execute Heap_Access,All_Reference
03b3 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
03b4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03b5 e003 | | Load 0x0,0x3
03b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03b7 1844 | D | Execute Package,Field_Execute,Field_Number 0x44
03b8 00d9 | | Load_Top At_Offset_1
03b9 00db | | Load_Top At_Offset_3
03ba 01dc | | Execute Vector,Last
03bb e402 | | Load 0x2,0x2
03bc 01cf | | Execute Vector,Slice_Read
03bd 01cc | | Execute Vector,Catenate
03be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03bf e5ff | | Load 0x2,-0x1
03c0 0217 | | Execute Heap_Access,All_Reference
03c1 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
03c2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03c3 e003 | | Load 0x0,0x3
03c4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03c5 1844 | D | Execute Package,Field_Execute,Field_Number 0x44
03c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03c7 0000 | | .XXX[0x1]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cf | | .CONST 0x03cf ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0003 | | .CONST 0x0003 ; Number of locals
03cb INIT_03c8:
03cb 00da | | Load_Top At_Offset_2
03cc 821c | | Call 0x1,0x1c
03cd 00db | | Load_Top At_Offset_3
03ce 821d | | Call 0x1,0x1d
03cf BODY_03c8:
03cf 00d9 | | Load_Top At_Offset_1
03d0 01dd | | Execute Vector,First
03d1 00da | | Load_Top At_Offset_2
03d2 01dc | | Execute Vector,Last
03d3 00da | | Load_Top At_Offset_2
03d4 01db | | Execute Vector,Length
03d5 0272 | r | Execute Discrete,Minus
03d6 0aff | | Execute_Immediate Plus,-0x1
03d7 00d8 | | Load_Top At_Offset_0
03d8 00e2 | | Load_Encached Integer_Cache
03d9 0260 | ` | Execute Discrete,In_Type
03da 7001 |p | Jump_Nonzero 0x3dc
03db 0801 | | Execute_Immediate Raise,0x1
03dc 00db | | Load_Top At_Offset_3
03dd 01cf | | Execute Vector,Slice_Read
03de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03df 0000 | | .XXX[0x1]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 00da | | Load_Top At_Offset_2
03e4 680b |h | Jump_Zero 0x3f0
03e5 00da | | Load_Top At_Offset_2
03e6 0217 | | Execute Heap_Access,All_Reference
03e7 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
03e8 e001 | | Load 0x0,0x1
03e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ea 00d9 | | Load_Top At_Offset_1
03eb 00d0 | | Action Swap_Control
03ec 0260 | ` | Execute Discrete,In_Type
03ed 7001 |p | Jump_Nonzero 0x3ef
03ee 0801 | | Execute_Immediate Raise,0x1
03ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03f0 4800 |H | Short_Literal 0x0
03f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03f2 0000 0000 | | .BLANK 0000[0x6]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fb | | .CONST 0x03fb ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0001 | | .CONST 0x0001 ; Number of locals
03fb BODY_03f8:
03fb INIT_03f8:
03fb 00db | | Load_Top At_Offset_3
03fc 00db | | Load_Top At_Offset_3
03fd 0217 | | Execute Heap_Access,All_Reference
03fe 380a |8 | Execute Record,Field_Write,Field_Number 0xa
03ff 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403 | | .CONST 0x0403 ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0001 | | .CONST 0x0001 ; Number of locals
0403 BODY_0400:
0403 INIT_0400:
0403 00da | | Load_Top At_Offset_2
0404 6804 |h | Jump_Zero 0x409
0405 00da | | Load_Top At_Offset_2
0406 0217 | | Execute Heap_Access,All_Reference
0407 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0408 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0409 4800 |H | Short_Literal 0x0
040a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
040b 0000 0000 | | .BLANK 0000[0x5]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0417 | | .CONST 0x0417 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0002 | | .CONST 0x0002 ; Number of locals
0413 INIT_0410:
0413 e00e | | Load 0x0,0xe
0414 0322 | " | Declare_Variable Record
0415 00d8 | | Load_Top At_Offset_0
0416 1c00 | | Execute_Immediate Run_Utility,0x0
0417 BODY_0410:
0417 00db | | Load_Top At_Offset_3
0418 0217 | | Execute Heap_Access,All_Reference
0419 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
041a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
041b e003 | | Load 0x0,0x3
041c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
041d 680a |h | Jump_Zero 0x428
041e e5fd | | Load 0x2,-0x3
041f 00d9 | | Load_Top At_Offset_1
0420 e5ff | | Load 0x2,-0x1
0421 8260 | ` | Call 0x1,0x60
0422 00d1 | | Pop_Control Pop_Count_1
0423 c5fd | | Store 0x2,-0x3
0424 00d8 | | Load_Top At_Offset_0
0425 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0426 c5fe | | Store 0x2,-0x2
0427 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0428 00db | | Load_Top At_Offset_3
0429 0217 | | Execute Heap_Access,All_Reference
042a 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
042b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
042c c5fe | | Store 0x2,-0x2
042d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
042e 0000 0000 | | .XXX[0x2]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0437 | 7 | .CONST 0x0437 ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0002 | | .CONST 0x0002 ; Number of locals
0433 INIT_0430:
0433 e00e | | Load 0x0,0xe
0434 0322 | " | Declare_Variable Record
0435 00d8 | | Load_Top At_Offset_0
0436 1c00 | | Execute_Immediate Run_Utility,0x0
0437 BODY_0430:
0437 00db | | Load_Top At_Offset_3
0438 0217 | | Execute Heap_Access,All_Reference
0439 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
043a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
043b e003 | | Load 0x0,0x3
043c 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
043d 680a |h | Jump_Zero 0x448
043e e5fd | | Load 0x2,-0x3
043f 00d9 | | Load_Top At_Offset_1
0440 e5ff | | Load 0x2,-0x1
0441 8260 | ` | Call 0x1,0x60
0442 00d1 | | Pop_Control Pop_Count_1
0443 c5fd | | Store 0x2,-0x3
0444 00d8 | | Load_Top At_Offset_0
0445 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0446 a5fe | | Store_Unchecked 0x2,-0x2
0447 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0448 00db | | Load_Top At_Offset_3
0449 0217 | | Execute Heap_Access,All_Reference
044a 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
044b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
044c a5fe | | Store_Unchecked 0x2,-0x2
044d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
044e 0000 0000 | | .XXX[0x2]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 045a | Z | .CONST 0x045a ; Address of begin
0451 046d | m | .CONST 0x046d ; Address of exception handler
0452 0003 | | .CONST 0x0003 ; Number of locals
0453 INIT_0450:
0453 e003 | | Load 0x0,0x3
0454 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0455 02c7 | | Declare_Variable Any
0456 00d8 | | Load_Top At_Offset_0
0457 1c00 | | Execute_Immediate Run_Utility,0x0
0458 029f 1043 | C| Declare_Subprogram INIT_1040,For_Call
045a BODY_0450:
045a e5ff | | Load 0x2,-0x1
045b 0217 | | Execute Heap_Access,All_Reference
045c 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
045d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
045e e003 | | Load 0x0,0x3
045f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0460 6806 |h | Jump_Zero 0x467
0461 8403 | | Call 0x2,0x3
0462 00d9 | | Load_Top At_Offset_1
0463 e5ff | | Load 0x2,-0x1
0464 0217 | | Execute Heap_Access,All_Reference
0465 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0466 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0467 e5ff | | Load 0x2,-0x1
0468 0217 | | Execute Heap_Access,All_Reference
0469 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
046a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
046b c5fe | | Store 0x2,-0x2
046c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
046d TRAP_0450:
046d 4885 |H | Short_Literal 0x85
046e 010f | | Execute Exception,Equal
046f 6806 |h | Jump_Zero 0x476
0470 e5ff | | Load 0x2,-0x1
0471 0217 | | Execute Heap_Access,All_Reference
0472 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0473 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0474 c5fe | | Store 0x2,-0x2
0475 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0476 0100 | | Execute Exception,Raise
0477 0000 | | .XXX[0x1]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047f | | .CONST 0x047f ; Address of begin
0479 0004 | | .CONST 0x0004 ; Address of exception handler
047a 0002 | | .CONST 0x0002 ; Number of locals
047b INIT_0478:
047b e00e | | Load 0x0,0xe
047c 0322 | " | Declare_Variable Record
047d 00d8 | | Load_Top At_Offset_0
047e 1c00 | | Execute_Immediate Run_Utility,0x0
047f BODY_0478:
047f e5fd | | Load 0x2,-0x3
0480 00d9 | | Load_Top At_Offset_1
0481 e5ff | | Load 0x2,-0x1
0482 8260 | ` | Call 0x1,0x60
0483 00d1 | | Pop_Control Pop_Count_1
0484 c5fd | | Store 0x2,-0x3
0485 00d8 | | Load_Top At_Offset_0
0486 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0487 e5fe | | Load 0x2,-0x2
0488 016d | m | Execute Variant_Record,Structure_Write
0489 4502 |E | Exit_Suprogram New_Top_Offset 0x2
048a 0000 0000 | | .BLANK 0000[0x6]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 049a | | .CONST 0x049a ; Address of begin
0491 0004 | | .CONST 0x0004 ; Address of exception handler
0492 0003 | | .CONST 0x0003 ; Number of locals
0493 INIT_0490:
0493 e003 | | Load 0x0,0x3
0494 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0495 e003 | | Load 0x0,0x3
0496 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0497 02c7 | | Declare_Variable Any
0498 00d8 | | Load_Top At_Offset_0
0499 1c00 | | Execute_Immediate Run_Utility,0x0
049a BODY_0490:
049a e5fd | | Load 0x2,-0x3
049b 00d9 | | Load_Top At_Offset_1
049c 0120 | | Execute Any,Is_Value
049d 6803 |h | Jump_Zero 0x4a1
049e e003 | | Load 0x0,0x3
049f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04a0 7801 |x | Jump 0x4a2
04a1 00d9 | | Load_Top At_Offset_1
04a2 e5ff | | Load 0x2,-0x1
04a3 8224 | $ | Call 0x1,0x24
04a4 c403 | | Store 0x2,0x3
04a5 c5fd | | Store 0x2,-0x3
04a6 e5fd | | Load 0x2,-0x3
04a7 7026 |p& | Jump_Nonzero 0x4ce
04a8 e003 | | Load 0x0,0x3
04a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04aa e5fe | | Load 0x2,-0x2
04ab 0120 | | Execute Any,Is_Value
04ac 6803 |h | Jump_Zero 0x4b0
04ad e003 | | Load 0x0,0x3
04ae 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04af 7801 |x | Jump 0x4b1
04b0 e5fe | | Load 0x2,-0x2
04b1 6022 |`" | Indirect_Literal Discrete,0x4d4,{0x00000000, 0x00004000}
04b2 e013 | | Load 0x0,0x13
04b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04b4 4800 |H | Short_Literal 0x0
04b5 e403 | | Load 0x2,0x3
04b6 e003 | | Load 0x0,0x3
04b7 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
04b8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04b9 c5fe | | Store 0x2,-0x2
04ba 005a | Z | Store_Top Discrete,At_Offset_2
04bb 00d9 | | Load_Top At_Offset_1
04bc 6811 |h | Jump_Zero 0x4ce
04bd e002 | | Load 0x0,0x2
04be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04bf 4801 |H | Short_Literal 0x1
04c0 4801 |H | Short_Literal 0x1
04c1 e005 | | Load 0x0,0x5
04c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04c3 0334 | 4 | Declare_Variable Array,With_Constraint
04c4 00da | | Load_Top At_Offset_2
04c5 e005 | | Load 0x0,0x5
04c6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04c7 4801 |H | Short_Literal 0x1
04c8 00da | | Load_Top At_Offset_2
04c9 01d6 | | Execute Vector,Field_Write
04ca 6005 |` | Indirect_Literal Discrete,0x4d0,{0x00000000, 0x00002001}
04cb e002 | | Load 0x0,0x2
04cc 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
04cd c5fd | | Store 0x2,-0x3
04ce 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04cf 0000 | | .XXX[0x1]
04d0 0000 0000 | | .LITERAL {0x00000000, 0x00002001}
04d4 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db | | .CONST 0x04db ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0001 | | .CONST 0x0001 ; Number of locals
04db BODY_04d8:
04db INIT_04d8:
04db 00da | | Load_Top At_Offset_2
04dc 6804 |h | Jump_Zero 0x4e1
04dd 00da | | Load_Top At_Offset_2
04de 0217 | | Execute Heap_Access,All_Reference
04df 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
04e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04e1 4800 |H | Short_Literal 0x0
04e2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04e3 0000 0000 | | .BLANK 0000[0x5]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb | | .CONST 0x04eb ; Address of begin
04e9 0004 | | .CONST 0x0004 ; Address of exception handler
04ea 0001 | | .CONST 0x0001 ; Number of locals
04eb BODY_04e8:
04eb INIT_04e8:
04eb 00db | | Load_Top At_Offset_3
04ec 00db | | Load_Top At_Offset_3
04ed 0217 | | Execute Heap_Access,All_Reference
04ee 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
04ef 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3 | | .CONST 0x04f3 ; Address of begin
04f1 0004 | | .CONST 0x0004 ; Address of exception handler
04f2 0001 | | .CONST 0x0001 ; Number of locals
04f3 BODY_04f0:
04f3 INIT_04f0:
04f3 00da | | Load_Top At_Offset_2
04f4 6804 |h | Jump_Zero 0x4f9
04f5 00da | | Load_Top At_Offset_2
04f6 0217 | | Execute Heap_Access,All_Reference
04f7 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
04f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04f9 4800 |H | Short_Literal 0x0
04fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04fb 0000 0000 | | .BLANK 0000[0x5]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503 | | .CONST 0x0503 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 0001 | | .CONST 0x0001 ; Number of locals
0503 BODY_0500:
0503 INIT_0500:
0503 00db | | Load_Top At_Offset_3
0504 00db | | Load_Top At_Offset_3
0505 0217 | | Execute Heap_Access,All_Reference
0506 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0507 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b | | .CONST 0x050b ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0001 | | .CONST 0x0001 ; Number of locals
050b BODY_0508:
050b INIT_0508:
050b 00da | | Load_Top At_Offset_2
050c 6806 |h | Jump_Zero 0x513
050d 00da | | Load_Top At_Offset_2
050e 0217 | | Execute Heap_Access,All_Reference
050f 3c0c |< | Execute Record,Field_Read,Field_Number 0xc
0510 e010 | | Load 0x0,0x10
0511 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0512 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0513 00ea | | Load_Encached Null_String_Cache
0514 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0515 0000 0000 | | .XXX[0x3]
0517 0000 | |
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b | | .CONST 0x051b ; Address of begin
0519 0004 | | .CONST 0x0004 ; Address of exception handler
051a 0001 | | .CONST 0x0001 ; Number of locals
051b BODY_0518:
051b INIT_0518:
051b 00da | | Load_Top At_Offset_2
051c 825f | _ | Call 0x1,0x5f
051d e5fe | | Load 0x2,-0x2
051e e010 | | Load 0x0,0x10
051f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0520 00db | | Load_Top At_Offset_3
0521 0217 | | Execute Heap_Access,All_Reference
0522 380c |8 | Execute Record,Field_Write,Field_Number 0xc
0523 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0524 0000 0000 | | .BLANK 0000[0x4]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 0530 | 0 | .CONST 0x0530 ; Address of begin
0529 0004 | | .CONST 0x0004 ; Address of exception handler
052a 0003 | | .CONST 0x0003 ; Number of locals
052b INIT_0528:
052b e00d | | Load 0x0,0xd
052c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
052d e002 | | Load 0x0,0x2
052e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
052f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0530 BODY_0528:
0530 00d8 | | Load_Top At_Offset_0
0531 e00d | | Load 0x0,0xd
0532 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0533 4800 |H | Short_Literal 0x0
0534 e5fe | | Load 0x2,-0x2
0535 e5ff | | Load 0x2,-0x1
0536 8276 | v | Call 0x1,0x76
0537 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0538 0059 | Y | Store_Top Discrete,At_Offset_1
0539 00d8 | | Load_Top At_Offset_0
053a 7006 |p | Jump_Nonzero 0x541
053b 00d9 | | Load_Top At_Offset_1
053c 0217 | | Execute Heap_Access,All_Reference
053d 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
053e e010 | | Load 0x0,0x10
053f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0540 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0541 00d8 | | Load_Top At_Offset_0
0542 6019 |` | Indirect_Literal Discrete,0x55c,{0x00000000, 0x00002009}
0543 027f | | Execute Discrete,Equal
0544 6802 |h | Jump_Zero 0x547
0545 00ea | | Load_Encached Null_String_Cache
0546 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0547 4801 |H | Short_Literal 0x1
0548 4802 |H | Short_Literal 0x2
0549 e005 | | Load 0x0,0x5
054a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
054b 0334 | 4 | Declare_Variable Array,With_Constraint
054c e5ff | | Load 0x2,-0x1
054d 8210 | | Call 0x1,0x10
054e 4801 |H | Short_Literal 0x1
054f 00da | | Load_Top At_Offset_2
0550 01d6 | | Execute Vector,Field_Write
0551 e5fe | | Load 0x2,-0x2
0552 e014 | | Load 0x0,0x14
0553 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0554 4802 |H | Short_Literal 0x2
0555 00da | | Load_Top At_Offset_2
0556 01d6 | | Execute Vector,Field_Write
0557 00d9 | | Load_Top At_Offset_1
0558 e002 | | Load 0x0,0x2
0559 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
055a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
055b 0000 | | .XXX[0x1]
055c 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0568 | h | .CONST 0x0568 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0003 | | .CONST 0x0003 ; Number of locals
0563 INIT_0560:
0563 e00d | | Load 0x0,0xd
0564 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0565 e002 | | Load 0x0,0x2
0566 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0567 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0568 BODY_0560:
0568 00d8 | | Load_Top At_Offset_0
0569 e00d | | Load 0x0,0xd
056a 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
056b 4801 |H | Short_Literal 0x1
056c e5fd | | Load 0x2,-0x3
056d e5ff | | Load 0x2,-0x1
056e 8276 | v | Call 0x1,0x76
056f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0570 0059 | Y | Store_Top Discrete,At_Offset_1
0571 00d8 | | Load_Top At_Offset_0
0572 7009 |p | Jump_Nonzero 0x57c
0573 e5ff | | Load 0x2,-0x1
0574 825f | _ | Call 0x1,0x5f
0575 e5fe | | Load 0x2,-0x2
0576 e010 | | Load 0x0,0x10
0577 180f | | Execute Package,Field_Execute,Field_Number 0xf
0578 00da | | Load_Top At_Offset_2
0579 0217 | | Execute Heap_Access,All_Reference
057a 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
057b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
057c e002 | | Load 0x0,0x2
057d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057e 4801 |H | Short_Literal 0x1
057f 4802 |H | Short_Literal 0x2
0580 e005 | | Load 0x0,0x5
0581 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0582 0334 | 4 | Declare_Variable Array,With_Constraint
0583 e5ff | | Load 0x2,-0x1
0584 8210 | | Call 0x1,0x10
0585 4801 |H | Short_Literal 0x1
0586 00da | | Load_Top At_Offset_2
0587 01d6 | | Execute Vector,Field_Write
0588 e5fd | | Load 0x2,-0x3
0589 e014 | | Load 0x0,0x14
058a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
058b 4802 |H | Short_Literal 0x2
058c 00da | | Load_Top At_Offset_2
058d 01d6 | | Execute Vector,Field_Write
058e 00da | | Load_Top At_Offset_2
058f e002 | | Load 0x0,0x2
0590 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0591 c5fc | | Store 0x2,-0x4
0592 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0593 0000 0000 | | .BLANK 0000[0x5]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 05a0 | | .CONST 0x05a0 ; Address of begin
0599 0004 | | .CONST 0x0004 ; Address of exception handler
059a 0003 | | .CONST 0x0003 ; Number of locals
059b INIT_0598:
059b e00d | | Load 0x0,0xd
059c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
059d e002 | | Load 0x0,0x2
059e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
059f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05a0 BODY_0598:
05a0 00d8 | | Load_Top At_Offset_0
05a1 e00d | | Load 0x0,0xd
05a2 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
05a3 4800 |H | Short_Literal 0x0
05a4 e5fe | | Load 0x2,-0x2
05a5 e5ff | | Load 0x2,-0x1
05a6 8276 | v | Call 0x1,0x76
05a7 0033 | 3 | Store_Top Heap_Access,At_Offset_3
05a8 0059 | Y | Store_Top Discrete,At_Offset_1
05a9 00d8 | | Load_Top At_Offset_0
05aa 7004 |p | Jump_Nonzero 0x5af
05ab 00d9 | | Load_Top At_Offset_1
05ac 0217 | | Execute Heap_Access,All_Reference
05ad 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
05ae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05af 00d8 | | Load_Top At_Offset_0
05b0 601b |` | Indirect_Literal Discrete,0x5cc,{0x00000000, 0x00002009}
05b1 027f | | Execute Discrete,Equal
05b2 6802 |h | Jump_Zero 0x5b5
05b3 4800 |H | Short_Literal 0x0
05b4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05b5 4801 |H | Short_Literal 0x1
05b6 4802 |H | Short_Literal 0x2
05b7 e005 | | Load 0x0,0x5
05b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05b9 0334 | 4 | Declare_Variable Array,With_Constraint
05ba e5ff | | Load 0x2,-0x1
05bb 8210 | | Call 0x1,0x10
05bc 4801 |H | Short_Literal 0x1
05bd 00da | | Load_Top At_Offset_2
05be 01d6 | | Execute Vector,Field_Write
05bf e5fe | | Load 0x2,-0x2
05c0 e014 | | Load 0x0,0x14
05c1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05c2 4802 |H | Short_Literal 0x2
05c3 00da | | Load_Top At_Offset_2
05c4 01d6 | | Execute Vector,Field_Write
05c5 00d9 | | Load_Top At_Offset_1
05c6 e002 | | Load 0x0,0x2
05c7 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
05c8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05c9 0000 0000 | | .XXX[0x3]
05cb 0000 | |
05cc 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d8 | | .CONST 0x05d8 ; Address of begin
05d1 0004 | | .CONST 0x0004 ; Address of exception handler
05d2 0003 | | .CONST 0x0003 ; Number of locals
05d3 INIT_05d0:
05d3 e002 | | Load 0x0,0x2
05d4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
05d5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05d6 e00d | | Load 0x0,0xd
05d7 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
05d8 BODY_05d0:
05d8 00d9 | | Load_Top At_Offset_1
05d9 e00d | | Load 0x0,0xd
05da 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
05db 4801 |H | Short_Literal 0x1
05dc e5fd | | Load 0x2,-0x3
05dd e5ff | | Load 0x2,-0x1
05de 8276 | v | Call 0x1,0x76
05df 0032 | 2 | Store_Top Heap_Access,At_Offset_2
05e0 005a | Z | Store_Top Discrete,At_Offset_2
05e1 00d9 | | Load_Top At_Offset_1
05e2 7005 |p | Jump_Nonzero 0x5e8
05e3 e5fe | | Load 0x2,-0x2
05e4 00d9 | | Load_Top At_Offset_1
05e5 0217 | | Execute Heap_Access,All_Reference
05e6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
05e7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05e8 e002 | | Load 0x0,0x2
05e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ea 4801 |H | Short_Literal 0x1
05eb 4802 |H | Short_Literal 0x2
05ec e005 | | Load 0x0,0x5
05ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05ee 0334 | 4 | Declare_Variable Array,With_Constraint
05ef e5ff | | Load 0x2,-0x1
05f0 8210 | | Call 0x1,0x10
05f1 4801 |H | Short_Literal 0x1
05f2 00da | | Load_Top At_Offset_2
05f3 01d6 | | Execute Vector,Field_Write
05f4 e5fd | | Load 0x2,-0x3
05f5 e014 | | Load 0x0,0x14
05f6 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05f7 4802 |H | Short_Literal 0x2
05f8 00da | | Load_Top At_Offset_2
05f9 01d6 | | Execute Vector,Field_Write
05fa 00db | | Load_Top At_Offset_3
05fb e002 | | Load 0x0,0x2
05fc 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
05fd c5fc | | Store 0x2,-0x4
05fe 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05ff 0000 | | .XXX[0x1]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0608 | | .CONST 0x0608 ; Address of begin
0601 0004 | | .CONST 0x0004 ; Address of exception handler
0602 0003 | | .CONST 0x0003 ; Number of locals
0603 INIT_0600:
0603 e00d | | Load 0x0,0xd
0604 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0605 e002 | | Load 0x0,0x2
0606 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0607 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0608 BODY_0600:
0608 00d8 | | Load_Top At_Offset_0
0609 e00d | | Load 0x0,0xd
060a 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
060b 4800 |H | Short_Literal 0x0
060c e5fe | | Load 0x2,-0x2
060d e5ff | | Load 0x2,-0x1
060e 8276 | v | Call 0x1,0x76
060f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0610 0059 | Y | Store_Top Discrete,At_Offset_1
0611 00d8 | | Load_Top At_Offset_0
0612 7004 |p | Jump_Nonzero 0x617
0613 00d9 | | Load_Top At_Offset_1
0614 0217 | | Execute Heap_Access,All_Reference
0615 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0616 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0617 00d8 | | Load_Top At_Offset_0
0618 601b |` | Indirect_Literal Discrete,0x634,{0x00000000, 0x00002009}
0619 027f | | Execute Discrete,Equal
061a 6802 |h | Jump_Zero 0x61d
061b 4800 |H | Short_Literal 0x0
061c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
061d 4801 |H | Short_Literal 0x1
061e 4802 |H | Short_Literal 0x2
061f e005 | | Load 0x0,0x5
0620 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0621 0334 | 4 | Declare_Variable Array,With_Constraint
0622 e5ff | | Load 0x2,-0x1
0623 8210 | | Call 0x1,0x10
0624 4801 |H | Short_Literal 0x1
0625 00da | | Load_Top At_Offset_2
0626 01d6 | | Execute Vector,Field_Write
0627 e5fe | | Load 0x2,-0x2
0628 e014 | | Load 0x0,0x14
0629 181c | | Execute Package,Field_Execute,Field_Number 0x1c
062a 4802 |H | Short_Literal 0x2
062b 00da | | Load_Top At_Offset_2
062c 01d6 | | Execute Vector,Field_Write
062d 00d9 | | Load_Top At_Offset_1
062e e002 | | Load 0x0,0x2
062f 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0630 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0631 0000 0000 | | .XXX[0x3]
0633 0000 | |
0634 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 0640 | @ | .CONST 0x0640 ; Address of begin
0639 0004 | | .CONST 0x0004 ; Address of exception handler
063a 0003 | | .CONST 0x0003 ; Number of locals
063b INIT_0638:
063b e002 | | Load 0x0,0x2
063c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
063d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
063e e00d | | Load 0x0,0xd
063f 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0640 BODY_0638:
0640 00d9 | | Load_Top At_Offset_1
0641 e00d | | Load 0x0,0xd
0642 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0643 4801 |H | Short_Literal 0x1
0644 e5fd | | Load 0x2,-0x3
0645 e5ff | | Load 0x2,-0x1
0646 8276 | v | Call 0x1,0x76
0647 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0648 005a | Z | Store_Top Discrete,At_Offset_2
0649 00d9 | | Load_Top At_Offset_1
064a 7005 |p | Jump_Nonzero 0x650
064b e5fe | | Load 0x2,-0x2
064c 00d9 | | Load_Top At_Offset_1
064d 0217 | | Execute Heap_Access,All_Reference
064e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
064f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0650 e002 | | Load 0x0,0x2
0651 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0652 4801 |H | Short_Literal 0x1
0653 4802 |H | Short_Literal 0x2
0654 e005 | | Load 0x0,0x5
0655 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0656 0334 | 4 | Declare_Variable Array,With_Constraint
0657 e5ff | | Load 0x2,-0x1
0658 8210 | | Call 0x1,0x10
0659 4801 |H | Short_Literal 0x1
065a 00da | | Load_Top At_Offset_2
065b 01d6 | | Execute Vector,Field_Write
065c e5fd | | Load 0x2,-0x3
065d e014 | | Load 0x0,0x14
065e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
065f 4802 |H | Short_Literal 0x2
0660 00da | | Load_Top At_Offset_2
0661 01d6 | | Execute Vector,Field_Write
0662 00db | | Load_Top At_Offset_3
0663 e002 | | Load 0x0,0x2
0664 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0665 c5fc | | Store 0x2,-0x4
0666 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0667 0000 | | .XXX[0x1]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 0670 | p | .CONST 0x0670 ; Address of begin
0669 0004 | | .CONST 0x0004 ; Address of exception handler
066a 0003 | | .CONST 0x0003 ; Number of locals
066b INIT_0668:
066b e00d | | Load 0x0,0xd
066c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
066d e002 | | Load 0x0,0x2
066e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
066f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0670 BODY_0668:
0670 00d8 | | Load_Top At_Offset_0
0671 e00d | | Load 0x0,0xd
0672 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0673 4800 |H | Short_Literal 0x0
0674 e5fe | | Load 0x2,-0x2
0675 e5ff | | Load 0x2,-0x1
0676 8276 | v | Call 0x1,0x76
0677 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0678 0059 | Y | Store_Top Discrete,At_Offset_1
0679 00d8 | | Load_Top At_Offset_0
067a 7006 |p | Jump_Nonzero 0x681
067b 00d9 | | Load_Top At_Offset_1
067c 0217 | | Execute Heap_Access,All_Reference
067d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
067e e010 | | Load 0x0,0x10
067f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0680 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0681 00d8 | | Load_Top At_Offset_0
0682 6019 |` | Indirect_Literal Discrete,0x69c,{0x00000000, 0x00002009}
0683 027f | | Execute Discrete,Equal
0684 6802 |h | Jump_Zero 0x687
0685 00ea | | Load_Encached Null_String_Cache
0686 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0687 4801 |H | Short_Literal 0x1
0688 4802 |H | Short_Literal 0x2
0689 e005 | | Load 0x0,0x5
068a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
068b 0334 | 4 | Declare_Variable Array,With_Constraint
068c e5ff | | Load 0x2,-0x1
068d 8210 | | Call 0x1,0x10
068e 4801 |H | Short_Literal 0x1
068f 00da | | Load_Top At_Offset_2
0690 01d6 | | Execute Vector,Field_Write
0691 e5fe | | Load 0x2,-0x2
0692 e014 | | Load 0x0,0x14
0693 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0694 4802 |H | Short_Literal 0x2
0695 00da | | Load_Top At_Offset_2
0696 01d6 | | Execute Vector,Field_Write
0697 00d9 | | Load_Top At_Offset_1
0698 e002 | | Load 0x0,0x2
0699 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
069a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
069b 0000 | | .XXX[0x1]
069c 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a8 | | .CONST 0x06a8 ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0003 | | .CONST 0x0003 ; Number of locals
06a3 INIT_06a0:
06a3 e002 | | Load 0x0,0x2
06a4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
06a5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06a6 e00d | | Load 0x0,0xd
06a7 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
06a8 BODY_06a0:
06a8 00d9 | | Load_Top At_Offset_1
06a9 e00d | | Load 0x0,0xd
06aa 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
06ab 4801 |H | Short_Literal 0x1
06ac e5fd | | Load 0x2,-0x3
06ad e5ff | | Load 0x2,-0x1
06ae 8276 | v | Call 0x1,0x76
06af 0032 | 2 | Store_Top Heap_Access,At_Offset_2
06b0 005a | Z | Store_Top Discrete,At_Offset_2
06b1 00d9 | | Load_Top At_Offset_1
06b2 701d |p | Jump_Nonzero 0x6d0
06b3 e5ff | | Load 0x2,-0x1
06b4 825f | _ | Call 0x1,0x5f
06b5 e5fe | | Load 0x2,-0x2
06b6 e010 | | Load 0x0,0x10
06b7 180f | | Execute Package,Field_Execute,Field_Number 0xf
06b8 00d9 | | Load_Top At_Offset_1
06b9 0217 | | Execute Heap_Access,All_Reference
06ba 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
06bb e5fe | | Load 0x2,-0x2
06bc 01db | | Execute Vector,Length
06bd 0e00 | | Execute_Immediate Not_Equal,0x0
06be 00d9 | | Load_Top At_Offset_1
06bf 0217 | | Execute Heap_Access,All_Reference
06c0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
06c1 0092 154c | L| Action Push_String_Extended,0x154c ; "Target name for "
06c3 e5ff | | Load 0x2,-0x1
06c4 821d | | Call 0x1,0x1d
06c5 01cc | | Execute Vector,Catenate
06c6 0092 154d | M| Action Push_String_Extended,0x154d ; " has been set to "
06c8 01cc | | Execute Vector,Catenate
06c9 e5fe | | Load 0x2,-0x2
06ca 01cc | | Execute Vector,Catenate
06cb 0092 154e | N| Action Push_String_Extended,0x154e ; "."
06cd 01cc | | Execute Vector,Catenate
06ce 8011 | | Call 0x0,0x11
06cf 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06d0 e002 | | Load 0x0,0x2
06d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06d2 4801 |H | Short_Literal 0x1
06d3 4802 |H | Short_Literal 0x2
06d4 e005 | | Load 0x0,0x5
06d5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06d6 0334 | 4 | Declare_Variable Array,With_Constraint
06d7 e5ff | | Load 0x2,-0x1
06d8 8210 | | Call 0x1,0x10
06d9 4801 |H | Short_Literal 0x1
06da 00da | | Load_Top At_Offset_2
06db 01d6 | | Execute Vector,Field_Write
06dc e5fd | | Load 0x2,-0x3
06dd e014 | | Load 0x0,0x14
06de 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06df 4802 |H | Short_Literal 0x2
06e0 00da | | Load_Top At_Offset_2
06e1 01d6 | | Execute Vector,Field_Write
06e2 00db | | Load_Top At_Offset_3
06e3 e002 | | Load 0x0,0x2
06e4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
06e5 c5fc | | Store 0x2,-0x4
06e6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06e7 0000 | | .XXX[0x1]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06f0 | | .CONST 0x06f0 ; Address of begin
06e9 0004 | | .CONST 0x0004 ; Address of exception handler
06ea 0003 | | .CONST 0x0003 ; Number of locals
06eb INIT_06e8:
06eb e00d | | Load 0x0,0xd
06ec 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
06ed e002 | | Load 0x0,0x2
06ee 1b10 | | Execute Package,Field_Read,Field_Number 0x10
06ef 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06f0 BODY_06e8:
06f0 00d8 | | Load_Top At_Offset_0
06f1 e00d | | Load 0x0,0xd
06f2 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
06f3 4800 |H | Short_Literal 0x0
06f4 e5fe | | Load 0x2,-0x2
06f5 e5ff | | Load 0x2,-0x1
06f6 8276 | v | Call 0x1,0x76
06f7 0033 | 3 | Store_Top Heap_Access,At_Offset_3
06f8 0059 | Y | Store_Top Discrete,At_Offset_1
06f9 00d8 | | Load_Top At_Offset_0
06fa 7004 |p | Jump_Nonzero 0x6ff
06fb 00d9 | | Load_Top At_Offset_1
06fc 0217 | | Execute Heap_Access,All_Reference
06fd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
06fe 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06ff 00d8 | | Load_Top At_Offset_0
0700 601b |` | Indirect_Literal Discrete,0x71c,{0x00000000, 0x00002009}
0701 027f | | Execute Discrete,Equal
0702 6802 |h | Jump_Zero 0x705
0703 4800 |H | Short_Literal 0x0
0704 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0705 4801 |H | Short_Literal 0x1
0706 4802 |H | Short_Literal 0x2
0707 e005 | | Load 0x0,0x5
0708 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0709 0334 | 4 | Declare_Variable Array,With_Constraint
070a e5ff | | Load 0x2,-0x1
070b 8210 | | Call 0x1,0x10
070c 4801 |H | Short_Literal 0x1
070d 00da | | Load_Top At_Offset_2
070e 01d6 | | Execute Vector,Field_Write
070f e5fe | | Load 0x2,-0x2
0710 e014 | | Load 0x0,0x14
0711 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0712 4802 |H | Short_Literal 0x2
0713 00da | | Load_Top At_Offset_2
0714 01d6 | | Execute Vector,Field_Write
0715 00d9 | | Load_Top At_Offset_1
0716 e002 | | Load 0x0,0x2
0717 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0718 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0719 0000 0000 | | .XXX[0x3]
071b 0000 | |
071c 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0728 | ( | .CONST 0x0728 ; Address of begin
0721 0004 | | .CONST 0x0004 ; Address of exception handler
0722 0003 | | .CONST 0x0003 ; Number of locals
0723 INIT_0720:
0723 e002 | | Load 0x0,0x2
0724 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0725 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0726 e00d | | Load 0x0,0xd
0727 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0728 BODY_0720:
0728 00d9 | | Load_Top At_Offset_1
0729 e00d | | Load 0x0,0xd
072a 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
072b 4801 |H | Short_Literal 0x1
072c e5fd | | Load 0x2,-0x3
072d e5ff | | Load 0x2,-0x1
072e 8276 | v | Call 0x1,0x76
072f 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0730 005a | Z | Store_Top Discrete,At_Offset_2
0731 00d9 | | Load_Top At_Offset_1
0732 7005 |p | Jump_Nonzero 0x738
0733 e5fe | | Load 0x2,-0x2
0734 00d9 | | Load_Top At_Offset_1
0735 0217 | | Execute Heap_Access,All_Reference
0736 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0737 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0738 e002 | | Load 0x0,0x2
0739 1b0d | | Execute Package,Field_Read,Field_Number 0xd
073a 4801 |H | Short_Literal 0x1
073b 4802 |H | Short_Literal 0x2
073c e005 | | Load 0x0,0x5
073d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
073e 0334 | 4 | Declare_Variable Array,With_Constraint
073f e5ff | | Load 0x2,-0x1
0740 8210 | | Call 0x1,0x10
0741 4801 |H | Short_Literal 0x1
0742 00da | | Load_Top At_Offset_2
0743 01d6 | | Execute Vector,Field_Write
0744 e5fd | | Load 0x2,-0x3
0745 e014 | | Load 0x0,0x14
0746 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0747 4802 |H | Short_Literal 0x2
0748 00da | | Load_Top At_Offset_2
0749 01d6 | | Execute Vector,Field_Write
074a 00db | | Load_Top At_Offset_3
074b e002 | | Load 0x0,0x2
074c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
074d c5fc | | Store 0x2,-0x4
074e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
074f 0000 | | .XXX[0x1]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0758 | X | .CONST 0x0758 ; Address of begin
0751 0004 | | .CONST 0x0004 ; Address of exception handler
0752 0003 | | .CONST 0x0003 ; Number of locals
0753 INIT_0750:
0753 e00d | | Load 0x0,0xd
0754 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0755 e002 | | Load 0x0,0x2
0756 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0757 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0758 BODY_0750:
0758 00d8 | | Load_Top At_Offset_0
0759 e00d | | Load 0x0,0xd
075a 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
075b 4800 |H | Short_Literal 0x0
075c e5fe | | Load 0x2,-0x2
075d e5ff | | Load 0x2,-0x1
075e 8276 | v | Call 0x1,0x76
075f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0760 0059 | Y | Store_Top Discrete,At_Offset_1
0761 00d8 | | Load_Top At_Offset_0
0762 7009 |p | Jump_Nonzero 0x76c
0763 00d9 | | Load_Top At_Offset_1
0764 0217 | | Execute Heap_Access,All_Reference
0765 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
0766 00d8 | | Load_Top At_Offset_0
0767 0120 | | Execute Any,Is_Value
0768 7002 |p | Jump_Nonzero 0x76b
0769 00d8 | | Load_Top At_Offset_0
076a 011e | | Execute Any,Convert
076b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
076c 00d8 | | Load_Top At_Offset_0
076d 601a |` | Indirect_Literal Discrete,0x788,{0x00000000, 0x00002009}
076e 027f | | Execute Discrete,Equal
076f 6803 |h | Jump_Zero 0x773
0770 e004 | | Load 0x0,0x4
0771 180f | | Execute Package,Field_Execute,Field_Number 0xf
0772 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0773 4801 |H | Short_Literal 0x1
0774 4802 |H | Short_Literal 0x2
0775 e005 | | Load 0x0,0x5
0776 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0777 0334 | 4 | Declare_Variable Array,With_Constraint
0778 e5ff | | Load 0x2,-0x1
0779 8210 | | Call 0x1,0x10
077a 4801 |H | Short_Literal 0x1
077b 00da | | Load_Top At_Offset_2
077c 01d6 | | Execute Vector,Field_Write
077d e5fe | | Load 0x2,-0x2
077e e014 | | Load 0x0,0x14
077f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0780 4802 |H | Short_Literal 0x2
0781 00da | | Load_Top At_Offset_2
0782 01d6 | | Execute Vector,Field_Write
0783 00d9 | | Load_Top At_Offset_1
0784 e002 | | Load 0x0,0x2
0785 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0786 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0787 0000 | | .XXX[0x1]
0788 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
078c 0000 0000 | | .BLANK 0000[0x4]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0798 | | .CONST 0x0798 ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0003 | | .CONST 0x0003 ; Number of locals
0793 INIT_0790:
0793 e002 | | Load 0x0,0x2
0794 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0795 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0796 e00d | | Load 0x0,0xd
0797 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0798 BODY_0790:
0798 00d9 | | Load_Top At_Offset_1
0799 e00d | | Load 0x0,0xd
079a 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
079b 4801 |H | Short_Literal 0x1
079c e5fc | | Load 0x2,-0x4
079d e5ff | | Load 0x2,-0x1
079e 8276 | v | Call 0x1,0x76
079f 0032 | 2 | Store_Top Heap_Access,At_Offset_2
07a0 005a | Z | Store_Top Discrete,At_Offset_2
07a1 00d9 | | Load_Top At_Offset_1
07a2 7005 |p | Jump_Nonzero 0x7a8
07a3 e5fe | | Load 0x2,-0x2
07a4 00d9 | | Load_Top At_Offset_1
07a5 0217 | | Execute Heap_Access,All_Reference
07a6 380a |8 | Execute Record,Field_Write,Field_Number 0xa
07a7 7816 |x | Jump 0x7be
07a8 e002 | | Load 0x0,0x2
07a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07aa 4801 |H | Short_Literal 0x1
07ab 4802 |H | Short_Literal 0x2
07ac e005 | | Load 0x0,0x5
07ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07ae 0334 | 4 | Declare_Variable Array,With_Constraint
07af e5ff | | Load 0x2,-0x1
07b0 8210 | | Call 0x1,0x10
07b1 4801 |H | Short_Literal 0x1
07b2 00da | | Load_Top At_Offset_2
07b3 01d6 | | Execute Vector,Field_Write
07b4 e5fc | | Load 0x2,-0x4
07b5 e014 | | Load 0x0,0x14
07b6 181c | | Execute Package,Field_Execute,Field_Number 0x1c
07b7 4802 |H | Short_Literal 0x2
07b8 00da | | Load_Top At_Offset_2
07b9 01d6 | | Execute Vector,Field_Write
07ba 00db | | Load_Top At_Offset_3
07bb e002 | | Load 0x0,0x2
07bc 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07bd c5fb | | Store 0x2,-0x5
07be e5fd | | Load 0x2,-0x3
07bf 6806 |h | Jump_Zero 0x7c6
07c0 e5ff | | Load 0x2,-0x1
07c1 0217 | | Execute Heap_Access,All_Reference
07c2 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
07c3 00d9 | | Load_Top At_Offset_1
07c4 0217 | | Execute Heap_Access,All_Reference
07c5 380b |8 | Execute Record,Field_Write,Field_Number 0xb
07c6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07c7 0000 | | .XXX[0x1]
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07d0 | | .CONST 0x07d0 ; Address of begin
07c9 0004 | | .CONST 0x0004 ; Address of exception handler
07ca 0003 | | .CONST 0x0003 ; Number of locals
07cb INIT_07c8:
07cb e00d | | Load 0x0,0xd
07cc 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
07cd e002 | | Load 0x0,0x2
07ce 1b10 | | Execute Package,Field_Read,Field_Number 0x10
07cf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
07d0 BODY_07c8:
07d0 00d8 | | Load_Top At_Offset_0
07d1 e00d | | Load 0x0,0xd
07d2 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
07d3 4800 |H | Short_Literal 0x0
07d4 e5fe | | Load 0x2,-0x2
07d5 e5ff | | Load 0x2,-0x1
07d6 8276 | v | Call 0x1,0x76
07d7 0033 | 3 | Store_Top Heap_Access,At_Offset_3
07d8 0059 | Y | Store_Top Discrete,At_Offset_1
07d9 00d8 | | Load_Top At_Offset_0
07da 7009 |p | Jump_Nonzero 0x7e4
07db 00d9 | | Load_Top At_Offset_1
07dc 0217 | | Execute Heap_Access,All_Reference
07dd 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
07de 00d8 | | Load_Top At_Offset_0
07df 0120 | | Execute Any,Is_Value
07e0 7002 |p | Jump_Nonzero 0x7e3
07e1 00d8 | | Load_Top At_Offset_0
07e2 011e | | Execute Any,Convert
07e3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07e4 00d8 | | Load_Top At_Offset_0
07e5 601a |` | Indirect_Literal Discrete,0x800,{0x00000000, 0x00002009}
07e6 027f | | Execute Discrete,Equal
07e7 6803 |h | Jump_Zero 0x7eb
07e8 e004 | | Load 0x0,0x4
07e9 180f | | Execute Package,Field_Execute,Field_Number 0xf
07ea 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07eb 4801 |H | Short_Literal 0x1
07ec 4802 |H | Short_Literal 0x2
07ed e005 | | Load 0x0,0x5
07ee 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07ef 0334 | 4 | Declare_Variable Array,With_Constraint
07f0 e5ff | | Load 0x2,-0x1
07f1 8210 | | Call 0x1,0x10
07f2 4801 |H | Short_Literal 0x1
07f3 00da | | Load_Top At_Offset_2
07f4 01d6 | | Execute Vector,Field_Write
07f5 e5fe | | Load 0x2,-0x2
07f6 e014 | | Load 0x0,0x14
07f7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
07f8 4802 |H | Short_Literal 0x2
07f9 00da | | Load_Top At_Offset_2
07fa 01d6 | | Execute Vector,Field_Write
07fb 00d9 | | Load_Top At_Offset_1
07fc e002 | | Load 0x0,0x2
07fd 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
07fe 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07ff 0000 | | .XXX[0x1]
0800 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
0804 0000 0000 | | .BLANK 0000[0x4]
0808 ; --------------------------------------------------------------------------------------
0808 ; SUBPROGRAM
0808 ; --------------------------------------------------------------------------------------
0808 0810 | | .CONST 0x0810 ; Address of begin
0809 0004 | | .CONST 0x0004 ; Address of exception handler
080a 0003 | | .CONST 0x0003 ; Number of locals
080b INIT_0808:
080b e002 | | Load 0x0,0x2
080c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
080d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
080e e00d | | Load 0x0,0xd
080f 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0810 BODY_0808:
0810 00d9 | | Load_Top At_Offset_1
0811 e00d | | Load 0x0,0xd
0812 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0813 4801 |H | Short_Literal 0x1
0814 e5fd | | Load 0x2,-0x3
0815 e5ff | | Load 0x2,-0x1
0816 8276 | v | Call 0x1,0x76
0817 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0818 005a | Z | Store_Top Discrete,At_Offset_2
0819 00d9 | | Load_Top At_Offset_1
081a 7005 |p | Jump_Nonzero 0x820
081b e5fe | | Load 0x2,-0x2
081c 00d9 | | Load_Top At_Offset_1
081d 0217 | | Execute Heap_Access,All_Reference
081e 380b |8 | Execute Record,Field_Write,Field_Number 0xb
081f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0820 e002 | | Load 0x0,0x2
0821 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0822 4801 |H | Short_Literal 0x1
0823 4802 |H | Short_Literal 0x2
0824 e005 | | Load 0x0,0x5
0825 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0826 0334 | 4 | Declare_Variable Array,With_Constraint
0827 e5ff | | Load 0x2,-0x1
0828 8210 | | Call 0x1,0x10
0829 4801 |H | Short_Literal 0x1
082a 00da | | Load_Top At_Offset_2
082b 01d6 | | Execute Vector,Field_Write
082c e5fd | | Load 0x2,-0x3
082d e014 | | Load 0x0,0x14
082e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
082f 4802 |H | Short_Literal 0x2
0830 00da | | Load_Top At_Offset_2
0831 01d6 | | Execute Vector,Field_Write
0832 00db | | Load_Top At_Offset_3
0833 e002 | | Load 0x0,0x2
0834 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0835 c5fc | | Store 0x2,-0x4
0836 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0837 0000 | | .XXX[0x1]
0838 ; --------------------------------------------------------------------------------------
0838 ; SUBPROGRAM
0838 ; --------------------------------------------------------------------------------------
0838 083b | ; | .CONST 0x083b ; Address of begin
0839 0004 | | .CONST 0x0004 ; Address of exception handler
083a 0001 | | .CONST 0x0001 ; Number of locals
083b BODY_0838:
083b INIT_0838:
083b 00da | | Load_Top At_Offset_2
083c 6809 |h | Jump_Zero 0x846
083d 00da | | Load_Top At_Offset_2
083e 0217 | | Execute Heap_Access,All_Reference
083f 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
0840 00d8 | | Load_Top At_Offset_0
0841 0120 | | Execute Any,Is_Value
0842 7002 |p | Jump_Nonzero 0x845
0843 00d8 | | Load_Top At_Offset_0
0844 011e | | Execute Any,Convert
0845 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0846 e004 | | Load 0x0,0x4
0847 180f | | Execute Package,Field_Execute,Field_Number 0xf
0848 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0849 0000 0000 | | .BLANK 0000[0x7]
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 0853 | S | .CONST 0x0853 ; Address of begin
0851 0004 | | .CONST 0x0004 ; Address of exception handler
0852 0001 | | .CONST 0x0001 ; Number of locals
0853 BODY_0850:
0853 INIT_0850:
0853 00db | | Load_Top At_Offset_3
0854 00db | | Load_Top At_Offset_3
0855 0217 | | Execute Heap_Access,All_Reference
0856 380e |8 | Execute Record,Field_Write,Field_Number 0xe
0857 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 085b | [ | .CONST 0x085b ; Address of begin
0859 0004 | | .CONST 0x0004 ; Address of exception handler
085a 0001 | | .CONST 0x0001 ; Number of locals
085b BODY_0858:
085b INIT_0858:
085b 00da | | Load_Top At_Offset_2
085c 6804 |h | Jump_Zero 0x861
085d 00da | | Load_Top At_Offset_2
085e 0217 | | Execute Heap_Access,All_Reference
085f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0860 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0861 4800 |H | Short_Literal 0x0
0862 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0863 0000 0000 | | .BLANK 0000[0x5]
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 086b | k | .CONST 0x086b ; Address of begin
0869 0004 | | .CONST 0x0004 ; Address of exception handler
086a 0001 | | .CONST 0x0001 ; Number of locals
086b BODY_0868:
086b INIT_0868:
086b 00da | | Load_Top At_Offset_2
086c 6814 |h | Jump_Zero 0x881
086d 00da | | Load_Top At_Offset_2
086e 0217 | | Execute Heap_Access,All_Reference
086f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0870 700e |p | Jump_Nonzero 0x87f
0871 00da | | Load_Top At_Offset_2
0872 0217 | | Execute Heap_Access,All_Reference
0873 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0874 6808 |h | Jump_Zero 0x87d
0875 00da | | Load_Top At_Offset_2
0876 0217 | | Execute Heap_Access,All_Reference
0877 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0878 e001 | | Load 0x0,0x1
0879 1b10 | | Execute Package,Field_Read,Field_Number 0x10
087a 0216 | | Execute Heap_Access,Convert
087b 021c | | Execute Heap_Access,Not_Null
087c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
087d 4800 |H | Short_Literal 0x0
087e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
087f 4801 |H | Short_Literal 0x1
0880 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0881 4800 |H | Short_Literal 0x0
0882 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0883 0000 0000 | | .BLANK 0000[0x5]
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 088b | | .CONST 0x088b ; Address of begin
0889 0004 | | .CONST 0x0004 ; Address of exception handler
088a 0001 | | .CONST 0x0001 ; Number of locals
088b BODY_0888:
088b INIT_0888:
088b 00da | | Load_Top At_Offset_2
088c 7002 |p | Jump_Nonzero 0x88f
088d 00da | | Load_Top At_Offset_2
088e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
088f 00da | | Load_Top At_Offset_2
0890 0217 | | Execute Heap_Access,All_Reference
0891 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0892 6807 |h | Jump_Zero 0x89a
0893 00da | | Load_Top At_Offset_2
0894 0217 | | Execute Heap_Access,All_Reference
0895 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0896 e001 | | Load 0x0,0x1
0897 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0898 0216 | | Execute Heap_Access,Convert
0899 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
089a 00da | | Load_Top At_Offset_2
089b 0217 | | Execute Heap_Access,All_Reference
089c 3c16 |< | Execute Record,Field_Read,Field_Number 0x16
089d e001 | | Load 0x0,0x1
089e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
089f 0216 | | Execute Heap_Access,Convert
08a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08a1 0000 0000 | | .BLANK 0000[0x7]
08a8 ; --------------------------------------------------------------------------------------
08a8 ; SUBPROGRAM
08a8 ; --------------------------------------------------------------------------------------
08a8 08af | | .CONST 0x08af ; Address of begin
08a9 0004 | | .CONST 0x0004 ; Address of exception handler
08aa 0002 | | .CONST 0x0002 ; Number of locals
08ab INIT_08a8:
08ab 00da | | Load_Top At_Offset_2
08ac e001 | | Load 0x0,0x1
08ad 1b16 | | Execute Package,Field_Read,Field_Number 0x16
08ae 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
08af BODY_08a8:
08af 00d8 | | Load_Top At_Offset_0
08b0 e5fe | | Load 0x2,-0x2
08b1 e001 | | Load 0x0,0x1
08b2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
08b3 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
08b4 00db | | Load_Top At_Offset_3
08b5 e00d | | Load 0x0,0xd
08b6 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
08b7 0216 | | Execute Heap_Access,Convert
08b8 e5fe | | Load 0x2,-0x2
08b9 0217 | | Execute Heap_Access,All_Reference
08ba 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
08bb 4801 |H | Short_Literal 0x1
08bc e5fe | | Load 0x2,-0x2
08bd 0217 | | Execute Heap_Access,All_Reference
08be 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
08bf 00d8 | | Load_Top At_Offset_0
08c0 e5fe | | Load 0x2,-0x2
08c1 e001 | | Load 0x0,0x1
08c2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
08c3 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
08c4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
08c5 0000 0000 | | .XXX[0x3]
08c7 0000 | |
08c8 ; --------------------------------------------------------------------------------------
08c8 ; SUBPROGRAM
08c8 ; --------------------------------------------------------------------------------------
08c8 08cf | | .CONST 0x08cf ; Address of begin
08c9 0004 | | .CONST 0x0004 ; Address of exception handler
08ca 0002 | | .CONST 0x0002 ; Number of locals
08cb INIT_08c8:
08cb 00da | | Load_Top At_Offset_2
08cc e001 | | Load 0x0,0x1
08cd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
08ce 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
08cf BODY_08c8:
08cf 00d8 | | Load_Top At_Offset_0
08d0 e5fe | | Load 0x2,-0x2
08d1 e001 | | Load 0x0,0x1
08d2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
08d3 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
08d4 00d8 | | Load_Top At_Offset_0
08d5 e5fe | | Load 0x2,-0x2
08d6 e001 | | Load 0x0,0x1
08d7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
08d8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
08d9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
08da 0000 0000 | | .BLANK 0000[0x6]
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08e3 | | .CONST 0x08e3 ; Address of begin
08e1 0004 | | .CONST 0x0004 ; Address of exception handler
08e2 0001 | | .CONST 0x0001 ; Number of locals
08e3 BODY_08e0:
08e3 INIT_08e0:
08e3 00da | | Load_Top At_Offset_2
08e4 680b |h | Jump_Zero 0x8f0
08e5 00da | | Load_Top At_Offset_2
08e6 0217 | | Execute Heap_Access,All_Reference
08e7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
08e8 6807 |h | Jump_Zero 0x8f0
08e9 00da | | Load_Top At_Offset_2
08ea 0217 | | Execute Heap_Access,All_Reference
08eb 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
08ec e001 | | Load 0x0,0x1
08ed 1b10 | | Execute Package,Field_Read,Field_Number 0x10
08ee 0216 | | Execute Heap_Access,Convert
08ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08f0 00da | | Load_Top At_Offset_2
08f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
08f2 0000 0000 | | .BLANK 0000[0x6]
08f8 ; --------------------------------------------------------------------------------------
08f8 ; SUBPROGRAM
08f8 ; --------------------------------------------------------------------------------------
08f8 0906 | | .CONST 0x0906 ; Address of begin
08f9 0004 | | .CONST 0x0004 ; Address of exception handler
08fa 0006 | | .CONST 0x0006 ; Number of locals
08fb INIT_08f8:
08fb e015 | | Load 0x0,0x15
08fc 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
08fd e00d | | Load 0x0,0xd
08fe 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
08ff e00d | | Load 0x0,0xd
0900 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0901 e00d | | Load 0x0,0xd
0902 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0903 e002 | | Load 0x0,0x2
0904 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0905 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0906 BODY_08f8:
0906 00d8 | | Load_Top At_Offset_0
0907 e00d | | Load 0x0,0xd
0908 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0909 4800 |H | Short_Literal 0x0
090a e5fe | | Load 0x2,-0x2
090b e5ff | | Load 0x2,-0x1
090c 8276 | v | Call 0x1,0x76
090d 0033 | 3 | Store_Top Heap_Access,At_Offset_3
090e 0059 | Y | Store_Top Discrete,At_Offset_1
090f 00d8 | | Load_Top At_Offset_0
0910 7034 |p4 | Jump_Nonzero 0x945
0911 00d9 | | Load_Top At_Offset_1
0912 0217 | | Execute Heap_Access,All_Reference
0913 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0914 a403 | | Store_Unchecked 0x2,0x3
0915 00db | | Load_Top At_Offset_3
0916 7002 |p | Jump_Nonzero 0x919
0917 e402 | | Load 0x2,0x2
0918 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0919 00db | | Load_Top At_Offset_3
091a 0217 | | Execute Heap_Access,All_Reference
091b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
091c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
091d 00cf | | Action Mark_Auxiliary
091e e403 | | Load 0x2,0x3
091f 0217 | | Execute Heap_Access,All_Reference
0920 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0921 4801 |H | Short_Literal 0x1
0922 0263 | c | Execute Discrete,Above_Bound
0923 701f |p | Jump_Nonzero 0x943
0924 e404 | | Load 0x2,0x4
0925 0217 | | Execute Heap_Access,All_Reference
0926 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0927 e00f | | Load 0x0,0xf
0928 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0929 e5ff | | Load 0x2,-0x1
092a e006 | | Load 0x0,0x6
092b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
092c e404 | | Load 0x2,0x4
092d 0217 | | Execute Heap_Access,All_Reference
092e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
092f e005 | | Load 0x0,0x5
0930 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0931 e404 | | Load 0x2,0x4
0932 0217 | | Execute Heap_Access,All_Reference
0933 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0934 e402 | | Load 0x2,0x2
0935 e015 | | Load 0x0,0x15
0936 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0937 e402 | | Load 0x2,0x2
0938 e015 | | Load 0x0,0x15
0939 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
093a 7002 |p | Jump_Nonzero 0x93d
093b 00d2 | | Pop_Control Pop_Count_2
093c 7806 |x | Jump 0x943
093d e404 | | Load 0x2,0x4
093e 0217 | | Execute Heap_Access,All_Reference
093f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0940 a404 | | Store_Unchecked 0x2,0x4
0941 00c8 | | Action Pop_Auxiliary_Range
0942 3fe1 |? | Loop_Increasing 0x924
0943 00ce | | Action Pop_Auxiliary
0944 781c |x | Jump 0x961
0945 00d8 | | Load_Top At_Offset_0
0946 6021 |`! | Indirect_Literal Discrete,0x968,{0x00000000, 0x00002009}
0947 027f | | Execute Discrete,Equal
0948 6802 |h | Jump_Zero 0x94b
0949 e402 | | Load 0x2,0x2
094a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
094b 4801 |H | Short_Literal 0x1
094c 4802 |H | Short_Literal 0x2
094d e005 | | Load 0x0,0x5
094e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
094f 0334 | 4 | Declare_Variable Array,With_Constraint
0950 e5ff | | Load 0x2,-0x1
0951 8210 | | Call 0x1,0x10
0952 4801 |H | Short_Literal 0x1
0953 00da | | Load_Top At_Offset_2
0954 01d6 | | Execute Vector,Field_Write
0955 e5fe | | Load 0x2,-0x2
0956 e014 | | Load 0x0,0x14
0957 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0958 4802 |H | Short_Literal 0x2
0959 00da | | Load_Top At_Offset_2
095a 01d6 | | Execute Vector,Field_Write
095b 6008 |` | Indirect_Literal Discrete,0x964,{0x00000000, 0x0000200c}
095c e002 | | Load 0x0,0x2
095d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
095e e402 | | Load 0x2,0x2
095f e015 | | Load 0x0,0x15
0960 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0961 e402 | | Load 0x2,0x2
0962 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0963 0000 | | .XXX[0x1]
0964 0000 0000 | | .LITERAL {0x00000000, 0x0000200c}
0968 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
096c 0000 0000 | | .BLANK 0000[0x4]
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 0986 | | .CONST 0x0986 ; Address of begin
0971 0004 | | .CONST 0x0004 ; Address of exception handler
0972 0009 | | .CONST 0x0009 ; Number of locals
0973 INIT_0970:
0973 e015 | | Load 0x0,0x15
0974 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0975 e00d | | Load 0x0,0xd
0976 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0977 e00d | | Load 0x0,0xd
0978 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0979 e00d | | Load 0x0,0xd
097a 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
097b e00d | | Load 0x0,0xd
097c 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
097d e5ff | | Load 0x2,-0x1
097e e001 | | Load 0x0,0x1
097f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0980 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0981 e002 | | Load 0x0,0x2
0982 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0983 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0984 029f 10b3 | | Declare_Subprogram INIT_10b0,For_Call
0986 BODY_0970:
0986 00d9 | | Load_Top At_Offset_1
0987 e00d | | Load 0x0,0xd
0988 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0989 4801 |H | Short_Literal 0x1
098a e5fd | | Load 0x2,-0x3
098b e5ff | | Load 0x2,-0x1
098c 8276 | v | Call 0x1,0x76
098d c405 | | Store 0x2,0x5
098e 005a | Z | Store_Top Discrete,At_Offset_2
098f 00d9 | | Load_Top At_Offset_1
0990 7039 |p9 | Jump_Nonzero 0x9ca
0991 e405 | | Load 0x2,0x5
0992 0217 | | Execute Heap_Access,All_Reference
0993 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0994 a403 | | Store_Unchecked 0x2,0x3
0995 e403 | | Load 0x2,0x3
0996 6824 |h$ | Jump_Zero 0x9bb
0997 0092 154f | O| Action Push_String_Extended,0x154f ; "Releasing old special build instructions."
0999 8011 | | Call 0x0,0x11
099a e403 | | Load 0x2,0x3
099b 0217 | | Execute Heap_Access,All_Reference
099c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
099d a404 | | Store_Unchecked 0x2,0x4
099e 00cf | | Action Mark_Auxiliary
099f e403 | | Load 0x2,0x3
09a0 0217 | | Execute Heap_Access,All_Reference
09a1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09a2 4801 |H | Short_Literal 0x1
09a3 0263 | c | Execute Discrete,Above_Bound
09a4 700c |p | Jump_Nonzero 0x9b1
09a5 e404 | | Load 0x2,0x4
09a6 0217 | | Execute Heap_Access,All_Reference
09a7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09a8 a406 | | Store_Unchecked 0x2,0x6
09a9 e404 | | Load 0x2,0x4
09aa e00d | | Load 0x0,0xd
09ab 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
09ac c404 | | Store 0x2,0x4
09ad e406 | | Load 0x2,0x6
09ae a404 | | Store_Unchecked 0x2,0x4
09af 00c8 | | Action Pop_Auxiliary_Range
09b0 3ff4 |? | Loop_Increasing 0x9a5
09b1 00ce | | Action Pop_Auxiliary
09b2 e403 | | Load 0x2,0x3
09b3 e00d | | Load 0x0,0xd
09b4 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
09b5 c403 | | Store 0x2,0x3
09b6 e00d | | Load 0x0,0xd
09b7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
09b8 e405 | | Load 0x2,0x5
09b9 0217 | | Execute Heap_Access,All_Reference
09ba 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
09bb e5fe | | Load 0x2,-0x2
09bc e015 | | Load 0x0,0x15
09bd 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
09be 6801 |h | Jump_Zero 0x9c0
09bf 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09c0 00da | | Load_Top At_Offset_2
09c1 e00d | | Load 0x0,0xd
09c2 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
09c3 a403 | | Store_Unchecked 0x2,0x3
09c4 8409 | | Call 0x2,0x9
09c5 e403 | | Load 0x2,0x3
09c6 e405 | | Load 0x2,0x5
09c7 0217 | | Execute Heap_Access,All_Reference
09c8 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
09c9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09ca e002 | | Load 0x0,0x2
09cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09cc 4801 |H | Short_Literal 0x1
09cd 4802 |H | Short_Literal 0x2
09ce e005 | | Load 0x0,0x5
09cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09d0 0334 | 4 | Declare_Variable Array,With_Constraint
09d1 e5ff | | Load 0x2,-0x1
09d2 8210 | | Call 0x1,0x10
09d3 4801 |H | Short_Literal 0x1
09d4 00da | | Load_Top At_Offset_2
09d5 01d6 | | Execute Vector,Field_Write
09d6 e5fd | | Load 0x2,-0x3
09d7 e014 | | Load 0x0,0x14
09d8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
09d9 4802 |H | Short_Literal 0x2
09da 00da | | Load_Top At_Offset_2
09db 01d6 | | Execute Vector,Field_Write
09dc 00db | | Load_Top At_Offset_3
09dd e002 | | Load 0x0,0x2
09de 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
09df c5fc | | Store 0x2,-0x4
09e0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09e1 0000 0000 | | .BLANK 0000[0x7]
09e8 ; --------------------------------------------------------------------------------------
09e8 ; SUBPROGRAM
09e8 ; --------------------------------------------------------------------------------------
09e8 09f0 | | .CONST 0x09f0 ; Address of begin
09e9 0004 | | .CONST 0x0004 ; Address of exception handler
09ea 0003 | | .CONST 0x0003 ; Number of locals
09eb INIT_09e8:
09eb e00d | | Load 0x0,0xd
09ec 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
09ed e002 | | Load 0x0,0x2
09ee 1b10 | | Execute Package,Field_Read,Field_Number 0x10
09ef 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
09f0 BODY_09e8:
09f0 00d8 | | Load_Top At_Offset_0
09f1 e00d | | Load 0x0,0xd
09f2 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
09f3 4800 |H | Short_Literal 0x0
09f4 e5fe | | Load 0x2,-0x2
09f5 e5ff | | Load 0x2,-0x1
09f6 8276 | v | Call 0x1,0x76
09f7 0033 | 3 | Store_Top Heap_Access,At_Offset_3
09f8 0059 | Y | Store_Top Discrete,At_Offset_1
09f9 00d8 | | Load_Top At_Offset_0
09fa 7006 |p | Jump_Nonzero 0xa01
09fb 00d9 | | Load_Top At_Offset_1
09fc 0217 | | Execute Heap_Access,All_Reference
09fd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
09fe 021d | | Execute Heap_Access,Is_Null
09ff 0f00 | | Execute_Immediate Equal,0x0
0a00 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a01 00d8 | | Load_Top At_Offset_0
0a02 6019 |` | Indirect_Literal Discrete,0xa1c,{0x00000000, 0x00002009}
0a03 027f | | Execute Discrete,Equal
0a04 6802 |h | Jump_Zero 0xa07
0a05 4800 |H | Short_Literal 0x0
0a06 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a07 4801 |H | Short_Literal 0x1
0a08 4802 |H | Short_Literal 0x2
0a09 e005 | | Load 0x0,0x5
0a0a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a0b 0334 | 4 | Declare_Variable Array,With_Constraint
0a0c e5ff | | Load 0x2,-0x1
0a0d 8210 | | Call 0x1,0x10
0a0e 4801 |H | Short_Literal 0x1
0a0f 00da | | Load_Top At_Offset_2
0a10 01d6 | | Execute Vector,Field_Write
0a11 e5fe | | Load 0x2,-0x2
0a12 e014 | | Load 0x0,0x14
0a13 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a14 4802 |H | Short_Literal 0x2
0a15 00da | | Load_Top At_Offset_2
0a16 01d6 | | Execute Vector,Field_Write
0a17 00d9 | | Load_Top At_Offset_1
0a18 e002 | | Load 0x0,0x2
0a19 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0a1a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a1b 0000 | | .XXX[0x1]
0a1c 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
0a20 ; --------------------------------------------------------------------------------------
0a20 ; SUBPROGRAM
0a20 ; --------------------------------------------------------------------------------------
0a20 0a28 | ( | .CONST 0x0a28 ; Address of begin
0a21 0004 | | .CONST 0x0004 ; Address of exception handler
0a22 0003 | | .CONST 0x0003 ; Number of locals
0a23 INIT_0a20:
0a23 e00d | | Load 0x0,0xd
0a24 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0a25 e002 | | Load 0x0,0x2
0a26 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0a27 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a28 BODY_0a20:
0a28 00d8 | | Load_Top At_Offset_0
0a29 e00d | | Load 0x0,0xd
0a2a 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0a2b 4800 |H | Short_Literal 0x0
0a2c e5fe | | Load 0x2,-0x2
0a2d e5ff | | Load 0x2,-0x1
0a2e 8276 | v | Call 0x1,0x76
0a2f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0a30 0059 | Y | Store_Top Discrete,At_Offset_1
0a31 00d8 | | Load_Top At_Offset_0
0a32 7013 |p | Jump_Nonzero 0xa46
0a33 00d9 | | Load_Top At_Offset_1
0a34 0217 | | Execute Heap_Access,All_Reference
0a35 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a36 6806 |h | Jump_Zero 0xa3d
0a37 00d9 | | Load_Top At_Offset_1
0a38 0217 | | Execute Heap_Access,All_Reference
0a39 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a3a e016 | | Load 0x0,0x16
0a3b 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a3c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a3d e5fe | | Load 0x2,-0x2
0a3e e5ff | | Load 0x2,-0x1
0a3f e001 | | Load 0x0,0x1
0a40 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a41 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0a42 e001 | | Load 0x0,0x1
0a43 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a44 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0a45 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a46 4801 |H | Short_Literal 0x1
0a47 4802 |H | Short_Literal 0x2
0a48 e005 | | Load 0x0,0x5
0a49 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a4a 0334 | 4 | Declare_Variable Array,With_Constraint
0a4b e5ff | | Load 0x2,-0x1
0a4c 8210 | | Call 0x1,0x10
0a4d 4801 |H | Short_Literal 0x1
0a4e 00da | | Load_Top At_Offset_2
0a4f 01d6 | | Execute Vector,Field_Write
0a50 e5fe | | Load 0x2,-0x2
0a51 e014 | | Load 0x0,0x14
0a52 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a53 4802 |H | Short_Literal 0x2
0a54 00da | | Load_Top At_Offset_2
0a55 01d6 | | Execute Vector,Field_Write
0a56 00d9 | | Load_Top At_Offset_1
0a57 e002 | | Load 0x0,0x2
0a58 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0a59 00d8 | | Load_Top At_Offset_0
0a5a 00e3 | | Load_Encached Natural_Cache
0a5b 0260 | ` | Execute Discrete,In_Type
0a5c 7001 |p | Jump_Nonzero 0xa5e
0a5d 0801 | | Execute_Immediate Raise,0x1
0a5e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a5f 0000 | | .XXX[0x1]
0a60 ; --------------------------------------------------------------------------------------
0a60 ; SUBPROGRAM
0a60 ; --------------------------------------------------------------------------------------
0a60 0a68 | h | .CONST 0x0a68 ; Address of begin
0a61 0004 | | .CONST 0x0004 ; Address of exception handler
0a62 0003 | | .CONST 0x0003 ; Number of locals
0a63 INIT_0a60:
0a63 e002 | | Load 0x0,0x2
0a64 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0a65 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a66 e00d | | Load 0x0,0xd
0a67 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0a68 BODY_0a60:
0a68 00d9 | | Load_Top At_Offset_1
0a69 e00d | | Load 0x0,0xd
0a6a 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0a6b 4801 |H | Short_Literal 0x1
0a6c e5fd | | Load 0x2,-0x3
0a6d e5ff | | Load 0x2,-0x1
0a6e 8276 | v | Call 0x1,0x76
0a6f 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0a70 005a | Z | Store_Top Discrete,At_Offset_2
0a71 00d9 | | Load_Top At_Offset_1
0a72 700f |p | Jump_Nonzero 0xa82
0a73 00d8 | | Load_Top At_Offset_0
0a74 0219 | | Execute Heap_Access,All_Read
0a75 00da | | Load_Top At_Offset_2
0a76 00d9 | | Load_Top At_Offset_1
0a77 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a78 e5fe | | Load 0x2,-0x2
0a79 e016 | | Load 0x0,0x16
0a7a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a7b 00da | | Load_Top At_Offset_2
0a7c 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0a7d 005b | [ | Store_Top Discrete,At_Offset_3
0a7e 00d1 | | Pop_Control Pop_Count_1
0a7f 00d9 | | Load_Top At_Offset_1
0a80 7001 |p | Jump_Nonzero 0xa82
0a81 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0a82 e002 | | Load 0x0,0x2
0a83 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a84 4801 |H | Short_Literal 0x1
0a85 4802 |H | Short_Literal 0x2
0a86 e005 | | Load 0x0,0x5
0a87 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a88 0334 | 4 | Declare_Variable Array,With_Constraint
0a89 e5ff | | Load 0x2,-0x1
0a8a 8210 | | Call 0x1,0x10
0a8b 4801 |H | Short_Literal 0x1
0a8c 00da | | Load_Top At_Offset_2
0a8d 01d6 | | Execute Vector,Field_Write
0a8e e5fd | | Load 0x2,-0x3
0a8f e014 | | Load 0x0,0x14
0a90 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a91 4802 |H | Short_Literal 0x2
0a92 00da | | Load_Top At_Offset_2
0a93 01d6 | | Execute Vector,Field_Write
0a94 00db | | Load_Top At_Offset_3
0a95 e002 | | Load 0x0,0x2
0a96 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0a97 c5fc | | Store 0x2,-0x4
0a98 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0a99 0000 0000 | | .BLANK 0000[0x7]
0aa0 ; --------------------------------------------------------------------------------------
0aa0 ; SUBPROGRAM
0aa0 ; --------------------------------------------------------------------------------------
0aa0 0aad | | .CONST 0x0aad ; Address of begin
0aa1 0004 | | .CONST 0x0004 ; Address of exception handler
0aa2 0004 | | .CONST 0x0004 ; Number of locals
0aa3 INIT_0aa0:
0aa3 e00d | | Load 0x0,0xd
0aa4 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0aa5 e002 | | Load 0x0,0x2
0aa6 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0aa7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0aa8 e00f | | Load 0x0,0xf
0aa9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0aaa 02c7 | | Declare_Variable Any
0aab 00d8 | | Load_Top At_Offset_0
0aac 1c00 | | Execute_Immediate Run_Utility,0x0
0aad BODY_0aa0:
0aad 00d9 | | Load_Top At_Offset_1
0aae e00d | | Load 0x0,0xd
0aaf 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0ab0 4800 |H | Short_Literal 0x0
0ab1 e5fd | | Load 0x2,-0x3
0ab2 e5ff | | Load 0x2,-0x1
0ab3 8276 | v | Call 0x1,0x76
0ab4 c402 | | Store 0x2,0x2
0ab5 005a | Z | Store_Top Discrete,At_Offset_2
0ab6 00d9 | | Load_Top At_Offset_1
0ab7 7029 |p) | Jump_Nonzero 0xae1
0ab8 00da | | Load_Top At_Offset_2
0ab9 0217 | | Execute Heap_Access,All_Reference
0aba 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0abb 681b |h | Jump_Zero 0xad7
0abc 00da | | Load_Top At_Offset_2
0abd 0219 | | Execute Heap_Access,All_Read
0abe 00da | | Load_Top At_Offset_2
0abf 00da | | Load_Top At_Offset_2
0ac0 0120 | | Execute Any,Is_Value
0ac1 6803 |h | Jump_Zero 0xac5
0ac2 e00f | | Load 0x0,0xf
0ac3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ac4 7801 |x | Jump 0xac6
0ac5 00da | | Load_Top At_Offset_2
0ac6 00da | | Load_Top At_Offset_2
0ac7 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0ac8 e5fe | | Load 0x2,-0x2
0ac9 e016 | | Load 0x0,0x16
0aca 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0acb 00db | | Load_Top At_Offset_3
0acc 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0acd c404 | | Store 0x2,0x4
0ace 005b | [ | Store_Top Discrete,At_Offset_3
0acf 00d1 | | Pop_Control Pop_Count_1
0ad0 00d9 | | Load_Top At_Offset_1
0ad1 7002 |p | Jump_Nonzero 0xad4
0ad2 00d8 | | Load_Top At_Offset_0
0ad3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ad4 e004 | | Load 0x0,0x4
0ad5 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ad6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ad7 e5fd | | Load 0x2,-0x3
0ad8 e5fe | | Load 0x2,-0x2
0ad9 e5ff | | Load 0x2,-0x1
0ada e001 | | Load 0x0,0x1
0adb 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0adc 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0add e001 | | Load 0x0,0x1
0ade 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0adf 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0ae0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ae1 4801 |H | Short_Literal 0x1
0ae2 4802 |H | Short_Literal 0x2
0ae3 e005 | | Load 0x0,0x5
0ae4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ae5 0334 | 4 | Declare_Variable Array,With_Constraint
0ae6 e5ff | | Load 0x2,-0x1
0ae7 8210 | | Call 0x1,0x10
0ae8 4801 |H | Short_Literal 0x1
0ae9 00da | | Load_Top At_Offset_2
0aea 01d6 | | Execute Vector,Field_Write
0aeb e5fd | | Load 0x2,-0x3
0aec e014 | | Load 0x0,0x14
0aed 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0aee 4802 |H | Short_Literal 0x2
0aef 00da | | Load_Top At_Offset_2
0af0 01d6 | | Execute Vector,Field_Write
0af1 00da | | Load_Top At_Offset_2
0af2 e002 | | Load 0x0,0x2
0af3 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0af4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0af5 0000 0000 | | .XXX[0x3]
0af7 0000 | |
0af8 ; --------------------------------------------------------------------------------------
0af8 ; SUBPROGRAM
0af8 ; --------------------------------------------------------------------------------------
0af8 0b00 | | .CONST 0x0b00 ; Address of begin
0af9 0004 | | .CONST 0x0004 ; Address of exception handler
0afa 0003 | | .CONST 0x0003 ; Number of locals
0afb INIT_0af8:
0afb e00d | | Load 0x0,0xd
0afc 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0afd e002 | | Load 0x0,0x2
0afe 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0aff 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b00 BODY_0af8:
0b00 00d8 | | Load_Top At_Offset_0
0b01 e00d | | Load 0x0,0xd
0b02 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0b03 4801 |H | Short_Literal 0x1
0b04 e5fc | | Load 0x2,-0x4
0b05 e5ff | | Load 0x2,-0x1
0b06 8276 | v | Call 0x1,0x76
0b07 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0b08 0059 | Y | Store_Top Discrete,At_Offset_1
0b09 00d8 | | Load_Top At_Offset_0
0b0a 7010 |p | Jump_Nonzero 0xb1b
0b0b 00d9 | | Load_Top At_Offset_1
0b0c 0219 | | Execute Heap_Access,All_Read
0b0d 00d9 | | Load_Top At_Offset_1
0b0e 00d9 | | Load_Top At_Offset_1
0b0f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0b10 e5fe | | Load 0x2,-0x2
0b11 e5fd | | Load 0x2,-0x3
0b12 e016 | | Load 0x0,0x16
0b13 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0b14 00da | | Load_Top At_Offset_2
0b15 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0b16 005a | Z | Store_Top Discrete,At_Offset_2
0b17 00d1 | | Pop_Control Pop_Count_1
0b18 00d8 | | Load_Top At_Offset_0
0b19 7001 |p | Jump_Nonzero 0xb1b
0b1a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0b1b e002 | | Load 0x0,0x2
0b1c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b1d 4801 |H | Short_Literal 0x1
0b1e 4802 |H | Short_Literal 0x2
0b1f e005 | | Load 0x0,0x5
0b20 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b21 0334 | 4 | Declare_Variable Array,With_Constraint
0b22 e5ff | | Load 0x2,-0x1
0b23 8210 | | Call 0x1,0x10
0b24 4801 |H | Short_Literal 0x1
0b25 00da | | Load_Top At_Offset_2
0b26 01d6 | | Execute Vector,Field_Write
0b27 e5fc | | Load 0x2,-0x4
0b28 e014 | | Load 0x0,0x14
0b29 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0b2a 4802 |H | Short_Literal 0x2
0b2b 00da | | Load_Top At_Offset_2
0b2c 01d6 | | Execute Vector,Field_Write
0b2d 00da | | Load_Top At_Offset_2
0b2e e002 | | Load 0x0,0x2
0b2f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0b30 c5fb | | Store 0x2,-0x5
0b31 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0b32 0000 0000 | | .BLANK 0000[0x6]
0b38 ; --------------------------------------------------------------------------------------
0b38 ; SUBPROGRAM
0b38 ; --------------------------------------------------------------------------------------
0b38 0b40 | @ | .CONST 0x0b40 ; Address of begin
0b39 0004 | | .CONST 0x0004 ; Address of exception handler
0b3a 0003 | | .CONST 0x0003 ; Number of locals
0b3b INIT_0b38:
0b3b e00d | | Load 0x0,0xd
0b3c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0b3d e002 | | Load 0x0,0x2
0b3e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0b3f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b40 BODY_0b38:
0b40 00d8 | | Load_Top At_Offset_0
0b41 e00d | | Load 0x0,0xd
0b42 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0b43 4801 |H | Short_Literal 0x1
0b44 e5fd | | Load 0x2,-0x3
0b45 e5ff | | Load 0x2,-0x1
0b46 8276 | v | Call 0x1,0x76
0b47 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0b48 0059 | Y | Store_Top Discrete,At_Offset_1
0b49 00d8 | | Load_Top At_Offset_0
0b4a 700f |p | Jump_Nonzero 0xb5a
0b4b 00d9 | | Load_Top At_Offset_1
0b4c 0219 | | Execute Heap_Access,All_Read
0b4d 00d9 | | Load_Top At_Offset_1
0b4e 00d9 | | Load_Top At_Offset_1
0b4f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0b50 e5fe | | Load 0x2,-0x2
0b51 e016 | | Load 0x0,0x16
0b52 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b53 00da | | Load_Top At_Offset_2
0b54 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0b55 005a | Z | Store_Top Discrete,At_Offset_2
0b56 00d1 | | Pop_Control Pop_Count_1
0b57 00d8 | | Load_Top At_Offset_0
0b58 7001 |p | Jump_Nonzero 0xb5a
0b59 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0b5a e002 | | Load 0x0,0x2
0b5b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b5c 4801 |H | Short_Literal 0x1
0b5d 4802 |H | Short_Literal 0x2
0b5e e005 | | Load 0x0,0x5
0b5f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b60 0334 | 4 | Declare_Variable Array,With_Constraint
0b61 e5ff | | Load 0x2,-0x1
0b62 8210 | | Call 0x1,0x10
0b63 4801 |H | Short_Literal 0x1
0b64 00da | | Load_Top At_Offset_2
0b65 01d6 | | Execute Vector,Field_Write
0b66 e5fd | | Load 0x2,-0x3
0b67 e014 | | Load 0x0,0x14
0b68 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0b69 4802 |H | Short_Literal 0x2
0b6a 00da | | Load_Top At_Offset_2
0b6b 01d6 | | Execute Vector,Field_Write
0b6c 00da | | Load_Top At_Offset_2
0b6d e002 | | Load 0x0,0x2
0b6e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0b6f c5fc | | Store 0x2,-0x4
0b70 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0b71 0000 0000 | | .BLANK 0000[0x7]
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b80 | | .CONST 0x0b80 ; Address of begin
0b79 0004 | | .CONST 0x0004 ; Address of exception handler
0b7a 0003 | | .CONST 0x0003 ; Number of locals
0b7b INIT_0b78:
0b7b e00d | | Load 0x0,0xd
0b7c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0b7d e002 | | Load 0x0,0x2
0b7e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0b7f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b80 BODY_0b78:
0b80 00d8 | | Load_Top At_Offset_0
0b81 e00d | | Load 0x0,0xd
0b82 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0b83 4801 |H | Short_Literal 0x1
0b84 e5fd | | Load 0x2,-0x3
0b85 e5ff | | Load 0x2,-0x1
0b86 8276 | v | Call 0x1,0x76
0b87 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0b88 0059 | Y | Store_Top Discrete,At_Offset_1
0b89 00d8 | | Load_Top At_Offset_0
0b8a 700f |p | Jump_Nonzero 0xb9a
0b8b 00d9 | | Load_Top At_Offset_1
0b8c 0219 | | Execute Heap_Access,All_Read
0b8d 00d9 | | Load_Top At_Offset_1
0b8e 00d9 | | Load_Top At_Offset_1
0b8f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0b90 e5fe | | Load 0x2,-0x2
0b91 e016 | | Load 0x0,0x16
0b92 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b93 00da | | Load_Top At_Offset_2
0b94 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0b95 005a | Z | Store_Top Discrete,At_Offset_2
0b96 00d1 | | Pop_Control Pop_Count_1
0b97 00d8 | | Load_Top At_Offset_0
0b98 7001 |p | Jump_Nonzero 0xb9a
0b99 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0b9a e002 | | Load 0x0,0x2
0b9b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b9c 4801 |H | Short_Literal 0x1
0b9d 4802 |H | Short_Literal 0x2
0b9e e005 | | Load 0x0,0x5
0b9f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ba0 0334 | 4 | Declare_Variable Array,With_Constraint
0ba1 e5ff | | Load 0x2,-0x1
0ba2 8210 | | Call 0x1,0x10
0ba3 4801 |H | Short_Literal 0x1
0ba4 00da | | Load_Top At_Offset_2
0ba5 01d6 | | Execute Vector,Field_Write
0ba6 e5fd | | Load 0x2,-0x3
0ba7 e014 | | Load 0x0,0x14
0ba8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0ba9 4802 |H | Short_Literal 0x2
0baa 00da | | Load_Top At_Offset_2
0bab 01d6 | | Execute Vector,Field_Write
0bac 00da | | Load_Top At_Offset_2
0bad e002 | | Load 0x0,0x2
0bae 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0baf c5fc | | Store 0x2,-0x4
0bb0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0bb1 0000 0000 | | .BLANK 0000[0x7]
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; SUBPROGRAM
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0bbb | | .CONST 0x0bbb ; Address of begin
0bb9 0004 | | .CONST 0x0004 ; Address of exception handler
0bba 0001 | | .CONST 0x0001 ; Number of locals
0bbb BODY_0bb8:
0bbb INIT_0bb8:
0bbb 00da | | Load_Top At_Offset_2
0bbc 680b |h | Jump_Zero 0xbc8
0bbd 00da | | Load_Top At_Offset_2
0bbe 0217 | | Execute Heap_Access,All_Reference
0bbf 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0bc0 6807 |h | Jump_Zero 0xbc8
0bc1 00da | | Load_Top At_Offset_2
0bc2 0217 | | Execute Heap_Access,All_Reference
0bc3 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
0bc4 e001 | | Load 0x0,0x1
0bc5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0bc6 0216 | | Execute Heap_Access,Convert
0bc7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bc8 00da | | Load_Top At_Offset_2
0bc9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bca 0000 0000 | | .BLANK 0000[0x6]
0bd0 ; --------------------------------------------------------------------------------------
0bd0 ; SUBPROGRAM
0bd0 ; --------------------------------------------------------------------------------------
0bd0 0bd3 | | .CONST 0x0bd3 ; Address of begin
0bd1 0004 | | .CONST 0x0004 ; Address of exception handler
0bd2 0001 | | .CONST 0x0001 ; Number of locals
0bd3 BODY_0bd0:
0bd3 INIT_0bd0:
0bd3 00da | | Load_Top At_Offset_2
0bd4 7002 |p | Jump_Nonzero 0xbd7
0bd5 00da | | Load_Top At_Offset_2
0bd6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bd7 00da | | Load_Top At_Offset_2
0bd8 0217 | | Execute Heap_Access,All_Reference
0bd9 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0bda 6802 |h | Jump_Zero 0xbdd
0bdb 00da | | Load_Top At_Offset_2
0bdc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bdd 00da | | Load_Top At_Offset_2
0bde 0217 | | Execute Heap_Access,All_Reference
0bdf 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
0be0 e001 | | Load 0x0,0x1
0be1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0be2 0216 | | Execute Heap_Access,Convert
0be3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0be4 0000 0000 | | .BLANK 0000[0x4]
0be8 ; --------------------------------------------------------------------------------------
0be8 ; SUBPROGRAM
0be8 ; --------------------------------------------------------------------------------------
0be8 0beb | | .CONST 0x0beb ; Address of begin
0be9 0004 | | .CONST 0x0004 ; Address of exception handler
0bea 0001 | | .CONST 0x0001 ; Number of locals
0beb BODY_0be8:
0beb INIT_0be8:
0beb 00da | | Load_Top At_Offset_2
0bec 6805 |h | Jump_Zero 0xbf2
0bed 00da | | Load_Top At_Offset_2
0bee 0217 | | Execute Heap_Access,All_Reference
0bef 3c15 |< | Execute Record,Field_Read,Field_Number 0x15
0bf0 8263 | c | Call 0x1,0x63
0bf1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bf2 8215 | | Call 0x1,0x15
0bf3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bf4 0000 0000 | | .BLANK 0000[0x4]
0bf8 ; --------------------------------------------------------------------------------------
0bf8 ; SUBPROGRAM
0bf8 ; --------------------------------------------------------------------------------------
0bf8 0bfb | | .CONST 0x0bfb ; Address of begin
0bf9 0004 | | .CONST 0x0004 ; Address of exception handler
0bfa 0001 | | .CONST 0x0001 ; Number of locals
0bfb BODY_0bf8:
0bfb INIT_0bf8:
0bfb 00da | | Load_Top At_Offset_2
0bfc 7002 |p | Jump_Nonzero 0xbff
0bfd 00da | | Load_Top At_Offset_2
0bfe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bff 00da | | Load_Top At_Offset_2
0c00 0217 | | Execute Heap_Access,All_Reference
0c01 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
0c02 e001 | | Load 0x0,0x1
0c03 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0c04 0216 | | Execute Heap_Access,Convert
0c05 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c06 0000 0000 | | .XXX[0x2]
0c08 ; --------------------------------------------------------------------------------------
0c08 ; SUBPROGRAM
0c08 ; --------------------------------------------------------------------------------------
0c08 0c0b | | .CONST 0x0c0b ; Address of begin
0c09 0004 | | .CONST 0x0004 ; Address of exception handler
0c0a 0001 | | .CONST 0x0001 ; Number of locals
0c0b BODY_0c08:
0c0b INIT_0c08:
0c0b 00da | | Load_Top At_Offset_2
0c0c 6804 |h | Jump_Zero 0xc11
0c0d 00da | | Load_Top At_Offset_2
0c0e 0217 | | Execute Heap_Access,All_Reference
0c0f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0c10 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c11 4800 |H | Short_Literal 0x0
0c12 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c13 0000 0000 | | .BLANK 0000[0x5]
0c18 ; --------------------------------------------------------------------------------------
0c18 ; SUBPROGRAM
0c18 ; --------------------------------------------------------------------------------------
0c18 0c1b | | .CONST 0x0c1b ; Address of begin
0c19 0004 | | .CONST 0x0004 ; Address of exception handler
0c1a 0001 | | .CONST 0x0001 ; Number of locals
0c1b BODY_0c18:
0c1b INIT_0c18:
0c1b 00db | | Load_Top At_Offset_3
0c1c 00db | | Load_Top At_Offset_3
0c1d 0217 | | Execute Heap_Access,All_Reference
0c1e 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0c1f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c20 ; --------------------------------------------------------------------------------------
0c20 ; SUBPROGRAM
0c20 ; --------------------------------------------------------------------------------------
0c20 0c23 | # | .CONST 0x0c23 ; Address of begin
0c21 0004 | | .CONST 0x0004 ; Address of exception handler
0c22 0001 | | .CONST 0x0001 ; Number of locals
0c23 BODY_0c20:
0c23 INIT_0c20:
0c23 00da | | Load_Top At_Offset_2
0c24 e017 | | Load 0x0,0x17
0c25 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c26 011c | | Execute Any,Convert_Unchecked
0c27 1c01 | | Execute_Immediate Run_Utility,0x1
0c28 e005 | | Load 0x0,0x5
0c29 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c2a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c2b 0000 0000 | | .BLANK 0000[0x5]
0c30 ; --------------------------------------------------------------------------------------
0c30 ; SUBPROGRAM
0c30 ; --------------------------------------------------------------------------------------
0c30 0c33 | 3 | .CONST 0x0c33 ; Address of begin
0c31 0004 | | .CONST 0x0004 ; Address of exception handler
0c32 0001 | | .CONST 0x0001 ; Number of locals
0c33 BODY_0c30:
0c33 INIT_0c30:
0c33 00da | | Load_Top At_Offset_2
0c34 e006 | | Load 0x0,0x6
0c35 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c36 e00d | | Load 0x0,0xd
0c37 1841 | A | Execute Package,Field_Execute,Field_Number 0x41
0c38 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c39 0000 0000 | | .BLANK 0000[0x7]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c54 | T | .CONST 0x0c54 ; Address of begin
0c41 0cef | | .CONST 0x0cef ; Address of exception handler
0c42 0005 | | .CONST 0x0005 ; Number of locals
0c43 INIT_0c40:
0c43 e003 | | Load 0x0,0x3
0c44 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0c45 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0c46 02c7 | | Declare_Variable Any
0c47 00d8 | | Load_Top At_Offset_0
0c48 1c00 | | Execute_Immediate Run_Utility,0x0
0c49 e003 | | Load 0x0,0x3
0c4a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c4b e00e | | Load 0x0,0xe
0c4c 0322 | " | Declare_Variable Record
0c4d 00d8 | | Load_Top At_Offset_0
0c4e 1c00 | | Execute_Immediate Run_Utility,0x0
0c4f e003 | | Load 0x0,0x3
0c50 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c51 02c7 | | Declare_Variable Any
0c52 00d8 | | Load_Top At_Offset_0
0c53 1c00 | | Execute_Immediate Run_Utility,0x0
0c54 BODY_0c40:
0c54 e5fd | | Load 0x2,-0x3
0c55 00d9 | | Load_Top At_Offset_1
0c56 0120 | | Execute Any,Is_Value
0c57 6803 |h | Jump_Zero 0xc5b
0c58 e003 | | Load 0x0,0x3
0c59 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c5a 7801 |x | Jump 0xc5c
0c5b 00d9 | | Load_Top At_Offset_1
0c5c e5ff | | Load 0x2,-0x1
0c5d 8224 | $ | Call 0x1,0x24
0c5e c405 | | Store 0x2,0x5
0c5f c5fd | | Store 0x2,-0x3
0c60 e5fd | | Load 0x2,-0x3
0c61 708c |p | Jump_Nonzero 0xcee
0c62 e003 | | Load 0x0,0x3
0c63 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c64 e402 | | Load 0x2,0x2
0c65 0120 | | Execute Any,Is_Value
0c66 6804 |h | Jump_Zero 0xc6b
0c67 e003 | | Load 0x0,0x3
0c68 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0c69 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0c6a 7801 |x | Jump 0xc6c
0c6b e402 | | Load 0x2,0x2
0c6c 608b |` | Indirect_Literal Discrete,0xcf8,{0x00000000, 0x00004000}
0c6d e013 | | Load 0x0,0x13
0c6e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c6f 4800 |H | Short_Literal 0x0
0c70 e405 | | Load 0x2,0x5
0c71 e003 | | Load 0x0,0x3
0c72 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0c73 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0c74 c402 | | Store 0x2,0x2
0c75 005b | [ | Store_Top Discrete,At_Offset_3
0c76 00da | | Load_Top At_Offset_2
0c77 460e |F | Jump_Case 0xf
0c78 7836 |x6 | Jump 0xcaf ; case 0x0
0c79 7835 |x5 | Jump 0xcaf ; case 0x1
0c7a 780c |x | Jump 0xc87 ; case 0x2
0c7b 780b |x | Jump 0xc87 ; case 0x3
0c7c 780a |x | Jump 0xc87 ; case 0x4
0c7d 7809 |x | Jump 0xc87 ; case 0x5
0c7e 7808 |x | Jump 0xc87 ; case 0x6
0c7f 7807 |x | Jump 0xc87 ; case 0x7
0c80 7806 |x | Jump 0xc87 ; case 0x8
0c81 7805 |x | Jump 0xc87 ; case 0x9
0c82 782c |x, | Jump 0xcaf ; case 0xa
0c83 7803 |x | Jump 0xc87 ; case 0xb
0c84 7802 |x | Jump 0xc87 ; case 0xc
0c85 7801 |x | Jump 0xc87 ; case 0xd
0c86 7800 |x | Jump 0xc87 ; case 0xe
0c87 e003 | | Load 0x0,0x3
0c88 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c89 e5ff | | Load 0x2,-0x1
0c8a 0217 | | Execute Heap_Access,All_Reference
0c8b 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0c8c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0c8d e5fd | | Load 0x2,-0x3
0c8e 00d9 | | Load_Top At_Offset_1
0c8f 0120 | | Execute Any,Is_Value
0c90 6803 |h | Jump_Zero 0xc94
0c91 e003 | | Load 0x0,0x3
0c92 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c93 7801 |x | Jump 0xc95
0c94 00d9 | | Load_Top At_Offset_1
0c95 e5ff | | Load 0x2,-0x1
0c96 8224 | $ | Call 0x1,0x24
0c97 c405 | | Store 0x2,0x5
0c98 c5fd | | Store 0x2,-0x3
0c99 e5fd | | Load 0x2,-0x3
0c9a 7014 |p | Jump_Nonzero 0xcaf
0c9b e003 | | Load 0x0,0x3
0c9c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c9d e402 | | Load 0x2,0x2
0c9e 0120 | | Execute Any,Is_Value
0c9f 6804 |h | Jump_Zero 0xca4
0ca0 e003 | | Load 0x0,0x3
0ca1 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0ca2 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0ca3 7801 |x | Jump 0xca5
0ca4 e402 | | Load 0x2,0x2
0ca5 6052 |`R | Indirect_Literal Discrete,0xcf8,{0x00000000, 0x00004000}
0ca6 e013 | | Load 0x0,0x13
0ca7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ca8 4800 |H | Short_Literal 0x0
0ca9 e405 | | Load 0x2,0x5
0caa e003 | | Load 0x0,0x3
0cab 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0cac 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0cad c402 | | Store 0x2,0x2
0cae 005b | [ | Store_Top Discrete,At_Offset_3
0caf 00da | | Load_Top At_Offset_2
0cb0 7027 |p' | Jump_Nonzero 0xcd8
0cb1 00d8 | | Load_Top At_Offset_0
0cb2 00da | | Load_Top At_Offset_2
0cb3 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0cb4 00db | | Load_Top At_Offset_3
0cb5 e003 | | Load 0x0,0x3
0cb6 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0cb7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0cb8 00da | | Load_Top At_Offset_2
0cb9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0cba 00db | | Load_Top At_Offset_3
0cbb e003 | | Load 0x0,0x3
0cbc 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0cbd 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0cbe 00da | | Load_Top At_Offset_2
0cbf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0cc0 00db | | Load_Top At_Offset_3
0cc1 e003 | | Load 0x0,0x3
0cc2 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0cc3 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0cc4 00da | | Load_Top At_Offset_2
0cc5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0cc6 00db | | Load_Top At_Offset_3
0cc7 e003 | | Load 0x0,0x3
0cc8 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0cc9 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0cca 00da | | Load_Top At_Offset_2
0ccb 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0ccc 00d9 | | Load_Top At_Offset_1
0ccd e5fe | | Load 0x2,-0x2
0cce 017d | } | Execute Record,Structure_Write
0ccf 00d9 | | Load_Top At_Offset_1
0cd0 e5ff | | Load 0x2,-0x1
0cd1 0217 | | Execute Heap_Access,All_Reference
0cd2 380d |8 | Execute Record,Field_Write,Field_Number 0xd
0cd3 4801 |H | Short_Literal 0x1
0cd4 e5ff | | Load 0x2,-0x1
0cd5 0217 | | Execute Heap_Access,All_Reference
0cd6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0cd7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0cd8 e002 | | Load 0x0,0x2
0cd9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cda 4801 |H | Short_Literal 0x1
0cdb 4802 |H | Short_Literal 0x2
0cdc e005 | | Load 0x0,0x5
0cdd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cde 0334 | 4 | Declare_Variable Array,With_Constraint
0cdf e5ff | | Load 0x2,-0x1
0ce0 8210 | | Call 0x1,0x10
0ce1 4801 |H | Short_Literal 0x1
0ce2 00da | | Load_Top At_Offset_2
0ce3 01d6 | | Execute Vector,Field_Write
0ce4 e403 | | Load 0x2,0x3
0ce5 e005 | | Load 0x0,0x5
0ce6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0ce7 4802 |H | Short_Literal 0x2
0ce8 00da | | Load_Top At_Offset_2
0ce9 01d6 | | Execute Vector,Field_Write
0cea 6009 |` | Indirect_Literal Discrete,0xcf4,{0x00000000, 0x00002006}
0ceb e002 | | Load 0x0,0x2
0cec 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0ced c5fd | | Store 0x2,-0x3
0cee 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0cef TRAP_0c40:
0cef 4885 |H | Short_Literal 0x85
0cf0 010f | | Execute Exception,Equal
0cf1 6801 |h | Jump_Zero 0xcf3
0cf2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0cf3 0100 | | Execute Exception,Raise
0cf4 0000 0000 | | .LITERAL {0x00000000, 0x00002006}
0cf8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0cfc 0000 0000 | | .BLANK 0000[0x4]
0d00 ; --------------------------------------------------------------------------------------
0d00 ; SUBPROGRAM
0d00 ; --------------------------------------------------------------------------------------
0d00 0d28 | ( | .CONST 0x0d28 ; Address of begin
0d01 0dd7 | | .CONST 0x0dd7 ; Address of exception handler
0d02 0009 | | .CONST 0x0009 ; Number of locals
0d03 INIT_0d00:
0d03 e018 | | Load 0x0,0x18
0d04 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0d05 0322 | " | Declare_Variable Record
0d06 00d8 | | Load_Top At_Offset_0
0d07 1c00 | | Execute_Immediate Run_Utility,0x0
0d08 e017 | | Load 0x0,0x17
0d09 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d0a e003 | | Load 0x0,0x3
0d0b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0d0c 02ff | | Declare_Variable Variant_Record
0d0d 00d8 | | Load_Top At_Offset_0
0d0e 1c00 | | Execute_Immediate Run_Utility,0x0
0d0f e018 | | Load 0x0,0x18
0d10 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0d11 0322 | " | Declare_Variable Record
0d12 00d8 | | Load_Top At_Offset_0
0d13 1c00 | | Execute_Immediate Run_Utility,0x0
0d14 e00e | | Load 0x0,0xe
0d15 0322 | " | Declare_Variable Record
0d16 00d8 | | Load_Top At_Offset_0
0d17 1c00 | | Execute_Immediate Run_Utility,0x0
0d18 e013 | | Load 0x0,0x13
0d19 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d1a 02c7 | | Declare_Variable Any
0d1b e013 | | Load 0x0,0x13
0d1c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d1d a407 | | Store_Unchecked 0x2,0x7
0d1e e00f | | Load 0x0,0xf
0d1f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d20 02c7 | | Declare_Variable Any
0d21 00d8 | | Load_Top At_Offset_0
0d22 1c00 | | Execute_Immediate Run_Utility,0x0
0d23 e00f | | Load 0x0,0xf
0d24 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d25 02c7 | | Declare_Variable Any
0d26 00d8 | | Load_Top At_Offset_0
0d27 1c00 | | Execute_Immediate Run_Utility,0x0
0d28 BODY_0d00:
0d28 e004 | | Load 0x0,0x4
0d29 180f | | Execute Package,Field_Execute,Field_Number 0xf
0d2a c5fe | | Store 0x2,-0x2
0d2b e004 | | Load 0x0,0x4
0d2c 180f | | Execute Package,Field_Execute,Field_Number 0xf
0d2d c5fd | | Store 0x2,-0x3
0d2e e5fc | | Load 0x2,-0x4
0d2f e406 | | Load 0x2,0x6
0d30 e5ff | | Load 0x2,-0x1
0d31 8260 | ` | Call 0x1,0x60
0d32 00d1 | | Pop_Control Pop_Count_1
0d33 c5fc | | Store 0x2,-0x4
0d34 e5fc | | Load 0x2,-0x4
0d35 70a0 |p | Jump_Nonzero 0xdd6
0d36 e017 | | Load 0x0,0x17
0d37 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0d38 e402 | | Load 0x2,0x2
0d39 e013 | | Load 0x0,0x13
0d3a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d3b 4800 |H | Short_Literal 0x0
0d3c 4800 |H | Short_Literal 0x0
0d3d e406 | | Load 0x2,0x6
0d3e 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0d3f e018 | | Load 0x0,0x18
0d40 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0d41 00d1 | | Pop_Control Pop_Count_1
0d42 c403 | | Store 0x2,0x3
0d43 e403 | | Load 0x2,0x3
0d44 7069 |pi | Jump_Nonzero 0xdae
0d45 e402 | | Load 0x2,0x2
0d46 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0d47 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0d48 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0d49 c409 | | Store 0x2,0x9
0d4a 00db | | Load_Top At_Offset_3
0d4b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0d4c e003 | | Load 0x0,0x3
0d4d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0d4e 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0d4f 012f | / | Execute Any,Equal
0d50 685a |hZ | Jump_Zero 0xdab
0d51 e017 | | Load 0x0,0x17
0d52 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d53 e404 | | Load 0x2,0x4
0d54 4800 |H | Short_Literal 0x0
0d55 e407 | | Load 0x2,0x7
0d56 e406 | | Load 0x2,0x6
0d57 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0d58 e019 | | Load 0x0,0x19
0d59 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d5a 0162 | b | Execute Variant_Record,Check_In_Type
0d5b e019 | | Load 0x0,0x19
0d5c 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0d5d 00d1 | | Pop_Control Pop_Count_1
0d5e c403 | | Store 0x2,0x3
0d5f e403 | | Load 0x2,0x3
0d60 702f |p/ | Jump_Nonzero 0xd90
0d61 e017 | | Load 0x0,0x17
0d62 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0d63 e405 | | Load 0x2,0x5
0d64 e013 | | Load 0x0,0x13
0d65 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d66 4800 |H | Short_Literal 0x0
0d67 4800 |H | Short_Literal 0x0
0d68 e404 | | Load 0x2,0x4
0d69 e018 | | Load 0x0,0x18
0d6a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0d6b 00d1 | | Pop_Control Pop_Count_1
0d6c c403 | | Store 0x2,0x3
0d6d e403 | | Load 0x2,0x3
0d6e 7006 |p | Jump_Nonzero 0xd75
0d6f e405 | | Load 0x2,0x5
0d70 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0d71 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0d72 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0d73 c408 | | Store 0x2,0x8
0d74 7853 |xS | Jump 0xdc8
0d75 e002 | | Load 0x0,0x2
0d76 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d77 4801 |H | Short_Literal 0x1
0d78 4802 |H | Short_Literal 0x2
0d79 e005 | | Load 0x0,0x5
0d7a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d7b 0334 | 4 | Declare_Variable Array,With_Constraint
0d7c e5ff | | Load 0x2,-0x1
0d7d 8210 | | Call 0x1,0x10
0d7e 4801 |H | Short_Literal 0x1
0d7f 00da | | Load_Top At_Offset_2
0d80 01d6 | | Execute Vector,Field_Write
0d81 e403 | | Load 0x2,0x3
0d82 e017 | | Load 0x0,0x17
0d83 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d84 011c | | Execute Any,Convert_Unchecked
0d85 1c01 | | Execute_Immediate Run_Utility,0x1
0d86 e005 | | Load 0x0,0x5
0d87 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d88 4802 |H | Short_Literal 0x2
0d89 00da | | Load_Top At_Offset_2
0d8a 01d6 | | Execute Vector,Field_Write
0d8b 6058 |`X | Indirect_Literal Discrete,0xde4,{0x00000000, 0x00002005}
0d8c e002 | | Load 0x0,0x2
0d8d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0d8e c5fc | | Store 0x2,-0x4
0d8f 7838 |x8 | Jump 0xdc8
0d90 e002 | | Load 0x0,0x2
0d91 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d92 4801 |H | Short_Literal 0x1
0d93 4802 |H | Short_Literal 0x2
0d94 e005 | | Load 0x0,0x5
0d95 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d96 0334 | 4 | Declare_Variable Array,With_Constraint
0d97 e5ff | | Load 0x2,-0x1
0d98 8210 | | Call 0x1,0x10
0d99 4801 |H | Short_Literal 0x1
0d9a 00da | | Load_Top At_Offset_2
0d9b 01d6 | | Execute Vector,Field_Write
0d9c e403 | | Load 0x2,0x3
0d9d e017 | | Load 0x0,0x17
0d9e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d9f 011c | | Execute Any,Convert_Unchecked
0da0 1c01 | | Execute_Immediate Run_Utility,0x1
0da1 e005 | | Load 0x0,0x5
0da2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0da3 4802 |H | Short_Literal 0x2
0da4 00da | | Load_Top At_Offset_2
0da5 01d6 | | Execute Vector,Field_Write
0da6 6039 |`9 | Indirect_Literal Discrete,0xde0,{0x00000000, 0x00002004}
0da7 e002 | | Load 0x0,0x2
0da8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0da9 c5fc | | Store 0x2,-0x4
0daa 781d |x | Jump 0xdc8
0dab 00d8 | | Load_Top At_Offset_0
0dac c408 | | Store 0x2,0x8
0dad 781a |x | Jump 0xdc8
0dae e002 | | Load 0x0,0x2
0daf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0db0 4801 |H | Short_Literal 0x1
0db1 4802 |H | Short_Literal 0x2
0db2 e005 | | Load 0x0,0x5
0db3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0db4 0334 | 4 | Declare_Variable Array,With_Constraint
0db5 e5ff | | Load 0x2,-0x1
0db6 8210 | | Call 0x1,0x10
0db7 4801 |H | Short_Literal 0x1
0db8 00da | | Load_Top At_Offset_2
0db9 01d6 | | Execute Vector,Field_Write
0dba e403 | | Load 0x2,0x3
0dbb e017 | | Load 0x0,0x17
0dbc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0dbd 011c | | Execute Any,Convert_Unchecked
0dbe 1c01 | | Execute_Immediate Run_Utility,0x1
0dbf e005 | | Load 0x0,0x5
0dc0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0dc1 4802 |H | Short_Literal 0x2
0dc2 00da | | Load_Top At_Offset_2
0dc3 01d6 | | Execute Vector,Field_Write
0dc4 6017 |` | Indirect_Literal Discrete,0xddc,{0x00000000, 0x00002007}
0dc5 e002 | | Load 0x0,0x2
0dc6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0dc7 c5fc | | Store 0x2,-0x4
0dc8 e5fc | | Load 0x2,-0x4
0dc9 700c |p | Jump_Nonzero 0xdd6
0dca 00d8 | | Load_Top At_Offset_0
0dcb c5fe | | Store 0x2,-0x2
0dcc 00d9 | | Load_Top At_Offset_1
0dcd c5fd | | Store 0x2,-0x3
0dce 00d8 | | Load_Top At_Offset_0
0dcf e5ff | | Load 0x2,-0x1
0dd0 0217 | | Execute Heap_Access,All_Reference
0dd1 380f |8 | Execute Record,Field_Write,Field_Number 0xf
0dd2 00d9 | | Load_Top At_Offset_1
0dd3 e5ff | | Load 0x2,-0x1
0dd4 0217 | | Execute Heap_Access,All_Reference
0dd5 380e |8 | Execute Record,Field_Write,Field_Number 0xe
0dd6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0dd7 TRAP_0d00:
0dd7 4885 |H | Short_Literal 0x85
0dd8 010f | | Execute Exception,Equal
0dd9 6801 |h | Jump_Zero 0xddb
0dda 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ddb 0100 | | Execute Exception,Raise
0ddc 0000 0000 | | .LITERAL {0x00000000, 0x00002007}
0de0 0000 0000 | | .LITERAL {0x00000000, 0x00002004}
0de4 0000 0000 | | .LITERAL {0x00000000, 0x00002005}
0de8 ; --------------------------------------------------------------------------------------
0de8 ; SUBPROGRAM
0de8 ; --------------------------------------------------------------------------------------
0de8 0dee | | .CONST 0x0dee ; Address of begin
0de9 0004 | | .CONST 0x0004 ; Address of exception handler
0dea 0003 | | .CONST 0x0003 ; Number of locals
0deb INIT_0de8:
0deb 00e2 | | Load_Encached Integer_Cache
0dec 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0ded 00db | | Load_Top At_Offset_3
0dee BODY_0de8:
0dee 00cf | | Action Mark_Auxiliary
0def 7808 |x | Jump 0xdf8
0df0 00da | | Load_Top At_Offset_2
0df1 0a01 | | Execute_Immediate Plus,0x1
0df2 005b | [ | Store_Top Discrete,At_Offset_3
0df3 00d9 | | Load_Top At_Offset_1
0df4 0217 | | Execute Heap_Access,All_Reference
0df5 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0df6 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0df7 00c9 | | Action Pop_Auxiliary_Loop
0df8 00d9 | | Load_Top At_Offset_1
0df9 77f6 |w | Jump_Nonzero 0xdf0
0dfa 00ce | | Action Pop_Auxiliary
0dfb e5ff | | Load 0x2,-0x1
0dfc 680b |h | Jump_Zero 0xe08
0dfd 00d9 | | Load_Top At_Offset_1
0dfe 7009 |p | Jump_Nonzero 0xe08
0dff 0092 1550 | P| Action Push_String_Extended,0x1550 ; "No siblings for "
0e01 e5ff | | Load 0x2,-0x1
0e02 0217 | | Execute Heap_Access,All_Reference
0e03 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
0e04 e010 | | Load 0x0,0x10
0e05 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0e06 01cc | | Execute Vector,Catenate
0e07 8011 | | Call 0x0,0x11
0e08 00d9 | | Load_Top At_Offset_1
0e09 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e0a 0000 0000 | | .BLANK 0000[0x6]
0e10 ; --------------------------------------------------------------------------------------
0e10 ; SUBPROGRAM
0e10 ; --------------------------------------------------------------------------------------
0e10 0e19 | | .CONST 0x0e19 ; Address of begin
0e11 0004 | | .CONST 0x0004 ; Address of exception handler
0e12 0003 | | .CONST 0x0003 ; Number of locals
0e13 INIT_0e10:
0e13 00da | | Load_Top At_Offset_2
0e14 8262 | b | Call 0x1,0x62
0e15 e214 | | Load 0x1,0x14
0e16 1c08 | | Execute_Immediate Run_Utility,0x8
0e17 00db | | Load_Top At_Offset_3
0e18 0007 | | Action Break_Optional
0e19 BODY_0e10:
0e19 4800 |H | Short_Literal 0x0
0e1a 00da | | Load_Top At_Offset_2
0e1b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0e1c 00cf | | Action Mark_Auxiliary
0e1d 00da | | Load_Top At_Offset_2
0e1e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e1f 01d9 | | Execute Vector,Reverse_Bounds
0e20 0263 | c | Execute Discrete,Above_Bound
0e21 700e |p | Jump_Nonzero 0xe30
0e22 00db | | Load_Top At_Offset_3
0e23 e001 | | Load 0x0,0x1
0e24 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0e25 0216 | | Execute Heap_Access,Convert
0e26 00d9 | | Load_Top At_Offset_1
0e27 e402 | | Load 0x2,0x2
0e28 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e29 01d6 | | Execute Vector,Field_Write
0e2a 00db | | Load_Top At_Offset_3
0e2b 0217 | | Execute Heap_Access,All_Reference
0e2c 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0e2d a403 | | Store_Unchecked 0x2,0x3
0e2e 00c8 | | Action Pop_Auxiliary_Range
0e2f 3ff2 |? | Loop_Increasing 0xe22
0e30 00ce | | Action Pop_Auxiliary
0e31 00d9 | | Load_Top At_Offset_1
0e32 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e33 0000 0000 | | .BLANK 0000[0x5]
0e38 ; --------------------------------------------------------------------------------------
0e38 ; SUBPROGRAM
0e38 ; --------------------------------------------------------------------------------------
0e38 0e3b | ; | .CONST 0x0e3b ; Address of begin
0e39 0004 | | .CONST 0x0004 ; Address of exception handler
0e3a 0001 | | .CONST 0x0001 ; Number of locals
0e3b BODY_0e38:
0e3b INIT_0e38:
0e3b 00db | | Load_Top At_Offset_3
0e3c e01a | | Load 0x0,0x1a
0e3d 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0e3e 00d9 | | Load_Top At_Offset_1
0e3f 00d0 | | Action Swap_Control
0e40 0260 | ` | Execute Discrete,In_Type
0e41 7001 |p | Jump_Nonzero 0xe43
0e42 0801 | | Execute_Immediate Raise,0x1
0e43 00db | | Load_Top At_Offset_3
0e44 e01b | | Load 0x0,0x1b
0e45 e01c | | Load 0x0,0x1c
0e46 a01d | | Store_Unchecked 0x0,0x1d
0e47 e01e | | Load 0x0,0x1e
0e48 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0e49 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e4a 0000 0000 | | .BLANK 0000[0x6]
0e50 ; --------------------------------------------------------------------------------------
0e50 ; SUBPROGRAM
0e50 ; --------------------------------------------------------------------------------------
0e50 0e67 | g | .CONST 0x0e67 ; Address of begin
0e51 0004 | | .CONST 0x0004 ; Address of exception handler
0e52 0006 | | .CONST 0x0006 ; Number of locals
0e53 INIT_0e50:
0e53 e003 | | Load 0x0,0x3
0e54 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e55 02c7 | | Declare_Variable Any
0e56 00d8 | | Load_Top At_Offset_0
0e57 1c00 | | Execute_Immediate Run_Utility,0x0
0e58 e003 | | Load 0x0,0x3
0e59 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0e5a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0e5b 02c7 | | Declare_Variable Any
0e5c 00d8 | | Load_Top At_Offset_0
0e5d 1c00 | | Execute_Immediate Run_Utility,0x0
0e5e e003 | | Load 0x0,0x3
0e5f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e60 02c7 | | Declare_Variable Any
0e61 00d8 | | Load_Top At_Offset_0
0e62 1c00 | | Execute_Immediate Run_Utility,0x0
0e63 e003 | | Load 0x0,0x3
0e64 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e65 029f 115b | [| Declare_Subprogram INIT_1158,For_Call
0e67 BODY_0e50:
0e67 e003 | | Load 0x0,0x3
0e68 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e69 e403 | | Load 0x2,0x3
0e6a 0120 | | Execute Any,Is_Value
0e6b 6804 |h | Jump_Zero 0xe70
0e6c e003 | | Load 0x0,0x3
0e6d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0e6e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0e6f 7801 |x | Jump 0xe71
0e70 e403 | | Load 0x2,0x3
0e71 e5ff | | Load 0x2,-0x1
0e72 e003 | | Load 0x0,0x3
0e73 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0e74 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0e75 c403 | | Store 0x2,0x3
0e76 005a | Z | Store_Top Discrete,At_Offset_2
0e77 00db | | Load_Top At_Offset_3
0e78 e003 | | Load 0x0,0x3
0e79 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0e7a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0e7b c402 | | Store 0x2,0x2
0e7c e003 | | Load 0x0,0x3
0e7d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e7e 00db | | Load_Top At_Offset_3
0e7f 0120 | | Execute Any,Is_Value
0e80 6803 |h | Jump_Zero 0xe84
0e81 e003 | | Load 0x0,0x3
0e82 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e83 7801 |x | Jump 0xe85
0e84 00db | | Load_Top At_Offset_3
0e85 e402 | | Load 0x2,0x2
0e86 e003 | | Load 0x0,0x3
0e87 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0e88 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0e89 c404 | | Store 0x2,0x4
0e8a 005a | Z | Store_Top Discrete,At_Offset_2
0e8b 00d9 | | Load_Top At_Offset_1
0e8c 6824 |h$ | Jump_Zero 0xeb1
0e8d 4801 |H | Short_Literal 0x1
0e8e 4804 |H | Short_Literal 0x4
0e8f e005 | | Load 0x0,0x5
0e90 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e91 0334 | 4 | Declare_Variable Array,With_Constraint
0e92 e402 | | Load 0x2,0x2
0e93 e005 | | Load 0x0,0x5
0e94 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e95 4801 |H | Short_Literal 0x1
0e96 00da | | Load_Top At_Offset_2
0e97 01d6 | | Execute Vector,Field_Write
0e98 00db | | Load_Top At_Offset_3
0e99 e005 | | Load 0x0,0x5
0e9a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e9b 4802 |H | Short_Literal 0x2
0e9c 00da | | Load_Top At_Offset_2
0e9d 01d6 | | Execute Vector,Field_Write
0e9e 00db | | Load_Top At_Offset_3
0e9f e005 | | Load 0x0,0x5
0ea0 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0ea1 4803 |H | Short_Literal 0x3
0ea2 00da | | Load_Top At_Offset_2
0ea3 01d6 | | Execute Vector,Field_Write
0ea4 00da | | Load_Top At_Offset_2
0ea5 e003 | | Load 0x0,0x3
0ea6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ea7 011c | | Execute Any,Convert_Unchecked
0ea8 1c01 | | Execute_Immediate Run_Utility,0x1
0ea9 e005 | | Load 0x0,0x5
0eaa 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0eab 4804 |H | Short_Literal 0x4
0eac 00da | | Load_Top At_Offset_2
0ead 01d6 | | Execute Vector,Field_Write
0eae 601d |` | Indirect_Literal Discrete,0xecc,{0x00000000, 0x0000200a}
0eaf e002 | | Load 0x0,0x2
0eb0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0eb1 00da | | Load_Top At_Offset_2
0eb2 e003 | | Load 0x0,0x3
0eb3 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0eb4 e01f | | Load 0x0,0x1f
0eb5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0eb6 027e | ~ | Execute Discrete,Not_Equal
0eb7 6807 |h | Jump_Zero 0xebf
0eb8 e013 | | Load 0x0,0x13
0eb9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0eba 600d |` | Indirect_Literal Discrete,0xec8,{0x00007fff, 0xffffffff}
0ebb e5ff | | Load 0x2,-0x1
0ebc e020 | | Load 0x0,0x20
0ebd 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ebe 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ebf e013 | | Load 0x0,0x13
0ec0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ec1 6006 |` | Indirect_Literal Discrete,0xec8,{0x00007fff, 0xffffffff}
0ec2 e5ff | | Load 0x2,-0x1
0ec3 8406 | | Call 0x2,0x6
0ec4 e020 | | Load 0x0,0x20
0ec5 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ec6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ec7 0000 | | .XXX[0x1]
0ec8 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
0ecc 0000 0000 | | .LITERAL {0x00000000, 0x0000200a}
0ed0 ; --------------------------------------------------------------------------------------
0ed0 ; SUBPROGRAM
0ed0 ; --------------------------------------------------------------------------------------
0ed0 0f18 | | .CONST 0x0f18 ; Address of begin
0ed1 0fc7 | | .CONST 0x0fc7 ; Address of exception handler
0ed2 0016 | | .CONST 0x0016 ; Number of locals
0ed3 INIT_0ed0:
0ed3 00e2 | | Load_Encached Integer_Cache
0ed4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0ed5 4801 |H | Short_Literal 0x1
0ed6 4a00 |J | Short_Literal 0x200
0ed7 e001 | | Load 0x0,0x1
0ed8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0ed9 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0eda 035b | [ | Declare_Type Array,Constrained
0edb 0337 | 7 | Declare_Variable Array
0edc 00d8 | | Load_Top At_Offset_0
0edd 1c00 | | Execute_Immediate Run_Utility,0x0
0ede e019 | | Load 0x0,0x19
0edf 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0ee0 02c7 | | Declare_Variable Any
0ee1 00d8 | | Load_Top At_Offset_0
0ee2 1c00 | | Execute_Immediate Run_Utility,0x0
0ee3 e017 | | Load 0x0,0x17
0ee4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ee5 e013 | | Load 0x0,0x13
0ee6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ee7 02c7 | | Declare_Variable Any
0ee8 e013 | | Load 0x0,0x13
0ee9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0eea a406 | | Store_Unchecked 0x2,0x6
0eeb e20d | | Load 0x1,0xd
0eec 0007 | | Action Break_Optional
0eed 00e1 | | Load_Encached Boolean_Cache
0eee 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0eef e004 | | Load 0x0,0x4
0ef0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ef1 0337 | 7 | Declare_Variable Array
0ef2 e5ff | | Load 0x2,-0x1
0ef3 e001 | | Load 0x0,0x1
0ef4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0ef5 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0ef6 e001 | | Load 0x0,0x1
0ef7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0ef8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0ef9 e014 | | Load 0x0,0x14
0efa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0efb 00d9 | | Load_Top At_Offset_1
0efc 01d4 | | Execute Vector,Structure_Write
0efd 029f 11d3 | | Declare_Subprogram INIT_11d0,For_Call
0eff 029f 1273 | s| Declare_Subprogram INIT_1270,For_Call
0f01 a021 | ! | Store_Unchecked 0x0,0x21
0f02 00c6 | | Action Check_Subprogram_Elaborated
0f03 00e2 | | Load_Encached Integer_Cache
0f04 480b |H | Short_Literal 0xb
0f05 4802 |H | Short_Literal 0x2
0f06 0099 | | Action Reference_Dynamic
0f07 e022 | " | Load 0x0,0x22
0f08 e023 | # | Load 0x0,0x23
0f09 4810 |H | Short_Literal 0x10
0f0a 0007 | | Action Break_Optional
0f0b 029f 1323 | #| Declare_Subprogram INIT_1320,For_Call
0f0d e024 | $ | Load 0x0,0x24
0f0e 190d | | Execute Package,Field_Reference,Field_Number 0xd
0f0f 00c6 | | Action Check_Subprogram_Elaborated
0f10 00e1 | | Load_Encached Boolean_Cache
0f11 4811 |H | Short_Literal 0x11
0f12 4802 |H | Short_Literal 0x2
0f13 0099 | | Action Reference_Dynamic
0f14 e025 | % | Load 0x0,0x25
0f15 e026 | & | Load 0x0,0x26
0f16 4816 |H | Short_Literal 0x16
0f17 0007 | | Action Break_Optional
0f18 BODY_0ed0:
0f18 4807 |H | Short_Literal 0x7
0f19 e409 | | Load 0x2,0x9
0f1a 01d7 | | Execute Vector,Field_Read
0f1b c027 | ' | Store 0x0,0x27
0f1c e017 | | Load 0x0,0x17
0f1d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0f1e e404 | | Load 0x2,0x4
0f1f 0120 | | Execute Any,Is_Value
0f20 6804 |h | Jump_Zero 0xf25
0f21 e019 | | Load 0x0,0x19
0f22 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0f23 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f24 7801 |x | Jump 0xf26
0f25 e404 | | Load 0x2,0x4
0f26 e406 | | Load 0x2,0x6
0f27 4800 |H | Short_Literal 0x0
0f28 4800 |H | Short_Literal 0x0
0f29 e5ff | | Load 0x2,-0x1
0f2a 0217 | | Execute Heap_Access,All_Reference
0f2b 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0f2c 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0f2d e019 | | Load 0x0,0x19
0f2e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f2f 0162 | b | Execute Variant_Record,Check_In_Type
0f30 e019 | | Load 0x0,0x19
0f31 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0f32 c404 | | Store 0x2,0x4
0f33 c405 | | Store 0x2,0x5
0f34 e405 | | Load 0x2,0x5
0f35 707b |p{ | Jump_Nonzero 0xfb1
0f36 e402 | | Load 0x2,0x2
0f37 e001 | | Load 0x0,0x1
0f38 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0f39 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0f3a 0337 | 7 | Declare_Variable Array
0f3b 4801 |H | Short_Literal 0x1
0f3c 4802 |H | Short_Literal 0x2
0f3d 00da | | Load_Top At_Offset_2
0f3e 01d6 | | Execute Vector,Field_Write
0f3f 4800 |H | Short_Literal 0x0
0f40 e409 | | Load 0x2,0x9
0f41 01d7 | | Execute Vector,Field_Read
0f42 0f00 | | Execute_Immediate Equal,0x0
0f43 4803 |H | Short_Literal 0x3
0f44 00da | | Load_Top At_Offset_2
0f45 01d6 | | Execute Vector,Field_Write
0f46 4803 |H | Short_Literal 0x3
0f47 e409 | | Load 0x2,0x9
0f48 01d7 | | Execute Vector,Field_Read
0f49 4804 |H | Short_Literal 0x4
0f4a 00da | | Load_Top At_Offset_2
0f4b 01d6 | | Execute Vector,Field_Write
0f4c 4800 |H | Short_Literal 0x0
0f4d 4800 |H | Short_Literal 0x0
0f4e 00da | | Load_Top At_Offset_2
0f4f 01d6 | | Execute Vector,Field_Write
0f50 4800 |H | Short_Literal 0x0
0f51 4801 |H | Short_Literal 0x1
0f52 00da | | Load_Top At_Offset_2
0f53 01d6 | | Execute Vector,Field_Write
0f54 4800 |H | Short_Literal 0x0
0f55 4805 |H | Short_Literal 0x5
0f56 00da | | Load_Top At_Offset_2
0f57 01d6 | | Execute Vector,Field_Write
0f58 e001 | | Load 0x0,0x1
0f59 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0f5a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0f5b 01c3 | | Execute Vector,Check_In_Type
0f5c e404 | | Load 0x2,0x4
0f5d e019 | | Load 0x0,0x19
0f5e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0f5f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0f60 e40c | | Load 0x2,0xc
0f61 480d |H | Short_Literal 0xd
0f62 4802 |H | Short_Literal 0x2
0f63 0099 | | Action Reference_Dynamic
0f64 480e |H | Short_Literal 0xe
0f65 4802 |H | Short_Literal 0x2
0f66 0099 | | Action Reference_Dynamic
0f67 8021 | ! | Call 0x0,0x21
0f68 e5ff | | Load 0x2,-0x1
0f69 0217 | | Execute Heap_Access,All_Reference
0f6a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0f6b 6813 |h | Jump_Zero 0xf7f
0f6c e408 | | Load 0x2,0x8
0f6d e404 | | Load 0x2,0x4
0f6e e019 | | Load 0x0,0x19
0f6f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0f70 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0f71 e412 | | Load 0x2,0x12
0f72 4813 |H | Short_Literal 0x13
0f73 4802 |H | Short_Literal 0x2
0f74 0099 | | Action Reference_Dynamic
0f75 4814 |H | Short_Literal 0x14
0f76 4802 |H | Short_Literal 0x2
0f77 0099 | | Action Reference_Dynamic
0f78 e024 | $ | Load 0x0,0x24
0f79 180d | | Execute Package,Field_Execute,Field_Number 0xd
0f7a c408 | | Store 0x2,0x8
0f7b e408 | | Load 0x2,0x8
0f7c e5ff | | Load 0x2,-0x1
0f7d 0217 | | Execute Heap_Access,All_Reference
0f7e 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0f7f e017 | | Load 0x0,0x17
0f80 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0f81 4800 |H | Short_Literal 0x0
0f82 4801 |H | Short_Literal 0x1
0f83 e406 | | Load 0x2,0x6
0f84 e5ff | | Load 0x2,-0x1
0f85 0217 | | Execute Heap_Access,All_Reference
0f86 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0f87 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0f88 e019 | | Load 0x0,0x19
0f89 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f8a 0162 | b | Execute Variant_Record,Check_In_Type
0f8b e019 | | Load 0x0,0x19
0f8c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0f8d c405 | | Store 0x2,0x5
0f8e 840a | | Call 0x2,0xa
0f8f e5fd | | Load 0x2,-0x3
0f90 e001 | | Load 0x0,0x1
0f91 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0f92 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0f93 0337 | 7 | Declare_Variable Array
0f94 4800 |H | Short_Literal 0x0
0f95 4800 |H | Short_Literal 0x0
0f96 00da | | Load_Top At_Offset_2
0f97 01d6 | | Execute Vector,Field_Write
0f98 4800 |H | Short_Literal 0x0
0f99 4805 |H | Short_Literal 0x5
0f9a 00da | | Load_Top At_Offset_2
0f9b 01d6 | | Execute Vector,Field_Write
0f9c 4804 |H | Short_Literal 0x4
0f9d 4801 |H | Short_Literal 0x1
0f9e 4801 |H | Short_Literal 0x1
0f9f 00d9 | | Load_Top At_Offset_1
0fa0 e418 | | Load 0x2,0x18
0fa1 01d6 | | Execute Vector,Field_Write
0fa2 3ffb |? | Loop_Increasing 0xf9e
0fa3 e001 | | Load 0x0,0x1
0fa4 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0fa5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0fa6 01c3 | | Execute Vector,Check_In_Type
0fa7 e5ff | | Load 0x2,-0x1
0fa8 4801 |H | Short_Literal 0x1
0fa9 e402 | | Load 0x2,0x2
0faa e403 | | Load 0x2,0x3
0fab 01cf | | Execute Vector,Slice_Read
0fac e001 | | Load 0x0,0x1
0fad 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0fae 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0faf c5fd | | Store 0x2,-0x3
0fb0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0fb1 e002 | | Load 0x0,0x2
0fb2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fb3 4801 |H | Short_Literal 0x1
0fb4 4802 |H | Short_Literal 0x2
0fb5 e005 | | Load 0x0,0x5
0fb6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0fb7 0334 | 4 | Declare_Variable Array,With_Constraint
0fb8 e5ff | | Load 0x2,-0x1
0fb9 8210 | | Call 0x1,0x10
0fba 4801 |H | Short_Literal 0x1
0fbb 00da | | Load_Top At_Offset_2
0fbc 01d6 | | Execute Vector,Field_Write
0fbd e405 | | Load 0x2,0x5
0fbe 825e | ^ | Call 0x1,0x5e
0fbf 4802 |H | Short_Literal 0x2
0fc0 00da | | Load_Top At_Offset_2
0fc1 01d6 | | Execute Vector,Field_Write
0fc2 601d |` | Indirect_Literal Discrete,0xfe0,{0x00000000, 0x00002008}
0fc3 e002 | | Load 0x0,0x2
0fc4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0fc5 c5fd | | Store 0x2,-0x3
0fc6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0fc7 TRAP_0ed0:
0fc7 4885 |H | Short_Literal 0x85
0fc8 010f | | Execute Exception,Equal
0fc9 6811 |h | Jump_Zero 0xfdb
0fca e002 | | Load 0x0,0x2
0fcb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fcc 4801 |H | Short_Literal 0x1
0fcd 4801 |H | Short_Literal 0x1
0fce e005 | | Load 0x0,0x5
0fcf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0fd0 0334 | 4 | Declare_Variable Array,With_Constraint
0fd1 e5ff | | Load 0x2,-0x1
0fd2 8210 | | Call 0x1,0x10
0fd3 4801 |H | Short_Literal 0x1
0fd4 00da | | Load_Top At_Offset_2
0fd5 01d6 | | Execute Vector,Field_Write
0fd6 6005 |` | Indirect_Literal Discrete,0xfdc,{0x00000000, 0x0000200e}
0fd7 e002 | | Load 0x0,0x2
0fd8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0fd9 c5fd | | Store 0x2,-0x3
0fda 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0fdb 0100 | | Execute Exception,Raise
0fdc 0000 0000 | | .LITERAL {0x00000000, 0x0000200e}
0fe0 0000 0000 | | .LITERAL {0x00000000, 0x00002008}
0fe4 0000 0000 | | .BLANK 0000[0x4]
0fe8 ; --------------------------------------------------------------------------------------
0fe8 ; SUBPROGRAM
0fe8 ; --------------------------------------------------------------------------------------
0fe8 0ff0 | | .CONST 0x0ff0 ; Address of begin
0fe9 0004 | | .CONST 0x0004 ; Address of exception handler
0fea 0003 | | .CONST 0x0003 ; Number of locals
0feb INIT_0fe8:
0feb e003 | | Load 0x0,0x3
0fec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fed e003 | | Load 0x0,0x3
0fee 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0fef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ff0 BODY_0fe8:
0ff0 e5ff | | Load 0x2,-0x1
0ff1 7002 |p | Jump_Nonzero 0xff4
0ff2 4800 |H | Short_Literal 0x0
0ff3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ff4 e003 | | Load 0x0,0x3
0ff5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ff6 e003 | | Load 0x0,0x3
0ff7 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0ff8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ff9 6012 |` | Indirect_Literal Discrete,0x100c,{0x00000000, 0x00004000}
0ffa e013 | | Load 0x0,0x13
0ffb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ffc 4800 |H | Short_Literal 0x0
0ffd e5ff | | Load 0x2,-0x1
0ffe 0217 | | Execute Heap_Access,All_Reference
0fff 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
1000 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
1001 e003 | | Load 0x0,0x3
1002 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
1003 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1004 e003 | | Load 0x0,0x3
1005 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
1006 180f | | Execute Package,Field_Execute,Field_Number 0xf
1007 005a | Z | Store_Top Discrete,At_Offset_2
1008 005a | Z | Store_Top Discrete,At_Offset_2
1009 00d8 | | Load_Top At_Offset_0
100a 0c03 | | Execute_Immediate Greater_Equal,0x3
100b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
100c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
1010 ; --------------------------------------------------------------------------------------
1010 ; SUBPROGRAM
1010 ; --------------------------------------------------------------------------------------
1010 1017 | | .CONST 0x1017 ; Address of begin
1011 0004 | | .CONST 0x0004 ; Address of exception handler
1012 0003 | | .CONST 0x0003 ; Number of locals
1013 INIT_1010:
1013 e00d | | Load 0x0,0xd
1014 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
1015 029f 1333 | 3| Declare_Subprogram INIT_1330,For_Call
1017 BODY_1010:
1017 e5ff | | Load 0x2,-0x1
1018 7003 |p | Jump_Nonzero 0x101c
1019 6022 |`" | Indirect_Literal Discrete,0x103c,{0x00000000, 0x00002009}
101a a5fb | | Store_Unchecked 0x2,-0x5
101b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
101c e5ff | | Load 0x2,-0x1
101d 0217 | | Execute Heap_Access,All_Reference
101e 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
101f 0032 | 2 | Store_Top Heap_Access,At_Offset_2
1020 00cf | | Action Mark_Auxiliary
1021 780e |x | Jump 0x1030
1022 00da | | Load_Top At_Offset_2
1023 0217 | | Execute Heap_Access,All_Reference
1024 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1025 e5fe | | Load 0x2,-0x2
1026 027f | | Execute Discrete,Equal
1027 6803 |h | Jump_Zero 0x102b
1028 00da | | Load_Top At_Offset_2
1029 a5fc | | Store_Unchecked 0x2,-0x4
102a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
102b 00da | | Load_Top At_Offset_2
102c 0217 | | Execute Heap_Access,All_Reference
102d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
102e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
102f 00c9 | | Action Pop_Auxiliary_Loop
1030 00da | | Load_Top At_Offset_2
1031 77f0 |w | Jump_Nonzero 0x1022
1032 00ce | | Action Pop_Auxiliary
1033 e5fd | | Load 0x2,-0x3
1034 6802 |h | Jump_Zero 0x1037
1035 8403 | | Call 0x2,0x3
1036 7802 |x | Jump 0x1039
1037 6004 |` | Indirect_Literal Discrete,0x103c,{0x00000000, 0x00002009}
1038 a5fb | | Store_Unchecked 0x2,-0x5
1039 00d9 | | Load_Top At_Offset_1
103a a5fc | | Store_Unchecked 0x2,-0x4
103b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
103c 0000 0000 | | .LITERAL {0x00000000, 0x00002009}
1040 ; --------------------------------------------------------------------------------------
1040 ; SUBPROGRAM
1040 ; --------------------------------------------------------------------------------------
1040 1053 | S | .CONST 0x1053 ; Address of begin
1041 0004 | | .CONST 0x0004 ; Address of exception handler
1042 0004 | | .CONST 0x0004 ; Number of locals
1043 INIT_1040:
1043 e5ff | | Load 0x2,-0x1
1044 825f | _ | Call 0x1,0x5f
1045 00d8 | | Load_Top At_Offset_0
1046 e001 | | Load 0x0,0x1
1047 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1048 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1049 e5ff | | Load 0x2,-0x1
104a 0217 | | Execute Heap_Access,All_Reference
104b 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
104c e010 | | Load 0x0,0x10
104d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
104e 01cc | | Execute Vector,Catenate
104f 0007 | | Action Break_Optional
1050 e003 | | Load 0x0,0x3
1051 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1052 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1053 BODY_1040:
1053 e003 | | Load 0x0,0x3
1054 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1055 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1056 e402 | | Load 0x2,0x2
1057 0120 | | Execute Any,Is_Value
1058 6803 |h | Jump_Zero 0x105c
1059 e003 | | Load 0x0,0x3
105a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
105b 7801 |x | Jump 0x105d
105c e402 | | Load 0x2,0x2
105d 604a |`J | Indirect_Literal Discrete,0x10a8,{0x00000000, 0x00004000}
105e e013 | | Load 0x0,0x13
105f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1060 e028 | ( | Load 0x0,0x28
1061 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1062 e003 | | Load 0x0,0x3
1063 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1064 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1065 e603 | | Load 0x3,0x3
1066 e003 | | Load 0x0,0x3
1067 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1068 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1069 c402 | | Store 0x2,0x2
106a 0059 | Y | Store_Top Discrete,At_Offset_1
106b 00d8 | | Load_Top At_Offset_0
106c 460e |F | Jump_Case 0xf
106d 7821 |x! | Jump 0x108f ; case 0x0
106e 780d |x | Jump 0x107c ; case 0x1
106f 780c |x | Jump 0x107c ; case 0x2
1070 782b |x+ | Jump 0x109c ; case 0x3
1071 780a |x | Jump 0x107c ; case 0x4
1072 7809 |x | Jump 0x107c ; case 0x5
1073 7808 |x | Jump 0x107c ; case 0x6
1074 7807 |x | Jump 0x107c ; case 0x7
1075 7806 |x | Jump 0x107c ; case 0x8
1076 7805 |x | Jump 0x107c ; case 0x9
1077 7804 |x | Jump 0x107c ; case 0xa
1078 7803 |x | Jump 0x107c ; case 0xb
1079 7802 |x | Jump 0x107c ; case 0xc
107a 7801 |x | Jump 0x107c ; case 0xd
107b 7800 |x | Jump 0x107c ; case 0xe
107c e002 | | Load 0x0,0x2
107d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
107e 4801 |H | Short_Literal 0x1
107f 4801 |H | Short_Literal 0x1
1080 e005 | | Load 0x0,0x5
1081 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1082 0334 | 4 | Declare_Variable Array,With_Constraint
1083 00db | | Load_Top At_Offset_3
1084 00db | | Load_Top At_Offset_3
1085 e005 | | Load 0x0,0x5
1086 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1087 4801 |H | Short_Literal 0x1
1088 00da | | Load_Top At_Offset_2
1089 01d6 | | Execute Vector,Field_Write
108a 6019 |` | Indirect_Literal Discrete,0x10a4,{0x00000000, 0x00002002}
108b e002 | | Load 0x0,0x2
108c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
108d c5fd | | Store 0x2,-0x3
108e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
108f 0092 1551 | Q| Action Push_String_Extended,0x1551 ; "Created directory object for \x22"
1091 00da | | Load_Top At_Offset_2
1092 01cc | | Execute Vector,Catenate
1093 0092 1552 | R| Action Push_String_Extended,0x1552 ; "\x22."
1095 01cc | | Execute Vector,Catenate
1096 8011 | | Call 0x0,0x11
1097 4801 |H | Short_Literal 0x1
1098 e5ff | | Load 0x2,-0x1
1099 0217 | | Execute Heap_Access,All_Reference
109a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
109b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
109c 4800 |H | Short_Literal 0x0
109d e5ff | | Load 0x2,-0x1
109e 0217 | | Execute Heap_Access,All_Reference
109f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
10a0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
10a1 0000 0000 | | .XXX[0x3]
10a3 0000 | |
10a4 0000 0000 | | .LITERAL {0x00000000, 0x00002002}
10a8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
10ac 0000 0000 | | .BLANK 0000[0x4]
10b0 ; --------------------------------------------------------------------------------------
10b0 ; SUBPROGRAM
10b0 ; --------------------------------------------------------------------------------------
10b0 10b9 | | .CONST 0x10b9 ; Address of begin
10b1 0004 | | .CONST 0x0004 ; Address of exception handler
10b2 0004 | | .CONST 0x0004 ; Number of locals
10b3 INIT_10b0:
10b3 e5fe | | Load 0x2,-0x2
10b4 e015 | | Load 0x0,0x15
10b5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
10b6 e00d | | Load 0x0,0xd
10b7 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
10b8 00e1 | | Load_Encached Boolean_Cache
10b9 BODY_10b0:
10b9 00cf | | Action Mark_Auxiliary
10ba 00db | | Load_Top At_Offset_3
10bb 01d9 | | Execute Vector,Reverse_Bounds
10bc 0263 | c | Execute Discrete,Above_Bound
10bd 708d |p | Jump_Nonzero 0x114b
10be e407 | | Load 0x2,0x7
10bf e00d | | Load 0x0,0xd
10c0 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
10c1 a404 | | Store_Unchecked 0x2,0x4
10c2 00d8 | | Load_Top At_Offset_0
10c3 e602 | | Load 0x3,0x2
10c4 01d7 | | Execute Vector,Field_Read
10c5 a402 | | Store_Unchecked 0x2,0x2
10c6 e402 | | Load 0x2,0x2
10c7 e015 | | Load 0x0,0x15
10c8 1820 | | Execute Package,Field_Execute,Field_Number 0x20
10c9 7024 |p$ | Jump_Nonzero 0x10ee
10ca e002 | | Load 0x0,0x2
10cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10cc 4801 |H | Short_Literal 0x1
10cd 4804 |H | Short_Literal 0x4
10ce e005 | | Load 0x0,0x5
10cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10d0 0334 | 4 | Declare_Variable Array,With_Constraint
10d1 00da | | Load_Top At_Offset_2
10d2 e005 | | Load 0x0,0x5
10d3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
10d4 4801 |H | Short_Literal 0x1
10d5 00da | | Load_Top At_Offset_2
10d6 01d6 | | Execute Vector,Field_Write
10d7 e402 | | Load 0x2,0x2
10d8 e015 | | Load 0x0,0x15
10d9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
10da 4802 |H | Short_Literal 0x2
10db 00da | | Load_Top At_Offset_2
10dc 01d6 | | Execute Vector,Field_Write
10dd e5ff | | Load 0x2,-0x1
10de 8210 | | Call 0x1,0x10
10df 4803 |H | Short_Literal 0x3
10e0 00da | | Load_Top At_Offset_2
10e1 01d6 | | Execute Vector,Field_Write
10e2 e5fd | | Load 0x2,-0x3
10e3 e014 | | Load 0x0,0x14
10e4 181c | | Execute Package,Field_Execute,Field_Number 0x1c
10e5 4804 |H | Short_Literal 0x4
10e6 00da | | Load_Top At_Offset_2
10e7 01d6 | | Execute Vector,Field_Write
10e8 6067 |`g | Indirect_Literal Discrete,0x1150,{0x00000000, 0x0000200b}
10e9 e002 | | Load 0x0,0x2
10ea 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
10eb c5fc | | Store 0x2,-0x4
10ec 00cc | | Action Pop_Block
10ed 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10ee e402 | | Load 0x2,0x2
10ef e015 | | Load 0x0,0x15
10f0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
10f1 e404 | | Load 0x2,0x4
10f2 0217 | | Execute Heap_Access,All_Reference
10f3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
10f4 e402 | | Load 0x2,0x2
10f5 e015 | | Load 0x0,0x15
10f6 181c | | Execute Package,Field_Execute,Field_Number 0x1c
10f7 e404 | | Load 0x2,0x4
10f8 0217 | | Execute Heap_Access,All_Reference
10f9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
10fa e404 | | Load 0x2,0x4
10fb 0219 | | Execute Heap_Access,All_Read
10fc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
10fd 00e1 | | Load_Encached Boolean_Cache
10fe 00d9 | | Load_Top At_Offset_1
10ff e5ff | | Load 0x2,-0x1
1100 e006 | | Load 0x0,0x6
1101 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1102 e402 | | Load 0x2,0x2
1103 e015 | | Load 0x0,0x15
1104 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1105 e005 | | Load 0x0,0x5
1106 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
1107 00d1 | | Pop_Control Pop_Count_1
1108 c604 | | Store 0x3,0x4
1109 00d1 | | Pop_Control Pop_Count_1
110a 00db | | Load_Top At_Offset_3
110b 6819 |h | Jump_Zero 0x1125
110c e403 | | Load 0x2,0x3
110d 0217 | | Execute Heap_Access,All_Reference
110e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
110f 7009 |p | Jump_Nonzero 0x1119
1110 e404 | | Load 0x2,0x4
1111 e403 | | Load 0x2,0x3
1112 0217 | | Execute Heap_Access,All_Reference
1113 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1114 4801 |H | Short_Literal 0x1
1115 e403 | | Load 0x2,0x3
1116 0217 | | Execute Heap_Access,All_Reference
1117 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
1118 782e |x. | Jump 0x1147
1119 e404 | | Load 0x2,0x4
111a e603 | | Load 0x3,0x3
111b 0217 | | Execute Heap_Access,All_Reference
111c 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
111d e403 | | Load 0x2,0x3
111e 0217 | | Execute Heap_Access,All_Reference
111f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1120 0a01 | | Execute_Immediate Plus,0x1
1121 e403 | | Load 0x2,0x3
1122 0217 | | Execute Heap_Access,All_Reference
1123 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
1124 7822 |x" | Jump 0x1147
1125 e002 | | Load 0x0,0x2
1126 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1127 4801 |H | Short_Literal 0x1
1128 4804 |H | Short_Literal 0x4
1129 e005 | | Load 0x0,0x5
112a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
112b 0334 | 4 | Declare_Variable Array,With_Constraint
112c 00da | | Load_Top At_Offset_2
112d e005 | | Load 0x0,0x5
112e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
112f 4801 |H | Short_Literal 0x1
1130 00da | | Load_Top At_Offset_2
1131 01d6 | | Execute Vector,Field_Write
1132 e402 | | Load 0x2,0x2
1133 e015 | | Load 0x0,0x15
1134 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1135 4802 |H | Short_Literal 0x2
1136 00da | | Load_Top At_Offset_2
1137 01d6 | | Execute Vector,Field_Write
1138 e5ff | | Load 0x2,-0x1
1139 8210 | | Call 0x1,0x10
113a 4803 |H | Short_Literal 0x3
113b 00da | | Load_Top At_Offset_2
113c 01d6 | | Execute Vector,Field_Write
113d e5fd | | Load 0x2,-0x3
113e e014 | | Load 0x0,0x14
113f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1140 4804 |H | Short_Literal 0x4
1141 00da | | Load_Top At_Offset_2
1142 01d6 | | Execute Vector,Field_Write
1143 6008 |` | Indirect_Literal Discrete,0x114c,{0x00000000, 0x0000200d}
1144 e002 | | Load 0x0,0x2
1145 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1146 c5fc | | Store 0x2,-0x4
1147 e404 | | Load 0x2,0x4
1148 a603 | | Store_Unchecked 0x3,0x3
1149 00c8 | | Action Pop_Auxiliary_Range
114a 3f73 |?s | Loop_Increasing 0x10be
114b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
114c 0000 0000 | | .LITERAL {0x00000000, 0x0000200d}
1150 0000 0000 | | .LITERAL {0x00000000, 0x0000200b}
1154 0000 0000 | | .BLANK 0000[0x4]
1158 ; --------------------------------------------------------------------------------------
1158 ; SUBPROGRAM
1158 ; --------------------------------------------------------------------------------------
1158 1174 | t | .CONST 0x1174 ; Address of begin
1159 0004 | | .CONST 0x0004 ; Address of exception handler
115a 0007 | | .CONST 0x0007 ; Number of locals
115b INIT_1158:
115b e003 | | Load 0x0,0x3
115c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
115d 02c7 | | Declare_Variable Any
115e 00d8 | | Load_Top At_Offset_0
115f 1c00 | | Execute_Immediate Run_Utility,0x0
1160 e003 | | Load 0x0,0x3
1161 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1162 02c7 | | Declare_Variable Any
1163 00d8 | | Load_Top At_Offset_0
1164 1c00 | | Execute_Immediate Run_Utility,0x0
1165 e003 | | Load 0x0,0x3
1166 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1167 02c7 | | Declare_Variable Any
1168 00d8 | | Load_Top At_Offset_0
1169 1c00 | | Execute_Immediate Run_Utility,0x0
116a e003 | | Load 0x0,0x3
116b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
116c 02c7 | | Declare_Variable Any
116d 00d8 | | Load_Top At_Offset_0
116e 1c00 | | Execute_Immediate Run_Utility,0x0
116f e003 | | Load 0x0,0x3
1170 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1171 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1172 029f 138b | | Declare_Subprogram INIT_1388,For_Call
1174 BODY_1158:
1174 e003 | | Load 0x0,0x3
1175 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1176 00db | | Load_Top At_Offset_3
1177 0120 | | Execute Any,Is_Value
1178 6803 |h | Jump_Zero 0x117c
1179 e003 | | Load 0x0,0x3
117a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
117b 7801 |x | Jump 0x117d
117c 00db | | Load_Top At_Offset_3
117d e404 | | Load 0x2,0x4
117e e003 | | Load 0x0,0x3
117f 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
1180 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1181 c605 | | Store 0x3,0x5
1182 c405 | | Store 0x2,0x5
1183 e405 | | Load 0x2,0x5
1184 6824 |h$ | Jump_Zero 0x11a9
1185 4801 |H | Short_Literal 0x1
1186 4804 |H | Short_Literal 0x4
1187 e005 | | Load 0x0,0x5
1188 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1189 0334 | 4 | Declare_Variable Array,With_Constraint
118a e402 | | Load 0x2,0x2
118b e005 | | Load 0x0,0x5
118c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
118d 4801 |H | Short_Literal 0x1
118e 00da | | Load_Top At_Offset_2
118f 01d6 | | Execute Vector,Field_Write
1190 e404 | | Load 0x2,0x4
1191 e005 | | Load 0x0,0x5
1192 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1193 4802 |H | Short_Literal 0x2
1194 00da | | Load_Top At_Offset_2
1195 01d6 | | Execute Vector,Field_Write
1196 e602 | | Load 0x3,0x2
1197 e005 | | Load 0x0,0x5
1198 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1199 4803 |H | Short_Literal 0x3
119a 00da | | Load_Top At_Offset_2
119b 01d6 | | Execute Vector,Field_Write
119c e405 | | Load 0x2,0x5
119d e003 | | Load 0x0,0x3
119e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
119f 011c | | Execute Any,Convert_Unchecked
11a0 1c01 | | Execute_Immediate Run_Utility,0x1
11a1 e005 | | Load 0x0,0x5
11a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11a3 4804 |H | Short_Literal 0x4
11a4 00da | | Load_Top At_Offset_2
11a5 01d6 | | Execute Vector,Field_Write
11a6 6025 |`% | Indirect_Literal Discrete,0x11cc,{0x00000000, 0x0000200a}
11a7 e002 | | Load 0x0,0x2
11a8 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
11a9 00cf | | Action Mark_Auxiliary
11aa e5fe | | Load 0x2,-0x2
11ab 01dc | | Execute Vector,Last
11ac e5fe | | Load 0x2,-0x2
11ad 01dd | | Execute Vector,First
11ae 0263 | c | Execute Discrete,Above_Bound
11af 7010 |p | Jump_Nonzero 0x11c0
11b0 e605 | | Load 0x3,0x5
11b1 00d9 | | Load_Top At_Offset_1
11b2 e5fe | | Load 0x2,-0x2
11b3 01d5 | | Execute Vector,Field_Reference
11b4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
11b5 012f | / | Execute Any,Equal
11b6 6807 |h | Jump_Zero 0x11be
11b7 00d8 | | Load_Top At_Offset_0
11b8 e5fe | | Load 0x2,-0x2
11b9 01d5 | | Execute Vector,Field_Reference
11ba 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
11bb c602 | | Store 0x3,0x2
11bc 00d2 | | Pop_Control Pop_Count_2
11bd 7802 |x | Jump 0x11c0
11be 00c8 | | Action Pop_Auxiliary_Range
11bf 3ff0 |? | Loop_Increasing 0x11b0
11c0 00ce | | Action Pop_Auxiliary
11c1 e602 | | Load 0x3,0x2
11c2 e003 | | Load 0x0,0x3
11c3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
11c4 7002 |p | Jump_Nonzero 0x11c7
11c5 8607 | | Call 0x3,0x7
11c6 7802 |x | Jump 0x11c9
11c7 00ec | | Load_Encached Diana_Tree_Cache
11c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
11c9 0831 | 1 | Execute_Immediate Raise,0x31
11ca 0000 0000 | | .XXX[0x2]
11cc 0000 0000 | | .LITERAL {0x00000000, 0x0000200a}
11d0 ; --------------------------------------------------------------------------------------
11d0 ; SUBPROGRAM
11d0 ; --------------------------------------------------------------------------------------
11d0 11d5 | | .CONST 0x11d5 ; Address of begin
11d1 0004 | | .CONST 0x0004 ; Address of exception handler
11d2 0002 | | .CONST 0x0002 ; Number of locals
11d3 INIT_11d0:
11d3 e20d | | Load 0x1,0xd
11d4 0007 | | Action Break_Optional
11d5 BODY_11d0:
11d5 e5ff | | Load 0x2,-0x1
11d6 0217 | | Execute Heap_Access,All_Reference
11d7 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
11d8 7092 |p | Jump_Nonzero 0x126b
11d9 e5ff | | Load 0x2,-0x1
11da 0217 | | Execute Heap_Access,All_Reference
11db 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
11dc e001 | | Load 0x0,0x1
11dd 1b10 | | Execute Package,Field_Read,Field_Number 0x10
11de 0216 | | Execute Heap_Access,Convert
11df a407 | | Store_Unchecked 0x2,0x7
11e0 e5ff | | Load 0x2,-0x1
11e1 0031 | 1 | Store_Top Heap_Access,At_Offset_1
11e2 00cf | | Action Mark_Auxiliary
11e3 783c |x< | Jump 0x1220
11e4 e027 | ' | Load 0x0,0x27
11e5 680b |h | Jump_Zero 0x11f1
11e6 0092 1553 | S| Action Push_String_Extended,0x1553 ; "Structural_Suppliers (Parent) "
11e8 e407 | | Load 0x2,0x7
11e9 0217 | | Execute Heap_Access,All_Reference
11ea 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
11eb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
11ec e003 | | Load 0x0,0x3
11ed 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
11ee 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
11ef 01cc | | Execute Vector,Catenate
11f0 8011 | | Call 0x0,0x11
11f1 e402 | | Load 0x2,0x2
11f2 0a01 | | Execute_Immediate Plus,0x1
11f3 c402 | | Store 0x2,0x2
11f4 e407 | | Load 0x2,0x7
11f5 0217 | | Execute Heap_Access,All_Reference
11f6 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
11f7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
11f8 e402 | | Load 0x2,0x2
11f9 e403 | | Load 0x2,0x3
11fa 01d5 | | Execute Vector,Field_Reference
11fb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
11fc e402 | | Load 0x2,0x2
11fd e403 | | Load 0x2,0x3
11fe 01d5 | | Execute Vector,Field_Reference
11ff 00d8 | | Load_Top At_Offset_0
1200 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1201 00d8 | | Load_Top At_Offset_0
1202 0335 | 5 | Declare_Variable Array,Duplicate
1203 00cd | | Action Spare6_Action
1204 4805 |H | Short_Literal 0x5
1205 4800 |H | Short_Literal 0x0
1206 4800 |H | Short_Literal 0x0
1207 00d9 | | Load_Top At_Offset_1
1208 e606 | | Load 0x3,0x6
1209 01d6 | | Execute Vector,Field_Write
120a 3ffb |? | Loop_Increasing 0x1206
120b 00cd | | Action Spare6_Action
120c 00d9 | | Load_Top At_Offset_1
120d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
120e 00d1 | | Pop_Control Pop_Count_1
120f 4801 |H | Short_Literal 0x1
1210 4801 |H | Short_Literal 0x1
1211 e402 | | Load 0x2,0x2
1212 e403 | | Load 0x2,0x3
1213 01d5 | | Execute Vector,Field_Reference
1214 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1215 01d6 | | Execute Vector,Field_Write
1216 e407 | | Load 0x2,0x7
1217 0032 | 2 | Store_Top Heap_Access,At_Offset_2
1218 e407 | | Load 0x2,0x7
1219 0217 | | Execute Heap_Access,All_Reference
121a 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
121b e001 | | Load 0x0,0x1
121c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
121d 0216 | | Execute Heap_Access,Convert
121e a407 | | Store_Unchecked 0x2,0x7
121f 00c9 | | Action Pop_Auxiliary_Loop
1220 e407 | | Load 0x2,0x7
1221 820f | | Call 0x1,0xf
1222 7004 |p | Jump_Nonzero 0x1227
1223 e407 | | Load 0x2,0x7
1224 0217 | | Execute Heap_Access,All_Reference
1225 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1226 6fbd |o | Jump_Zero 0x11e4
1227 00ce | | Action Pop_Auxiliary
1228 00d8 | | Load_Top At_Offset_0
1229 0217 | | Execute Heap_Access,All_Reference
122a 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
122b 683f |h? | Jump_Zero 0x126b
122c 00d8 | | Load_Top At_Offset_0
122d 0217 | | Execute Heap_Access,All_Reference
122e 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
122f e001 | | Load 0x0,0x1
1230 1b10 | | Execute Package,Field_Read,Field_Number 0x10
1231 0216 | | Execute Heap_Access,Convert
1232 e5ff | | Load 0x2,-0x1
1233 021e | | Execute Heap_Access,Maximum
1234 6836 |h6 | Jump_Zero 0x126b
1235 e027 | ' | Load 0x0,0x27
1236 680d |h | Jump_Zero 0x1244
1237 0092 1554 | T| Action Push_String_Extended,0x1554 ; "Structural_Suppliers (Other) "
1239 00d9 | | Load_Top At_Offset_1
123a 0217 | | Execute Heap_Access,All_Reference
123b 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
123c 0217 | | Execute Heap_Access,All_Reference
123d 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
123e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
123f e003 | | Load 0x0,0x3
1240 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1241 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
1242 01cc | | Execute Vector,Catenate
1243 8011 | | Call 0x0,0x11
1244 e402 | | Load 0x2,0x2
1245 0a01 | | Execute_Immediate Plus,0x1
1246 c402 | | Store 0x2,0x2
1247 00d8 | | Load_Top At_Offset_0
1248 0217 | | Execute Heap_Access,All_Reference
1249 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
124a 0217 | | Execute Heap_Access,All_Reference
124b 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
124c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
124d e402 | | Load 0x2,0x2
124e e403 | | Load 0x2,0x3
124f 01d5 | | Execute Vector,Field_Reference
1250 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
1251 e402 | | Load 0x2,0x2
1252 e403 | | Load 0x2,0x3
1253 01d5 | | Execute Vector,Field_Reference
1254 00d8 | | Load_Top At_Offset_0
1255 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1256 00d8 | | Load_Top At_Offset_0
1257 0335 | 5 | Declare_Variable Array,Duplicate
1258 00cd | | Action Spare6_Action
1259 4805 |H | Short_Literal 0x5
125a 4800 |H | Short_Literal 0x0
125b 4800 |H | Short_Literal 0x0
125c 00d9 | | Load_Top At_Offset_1
125d e605 | | Load 0x3,0x5
125e 01d6 | | Execute Vector,Field_Write
125f 3ffb |? | Loop_Increasing 0x125b
1260 00cd | | Action Spare6_Action
1261 00d9 | | Load_Top At_Offset_1
1262 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1263 00d1 | | Pop_Control Pop_Count_1
1264 4801 |H | Short_Literal 0x1
1265 4801 |H | Short_Literal 0x1
1266 e402 | | Load 0x2,0x2
1267 e403 | | Load 0x2,0x3
1268 01d5 | | Execute Vector,Field_Reference
1269 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
126a 01d6 | | Execute Vector,Field_Write
126b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
126c 0000 0000 | | .BLANK 0000[0x4]
1270 ; --------------------------------------------------------------------------------------
1270 ; SUBPROGRAM
1270 ; --------------------------------------------------------------------------------------
1270 1292 | | .CONST 0x1292 ; Address of begin
1271 0004 | | .CONST 0x0004 ; Address of exception handler
1272 0009 | | .CONST 0x0009 ; Number of locals
1273 INIT_1270:
1273 00ec | | Load_Encached Diana_Tree_Cache
1274 02c7 | | Declare_Variable Any
1275 00d8 | | Load_Top At_Offset_0
1276 1c00 | | Execute_Immediate Run_Utility,0x0
1277 e003 | | Load 0x0,0x3
1278 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1279 02c7 | | Declare_Variable Any
127a e003 | | Load 0x0,0x3
127b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
127c a603 | | Store_Unchecked 0x3,0x3
127d e003 | | Load 0x0,0x3
127e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
127f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1280 e003 | | Load 0x0,0x3
1281 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
1282 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1283 02c7 | | Declare_Variable Any
1284 00d8 | | Load_Top At_Offset_0
1285 1c00 | | Execute_Immediate Run_Utility,0x0
1286 e003 | | Load 0x0,0x3
1287 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
1288 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1289 02c7 | | Declare_Variable Any
128a 00d8 | | Load_Top At_Offset_0
128b 1c00 | | Execute_Immediate Run_Utility,0x0
128c e003 | | Load 0x0,0x3
128d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
128e 029f 1433 | 3| Declare_Subprogram INIT_1430,For_Call
1290 029f 145b | [| Declare_Subprogram INIT_1458,For_Call
1292 BODY_1270:
1292 e7fe | | Load 0x3,-0x2
1293 4605 |F | Jump_Case 0x6
1294 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x0
1295 7804 |x | Jump 0x129a ; case 0x1
1296 7803 |x | Jump 0x129a ; case 0x2
1297 7805 |x | Jump 0x129d ; case 0x3
1298 7804 |x | Jump 0x129d ; case 0x4
1299 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x5
129a e7ff | | Load 0x3,-0x1
129b c602 | | Store 0x3,0x2
129c 7804 |x | Jump 0x12a1
129d e5fe | | Load 0x2,-0x2
129e e7ff | | Load 0x3,-0x1
129f 8273 | s | Call 0x1,0x73
12a0 c602 | | Store 0x3,0x2
12a1 e602 | | Load 0x3,0x2
12a2 6816 |h | Jump_Zero 0x12b9
12a3 e003 | | Load 0x0,0x3
12a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12a5 e605 | | Load 0x3,0x5
12a6 0120 | | Execute Any,Is_Value
12a7 6804 |h | Jump_Zero 0x12ac
12a8 e003 | | Load 0x0,0x3
12a9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
12aa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
12ab 7801 |x | Jump 0x12ad
12ac e605 | | Load 0x3,0x5
12ad e602 | | Load 0x3,0x2
12ae e003 | | Load 0x0,0x3
12af 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
12b0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
12b1 c605 | | Store 0x3,0x5
12b2 005b | [ | Store_Top Discrete,At_Offset_3
12b3 e605 | | Load 0x3,0x5
12b4 e003 | | Load 0x0,0x3
12b5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
12b6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
12b7 c603 | | Store 0x3,0x3
12b8 7830 |x0 | Jump 0x12e9
12b9 e7fe | | Load 0x3,-0x2
12ba 0f03 | | Execute_Immediate Equal,0x3
12bb e7fe | | Load 0x3,-0x2
12bc 0f04 | | Execute_Immediate Equal,0x4
12bd 0278 | x | Execute Discrete,Or
12be 682a |h* | Jump_Zero 0x12e9
12bf e003 | | Load 0x0,0x3
12c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12c1 e605 | | Load 0x3,0x5
12c2 0120 | | Execute Any,Is_Value
12c3 6804 |h | Jump_Zero 0x12c8
12c4 e003 | | Load 0x0,0x3
12c5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
12c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
12c7 7801 |x | Jump 0x12c9
12c8 e605 | | Load 0x3,0x5
12c9 e7ff | | Load 0x3,-0x1
12ca e003 | | Load 0x0,0x3
12cb 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
12cc 181c | | Execute Package,Field_Execute,Field_Number 0x1c
12cd c605 | | Store 0x3,0x5
12ce 005b | [ | Store_Top Discrete,At_Offset_3
12cf e003 | | Load 0x0,0x3
12d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
12d1 e606 | | Load 0x3,0x6
12d2 0120 | | Execute Any,Is_Value
12d3 6804 |h | Jump_Zero 0x12d8
12d4 e003 | | Load 0x0,0x3
12d5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
12d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
12d7 7801 |x | Jump 0x12d9
12d8 e606 | | Load 0x3,0x6
12d9 6042 |`B | Indirect_Literal Discrete,0x131c,{0x00000000, 0x00004000}
12da e013 | | Load 0x0,0x13
12db 1b0e | | Execute Package,Field_Read,Field_Number 0xe
12dc e605 | | Load 0x3,0x5
12dd e003 | | Load 0x0,0x3
12de 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
12df 1814 | | Execute Package,Field_Execute,Field_Number 0x14
12e0 c606 | | Store 0x3,0x6
12e1 005b | [ | Store_Top Discrete,At_Offset_3
12e2 00db | | Load_Top At_Offset_3
12e3 e003 | | Load 0x0,0x3
12e4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
12e5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
12e6 c603 | | Store 0x3,0x3
12e7 00db | | Load_Top At_Offset_3
12e8 8609 | | Call 0x3,0x9
12e9 e603 | | Load 0x3,0x3
12ea e003 | | Load 0x0,0x3
12eb 1811 | | Execute Package,Field_Execute,Field_Number 0x11
12ec 702c |p, | Jump_Nonzero 0x1319
12ed e027 | ' | Load 0x0,0x27
12ee 6808 |h | Jump_Zero 0x12f7
12ef 0092 1555 | U| Action Push_String_Extended,0x1555 ; "Add_Supplier "
12f1 e603 | | Load 0x3,0x3
12f2 e003 | | Load 0x0,0x3
12f3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
12f4 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
12f5 01cc | | Execute Vector,Catenate
12f6 8011 | | Call 0x0,0x11
12f7 00cf | | Action Mark_Auxiliary
12f8 e402 | | Load 0x2,0x2
12f9 4801 |H | Short_Literal 0x1
12fa 0263 | c | Execute Discrete,Above_Bound
12fb 701a |p | Jump_Nonzero 0x1316
12fc 00d8 | | Load_Top At_Offset_0
12fd e403 | | Load 0x2,0x3
12fe 01d5 | | Execute Vector,Field_Reference
12ff 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1300 e603 | | Load 0x3,0x3
1301 012f | / | Execute Any,Equal
1302 6811 |h | Jump_Zero 0x1314
1303 e027 | ' | Load 0x0,0x27
1304 6807 |h | Jump_Zero 0x130c
1305 0092 1556 | V| Action Push_String_Extended,0x1556 ; "Changing Kinds for object"
1307 00d9 | | Load_Top At_Offset_1
1308 00e0 | | Load_Encached Standard_Cache
1309 1818 | | Execute Package,Field_Execute,Field_Number 0x18
130a 01cc | | Execute Vector,Catenate
130b 8011 | | Call 0x0,0x11
130c 4801 |H | Short_Literal 0x1
130d e7fe | | Load 0x3,-0x2
130e 00da | | Load_Top At_Offset_2
130f e403 | | Load 0x2,0x3
1310 01d5 | | Execute Vector,Field_Reference
1311 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1312 01d6 | | Execute Vector,Field_Write
1313 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1314 00c8 | | Action Pop_Auxiliary_Range
1315 3fe6 |? | Loop_Increasing 0x12fc
1316 00ce | | Action Pop_Auxiliary
1317 e603 | | Load 0x3,0x3
1318 8608 | | Call 0x3,0x8
1319 4504 |E | Exit_Suprogram New_Top_Offset 0x4
131a 0000 0000 | | .XXX[0x2]
131c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
1320 ; --------------------------------------------------------------------------------------
1320 ; SUBPROGRAM
1320 ; --------------------------------------------------------------------------------------
1320 1323 | # | .CONST 0x1323 ; Address of begin
1321 0004 | | .CONST 0x0004 ; Address of exception handler
1322 0001 | | .CONST 0x0001 ; Number of locals
1323 BODY_1320:
1323 INIT_1320:
1323 00da | | Load_Top At_Offset_2
1324 0145 | E | Execute Heap_Access,Diana_Tree_Kind
1325 0f41 | A | Execute_Immediate Equal,0x41
1326 6802 |h | Jump_Zero 0x1329
1327 4801 |H | Short_Literal 0x1
1328 a7fe | | Store_Unchecked 0x3,-0x2
1329 4502 |E | Exit_Suprogram New_Top_Offset 0x2
132a 0000 0000 | | .BLANK 0000[0x6]
1330 ; --------------------------------------------------------------------------------------
1330 ; SUBPROGRAM
1330 ; --------------------------------------------------------------------------------------
1330 1337 | 7 | .CONST 0x1337 ; Address of begin
1331 0004 | | .CONST 0x0004 ; Address of exception handler
1332 0002 | | .CONST 0x0002 ; Number of locals
1333 INIT_1330:
1333 e5ff | | Load 0x2,-0x1
1334 e001 | | Load 0x0,0x1
1335 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1336 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
1337 BODY_1330:
1337 0092 1557 | W| Action Push_String_Extended,0x1557 ; "Creating Machine_Data record."
1339 8011 | | Call 0x0,0x11
133a e5ff | | Load 0x2,-0x1
133b e00d | | Load 0x0,0xd
133c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
133d a402 | | Store_Unchecked 0x2,0x2
133e e5fe | | Load 0x2,-0x2
133f e402 | | Load 0x2,0x2
1340 0217 | | Execute Heap_Access,All_Reference
1341 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1342 e5ff | | Load 0x2,-0x1
1343 0217 | | Execute Heap_Access,All_Reference
1344 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b
1345 e402 | | Load 0x2,0x2
1346 0217 | | Execute Heap_Access,All_Reference
1347 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
1348 4800 |H | Short_Literal 0x0
1349 e402 | | Load 0x2,0x2
134a 0217 | | Execute Heap_Access,All_Reference
134b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
134c 4800 |H | Short_Literal 0x0
134d e402 | | Load 0x2,0x2
134e 0217 | | Execute Heap_Access,All_Reference
134f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
1350 4801 |H | Short_Literal 0x1
1351 e402 | | Load 0x2,0x2
1352 0217 | | Execute Heap_Access,All_Reference
1353 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1354 00d8 | | Load_Top At_Offset_0
1355 e001 | | Load 0x0,0x1
1356 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1357 1886 | | Execute Package,Field_Execute,Field_Number 0x86
1358 7016 |p | Jump_Nonzero 0x136f
1359 e5fe | | Load 0x2,-0x2
135a 00d9 | | Load_Top At_Offset_1
135b e001 | | Load 0x0,0x1
135c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
135d 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
135e 6810 |h | Jump_Zero 0x136f
135f e402 | | Load 0x2,0x2
1360 0219 | | Execute Heap_Access,All_Read
1361 00d8 | | Load_Top At_Offset_0
1362 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1363 00da | | Load_Top At_Offset_2
1364 e5fe | | Load 0x2,-0x2
1365 e602 | | Load 0x3,0x2
1366 e001 | | Load 0x0,0x1
1367 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1368 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
1369 e016 | | Load 0x0,0x16
136a 180e | | Execute Package,Field_Execute,Field_Number 0xe
136b 00d9 | | Load_Top At_Offset_1
136c 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
136d 00d1 | | Pop_Control Pop_Count_1
136e 7805 |x | Jump 0x1374
136f e00d | | Load 0x0,0xd
1370 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
1371 e402 | | Load 0x2,0x2
1372 0217 | | Execute Heap_Access,All_Reference
1373 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1374 4800 |H | Short_Literal 0x0
1375 e402 | | Load 0x2,0x2
1376 0217 | | Execute Heap_Access,All_Reference
1377 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
1378 e004 | | Load 0x0,0x4
1379 180f | | Execute Package,Field_Execute,Field_Number 0xf
137a e402 | | Load 0x2,0x2
137b 0217 | | Execute Heap_Access,All_Reference
137c 380a |8 | Execute Record,Field_Write,Field_Number 0xa
137d e004 | | Load 0x0,0x4
137e 180f | | Execute Package,Field_Execute,Field_Number 0xf
137f e402 | | Load 0x2,0x2
1380 0217 | | Execute Heap_Access,All_Reference
1381 380b |8 | Execute Record,Field_Write,Field_Number 0xb
1382 e402 | | Load 0x2,0x2
1383 e5ff | | Load 0x2,-0x1
1384 0217 | | Execute Heap_Access,All_Reference
1385 381b |8 | Execute Record,Field_Write,Field_Number 0x1b
1386 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1387 0000 | | .XXX[0x1]
1388 ; --------------------------------------------------------------------------------------
1388 ; SUBPROGRAM
1388 ; --------------------------------------------------------------------------------------
1388 13a8 | | .CONST 0x13a8 ; Address of begin
1389 0004 | | .CONST 0x0004 ; Address of exception handler
138a 0005 | | .CONST 0x0005 ; Number of locals
138b INIT_1388:
138b e404 | | Load 0x2,0x4
138c e003 | | Load 0x0,0x3
138d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
138e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
138f e602 | | Load 0x3,0x2
1390 e003 | | Load 0x0,0x3
1391 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1392 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1393 e402 | | Load 0x2,0x2
1394 e003 | | Load 0x0,0x3
1395 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1396 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1397 00d9 | | Load_Top At_Offset_1
1398 00d9 | | Load_Top At_Offset_1
1399 01dd | | Execute Vector,First
139a e802 | | Load 0x4,0x2
139b 01db | | Execute Vector,Length
139c 0273 | s | Execute Discrete,Plus
139d 00d8 | | Load_Top At_Offset_0
139e 00e2 | | Load_Encached Integer_Cache
139f 0260 | ` | Execute Discrete,In_Type
13a0 7001 |p | Jump_Nonzero 0x13a2
13a1 0801 | | Execute_Immediate Raise,0x1
13a2 00da | | Load_Top At_Offset_2
13a3 01dc | | Execute Vector,Last
13a4 00db | | Load_Top At_Offset_3
13a5 01cf | | Execute Vector,Slice_Read
13a6 01cc | | Execute Vector,Catenate
13a7 0007 | | Action Break_Optional
13a8 BODY_1388:
13a8 e003 | | Load 0x0,0x3
13a9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
13aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
13ab e603 | | Load 0x3,0x3
13ac 0120 | | Execute Any,Is_Value
13ad 6803 |h | Jump_Zero 0x13b1
13ae e003 | | Load 0x0,0x3
13af 1b0f | | Execute Package,Field_Read,Field_Number 0xf
13b0 7801 |x | Jump 0x13b2
13b1 e603 | | Load 0x3,0x3
13b2 6075 |`u | Indirect_Literal Discrete,0x1428,{0x00000000, 0x00004000}
13b3 e013 | | Load 0x0,0x13
13b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
13b5 e028 | ( | Load 0x0,0x28
13b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
13b7 e003 | | Load 0x0,0x3
13b8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
13b9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
13ba e805 | | Load 0x4,0x5
13bb e003 | | Load 0x0,0x3
13bc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
13bd 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
13be c603 | | Store 0x3,0x3
13bf c606 | | Store 0x3,0x6
13c0 e606 | | Load 0x3,0x6
13c1 6824 |h$ | Jump_Zero 0x13e6
13c2 4801 |H | Short_Literal 0x1
13c3 4804 |H | Short_Literal 0x4
13c4 e005 | | Load 0x0,0x5
13c5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
13c6 0334 | 4 | Declare_Variable Array,With_Constraint
13c7 00d9 | | Load_Top At_Offset_1
13c8 e005 | | Load 0x0,0x5
13c9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
13ca 4801 |H | Short_Literal 0x1
13cb 00da | | Load_Top At_Offset_2
13cc 01d6 | | Execute Vector,Field_Write
13cd e404 | | Load 0x2,0x4
13ce e005 | | Load 0x0,0x5
13cf 181a | | Execute Package,Field_Execute,Field_Number 0x1a
13d0 4802 |H | Short_Literal 0x2
13d1 00da | | Load_Top At_Offset_2
13d2 01d6 | | Execute Vector,Field_Write
13d3 e602 | | Load 0x3,0x2
13d4 e005 | | Load 0x0,0x5
13d5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
13d6 4803 |H | Short_Literal 0x3
13d7 00da | | Load_Top At_Offset_2
13d8 01d6 | | Execute Vector,Field_Write
13d9 e405 | | Load 0x2,0x5
13da e003 | | Load 0x0,0x3
13db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13dc 011c | | Execute Any,Convert_Unchecked
13dd 1c01 | | Execute_Immediate Run_Utility,0x1
13de e005 | | Load 0x0,0x5
13df 1810 | | Execute Package,Field_Execute,Field_Number 0x10
13e0 4804 |H | Short_Literal 0x4
13e1 00da | | Load_Top At_Offset_2
13e2 01d6 | | Execute Vector,Field_Write
13e3 6040 |`@ | Indirect_Literal Discrete,0x1424,{0x00000000, 0x0000200a}
13e4 e002 | | Load 0x0,0x2
13e5 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
13e6 e003 | | Load 0x0,0x3
13e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13e8 e604 | | Load 0x3,0x4
13e9 0120 | | Execute Any,Is_Value
13ea 6803 |h | Jump_Zero 0x13ee
13eb e003 | | Load 0x0,0x3
13ec 1b0e | | Execute Package,Field_Read,Field_Number 0xe
13ed 7801 |x | Jump 0x13ef
13ee e604 | | Load 0x3,0x4
13ef 6038 |`8 | Indirect_Literal Discrete,0x1428,{0x00000000, 0x00004000}
13f0 e013 | | Load 0x0,0x13
13f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
13f2 4800 |H | Short_Literal 0x0
13f3 e603 | | Load 0x3,0x3
13f4 e003 | | Load 0x0,0x3
13f5 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
13f6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
13f7 c604 | | Store 0x3,0x4
13f8 c405 | | Store 0x2,0x5
13f9 e405 | | Load 0x2,0x5
13fa 6824 |h$ | Jump_Zero 0x141f
13fb 4801 |H | Short_Literal 0x1
13fc 4804 |H | Short_Literal 0x4
13fd e005 | | Load 0x0,0x5
13fe 1b0f | | Execute Package,Field_Read,Field_Number 0xf
13ff 0334 | 4 | Declare_Variable Array,With_Constraint
1400 e603 | | Load 0x3,0x3
1401 e005 | | Load 0x0,0x5
1402 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1403 4801 |H | Short_Literal 0x1
1404 00da | | Load_Top At_Offset_2
1405 01d6 | | Execute Vector,Field_Write
1406 e404 | | Load 0x2,0x4
1407 e005 | | Load 0x0,0x5
1408 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1409 4802 |H | Short_Literal 0x2
140a 00da | | Load_Top At_Offset_2
140b 01d6 | | Execute Vector,Field_Write
140c e602 | | Load 0x3,0x2
140d e005 | | Load 0x0,0x5
140e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
140f 4803 |H | Short_Literal 0x3
1410 00da | | Load_Top At_Offset_2
1411 01d6 | | Execute Vector,Field_Write
1412 e405 | | Load 0x2,0x5
1413 e003 | | Load 0x0,0x3
1414 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1415 011c | | Execute Any,Convert_Unchecked
1416 1c01 | | Execute_Immediate Run_Utility,0x1
1417 e005 | | Load 0x0,0x5
1418 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1419 4804 |H | Short_Literal 0x4
141a 00da | | Load_Top At_Offset_2
141b 01d6 | | Execute Vector,Field_Write
141c 6007 |` | Indirect_Literal Discrete,0x1424,{0x00000000, 0x0000200a}
141d e002 | | Load 0x0,0x2
141e 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
141f e604 | | Load 0x3,0x4
1420 00cb | | Action Pop_Block_With_Result
1421 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1422 0000 0000 | | .XXX[0x2]
1424 0000 0000 | | .LITERAL {0x00000000, 0x0000200a}
1428 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
142c 0000 0000 | | .BLANK 0000[0x4]
1430 ; --------------------------------------------------------------------------------------
1430 ; SUBPROGRAM
1430 ; --------------------------------------------------------------------------------------
1430 1433 | 3 | .CONST 0x1433 ; Address of begin
1431 0004 | | .CONST 0x0004 ; Address of exception handler
1432 0001 | | .CONST 0x0001 ; Number of locals
1433 BODY_1430:
1433 INIT_1430:
1433 e402 | | Load 0x2,0x2
1434 0a01 | | Execute_Immediate Plus,0x1
1435 c402 | | Store 0x2,0x2
1436 00da | | Load_Top At_Offset_2
1437 e402 | | Load 0x2,0x2
1438 e403 | | Load 0x2,0x3
1439 01d5 | | Execute Vector,Field_Reference
143a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
143b e402 | | Load 0x2,0x2
143c e403 | | Load 0x2,0x3
143d 01d5 | | Execute Vector,Field_Reference
143e 00d8 | | Load_Top At_Offset_0
143f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1440 00d8 | | Load_Top At_Offset_0
1441 0335 | 5 | Declare_Variable Array,Duplicate
1442 00cd | | Action Spare6_Action
1443 4805 |H | Short_Literal 0x5
1444 4800 |H | Short_Literal 0x0
1445 4800 |H | Short_Literal 0x0
1446 00d9 | | Load_Top At_Offset_1
1447 e804 | | Load 0x4,0x4
1448 01d6 | | Execute Vector,Field_Write
1449 3ffb |? | Loop_Increasing 0x1445
144a 00cd | | Action Spare6_Action
144b 00d9 | | Load_Top At_Offset_1
144c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
144d 00d1 | | Pop_Control Pop_Count_1
144e 4801 |H | Short_Literal 0x1
144f e7fe | | Load 0x3,-0x2
1450 e402 | | Load 0x2,0x2
1451 e403 | | Load 0x2,0x3
1452 01d5 | | Execute Vector,Field_Reference
1453 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
1454 01d6 | | Execute Vector,Field_Write
1455 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1456 0000 0000 | | .XXX[0x2]
1458 ; --------------------------------------------------------------------------------------
1458 ; SUBPROGRAM
1458 ; --------------------------------------------------------------------------------------
1458 1465 | e | .CONST 0x1465 ; Address of begin
1459 0004 | | .CONST 0x0004 ; Address of exception handler
145a 0004 | | .CONST 0x0004 ; Number of locals
145b INIT_1458:
145b e003 | | Load 0x0,0x3
145c 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
145d 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
145e 02c7 | | Declare_Variable Any
145f 00d8 | | Load_Top At_Offset_0
1460 1c00 | | Execute_Immediate Run_Utility,0x0
1461 e003 | | Load 0x0,0x3
1462 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1463 029f 1483 | | Declare_Subprogram INIT_1480,For_Call
1465 BODY_1458:
1465 e003 | | Load 0x0,0x3
1466 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1467 00db | | Load_Top At_Offset_3
1468 0120 | | Execute Any,Is_Value
1469 6804 |h | Jump_Zero 0x146e
146a e003 | | Load 0x0,0x3
146b 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
146c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
146d 7801 |x | Jump 0x146f
146e 00db | | Load_Top At_Offset_3
146f 600c |` | Indirect_Literal Discrete,0x147c,{0x00000000, 0x00004000}
1470 e013 | | Load 0x0,0x13
1471 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1472 e9ff | | Load 0x4,-0x1
1473 e003 | | Load 0x0,0x3
1474 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
1475 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1476 c802 | | Store 0x4,0x2
1477 005a | Z | Store_Top Discrete,At_Offset_2
1478 00da | | Load_Top At_Offset_2
1479 8804 | | Call 0x4,0x4
147a c802 | | Store 0x4,0x2
147b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
147c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
1480 ; --------------------------------------------------------------------------------------
1480 ; SUBPROGRAM
1480 ; --------------------------------------------------------------------------------------
1480 148f | | .CONST 0x148f ; Address of begin
1481 0004 | | .CONST 0x0004 ; Address of exception handler
1482 0003 | | .CONST 0x0003 ; Number of locals
1483 INIT_1480:
1483 e003 | | Load 0x0,0x3
1484 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
1485 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1486 02c7 | | Declare_Variable Any
1487 00d8 | | Load_Top At_Offset_0
1488 1c00 | | Execute_Immediate Run_Utility,0x0
1489 e003 | | Load 0x0,0x3
148a 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
148b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
148c 02c7 | | Declare_Variable Any
148d 00d8 | | Load_Top At_Offset_0
148e 1c00 | | Execute_Immediate Run_Utility,0x0
148f BODY_1480:
148f 00cf | | Action Mark_Auxiliary
1490 7826 |x& | Jump 0x14b7
1491 ebff | | Load 0x5,-0x1
1492 e003 | | Load 0x0,0x3
1493 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
1494 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1495 ca02 | | Store 0x5,0x2
1496 00da | | Load_Top At_Offset_2
1497 e003 | | Load 0x0,0x3
1498 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
1499 1812 | | Execute Package,Field_Execute,Field_Number 0x12
149a 8608 | | Call 0x3,0x8
149b e003 | | Load 0x0,0x3
149c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
149d 00da | | Load_Top At_Offset_2
149e 0120 | | Execute Any,Is_Value
149f 6804 |h | Jump_Zero 0x14a4
14a0 e003 | | Load 0x0,0x3
14a1 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
14a2 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
14a3 7801 |x | Jump 0x14a5
14a4 00da | | Load_Top At_Offset_2
14a5 67d6 |g | Indirect_Literal Discrete,0x147c,{0x00000000, 0x00004000}
14a6 e013 | | Load 0x0,0x13
14a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
14a8 ea02 | | Load 0x5,0x2
14a9 e003 | | Load 0x0,0x3
14aa 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
14ab 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
14ac ca03 | | Store 0x5,0x3
14ad c803 | | Store 0x4,0x3
14ae 00d9 | | Load_Top At_Offset_1
14af 8804 | | Call 0x4,0x4
14b0 ca03 | | Store 0x5,0x3
14b1 ebff | | Load 0x5,-0x1
14b2 e003 | | Load 0x0,0x3
14b3 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
14b4 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
14b5 cbff | | Store 0x5,-0x1
14b6 00c9 | | Action Pop_Auxiliary_Loop
14b7 ebff | | Load 0x5,-0x1
14b8 e003 | | Load 0x0,0x3
14b9 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
14ba 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
14bb 6fd5 |o | Jump_Zero 0x1491
14bc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
14bd 0000 0000 | | .XXX[0x3]
14bf 0000 | |
14c0 ; --------------------------------------------------------------------------------------
14c0 ; SUBPROGRAM
14c0 ; --------------------------------------------------------------------------------------
14c0 14c3 | | .CONST 0x14c3 ; Address of begin
14c1 0004 | | .CONST 0x0004 ; Address of exception handler
14c2 0001 | | .CONST 0x0001 ; Number of locals
14c3 BODY_14c0:
14c3 INIT_14c0:
14c3 4608 |F | Jump_Case 0x9
14c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
14c5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
14c6 7819 |x | Jump 0x14e0 ; case 0x2
14c7 7818 |x | Jump 0x14e0 ; case 0x3
14c8 7817 |x | Jump 0x14e0 ; case 0x4
14c9 7816 |x | Jump 0x14e0 ; case 0x5
14ca 7815 |x | Jump 0x14e0 ; case 0x6
14cb 7801 |x | Jump 0x14cd ; case 0x7
14cc 7809 |x | Jump 0x14d6 ; case 0x8
14cd 00db | | Load_Top At_Offset_3
14ce 4801 |H | Short_Literal 0x1
14cf e5fe | | Load 0x2,-0x2
14d0 e213 | | Load 0x1,0x13
14d1 035b | [ | Declare_Type Array,Constrained
14d2 4801 |H | Short_Literal 0x1
14d3 e5ff | | Load 0x2,-0x1
14d4 031b | | Declare_Type Variant_Record,Constrained
14d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
14d6 00db | | Load_Top At_Offset_3
14d7 00db | | Load_Top At_Offset_3
14d8 02fc | | Declare_Variable Variant_Record,With_Constraint
14d9 4801 |H | Short_Literal 0x1
14da e5fe | | Load 0x2,-0x2
14db e213 | | Load 0x1,0x13
14dc 0334 | 4 | Declare_Variable Array,With_Constraint
14dd 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
14de 016a | j | QQ_execute Variant_Record,XXX
14df 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
14e0 0869 | i | Execute_Immediate Raise,0x69
14e1 0000 0000 | | .BLANK 0000[0x7]
14e8 ; --------------------------------------------------------------------------------------
14e8 ; SUBPROGRAM
14e8 ; --------------------------------------------------------------------------------------
14e8 14eb | | .CONST 0x14eb ; Address of begin
14e9 0004 | | .CONST 0x0004 ; Address of exception handler
14ea 0001 | | .CONST 0x0001 ; Number of locals
14eb BODY_14e8:
14eb INIT_14e8:
14eb 4608 |F | Jump_Case 0x9
14ec 7808 |x | Jump 0x14f5 ; case 0x0
14ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
14ee 7813 |x | Jump 0x1502 ; case 0x2
14ef 7812 |x | Jump 0x1502 ; case 0x3
14f0 7811 |x | Jump 0x1502 ; case 0x4
14f1 7810 |x | Jump 0x1502 ; case 0x5
14f2 780f |x | Jump 0x1502 ; case 0x6
14f3 780e |x | Jump 0x1502 ; case 0x7
14f4 780d |x | Jump 0x1502 ; case 0x8
14f5 00da | | Load_Top At_Offset_2
14f6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
14f7 0125 | % | Execute Any,Set_Constraint
14f8 00da | | Load_Top At_Offset_2
14f9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
14fa 1c00 | | Execute_Immediate Run_Utility,0x0
14fb 00da | | Load_Top At_Offset_2
14fc 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
14fd 0125 | % | Execute Any,Set_Constraint
14fe 00da | | Load_Top At_Offset_2
14ff 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
1500 1c00 | | Execute_Immediate Run_Utility,0x0
1501 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
1502 0869 | i | Execute_Immediate Raise,0x69
1503 0000 0000 | | .BLANK 0000[0x5]
1508 ; --------------------------------------------------------------------------------------
1508 ; SUBPROGRAM
1508 ; --------------------------------------------------------------------------------------
1508 151d | | .CONST 0x151d ; Address of begin
1509 0004 | | .CONST 0x0004 ; Address of exception handler
150a 0017 | | .CONST 0x0017 ; Number of locals
150b INIT_1508:
150b 029a 1523 | #| Declare_Subprogram INIT_1520,For_Outer_Call,Visible,Unelaborated
150d 029a 153b | ;| Declare_Subprogram INIT_1538,For_Outer_Call,Visible,Unelaborated
150f 00bf | | Action Accept_Activation
1510 e001 | | Load 0x0,0x1
1511 e002 | | Load 0x0,0x2
1512 e20f | | Load 0x1,0xf
1513 e210 | | Load 0x1,0x10
1514 e003 | | Load 0x0,0x3
1515 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
1516 0387 | | Declare_Variable Package
1517 00d8 | | Load_Top At_Offset_0
1518 020f | | Execute Module,Activate
1519 1d15 | | Execute_Immediate Reference_Lex_1,0x15
151a 00c7 | | Action Elaborate_Subprogram
151b 1d16 | | Execute_Immediate Reference_Lex_1,0x16
151c 00c7 | | Action Elaborate_Subprogram
151d BODY_1508:
151d 00bc | | Action Signal_Activated
151e 00bb | | Action Signal_Completion
151f 0000 | | .XXX[0x1]
1520 ; --------------------------------------------------------------------------------------
1520 ; SUBPROGRAM
1520 ; --------------------------------------------------------------------------------------
1520 1523 | # | .CONST 0x1523 ; Address of begin
1521 0004 | | .CONST 0x0004 ; Address of exception handler
1522 0001 | | .CONST 0x0001 ; Number of locals
1523 BODY_1520:
1523 INIT_1520:
1523 00da | | Load_Top At_Offset_2
1524 0219 | | Execute Heap_Access,All_Read
1525 00d8 | | Load_Top At_Offset_0
1526 3c1c |< | Execute Record,Field_Read,Field_Number 0x1c
1527 e5ff | | Load 0x2,-0x1
1528 8004 | | Call 0x0,0x4
1529 e5fe | | Load 0x2,-0x2
152a e20f | | Load 0x1,0xf
152b 0119 | | Execute Any,Check_In_Formal_Type
152c e217 | | Load 0x1,0x17
152d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
152e 00d9 | | Load_Top At_Offset_1
152f 381c |8 | Execute Record,Field_Write,Field_Number 0x1c
1530 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1531 0000 0000 | | .BLANK 0000[0x7]
1538 ; --------------------------------------------------------------------------------------
1538 ; SUBPROGRAM
1538 ; --------------------------------------------------------------------------------------
1538 153b | ; | .CONST 0x153b ; Address of begin
1539 1545 | E | .CONST 0x1545 ; Address of exception handler
153a 0001 | | .CONST 0x0001 ; Number of locals
153b BODY_1538:
153b INIT_1538:
153b 00da | | Load_Top At_Offset_2
153c 0217 | | Execute Heap_Access,All_Reference
153d 3c1c |< | Execute Record,Field_Read,Field_Number 0x1c
153e 00db | | Load_Top At_Offset_3
153f 8004 | | Call 0x0,0x4
1540 e217 | | Load 0x1,0x17
1541 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1542 e210 | | Load 0x1,0x10
1543 0213 | | Execute Heap_Access,Check_In_Type
1544 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1545 TRAP_1538:
1545 486b |Hk | Short_Literal 0x6b
1546 010f | | Execute Exception,Equal
1547 6802 |h | Jump_Zero 0x154a
1548 e210 | | Load 0x1,0x10
1549 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
154a 0100 | | Execute Exception,Raise
154b ; --------------------------------------------------------------------------------------
154b ; STRING TABLE
154b ; --------------------------------------------------------------------------------------
154b 001c | | .STRTAB 0x001c->0x1559 ; "Refreshing unit "
154c 002a | * | .STRTAB 0x002a->0x1561 ; "Target name for "
154d 0038 | 8 | .STRTAB 0x0038->0x1569 ; " has been set to "
154e 0047 | G | .STRTAB 0x0047->0x1571 ; "."
154f 0046 | F | .STRTAB 0x0046->0x1572 ; "Releasing old special build instructions."
1550 006d | m | .STRTAB 0x006d->0x1586 ; "No siblings for "
1551 007b | { | .STRTAB 0x007b->0x158e ; "Created directory object for \x22"
1552 0097 | | .STRTAB 0x0097->0x159d ; "\x22."
1553 0097 | | .STRTAB 0x0097->0x159e ; "Structural_Suppliers (Parent) "
1554 00b3 | | .STRTAB 0x00b3->0x15ad ; "Structural_Suppliers (Other) "
1555 00ce | | .STRTAB 0x00ce->0x15bc ; "Add_Supplier "
1556 00d9 | | .STRTAB 0x00d9->0x15c2 ; "Changing Kinds for object"
1557 00f0 | | .STRTAB 0x00f0->0x15cf ; "Creating Machine_Data record."
1558 010b | | .STREND 0x010b->0x15dd
1559 5265 6672 |Refr| .STRTAB_STRINGS
15de 0000 0000 | | .XXX[0x2]
15e0 ; --------------------------------------------------------------------------------------
15e0 ; Debug Table
15e0 ; --------------------------------------------------------------------------------------
15e0 0004 000a | | .DEBUG4 0x0004,0x000a,0xe37e,0x0000,0x0001,0x0000
15e6 0000 0000 | | .BLANK 0000[0x1a]