|
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: 14336 (0x3800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1a60 | ` | .CONST 0x1a60 ; 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 8010 | | .CONST 0x8010 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0118 | | .CONST 0x0118 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 006d | m | .CONST 0x006d ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
000d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000e 0129 | ) | Execute Any,Make_Visible
000f 029c 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible
0011 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
0013 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
0015 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated
0017 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
0019 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 00c4 | | Action Make_Default
002c 00c4 | | Action Make_Default
002d 00c4 | | Action Make_Default
002e 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
0030 c222 | " | Store 0x1,0x22
0031 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated
0033 c21f | | Store 0x1,0x1f
0034 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
0036 c220 | | Store 0x1,0x20
0037 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated
0039 c223 | # | Store 0x1,0x23
003a 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated
003c c216 | | Store 0x1,0x16
003d 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated
003f c224 | $ | Store 0x1,0x24
0040 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated
0042 c218 | | Store 0x1,0x18
0043 029a 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call,Visible,Unelaborated
0045 c225 | % | Store 0x1,0x25
0046 029a 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call,Visible,Unelaborated
0048 c21a | | Store 0x1,0x1a
0049 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated
004b c221 | ! | Store 0x1,0x21
004c 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated
004e c226 | & | Store 0x1,0x26
004f 00bf | | Action Accept_Activation
0050 e002 | | Load 0x0,0x2
0051 191f | | Execute Package,Field_Reference,Field_Number 0x1f
0052 0007 | | Action Break_Optional
0053 00e5 | | Load_Encached Long_Integer_Cache
0054 029b 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call,Unelaborated
0056 e003 | | Load 0x0,0x3
0057 e004 | | Load 0x0,0x4
0058 e005 | | Load 0x0,0x5
0059 1b14 | | Execute Package,Field_Read,Field_Number 0x14
005a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005b 00e1 | | Load_Encached Boolean_Cache
005c e228 | ( | Load 0x1,0x28
005d 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
005e e006 | | Load 0x0,0x6
005f 0387 | | Declare_Variable Package
0060 00d8 | | Load_Top At_Offset_0
0061 020f | | Execute Module,Activate
0062 e007 | | Load 0x0,0x7
0063 e008 | | Load 0x0,0x8
0064 e005 | | Load 0x0,0x5
0065 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0066 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0067 00e3 | | Load_Encached Natural_Cache
0068 e228 | ( | Load 0x1,0x28
0069 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
006a e006 | | Load 0x0,0x6
006b 0387 | | Declare_Variable Package
006c 00d8 | | Load_Top At_Offset_0
006d 020f | | Execute Module,Activate
006e 00d9 | | Load_Top At_Offset_1
006f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0070 00d9 | | Load_Top At_Offset_1
0071 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0072 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0073 00c7 | | Action Elaborate_Subprogram
0074 029d 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call
0076 029d 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call
0078 029d 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call
007a 029d 070b | | Declare_Subprogram INIT_0708,For_Outer_Call
007c 029d 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call
007e 029d 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call
0080 029d 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call
0082 029d 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call
0084 029d 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call
0086 029d 087b | {| Declare_Subprogram INIT_0878,For_Outer_Call
0088 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0089 00c7 | | Action Elaborate_Subprogram
008a 1d0f | | Execute_Immediate Reference_Lex_1,0xf
008b 00c7 | | Action Elaborate_Subprogram
008c 1d10 | | Execute_Immediate Reference_Lex_1,0x10
008d 00c7 | | Action Elaborate_Subprogram
008e 1d11 | | Execute_Immediate Reference_Lex_1,0x11
008f 00c7 | | Action Elaborate_Subprogram
0090 029d 08bb | | Declare_Subprogram INIT_08b8,For_Outer_Call
0092 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0093 00c7 | | Action Elaborate_Subprogram
0094 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0095 00c7 | | Action Elaborate_Subprogram
0096 029d 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call
0098 029d 0943 | C| Declare_Subprogram INIT_0940,For_Outer_Call
009a 029d 09f3 | | Declare_Subprogram INIT_09f0,For_Outer_Call
009c 029d 0a5b | [| Declare_Subprogram INIT_0a58,For_Outer_Call
009e 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
009f 00c7 | | Action Elaborate_Subprogram
00a0 029d 0acb | | Declare_Subprogram INIT_0ac8,For_Outer_Call
00a2 029d 0af3 | | Declare_Subprogram INIT_0af0,For_Outer_Call
00a4 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00a5 00c7 | | Action Elaborate_Subprogram
00a6 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00a7 00c7 | | Action Elaborate_Subprogram
00a8 029d 0b1b | | Declare_Subprogram INIT_0b18,For_Outer_Call
00aa a009 | | Store_Unchecked 0x0,0x9
00ab 00c6 | | Action Check_Subprogram_Elaborated
00ac e005 | | Load 0x0,0x5
00ad 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00af 00e3 | | Load_Encached Natural_Cache
00b0 e005 | | Load 0x0,0x5
00b1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00b2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00b3 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
00b4 e00a | | Load 0x0,0xa
00b5 e00b | | Load 0x0,0xb
00b6 4800 |H | Short_Literal 0x0
00b7 0007 | | Action Break_Optional
00b8 029d 0b4b | K| Declare_Subprogram INIT_0b48,For_Outer_Call
00ba 029d 0ca3 | | Declare_Subprogram INIT_0ca0,For_Outer_Call
00bc 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00bd 00c7 | | Action Elaborate_Subprogram
00be 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00bf 00c7 | | Action Elaborate_Subprogram
00c0 029d 0cf3 | | Declare_Subprogram INIT_0cf0,For_Outer_Call
00c2 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00c3 00c7 | | Action Elaborate_Subprogram
00c4 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00c5 00c7 | | Action Elaborate_Subprogram
00c6 029d 0d63 | c| Declare_Subprogram INIT_0d60,For_Outer_Call
00c8 029d 0d7b | {| Declare_Subprogram INIT_0d78,For_Outer_Call
00ca 029d 0dcb | | Declare_Subprogram INIT_0dc8,For_Outer_Call
00cc 029d 0e03 | | Declare_Subprogram INIT_0e00,For_Outer_Call
00ce 029d 0e13 | | Declare_Subprogram INIT_0e10,For_Outer_Call
00d0 029d 0e4b | K| Declare_Subprogram INIT_0e48,For_Outer_Call
00d2 029d 0e5b | [| Declare_Subprogram INIT_0e58,For_Outer_Call
00d4 a00c | | Store_Unchecked 0x0,0xc
00d5 00c6 | | Action Check_Subprogram_Elaborated
00d6 e005 | | Load 0x0,0x5
00d7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d9 e005 | | Load 0x0,0x5
00da 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00db 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00dc 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d
00dd 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e
00de 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
00df 1d50 | P | Execute_Immediate Reference_Lex_1,0x50
00e0 e005 | | Load 0x0,0x5
00e1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00e2 1910 | | Execute Package,Field_Reference,Field_Number 0x10
00e3 e005 | | Load 0x0,0x5
00e4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00e5 1912 | | Execute Package,Field_Reference,Field_Number 0x12
00e6 e00d | | Load 0x0,0xd
00e7 e00e | | Load 0x0,0xe
00e8 4800 |H | Short_Literal 0x0
00e9 0007 | | Action Break_Optional
00ea 029b 0e6b | k| Declare_Subprogram INIT_0e68,For_Outer_Call,Unelaborated
00ec 029b 0f2b | +| Declare_Subprogram INIT_0f28,For_Outer_Call,Unelaborated
00ee a00c | | Store_Unchecked 0x0,0xc
00ef 00c6 | | Action Check_Subprogram_Elaborated
00f0 e005 | | Load 0x0,0x5
00f1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f3 e005 | | Load 0x0,0x5
00f4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00f5 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00f6 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d
00f7 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e
00f8 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
00f9 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
00fa e005 | | Load 0x0,0x5
00fb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00fc 1910 | | Execute Package,Field_Reference,Field_Number 0x10
00fd e005 | | Load 0x0,0x5
00fe 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00ff 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0100 e00f | | Load 0x0,0xf
0101 e010 | | Load 0x0,0x10
0102 4800 |H | Short_Literal 0x0
0103 0007 | | Action Break_Optional
0104 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
0105 00c7 | | Action Elaborate_Subprogram
0106 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
0107 00c7 | | Action Elaborate_Subprogram
0108 029d 0f8b | | Declare_Subprogram INIT_0f88,For_Outer_Call
010a 029d 0fb3 | | Declare_Subprogram INIT_0fb0,For_Outer_Call
010c 029d 107b | {| Declare_Subprogram INIT_1078,For_Outer_Call
010e 029d 10fb | | Declare_Subprogram INIT_10f8,For_Outer_Call
0110 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0111 00c7 | | Action Elaborate_Subprogram
0112 029d 1163 | c| Declare_Subprogram INIT_1160,For_Outer_Call
0114 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
0115 00c7 | | Action Elaborate_Subprogram
0116 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
0117 00c7 | | Action Elaborate_Subprogram
0118 BODY_0008:
0118 e22a | * | Load 0x1,0x2a
0119 1b13 | | Execute Package,Field_Read,Field_Number 0x13
011a e011 | | Load 0x0,0x11
011b 180d | | Execute Package,Field_Execute,Field_Number 0xd
011c e22a | * | Load 0x1,0x2a
011d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
011e c22c | , | Store 0x1,0x2c
011f e22b | + | Load 0x1,0x2b
0120 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0121 e011 | | Load 0x0,0x11
0122 180d | | Execute Package,Field_Execute,Field_Number 0xd
0123 e22b | + | Load 0x1,0x2b
0124 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0125 c22d | - | Store 0x1,0x2d
0126 00bc | | Action Signal_Activated
0127 00bb | | Action Signal_Completion
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 4803 |H | Short_Literal 0x3
012c 00ca | | Action Exit_Nullary_Function
012d 0000 0000 | | .XXX[0x3]
012f 0000 | |
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133 | 3 | .CONST 0x0133 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0001 | | .CONST 0x0001 ; Number of locals
0133 BODY_0130:
0133 INIT_0130:
0133 4800 |H | Short_Literal 0x0
0134 e22c | , | Load 0x1,0x2c
0135 4802 |H | Short_Literal 0x2
0136 e5fe | | Load 0x2,-0x2
0137 e5ff | | Load 0x2,-0x1
0138 8236 | 6 | Call 0x1,0x36
0139 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
013a 0000 0000 | | .BLANK 0000[0x6]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 4800 |H | Short_Literal 0x0
0144 e22c | , | Load 0x1,0x2c
0145 4803 |H | Short_Literal 0x3
0146 e5fe | | Load 0x2,-0x2
0147 e5ff | | Load 0x2,-0x1
0148 8236 | 6 | Call 0x1,0x36
0149 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
014a 0000 0000 | | .BLANK 0000[0x6]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 4800 |H | Short_Literal 0x0
0154 e22c | , | Load 0x1,0x2c
0155 4804 |H | Short_Literal 0x4
0156 e5fe | | Load 0x2,-0x2
0157 e5ff | | Load 0x2,-0x1
0158 8236 | 6 | Call 0x1,0x36
0159 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
015a 0000 0000 | | .BLANK 0000[0x6]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0171 | q | .CONST 0x0171 ; Address of begin
0161 0180 | | .CONST 0x0180 ; Address of exception handler
0162 0004 | | .CONST 0x0004 ; Number of locals
0163 INIT_0160:
0163 e22a | * | Load 0x1,0x2a
0164 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0165 4800 |H | Short_Literal 0x0
0166 e005 | | Load 0x0,0x5
0167 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0168 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0169 1c08 | | Execute_Immediate Run_Utility,0x8
016a e005 | | Load 0x0,0x5
016b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
016c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
016d 00d9 | | Load_Top At_Offset_1
016e 016d | m | Execute Variant_Record,Structure_Write
016f 029f 118b | | Declare_Subprogram INIT_1188,For_Call
0171 BODY_0160:
0171 e22a | * | Load 0x1,0x2a
0172 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0173 e011 | | Load 0x0,0x11
0174 180d | | Execute Package,Field_Execute,Field_Number 0xd
0175 e22a | * | Load 0x1,0x2a
0176 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0177 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0178 4800 |H | Short_Literal 0x0
0179 4801 |H | Short_Literal 0x1
017a e5ff | | Load 0x2,-0x1
017b e402 | | Load 0x2,0x2
017c e22a | * | Load 0x1,0x2a
017d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
017e 8404 | | Call 0x2,0x4
017f 0831 | 1 | Execute_Immediate Raise,0x31
0180 TRAP_0160:
0180 0007 | | Action Break_Optional
0181 00db | | Load_Top At_Offset_3
0182 e22a | * | Load 0x1,0x2a
0183 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0184 4801 |H | Short_Literal 0x1
0185 4802 |H | Short_Literal 0x2
0186 e012 | | Load 0x0,0x12
0187 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0188 035b | [ | Declare_Type Array,Constrained
0189 0337 | 7 | Declare_Variable Array
018a e5fe | | Load 0x2,-0x2
018b e013 | | Load 0x0,0x13
018c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
018d 4801 |H | Short_Literal 0x1
018e 00da | | Load_Top At_Offset_2
018f 01d6 | | Execute Vector,Field_Write
0190 e5ff | | Load 0x2,-0x1
0191 e005 | | Load 0x0,0x5
0192 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0193 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0194 4802 |H | Short_Literal 0x2
0195 00da | | Load_Top At_Offset_2
0196 01d6 | | Execute Vector,Field_Write
0197 6008 |` | Indirect_Literal Discrete,0x1a0,{0x00000000, 0x00003802}
0198 e014 | | Load 0x0,0x14
0199 1813 | | Execute Package,Field_Execute,Field_Number 0x13
019a 00db | | Load_Top At_Offset_3
019b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
019c 00da | | Load_Top At_Offset_2
019d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
019e 0000 0000 | | .XXX[0x2]
01a0 0000 0000 | | .LITERAL {0x00000000, 0x00003802}
01a4 0000 0000 | | .BLANK 0000[0x4]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b9 | | .CONST 0x01b9 ; Address of begin
01a9 01c7 | | .CONST 0x01c7 ; Address of exception handler
01aa 0004 | | .CONST 0x0004 ; Number of locals
01ab INIT_01a8:
01ab e22a | * | Load 0x1,0x2a
01ac 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01ad 4800 |H | Short_Literal 0x0
01ae e005 | | Load 0x0,0x5
01af 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01b0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01b1 1c08 | | Execute_Immediate Run_Utility,0x8
01b2 e005 | | Load 0x0,0x5
01b3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01b4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01b5 00d9 | | Load_Top At_Offset_1
01b6 016d | m | Execute Variant_Record,Structure_Write
01b7 029f 11a3 | | Declare_Subprogram INIT_11a0,For_Call
01b9 BODY_01a8:
01b9 e5ff | | Load 0x2,-0x1
01ba 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01bb 7002 |p | Jump_Nonzero 0x1be
01bc 00d9 | | Load_Top At_Offset_1
01bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01be e22a | * | Load 0x1,0x2a
01bf 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01c0 e011 | | Load 0x0,0x11
01c1 180d | | Execute Package,Field_Execute,Field_Number 0xd
01c2 e22a | * | Load 0x1,0x2a
01c3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01c4 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01c5 8404 | | Call 0x2,0x4
01c6 0831 | 1 | Execute_Immediate Raise,0x31
01c7 TRAP_01a8:
01c7 0007 | | Action Break_Optional
01c8 00db | | Load_Top At_Offset_3
01c9 e22a | * | Load 0x1,0x2a
01ca 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01cb 4801 |H | Short_Literal 0x1
01cc 4802 |H | Short_Literal 0x2
01cd e012 | | Load 0x0,0x12
01ce 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01cf 035b | [ | Declare_Type Array,Constrained
01d0 0337 | 7 | Declare_Variable Array
01d1 e5fe | | Load 0x2,-0x2
01d2 e013 | | Load 0x0,0x13
01d3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01d4 4801 |H | Short_Literal 0x1
01d5 00da | | Load_Top At_Offset_2
01d6 01d6 | | Execute Vector,Field_Write
01d7 4801 |H | Short_Literal 0x1
01d8 e5ff | | Load 0x2,-0x1
01d9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01da 01d7 | | Execute Vector,Field_Read
01db e005 | | Load 0x0,0x5
01dc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01dd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01de 4802 |H | Short_Literal 0x2
01df 00da | | Load_Top At_Offset_2
01e0 01d6 | | Execute Vector,Field_Write
01e1 67be |g | Indirect_Literal Discrete,0x1a0,{0x00000000, 0x00003802}
01e2 e014 | | Load 0x0,0x14
01e3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e4 00db | | Load_Top At_Offset_3
01e5 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01e6 00da | | Load_Top At_Offset_2
01e7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb 4800 |H | Short_Literal 0x0
01ec e22c | , | Load 0x1,0x2c
01ed 4800 |H | Short_Literal 0x0
01ee e5fe | | Load 0x2,-0x2
01ef e5ff | | Load 0x2,-0x1
01f0 8236 | 6 | Call 0x1,0x36
01f1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01f2 0000 0000 | | .BLANK 0000[0x6]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0209 | | .CONST 0x0209 ; Address of begin
01f9 0218 | | .CONST 0x0218 ; Address of exception handler
01fa 0004 | | .CONST 0x0004 ; Number of locals
01fb INIT_01f8:
01fb e22a | * | Load 0x1,0x2a
01fc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01fd 4800 |H | Short_Literal 0x0
01fe e005 | | Load 0x0,0x5
01ff 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0200 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0201 1c08 | | Execute_Immediate Run_Utility,0x8
0202 e005 | | Load 0x0,0x5
0203 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0204 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0205 00d9 | | Load_Top At_Offset_1
0206 016d | m | Execute Variant_Record,Structure_Write
0207 029f 11b3 | | Declare_Subprogram INIT_11b0,For_Call
0209 BODY_01f8:
0209 e22a | * | Load 0x1,0x2a
020a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
020b e011 | | Load 0x0,0x11
020c 180d | | Execute Package,Field_Execute,Field_Number 0xd
020d e22a | * | Load 0x1,0x2a
020e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
020f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0210 4800 |H | Short_Literal 0x0
0211 4801 |H | Short_Literal 0x1
0212 e5ff | | Load 0x2,-0x1
0213 e402 | | Load 0x2,0x2
0214 e22a | * | Load 0x1,0x2a
0215 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0216 8404 | | Call 0x2,0x4
0217 0831 | 1 | Execute_Immediate Raise,0x31
0218 TRAP_01f8:
0218 0007 | | Action Break_Optional
0219 00db | | Load_Top At_Offset_3
021a e22a | * | Load 0x1,0x2a
021b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
021c 4801 |H | Short_Literal 0x1
021d 4802 |H | Short_Literal 0x2
021e e012 | | Load 0x0,0x12
021f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0220 035b | [ | Declare_Type Array,Constrained
0221 0337 | 7 | Declare_Variable Array
0222 e5fe | | Load 0x2,-0x2
0223 e013 | | Load 0x0,0x13
0224 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0225 4801 |H | Short_Literal 0x1
0226 00da | | Load_Top At_Offset_2
0227 01d6 | | Execute Vector,Field_Write
0228 e5ff | | Load 0x2,-0x1
0229 e005 | | Load 0x0,0x5
022a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
022b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
022c 4802 |H | Short_Literal 0x2
022d 00da | | Load_Top At_Offset_2
022e 01d6 | | Execute Vector,Field_Write
022f 6008 |` | Indirect_Literal Discrete,0x238,{0x00000000, 0x00003804}
0230 e014 | | Load 0x0,0x14
0231 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0232 00db | | Load_Top At_Offset_3
0233 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0234 00da | | Load_Top At_Offset_2
0235 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0236 0000 0000 | | .XXX[0x2]
0238 0000 0000 | | .LITERAL {0x00000000, 0x00003804}
023c 0000 0000 | | .BLANK 0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0251 | Q | .CONST 0x0251 ; Address of begin
0241 025f | _ | .CONST 0x025f ; Address of exception handler
0242 0004 | | .CONST 0x0004 ; Number of locals
0243 INIT_0240:
0243 e22a | * | Load 0x1,0x2a
0244 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0245 4800 |H | Short_Literal 0x0
0246 e005 | | Load 0x0,0x5
0247 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0248 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0249 1c08 | | Execute_Immediate Run_Utility,0x8
024a e005 | | Load 0x0,0x5
024b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
024c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
024d 00d9 | | Load_Top At_Offset_1
024e 016d | m | Execute Variant_Record,Structure_Write
024f 029f 11cb | | Declare_Subprogram INIT_11c8,For_Call
0251 BODY_0240:
0251 e5ff | | Load 0x2,-0x1
0252 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0253 7002 |p | Jump_Nonzero 0x256
0254 00d9 | | Load_Top At_Offset_1
0255 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0256 e22a | * | Load 0x1,0x2a
0257 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0258 e011 | | Load 0x0,0x11
0259 180d | | Execute Package,Field_Execute,Field_Number 0xd
025a e22a | * | Load 0x1,0x2a
025b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
025c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
025d 8404 | | Call 0x2,0x4
025e 0831 | 1 | Execute_Immediate Raise,0x31
025f TRAP_0240:
025f 0007 | | Action Break_Optional
0260 00db | | Load_Top At_Offset_3
0261 e22a | * | Load 0x1,0x2a
0262 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0263 4801 |H | Short_Literal 0x1
0264 4802 |H | Short_Literal 0x2
0265 e012 | | Load 0x0,0x12
0266 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0267 035b | [ | Declare_Type Array,Constrained
0268 0337 | 7 | Declare_Variable Array
0269 e5fe | | Load 0x2,-0x2
026a e013 | | Load 0x0,0x13
026b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
026c 4801 |H | Short_Literal 0x1
026d 00da | | Load_Top At_Offset_2
026e 01d6 | | Execute Vector,Field_Write
026f 4801 |H | Short_Literal 0x1
0270 e5ff | | Load 0x2,-0x1
0271 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0272 01d7 | | Execute Vector,Field_Read
0273 e005 | | Load 0x0,0x5
0274 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0275 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0276 4802 |H | Short_Literal 0x2
0277 00da | | Load_Top At_Offset_2
0278 01d6 | | Execute Vector,Field_Write
0279 6006 |` | Indirect_Literal Discrete,0x280,{0x00000000, 0x00003805}
027a e014 | | Load 0x0,0x14
027b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
027c 00db | | Load_Top At_Offset_3
027d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
027e 00da | | Load_Top At_Offset_2
027f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0280 0000 0000 | | .LITERAL {0x00000000, 0x00003805}
0284 0000 0000 | | .BLANK 0000[0x4]
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 4800 |H | Short_Literal 0x0
028c e22c | , | Load 0x1,0x2c
028d e5fe | | Load 0x2,-0x2
028e 4800 |H | Short_Literal 0x0
028f e5ff | | Load 0x2,-0x1
0290 823a | : | Call 0x1,0x3a
0291 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0292 0000 0000 | | .BLANK 0000[0x6]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a4 | | .CONST 0x02a4 ; Address of begin
0299 02e9 | | .CONST 0x02e9 ; Address of exception handler
029a 0005 | | .CONST 0x0005 ; Number of locals
029b INIT_0298:
029b 00da | | Load_Top At_Offset_2
029c e013 | | Load 0x0,0x13
029d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
029e e015 | | Load 0x0,0x15
029f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02a0 e014 | | Load 0x0,0x14
02a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a2 e015 | | Load 0x0,0x15
02a3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02a4 BODY_0298:
02a4 00cf | | Action Mark_Auxiliary
02a5 e5fe | | Load 0x2,-0x2
02a6 01d9 | | Execute Vector,Reverse_Bounds
02a7 0263 | c | Execute Discrete,Above_Bound
02a8 703c |p< | Jump_Nonzero 0x2e5
02a9 00d8 | | Load_Top At_Offset_0
02aa e5fe | | Load 0x2,-0x2
02ab 01d7 | | Execute Vector,Field_Read
02ac 6836 |h6 | Jump_Zero 0x2e3
02ad 00cf | | Action Mark_Auxiliary
02ae e402 | | Load 0x2,0x2
02af 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02b0 01d9 | | Execute Vector,Reverse_Bounds
02b1 0263 | c | Execute Discrete,Above_Bound
02b2 700b |p | Jump_Nonzero 0x2be
02b3 e405 | | Load 0x2,0x5
02b4 e408 | | Load 0x2,0x8
02b5 00da | | Load_Top At_Offset_2
02b6 e402 | | Load 0x2,0x2
02b7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02b8 01d7 | | Execute Vector,Field_Read
02b9 e5ff | | Load 0x2,-0x1
02ba 8248 | H | Call 0x1,0x48
02bb c405 | | Store 0x2,0x5
02bc 00c8 | | Action Pop_Auxiliary_Range
02bd 3ff5 |? | Loop_Increasing 0x2b3
02be 00ce | | Action Pop_Auxiliary
02bf 00db | | Load_Top At_Offset_3
02c0 e015 | | Load 0x0,0x15
02c1 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
02c2 7020 |p | Jump_Nonzero 0x2e3
02c3 00d8 | | Load_Top At_Offset_0
02c4 e002 | | Load 0x0,0x2
02c5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02c6 4801 |H | Short_Literal 0x1
02c7 4801 |H | Short_Literal 0x1
02c8 e012 | | Load 0x0,0x12
02c9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ca 035b | [ | Declare_Type Array,Constrained
02cb 0337 | 7 | Declare_Variable Array
02cc e405 | | Load 0x2,0x5
02cd e015 | | Load 0x0,0x15
02ce 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
02cf 4801 |H | Short_Literal 0x1
02d0 00da | | Load_Top At_Offset_2
02d1 01d6 | | Execute Vector,Field_Write
02d2 4802 |H | Short_Literal 0x2
02d3 e403 | | Load 0x2,0x3
02d4 e015 | | Load 0x0,0x15
02d5 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
02d6 00db | | Load_Top At_Offset_3
02d7 e015 | | Load 0x0,0x15
02d8 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02d9 7006 |p | Jump_Nonzero 0x2e0
02da 00db | | Load_Top At_Offset_3
02db e015 | | Load 0x0,0x15
02dc 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
02dd e403 | | Load 0x2,0x3
02de e015 | | Load 0x0,0x15
02df 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
02e0 e015 | | Load 0x0,0x15
02e1 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02e2 a405 | | Store_Unchecked 0x2,0x5
02e3 00c8 | | Action Pop_Auxiliary_Range
02e4 3fc4 |? | Loop_Increasing 0x2a9
02e5 00ce | | Action Pop_Auxiliary
02e6 00da | | Load_Top At_Offset_2
02e7 a5fd | | Store_Unchecked 0x2,-0x3
02e8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02e9 TRAP_0298:
02e9 0007 | | Action Break_Optional
02ea 4801 |H | Short_Literal 0x1
02eb 4801 |H | Short_Literal 0x1
02ec e012 | | Load 0x0,0x12
02ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ee 035b | [ | Declare_Type Array,Constrained
02ef 0337 | 7 | Declare_Variable Array
02f0 e5ff | | Load 0x2,-0x1
02f1 e013 | | Load 0x0,0x13
02f2 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02f3 4801 |H | Short_Literal 0x1
02f4 00da | | Load_Top At_Offset_2
02f5 01d6 | | Execute Vector,Field_Write
02f6 600d |` | Indirect_Literal Discrete,0x304,{0x00000000, 0x00003806}
02f7 e014 | | Load 0x0,0x14
02f8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f9 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
02fa 00da | | Load_Top At_Offset_2
02fb e403 | | Load 0x2,0x3
02fc e015 | | Load 0x0,0x15
02fd 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
02fe 00db | | Load_Top At_Offset_3
02ff a5fd | | Store_Unchecked 0x2,-0x3
0300 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0301 0000 0000 | | .XXX[0x3]
0303 0000 | |
0304 0000 0000 | | .LITERAL {0x00000000, 0x00003806}
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 032c | , | .CONST 0x032c ; Address of begin
0309 03c0 | | .CONST 0x03c0 ; Address of exception handler
030a 000d | | .CONST 0x000d ; Number of locals
030b INIT_0308:
030b 00da | | Load_Top At_Offset_2
030c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
030d 01da | | Execute Vector,Bounds
030e e005 | | Load 0x0,0x5
030f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0310 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0311 035b | [ | Declare_Type Array,Constrained
0312 0337 | 7 | Declare_Variable Array
0313 00db | | Load_Top At_Offset_3
0314 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0315 00d9 | | Load_Top At_Offset_1
0316 01d4 | | Execute Vector,Structure_Write
0317 00e2 | | Load_Encached Integer_Cache
0318 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0319 00e3 | | Load_Encached Natural_Cache
031a 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
031b 00e3 | | Load_Encached Natural_Cache
031c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
031d e015 | | Load 0x0,0x15
031e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
031f e015 | | Load 0x0,0x15
0320 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0321 e015 | | Load 0x0,0x15
0322 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0323 00e3 | | Load_Encached Natural_Cache
0324 e015 | | Load 0x0,0x15
0325 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0326 e014 | | Load 0x0,0x14
0327 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0328 029f 11db | | Declare_Subprogram INIT_11d8,For_Call
032a 029f 1203 | | Declare_Subprogram INIT_1200,For_Call
032c BODY_0308:
032c e5ff | | Load 0x2,-0x1
032d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
032e 7003 |p | Jump_Nonzero 0x332
032f e406 | | Load 0x2,0x6
0330 a5fc | | Store_Unchecked 0x2,-0x4
0331 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0332 e403 | | Load 0x2,0x3
0333 e402 | | Load 0x2,0x2
0334 e240 | @ | Load 0x1,0x40
0335 e241 | A | Load 0x1,0x41
0336 e242 | B | Load 0x1,0x42
0337 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
0338 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
0339 8009 | | Call 0x0,0x9
033a 00d1 | | Pop_Control Pop_Count_1
033b c403 | | Store 0x2,0x3
033c 00cf | | Action Mark_Auxiliary
033d e5fd | | Load 0x2,-0x3
033e 01d9 | | Execute Vector,Reverse_Bounds
033f 0263 | c | Execute Discrete,Above_Bound
0340 707b |p{ | Jump_Nonzero 0x3bc
0341 00d8 | | Load_Top At_Offset_0
0342 e5fd | | Load 0x2,-0x3
0343 01d7 | | Execute Vector,Field_Read
0344 6831 |h1 | Jump_Zero 0x376
0345 00cf | | Action Mark_Auxiliary
0346 7829 |x) | Jump 0x370
0347 e405 | | Load 0x2,0x5
0348 a404 | | Store_Unchecked 0x2,0x4
0349 840c | | Call 0x2,0xc
034a e015 | | Load 0x0,0x15
034b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
034c 00da | | Load_Top At_Offset_2
034d e002 | | Load 0x0,0x2
034e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
034f e404 | | Load 0x2,0x4
0350 e402 | | Load 0x2,0x2
0351 01d7 | | Execute Vector,Field_Read
0352 e005 | | Load 0x0,0x5
0353 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0354 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0355 e005 | | Load 0x0,0x5
0356 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0357 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0358 4807 |H | Short_Literal 0x7
0359 e015 | | Load 0x0,0x15
035a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
035b c407 | | Store 0x2,0x7
035c e40a | | Load 0x2,0xa
035d e407 | | Load 0x2,0x7
035e e015 | | Load 0x0,0x15
035f 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0360 e40a | | Load 0x2,0xa
0361 e015 | | Load 0x0,0x15
0362 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0363 a409 | | Store_Unchecked 0x2,0x9
0364 840d | | Call 0x2,0xd
0365 e40a | | Load 0x2,0xa
0366 e015 | | Load 0x0,0x15
0367 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0368 e409 | | Load 0x2,0x9
0369 027f | | Execute Discrete,Equal
036a 6804 |h | Jump_Zero 0x36f
036b e40a | | Load 0x2,0xa
036c e407 | | Load 0x2,0x7
036d e015 | | Load 0x0,0x15
036e 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
036f 00c9 | | Action Pop_Auxiliary_Loop
0370 e405 | | Load 0x2,0x5
0371 e402 | | Load 0x2,0x2
0372 01dc | | Execute Vector,Last
0373 027a | z | Execute Discrete,Less_Equal
0374 77d2 |w | Jump_Nonzero 0x347
0375 00ce | | Action Pop_Auxiliary
0376 e40a | | Load 0x2,0xa
0377 e015 | | Load 0x0,0x15
0378 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0379 683a |h: | Jump_Zero 0x3b4
037a 00d8 | | Load_Top At_Offset_0
037b e002 | | Load 0x0,0x2
037c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
037d 4801 |H | Short_Literal 0x1
037e 4801 |H | Short_Literal 0x1
037f e012 | | Load 0x0,0x12
0380 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0381 035b | [ | Declare_Type Array,Constrained
0382 0337 | 7 | Declare_Variable Array
0383 e40a | | Load 0x2,0xa
0384 e015 | | Load 0x0,0x15
0385 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0386 4801 |H | Short_Literal 0x1
0387 00da | | Load_Top At_Offset_2
0388 01d6 | | Execute Vector,Field_Write
0389 4803 |H | Short_Literal 0x3
038a e408 | | Load 0x2,0x8
038b e015 | | Load 0x0,0x15
038c 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
038d e40a | | Load 0x2,0xa
038e e015 | | Load 0x0,0x15
038f 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0390 7006 |p | Jump_Nonzero 0x397
0391 e40a | | Load 0x2,0xa
0392 e015 | | Load 0x0,0x15
0393 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0394 e408 | | Load 0x2,0x8
0395 e015 | | Load 0x0,0x15
0396 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0397 00d8 | | Load_Top At_Offset_0
0398 e002 | | Load 0x0,0x2
0399 1812 | | Execute Package,Field_Execute,Field_Number 0x12
039a 4801 |H | Short_Literal 0x1
039b 4801 |H | Short_Literal 0x1
039c e012 | | Load 0x0,0x12
039d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
039e 035b | [ | Declare_Type Array,Constrained
039f 0337 | 7 | Declare_Variable Array
03a0 e408 | | Load 0x2,0x8
03a1 e015 | | Load 0x0,0x15
03a2 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
03a3 4801 |H | Short_Literal 0x1
03a4 00da | | Load_Top At_Offset_2
03a5 01d6 | | Execute Vector,Field_Write
03a6 4802 |H | Short_Literal 0x2
03a7 e406 | | Load 0x2,0x6
03a8 e015 | | Load 0x0,0x15
03a9 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
03aa e408 | | Load 0x2,0x8
03ab e015 | | Load 0x0,0x15
03ac 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
03ad 7006 |p | Jump_Nonzero 0x3b4
03ae e408 | | Load 0x2,0x8
03af e015 | | Load 0x0,0x15
03b0 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
03b1 e406 | | Load 0x2,0x6
03b2 e015 | | Load 0x0,0x15
03b3 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
03b4 e015 | | Load 0x0,0x15
03b5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03b6 a40a | | Store_Unchecked 0x2,0xa
03b7 e015 | | Load 0x0,0x15
03b8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03b9 a408 | | Store_Unchecked 0x2,0x8
03ba 00c8 | | Action Pop_Auxiliary_Range
03bb 3f85 |? | Loop_Increasing 0x341
03bc 00ce | | Action Pop_Auxiliary
03bd e406 | | Load 0x2,0x6
03be a5fc | | Store_Unchecked 0x2,-0x4
03bf 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03c0 TRAP_0308:
03c0 0007 | | Action Break_Optional
03c1 4801 |H | Short_Literal 0x1
03c2 4801 |H | Short_Literal 0x1
03c3 e012 | | Load 0x0,0x12
03c4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03c5 035b | [ | Declare_Type Array,Constrained
03c6 0337 | 7 | Declare_Variable Array
03c7 e404 | | Load 0x2,0x4
03c8 e5ff | | Load 0x2,-0x1
03c9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03ca 01d7 | | Execute Vector,Field_Read
03cb e005 | | Load 0x0,0x5
03cc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03ce 4801 |H | Short_Literal 0x1
03cf 00da | | Load_Top At_Offset_2
03d0 01d6 | | Execute Vector,Field_Write
03d1 600a |` | Indirect_Literal Discrete,0x3dc,{0x00000000, 0x00003807}
03d2 e014 | | Load 0x0,0x14
03d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03d4 a40b | | Store_Unchecked 0x2,0xb
03d5 00db | | Load_Top At_Offset_3
03d6 e406 | | Load 0x2,0x6
03d7 e015 | | Load 0x0,0x15
03d8 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
03d9 e406 | | Load 0x2,0x6
03da a5fc | | Store_Unchecked 0x2,-0x4
03db 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03dc 0000 0000 | | .LITERAL {0x00000000, 0x00003807}
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03ec | | .CONST 0x03ec ; Address of begin
03e1 0431 | 1 | .CONST 0x0431 ; Address of exception handler
03e2 0005 | | .CONST 0x0005 ; Number of locals
03e3 INIT_03e0:
03e3 00da | | Load_Top At_Offset_2
03e4 e013 | | Load 0x0,0x13
03e5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03e6 e015 | | Load 0x0,0x15
03e7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03e8 e014 | | Load 0x0,0x14
03e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ea e015 | | Load 0x0,0x15
03eb 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03ec BODY_03e0:
03ec 00cf | | Action Mark_Auxiliary
03ed e5fe | | Load 0x2,-0x2
03ee 01d9 | | Execute Vector,Reverse_Bounds
03ef 0263 | c | Execute Discrete,Above_Bound
03f0 703c |p< | Jump_Nonzero 0x42d
03f1 00d8 | | Load_Top At_Offset_0
03f2 e5fe | | Load 0x2,-0x2
03f3 01d7 | | Execute Vector,Field_Read
03f4 6836 |h6 | Jump_Zero 0x42b
03f5 00cf | | Action Mark_Auxiliary
03f6 e402 | | Load 0x2,0x2
03f7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03f8 01d9 | | Execute Vector,Reverse_Bounds
03f9 0263 | c | Execute Discrete,Above_Bound
03fa 700b |p | Jump_Nonzero 0x406
03fb e405 | | Load 0x2,0x5
03fc e408 | | Load 0x2,0x8
03fd 00da | | Load_Top At_Offset_2
03fe e402 | | Load 0x2,0x2
03ff 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0400 01d7 | | Execute Vector,Field_Read
0401 e5ff | | Load 0x2,-0x1
0402 8249 | I | Call 0x1,0x49
0403 c405 | | Store 0x2,0x5
0404 00c8 | | Action Pop_Auxiliary_Range
0405 3ff5 |? | Loop_Increasing 0x3fb
0406 00ce | | Action Pop_Auxiliary
0407 00db | | Load_Top At_Offset_3
0408 e015 | | Load 0x0,0x15
0409 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
040a 7020 |p | Jump_Nonzero 0x42b
040b 00d8 | | Load_Top At_Offset_0
040c e002 | | Load 0x0,0x2
040d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
040e 4801 |H | Short_Literal 0x1
040f 4801 |H | Short_Literal 0x1
0410 e012 | | Load 0x0,0x12
0411 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0412 035b | [ | Declare_Type Array,Constrained
0413 0337 | 7 | Declare_Variable Array
0414 e405 | | Load 0x2,0x5
0415 e015 | | Load 0x0,0x15
0416 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0417 4801 |H | Short_Literal 0x1
0418 00da | | Load_Top At_Offset_2
0419 01d6 | | Execute Vector,Field_Write
041a 4802 |H | Short_Literal 0x2
041b e403 | | Load 0x2,0x3
041c e015 | | Load 0x0,0x15
041d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
041e 00db | | Load_Top At_Offset_3
041f e015 | | Load 0x0,0x15
0420 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0421 7006 |p | Jump_Nonzero 0x428
0422 00db | | Load_Top At_Offset_3
0423 e015 | | Load 0x0,0x15
0424 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0425 e403 | | Load 0x2,0x3
0426 e015 | | Load 0x0,0x15
0427 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0428 e015 | | Load 0x0,0x15
0429 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
042a a405 | | Store_Unchecked 0x2,0x5
042b 00c8 | | Action Pop_Auxiliary_Range
042c 3fc4 |? | Loop_Increasing 0x3f1
042d 00ce | | Action Pop_Auxiliary
042e 00da | | Load_Top At_Offset_2
042f a5fd | | Store_Unchecked 0x2,-0x3
0430 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0431 TRAP_03e0:
0431 0007 | | Action Break_Optional
0432 4801 |H | Short_Literal 0x1
0433 4801 |H | Short_Literal 0x1
0434 e012 | | Load 0x0,0x12
0435 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0436 035b | [ | Declare_Type Array,Constrained
0437 0337 | 7 | Declare_Variable Array
0438 e5ff | | Load 0x2,-0x1
0439 e013 | | Load 0x0,0x13
043a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
043b 4801 |H | Short_Literal 0x1
043c 00da | | Load_Top At_Offset_2
043d 01d6 | | Execute Vector,Field_Write
043e 600d |` | Indirect_Literal Discrete,0x44c,{0x00000000, 0x00003808}
043f e014 | | Load 0x0,0x14
0440 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0441 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0442 00da | | Load_Top At_Offset_2
0443 e403 | | Load 0x2,0x3
0444 e015 | | Load 0x0,0x15
0445 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0446 00db | | Load_Top At_Offset_3
0447 a5fd | | Store_Unchecked 0x2,-0x3
0448 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0449 0000 0000 | | .XXX[0x3]
044b 0000 | |
044c 0000 0000 | | .LITERAL {0x00000000, 0x00003808}
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 046f | o | .CONST 0x046f ; Address of begin
0451 0522 | " | .CONST 0x0522 ; Address of exception handler
0452 000a | | .CONST 0x000a ; Number of locals
0453 INIT_0450:
0453 00da | | Load_Top At_Offset_2
0454 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0455 01da | | Execute Vector,Bounds
0456 e005 | | Load 0x0,0x5
0457 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0458 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0459 035b | [ | Declare_Type Array,Constrained
045a 0337 | 7 | Declare_Variable Array
045b 00db | | Load_Top At_Offset_3
045c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
045d 00d9 | | Load_Top At_Offset_1
045e 01d4 | | Execute Vector,Structure_Write
045f 00e2 | | Load_Encached Integer_Cache
0460 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0461 00e3 | | Load_Encached Natural_Cache
0462 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0463 00e3 | | Load_Encached Natural_Cache
0464 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0465 e015 | | Load 0x0,0x15
0466 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0467 e015 | | Load 0x0,0x15
0468 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0469 e015 | | Load 0x0,0x15
046a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
046b e014 | | Load 0x0,0x14
046c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046d 029f 123b | ;| Declare_Subprogram INIT_1238,For_Call
046f BODY_0450:
046f e5ff | | Load 0x2,-0x1
0470 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0471 7003 |p | Jump_Nonzero 0x475
0472 e406 | | Load 0x2,0x6
0473 a5fc | | Store_Unchecked 0x2,-0x4
0474 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0475 e403 | | Load 0x2,0x3
0476 e402 | | Load 0x2,0x2
0477 e240 | @ | Load 0x1,0x40
0478 e241 | A | Load 0x1,0x41
0479 e242 | B | Load 0x1,0x42
047a 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
047b 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
047c 8009 | | Call 0x0,0x9
047d 00d1 | | Pop_Control Pop_Count_1
047e c403 | | Store 0x2,0x3
047f 00cf | | Action Mark_Auxiliary
0480 e5fd | | Load 0x2,-0x3
0481 01d9 | | Execute Vector,Reverse_Bounds
0482 0263 | c | Execute Discrete,Above_Bound
0483 709a |p | Jump_Nonzero 0x51e
0484 00d8 | | Load_Top At_Offset_0
0485 e5fd | | Load 0x2,-0x3
0486 01d7 | | Execute Vector,Field_Read
0487 6894 |h | Jump_Zero 0x51c
0488 00cf | | Action Mark_Auxiliary
0489 7868 |xh | Jump 0x4f2
048a e405 | | Load 0x2,0x5
048b a404 | | Store_Unchecked 0x2,0x4
048c 840a | | Call 0x2,0xa
048d 00d9 | | Load_Top At_Offset_1
048e e002 | | Load 0x0,0x2
048f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0490 4801 |H | Short_Literal 0x1
0491 4801 |H | Short_Literal 0x1
0492 e012 | | Load 0x0,0x12
0493 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0494 035b | [ | Declare_Type Array,Constrained
0495 0337 | 7 | Declare_Variable Array
0496 e404 | | Load 0x2,0x4
0497 e402 | | Load 0x2,0x2
0498 01d7 | | Execute Vector,Field_Read
0499 e005 | | Load 0x0,0x5
049a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
049b 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
049c e005 | | Load 0x0,0x5
049d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
049e 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
049f 4801 |H | Short_Literal 0x1
04a0 00da | | Load_Top At_Offset_2
04a1 01d6 | | Execute Vector,Field_Write
04a2 4807 |H | Short_Literal 0x7
04a3 e407 | | Load 0x2,0x7
04a4 e015 | | Load 0x0,0x15
04a5 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
04a6 00cf | | Action Mark_Auxiliary
04a7 e405 | | Load 0x2,0x5
04a8 0aff | | Execute_Immediate Plus,-0x1
04a9 e404 | | Load 0x2,0x4
04aa 0263 | c | Execute Discrete,Above_Bound
04ab 701f |p | Jump_Nonzero 0x4cb
04ac 00d8 | | Load_Top At_Offset_0
04ad e402 | | Load 0x2,0x2
04ae 01d7 | | Execute Vector,Field_Read
04af e005 | | Load 0x0,0x5
04b0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04b1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
04b2 7016 |p | Jump_Nonzero 0x4c9
04b3 e40d | | Load 0x2,0xd
04b4 e002 | | Load 0x0,0x2
04b5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04b6 4801 |H | Short_Literal 0x1
04b7 4801 |H | Short_Literal 0x1
04b8 e012 | | Load 0x0,0x12
04b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04ba 035b | [ | Declare_Type Array,Constrained
04bb 0337 | 7 | Declare_Variable Array
04bc 00db | | Load_Top At_Offset_3
04bd e402 | | Load 0x2,0x2
04be 01d7 | | Execute Vector,Field_Read
04bf e005 | | Load 0x0,0x5
04c0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04c1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04c2 4801 |H | Short_Literal 0x1
04c3 00da | | Load_Top At_Offset_2
04c4 01d6 | | Execute Vector,Field_Write
04c5 480e |H | Short_Literal 0xe
04c6 e407 | | Load 0x2,0x7
04c7 e015 | | Load 0x0,0x15
04c8 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
04c9 00c8 | | Action Pop_Auxiliary_Range
04ca 3fe1 |? | Loop_Increasing 0x4ac
04cb 00ce | | Action Pop_Auxiliary
04cc e407 | | Load 0x2,0x7
04cd e015 | | Load 0x0,0x15
04ce 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
04cf 0e01 | | Execute_Immediate Not_Equal,0x1
04d0 6813 |h | Jump_Zero 0x4e4
04d1 00d9 | | Load_Top At_Offset_1
04d2 e002 | | Load 0x0,0x2
04d3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04d4 4801 |H | Short_Literal 0x1
04d5 4801 |H | Short_Literal 0x1
04d6 e012 | | Load 0x0,0x12
04d7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04d8 035b | [ | Declare_Type Array,Constrained
04d9 0337 | 7 | Declare_Variable Array
04da e407 | | Load 0x2,0x7
04db e015 | | Load 0x0,0x15
04dc 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
04dd 4801 |H | Short_Literal 0x1
04de 00da | | Load_Top At_Offset_2
04df 01d6 | | Execute Vector,Field_Write
04e0 4805 |H | Short_Literal 0x5
04e1 e408 | | Load 0x2,0x8
04e2 e015 | | Load 0x0,0x15
04e3 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
04e4 e407 | | Load 0x2,0x7
04e5 e015 | | Load 0x0,0x15
04e6 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
04e7 7006 |p | Jump_Nonzero 0x4ee
04e8 e407 | | Load 0x2,0x7
04e9 e015 | | Load 0x0,0x15
04ea 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
04eb e408 | | Load 0x2,0x8
04ec e015 | | Load 0x0,0x15
04ed 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
04ee e015 | | Load 0x0,0x15
04ef 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
04f0 a407 | | Store_Unchecked 0x2,0x7
04f1 00c9 | | Action Pop_Auxiliary_Loop
04f2 e405 | | Load 0x2,0x5
04f3 e402 | | Load 0x2,0x2
04f4 01dc | | Execute Vector,Last
04f5 027a | z | Execute Discrete,Less_Equal
04f6 7793 |w | Jump_Nonzero 0x48a
04f7 00ce | | Action Pop_Auxiliary
04f8 e408 | | Load 0x2,0x8
04f9 e015 | | Load 0x0,0x15
04fa 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
04fb 6820 |h | Jump_Zero 0x51c
04fc 00d8 | | Load_Top At_Offset_0
04fd e002 | | Load 0x0,0x2
04fe 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04ff 4801 |H | Short_Literal 0x1
0500 4801 |H | Short_Literal 0x1
0501 e012 | | Load 0x0,0x12
0502 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0503 035b | [ | Declare_Type Array,Constrained
0504 0337 | 7 | Declare_Variable Array
0505 e408 | | Load 0x2,0x8
0506 e015 | | Load 0x0,0x15
0507 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0508 4801 |H | Short_Literal 0x1
0509 00da | | Load_Top At_Offset_2
050a 01d6 | | Execute Vector,Field_Write
050b 4802 |H | Short_Literal 0x2
050c e406 | | Load 0x2,0x6
050d e015 | | Load 0x0,0x15
050e 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
050f e408 | | Load 0x2,0x8
0510 e015 | | Load 0x0,0x15
0511 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0512 7006 |p | Jump_Nonzero 0x519
0513 e408 | | Load 0x2,0x8
0514 e015 | | Load 0x0,0x15
0515 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0516 e406 | | Load 0x2,0x6
0517 e015 | | Load 0x0,0x15
0518 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0519 e015 | | Load 0x0,0x15
051a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
051b a408 | | Store_Unchecked 0x2,0x8
051c 00c8 | | Action Pop_Auxiliary_Range
051d 3f66 |?f | Loop_Increasing 0x484
051e 00ce | | Action Pop_Auxiliary
051f e406 | | Load 0x2,0x6
0520 a5fc | | Store_Unchecked 0x2,-0x4
0521 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0522 TRAP_0450:
0522 0007 | | Action Break_Optional
0523 4801 |H | Short_Literal 0x1
0524 4801 |H | Short_Literal 0x1
0525 e012 | | Load 0x0,0x12
0526 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0527 035b | [ | Declare_Type Array,Constrained
0528 0337 | 7 | Declare_Variable Array
0529 e404 | | Load 0x2,0x4
052a e5ff | | Load 0x2,-0x1
052b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
052c 01d7 | | Execute Vector,Field_Read
052d e005 | | Load 0x0,0x5
052e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
052f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0530 4801 |H | Short_Literal 0x1
0531 00da | | Load_Top At_Offset_2
0532 01d6 | | Execute Vector,Field_Write
0533 600c |` | Indirect_Literal Discrete,0x540,{0x00000000, 0x00003809}
0534 e014 | | Load 0x0,0x14
0535 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0536 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0537 00da | | Load_Top At_Offset_2
0538 e406 | | Load 0x2,0x6
0539 e015 | | Load 0x0,0x15
053a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
053b e406 | | Load 0x2,0x6
053c a5fc | | Store_Unchecked 0x2,-0x4
053d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
053e 0000 0000 | | .XXX[0x2]
0540 0000 0000 | | .LITERAL {0x00000000, 0x00003809}
0544 0000 0000 | | .BLANK 0000[0x4]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 055d | ] | .CONST 0x055d ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0007 | | .CONST 0x0007 ; Number of locals
054b INIT_0548:
054b e015 | | Load 0x0,0x15
054c 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
054d e015 | | Load 0x0,0x15
054e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
054f e5fe | | Load 0x2,-0x2
0550 e013 | | Load 0x0,0x13
0551 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0552 e016 | | Load 0x0,0x16
0553 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0554 4801 |H | Short_Literal 0x1
0555 00d9 | | Load_Top At_Offset_1
0556 01d7 | | Execute Vector,Field_Read
0557 0007 | | Action Break_Optional
0558 4802 |H | Short_Literal 0x2
0559 00da | | Load_Top At_Offset_2
055a 01d7 | | Execute Vector,Field_Read
055b 029f 1263 | c| Declare_Subprogram INIT_1260,For_Call
055d BODY_0548:
055d 00cf | | Action Mark_Auxiliary
055e e016 | | Load 0x0,0x16
055f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0560 01d9 | | Execute Vector,Reverse_Bounds
0561 0263 | c | Execute Discrete,Above_Bound
0562 7003 |p | Jump_Nonzero 0x566
0563 8407 | | Call 0x2,0x7
0564 00c8 | | Action Pop_Auxiliary_Range
0565 3ffd |? | Loop_Increasing 0x563
0566 00ce | | Action Pop_Auxiliary
0567 e403 | | Load 0x2,0x3
0568 a5fd | | Store_Unchecked 0x2,-0x3
0569 4503 |E | Exit_Suprogram New_Top_Offset 0x3
056a 0000 0000 | | .BLANK 0000[0x6]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 057d | } | .CONST 0x057d ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0006 | | .CONST 0x0006 ; Number of locals
0573 INIT_0570:
0573 e015 | | Load 0x0,0x15
0574 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0575 e015 | | Load 0x0,0x15
0576 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0577 e015 | | Load 0x0,0x15
0578 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0579 e015 | | Load 0x0,0x15
057a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
057b 029f 12ab | | Declare_Subprogram INIT_12a8,For_Call
057d BODY_0570:
057d e5fd | | Load 0x2,-0x3
057e 7002 |p | Jump_Nonzero 0x581
057f e5fc | | Load 0x2,-0x4
0580 682d |h- | Jump_Zero 0x5ae
0581 e5fe | | Load 0x2,-0x2
0582 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0583 680b |h | Jump_Zero 0x58f
0584 e015 | | Load 0x0,0x15
0585 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0586 e5f9 | | Load 0x2,-0x7
0587 e5ff | | Load 0x2,-0x1
0588 e5fa | | Load 0x2,-0x6
0589 e5ff | | Load 0x2,-0x1
058a e5fe | | Load 0x2,-0x2
058b 8220 | | Call 0x1,0x20
058c 8224 | $ | Call 0x1,0x24
058d 0032 | 2 | Store_Top Heap_Access,At_Offset_2
058e 7806 |x | Jump 0x595
058f e015 | | Load 0x0,0x15
0590 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0591 e5f9 | | Load 0x2,-0x7
0592 e5ff | | Load 0x2,-0x1
0593 8216 | | Call 0x1,0x16
0594 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0595 e5fd | | Load 0x2,-0x3
0596 6802 |h | Jump_Zero 0x599
0597 00d9 | | Load_Top At_Offset_1
0598 8406 | | Call 0x2,0x6
0599 e5fc | | Load 0x2,-0x4
059a 6813 |h | Jump_Zero 0x5ae
059b e5fe | | Load 0x2,-0x2
059c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
059d 6808 |h | Jump_Zero 0x5a6
059e e015 | | Load 0x0,0x15
059f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05a0 e5fe | | Load 0x2,-0x2
05a1 e5ff | | Load 0x2,-0x1
05a2 e405 | | Load 0x2,0x5
05a3 826d | m | Call 0x1,0x6d
05a4 c403 | | Store 0x2,0x3
05a5 7806 |x | Jump 0x5ac
05a6 e015 | | Load 0x0,0x15
05a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05a8 e5ff | | Load 0x2,-0x1
05a9 00db | | Load_Top At_Offset_3
05aa 821a | | Call 0x1,0x1a
05ab c403 | | Store 0x2,0x3
05ac 00db | | Load_Top At_Offset_3
05ad 8406 | | Call 0x2,0x6
05ae e5fb | | Load 0x2,-0x5
05af 6816 |h | Jump_Zero 0x5c6
05b0 e5fe | | Load 0x2,-0x2
05b1 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05b2 680b |h | Jump_Zero 0x5be
05b3 e015 | | Load 0x0,0x15
05b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b5 e5f9 | | Load 0x2,-0x7
05b6 e5ff | | Load 0x2,-0x1
05b7 4800 |H | Short_Literal 0x0
05b8 e5ff | | Load 0x2,-0x1
05b9 e5fe | | Load 0x2,-0x2
05ba 8220 | | Call 0x1,0x20
05bb 8225 | % | Call 0x1,0x25
05bc 0033 | 3 | Store_Top Heap_Access,At_Offset_3
05bd 7806 |x | Jump 0x5c4
05be e015 | | Load 0x0,0x15
05bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05c0 e5f9 | | Load 0x2,-0x7
05c1 e5ff | | Load 0x2,-0x1
05c2 8218 | | Call 0x1,0x18
05c3 0033 | 3 | Store_Top Heap_Access,At_Offset_3
05c4 00da | | Load_Top At_Offset_2
05c5 8406 | | Call 0x2,0x6
05c6 e402 | | Load 0x2,0x2
05c7 a5f8 | | Store_Unchecked 0x2,-0x8
05c8 4508 |E | Exit_Suprogram New_Top_Offset 0x8
05c9 0000 0000 | | .BLANK 0000[0x7]
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 e5fc | | Load 0x2,-0x4
05d4 e015 | | Load 0x0,0x15
05d5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
05d6 e014 | | Load 0x0,0x14
05d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d8 BODY_05d0:
05d8 4800 |H | Short_Literal 0x0
05d9 a5f9 | | Store_Unchecked 0x2,-0x7
05da 00cf | | Action Mark_Auxiliary
05db e5fb | | Load 0x2,-0x5
05dc 01d9 | | Execute Vector,Reverse_Bounds
05dd 0263 | c | Execute Discrete,Above_Bound
05de 705b |p[ | Jump_Nonzero 0x63a
05df 00cf | | Action Mark_Auxiliary
05e0 e402 | | Load 0x2,0x2
05e1 01d9 | | Execute Vector,Reverse_Bounds
05e2 0263 | c | Execute Discrete,Above_Bound
05e3 7053 |pS | Jump_Nonzero 0x637
05e4 00d8 | | Load_Top At_Offset_0
05e5 e402 | | Load 0x2,0x2
05e6 01d7 | | Execute Vector,Field_Read
05e7 e015 | | Load 0x0,0x15
05e8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05e9 e406 | | Load 0x2,0x6
05ea e5fb | | Load 0x2,-0x5
05eb 01d7 | | Execute Vector,Field_Read
05ec 027f | | Execute Discrete,Equal
05ed 6847 |hG | Jump_Zero 0x635
05ee e014 | | Load 0x0,0x14
05ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05f0 e5fa | | Load 0x2,-0x6
05f1 00d8 | | Load_Top At_Offset_0
05f2 0120 | | Execute Any,Is_Value
05f3 6803 |h | Jump_Zero 0x5f7
05f4 e5fd | | Load 0x2,-0x3
05f5 011e | | Execute Any,Convert
05f6 7802 |x | Jump 0x5f9
05f7 e5fd | | Load 0x2,-0x3
05f8 0119 | | Execute Any,Check_In_Formal_Type
05f9 00da | | Load_Top At_Offset_2
05fa e402 | | Load 0x2,0x2
05fb 01d7 | | Execute Vector,Field_Read
05fc 85fe | | Call 0x2,-0x2
05fd c5fa | | Store 0x2,-0x6
05fe c403 | | Store 0x2,0x3
05ff 4800 |H | Short_Literal 0x0
0600 e403 | | Load 0x2,0x3
0601 e014 | | Load 0x0,0x14
0602 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0603 7003 |p | Jump_Nonzero 0x607
0604 e403 | | Load 0x2,0x3
0605 a5f9 | | Store_Unchecked 0x2,-0x7
0606 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0607 4801 |H | Short_Literal 0x1
0608 00d9 | | Load_Top At_Offset_1
0609 e402 | | Load 0x2,0x2
060a 01d7 | | Execute Vector,Field_Read
060b e015 | | Load 0x0,0x15
060c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
060d 0f15 | | Execute_Immediate Equal,0x15
060e 6826 |h& | Jump_Zero 0x635
060f e014 | | Load 0x0,0x14
0610 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0611 e5fa | | Load 0x2,-0x6
0612 00d8 | | Load_Top At_Offset_0
0613 0120 | | Execute Any,Is_Value
0614 6803 |h | Jump_Zero 0x618
0615 e5fd | | Load 0x2,-0x3
0616 011e | | Execute Any,Convert
0617 7802 |x | Jump 0x61a
0618 e5fd | | Load 0x2,-0x3
0619 0119 | | Execute Any,Check_In_Formal_Type
061a e5fb | | Load 0x2,-0x5
061b 4801 |H | Short_Literal 0x1
061c e409 | | Load 0x2,0x9
061d e402 | | Load 0x2,0x2
061e 01d7 | | Execute Vector,Field_Read
061f e015 | | Load 0x0,0x15
0620 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0621 e015 | | Load 0x0,0x15
0622 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0623 e5fd | | Load 0x2,-0x3
0624 4ffe |O | Short_Literal -0x2
0625 4802 |H | Short_Literal 0x2
0626 0099 | | Action Reference_Dynamic
0627 4fff |O | Short_Literal -0x1
0628 4802 |H | Short_Literal 0x2
0629 0099 | | Action Reference_Dynamic
062a 8226 | & | Call 0x1,0x26
062b c5fa | | Store 0x2,-0x6
062c c403 | | Store 0x2,0x3
062d 4800 |H | Short_Literal 0x0
062e e403 | | Load 0x2,0x3
062f e014 | | Load 0x0,0x14
0630 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0631 7003 |p | Jump_Nonzero 0x635
0632 e403 | | Load 0x2,0x3
0633 a5f9 | | Store_Unchecked 0x2,-0x7
0634 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0635 00c8 | | Action Pop_Auxiliary_Range
0636 3fad |? | Loop_Increasing 0x5e4
0637 00ce | | Action Pop_Auxiliary
0638 00c8 | | Action Pop_Auxiliary_Range
0639 3fa5 |? | Loop_Increasing 0x5df
063a 4506 |E | Exit_Suprogram New_Top_Offset 0x6
063b 0000 0000 | | .BLANK 0000[0x5]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 064b | K | .CONST 0x064b ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0003 | | .CONST 0x0003 ; Number of locals
0643 INIT_0640:
0643 e014 | | Load 0x0,0x14
0644 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0645 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0646 e001 | | Load 0x0,0x1
0647 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0648 02c7 | | Declare_Variable Any
0649 00d8 | | Load_Top At_Offset_0
064a 1c00 | | Execute_Immediate Run_Utility,0x0
064b BODY_0640:
064b 00d9 | | Load_Top At_Offset_1
064c 00d9 | | Load_Top At_Offset_1
064d 0120 | | Execute Any,Is_Value
064e 6803 |h | Jump_Zero 0x652
064f e001 | | Load 0x0,0x1
0650 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0651 7801 |x | Jump 0x653
0652 00d9 | | Load_Top At_Offset_1
0653 e5ff | | Load 0x2,-0x1
0654 e005 | | Load 0x0,0x5
0655 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0656 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0657 c403 | | Store 0x2,0x3
0658 005a | Z | Store_Top Discrete,At_Offset_2
0659 4800 |H | Short_Literal 0x0
065a 00da | | Load_Top At_Offset_2
065b e014 | | Load 0x0,0x14
065c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
065d 7002 |p | Jump_Nonzero 0x660
065e 4800 |H | Short_Literal 0x0
065f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0660 00d8 | | Load_Top At_Offset_0
0661 e001 | | Load 0x0,0x1
0662 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0663 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0664 0000 0000 | | .BLANK 0000[0x4]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 0677 | w | .CONST 0x0677 ; Address of begin
0669 0004 | | .CONST 0x0004 ; Address of exception handler
066a 0003 | | .CONST 0x0003 ; Number of locals
066b INIT_0668:
066b 00da | | Load_Top At_Offset_2
066c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
066d e5fe | | Load 0x2,-0x2
066e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
066f 0273 | s | Execute Discrete,Plus
0670 00e3 | | Load_Encached Natural_Cache
0671 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0672 00d8 | | Load_Top At_Offset_0
0673 e005 | | Load 0x0,0x5
0674 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0675 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0676 1c08 | | Execute_Immediate Run_Utility,0x8
0677 BODY_0668:
0677 e5fe | | Load 0x2,-0x2
0678 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0679 7002 |p | Jump_Nonzero 0x67c
067a e5ff | | Load 0x2,-0x1
067b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
067c e5ff | | Load 0x2,-0x1
067d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
067e 7002 |p | Jump_Nonzero 0x681
067f e5fe | | Load 0x2,-0x2
0680 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0681 4800 |H | Short_Literal 0x0
0682 e5ff | | Load 0x2,-0x1
0683 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0684 e014 | | Load 0x0,0x14
0685 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0686 7005 |p | Jump_Nonzero 0x68c
0687 e5ff | | Load 0x2,-0x1
0688 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0689 00d9 | | Load_Top At_Offset_1
068a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
068b 780e |x | Jump 0x69a
068c 4800 |H | Short_Literal 0x0
068d e5fe | | Load 0x2,-0x2
068e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
068f e014 | | Load 0x0,0x14
0690 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0691 7005 |p | Jump_Nonzero 0x697
0692 e5fe | | Load 0x2,-0x2
0693 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0694 00d9 | | Load_Top At_Offset_1
0695 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0696 7803 |x | Jump 0x69a
0697 4800 |H | Short_Literal 0x0
0698 00d9 | | Load_Top At_Offset_1
0699 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
069a e5ff | | Load 0x2,-0x1
069b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
069c 4801 |H | Short_Literal 0x1
069d e5ff | | Load 0x2,-0x1
069e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
069f 00db | | Load_Top At_Offset_3
06a0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06a1 01ce | | Execute Vector,Slice_Write
06a2 e5fe | | Load 0x2,-0x2
06a3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06a4 e5ff | | Load 0x2,-0x1
06a5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06a6 0a01 | | Execute_Immediate Plus,0x1
06a7 00d8 | | Load_Top At_Offset_0
06a8 00e2 | | Load_Encached Integer_Cache
06a9 0260 | ` | Execute Discrete,In_Type
06aa 7001 |p | Jump_Nonzero 0x6ac
06ab 0801 | | Execute_Immediate Raise,0x1
06ac 00da | | Load_Top At_Offset_2
06ad 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06ae 01dc | | Execute Vector,Last
06af 00db | | Load_Top At_Offset_3
06b0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06b1 01ce | | Execute Vector,Slice_Write
06b2 00d8 | | Load_Top At_Offset_0
06b3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06b4 0000 0000 | | .BLANK 0000[0x4]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06c2 | | .CONST 0x06c2 ; Address of begin
06b9 0004 | | .CONST 0x0004 ; Address of exception handler
06ba 0002 | | .CONST 0x0002 ; Number of locals
06bb INIT_06b8:
06bb 00da | | Load_Top At_Offset_2
06bc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06bd 0a01 | | Execute_Immediate Plus,0x1
06be e005 | | Load 0x0,0x5
06bf 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06c0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06c1 1c08 | | Execute_Immediate Run_Utility,0x8
06c2 BODY_06b8:
06c2 00db | | Load_Top At_Offset_3
06c3 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06c4 7009 |p | Jump_Nonzero 0x6ce
06c5 4800 |H | Short_Literal 0x0
06c6 00d9 | | Load_Top At_Offset_1
06c7 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06c8 e5fe | | Load 0x2,-0x2
06c9 4801 |H | Short_Literal 0x1
06ca 00da | | Load_Top At_Offset_2
06cb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06cc 01d6 | | Execute Vector,Field_Write
06cd 7813 |x | Jump 0x6e1
06ce 00db | | Load_Top At_Offset_3
06cf 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06d0 00d9 | | Load_Top At_Offset_1
06d1 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06d2 00db | | Load_Top At_Offset_3
06d3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06d4 4801 |H | Short_Literal 0x1
06d5 e5ff | | Load 0x2,-0x1
06d6 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06d7 00db | | Load_Top At_Offset_3
06d8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06d9 01ce | | Execute Vector,Slice_Write
06da e5fe | | Load 0x2,-0x2
06db 00d9 | | Load_Top At_Offset_1
06dc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06dd 01dc | | Execute Vector,Last
06de 00da | | Load_Top At_Offset_2
06df 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06e0 01d6 | | Execute Vector,Field_Write
06e1 00d8 | | Load_Top At_Offset_0
06e2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06e3 0000 0000 | | .BLANK 0000[0x5]
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 00da | | Load_Top At_Offset_2
06ec e013 | | Load 0x0,0x13
06ed 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
06ee 00e3 | | Load_Encached Natural_Cache
06ef 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06f0 BODY_06e8:
06f0 00cf | | Action Mark_Auxiliary
06f1 00da | | Load_Top At_Offset_2
06f2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06f3 01d9 | | Execute Vector,Reverse_Bounds
06f4 0263 | c | Execute Discrete,Above_Bound
06f5 700c |p | Jump_Nonzero 0x702
06f6 00db | | Load_Top At_Offset_3
06f7 00d9 | | Load_Top At_Offset_1
06f8 e402 | | Load 0x2,0x2
06f9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06fa 01d7 | | Execute Vector,Field_Read
06fb e005 | | Load 0x0,0x5
06fc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06fd 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
06fe 0273 | s | Execute Discrete,Plus
06ff c403 | | Store 0x2,0x3
0700 00c8 | | Action Pop_Auxiliary_Range
0701 3ff4 |? | Loop_Increasing 0x6f6
0702 00ce | | Action Pop_Auxiliary
0703 00d8 | | Load_Top At_Offset_0
0704 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0705 0000 0000 | | .XXX[0x3]
0707 0000 | |
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070d | | .CONST 0x070d ; Address of begin
0709 0004 | | .CONST 0x0004 ; Address of exception handler
070a 0002 | | .CONST 0x0002 ; Number of locals
070b INIT_0708:
070b 00e3 | | Load_Encached Natural_Cache
070c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
070d BODY_0708:
070d 00cf | | Action Mark_Auxiliary
070e e5ff | | Load 0x2,-0x1
070f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0710 01d9 | | Execute Vector,Reverse_Bounds
0711 0263 | c | Execute Discrete,Above_Bound
0712 700c |p | Jump_Nonzero 0x71f
0713 00db | | Load_Top At_Offset_3
0714 00d9 | | Load_Top At_Offset_1
0715 e5ff | | Load 0x2,-0x1
0716 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0717 01d7 | | Execute Vector,Field_Read
0718 e005 | | Load 0x0,0x5
0719 1b16 | | Execute Package,Field_Read,Field_Number 0x16
071a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
071b 0273 | s | Execute Discrete,Plus
071c c402 | | Store 0x2,0x2
071d 00c8 | | Action Pop_Auxiliary_Range
071e 3ff4 |? | Loop_Increasing 0x713
071f 00ce | | Action Pop_Auxiliary
0720 00d8 | | Load_Top At_Offset_0
0721 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0722 0000 0000 | | .BLANK 0000[0x6]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072e | . | .CONST 0x072e ; Address of begin
0729 0004 | | .CONST 0x0004 ; Address of exception handler
072a 0003 | | .CONST 0x0003 ; Number of locals
072b INIT_0728:
072b 00e1 | | Load_Encached Boolean_Cache
072c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
072d 00e1 | | Load_Encached Boolean_Cache
072e BODY_0728:
072e e5fe | | Load 0x2,-0x2
072f 680c |h | Jump_Zero 0x73c
0730 00e1 | | Load_Encached Boolean_Cache
0731 00da | | Load_Top At_Offset_2
0732 e5fd | | Load 0x2,-0x3
0733 e5ff | | Load 0x2,-0x1
0734 e22a | * | Load 0x1,0x2a
0735 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0736 005b | [ | Store_Top Discrete,At_Offset_3
0737 0059 | Y | Store_Top Discrete,At_Offset_1
0738 00d8 | | Load_Top At_Offset_0
0739 6802 |h | Jump_Zero 0x73c
073a 00d9 | | Load_Top At_Offset_1
073b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
073c 4800 |H | Short_Literal 0x0
073d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
073e 0000 0000 | | .XXX[0x2]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0756 | V | .CONST 0x0756 ; Address of begin
0741 0004 | | .CONST 0x0004 ; Address of exception handler
0742 0006 | | .CONST 0x0006 ; Number of locals
0743 INIT_0740:
0743 00da | | Load_Top At_Offset_2
0744 e005 | | Load 0x0,0x5
0745 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0746 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0747 00d8 | | Load_Top At_Offset_0
0748 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0749 e005 | | Load 0x0,0x5
074a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
074b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
074c 1c08 | | Execute_Immediate Run_Utility,0x8
074d 00e3 | | Load_Encached Natural_Cache
074e 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
074f e005 | | Load 0x0,0x5
0750 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0751 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0752 e005 | | Load 0x0,0x5
0753 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0754 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0755 0337 | 7 | Declare_Variable Array
0756 BODY_0740:
0756 e402 | | Load 0x2,0x2
0757 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0758 e403 | | Load 0x2,0x3
0759 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
075a 00cf | | Action Mark_Auxiliary
075b e402 | | Load 0x2,0x2
075c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
075d 01d9 | | Execute Vector,Reverse_Bounds
075e 0263 | c | Execute Discrete,Above_Bound
075f 7029 |p) | Jump_Nonzero 0x789
0760 00d8 | | Load_Top At_Offset_0
0761 e402 | | Load 0x2,0x2
0762 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0763 01d7 | | Execute Vector,Field_Read
0764 a405 | | Store_Unchecked 0x2,0x5
0765 e405 | | Load 0x2,0x5
0766 e5ff | | Load 0x2,-0x1
0767 e005 | | Load 0x0,0x5
0768 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0769 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
076a e406 | | Load 0x2,0x6
076b 01d4 | | Execute Vector,Structure_Write
076c e5fe | | Load 0x2,-0x2
076d 6804 |h | Jump_Zero 0x772
076e e5fe | | Load 0x2,-0x2
076f e406 | | Load 0x2,0x6
0770 01d7 | | Execute Vector,Field_Read
0771 6815 |h | Jump_Zero 0x787
0772 e405 | | Load 0x2,0x5
0773 e5fc | | Load 0x2,-0x4
0774 e5fd | | Load 0x2,-0x3
0775 8232 | 2 | Call 0x1,0x32
0776 7010 |p | Jump_Nonzero 0x787
0777 e405 | | Load 0x2,0x5
0778 e404 | | Load 0x2,0x4
0779 e403 | | Load 0x2,0x3
077a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
077b 01d6 | | Execute Vector,Field_Write
077c e404 | | Load 0x2,0x4
077d 0a01 | | Execute_Immediate Plus,0x1
077e c404 | | Store 0x2,0x4
077f e5fc | | Load 0x2,-0x4
0780 6806 |h | Jump_Zero 0x787
0781 4801 |H | Short_Literal 0x1
0782 4801 |H | Short_Literal 0x1
0783 e405 | | Load 0x2,0x5
0784 e5fd | | Load 0x2,-0x3
0785 e22a | * | Load 0x1,0x2a
0786 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0787 00c8 | | Action Pop_Auxiliary_Range
0788 3fd7 |? | Loop_Increasing 0x760
0789 00ce | | Action Pop_Auxiliary
078a 00da | | Load_Top At_Offset_2
078b 0aff | | Execute_Immediate Plus,-0x1
078c e005 | | Load 0x0,0x5
078d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
078e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
078f 1c08 | | Execute_Immediate Run_Utility,0x8
0790 4801 |H | Short_Literal 0x1
0791 e404 | | Load 0x2,0x4
0792 0aff | | Execute_Immediate Plus,-0x1
0793 e403 | | Load 0x2,0x3
0794 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0795 01cf | | Execute Vector,Slice_Read
0796 00d9 | | Load_Top At_Offset_1
0797 00d8 | | Load_Top At_Offset_0
0798 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0799 00da | | Load_Top At_Offset_2
079a 01da | | Execute Vector,Bounds
079b 00da | | Load_Top At_Offset_2
079c 01da | | Execute Vector,Bounds
079d 00da | | Load_Top At_Offset_2
079e 027f | | Execute Discrete,Equal
079f 7001 |p | Jump_Nonzero 0x7a1
07a0 08e0 | | Execute_Immediate Raise,0xe0
07a1 00cd | | Action Spare6_Action
07a2 027f | | Execute Discrete,Equal
07a3 7001 |p | Jump_Nonzero 0x7a5
07a4 08e0 | | Execute_Immediate Raise,0xe0
07a5 00d2 | | Pop_Control Pop_Count_2
07a6 00d9 | | Load_Top At_Offset_1
07a7 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
07a8 e403 | | Load 0x2,0x3
07a9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07aa 00d9 | | Load_Top At_Offset_1
07ab 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07ac 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
07ad 0000 0000 | | .XXX[0x3]
07af 0000 | |
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3 | | .CONST 0x07b3 ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0001 | | .CONST 0x0001 ; Number of locals
07b3 BODY_07b0:
07b3 INIT_07b0:
07b3 4800 |H | Short_Literal 0x0
07b4 a5fd | | Store_Unchecked 0x2,-0x3
07b5 00cf | | Action Mark_Auxiliary
07b6 00db | | Load_Top At_Offset_3
07b7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07b8 01d9 | | Execute Vector,Reverse_Bounds
07b9 0263 | c | Execute Discrete,Above_Bound
07ba 7011 |p | Jump_Nonzero 0x7cc
07bb 4801 |H | Short_Literal 0x1
07bc 00d9 | | Load_Top At_Offset_1
07bd e5ff | | Load 0x2,-0x1
07be 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07bf 01d7 | | Execute Vector,Field_Read
07c0 e005 | | Load 0x0,0x5
07c1 1b15 | | Execute Package,Field_Read,Field_Number 0x15
07c2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07c3 e5fe | | Load 0x2,-0x2
07c4 e017 | | Load 0x0,0x17
07c5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07c6 6803 |h | Jump_Zero 0x7ca
07c7 00d8 | | Load_Top At_Offset_0
07c8 a5fd | | Store_Unchecked 0x2,-0x3
07c9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07ca 00c8 | | Action Pop_Auxiliary_Range
07cb 3fef |? | Loop_Increasing 0x7bb
07cc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07cd 0000 0000 | | .XXX[0x3]
07cf 0000 | |
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07ef | | .CONST 0x07ef ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0009 | | .CONST 0x0009 ; Number of locals
07d3 INIT_07d0:
07d3 00da | | Load_Top At_Offset_2
07d4 e005 | | Load 0x0,0x5
07d5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07d6 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
07d7 00d8 | | Load_Top At_Offset_0
07d8 e005 | | Load 0x0,0x5
07d9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07da 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
07db e5ff | | Load 0x2,-0x1
07dc e005 | | Load 0x0,0x5
07dd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07de 181c | | Execute Package,Field_Execute,Field_Number 0x1c
07df e005 | | Load 0x0,0x5
07e0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07e1 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
07e2 e014 | | Load 0x0,0x14
07e3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07e4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
07e5 e5fe | | Load 0x2,-0x2
07e6 8231 | 1 | Call 0x1,0x31
07e7 e005 | | Load 0x0,0x5
07e8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07ea 1c08 | | Execute_Immediate Run_Utility,0x8
07eb 00e3 | | Load_Encached Natural_Cache
07ec 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
07ed 029f 12cb | | Declare_Subprogram INIT_12c8,For_Call
07ef BODY_07d0:
07ef 4800 |H | Short_Literal 0x0
07f0 00db | | Load_Top At_Offset_3
07f1 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07f2 00cf | | Action Mark_Auxiliary
07f3 e5fe | | Load 0x2,-0x2
07f4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07f5 01d9 | | Execute Vector,Reverse_Bounds
07f6 0263 | c | Execute Discrete,Above_Bound
07f7 702f |p/ | Jump_Nonzero 0x827
07f8 4800 |H | Short_Literal 0x0
07f9 00d9 | | Load_Top At_Offset_1
07fa e5fe | | Load 0x2,-0x2
07fb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07fc 01d7 | | Execute Vector,Field_Read
07fd e005 | | Load 0x0,0x5
07fe 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07ff 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0800 e403 | | Load 0x2,0x3
0801 e017 | | Load 0x0,0x17
0802 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0803 7021 |p! | Jump_Nonzero 0x825
0804 00d8 | | Load_Top At_Offset_0
0805 e5fe | | Load 0x2,-0x2
0806 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0807 01d7 | | Execute Vector,Field_Read
0808 e402 | | Load 0x2,0x2
0809 e005 | | Load 0x0,0x5
080a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
080b 1884 | | Execute Package,Field_Execute,Field_Number 0x84
080c 6818 |h | Jump_Zero 0x825
080d e406 | | Load 0x2,0x6
080e e005 | | Load 0x0,0x5
080f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0810 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0811 00da | | Load_Top At_Offset_2
0812 e5fe | | Load 0x2,-0x2
0813 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0814 01d7 | | Execute Vector,Field_Read
0815 e402 | | Load 0x2,0x2
0816 e005 | | Load 0x0,0x5
0817 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0818 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0819 c405 | | Store 0x2,0x5
081a c406 | | Store 0x2,0x6
081b 4800 |H | Short_Literal 0x0
081c e406 | | Load 0x2,0x6
081d e014 | | Load 0x0,0x14
081e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
081f 6802 |h | Jump_Zero 0x822
0820 8409 | | Call 0x2,0x9
0821 7803 |x | Jump 0x825
0822 e406 | | Load 0x2,0x6
0823 e407 | | Load 0x2,0x7
0824 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0825 00c8 | | Action Pop_Auxiliary_Range
0826 3fd1 |? | Loop_Increasing 0x7f8
0827 00ce | | Action Pop_Auxiliary
0828 00d9 | | Load_Top At_Offset_1
0829 0aff | | Execute_Immediate Plus,-0x1
082a e005 | | Load 0x0,0x5
082b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
082c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
082d 1c08 | | Execute_Immediate Run_Utility,0x8
082e 4801 |H | Short_Literal 0x1
082f 00db | | Load_Top At_Offset_3
0830 0aff | | Execute_Immediate Plus,-0x1
0831 e407 | | Load 0x2,0x7
0832 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0833 01cf | | Execute Vector,Slice_Read
0834 00d9 | | Load_Top At_Offset_1
0835 00d8 | | Load_Top At_Offset_0
0836 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0837 00da | | Load_Top At_Offset_2
0838 01da | | Execute Vector,Bounds
0839 00da | | Load_Top At_Offset_2
083a 01da | | Execute Vector,Bounds
083b 00da | | Load_Top At_Offset_2
083c 027f | | Execute Discrete,Equal
083d 7001 |p | Jump_Nonzero 0x83f
083e 08e0 | | Execute_Immediate Raise,0xe0
083f 00cd | | Action Spare6_Action
0840 027f | | Execute Discrete,Equal
0841 7001 |p | Jump_Nonzero 0x843
0842 08e0 | | Execute_Immediate Raise,0xe0
0843 00d2 | | Pop_Control Pop_Count_2
0844 00d9 | | Load_Top At_Offset_1
0845 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0846 00db | | Load_Top At_Offset_3
0847 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0848 00d9 | | Load_Top At_Offset_1
0849 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
084a 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
084b 0000 0000 | | .BLANK 0000[0x5]
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 0860 | ` | .CONST 0x0860 ; Address of begin
0851 0004 | | .CONST 0x0004 ; Address of exception handler
0852 0005 | | .CONST 0x0005 ; Number of locals
0853 INIT_0850:
0853 e005 | | Load 0x0,0x5
0854 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0855 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0856 e014 | | Load 0x0,0x14
0857 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0858 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0859 4800 |H | Short_Literal 0x0
085a e005 | | Load 0x0,0x5
085b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
085c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
085d 1c08 | | Execute_Immediate Run_Utility,0x8
085e 029f 12e3 | | Declare_Subprogram INIT_12e0,For_Call
0860 BODY_0850:
0860 00da | | Load_Top At_Offset_2
0861 e005 | | Load 0x0,0x5
0862 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0863 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0864 e5ff | | Load 0x2,-0x1
0865 e005 | | Load 0x0,0x5
0866 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0867 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0868 c402 | | Store 0x2,0x2
0869 005b | [ | Store_Top Discrete,At_Offset_3
086a 4800 |H | Short_Literal 0x0
086b 00db | | Load_Top At_Offset_3
086c e014 | | Load 0x0,0x14
086d 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
086e 7005 |p | Jump_Nonzero 0x874
086f 00da | | Load_Top At_Offset_2
0870 00da | | Load_Top At_Offset_2
0871 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0872 00d9 | | Load_Top At_Offset_1
0873 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0874 8405 | | Call 0x2,0x5
0875 0831 | 1 | Execute_Immediate Raise,0x31
0876 0000 0000 | | .XXX[0x2]
0878 ; --------------------------------------------------------------------------------------
0878 ; SUBPROGRAM
0878 ; --------------------------------------------------------------------------------------
0878 0885 | | .CONST 0x0885 ; Address of begin
0879 0004 | | .CONST 0x0004 ; Address of exception handler
087a 0004 | | .CONST 0x0004 ; Number of locals
087b INIT_0878:
087b 00db | | Load_Top At_Offset_3
087c 8230 | 0 | Call 0x1,0x30
087d e005 | | Load 0x0,0x5
087e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
087f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0880 1c08 | | Execute_Immediate Run_Utility,0x8
0881 00e3 | | Load_Encached Natural_Cache
0882 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0883 029f 12fb | | Declare_Subprogram INIT_12f8,For_Call
0885 BODY_0878:
0885 e5ff | | Load 0x2,-0x1
0886 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0887 00db | | Load_Top At_Offset_3
0888 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0889 00cf | | Action Mark_Auxiliary
088a e5ff | | Load 0x2,-0x1
088b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
088c 01d9 | | Execute Vector,Reverse_Bounds
088d 0263 | c | Execute Discrete,Above_Bound
088e 7003 |p | Jump_Nonzero 0x892
088f 8404 | | Call 0x2,0x4
0890 00c8 | | Action Pop_Auxiliary_Range
0891 3ffd |? | Loop_Increasing 0x88f
0892 00ce | | Action Pop_Auxiliary
0893 00d9 | | Load_Top At_Offset_1
0894 0aff | | Execute_Immediate Plus,-0x1
0895 e005 | | Load 0x0,0x5
0896 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0897 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0898 1c08 | | Execute_Immediate Run_Utility,0x8
0899 4801 |H | Short_Literal 0x1
089a 00db | | Load_Top At_Offset_3
089b 0aff | | Execute_Immediate Plus,-0x1
089c e402 | | Load 0x2,0x2
089d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
089e 01cf | | Execute Vector,Slice_Read
089f 00d9 | | Load_Top At_Offset_1
08a0 00d8 | | Load_Top At_Offset_0
08a1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08a2 00da | | Load_Top At_Offset_2
08a3 01da | | Execute Vector,Bounds
08a4 00da | | Load_Top At_Offset_2
08a5 01da | | Execute Vector,Bounds
08a6 00da | | Load_Top At_Offset_2
08a7 027f | | Execute Discrete,Equal
08a8 7001 |p | Jump_Nonzero 0x8aa
08a9 08e0 | | Execute_Immediate Raise,0xe0
08aa 00cd | | Action Spare6_Action
08ab 027f | | Execute Discrete,Equal
08ac 7001 |p | Jump_Nonzero 0x8ae
08ad 08e0 | | Execute_Immediate Raise,0xe0
08ae 00d2 | | Pop_Control Pop_Count_2
08af 00d9 | | Load_Top At_Offset_1
08b0 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
08b1 00db | | Load_Top At_Offset_3
08b2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08b3 00d9 | | Load_Top At_Offset_1
08b4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
08b5 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
08b6 0000 0000 | | .XXX[0x2]
08b8 ; --------------------------------------------------------------------------------------
08b8 ; SUBPROGRAM
08b8 ; --------------------------------------------------------------------------------------
08b8 08bb | | .CONST 0x08bb ; Address of begin
08b9 0004 | | .CONST 0x0004 ; Address of exception handler
08ba 0001 | | .CONST 0x0001 ; Number of locals
08bb BODY_08b8:
08bb INIT_08b8:
08bb 00da | | Load_Top At_Offset_2
08bc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08bd 7002 |p | Jump_Nonzero 0x8c0
08be 00da | | Load_Top At_Offset_2
08bf 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
08c0 00cf | | Action Mark_Auxiliary
08c1 00db | | Load_Top At_Offset_3
08c2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08c3 01d9 | | Execute Vector,Reverse_Bounds
08c4 0263 | c | Execute Discrete,Above_Bound
08c5 700b |p | Jump_Nonzero 0x8d1
08c6 4800 |H | Short_Literal 0x0
08c7 4801 |H | Short_Literal 0x1
08c8 00da | | Load_Top At_Offset_2
08c9 e5ff | | Load 0x2,-0x1
08ca 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08cb 01d7 | | Execute Vector,Field_Read
08cc e5fd | | Load 0x2,-0x3
08cd e22a | * | Load 0x1,0x2a
08ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08cf 00c8 | | Action Pop_Auxiliary_Range
08d0 3ff5 |? | Loop_Increasing 0x8c6
08d1 00ce | | Action Pop_Auxiliary
08d2 e5fd | | Load 0x2,-0x3
08d3 e5fe | | Load 0x2,-0x2
08d4 4801 |H | Short_Literal 0x1
08d5 e5fd | | Load 0x2,-0x3
08d6 e5fe | | Load 0x2,-0x2
08d7 e5ff | | Load 0x2,-0x1
08d8 8237 | 7 | Call 0x1,0x37
08d9 8238 | 8 | Call 0x1,0x38
08da 00db | | Load_Top At_Offset_3
08db 822e | . | Call 0x1,0x2e
08dc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
08dd 0000 0000 | | .XXX[0x3]
08df 0000 | |
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08f2 | | .CONST 0x08f2 ; Address of begin
08e1 0004 | | .CONST 0x0004 ; Address of exception handler
08e2 0006 | | .CONST 0x0006 ; Number of locals
08e3 INIT_08e0:
08e3 00db | | Load_Top At_Offset_3
08e4 8230 | 0 | Call 0x1,0x30
08e5 e005 | | Load 0x0,0x5
08e6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08e7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08e8 1c08 | | Execute_Immediate Run_Utility,0x8
08e9 00e3 | | Load_Encached Natural_Cache
08ea 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
08eb e005 | | Load 0x0,0x5
08ec 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ee 029f 132b | +| Declare_Subprogram INIT_1328,For_Call
08f0 029f 134b | K| Declare_Subprogram INIT_1348,For_Call
08f2 BODY_08e0:
08f2 00cf | | Action Mark_Auxiliary
08f3 e5ff | | Load 0x2,-0x1
08f4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08f5 01d9 | | Execute Vector,Reverse_Bounds
08f6 0263 | c | Execute Discrete,Above_Bound
08f7 7021 |p! | Jump_Nonzero 0x919
08f8 00d8 | | Load_Top At_Offset_0
08f9 e5ff | | Load 0x2,-0x1
08fa 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08fb 01d7 | | Execute Vector,Field_Read
08fc e403 | | Load 0x2,0x3
08fd e402 | | Load 0x2,0x2
08fe 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08ff 01d6 | | Execute Vector,Field_Write
0900 e403 | | Load 0x2,0x3
0901 0a01 | | Execute_Immediate Plus,0x1
0902 c403 | | Store 0x2,0x3
0903 00d8 | | Load_Top At_Offset_0
0904 e5ff | | Load 0x2,-0x1
0905 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0906 01d7 | | Execute Vector,Field_Read
0907 e005 | | Load 0x0,0x5
0908 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0909 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
090a a404 | | Store_Unchecked 0x2,0x4
090b e404 | | Load 0x2,0x4
090c e005 | | Load 0x0,0x5
090d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
090e 180f | | Execute Package,Field_Execute,Field_Number 0xf
090f 7007 |p | Jump_Nonzero 0x917
0910 e404 | | Load 0x2,0x4
0911 8405 | | Call 0x2,0x5
0912 e404 | | Load 0x2,0x4
0913 e005 | | Load 0x0,0x5
0914 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0915 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
0916 8406 | | Call 0x2,0x6
0917 00c8 | | Action Pop_Auxiliary_Range
0918 3fdf |? | Loop_Increasing 0x8f8
0919 00ce | | Action Pop_Auxiliary
091a 00db | | Load_Top At_Offset_3
091b 0aff | | Execute_Immediate Plus,-0x1
091c e005 | | Load 0x0,0x5
091d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
091e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
091f 1c08 | | Execute_Immediate Run_Utility,0x8
0920 e5ff | | Load 0x2,-0x1
0921 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0922 00d9 | | Load_Top At_Offset_1
0923 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0924 4801 |H | Short_Literal 0x1
0925 e403 | | Load 0x2,0x3
0926 0aff | | Execute_Immediate Plus,-0x1
0927 e402 | | Load 0x2,0x2
0928 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0929 01cf | | Execute Vector,Slice_Read
092a 00d9 | | Load_Top At_Offset_1
092b 00d8 | | Load_Top At_Offset_0
092c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
092d 00da | | Load_Top At_Offset_2
092e 01da | | Execute Vector,Bounds
092f 00da | | Load_Top At_Offset_2
0930 01da | | Execute Vector,Bounds
0931 00da | | Load_Top At_Offset_2
0932 027f | | Execute Discrete,Equal
0933 7001 |p | Jump_Nonzero 0x935
0934 08e0 | | Execute_Immediate Raise,0xe0
0935 00cd | | Action Spare6_Action
0936 027f | | Execute Discrete,Equal
0937 7001 |p | Jump_Nonzero 0x939
0938 08e0 | | Execute_Immediate Raise,0xe0
0939 00d2 | | Pop_Control Pop_Count_2
093a 00d9 | | Load_Top At_Offset_1
093b 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
093c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
093d 0000 0000 | | .XXX[0x3]
093f 0000 | |
0940 ; --------------------------------------------------------------------------------------
0940 ; SUBPROGRAM
0940 ; --------------------------------------------------------------------------------------
0940 0958 | X | .CONST 0x0958 ; Address of begin
0941 0004 | | .CONST 0x0004 ; Address of exception handler
0942 0006 | | .CONST 0x0006 ; Number of locals
0943 INIT_0940:
0943 e005 | | Load 0x0,0x5
0944 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0945 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0946 00db | | Load_Top At_Offset_3
0947 e005 | | Load 0x0,0x5
0948 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0949 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
094a 00d8 | | Load_Top At_Offset_0
094b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
094c 0a01 | | Execute_Immediate Plus,0x1
094d e005 | | Load 0x0,0x5
094e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
094f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0950 1c08 | | Execute_Immediate Run_Utility,0x8
0951 00e3 | | Load_Encached Natural_Cache
0952 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0953 e005 | | Load 0x0,0x5
0954 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0955 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0956 029f 136b | k| Declare_Subprogram INIT_1368,For_Call
0958 BODY_0940:
0958 4800 |H | Short_Literal 0x0
0959 e403 | | Load 0x2,0x3
095a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
095b 00cf | | Action Mark_Auxiliary
095c e402 | | Load 0x2,0x2
095d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
095e 01d9 | | Execute Vector,Reverse_Bounds
095f 0263 | c | Execute Discrete,Above_Bound
0960 703e |p> | Jump_Nonzero 0x99f
0961 00d8 | | Load_Top At_Offset_0
0962 e402 | | Load 0x2,0x2
0963 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0964 01d7 | | Execute Vector,Field_Read
0965 8406 | | Call 0x2,0x6
0966 a405 | | Store_Unchecked 0x2,0x5
0967 e405 | | Load 0x2,0x5
0968 e005 | | Load 0x0,0x5
0969 1b14 | | Execute Package,Field_Read,Field_Number 0x14
096a 180f | | Execute Package,Field_Execute,Field_Number 0xf
096b 681c |h | Jump_Zero 0x988
096c 4801 |H | Short_Literal 0x1
096d 4802 |H | Short_Literal 0x2
096e e012 | | Load 0x0,0x12
096f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0970 035b | [ | Declare_Type Array,Constrained
0971 0337 | 7 | Declare_Variable Array
0972 00d9 | | Load_Top At_Offset_1
0973 e402 | | Load 0x2,0x2
0974 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0975 01d7 | | Execute Vector,Field_Read
0976 e005 | | Load 0x0,0x5
0977 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0978 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0979 4801 |H | Short_Literal 0x1
097a 00da | | Load_Top At_Offset_2
097b 01d6 | | Execute Vector,Field_Write
097c e5fd | | Load 0x2,-0x3
097d e013 | | Load 0x0,0x13
097e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
097f 4802 |H | Short_Literal 0x2
0980 00da | | Load_Top At_Offset_2
0981 01d6 | | Execute Vector,Field_Write
0982 6069 |`i | Indirect_Literal Discrete,0x9ec,{0x00000000, 0x0000380a}
0983 e014 | | Load 0x0,0x14
0984 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0985 e403 | | Load 0x2,0x3
0986 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0987 7815 |x | Jump 0x99d
0988 e405 | | Load 0x2,0x5
0989 e5fb | | Load 0x2,-0x5
098a e5fc | | Load 0x2,-0x4
098b 8232 | 2 | Call 0x1,0x32
098c 7010 |p | Jump_Nonzero 0x99d
098d e405 | | Load 0x2,0x5
098e e404 | | Load 0x2,0x4
098f e403 | | Load 0x2,0x3
0990 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0991 01d6 | | Execute Vector,Field_Write
0992 e404 | | Load 0x2,0x4
0993 0a01 | | Execute_Immediate Plus,0x1
0994 c404 | | Store 0x2,0x4
0995 e5fb | | Load 0x2,-0x5
0996 6806 |h | Jump_Zero 0x99d
0997 4801 |H | Short_Literal 0x1
0998 4801 |H | Short_Literal 0x1
0999 e405 | | Load 0x2,0x5
099a e5fc | | Load 0x2,-0x4
099b e22a | * | Load 0x1,0x2a
099c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
099d 00c8 | | Action Pop_Auxiliary_Range
099e 3fc2 |? | Loop_Increasing 0x961
099f 00ce | | Action Pop_Auxiliary
09a0 e5fe | | Load 0x2,-0x2
09a1 6826 |h& | Jump_Zero 0x9c8
09a2 e5fc | | Load 0x2,-0x4
09a3 e5fd | | Load 0x2,-0x3
09a4 e404 | | Load 0x2,0x4
09a5 0aff | | Execute_Immediate Plus,-0x1
09a6 e005 | | Load 0x0,0x5
09a7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09a8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09a9 1c08 | | Execute_Immediate Run_Utility,0x8
09aa 4801 |H | Short_Literal 0x1
09ab e404 | | Load 0x2,0x4
09ac 0aff | | Execute_Immediate Plus,-0x1
09ad e403 | | Load 0x2,0x3
09ae 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09af 01cf | | Execute Vector,Slice_Read
09b0 00d9 | | Load_Top At_Offset_1
09b1 00d8 | | Load_Top At_Offset_0
09b2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09b3 00da | | Load_Top At_Offset_2
09b4 01da | | Execute Vector,Bounds
09b5 00da | | Load_Top At_Offset_2
09b6 01da | | Execute Vector,Bounds
09b7 00da | | Load_Top At_Offset_2
09b8 027f | | Execute Discrete,Equal
09b9 7001 |p | Jump_Nonzero 0x9bb
09ba 08e0 | | Execute_Immediate Raise,0xe0
09bb 00cd | | Action Spare6_Action
09bc 027f | | Execute Discrete,Equal
09bd 7001 |p | Jump_Nonzero 0x9bf
09be 08e0 | | Execute_Immediate Raise,0xe0
09bf 00d2 | | Pop_Control Pop_Count_2
09c0 00d9 | | Load_Top At_Offset_1
09c1 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
09c2 e403 | | Load 0x2,0x3
09c3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09c4 00d9 | | Load_Top At_Offset_1
09c5 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09c6 8239 | 9 | Call 0x1,0x39
09c7 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
09c8 00da | | Load_Top At_Offset_2
09c9 0aff | | Execute_Immediate Plus,-0x1
09ca e005 | | Load 0x0,0x5
09cb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09cc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09cd 1c08 | | Execute_Immediate Run_Utility,0x8
09ce 4801 |H | Short_Literal 0x1
09cf e404 | | Load 0x2,0x4
09d0 0aff | | Execute_Immediate Plus,-0x1
09d1 e403 | | Load 0x2,0x3
09d2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09d3 01cf | | Execute Vector,Slice_Read
09d4 00d9 | | Load_Top At_Offset_1
09d5 00d8 | | Load_Top At_Offset_0
09d6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09d7 00da | | Load_Top At_Offset_2
09d8 01da | | Execute Vector,Bounds
09d9 00da | | Load_Top At_Offset_2
09da 01da | | Execute Vector,Bounds
09db 00da | | Load_Top At_Offset_2
09dc 027f | | Execute Discrete,Equal
09dd 7001 |p | Jump_Nonzero 0x9df
09de 08e0 | | Execute_Immediate Raise,0xe0
09df 00cd | | Action Spare6_Action
09e0 027f | | Execute Discrete,Equal
09e1 7001 |p | Jump_Nonzero 0x9e3
09e2 08e0 | | Execute_Immediate Raise,0xe0
09e3 00d2 | | Pop_Control Pop_Count_2
09e4 00d9 | | Load_Top At_Offset_1
09e5 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
09e6 e403 | | Load 0x2,0x3
09e7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09e8 00d9 | | Load_Top At_Offset_1
09e9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09ea 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
09eb 0000 | | .XXX[0x1]
09ec 0000 0000 | | .LITERAL {0x00000000, 0x0000380a}
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09fd | | .CONST 0x09fd ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0004 | | .CONST 0x0004 ; Number of locals
09f3 INIT_09f0:
09f3 e5fd | | Load 0x2,-0x3
09f4 8230 | 0 | Call 0x1,0x30
09f5 e005 | | Load 0x0,0x5
09f6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09f7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09f8 1c08 | | Execute_Immediate Run_Utility,0x8
09f9 00e3 | | Load_Encached Natural_Cache
09fa 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
09fb 029f 1383 | | Declare_Subprogram INIT_1380,For_Call
09fd BODY_09f0:
09fd e5ff | | Load 0x2,-0x1
09fe 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09ff 00db | | Load_Top At_Offset_3
0a00 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a01 00cf | | Action Mark_Auxiliary
0a02 e5ff | | Load 0x2,-0x1
0a03 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a04 01d9 | | Execute Vector,Reverse_Bounds
0a05 0263 | c | Execute Discrete,Above_Bound
0a06 7003 |p | Jump_Nonzero 0xa0a
0a07 8404 | | Call 0x2,0x4
0a08 00c8 | | Action Pop_Auxiliary_Range
0a09 3ffd |? | Loop_Increasing 0xa07
0a0a 00ce | | Action Pop_Auxiliary
0a0b e5fe | | Load 0x2,-0x2
0a0c 6826 |h& | Jump_Zero 0xa33
0a0d e5fc | | Load 0x2,-0x4
0a0e e5fd | | Load 0x2,-0x3
0a0f 00db | | Load_Top At_Offset_3
0a10 0aff | | Execute_Immediate Plus,-0x1
0a11 e005 | | Load 0x0,0x5
0a12 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a13 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a14 1c08 | | Execute_Immediate Run_Utility,0x8
0a15 4801 |H | Short_Literal 0x1
0a16 e403 | | Load 0x2,0x3
0a17 0aff | | Execute_Immediate Plus,-0x1
0a18 e402 | | Load 0x2,0x2
0a19 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a1a 01cf | | Execute Vector,Slice_Read
0a1b 00d9 | | Load_Top At_Offset_1
0a1c 00d8 | | Load_Top At_Offset_0
0a1d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a1e 00da | | Load_Top At_Offset_2
0a1f 01da | | Execute Vector,Bounds
0a20 00da | | Load_Top At_Offset_2
0a21 01da | | Execute Vector,Bounds
0a22 00da | | Load_Top At_Offset_2
0a23 027f | | Execute Discrete,Equal
0a24 7001 |p | Jump_Nonzero 0xa26
0a25 08e0 | | Execute_Immediate Raise,0xe0
0a26 00cd | | Action Spare6_Action
0a27 027f | | Execute Discrete,Equal
0a28 7001 |p | Jump_Nonzero 0xa2a
0a29 08e0 | | Execute_Immediate Raise,0xe0
0a2a 00d2 | | Pop_Control Pop_Count_2
0a2b 00d9 | | Load_Top At_Offset_1
0a2c 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0a2d e402 | | Load 0x2,0x2
0a2e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a2f 00d9 | | Load_Top At_Offset_1
0a30 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a31 8239 | 9 | Call 0x1,0x39
0a32 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0a33 00d9 | | Load_Top At_Offset_1
0a34 0aff | | Execute_Immediate Plus,-0x1
0a35 e005 | | Load 0x0,0x5
0a36 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a37 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a38 1c08 | | Execute_Immediate Run_Utility,0x8
0a39 4801 |H | Short_Literal 0x1
0a3a 00db | | Load_Top At_Offset_3
0a3b 0aff | | Execute_Immediate Plus,-0x1
0a3c e402 | | Load 0x2,0x2
0a3d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a3e 01cf | | Execute Vector,Slice_Read
0a3f 00d9 | | Load_Top At_Offset_1
0a40 00d8 | | Load_Top At_Offset_0
0a41 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a42 00da | | Load_Top At_Offset_2
0a43 01da | | Execute Vector,Bounds
0a44 00da | | Load_Top At_Offset_2
0a45 01da | | Execute Vector,Bounds
0a46 00da | | Load_Top At_Offset_2
0a47 027f | | Execute Discrete,Equal
0a48 7001 |p | Jump_Nonzero 0xa4a
0a49 08e0 | | Execute_Immediate Raise,0xe0
0a4a 00cd | | Action Spare6_Action
0a4b 027f | | Execute Discrete,Equal
0a4c 7001 |p | Jump_Nonzero 0xa4e
0a4d 08e0 | | Execute_Immediate Raise,0xe0
0a4e 00d2 | | Pop_Control Pop_Count_2
0a4f 00d9 | | Load_Top At_Offset_1
0a50 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0a51 00db | | Load_Top At_Offset_3
0a52 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a53 00d9 | | Load_Top At_Offset_1
0a54 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a55 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0a56 0000 0000 | | .XXX[0x2]
0a58 ; --------------------------------------------------------------------------------------
0a58 ; SUBPROGRAM
0a58 ; --------------------------------------------------------------------------------------
0a58 0a6d | m | .CONST 0x0a6d ; Address of begin
0a59 0004 | | .CONST 0x0004 ; Address of exception handler
0a5a 0007 | | .CONST 0x0007 ; Number of locals
0a5b INIT_0a58:
0a5b 00db | | Load_Top At_Offset_3
0a5c 8230 | 0 | Call 0x1,0x30
0a5d e005 | | Load 0x0,0x5
0a5e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a5f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a60 1c08 | | Execute_Immediate Run_Utility,0x8
0a61 00e3 | | Load_Encached Natural_Cache
0a62 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0a63 e005 | | Load 0x0,0x5
0a64 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a65 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a66 e005 | | Load 0x0,0x5
0a67 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a68 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a69 029f 13b3 | | Declare_Subprogram INIT_13b0,For_Call
0a6b 029f 140b | | Declare_Subprogram INIT_1408,For_Call
0a6d BODY_0a58:
0a6d 4800 |H | Short_Literal 0x0
0a6e e402 | | Load 0x2,0x2
0a6f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a70 00cf | | Action Mark_Auxiliary
0a71 e5ff | | Load 0x2,-0x1
0a72 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a73 01d9 | | Execute Vector,Reverse_Bounds
0a74 0263 | c | Execute Discrete,Above_Bound
0a75 702e |p. | Jump_Nonzero 0xaa4
0a76 00d8 | | Load_Top At_Offset_0
0a77 e5ff | | Load 0x2,-0x1
0a78 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a79 01d7 | | Execute Vector,Field_Read
0a7a a405 | | Store_Unchecked 0x2,0x5
0a7b 00cf | | Action Mark_Auxiliary
0a7c 7811 |x | Jump 0xa8e
0a7d e405 | | Load 0x2,0x5
0a7e e005 | | Load 0x0,0x5
0a7f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a80 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a81 a404 | | Store_Unchecked 0x2,0x4
0a82 e404 | | Load 0x2,0x4
0a83 e005 | | Load 0x0,0x5
0a84 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a85 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a86 7001 |p | Jump_Nonzero 0xa88
0a87 780b |x | Jump 0xa93
0a88 e405 | | Load 0x2,0x5
0a89 e005 | | Load 0x0,0x5
0a8a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a8b 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0a8c a405 | | Store_Unchecked 0x2,0x5
0a8d 00c9 | | Action Pop_Auxiliary_Loop
0a8e e405 | | Load 0x2,0x5
0a8f e005 | | Load 0x0,0x5
0a90 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a91 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a92 6fea |o | Jump_Zero 0xa7d
0a93 00ce | | Action Pop_Auxiliary
0a94 e404 | | Load 0x2,0x4
0a95 e005 | | Load 0x0,0x5
0a96 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a97 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0a98 6808 |h | Jump_Zero 0xaa1
0a99 4801 |H | Short_Literal 0x1
0a9a 4801 |H | Short_Literal 0x1
0a9b e404 | | Load 0x2,0x4
0a9c e5fd | | Load 0x2,-0x3
0a9d e22a | * | Load 0x1,0x2a
0a9e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a9f 8406 | | Call 0x2,0x6
0aa0 7801 |x | Jump 0xaa2
0aa1 8407 | | Call 0x2,0x7
0aa2 00c8 | | Action Pop_Auxiliary_Range
0aa3 3fd2 |? | Loop_Increasing 0xa76
0aa4 00ce | | Action Pop_Auxiliary
0aa5 e403 | | Load 0x2,0x3
0aa6 0aff | | Execute_Immediate Plus,-0x1
0aa7 e005 | | Load 0x0,0x5
0aa8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0aa9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0aaa 1c08 | | Execute_Immediate Run_Utility,0x8
0aab 4801 |H | Short_Literal 0x1
0aac e403 | | Load 0x2,0x3
0aad 0aff | | Execute_Immediate Plus,-0x1
0aae e402 | | Load 0x2,0x2
0aaf 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ab0 01cf | | Execute Vector,Slice_Read
0ab1 00d9 | | Load_Top At_Offset_1
0ab2 00d8 | | Load_Top At_Offset_0
0ab3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ab4 00da | | Load_Top At_Offset_2
0ab5 01da | | Execute Vector,Bounds
0ab6 00da | | Load_Top At_Offset_2
0ab7 01da | | Execute Vector,Bounds
0ab8 00da | | Load_Top At_Offset_2
0ab9 027f | | Execute Discrete,Equal
0aba 7001 |p | Jump_Nonzero 0xabc
0abb 08e0 | | Execute_Immediate Raise,0xe0
0abc 00cd | | Action Spare6_Action
0abd 027f | | Execute Discrete,Equal
0abe 7001 |p | Jump_Nonzero 0xac0
0abf 08e0 | | Execute_Immediate Raise,0xe0
0ac0 00d2 | | Pop_Control Pop_Count_2
0ac1 00d9 | | Load_Top At_Offset_1
0ac2 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0ac3 e402 | | Load 0x2,0x2
0ac4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0ac5 00d9 | | Load_Top At_Offset_1
0ac6 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0ac7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0acb | | .CONST 0x0acb ; Address of begin
0ac9 0004 | | .CONST 0x0004 ; Address of exception handler
0aca 0001 | | .CONST 0x0001 ; Number of locals
0acb BODY_0ac8:
0acb INIT_0ac8:
0acb 00da | | Load_Top At_Offset_2
0acc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0acd 7002 |p | Jump_Nonzero 0xad0
0ace 00da | | Load_Top At_Offset_2
0acf 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0ad0 00cf | | Action Mark_Auxiliary
0ad1 00db | | Load_Top At_Offset_3
0ad2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ad3 01d9 | | Execute Vector,Reverse_Bounds
0ad4 0263 | c | Execute Discrete,Above_Bound
0ad5 700b |p | Jump_Nonzero 0xae1
0ad6 4800 |H | Short_Literal 0x0
0ad7 4801 |H | Short_Literal 0x1
0ad8 00da | | Load_Top At_Offset_2
0ad9 e5ff | | Load 0x2,-0x1
0ada 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0adb 01d7 | | Execute Vector,Field_Read
0adc e5fc | | Load 0x2,-0x4
0add e22a | * | Load 0x1,0x2a
0ade 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0adf 00c8 | | Action Pop_Auxiliary_Range
0ae0 3ff5 |? | Loop_Increasing 0xad6
0ae1 00ce | | Action Pop_Auxiliary
0ae2 e5fc | | Load 0x2,-0x4
0ae3 e5fd | | Load 0x2,-0x3
0ae4 e5fe | | Load 0x2,-0x2
0ae5 4801 |H | Short_Literal 0x1
0ae6 e5fc | | Load 0x2,-0x4
0ae7 e5fd | | Load 0x2,-0x3
0ae8 e5fe | | Load 0x2,-0x2
0ae9 e5ff | | Load 0x2,-0x1
0aea 823b | ; | Call 0x1,0x3b
0aeb 823d | = | Call 0x1,0x3d
0aec 00db | | Load_Top At_Offset_3
0aed 822e | . | Call 0x1,0x2e
0aee 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0aef 0000 | | .XXX[0x1]
0af0 ; --------------------------------------------------------------------------------------
0af0 ; SUBPROGRAM
0af0 ; --------------------------------------------------------------------------------------
0af0 0af3 | | .CONST 0x0af3 ; Address of begin
0af1 0004 | | .CONST 0x0004 ; Address of exception handler
0af2 0001 | | .CONST 0x0001 ; Number of locals
0af3 BODY_0af0:
0af3 INIT_0af0:
0af3 00da | | Load_Top At_Offset_2
0af4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0af5 7002 |p | Jump_Nonzero 0xaf8
0af6 00da | | Load_Top At_Offset_2
0af7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0af8 00cf | | Action Mark_Auxiliary
0af9 00db | | Load_Top At_Offset_3
0afa 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0afb 01d9 | | Execute Vector,Reverse_Bounds
0afc 0263 | c | Execute Discrete,Above_Bound
0afd 700b |p | Jump_Nonzero 0xb09
0afe 4800 |H | Short_Literal 0x0
0aff 4801 |H | Short_Literal 0x1
0b00 00da | | Load_Top At_Offset_2
0b01 e5ff | | Load 0x2,-0x1
0b02 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b03 01d7 | | Execute Vector,Field_Read
0b04 e5fd | | Load 0x2,-0x3
0b05 e22a | * | Load 0x1,0x2a
0b06 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b07 00c8 | | Action Pop_Auxiliary_Range
0b08 3ff5 |? | Loop_Increasing 0xafe
0b09 00ce | | Action Pop_Auxiliary
0b0a e5fd | | Load 0x2,-0x3
0b0b e5fe | | Load 0x2,-0x2
0b0c e5fd | | Load 0x2,-0x3
0b0d e5fe | | Load 0x2,-0x2
0b0e e5ff | | Load 0x2,-0x1
0b0f 823c | < | Call 0x1,0x3c
0b10 823e | > | Call 0x1,0x3e
0b11 00db | | Load_Top At_Offset_3
0b12 822e | . | Call 0x1,0x2e
0b13 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0b14 0000 0000 | | .BLANK 0000[0x4]
0b18 ; --------------------------------------------------------------------------------------
0b18 ; SUBPROGRAM
0b18 ; --------------------------------------------------------------------------------------
0b18 0b2f | / | .CONST 0x0b2f ; Address of begin
0b19 0004 | | .CONST 0x0004 ; Address of exception handler
0b1a 0005 | | .CONST 0x0005 ; Number of locals
0b1b INIT_0b18:
0b1b 00da | | Load_Top At_Offset_2
0b1c e005 | | Load 0x0,0x5
0b1d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b1e 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0b1f e5fe | | Load 0x2,-0x2
0b20 e005 | | Load 0x0,0x5
0b21 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b22 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0b23 00d9 | | Load_Top At_Offset_1
0b24 e005 | | Load 0x0,0x5
0b25 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b26 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0b27 00e3 | | Load_Encached Natural_Cache
0b28 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0b29 00d9 | | Load_Top At_Offset_1
0b2a e005 | | Load 0x0,0x5
0b2b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b2c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0b2d 00e3 | | Load_Encached Natural_Cache
0b2e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0b2f BODY_0b18:
0b2f 00d9 | | Load_Top At_Offset_1
0b30 00d9 | | Load_Top At_Offset_1
0b31 027f | | Execute Discrete,Equal
0b32 680c |h | Jump_Zero 0xb3f
0b33 4800 |H | Short_Literal 0x0
0b34 00db | | Load_Top At_Offset_3
0b35 e005 | | Load 0x0,0x5
0b36 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b37 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0b38 e402 | | Load 0x2,0x2
0b39 e005 | | Load 0x0,0x5
0b3a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b3b 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0b3c e017 | | Load 0x0,0x17
0b3d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0b3e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b3f 00d9 | | Load_Top At_Offset_1
0b40 00d9 | | Load_Top At_Offset_1
0b41 027c | | | Execute Discrete,Less
0b42 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b43 0000 0000 | | .BLANK 0000[0x5]
0b48 ; --------------------------------------------------------------------------------------
0b48 ; SUBPROGRAM
0b48 ; --------------------------------------------------------------------------------------
0b48 0b7a | z | .CONST 0x0b7a ; Address of begin
0b49 0c7b | { | .CONST 0x0c7b ; Address of exception handler
0b4a 0012 | | .CONST 0x0012 ; Number of locals
0b4b INIT_0b48:
0b4b e005 | | Load 0x0,0x5
0b4c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b4d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b4e e005 | | Load 0x0,0x5
0b4f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b50 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b51 e005 | | Load 0x0,0x5
0b52 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b53 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b54 e005 | | Load 0x0,0x5
0b55 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b56 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b57 e22b | + | Load 0x1,0x2b
0b58 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b59 e5ff | | Load 0x2,-0x1
0b5a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b5b 00e3 | | Load_Encached Natural_Cache
0b5c 03f1 | | Declare_Variable Discrete,With_Value
0b5d 00e3 | | Load_Encached Natural_Cache
0b5e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b5f e5fe | | Load 0x2,-0x2
0b60 e013 | | Load 0x0,0x13
0b61 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b62 e016 | | Load 0x0,0x16
0b63 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b64 4801 |H | Short_Literal 0x1
0b65 00d9 | | Load_Top At_Offset_1
0b66 01d7 | | Execute Vector,Field_Read
0b67 0007 | | Action Break_Optional
0b68 4802 |H | Short_Literal 0x2
0b69 00da | | Load_Top At_Offset_2
0b6a 01d7 | | Execute Vector,Field_Read
0b6b 0007 | | Action Break_Optional
0b6c 029f 143b | ;| Declare_Subprogram INIT_1438,For_Call
0b6e 029f 145b | [| Declare_Subprogram INIT_1458,For_Call
0b70 029f 146b | k| Declare_Subprogram INIT_1468,For_Call
0b72 029f 1493 | | Declare_Subprogram INIT_1490,For_Call
0b74 029f 150b | | Declare_Subprogram INIT_1508,For_Call
0b76 029f 154b | K| Declare_Subprogram INIT_1548,For_Call
0b78 029f 1583 | | Declare_Subprogram INIT_1580,For_Call
0b7a BODY_0b48:
0b7a e22b | + | Load 0x1,0x2b
0b7b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b7c e011 | | Load 0x0,0x11
0b7d 180d | | Execute Package,Field_Execute,Field_Number 0xd
0b7e e22b | + | Load 0x1,0x2b
0b7f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b80 c406 | | Store 0x2,0x6
0b81 00cf | | Action Mark_Auxiliary
0b82 e5ff | | Load 0x2,-0x1
0b83 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b84 01d9 | | Execute Vector,Reverse_Bounds
0b85 0263 | c | Execute Discrete,Above_Bound
0b86 70c4 |p | Jump_Nonzero 0xc4b
0b87 00d8 | | Load_Top At_Offset_0
0b88 e5ff | | Load 0x2,-0x1
0b89 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b8a 01d7 | | Execute Vector,Field_Read
0b8b 8410 | | Call 0x2,0x10
0b8c 68bc |h | Jump_Zero 0xc49
0b8d 00d8 | | Load_Top At_Offset_0
0b8e e5ff | | Load 0x2,-0x1
0b8f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b90 01d7 | | Execute Vector,Field_Read
0b91 e005 | | Load 0x0,0x5
0b92 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b93 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0b94 a403 | | Store_Unchecked 0x2,0x3
0b95 e403 | | Load 0x2,0x3
0b96 a405 | | Store_Unchecked 0x2,0x5
0b97 00cf | | Action Mark_Auxiliary
0b98 7811 |x | Jump 0xbaa
0b99 e405 | | Load 0x2,0x5
0b9a e005 | | Load 0x0,0x5
0b9b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b9c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0b9d a404 | | Store_Unchecked 0x2,0x4
0b9e e404 | | Load 0x2,0x4
0b9f e005 | | Load 0x0,0x5
0ba0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ba1 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ba2 7001 |p | Jump_Nonzero 0xba4
0ba3 780b |x | Jump 0xbaf
0ba4 e405 | | Load 0x2,0x5
0ba5 e005 | | Load 0x0,0x5
0ba6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ba7 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0ba8 a405 | | Store_Unchecked 0x2,0x5
0ba9 00c9 | | Action Pop_Auxiliary_Loop
0baa e405 | | Load 0x2,0x5
0bab e005 | | Load 0x0,0x5
0bac 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bad 180f | | Execute Package,Field_Execute,Field_Number 0xf
0bae 6fea |o | Jump_Zero 0xb99
0baf 00ce | | Action Pop_Auxiliary
0bb0 e404 | | Load 0x2,0x4
0bb1 e005 | | Load 0x0,0x5
0bb2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bb3 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0bb4 6813 |h | Jump_Zero 0xbc8
0bb5 e404 | | Load 0x2,0x4
0bb6 840c | | Call 0x2,0xc
0bb7 6810 |h | Jump_Zero 0xbc8
0bb8 e40a | | Load 0x2,0xa
0bb9 6807 |h | Jump_Zero 0xbc1
0bba e403 | | Load 0x2,0x3
0bbb 00d8 | | Load_Top At_Offset_0
0bbc e005 | | Load 0x0,0x5
0bbd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bbe 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0bbf 021f | | Execute Heap_Access,Equal
0bc0 7002 |p | Jump_Nonzero 0xbc3
0bc1 e40b | | Load 0x2,0xb
0bc2 6805 |h | Jump_Zero 0xbc8
0bc3 e404 | | Load 0x2,0x4
0bc4 e005 | | Load 0x0,0x5
0bc5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bc6 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0bc7 a403 | | Store_Unchecked 0x2,0x3
0bc8 e403 | | Load 0x2,0x3
0bc9 e005 | | Load 0x0,0x5
0bca 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bcb 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0bcc 6879 |hy | Jump_Zero 0xc46
0bcd e403 | | Load 0x2,0x3
0bce e005 | | Load 0x0,0x5
0bcf 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bd0 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0bd1 a402 | | Store_Unchecked 0x2,0x2
0bd2 e402 | | Load 0x2,0x2
0bd3 e005 | | Load 0x0,0x5
0bd4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bd5 180f | | Execute Package,Field_Execute,Field_Number 0xf
0bd6 706b |pk | Jump_Nonzero 0xc42
0bd7 e40a | | Load 0x2,0xa
0bd8 7002 |p | Jump_Nonzero 0xbdb
0bd9 e40b | | Load 0x2,0xb
0bda 6867 |hg | Jump_Zero 0xc42
0bdb e5fd | | Load 0x2,-0x3
0bdc e402 | | Load 0x2,0x2
0bdd e005 | | Load 0x0,0x5
0bde 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bdf 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0be0 7023 |p# | Jump_Nonzero 0xc04
0be1 e406 | | Load 0x2,0x6
0be2 e22b | + | Load 0x1,0x2b
0be3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0be4 4801 |H | Short_Literal 0x1
0be5 4803 |H | Short_Literal 0x3
0be6 e012 | | Load 0x0,0x12
0be7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0be8 035b | [ | Declare_Type Array,Constrained
0be9 0337 | 7 | Declare_Variable Array
0bea e402 | | Load 0x2,0x2
0beb e005 | | Load 0x0,0x5
0bec 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bed 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bee 4801 |H | Short_Literal 0x1
0bef 00da | | Load_Top At_Offset_2
0bf0 01d6 | | Execute Vector,Field_Write
0bf1 e5fe | | Load 0x2,-0x2
0bf2 e013 | | Load 0x0,0x13
0bf3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0bf4 4802 |H | Short_Literal 0x2
0bf5 00da | | Load_Top At_Offset_2
0bf6 01d6 | | Execute Vector,Field_Write
0bf7 e5fd | | Load 0x2,-0x3
0bf8 e016 | | Load 0x0,0x16
0bf9 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0bfa 4803 |H | Short_Literal 0x3
0bfb 00da | | Load_Top At_Offset_2
0bfc 01d6 | | Execute Vector,Field_Write
0bfd 609e |` | Indirect_Literal Discrete,0xc9c,{0x00000000, 0x00003810}
0bfe e014 | | Load 0x0,0x14
0bff 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c00 e5fc | | Load 0x2,-0x4
0c01 e015 | | Load 0x0,0x15
0c02 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0c03 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c04 e408 | | Load 0x2,0x8
0c05 0a01 | | Execute_Immediate Plus,0x1
0c06 c408 | | Store 0x2,0x8
0c07 e407 | | Load 0x2,0x7
0c08 00d9 | | Load_Top At_Offset_1
0c09 0273 | s | Execute Discrete,Plus
0c0a 00d8 | | Load_Top At_Offset_0
0c0b 00e3 | | Load_Encached Natural_Cache
0c0c 0260 | ` | Execute Discrete,In_Type
0c0d 7001 |p | Jump_Nonzero 0xc0f
0c0e 0801 | | Execute_Immediate Raise,0x1
0c0f e404 | | Load 0x2,0x4
0c10 840d | | Call 0x2,0xd
0c11 e407 | | Load 0x2,0x7
0c12 00d9 | | Load_Top At_Offset_1
0c13 0273 | s | Execute Discrete,Plus
0c14 00d8 | | Load_Top At_Offset_0
0c15 00e3 | | Load_Encached Natural_Cache
0c16 0260 | ` | Execute Discrete,In_Type
0c17 7001 |p | Jump_Nonzero 0xc19
0c18 0801 | | Execute_Immediate Raise,0x1
0c19 e402 | | Load 0x2,0x2
0c1a 840d | | Call 0x2,0xd
0c1b e40b | | Load 0x2,0xb
0c1c 6802 |h | Jump_Zero 0xc1f
0c1d 8412 | | Call 0x2,0x12
0c1e 782a |x* | Jump 0xc49
0c1f e5fd | | Load 0x2,-0x3
0c20 e002 | | Load 0x0,0x2
0c21 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c22 4801 |H | Short_Literal 0x1
0c23 4803 |H | Short_Literal 0x3
0c24 e012 | | Load 0x0,0x12
0c25 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c26 035b | [ | Declare_Type Array,Constrained
0c27 0337 | 7 | Declare_Variable Array
0c28 e404 | | Load 0x2,0x4
0c29 e005 | | Load 0x0,0x5
0c2a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c2b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c2c 4801 |H | Short_Literal 0x1
0c2d 00da | | Load_Top At_Offset_2
0c2e 01d6 | | Execute Vector,Field_Write
0c2f e404 | | Load 0x2,0x4
0c30 e005 | | Load 0x0,0x5
0c31 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c32 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c33 4802 |H | Short_Literal 0x2
0c34 00da | | Load_Top At_Offset_2
0c35 01d6 | | Execute Vector,Field_Write
0c36 e402 | | Load 0x2,0x2
0c37 e005 | | Load 0x0,0x5
0c38 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c39 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c3a 4803 |H | Short_Literal 0x3
0c3b 00da | | Load_Top At_Offset_2
0c3c 01d6 | | Execute Vector,Field_Write
0c3d 480c |H | Short_Literal 0xc
0c3e e5fc | | Load 0x2,-0x4
0c3f e015 | | Load 0x0,0x15
0c40 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0c41 7807 |x | Jump 0xc49
0c42 00d8 | | Load_Top At_Offset_0
0c43 e403 | | Load 0x2,0x3
0c44 840e | | Call 0x2,0xe
0c45 7803 |x | Jump 0xc49
0c46 00d8 | | Load_Top At_Offset_0
0c47 e403 | | Load 0x2,0x3
0c48 840e | | Call 0x2,0xe
0c49 00c8 | | Action Pop_Auxiliary_Range
0c4a 3f3c |?< | Loop_Increasing 0xb87
0c4b 00c9 | | Action Pop_Auxiliary_Loop
0c4c e5ff | | Load 0x2,-0x1
0c4d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c4e 01d9 | | Execute Vector,Reverse_Bounds
0c4f 0263 | c | Execute Discrete,Above_Bound
0c50 7025 |p% | Jump_Nonzero 0xc76
0c51 00d8 | | Load_Top At_Offset_0
0c52 00d9 | | Load_Top At_Offset_1
0c53 e5ff | | Load 0x2,-0x1
0c54 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c55 01d7 | | Execute Vector,Field_Read
0c56 8411 | | Call 0x2,0x11
0c57 681c |h | Jump_Zero 0xc74
0c58 00d8 | | Load_Top At_Offset_0
0c59 e5ff | | Load 0x2,-0x1
0c5a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c5b 01d7 | | Execute Vector,Field_Read
0c5c e005 | | Load 0x0,0x5
0c5d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c5e 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0c5f a403 | | Store_Unchecked 0x2,0x3
0c60 e5fd | | Load 0x2,-0x3
0c61 e002 | | Load 0x0,0x2
0c62 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c63 4801 |H | Short_Literal 0x1
0c64 4801 |H | Short_Literal 0x1
0c65 e012 | | Load 0x0,0x12
0c66 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c67 035b | [ | Declare_Type Array,Constrained
0c68 0337 | 7 | Declare_Variable Array
0c69 e403 | | Load 0x2,0x3
0c6a e005 | | Load 0x0,0x5
0c6b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c6c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c6d 4801 |H | Short_Literal 0x1
0c6e 00da | | Load_Top At_Offset_2
0c6f 01d6 | | Execute Vector,Field_Write
0c70 480f |H | Short_Literal 0xf
0c71 e5fc | | Load 0x2,-0x4
0c72 e015 | | Load 0x0,0x15
0c73 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0c74 00c8 | | Action Pop_Auxiliary_Range
0c75 3fdb |? | Loop_Increasing 0xc51
0c76 00ce | | Action Pop_Auxiliary
0c77 e406 | | Load 0x2,0x6
0c78 e22b | + | Load 0x1,0x2b
0c79 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0c7a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c7b TRAP_0b48:
0c7b 0007 | | Action Break_Optional
0c7c e406 | | Load 0x2,0x6
0c7d e22b | + | Load 0x1,0x2b
0c7e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0c7f 4801 |H | Short_Literal 0x1
0c80 4802 |H | Short_Literal 0x2
0c81 e012 | | Load 0x0,0x12
0c82 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c83 035b | [ | Declare_Type Array,Constrained
0c84 0337 | 7 | Declare_Variable Array
0c85 e5fe | | Load 0x2,-0x2
0c86 e013 | | Load 0x0,0x13
0c87 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c88 4801 |H | Short_Literal 0x1
0c89 00da | | Load_Top At_Offset_2
0c8a 01d6 | | Execute Vector,Field_Write
0c8b e5fd | | Load 0x2,-0x3
0c8c e016 | | Load 0x0,0x16
0c8d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0c8e 4802 |H | Short_Literal 0x2
0c8f 00da | | Load_Top At_Offset_2
0c90 01d6 | | Execute Vector,Field_Write
0c91 6006 |` | Indirect_Literal Discrete,0xc98,{0x00000000, 0x0000380e}
0c92 e014 | | Load 0x0,0x14
0c93 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c94 e5fc | | Load 0x2,-0x4
0c95 e015 | | Load 0x0,0x15
0c96 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0c97 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c98 0000 0000 | | .LITERAL {0x00000000, 0x0000380e}
0c9c 0000 0000 | | .LITERAL {0x00000000, 0x00003810}
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; SUBPROGRAM
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0ca9 | | .CONST 0x0ca9 ; Address of begin
0ca1 0004 | | .CONST 0x0004 ; Address of exception handler
0ca2 0003 | | .CONST 0x0003 ; Number of locals
0ca3 INIT_0ca0:
0ca3 00db | | Load_Top At_Offset_3
0ca4 00db | | Load_Top At_Offset_3
0ca5 e013 | | Load 0x0,0x13
0ca6 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ca7 e015 | | Load 0x0,0x15
0ca8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0ca9 BODY_0ca0:
0ca9 00d9 | | Load_Top At_Offset_1
0caa 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0cab 7001 |p | Jump_Nonzero 0xcad
0cac 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0cad e5fd | | Load 0x2,-0x3
0cae e002 | | Load 0x0,0x2
0caf 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0cb0 4801 |H | Short_Literal 0x1
0cb1 4801 |H | Short_Literal 0x1
0cb2 e012 | | Load 0x0,0x12
0cb3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cb4 035b | [ | Declare_Type Array,Constrained
0cb5 0337 | 7 | Declare_Variable Array
0cb6 e5fe | | Load 0x2,-0x2
0cb7 e005 | | Load 0x0,0x5
0cb8 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0cb9 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0cba 4801 |H | Short_Literal 0x1
0cbb 00da | | Load_Top At_Offset_2
0cbc 01d6 | | Execute Vector,Field_Write
0cbd 4807 |H | Short_Literal 0x7
0cbe e403 | | Load 0x2,0x3
0cbf e015 | | Load 0x0,0x15
0cc0 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0cc1 00d8 | | Load_Top At_Offset_0
0cc2 e5fd | | Load 0x2,-0x3
0cc3 e5ff | | Load 0x2,-0x1
0cc4 e402 | | Load 0x2,0x2
0cc5 8247 | G | Call 0x1,0x47
0cc6 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0cc7 00d8 | | Load_Top At_Offset_0
0cc8 e015 | | Load 0x0,0x15
0cc9 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0cca 0e01 | | Execute_Immediate Not_Equal,0x1
0ccb 6813 |h | Jump_Zero 0xcdf
0ccc e5fd | | Load 0x2,-0x3
0ccd e002 | | Load 0x0,0x2
0cce 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0ccf 4801 |H | Short_Literal 0x1
0cd0 4801 |H | Short_Literal 0x1
0cd1 e012 | | Load 0x0,0x12
0cd2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cd3 035b | [ | Declare_Type Array,Constrained
0cd4 0337 | 7 | Declare_Variable Array
0cd5 00db | | Load_Top At_Offset_3
0cd6 e015 | | Load 0x0,0x15
0cd7 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0cd8 4801 |H | Short_Literal 0x1
0cd9 00da | | Load_Top At_Offset_2
0cda 01d6 | | Execute Vector,Field_Write
0cdb 4803 |H | Short_Literal 0x3
0cdc e5fc | | Load 0x2,-0x4
0cdd e015 | | Load 0x0,0x15
0cde 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0cdf 00d8 | | Load_Top At_Offset_0
0ce0 e015 | | Load 0x0,0x15
0ce1 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0ce2 7006 |p | Jump_Nonzero 0xce9
0ce3 00d8 | | Load_Top At_Offset_0
0ce4 e015 | | Load 0x0,0x15
0ce5 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0ce6 e5fc | | Load 0x2,-0x4
0ce7 e015 | | Load 0x0,0x15
0ce8 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0ce9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0cea 0000 0000 | | .BLANK 0000[0x6]
0cf0 ; --------------------------------------------------------------------------------------
0cf0 ; SUBPROGRAM
0cf0 ; --------------------------------------------------------------------------------------
0cf0 0cf9 | | .CONST 0x0cf9 ; Address of begin
0cf1 0004 | | .CONST 0x0004 ; Address of exception handler
0cf2 0003 | | .CONST 0x0003 ; Number of locals
0cf3 INIT_0cf0:
0cf3 00db | | Load_Top At_Offset_3
0cf4 00db | | Load_Top At_Offset_3
0cf5 e013 | | Load 0x0,0x13
0cf6 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0cf7 e015 | | Load 0x0,0x15
0cf8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0cf9 BODY_0cf0:
0cf9 00d9 | | Load_Top At_Offset_1
0cfa 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0cfb 7001 |p | Jump_Nonzero 0xcfd
0cfc 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0cfd e5fd | | Load 0x2,-0x3
0cfe e002 | | Load 0x0,0x2
0cff 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d00 4801 |H | Short_Literal 0x1
0d01 4801 |H | Short_Literal 0x1
0d02 e012 | | Load 0x0,0x12
0d03 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d04 035b | [ | Declare_Type Array,Constrained
0d05 0337 | 7 | Declare_Variable Array
0d06 e5fe | | Load 0x2,-0x2
0d07 e005 | | Load 0x0,0x5
0d08 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d09 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0d0a 4801 |H | Short_Literal 0x1
0d0b 00da | | Load_Top At_Offset_2
0d0c 01d6 | | Execute Vector,Field_Write
0d0d 4807 |H | Short_Literal 0x7
0d0e e403 | | Load 0x2,0x3
0d0f e015 | | Load 0x0,0x15
0d10 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0d11 00cf | | Action Mark_Auxiliary
0d12 00da | | Load_Top At_Offset_2
0d13 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d14 01d9 | | Execute Vector,Reverse_Bounds
0d15 0263 | c | Execute Discrete,Above_Bound
0d16 7021 |p! | Jump_Nonzero 0xd38
0d17 00d8 | | Load_Top At_Offset_0
0d18 e402 | | Load 0x2,0x2
0d19 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d1a 01d7 | | Execute Vector,Field_Read
0d1b e005 | | Load 0x0,0x5
0d1c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0d1d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0d1e 7017 |p | Jump_Nonzero 0xd36
0d1f e5fd | | Load 0x2,-0x3
0d20 e002 | | Load 0x0,0x2
0d21 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d22 4801 |H | Short_Literal 0x1
0d23 4801 |H | Short_Literal 0x1
0d24 e012 | | Load 0x0,0x12
0d25 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d26 035b | [ | Declare_Type Array,Constrained
0d27 0337 | 7 | Declare_Variable Array
0d28 00db | | Load_Top At_Offset_3
0d29 e402 | | Load 0x2,0x2
0d2a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d2b 01d7 | | Execute Vector,Field_Read
0d2c e005 | | Load 0x0,0x5
0d2d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0d2e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d2f 4801 |H | Short_Literal 0x1
0d30 00da | | Load_Top At_Offset_2
0d31 01d6 | | Execute Vector,Field_Write
0d32 480e |H | Short_Literal 0xe
0d33 e403 | | Load 0x2,0x3
0d34 e015 | | Load 0x0,0x15
0d35 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0d36 00c8 | | Action Pop_Auxiliary_Range
0d37 3fdf |? | Loop_Increasing 0xd17
0d38 00ce | | Action Pop_Auxiliary
0d39 00d8 | | Load_Top At_Offset_0
0d3a e015 | | Load 0x0,0x15
0d3b 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0d3c 0e01 | | Execute_Immediate Not_Equal,0x1
0d3d 6813 |h | Jump_Zero 0xd51
0d3e e5fd | | Load 0x2,-0x3
0d3f e002 | | Load 0x0,0x2
0d40 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d41 4801 |H | Short_Literal 0x1
0d42 4801 |H | Short_Literal 0x1
0d43 e012 | | Load 0x0,0x12
0d44 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d45 035b | [ | Declare_Type Array,Constrained
0d46 0337 | 7 | Declare_Variable Array
0d47 00db | | Load_Top At_Offset_3
0d48 e015 | | Load 0x0,0x15
0d49 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0d4a 4801 |H | Short_Literal 0x1
0d4b 00da | | Load_Top At_Offset_2
0d4c 01d6 | | Execute Vector,Field_Write
0d4d 4805 |H | Short_Literal 0x5
0d4e e5fc | | Load 0x2,-0x4
0d4f e015 | | Load 0x0,0x15
0d50 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0d51 00d8 | | Load_Top At_Offset_0
0d52 e015 | | Load 0x0,0x15
0d53 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0d54 7006 |p | Jump_Nonzero 0xd5b
0d55 00d8 | | Load_Top At_Offset_0
0d56 e015 | | Load 0x0,0x15
0d57 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0d58 e5fc | | Load 0x2,-0x4
0d59 e015 | | Load 0x0,0x15
0d5a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0d5b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0d5c 0000 0000 | | .BLANK 0000[0x4]
0d60 ; --------------------------------------------------------------------------------------
0d60 ; SUBPROGRAM
0d60 ; --------------------------------------------------------------------------------------
0d60 0d65 | e | .CONST 0x0d65 ; Address of begin
0d61 0004 | | .CONST 0x0004 ; Address of exception handler
0d62 0002 | | .CONST 0x0002 ; Number of locals
0d63 INIT_0d60:
0d63 e016 | | Load 0x0,0x16
0d64 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d65 BODY_0d60:
0d65 00cf | | Action Mark_Auxiliary
0d66 e5ff | | Load 0x2,-0x1
0d67 01d9 | | Execute Vector,Reverse_Bounds
0d68 0263 | c | Execute Discrete,Above_Bound
0d69 700a |p | Jump_Nonzero 0xd74
0d6a 00d8 | | Load_Top At_Offset_0
0d6b a402 | | Store_Unchecked 0x2,0x2
0d6c 00d8 | | Load_Top At_Offset_0
0d6d e5ff | | Load 0x2,-0x1
0d6e 01d7 | | Execute Vector,Field_Read
0d6f 6802 |h | Jump_Zero 0xd72
0d70 00d2 | | Pop_Control Pop_Count_2
0d71 7802 |x | Jump 0xd74
0d72 00c8 | | Action Pop_Auxiliary_Range
0d73 3ff6 |? | Loop_Increasing 0xd6a
0d74 00ce | | Action Pop_Auxiliary
0d75 00d8 | | Load_Top At_Offset_0
0d76 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d77 0000 | | .XXX[0x1]
0d78 ; --------------------------------------------------------------------------------------
0d78 ; SUBPROGRAM
0d78 ; --------------------------------------------------------------------------------------
0d78 0da3 | | .CONST 0x0da3 ; Address of begin
0d79 0004 | | .CONST 0x0004 ; Address of exception handler
0d7a 0011 | | .CONST 0x0011 ; Number of locals
0d7b INIT_0d78:
0d7b 029f 1613 | | Declare_Subprogram INIT_1610,For_Call
0d7d 029f 163b | ;| Declare_Subprogram INIT_1638,For_Call
0d7f 029f 1643 | C| Declare_Subprogram INIT_1640,For_Call
0d81 029f 168b | | Declare_Subprogram INIT_1688,For_Call
0d83 029f 16db | | Declare_Subprogram INIT_16d8,For_Call
0d85 a00c | | Store_Unchecked 0x0,0xc
0d86 00c6 | | Action Check_Subprogram_Elaborated
0d87 e005 | | Load 0x0,0x5
0d88 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d89 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d8a e005 | | Load 0x0,0x5
0d8b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d8c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d8d 4802 |H | Short_Literal 0x2
0d8e 4802 |H | Short_Literal 0x2
0d8f 0099 | | Action Reference_Dynamic
0d90 4803 |H | Short_Literal 0x3
0d91 4802 |H | Short_Literal 0x2
0d92 0099 | | Action Reference_Dynamic
0d93 4804 |H | Short_Literal 0x4
0d94 4802 |H | Short_Literal 0x2
0d95 0099 | | Action Reference_Dynamic
0d96 4806 |H | Short_Literal 0x6
0d97 4802 |H | Short_Literal 0x2
0d98 0099 | | Action Reference_Dynamic
0d99 e005 | | Load 0x0,0x5
0d9a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d9b 195a | Z | Execute Package,Field_Reference,Field_Number 0x5a
0d9c e005 | | Load 0x0,0x5
0d9d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d9e 195c | \ | Execute Package,Field_Reference,Field_Number 0x5c
0d9f e018 | | Load 0x0,0x18
0da0 e019 | | Load 0x0,0x19
0da1 4811 |H | Short_Literal 0x11
0da2 0007 | | Action Break_Optional
0da3 BODY_0d78:
0da3 e5fe | | Load 0x2,-0x2
0da4 e5ff | | Load 0x2,-0x1
0da5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0da6 e407 | | Load 0x2,0x7
0da7 e408 | | Load 0x2,0x8
0da8 4809 |H | Short_Literal 0x9
0da9 4802 |H | Short_Literal 0x2
0daa 0099 | | Action Reference_Dynamic
0dab 480a |H | Short_Literal 0xa
0dac 4802 |H | Short_Literal 0x2
0dad 0099 | | Action Reference_Dynamic
0dae 480b |H | Short_Literal 0xb
0daf 4802 |H | Short_Literal 0x2
0db0 0099 | | Action Reference_Dynamic
0db1 480c |H | Short_Literal 0xc
0db2 4802 |H | Short_Literal 0x2
0db3 0099 | | Action Reference_Dynamic
0db4 480d |H | Short_Literal 0xd
0db5 4802 |H | Short_Literal 0x2
0db6 0099 | | Action Reference_Dynamic
0db7 480e |H | Short_Literal 0xe
0db8 4802 |H | Short_Literal 0x2
0db9 0099 | | Action Reference_Dynamic
0dba 480f |H | Short_Literal 0xf
0dbb 4802 |H | Short_Literal 0x2
0dbc 0099 | | Action Reference_Dynamic
0dbd 800c | | Call 0x0,0xc
0dbe e005 | | Load 0x0,0x5
0dbf 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0dc0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0dc1 01c6 | | Execute Vector,Convert_To_Formal
0dc2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0dc3 0000 0000 | | .BLANK 0000[0x5]
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; SUBPROGRAM
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0ddb | | .CONST 0x0ddb ; Address of begin
0dc9 0004 | | .CONST 0x0004 ; Address of exception handler
0dca 0005 | | .CONST 0x0005 ; Number of locals
0dcb INIT_0dc8:
0dcb 00db | | Load_Top At_Offset_3
0dcc e013 | | Load 0x0,0x13
0dcd 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0dce 00db | | Load_Top At_Offset_3
0dcf 01da | | Execute Vector,Bounds
0dd0 e005 | | Load 0x0,0x5
0dd1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0dd2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0dd3 035b | [ | Declare_Type Array,Constrained
0dd4 0337 | 7 | Declare_Variable Array
0dd5 00d8 | | Load_Top At_Offset_0
0dd6 01dd | | Execute Vector,First
0dd7 00e3 | | Load_Encached Natural_Cache
0dd8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0dd9 029f 16f3 | | Declare_Subprogram INIT_16f0,For_Call
0ddb BODY_0dc8:
0ddb 00cf | | Action Mark_Auxiliary
0ddc e402 | | Load 0x2,0x2
0ddd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0dde 01d9 | | Execute Vector,Reverse_Bounds
0ddf 0263 | c | Execute Discrete,Above_Bound
0de0 700d |p | Jump_Nonzero 0xdee
0de1 00d8 | | Load_Top At_Offset_0
0de2 e402 | | Load 0x2,0x2
0de3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0de4 01d7 | | Execute Vector,Field_Read
0de5 e005 | | Load 0x0,0x5
0de6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0de7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0de8 0f01 | | Execute_Immediate Equal,0x1
0de9 7002 |p | Jump_Nonzero 0xdec
0dea e5ff | | Load 0x2,-0x1
0deb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0dec 00c8 | | Action Pop_Auxiliary_Range
0ded 3ff3 |? | Loop_Increasing 0xde1
0dee 00ce | | Action Pop_Auxiliary
0def 8405 | | Call 0x2,0x5
0df0 4801 |H | Short_Literal 0x1
0df1 00da | | Load_Top At_Offset_2
0df2 0aff | | Execute_Immediate Plus,-0x1
0df3 e403 | | Load 0x2,0x3
0df4 01cf | | Execute Vector,Slice_Read
0df5 e005 | | Load 0x0,0x5
0df6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0df7 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0df8 01c6 | | Execute Vector,Convert_To_Formal
0df9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0dfa 0000 0000 | | .BLANK 0000[0x6]
0e00 ; --------------------------------------------------------------------------------------
0e00 ; SUBPROGRAM
0e00 ; --------------------------------------------------------------------------------------
0e00 0e03 | | .CONST 0x0e03 ; Address of begin
0e01 0004 | | .CONST 0x0004 ; Address of exception handler
0e02 0001 | | .CONST 0x0001 ; Number of locals
0e03 BODY_0e00:
0e03 INIT_0e00:
0e03 4801 |H | Short_Literal 0x1
0e04 e5fe | | Load 0x2,-0x2
0e05 e005 | | Load 0x0,0x5
0e06 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e07 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0e08 e5ff | | Load 0x2,-0x1
0e09 e005 | | Load 0x0,0x5
0e0a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e0b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0e0c e017 | | Load 0x0,0x17
0e0d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0e0e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e0f 0000 | | .XXX[0x1]
0e10 ; --------------------------------------------------------------------------------------
0e10 ; SUBPROGRAM
0e10 ; --------------------------------------------------------------------------------------
0e10 0e23 | # | .CONST 0x0e23 ; Address of begin
0e11 0004 | | .CONST 0x0004 ; Address of exception handler
0e12 0004 | | .CONST 0x0004 ; Number of locals
0e13 INIT_0e10:
0e13 e005 | | Load 0x0,0x5
0e14 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0e15 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e16 e005 | | Load 0x0,0x5
0e17 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0e18 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0e19 0337 | 7 | Declare_Variable Array
0e1a e5ff | | Load 0x2,-0x1
0e1b e005 | | Load 0x0,0x5
0e1c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0e1d 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0e1e e005 | | Load 0x0,0x5
0e1f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0e20 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0e21 e016 | | Load 0x0,0x16
0e22 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e23 BODY_0e10:
0e23 4800 |H | Short_Literal 0x0
0e24 00d9 | | Load_Top At_Offset_1
0e25 01d7 | | Execute Vector,Field_Read
0e26 6804 |h | Jump_Zero 0xe2b
0e27 4803 |H | Short_Literal 0x3
0e28 00d9 | | Load_Top At_Offset_1
0e29 01d7 | | Execute Vector,Field_Read
0e2a 681b |h | Jump_Zero 0xe46
0e2b e5ff | | Load 0x2,-0x1
0e2c e5fe | | Load 0x2,-0x2
0e2d e005 | | Load 0x0,0x5
0e2e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0e2f 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0e30 e005 | | Load 0x0,0x5
0e31 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0e32 188a | | Execute Package,Field_Execute,Field_Number 0x8a
0e33 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0e34 e5fe | | Load 0x2,-0x2
0e35 00db | | Load_Top At_Offset_3
0e36 e005 | | Load 0x0,0x5
0e37 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0e38 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0e39 00da | | Load_Top At_Offset_2
0e3a 01d4 | | Execute Vector,Structure_Write
0e3b 4803 |H | Short_Literal 0x3
0e3c 00da | | Load_Top At_Offset_2
0e3d 01d7 | | Execute Vector,Field_Read
0e3e 7004 |p | Jump_Nonzero 0xe43
0e3f 4804 |H | Short_Literal 0x4
0e40 00da | | Load_Top At_Offset_2
0e41 01d7 | | Execute Vector,Field_Read
0e42 7801 |x | Jump 0xe44
0e43 4801 |H | Short_Literal 0x1
0e44 0f00 | | Execute_Immediate Equal,0x0
0e45 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e46 4801 |H | Short_Literal 0x1
0e47 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e48 ; --------------------------------------------------------------------------------------
0e48 ; SUBPROGRAM
0e48 ; --------------------------------------------------------------------------------------
0e48 0e4b | K | .CONST 0x0e4b ; Address of begin
0e49 0004 | | .CONST 0x0004 ; Address of exception handler
0e4a 0001 | | .CONST 0x0001 ; Number of locals
0e4b BODY_0e48:
0e4b INIT_0e48:
0e4b 4800 |H | Short_Literal 0x0
0e4c e22c | , | Load 0x1,0x2c
0e4d 4800 |H | Short_Literal 0x0
0e4e e5fe | | Load 0x2,-0x2
0e4f e5ff | | Load 0x2,-0x1
0e50 8236 | 6 | Call 0x1,0x36
0e51 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e52 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e53 0000 0000 | | .BLANK 0000[0x5]
0e58 ; --------------------------------------------------------------------------------------
0e58 ; SUBPROGRAM
0e58 ; --------------------------------------------------------------------------------------
0e58 0e5b | [ | .CONST 0x0e5b ; Address of begin
0e59 0004 | | .CONST 0x0004 ; Address of exception handler
0e5a 0001 | | .CONST 0x0001 ; Number of locals
0e5b BODY_0e58:
0e5b INIT_0e58:
0e5b 4800 |H | Short_Literal 0x0
0e5c e22c | , | Load 0x1,0x2c
0e5d e5fe | | Load 0x2,-0x2
0e5e 4800 |H | Short_Literal 0x0
0e5f e5ff | | Load 0x2,-0x1
0e60 823a | : | Call 0x1,0x3a
0e61 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e62 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e63 0000 0000 | | .BLANK 0000[0x5]
0e68 ; --------------------------------------------------------------------------------------
0e68 ; SUBPROGRAM
0e68 ; --------------------------------------------------------------------------------------
0e68 0e99 | | .CONST 0x0e99 ; Address of begin
0e69 0f04 | | .CONST 0x0f04 ; Address of exception handler
0e6a 000b | | .CONST 0x000b ; Number of locals
0e6b INIT_0e68:
0e6b 00db | | Load_Top At_Offset_3
0e6c e013 | | Load 0x0,0x13
0e6d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0e6e e016 | | Load 0x0,0x16
0e6f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e70 4802 |H | Short_Literal 0x2
0e71 00d9 | | Load_Top At_Offset_1
0e72 01d7 | | Execute Vector,Field_Read
0e73 0007 | | Action Break_Optional
0e74 4800 |H | Short_Literal 0x0
0e75 e22c | , | Load 0x1,0x2c
0e76 4800 |H | Short_Literal 0x0
0e77 e5fe | | Load 0x2,-0x2
0e78 e5ff | | Load 0x2,-0x1
0e79 8236 | 6 | Call 0x1,0x36
0e7a 00d8 | | Load_Top At_Offset_0
0e7b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e7c 01da | | Execute Vector,Bounds
0e7d e005 | | Load 0x0,0x5
0e7e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e7f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0e80 035b | [ | Declare_Type Array,Constrained
0e81 0337 | 7 | Declare_Variable Array
0e82 00e3 | | Load_Encached Natural_Cache
0e83 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0e84 e22a | * | Load 0x1,0x2a
0e85 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0e86 e005 | | Load 0x0,0x5
0e87 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e88 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e89 4800 |H | Short_Literal 0x0
0e8a e005 | | Load 0x0,0x5
0e8b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e8c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e8d 1c08 | | Execute_Immediate Run_Utility,0x8
0e8e e005 | | Load 0x0,0x5
0e8f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e90 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e91 00d9 | | Load_Top At_Offset_1
0e92 016d | m | Execute Variant_Record,Structure_Write
0e93 e005 | | Load 0x0,0x5
0e94 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e95 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e96 e005 | | Load 0x0,0x5
0e97 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e98 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e99 BODY_0e68:
0e99 4800 |H | Short_Literal 0x0
0e9a e404 | | Load 0x2,0x4
0e9b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0e9c e014 | | Load 0x0,0x14
0e9d 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0e9e 7003 |p | Jump_Nonzero 0xea2
0e9f 00da | | Load_Top At_Offset_2
0ea0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ea1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ea2 e22a | * | Load 0x1,0x2a
0ea3 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0ea4 e011 | | Load 0x0,0x11
0ea5 180d | | Execute Package,Field_Execute,Field_Number 0xd
0ea6 e22a | * | Load 0x1,0x2a
0ea7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0ea8 c407 | | Store 0x2,0x7
0ea9 00cf | | Action Mark_Auxiliary
0eaa e404 | | Load 0x2,0x4
0eab 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0eac 01d9 | | Execute Vector,Reverse_Bounds
0ead 0263 | c | Execute Discrete,Above_Bound
0eae 7047 |pG | Jump_Nonzero 0xef6
0eaf 00d8 | | Load_Top At_Offset_0
0eb0 e404 | | Load 0x2,0x4
0eb1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0eb2 01d7 | | Execute Vector,Field_Read
0eb3 a408 | | Store_Unchecked 0x2,0x8
0eb4 e408 | | Load 0x2,0x8
0eb5 e005 | | Load 0x0,0x5
0eb6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0eb7 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0eb8 a40b | | Store_Unchecked 0x2,0xb
0eb9 00cf | | Action Mark_Auxiliary
0eba 7814 |x | Jump 0xecf
0ebb e40b | | Load 0x2,0xb
0ebc e005 | | Load 0x0,0x5
0ebd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ebe 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0ebf a40a | | Store_Unchecked 0x2,0xa
0ec0 e40a | | Load 0x2,0xa
0ec1 e005 | | Load 0x0,0x5
0ec2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ec3 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ec4 7001 |p | Jump_Nonzero 0xec6
0ec5 780e |x | Jump 0xed4
0ec6 e403 | | Load 0x2,0x3
0ec7 680c |h | Jump_Zero 0xed4
0ec8 e40b | | Load 0x2,0xb
0ec9 e005 | | Load 0x0,0x5
0eca 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ecb 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0ecc a40b | | Store_Unchecked 0x2,0xb
0ecd 7800 |x | Jump 0xece
0ece 00c9 | | Action Pop_Auxiliary_Loop
0ecf e40b | | Load 0x2,0xb
0ed0 e005 | | Load 0x0,0x5
0ed1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ed2 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ed3 6fe7 |o | Jump_Zero 0xebb
0ed4 00ce | | Action Pop_Auxiliary
0ed5 e40a | | Load 0x2,0xa
0ed6 e005 | | Load 0x0,0x5
0ed7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ed8 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0ed9 6813 |h | Jump_Zero 0xeed
0eda e40a | | Load 0x2,0xa
0edb 4801 |H | Short_Literal 0x1
0edc e407 | | Load 0x2,0x7
0edd 8232 | 2 | Call 0x1,0x32
0ede 7015 |p | Jump_Nonzero 0xef4
0edf 4800 |H | Short_Literal 0x0
0ee0 4801 |H | Short_Literal 0x1
0ee1 e40a | | Load 0x2,0xa
0ee2 e407 | | Load 0x2,0x7
0ee3 e22a | * | Load 0x1,0x2a
0ee4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ee5 e40a | | Load 0x2,0xa
0ee6 e406 | | Load 0x2,0x6
0ee7 e405 | | Load 0x2,0x5
0ee8 01d6 | | Execute Vector,Field_Write
0ee9 e406 | | Load 0x2,0x6
0eea 0a01 | | Execute_Immediate Plus,0x1
0eeb c406 | | Store 0x2,0x6
0eec 7807 |x | Jump 0xef4
0eed e408 | | Load 0x2,0x8
0eee e406 | | Load 0x2,0x6
0eef e405 | | Load 0x2,0x5
0ef0 01d6 | | Execute Vector,Field_Write
0ef1 e406 | | Load 0x2,0x6
0ef2 0a01 | | Execute_Immediate Plus,0x1
0ef3 c406 | | Store 0x2,0x6
0ef4 00c8 | | Action Pop_Auxiliary_Range
0ef5 3fb9 |? | Loop_Increasing 0xeaf
0ef6 00ce | | Action Pop_Auxiliary
0ef7 e407 | | Load 0x2,0x7
0ef8 e22a | * | Load 0x1,0x2a
0ef9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0efa 4801 |H | Short_Literal 0x1
0efb e406 | | Load 0x2,0x6
0efc 0aff | | Execute_Immediate Plus,-0x1
0efd e405 | | Load 0x2,0x5
0efe 01cf | | Execute Vector,Slice_Read
0eff e005 | | Load 0x0,0x5
0f00 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f01 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0f02 01c6 | | Execute Vector,Convert_To_Formal
0f03 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f04 TRAP_0e68:
0f04 0007 | | Action Break_Optional
0f05 e407 | | Load 0x2,0x7
0f06 e22a | * | Load 0x1,0x2a
0f07 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0f08 4801 |H | Short_Literal 0x1
0f09 4802 |H | Short_Literal 0x2
0f0a e012 | | Load 0x0,0x12
0f0b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f0c 035b | [ | Declare_Type Array,Constrained
0f0d 0337 | 7 | Declare_Variable Array
0f0e e5fe | | Load 0x2,-0x2
0f0f e013 | | Load 0x0,0x13
0f10 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0f11 4801 |H | Short_Literal 0x1
0f12 00da | | Load_Top At_Offset_2
0f13 01d6 | | Execute Vector,Field_Write
0f14 e5ff | | Load 0x2,-0x1
0f15 e005 | | Load 0x0,0x5
0f16 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f17 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f18 4802 |H | Short_Literal 0x2
0f19 00da | | Load_Top At_Offset_2
0f1a 01d6 | | Execute Vector,Field_Write
0f1b 6008 |` | Indirect_Literal Discrete,0xf24,{0x00000000, 0x0000380f}
0f1c e014 | | Load 0x0,0x14
0f1d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f1e e409 | | Load 0x2,0x9
0f1f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0f20 00db | | Load_Top At_Offset_3
0f21 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0f22 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f23 0000 | | .XXX[0x1]
0f24 0000 0000 | | .LITERAL {0x00000000, 0x0000380f}
0f28 ; --------------------------------------------------------------------------------------
0f28 ; SUBPROGRAM
0f28 ; --------------------------------------------------------------------------------------
0f28 0f4b | K | .CONST 0x0f4b ; Address of begin
0f29 0004 | | .CONST 0x0004 ; Address of exception handler
0f2a 0009 | | .CONST 0x0009 ; Number of locals
0f2b INIT_0f28:
0f2b 00db | | Load_Top At_Offset_3
0f2c e013 | | Load 0x0,0x13
0f2d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0f2e e016 | | Load 0x0,0x16
0f2f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f30 4802 |H | Short_Literal 0x2
0f31 00d9 | | Load_Top At_Offset_1
0f32 01d7 | | Execute Vector,Field_Read
0f33 0007 | | Action Break_Optional
0f34 e22a | * | Load 0x1,0x2a
0f35 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0f36 e014 | | Load 0x0,0x14
0f37 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f38 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0f39 4800 |H | Short_Literal 0x0
0f3a e005 | | Load 0x0,0x5
0f3b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f3c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f3d 1c08 | | Execute_Immediate Run_Utility,0x8
0f3e e005 | | Load 0x0,0x5
0f3f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f40 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0f41 00d9 | | Load_Top At_Offset_1
0f42 016d | m | Execute Variant_Record,Structure_Write
0f43 e005 | | Load 0x0,0x5
0f44 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f45 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f46 e005 | | Load 0x0,0x5
0f47 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f48 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f49 029f 170b | | Declare_Subprogram INIT_1708,For_Call
0f4b BODY_0f28:
0f4b e5ff | | Load 0x2,-0x1
0f4c e005 | | Load 0x0,0x5
0f4d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f4e 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0f4f 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0f50 00cf | | Action Mark_Auxiliary
0f51 7814 |x | Jump 0xf66
0f52 00da | | Load_Top At_Offset_2
0f53 e005 | | Load 0x0,0x5
0f54 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f55 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0f56 a407 | | Store_Unchecked 0x2,0x7
0f57 00db | | Load_Top At_Offset_3
0f58 e005 | | Load 0x0,0x5
0f59 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f5a 180f | | Execute Package,Field_Execute,Field_Number 0xf
0f5b 7001 |p | Jump_Nonzero 0xf5d
0f5c 780e |x | Jump 0xf6b
0f5d e403 | | Load 0x2,0x3
0f5e 680c |h | Jump_Zero 0xf6b
0f5f 00da | | Load_Top At_Offset_2
0f60 e005 | | Load 0x0,0x5
0f61 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f62 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0f63 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0f64 7800 |x | Jump 0xf65
0f65 00c9 | | Action Pop_Auxiliary_Loop
0f66 00da | | Load_Top At_Offset_2
0f67 e005 | | Load 0x0,0x5
0f68 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f69 180f | | Execute Package,Field_Execute,Field_Number 0xf
0f6a 6fe7 |o | Jump_Zero 0xf52
0f6b 00ce | | Action Pop_Auxiliary
0f6c 00da | | Load_Top At_Offset_2
0f6d e005 | | Load 0x0,0x5
0f6e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f6f 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0f70 6809 |h | Jump_Zero 0xf7a
0f71 00da | | Load_Top At_Offset_2
0f72 e5ff | | Load 0x2,-0x1
0f73 021e | | Execute Heap_Access,Maximum
0f74 6803 |h | Jump_Zero 0xf78
0f75 00db | | Load_Top At_Offset_3
0f76 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0f77 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f78 8409 | | Call 0x2,0x9
0f79 7808 |x | Jump 0xf82
0f7a 4800 |H | Short_Literal 0x0
0f7b e22c | , | Load 0x1,0x2c
0f7c e5fe | | Load 0x2,-0x2
0f7d 4800 |H | Short_Literal 0x0
0f7e e5ff | | Load 0x2,-0x1
0f7f 823a | : | Call 0x1,0x3a
0f80 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0f81 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f82 0831 | 1 | Execute_Immediate Raise,0x31
0f83 0000 0000 | | .BLANK 0000[0x5]
0f88 ; --------------------------------------------------------------------------------------
0f88 ; SUBPROGRAM
0f88 ; --------------------------------------------------------------------------------------
0f88 0f8b | | .CONST 0x0f8b ; Address of begin
0f89 0004 | | .CONST 0x0004 ; Address of exception handler
0f8a 0001 | | .CONST 0x0001 ; Number of locals
0f8b BODY_0f88:
0f8b INIT_0f88:
0f8b e5fd | | Load 0x2,-0x3
0f8c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0f8d 6802 |h | Jump_Zero 0xf90
0f8e 00da | | Load_Top At_Offset_2
0f8f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0f90 00db | | Load_Top At_Offset_3
0f91 00db | | Load_Top At_Offset_3
0f92 01db | | Execute Vector,Length
0f93 e005 | | Load 0x0,0x5
0f94 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f95 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f96 1c08 | | Execute_Immediate Run_Utility,0x8
0f97 e5ff | | Load 0x2,-0x1
0f98 00d9 | | Load_Top At_Offset_1
0f99 00d8 | | Load_Top At_Offset_0
0f9a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0f9b 00da | | Load_Top At_Offset_2
0f9c 01da | | Execute Vector,Bounds
0f9d 00da | | Load_Top At_Offset_2
0f9e 01da | | Execute Vector,Bounds
0f9f 00da | | Load_Top At_Offset_2
0fa0 027f | | Execute Discrete,Equal
0fa1 7001 |p | Jump_Nonzero 0xfa3
0fa2 08e0 | | Execute_Immediate Raise,0xe0
0fa3 00cd | | Action Spare6_Action
0fa4 027f | | Execute Discrete,Equal
0fa5 7001 |p | Jump_Nonzero 0xfa7
0fa6 08e0 | | Execute_Immediate Raise,0xe0
0fa7 00d2 | | Pop_Control Pop_Count_2
0fa8 00d9 | | Load_Top At_Offset_1
0fa9 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0faa 4800 |H | Short_Literal 0x0
0fab 00d9 | | Load_Top At_Offset_1
0fac 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0fad 8213 | | Call 0x1,0x13
0fae 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0faf 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0fb0 ; --------------------------------------------------------------------------------------
0fb0 ; SUBPROGRAM
0fb0 ; --------------------------------------------------------------------------------------
0fb0 0ff0 | | .CONST 0x0ff0 ; Address of begin
0fb1 0004 | | .CONST 0x0004 ; Address of exception handler
0fb2 0013 | | .CONST 0x0013 ; Number of locals
0fb3 INIT_0fb0:
0fb3 e5fd | | Load 0x2,-0x3
0fb4 e5fe | | Load 0x2,-0x2
0fb5 e5ff | | Load 0x2,-0x1
0fb6 8269 | i | Call 0x1,0x69
0fb7 e5fe | | Load 0x2,-0x2
0fb8 00d9 | | Load_Top At_Offset_1
0fb9 e25e | ^ | Load 0x1,0x5e
0fba e25f | _ | Load 0x1,0x5f
0fbb 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60
0fbc 1d61 | a | Execute_Immediate Reference_Lex_1,0x61
0fbd 1d62 | b | Execute_Immediate Reference_Lex_1,0x62
0fbe 1d63 | c | Execute_Immediate Reference_Lex_1,0x63
0fbf 1d64 | d | Execute_Immediate Reference_Lex_1,0x64
0fc0 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
0fc1 1d66 | f | Execute_Immediate Reference_Lex_1,0x66
0fc2 800c | | Call 0x0,0xc
0fc3 e5fe | | Load 0x2,-0x2
0fc4 00d9 | | Load_Top At_Offset_1
0fc5 824c | L | Call 0x1,0x4c
0fc6 e5fe | | Load 0x2,-0x2
0fc7 e013 | | Load 0x0,0x13
0fc8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0fc9 e016 | | Load 0x0,0x16
0fca 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0fcb 4801 |H | Short_Literal 0x1
0fcc 00d9 | | Load_Top At_Offset_1
0fcd 01d7 | | Execute Vector,Field_Read
0fce 0007 | | Action Break_Optional
0fcf 4802 |H | Short_Literal 0x2
0fd0 00da | | Load_Top At_Offset_2
0fd1 01d7 | | Execute Vector,Field_Read
0fd2 0007 | | Action Break_Optional
0fd3 e005 | | Load 0x0,0x5
0fd4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0fd5 180e | | Execute Package,Field_Execute,Field_Number 0xe
0fd6 e005 | | Load 0x0,0x5
0fd7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0fd8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fd9 e015 | | Load 0x0,0x15
0fda 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0fdb e005 | | Load 0x0,0x5
0fdc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0fdd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fde 00e1 | | Load_Encached Boolean_Cache
0fdf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0fe0 e016 | | Load 0x0,0x16
0fe1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fe2 e015 | | Load 0x0,0x15
0fe3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fe4 e005 | | Load 0x0,0x5
0fe5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0fe6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fe7 e005 | | Load 0x0,0x5
0fe8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0fe9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fea 029f 1743 | C| Declare_Subprogram INIT_1740,For_Call
0fec 029f 176b | k| Declare_Subprogram INIT_1768,For_Call
0fee 029f 1793 | | Declare_Subprogram INIT_1790,For_Call
0ff0 BODY_0fb0:
0ff0 e404 | | Load 0x2,0x4
0ff1 01db | | Execute Vector,Length
0ff2 7001 |p | Jump_Nonzero 0xff4
0ff3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0ff4 00cf | | Action Mark_Auxiliary
0ff5 e404 | | Load 0x2,0x4
0ff6 01d9 | | Execute Vector,Reverse_Bounds
0ff7 0263 | c | Execute Discrete,Above_Bound
0ff8 7078 |px | Jump_Nonzero 0x1071
0ff9 00d8 | | Load_Top At_Offset_0
0ffa e404 | | Load 0x2,0x4
0ffb 01d7 | | Execute Vector,Field_Read
0ffc a410 | | Store_Unchecked 0x2,0x10
0ffd e410 | | Load 0x2,0x10
0ffe e005 | | Load 0x0,0x5
0fff 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1000 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
1001 a409 | | Store_Unchecked 0x2,0x9
1002 e408 | | Load 0x2,0x8
1003 e005 | | Load 0x0,0x5
1004 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1005 180e | | Execute Package,Field_Execute,Field_Number 0xe
1006 021f | | Execute Heap_Access,Equal
1007 700a |p | Jump_Nonzero 0x1012
1008 e408 | | Load 0x2,0x8
1009 e005 | | Load 0x0,0x5
100a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
100b 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
100c e409 | | Load 0x2,0x9
100d e005 | | Load 0x0,0x5
100e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
100f 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1010 01de | | Execute Vector,Not_Equal
1011 6801 |h | Jump_Zero 0x1013
1012 8412 | | Call 0x2,0x12
1013 e40d | | Load 0x2,0xd
1014 e410 | | Load 0x2,0x10
1015 e005 | | Load 0x0,0x5
1016 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1017 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
1018 a40e | | Store_Unchecked 0x2,0xe
1019 e40e | | Load 0x2,0xe
101a e015 | | Load 0x0,0x15
101b 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
101c 684b |hK | Jump_Zero 0x1068
101d e410 | | Load 0x2,0x10
101e a40b | | Store_Unchecked 0x2,0xb
101f 00cf | | Action Mark_Auxiliary
1020 7813 |x | Jump 0x1034
1021 e40b | | Load 0x2,0xb
1022 e005 | | Load 0x0,0x5
1023 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1024 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1025 a40f | | Store_Unchecked 0x2,0xf
1026 e40f | | Load 0x2,0xf
1027 e005 | | Load 0x0,0x5
1028 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1029 180f | | Execute Package,Field_Execute,Field_Number 0xf
102a 7001 |p | Jump_Nonzero 0x102c
102b 780d |x | Jump 0x1039
102c 4801 |H | Short_Literal 0x1
102d a40c | | Store_Unchecked 0x2,0xc
102e e40b | | Load 0x2,0xb
102f e005 | | Load 0x0,0x5
1030 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1031 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
1032 a40b | | Store_Unchecked 0x2,0xb
1033 00c9 | | Action Pop_Auxiliary_Loop
1034 e40b | | Load 0x2,0xb
1035 e005 | | Load 0x0,0x5
1036 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1037 180f | | Execute Package,Field_Execute,Field_Number 0xf
1038 6fe8 |o | Jump_Zero 0x1021
1039 00ce | | Action Pop_Auxiliary
103a e40f | | Load 0x2,0xf
103b e005 | | Load 0x0,0x5
103c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
103d 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
103e 680e |h | Jump_Zero 0x104d
103f e406 | | Load 0x2,0x6
1040 6807 |h | Jump_Zero 0x1048
1041 e410 | | Load 0x2,0x10
1042 e40f | | Load 0x2,0xf
1043 e005 | | Load 0x0,0x5
1044 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1045 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
1046 021f | | Execute Heap_Access,Equal
1047 7027 |p' | Jump_Nonzero 0x106f
1048 e407 | | Load 0x2,0x7
1049 6803 |h | Jump_Zero 0x104d
104a e40c | | Load 0x2,0xc
104b 6801 |h | Jump_Zero 0x104d
104c 7822 |x" | Jump 0x106f
104d e40e | | Load 0x2,0xe
104e e015 | | Load 0x0,0x15
104f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1050 6815 |h | Jump_Zero 0x1066
1051 e40d | | Load 0x2,0xd
1052 e002 | | Load 0x0,0x2
1053 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1054 4801 |H | Short_Literal 0x1
1055 4801 |H | Short_Literal 0x1
1056 e012 | | Load 0x0,0x12
1057 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1058 035b | [ | Declare_Type Array,Constrained
1059 0337 | 7 | Declare_Variable Array
105a e410 | | Load 0x2,0x10
105b e005 | | Load 0x0,0x5
105c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
105d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
105e 4801 |H | Short_Literal 0x1
105f 00da | | Load_Top At_Offset_2
1060 01d6 | | Execute Vector,Field_Write
1061 480f |H | Short_Literal 0xf
1062 e40a | | Load 0x2,0xa
1063 e015 | | Load 0x0,0x15
1064 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1065 7809 |x | Jump 0x106f
1066 8413 | | Call 0x2,0x13
1067 7807 |x | Jump 0x106f
1068 e40e | | Load 0x2,0xe
1069 e015 | | Load 0x0,0x15
106a 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
106b e5fc | | Load 0x2,-0x4
106c e015 | | Load 0x0,0x15
106d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
106e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
106f 00c8 | | Action Pop_Auxiliary_Range
1070 3f88 |? | Loop_Increasing 0xff9
1071 00ce | | Action Pop_Auxiliary
1072 8411 | | Call 0x2,0x11
1073 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1074 0000 0000 | | .BLANK 0000[0x4]
1078 ; --------------------------------------------------------------------------------------
1078 ; SUBPROGRAM
1078 ; --------------------------------------------------------------------------------------
1078 10a0 | | .CONST 0x10a0 ; Address of begin
1079 0004 | | .CONST 0x0004 ; Address of exception handler
107a 000c | | .CONST 0x000c ; Number of locals
107b INIT_1078:
107b e5fd | | Load 0x2,-0x3
107c e5fe | | Load 0x2,-0x2
107d e5ff | | Load 0x2,-0x1
107e 8269 | i | Call 0x1,0x69
107f e5fe | | Load 0x2,-0x2
1080 00d9 | | Load_Top At_Offset_1
1081 e251 | Q | Load 0x1,0x51
1082 e252 | R | Load 0x1,0x52
1083 1d53 | S | Execute_Immediate Reference_Lex_1,0x53
1084 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
1085 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
1086 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
1087 1d57 | W | Execute_Immediate Reference_Lex_1,0x57
1088 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
1089 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
108a 800c | | Call 0x0,0xc
108b e5fe | | Load 0x2,-0x2
108c 00d9 | | Load_Top At_Offset_1
108d 824c | L | Call 0x1,0x4c
108e e005 | | Load 0x0,0x5
108f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1090 180e | | Execute Package,Field_Execute,Field_Number 0xe
1091 e005 | | Load 0x0,0x5
1092 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1093 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1094 e015 | | Load 0x0,0x15
1095 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1096 e016 | | Load 0x0,0x16
1097 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1098 e015 | | Load 0x0,0x15
1099 1b0e | | Execute Package,Field_Read,Field_Number 0xe
109a 029f 17ab | | Declare_Subprogram INIT_17a8,For_Call
109c 029f 17d3 | | Declare_Subprogram INIT_17d0,For_Call
109e 029f 17fb | | Declare_Subprogram INIT_17f8,For_Call
10a0 BODY_1078:
10a0 e404 | | Load 0x2,0x4
10a1 01db | | Execute Vector,Length
10a2 7001 |p | Jump_Nonzero 0x10a4
10a3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10a4 00cf | | Action Mark_Auxiliary
10a5 e404 | | Load 0x2,0x4
10a6 01d9 | | Execute Vector,Reverse_Bounds
10a7 0263 | c | Execute Discrete,Above_Bound
10a8 704a |pJ | Jump_Nonzero 0x10f3
10a9 00d8 | | Load_Top At_Offset_0
10aa e404 | | Load 0x2,0x4
10ab 01d7 | | Execute Vector,Field_Read
10ac e005 | | Load 0x0,0x5
10ad 1b16 | | Execute Package,Field_Read,Field_Number 0x16
10ae 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
10af a406 | | Store_Unchecked 0x2,0x6
10b0 e405 | | Load 0x2,0x5
10b1 e005 | | Load 0x0,0x5
10b2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
10b3 180e | | Execute Package,Field_Execute,Field_Number 0xe
10b4 021f | | Execute Heap_Access,Equal
10b5 700a |p | Jump_Nonzero 0x10c0
10b6 e405 | | Load 0x2,0x5
10b7 e005 | | Load 0x0,0x5
10b8 1b16 | | Execute Package,Field_Read,Field_Number 0x16
10b9 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
10ba e406 | | Load 0x2,0x6
10bb e005 | | Load 0x0,0x5
10bc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
10bd 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
10be 01de | | Execute Vector,Not_Equal
10bf 6801 |h | Jump_Zero 0x10c1
10c0 840b | | Call 0x2,0xb
10c1 e408 | | Load 0x2,0x8
10c2 00d9 | | Load_Top At_Offset_1
10c3 e404 | | Load 0x2,0x4
10c4 01d7 | | Execute Vector,Field_Read
10c5 e005 | | Load 0x0,0x5
10c6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
10c7 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
10c8 a409 | | Store_Unchecked 0x2,0x9
10c9 e409 | | Load 0x2,0x9
10ca e015 | | Load 0x0,0x15
10cb 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
10cc 681d |h | Jump_Zero 0x10ea
10cd e409 | | Load 0x2,0x9
10ce e015 | | Load 0x0,0x15
10cf 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
10d0 6817 |h | Jump_Zero 0x10e8
10d1 e408 | | Load 0x2,0x8
10d2 e002 | | Load 0x0,0x2
10d3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
10d4 4801 |H | Short_Literal 0x1
10d5 4801 |H | Short_Literal 0x1
10d6 e012 | | Load 0x0,0x12
10d7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10d8 035b | [ | Declare_Type Array,Constrained
10d9 0337 | 7 | Declare_Variable Array
10da 00db | | Load_Top At_Offset_3
10db e404 | | Load 0x2,0x4
10dc 01d7 | | Execute Vector,Field_Read
10dd e005 | | Load 0x0,0x5
10de 1b14 | | Execute Package,Field_Read,Field_Number 0x14
10df 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10e0 4801 |H | Short_Literal 0x1
10e1 00da | | Load_Top At_Offset_2
10e2 01d6 | | Execute Vector,Field_Write
10e3 480f |H | Short_Literal 0xf
10e4 e407 | | Load 0x2,0x7
10e5 e015 | | Load 0x0,0x15
10e6 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
10e7 7809 |x | Jump 0x10f1
10e8 840c | | Call 0x2,0xc
10e9 7807 |x | Jump 0x10f1
10ea e409 | | Load 0x2,0x9
10eb e015 | | Load 0x0,0x15
10ec 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
10ed e5fc | | Load 0x2,-0x4
10ee e015 | | Load 0x0,0x15
10ef 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
10f0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10f1 00c8 | | Action Pop_Auxiliary_Range
10f2 3fb6 |? | Loop_Increasing 0x10a9
10f3 00ce | | Action Pop_Auxiliary
10f4 840a | | Call 0x2,0xa
10f5 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10f6 0000 0000 | | .XXX[0x2]
10f8 ; --------------------------------------------------------------------------------------
10f8 ; SUBPROGRAM
10f8 ; --------------------------------------------------------------------------------------
10f8 110f | | .CONST 0x110f ; Address of begin
10f9 0004 | | .CONST 0x0004 ; Address of exception handler
10fa 0008 | | .CONST 0x0008 ; Number of locals
10fb INIT_10f8:
10fb 4801 |H | Short_Literal 0x1
10fc e5fe | | Load 0x2,-0x2
10fd e005 | | Load 0x0,0x5
10fe 1b14 | | Execute Package,Field_Read,Field_Number 0x14
10ff 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1100 035b | [ | Declare_Type Array,Constrained
1101 0337 | 7 | Declare_Variable Array
1102 00e3 | | Load_Encached Natural_Cache
1103 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1104 e5ff | | Load 0x2,-0x1
1105 e015 | | Load 0x0,0x15
1106 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1107 e015 | | Load 0x0,0x15
1108 1b10 | | Execute Package,Field_Read,Field_Number 0x10
1109 e012 | | Load 0x0,0x12
110a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
110b 029f 1813 | | Declare_Subprogram INIT_1810,For_Call
110d 029f 1843 | C| Declare_Subprogram INIT_1840,For_Call
110f BODY_10f8:
110f 00cf | | Action Mark_Auxiliary
1110 e404 | | Load 0x2,0x4
1111 01d9 | | Execute Vector,Reverse_Bounds
1112 0263 | c | Execute Discrete,Above_Bound
1113 703f |p? | Jump_Nonzero 0x1153
1114 00d8 | | Load_Top At_Offset_0
1115 e404 | | Load 0x2,0x4
1116 01d7 | | Execute Vector,Field_Read
1117 e015 | | Load 0x0,0x15
1118 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1119 e5fd | | Load 0x2,-0x3
111a 027f | | Execute Discrete,Equal
111b 6835 |h5 | Jump_Zero 0x1151
111c 4801 |H | Short_Literal 0x1
111d 00d9 | | Load_Top At_Offset_1
111e e404 | | Load 0x2,0x4
111f 01d7 | | Execute Vector,Field_Read
1120 e015 | | Load 0x0,0x15
1121 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1122 a406 | | Store_Unchecked 0x2,0x6
1123 00d8 | | Load_Top At_Offset_0
1124 e404 | | Load 0x2,0x4
1125 01d7 | | Execute Vector,Field_Read
1126 e015 | | Load 0x0,0x15
1127 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1128 4612 |F | Jump_Case 0x13
1129 7827 |x' | Jump 0x1151 ; case 0x0
112a 7826 |x& | Jump 0x1151 ; case 0x1
112b 7820 |x | Jump 0x114c ; case 0x2
112c 780f |x | Jump 0x113c ; case 0x3
112d 7823 |x# | Jump 0x1151 ; case 0x4
112e 7822 |x" | Jump 0x1151 ; case 0x5
112f 7821 |x! | Jump 0x1151 ; case 0x6
1130 7820 |x | Jump 0x1151 ; case 0x7
1131 781f |x | Jump 0x1151 ; case 0x8
1132 781e |x | Jump 0x1151 ; case 0x9
1133 780a |x | Jump 0x113e ; case 0xa
1134 781c |x | Jump 0x1151 ; case 0xb
1135 7808 |x | Jump 0x113e ; case 0xc
1136 781a |x | Jump 0x1151 ; case 0xd
1137 7819 |x | Jump 0x1151 ; case 0xe
1138 7805 |x | Jump 0x113e ; case 0xf
1139 7817 |x | Jump 0x1151 ; case 0x10
113a 7816 |x | Jump 0x1151 ; case 0x11
113b 7815 |x | Jump 0x1151 ; case 0x12
113c 8407 | | Call 0x2,0x7
113d 7813 |x | Jump 0x1151
113e e406 | | Load 0x2,0x6
113f e005 | | Load 0x0,0x5
1140 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1141 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1142 e005 | | Load 0x0,0x5
1143 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1144 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
1145 e403 | | Load 0x2,0x3
1146 e402 | | Load 0x2,0x2
1147 01d6 | | Execute Vector,Field_Write
1148 e403 | | Load 0x2,0x3
1149 0a01 | | Execute_Immediate Plus,0x1
114a c403 | | Store 0x2,0x3
114b 7805 |x | Jump 0x1151
114c e406 | | Load 0x2,0x6
114d e012 | | Load 0x0,0x12
114e 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
114f 7001 |p | Jump_Nonzero 0x1151
1150 8408 | | Call 0x2,0x8
1151 00c8 | | Action Pop_Auxiliary_Range
1152 3fc1 |? | Loop_Increasing 0x1114
1153 00ce | | Action Pop_Auxiliary
1154 4801 |H | Short_Literal 0x1
1155 e403 | | Load 0x2,0x3
1156 0aff | | Execute_Immediate Plus,-0x1
1157 e402 | | Load 0x2,0x2
1158 01cf | | Execute Vector,Slice_Read
1159 e005 | | Load 0x0,0x5
115a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
115b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
115c 01c6 | | Execute Vector,Convert_To_Formal
115d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
115e 0000 0000 | | .XXX[0x2]
1160 ; --------------------------------------------------------------------------------------
1160 ; SUBPROGRAM
1160 ; --------------------------------------------------------------------------------------
1160 1175 | u | .CONST 0x1175 ; Address of begin
1161 0004 | | .CONST 0x0004 ; Address of exception handler
1162 0007 | | .CONST 0x0007 ; Number of locals
1163 INIT_1160:
1163 e015 | | Load 0x0,0x15
1164 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1165 e015 | | Load 0x0,0x15
1166 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1167 e5fe | | Load 0x2,-0x2
1168 e013 | | Load 0x0,0x13
1169 1817 | | Execute Package,Field_Execute,Field_Number 0x17
116a e016 | | Load 0x0,0x16
116b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
116c 4801 |H | Short_Literal 0x1
116d 00d9 | | Load_Top At_Offset_1
116e 01d7 | | Execute Vector,Field_Read
116f 0007 | | Action Break_Optional
1170 4802 |H | Short_Literal 0x2
1171 00da | | Load_Top At_Offset_2
1172 01d7 | | Execute Vector,Field_Read
1173 029f 1863 | c| Declare_Subprogram INIT_1860,For_Call
1175 BODY_1160:
1175 00cf | | Action Mark_Auxiliary
1176 e016 | | Load 0x0,0x16
1177 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1178 01d9 | | Execute Vector,Reverse_Bounds
1179 0263 | c | Execute Discrete,Above_Bound
117a 7003 |p | Jump_Nonzero 0x117e
117b 8407 | | Call 0x2,0x7
117c 00c8 | | Action Pop_Auxiliary_Range
117d 3ffd |? | Loop_Increasing 0x117b
117e 00ce | | Action Pop_Auxiliary
117f e403 | | Load 0x2,0x3
1180 a5fc | | Store_Unchecked 0x2,-0x4
1181 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1182 0000 0000 | | .BLANK 0000[0x6]
1188 ; --------------------------------------------------------------------------------------
1188 ; SUBPROGRAM
1188 ; --------------------------------------------------------------------------------------
1188 1194 | | .CONST 0x1194 ; Address of begin
1189 0004 | | .CONST 0x0004 ; Address of exception handler
118a 0002 | | .CONST 0x0002 ; Number of locals
118b INIT_1188:
118b e402 | | Load 0x2,0x2
118c e5fe | | Load 0x2,-0x2
118d 4801 |H | Short_Literal 0x1
118e e402 | | Load 0x2,0x2
118f 4800 |H | Short_Literal 0x0
1190 e5fe | | Load 0x2,-0x2
1191 e5ff | | Load 0x2,-0x1
1192 8236 | 6 | Call 0x1,0x36
1193 8238 | 8 | Call 0x1,0x38
1194 BODY_1188:
1194 e402 | | Load 0x2,0x2
1195 e22a | * | Load 0x1,0x2a
1196 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1197 e5ff | | Load 0x2,-0x1
1198 00d9 | | Load_Top At_Offset_1
1199 822f | / | Call 0x1,0x2f
119a 00cb | | Action Pop_Block_With_Result
119b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
119c 0000 0000 | | .BLANK 0000[0x4]
11a0 ; --------------------------------------------------------------------------------------
11a0 ; SUBPROGRAM
11a0 ; --------------------------------------------------------------------------------------
11a0 11a7 | | .CONST 0x11a7 ; Address of begin
11a1 0004 | | .CONST 0x0004 ; Address of exception handler
11a2 0002 | | .CONST 0x0002 ; Number of locals
11a3 INIT_11a0:
11a3 e402 | | Load 0x2,0x2
11a4 e5fe | | Load 0x2,-0x2
11a5 e5ff | | Load 0x2,-0x1
11a6 8238 | 8 | Call 0x1,0x38
11a7 BODY_11a0:
11a7 e402 | | Load 0x2,0x2
11a8 e22a | * | Load 0x1,0x2a
11a9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
11aa 00d8 | | Load_Top At_Offset_0
11ab 00cb | | Action Pop_Block_With_Result
11ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
11ad 0000 0000 | | .XXX[0x3]
11af 0000 | |
11b0 ; --------------------------------------------------------------------------------------
11b0 ; SUBPROGRAM
11b0 ; --------------------------------------------------------------------------------------
11b0 11bd | | .CONST 0x11bd ; Address of begin
11b1 0004 | | .CONST 0x0004 ; Address of exception handler
11b2 0002 | | .CONST 0x0002 ; Number of locals
11b3 INIT_11b0:
11b3 e402 | | Load 0x2,0x2
11b4 e5fe | | Load 0x2,-0x2
11b5 e5fd | | Load 0x2,-0x3
11b6 4801 |H | Short_Literal 0x1
11b7 e402 | | Load 0x2,0x2
11b8 e5fe | | Load 0x2,-0x2
11b9 e5fd | | Load 0x2,-0x3
11ba e5ff | | Load 0x2,-0x1
11bb 823a | : | Call 0x1,0x3a
11bc 823d | = | Call 0x1,0x3d
11bd BODY_11b0:
11bd e402 | | Load 0x2,0x2
11be e22a | * | Load 0x1,0x2a
11bf 181d | | Execute Package,Field_Execute,Field_Number 0x1d
11c0 e5ff | | Load 0x2,-0x1
11c1 00d9 | | Load_Top At_Offset_1
11c2 822f | / | Call 0x1,0x2f
11c3 00cb | | Action Pop_Block_With_Result
11c4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
11c5 0000 0000 | | .XXX[0x3]
11c7 0000 | |
11c8 ; --------------------------------------------------------------------------------------
11c8 ; SUBPROGRAM
11c8 ; --------------------------------------------------------------------------------------
11c8 11d0 | | .CONST 0x11d0 ; Address of begin
11c9 0004 | | .CONST 0x0004 ; Address of exception handler
11ca 0002 | | .CONST 0x0002 ; Number of locals
11cb INIT_11c8:
11cb e402 | | Load 0x2,0x2
11cc e5fe | | Load 0x2,-0x2
11cd e5fd | | Load 0x2,-0x3
11ce e5ff | | Load 0x2,-0x1
11cf 823d | = | Call 0x1,0x3d
11d0 BODY_11c8:
11d0 e402 | | Load 0x2,0x2
11d1 e22a | * | Load 0x1,0x2a
11d2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
11d3 00d8 | | Load_Top At_Offset_0
11d4 00cb | | Action Pop_Block_With_Result
11d5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
11d6 0000 0000 | | .XXX[0x2]
11d8 ; --------------------------------------------------------------------------------------
11d8 ; SUBPROGRAM
11d8 ; --------------------------------------------------------------------------------------
11d8 11e4 | | .CONST 0x11e4 ; Address of begin
11d9 0004 | | .CONST 0x0004 ; Address of exception handler
11da 0002 | | .CONST 0x0002 ; Number of locals
11db INIT_11d8:
11db e404 | | Load 0x2,0x4
11dc e402 | | Load 0x2,0x2
11dd 01d7 | | Execute Vector,Field_Read
11de e005 | | Load 0x0,0x5
11df 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11e0 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
11e1 e005 | | Load 0x0,0x5
11e2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11e3 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
11e4 BODY_11d8:
11e4 00cf | | Action Mark_Auxiliary
11e5 e405 | | Load 0x2,0x5
11e6 0a01 | | Execute_Immediate Plus,0x1
11e7 c405 | | Store 0x2,0x5
11e8 e405 | | Load 0x2,0x5
11e9 e402 | | Load 0x2,0x2
11ea 01dc | | Execute Vector,Last
11eb 027d | } | Execute Discrete,Greater
11ec 7010 |p | Jump_Nonzero 0x11fd
11ed 4800 |H | Short_Literal 0x0
11ee e405 | | Load 0x2,0x5
11ef e402 | | Load 0x2,0x2
11f0 01d7 | | Execute Vector,Field_Read
11f1 e005 | | Load 0x0,0x5
11f2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11f3 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
11f4 e005 | | Load 0x0,0x5
11f5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11f6 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
11f7 00db | | Load_Top At_Offset_3
11f8 e017 | | Load 0x0,0x17
11f9 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
11fa 6802 |h | Jump_Zero 0x11fd
11fb 00c9 | | Action Pop_Auxiliary_Loop
11fc 7fe8 | | Jump 0x11e5
11fd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11fe 0000 0000 | | .XXX[0x2]
1200 ; --------------------------------------------------------------------------------------
1200 ; SUBPROGRAM
1200 ; --------------------------------------------------------------------------------------
1200 1213 | | .CONST 0x1213 ; Address of begin
1201 0004 | | .CONST 0x0004 ; Address of exception handler
1202 0002 | | .CONST 0x0002 ; Number of locals
1203 INIT_1200:
1203 4801 |H | Short_Literal 0x1
1204 e405 | | Load 0x2,0x5
1205 e404 | | Load 0x2,0x4
1206 0272 | r | Execute Discrete,Minus
1207 e005 | | Load 0x0,0x5
1208 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1209 1b13 | | Execute Package,Field_Read,Field_Number 0x13
120a 035b | [ | Declare_Type Array,Constrained
120b 0337 | 7 | Declare_Variable Array
120c e404 | | Load 0x2,0x4
120d e405 | | Load 0x2,0x5
120e 0aff | | Execute_Immediate Plus,-0x1
120f e402 | | Load 0x2,0x2
1210 01cf | | Execute Vector,Slice_Read
1211 00d9 | | Load_Top At_Offset_1
1212 01d4 | | Execute Vector,Structure_Write
1213 BODY_1200:
1213 e40a | | Load 0x2,0xa
1214 e410 | | Load 0x2,0x10
1215 e5fe | | Load 0x2,-0x2
1216 e405 | | Load 0x2,0x5
1217 e404 | | Load 0x2,0x4
1218 0272 | r | Execute Discrete,Minus
1219 e005 | | Load 0x0,0x5
121a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
121b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
121c 1c08 | | Execute_Immediate Run_Utility,0x8
121d e602 | | Load 0x3,0x2
121e 00d9 | | Load_Top At_Offset_1
121f 00d8 | | Load_Top At_Offset_0
1220 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1221 00da | | Load_Top At_Offset_2
1222 01da | | Execute Vector,Bounds
1223 00da | | Load_Top At_Offset_2
1224 01da | | Execute Vector,Bounds
1225 00da | | Load_Top At_Offset_2
1226 027f | | Execute Discrete,Equal
1227 7001 |p | Jump_Nonzero 0x1229
1228 08e0 | | Execute_Immediate Raise,0xe0
1229 00cd | | Action Spare6_Action
122a 027f | | Execute Discrete,Equal
122b 7001 |p | Jump_Nonzero 0x122d
122c 08e0 | | Execute_Immediate Raise,0xe0
122d 00d2 | | Pop_Control Pop_Count_2
122e 00d9 | | Load_Top At_Offset_1
122f 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
1230 4800 |H | Short_Literal 0x0
1231 00d9 | | Load_Top At_Offset_1
1232 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1233 8247 | G | Call 0x1,0x47
1234 c40a | | Store 0x2,0xa
1235 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1236 0000 0000 | | .XXX[0x2]
1238 ; --------------------------------------------------------------------------------------
1238 ; SUBPROGRAM
1238 ; --------------------------------------------------------------------------------------
1238 1244 | D | .CONST 0x1244 ; Address of begin
1239 0004 | | .CONST 0x0004 ; Address of exception handler
123a 0002 | | .CONST 0x0002 ; Number of locals
123b INIT_1238:
123b e404 | | Load 0x2,0x4
123c e402 | | Load 0x2,0x2
123d 01d7 | | Execute Vector,Field_Read
123e e005 | | Load 0x0,0x5
123f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1240 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
1241 e005 | | Load 0x0,0x5
1242 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1243 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1244 BODY_1238:
1244 00cf | | Action Mark_Auxiliary
1245 e405 | | Load 0x2,0x5
1246 0a01 | | Execute_Immediate Plus,0x1
1247 c405 | | Store 0x2,0x5
1248 e405 | | Load 0x2,0x5
1249 e402 | | Load 0x2,0x2
124a 01dc | | Execute Vector,Last
124b 027d | } | Execute Discrete,Greater
124c 7010 |p | Jump_Nonzero 0x125d
124d 4800 |H | Short_Literal 0x0
124e e405 | | Load 0x2,0x5
124f e402 | | Load 0x2,0x2
1250 01d7 | | Execute Vector,Field_Read
1251 e005 | | Load 0x0,0x5
1252 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1253 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
1254 e005 | | Load 0x0,0x5
1255 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1256 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1257 00db | | Load_Top At_Offset_3
1258 e017 | | Load 0x0,0x17
1259 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
125a 6802 |h | Jump_Zero 0x125d
125b 00c9 | | Action Pop_Auxiliary_Loop
125c 7fe8 | | Jump 0x1245
125d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
125e 0000 0000 | | .XXX[0x2]
1260 ; --------------------------------------------------------------------------------------
1260 ; SUBPROGRAM
1260 ; --------------------------------------------------------------------------------------
1260 1268 | h | .CONST 0x1268 ; Address of begin
1261 0004 | | .CONST 0x0004 ; Address of exception handler
1262 0002 | | .CONST 0x0002 ; Number of locals
1263 INIT_1260:
1263 e40a | | Load 0x2,0xa
1264 e5fe | | Load 0x2,-0x2
1265 8230 | 0 | Call 0x1,0x30
1266 e5ff | | Load 0x2,-0x1
1267 826c | l | Call 0x1,0x6c
1268 BODY_1260:
1268 00d8 | | Load_Top At_Offset_0
1269 01db | | Execute Vector,Length
126a 0c01 | | Execute_Immediate Greater_Equal,0x1
126b 6839 |h9 | Jump_Zero 0x12a5
126c e405 | | Load 0x2,0x5
126d 7002 |p | Jump_Nonzero 0x1270
126e e406 | | Load 0x2,0x6
126f 6809 |h | Jump_Zero 0x1279
1270 e402 | | Load 0x2,0x2
1271 e005 | | Load 0x0,0x5
1272 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1273 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1274 e5fe | | Load 0x2,-0x2
1275 00db | | Load_Top At_Offset_3
1276 826a | j | Call 0x1,0x6a
1277 c402 | | Store 0x2,0x2
1278 7808 |x | Jump 0x1281
1279 e402 | | Load 0x2,0x2
127a e005 | | Load 0x0,0x5
127b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
127c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
127d e5fe | | Load 0x2,-0x2
127e 00db | | Load_Top At_Offset_3
127f 826b | k | Call 0x1,0x6b
1280 c402 | | Store 0x2,0x2
1281 e402 | | Load 0x2,0x2
1282 e015 | | Load 0x0,0x15
1283 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1284 7020 |p | Jump_Nonzero 0x12a5
1285 e40a | | Load 0x2,0xa
1286 e002 | | Load 0x0,0x2
1287 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1288 4801 |H | Short_Literal 0x1
1289 4801 |H | Short_Literal 0x1
128a e012 | | Load 0x0,0x12
128b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
128c 035b | [ | Declare_Type Array,Constrained
128d 0337 | 7 | Declare_Variable Array
128e e402 | | Load 0x2,0x2
128f e015 | | Load 0x0,0x15
1290 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
1291 4801 |H | Short_Literal 0x1
1292 00da | | Load_Top At_Offset_2
1293 01d6 | | Execute Vector,Field_Write
1294 4802 |H | Short_Literal 0x2
1295 e403 | | Load 0x2,0x3
1296 e015 | | Load 0x0,0x15
1297 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1298 e402 | | Load 0x2,0x2
1299 e015 | | Load 0x0,0x15
129a 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
129b 7006 |p | Jump_Nonzero 0x12a2
129c e402 | | Load 0x2,0x2
129d e015 | | Load 0x0,0x15
129e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
129f e403 | | Load 0x2,0x3
12a0 e015 | | Load 0x0,0x15
12a1 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
12a2 e015 | | Load 0x0,0x15
12a3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
12a4 a402 | | Store_Unchecked 0x2,0x2
12a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12a6 0000 0000 | | .XXX[0x2]
12a8 ; --------------------------------------------------------------------------------------
12a8 ; SUBPROGRAM
12a8 ; --------------------------------------------------------------------------------------
12a8 12ae | | .CONST 0x12ae ; Address of begin
12a9 0004 | | .CONST 0x0004 ; Address of exception handler
12aa 0002 | | .CONST 0x0002 ; Number of locals
12ab INIT_12a8:
12ab 00da | | Load_Top At_Offset_2
12ac e015 | | Load 0x0,0x15
12ad 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
12ae BODY_12a8:
12ae 00db | | Load_Top At_Offset_3
12af e015 | | Load 0x0,0x15
12b0 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
12b1 700e |p | Jump_Nonzero 0x12c0
12b2 00cf | | Action Mark_Auxiliary
12b3 00d9 | | Load_Top At_Offset_1
12b4 01d9 | | Execute Vector,Reverse_Bounds
12b5 0263 | c | Execute Discrete,Above_Bound
12b6 7008 |p | Jump_Nonzero 0x12bf
12b7 e402 | | Load 0x2,0x2
12b8 00d9 | | Load_Top At_Offset_1
12b9 e602 | | Load 0x3,0x2
12ba 01d7 | | Execute Vector,Field_Read
12bb e015 | | Load 0x0,0x15
12bc 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
12bd 00c8 | | Action Pop_Auxiliary_Range
12be 3ff8 |? | Loop_Increasing 0x12b7
12bf 00ce | | Action Pop_Auxiliary
12c0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
12c1 0000 0000 | | .BLANK 0000[0x7]
12c8 ; --------------------------------------------------------------------------------------
12c8 ; SUBPROGRAM
12c8 ; --------------------------------------------------------------------------------------
12c8 12d2 | | .CONST 0x12d2 ; Address of begin
12c9 0004 | | .CONST 0x0004 ; Address of exception handler
12ca 0004 | | .CONST 0x0004 ; Number of locals
12cb INIT_12c8:
12cb e405 | | Load 0x2,0x5
12cc e005 | | Load 0x0,0x5
12cd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
12ce 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
12cf 00e3 | | Load_Encached Natural_Cache
12d0 029f 18ab | | Declare_Subprogram INIT_18a8,For_Call
12d2 BODY_12c8:
12d2 00e3 | | Load_Encached Natural_Cache
12d3 e404 | | Load 0x2,0x4
12d4 e602 | | Load 0x3,0x2
12d5 8234 | 4 | Call 0x1,0x34
12d6 005a | Z | Store_Top Discrete,At_Offset_2
12d7 00d9 | | Load_Top At_Offset_1
12d8 6801 |h | Jump_Zero 0x12da
12d9 8604 | | Call 0x3,0x4
12da 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12db 0000 0000 | | .BLANK 0000[0x5]
12e0 ; --------------------------------------------------------------------------------------
12e0 ; SUBPROGRAM
12e0 ; --------------------------------------------------------------------------------------
12e0 12f0 | | .CONST 0x12f0 ; Address of begin
12e1 0004 | | .CONST 0x0004 ; Address of exception handler
12e2 0003 | | .CONST 0x0003 ; Number of locals
12e3 INIT_12e0:
12e3 e5fb | | Load 0x2,-0x5
12e4 e5fc | | Load 0x2,-0x4
12e5 e5fd | | Load 0x2,-0x3
12e6 e402 | | Load 0x2,0x2
12e7 8233 | 3 | Call 0x1,0x33
12e8 e5fb | | Load 0x2,-0x5
12e9 e5fc | | Load 0x2,-0x4
12ea e5fd | | Load 0x2,-0x3
12eb e5fe | | Load 0x2,-0x2
12ec e013 | | Load 0x0,0x13
12ed 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
12ee e5ff | | Load 0x2,-0x1
12ef 8235 | 5 | Call 0x1,0x35
12f0 BODY_12e0:
12f0 00d8 | | Load_Top At_Offset_0
12f1 00da | | Load_Top At_Offset_2
12f2 822e | . | Call 0x1,0x2e
12f3 00cb | | Action Pop_Block_With_Result
12f4 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
12f5 0000 0000 | | .XXX[0x3]
12f7 0000 | |
12f8 ; --------------------------------------------------------------------------------------
12f8 ; SUBPROGRAM
12f8 ; --------------------------------------------------------------------------------------
12f8 1304 | | .CONST 0x1304 ; Address of begin
12f9 0004 | | .CONST 0x0004 ; Address of exception handler
12fa 0002 | | .CONST 0x0002 ; Number of locals
12fb INIT_12f8:
12fb e5fc | | Load 0x2,-0x4
12fc e5fd | | Load 0x2,-0x3
12fd 4800 |H | Short_Literal 0x0
12fe e5fe | | Load 0x2,-0x2
12ff e407 | | Load 0x2,0x7
1300 e5ff | | Load 0x2,-0x1
1301 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1302 01d7 | | Execute Vector,Field_Read
1303 8236 | 6 | Call 0x1,0x36
1304 BODY_12f8:
1304 4800 |H | Short_Literal 0x0
1305 00d9 | | Load_Top At_Offset_1
1306 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1307 e014 | | Load 0x0,0x14
1308 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1309 7004 |p | Jump_Nonzero 0x130e
130a 00d8 | | Load_Top At_Offset_0
130b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
130c e402 | | Load 0x2,0x2
130d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
130e 00d8 | | Load_Top At_Offset_0
130f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1310 6815 |h | Jump_Zero 0x1326
1311 00d8 | | Load_Top At_Offset_0
1312 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1313 e403 | | Load 0x2,0x3
1314 00d8 | | Load_Top At_Offset_0
1315 00db | | Load_Top At_Offset_3
1316 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1317 0273 | s | Execute Discrete,Plus
1318 0aff | | Execute_Immediate Plus,-0x1
1319 00d8 | | Load_Top At_Offset_0
131a 00e2 | | Load_Encached Integer_Cache
131b 0260 | ` | Execute Discrete,In_Type
131c 7001 |p | Jump_Nonzero 0x131e
131d 0801 | | Execute_Immediate Raise,0x1
131e e402 | | Load 0x2,0x2
131f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1320 01ce | | Execute Vector,Slice_Write
1321 e403 | | Load 0x2,0x3
1322 00d9 | | Load_Top At_Offset_1
1323 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1324 0273 | s | Execute Discrete,Plus
1325 c403 | | Store 0x2,0x3
1326 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1327 0000 | | .XXX[0x1]
1328 ; --------------------------------------------------------------------------------------
1328 ; SUBPROGRAM
1328 ; --------------------------------------------------------------------------------------
1328 132b | + | .CONST 0x132b ; Address of begin
1329 0004 | | .CONST 0x0004 ; Address of exception handler
132a 0001 | | .CONST 0x0001 ; Number of locals
132b BODY_1328:
132b INIT_1328:
132b 00da | | Load_Top At_Offset_2
132c e005 | | Load 0x0,0x5
132d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
132e 180f | | Execute Package,Field_Execute,Field_Number 0xf
132f 7013 |p | Jump_Nonzero 0x1343
1330 00da | | Load_Top At_Offset_2
1331 4801 |H | Short_Literal 0x1
1332 e5fd | | Load 0x2,-0x3
1333 8232 | 2 | Call 0x1,0x32
1334 700e |p | Jump_Nonzero 0x1343
1335 00da | | Load_Top At_Offset_2
1336 e403 | | Load 0x2,0x3
1337 e402 | | Load 0x2,0x2
1338 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1339 01d6 | | Execute Vector,Field_Write
133a e403 | | Load 0x2,0x3
133b 0a01 | | Execute_Immediate Plus,0x1
133c c403 | | Store 0x2,0x3
133d 4800 |H | Short_Literal 0x0
133e 4801 |H | Short_Literal 0x1
133f e7ff | | Load 0x3,-0x1
1340 e5fd | | Load 0x2,-0x3
1341 e22a | * | Load 0x1,0x2a
1342 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1343 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1344 0000 0000 | | .BLANK 0000[0x4]
1348 ; --------------------------------------------------------------------------------------
1348 ; SUBPROGRAM
1348 ; --------------------------------------------------------------------------------------
1348 134b | K | .CONST 0x134b ; Address of begin
1349 0004 | | .CONST 0x0004 ; Address of exception handler
134a 0001 | | .CONST 0x0001 ; Number of locals
134b BODY_1348:
134b INIT_1348:
134b 00cf | | Action Mark_Auxiliary
134c 00db | | Load_Top At_Offset_3
134d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
134e 01d9 | | Execute Vector,Reverse_Bounds
134f 0263 | c | Execute Discrete,Above_Bound
1350 700f |p | Jump_Nonzero 0x1360
1351 00d8 | | Load_Top At_Offset_0
1352 e7ff | | Load 0x3,-0x1
1353 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1354 01d7 | | Execute Vector,Field_Read
1355 8405 | | Call 0x2,0x5
1356 00d8 | | Load_Top At_Offset_0
1357 e7ff | | Load 0x3,-0x1
1358 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1359 01d7 | | Execute Vector,Field_Read
135a e005 | | Load 0x0,0x5
135b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
135c 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
135d 8406 | | Call 0x2,0x6
135e 00c8 | | Action Pop_Auxiliary_Range
135f 3ff1 |? | Loop_Increasing 0x1351
1360 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1361 0000 0000 | | .BLANK 0000[0x7]
1368 ; --------------------------------------------------------------------------------------
1368 ; SUBPROGRAM
1368 ; --------------------------------------------------------------------------------------
1368 1372 | r | .CONST 0x1372 ; Address of begin
1369 0004 | | .CONST 0x0004 ; Address of exception handler
136a 0005 | | .CONST 0x0005 ; Number of locals
136b INIT_1368:
136b 00e1 | | Load_Encached Boolean_Cache
136c 00e1 | | Load_Encached Boolean_Cache
136d e005 | | Load 0x0,0x5
136e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
136f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1370 029f 18d3 | | Declare_Subprogram INIT_18d0,For_Call
1372 BODY_1368:
1372 4800 |H | Short_Literal 0x0
1373 e014 | | Load 0x0,0x14
1374 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1375 a602 | | Store_Unchecked 0x3,0x2
1376 4801 |H | Short_Literal 0x1
1377 e014 | | Load 0x0,0x14
1378 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1379 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
137a 8605 | | Call 0x3,0x5
137b 0831 | 1 | Execute_Immediate Raise,0x31
137c 0000 0000 | | .BLANK 0000[0x4]
1380 ; --------------------------------------------------------------------------------------
1380 ; SUBPROGRAM
1380 ; --------------------------------------------------------------------------------------
1380 138c | | .CONST 0x138c ; Address of begin
1381 0004 | | .CONST 0x0004 ; Address of exception handler
1382 0002 | | .CONST 0x0002 ; Number of locals
1383 INIT_1380:
1383 e5fb | | Load 0x2,-0x5
1384 e5fc | | Load 0x2,-0x4
1385 e5fd | | Load 0x2,-0x3
1386 4800 |H | Short_Literal 0x0
1387 e407 | | Load 0x2,0x7
1388 e5ff | | Load 0x2,-0x1
1389 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
138a 01d7 | | Execute Vector,Field_Read
138b 823a | : | Call 0x1,0x3a
138c BODY_1380:
138c 4800 |H | Short_Literal 0x0
138d 00d9 | | Load_Top At_Offset_1
138e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
138f e014 | | Load 0x0,0x14
1390 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1391 7004 |p | Jump_Nonzero 0x1396
1392 00d8 | | Load_Top At_Offset_0
1393 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1394 e402 | | Load 0x2,0x2
1395 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1396 00d8 | | Load_Top At_Offset_0
1397 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1398 6815 |h | Jump_Zero 0x13ae
1399 00d8 | | Load_Top At_Offset_0
139a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
139b e403 | | Load 0x2,0x3
139c 00d8 | | Load_Top At_Offset_0
139d 00db | | Load_Top At_Offset_3
139e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
139f 0273 | s | Execute Discrete,Plus
13a0 0aff | | Execute_Immediate Plus,-0x1
13a1 00d8 | | Load_Top At_Offset_0
13a2 00e2 | | Load_Encached Integer_Cache
13a3 0260 | ` | Execute Discrete,In_Type
13a4 7001 |p | Jump_Nonzero 0x13a6
13a5 0801 | | Execute_Immediate Raise,0x1
13a6 e402 | | Load 0x2,0x2
13a7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
13a8 01ce | | Execute Vector,Slice_Write
13a9 e403 | | Load 0x2,0x3
13aa 00d9 | | Load_Top At_Offset_1
13ab 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
13ac 0273 | s | Execute Discrete,Plus
13ad c403 | | Store 0x2,0x3
13ae 4501 |E | Exit_Suprogram New_Top_Offset 0x1
13af 0000 | | .XXX[0x1]
13b0 ; --------------------------------------------------------------------------------------
13b0 ; SUBPROGRAM
13b0 ; --------------------------------------------------------------------------------------
13b0 13e1 | | .CONST 0x13e1 ; Address of begin
13b1 0004 | | .CONST 0x0004 ; Address of exception handler
13b2 0003 | | .CONST 0x0003 ; Number of locals
13b3 INIT_13b0:
13b3 e5fd | | Load 0x2,-0x3
13b4 e5fe | | Load 0x2,-0x2
13b5 4801 |H | Short_Literal 0x1
13b6 e005 | | Load 0x0,0x5
13b7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
13b8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
13b9 1c08 | | Execute_Immediate Run_Utility,0x8
13ba 4801 |H | Short_Literal 0x1
13bb 4801 |H | Short_Literal 0x1
13bc e005 | | Load 0x0,0x5
13bd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
13be 1b13 | | Execute Package,Field_Read,Field_Number 0x13
13bf 035b | [ | Declare_Type Array,Constrained
13c0 0337 | 7 | Declare_Variable Array
13c1 e404 | | Load 0x2,0x4
13c2 4801 |H | Short_Literal 0x1
13c3 00da | | Load_Top At_Offset_2
13c4 01d6 | | Execute Vector,Field_Write
13c5 00d9 | | Load_Top At_Offset_1
13c6 00d8 | | Load_Top At_Offset_0
13c7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
13c8 00da | | Load_Top At_Offset_2
13c9 01da | | Execute Vector,Bounds
13ca 00da | | Load_Top At_Offset_2
13cb 01da | | Execute Vector,Bounds
13cc 00da | | Load_Top At_Offset_2
13cd 027f | | Execute Discrete,Equal
13ce 7001 |p | Jump_Nonzero 0x13d0
13cf 08e0 | | Execute_Immediate Raise,0xe0
13d0 00cd | | Action Spare6_Action
13d1 027f | | Execute Discrete,Equal
13d2 7001 |p | Jump_Nonzero 0x13d4
13d3 08e0 | | Execute_Immediate Raise,0xe0
13d4 00d2 | | Pop_Control Pop_Count_2
13d5 00d9 | | Load_Top At_Offset_1
13d6 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
13d7 4800 |H | Short_Literal 0x0
13d8 00d9 | | Load_Top At_Offset_1
13d9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
13da 8239 | 9 | Call 0x1,0x39
13db 4801 |H | Short_Literal 0x1
13dc e5fd | | Load 0x2,-0x3
13dd e5fe | | Load 0x2,-0x2
13de 4800 |H | Short_Literal 0x0
13df e602 | | Load 0x3,0x2
13e0 823b | ; | Call 0x1,0x3b
13e1 BODY_13b0:
13e1 4800 |H | Short_Literal 0x0
13e2 00d9 | | Load_Top At_Offset_1
13e3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
13e4 e014 | | Load 0x0,0x14
13e5 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
13e6 7004 |p | Jump_Nonzero 0x13eb
13e7 00d8 | | Load_Top At_Offset_0
13e8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
13e9 e402 | | Load 0x2,0x2
13ea 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
13eb 00d8 | | Load_Top At_Offset_0
13ec 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
13ed 6815 |h | Jump_Zero 0x1403
13ee 00d8 | | Load_Top At_Offset_0
13ef 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
13f0 e403 | | Load 0x2,0x3
13f1 00d8 | | Load_Top At_Offset_0
13f2 00db | | Load_Top At_Offset_3
13f3 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
13f4 0273 | s | Execute Discrete,Plus
13f5 0aff | | Execute_Immediate Plus,-0x1
13f6 00d8 | | Load_Top At_Offset_0
13f7 00e2 | | Load_Encached Integer_Cache
13f8 0260 | ` | Execute Discrete,In_Type
13f9 7001 |p | Jump_Nonzero 0x13fb
13fa 0801 | | Execute_Immediate Raise,0x1
13fb e402 | | Load 0x2,0x2
13fc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
13fd 01ce | | Execute Vector,Slice_Write
13fe e403 | | Load 0x2,0x3
13ff 00d9 | | Load_Top At_Offset_1
1400 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1401 0273 | s | Execute Discrete,Plus
1402 c403 | | Store 0x2,0x3
1403 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1404 0000 0000 | | .BLANK 0000[0x4]
1408 ; --------------------------------------------------------------------------------------
1408 ; SUBPROGRAM
1408 ; --------------------------------------------------------------------------------------
1408 1414 | | .CONST 0x1414 ; Address of begin
1409 0004 | | .CONST 0x0004 ; Address of exception handler
140a 0002 | | .CONST 0x0002 ; Number of locals
140b INIT_1408:
140b 4801 |H | Short_Literal 0x1
140c e5fd | | Load 0x2,-0x3
140d e5fe | | Load 0x2,-0x2
140e 4800 |H | Short_Literal 0x0
140f e40a | | Load 0x2,0xa
1410 e5ff | | Load 0x2,-0x1
1411 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1412 01d7 | | Execute Vector,Field_Read
1413 823a | : | Call 0x1,0x3a
1414 BODY_1408:
1414 4800 |H | Short_Literal 0x0
1415 00d9 | | Load_Top At_Offset_1
1416 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1417 e014 | | Load 0x0,0x14
1418 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1419 7004 |p | Jump_Nonzero 0x141e
141a 00d8 | | Load_Top At_Offset_0
141b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
141c e402 | | Load 0x2,0x2
141d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
141e 00d8 | | Load_Top At_Offset_0
141f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1420 6815 |h | Jump_Zero 0x1436
1421 00d8 | | Load_Top At_Offset_0
1422 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1423 e403 | | Load 0x2,0x3
1424 00d8 | | Load_Top At_Offset_0
1425 00db | | Load_Top At_Offset_3
1426 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1427 0273 | s | Execute Discrete,Plus
1428 0aff | | Execute_Immediate Plus,-0x1
1429 00d8 | | Load_Top At_Offset_0
142a 00e2 | | Load_Encached Integer_Cache
142b 0260 | ` | Execute Discrete,In_Type
142c 7001 |p | Jump_Nonzero 0x142e
142d 0801 | | Execute_Immediate Raise,0x1
142e e402 | | Load 0x2,0x2
142f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1430 01ce | | Execute Vector,Slice_Write
1431 e403 | | Load 0x2,0x3
1432 00d9 | | Load_Top At_Offset_1
1433 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1434 0273 | s | Execute Discrete,Plus
1435 c403 | | Store 0x2,0x3
1436 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1437 0000 | | .XXX[0x1]
1438 ; --------------------------------------------------------------------------------------
1438 ; SUBPROGRAM
1438 ; --------------------------------------------------------------------------------------
1438 143e | > | .CONST 0x143e ; Address of begin
1439 0004 | | .CONST 0x0004 ; Address of exception handler
143a 0003 | | .CONST 0x0003 ; Number of locals
143b INIT_1438:
143b 00e3 | | Load_Encached Natural_Cache
143c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
143d 00e1 | | Load_Encached Boolean_Cache
143e BODY_1438:
143e e7ff | | Load 0x3,-0x1
143f e005 | | Load 0x0,0x5
1440 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1441 180f | | Execute Package,Field_Execute,Field_Number 0xf
1442 7012 |p | Jump_Nonzero 0x1455
1443 e5fd | | Load 0x2,-0x3
1444 e7ff | | Load 0x3,-0x1
1445 e005 | | Load 0x0,0x5
1446 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1447 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1448 680c |h | Jump_Zero 0x1455
1449 00e1 | | Load_Encached Boolean_Cache
144a 00da | | Load_Top At_Offset_2
144b e7ff | | Load 0x3,-0x1
144c e406 | | Load 0x2,0x6
144d e22b | + | Load 0x1,0x2b
144e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
144f 005b | [ | Store_Top Discrete,At_Offset_3
1450 0059 | Y | Store_Top Discrete,At_Offset_1
1451 00d8 | | Load_Top At_Offset_0
1452 7002 |p | Jump_Nonzero 0x1455
1453 4801 |H | Short_Literal 0x1
1454 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1455 4800 |H | Short_Literal 0x0
1456 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1457 0000 | | .XXX[0x1]
1458 ; --------------------------------------------------------------------------------------
1458 ; SUBPROGRAM
1458 ; --------------------------------------------------------------------------------------
1458 145b | [ | .CONST 0x145b ; Address of begin
1459 0004 | | .CONST 0x0004 ; Address of exception handler
145a 0001 | | .CONST 0x0001 ; Number of locals
145b BODY_1458:
145b INIT_1458:
145b 4800 |H | Short_Literal 0x0
145c e7fe | | Load 0x3,-0x2
145d e7ff | | Load 0x3,-0x1
145e e406 | | Load 0x2,0x6
145f e22b | + | Load 0x1,0x2b
1460 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1461 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1462 0000 0000 | | .BLANK 0000[0x6]
1468 ; --------------------------------------------------------------------------------------
1468 ; SUBPROGRAM
1468 ; --------------------------------------------------------------------------------------
1468 146b | k | .CONST 0x146b ; Address of begin
1469 0004 | | .CONST 0x0004 ; Address of exception handler
146a 0001 | | .CONST 0x0001 ; Number of locals
146b BODY_1468:
146b INIT_1468:
146b e5fd | | Load 0x2,-0x3
146c e002 | | Load 0x0,0x2
146d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
146e 4801 |H | Short_Literal 0x1
146f 4802 |H | Short_Literal 0x2
1470 e012 | | Load 0x0,0x12
1471 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1472 035b | [ | Declare_Type Array,Constrained
1473 0337 | 7 | Declare_Variable Array
1474 e7ff | | Load 0x3,-0x1
1475 e005 | | Load 0x0,0x5
1476 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1477 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1478 4801 |H | Short_Literal 0x1
1479 00da | | Load_Top At_Offset_2
147a 01d6 | | Execute Vector,Field_Write
147b e7ff | | Load 0x3,-0x1
147c e005 | | Load 0x0,0x5
147d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
147e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
147f 4802 |H | Short_Literal 0x2
1480 00da | | Load_Top At_Offset_2
1481 01d6 | | Execute Vector,Field_Write
1482 480a |H | Short_Literal 0xa
1483 e5fc | | Load 0x2,-0x4
1484 e015 | | Load 0x0,0x15
1485 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1486 00db | | Load_Top At_Offset_3
1487 00db | | Load_Top At_Offset_3
1488 840d | | Call 0x2,0xd
1489 4503 |E | Exit_Suprogram New_Top_Offset 0x3
148a 0000 0000 | | .BLANK 0000[0x6]
1490 ; --------------------------------------------------------------------------------------
1490 ; SUBPROGRAM
1490 ; --------------------------------------------------------------------------------------
1490 14a9 | | .CONST 0x14a9 ; Address of begin
1491 14e0 | | .CONST 0x14e0 ; Address of exception handler
1492 0007 | | .CONST 0x0007 ; Number of locals
1493 INIT_1490:
1493 e22a | * | Load 0x1,0x2a
1494 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1495 4800 |H | Short_Literal 0x0
1496 e005 | | Load 0x0,0x5
1497 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1498 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1499 1c08 | | Execute_Immediate Run_Utility,0x8
149a e005 | | Load 0x0,0x5
149b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
149c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
149d 00d9 | | Load_Top At_Offset_1
149e 016d | m | Execute Variant_Record,Structure_Write
149f e005 | | Load 0x0,0x5
14a0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
14a2 e005 | | Load 0x0,0x5
14a3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
14a5 029f 18f3 | | Declare_Subprogram INIT_18f0,For_Call
14a7 029f 193b | ;| Declare_Subprogram INIT_1938,For_Call
14a9 BODY_1490:
14a9 e22a | * | Load 0x1,0x2a
14aa 1b13 | | Execute Package,Field_Read,Field_Number 0x13
14ab e011 | | Load 0x0,0x11
14ac 180d | | Execute Package,Field_Execute,Field_Number 0xd
14ad e22a | * | Load 0x1,0x2a
14ae 1815 | | Execute Package,Field_Execute,Field_Number 0x15
14af c602 | | Store 0x3,0x2
14b0 e7ff | | Load 0x3,-0x1
14b1 0033 | 3 | Store_Top Heap_Access,At_Offset_3
14b2 00cf | | Action Mark_Auxiliary
14b3 7811 |x | Jump 0x14c5
14b4 00db | | Load_Top At_Offset_3
14b5 e005 | | Load 0x0,0x5
14b6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14b7 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
14b8 a604 | | Store_Unchecked 0x3,0x4
14b9 e604 | | Load 0x3,0x4
14ba e005 | | Load 0x0,0x5
14bb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14bc 180f | | Execute Package,Field_Execute,Field_Number 0xf
14bd 7001 |p | Jump_Nonzero 0x14bf
14be 780b |x | Jump 0x14ca
14bf 00db | | Load_Top At_Offset_3
14c0 e005 | | Load 0x0,0x5
14c1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14c2 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
14c3 a605 | | Store_Unchecked 0x3,0x5
14c4 00c9 | | Action Pop_Auxiliary_Loop
14c5 00db | | Load_Top At_Offset_3
14c6 e005 | | Load 0x0,0x5
14c7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14c8 180f | | Execute Package,Field_Execute,Field_Number 0xf
14c9 6fea |o | Jump_Zero 0x14b4
14ca 00ce | | Action Pop_Auxiliary
14cb 00db | | Load_Top At_Offset_3
14cc e005 | | Load 0x0,0x5
14cd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14ce 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
14cf 6808 |h | Jump_Zero 0x14d8
14d0 4800 |H | Short_Literal 0x0
14d1 4801 |H | Short_Literal 0x1
14d2 e604 | | Load 0x3,0x4
14d3 e602 | | Load 0x3,0x2
14d4 e22a | * | Load 0x1,0x2a
14d5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
14d6 8606 | | Call 0x3,0x6
14d7 7807 |x | Jump 0x14df
14d8 4800 |H | Short_Literal 0x0
14d9 4801 |H | Short_Literal 0x1
14da e7ff | | Load 0x3,-0x1
14db e602 | | Load 0x3,0x2
14dc e22a | * | Load 0x1,0x2a
14dd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
14de 8607 | | Call 0x3,0x7
14df 0831 | 1 | Execute_Immediate Raise,0x31
14e0 TRAP_1490:
14e0 0007 | | Action Break_Optional
14e1 e602 | | Load 0x3,0x2
14e2 e22a | * | Load 0x1,0x2a
14e3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
14e4 4801 |H | Short_Literal 0x1
14e5 4802 |H | Short_Literal 0x2
14e6 e012 | | Load 0x0,0x12
14e7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
14e8 035b | [ | Declare_Type Array,Constrained
14e9 0337 | 7 | Declare_Variable Array
14ea e7fe | | Load 0x3,-0x2
14eb e013 | | Load 0x0,0x13
14ec 1820 | | Execute Package,Field_Execute,Field_Number 0x20
14ed 4801 |H | Short_Literal 0x1
14ee 00da | | Load_Top At_Offset_2
14ef 01d6 | | Execute Vector,Field_Write
14f0 e7ff | | Load 0x3,-0x1
14f1 e005 | | Load 0x0,0x5
14f2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14f3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
14f4 4802 |H | Short_Literal 0x2
14f5 00da | | Load_Top At_Offset_2
14f6 01d6 | | Execute Vector,Field_Write
14f7 6008 |` | Indirect_Literal Discrete,0x1500,{0x00000000, 0x00003811}
14f8 e014 | | Load 0x0,0x14
14f9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
14fa e603 | | Load 0x3,0x3
14fb 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
14fc e603 | | Load 0x3,0x3
14fd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
14fe 0000 0000 | | .XXX[0x2]
1500 0000 0000 | | .LITERAL {0x00000000, 0x00003811}
1504 0000 0000 | | .BLANK 0000[0x4]
1508 ; --------------------------------------------------------------------------------------
1508 ; SUBPROGRAM
1508 ; --------------------------------------------------------------------------------------
1508 1514 | | .CONST 0x1514 ; Address of begin
1509 0004 | | .CONST 0x0004 ; Address of exception handler
150a 0004 | | .CONST 0x0004 ; Number of locals
150b INIT_1508:
150b 00e1 | | Load_Encached Boolean_Cache
150c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
150d 00db | | Load_Top At_Offset_3
150e 0007 | | Action Break_Optional
150f e002 | | Load 0x0,0x2
1510 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1511 02c7 | | Declare_Variable Any
1512 00d8 | | Load_Top At_Offset_0
1513 1c00 | | Execute_Immediate Run_Utility,0x0
1514 BODY_1508:
1514 00d9 | | Load_Top At_Offset_1
1515 e005 | | Load 0x0,0x5
1516 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1517 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
1518 0032 | 2 | Store_Top Heap_Access,At_Offset_2
1519 00cf | | Action Mark_Auxiliary
151a 7826 |x& | Jump 0x1541
151b 00da | | Load_Top At_Offset_2
151c e005 | | Load 0x0,0x5
151d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
151e 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
151f c604 | | Store 0x3,0x4
1520 e5fd | | Load 0x2,-0x3
1521 00db | | Load_Top At_Offset_3
1522 e005 | | Load 0x0,0x5
1523 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1524 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1525 00da | | Load_Top At_Offset_2
1526 8227 | ' | Call 0x1,0x27
1527 7008 |p | Jump_Nonzero 0x1530
1528 e5fd | | Load 0x2,-0x3
1529 00db | | Load_Top At_Offset_3
152a e005 | | Load 0x0,0x5
152b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
152c 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
152d 00da | | Load_Top At_Offset_2
152e 8227 | ' | Call 0x1,0x27
152f 7801 |x | Jump 0x1531
1530 4801 |H | Short_Literal 0x1
1531 a602 | | Store_Unchecked 0x3,0x2
1532 00db | | Load_Top At_Offset_3
1533 6802 |h | Jump_Zero 0x1536
1534 4801 |H | Short_Literal 0x1
1535 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1536 00da | | Load_Top At_Offset_2
1537 e005 | | Load 0x0,0x5
1538 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1539 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
153a 6809 |h | Jump_Zero 0x1544
153b 00da | | Load_Top At_Offset_2
153c e005 | | Load 0x0,0x5
153d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
153e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
153f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
1540 00c9 | | Action Pop_Auxiliary_Loop
1541 00da | | Load_Top At_Offset_2
1542 840c | | Call 0x2,0xc
1543 77d7 |w | Jump_Nonzero 0x151b
1544 00ce | | Action Pop_Auxiliary
1545 4800 |H | Short_Literal 0x0
1546 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1547 0000 | | .XXX[0x1]
1548 ; --------------------------------------------------------------------------------------
1548 ; SUBPROGRAM
1548 ; --------------------------------------------------------------------------------------
1548 1558 | X | .CONST 0x1558 ; Address of begin
1549 0004 | | .CONST 0x0004 ; Address of exception handler
154a 0006 | | .CONST 0x0006 ; Number of locals
154b INIT_1548:
154b 00e1 | | Load_Encached Boolean_Cache
154c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
154d 00db | | Load_Top At_Offset_3
154e 0007 | | Action Break_Optional
154f e002 | | Load 0x0,0x2
1550 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1551 02c7 | | Declare_Variable Any
1552 00d8 | | Load_Top At_Offset_0
1553 1c00 | | Execute_Immediate Run_Utility,0x0
1554 029f 1953 | S| Declare_Subprogram INIT_1950,For_Call
1556 029f 198b | | Declare_Subprogram INIT_1988,For_Call
1558 BODY_1548:
1558 00db | | Load_Top At_Offset_3
1559 e005 | | Load 0x0,0x5
155a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
155b 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
155c a603 | | Store_Unchecked 0x3,0x3
155d 00cf | | Action Mark_Auxiliary
155e 7819 |x | Jump 0x1578
155f e5fd | | Load 0x2,-0x3
1560 4800 |H | Short_Literal 0x0
1561 e603 | | Load 0x3,0x3
1562 e005 | | Load 0x0,0x5
1563 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1564 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
1565 c604 | | Store 0x3,0x4
1566 e40a | | Load 0x2,0xa
1567 7002 |p | Jump_Nonzero 0x156a
1568 e40b | | Load 0x2,0xb
1569 6802 |h | Jump_Zero 0x156c
156a 8605 | | Call 0x3,0x5
156b 7801 |x | Jump 0x156d
156c 8606 | | Call 0x3,0x6
156d e603 | | Load 0x3,0x3
156e e005 | | Load 0x0,0x5
156f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1570 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1571 6809 |h | Jump_Zero 0x157b
1572 e603 | | Load 0x3,0x3
1573 e005 | | Load 0x0,0x5
1574 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1575 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
1576 a603 | | Store_Unchecked 0x3,0x3
1577 00c9 | | Action Pop_Auxiliary_Loop
1578 e603 | | Load 0x3,0x3
1579 840c | | Call 0x2,0xc
157a 77e4 |w | Jump_Nonzero 0x155f
157b 00ce | | Action Pop_Auxiliary
157c 4800 |H | Short_Literal 0x0
157d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
157e 0000 0000 | | .XXX[0x2]
1580 ; --------------------------------------------------------------------------------------
1580 ; SUBPROGRAM
1580 ; --------------------------------------------------------------------------------------
1580 1598 | | .CONST 0x1598 ; Address of begin
1581 0004 | | .CONST 0x0004 ; Address of exception handler
1582 0004 | | .CONST 0x0004 ; Number of locals
1583 INIT_1580:
1583 e402 | | Load 0x2,0x2
1584 e005 | | Load 0x0,0x5
1585 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1586 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
1587 4801 |H | Short_Literal 0x1
1588 00d9 | | Load_Top At_Offset_1
1589 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
158a 01db | | Execute Vector,Length
158b 0a03 | | Execute_Immediate Plus,0x3
158c 00d8 | | Load_Top At_Offset_0
158d 00e2 | | Load_Encached Integer_Cache
158e 0260 | ` | Execute Discrete,In_Type
158f 7001 |p | Jump_Nonzero 0x1591
1590 0801 | | Execute_Immediate Raise,0x1
1591 e012 | | Load 0x0,0x12
1592 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1593 035b | [ | Declare_Type Array,Constrained
1594 0337 | 7 | Declare_Variable Array
1595 e005 | | Load 0x0,0x5
1596 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1597 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1598 BODY_1580:
1598 e404 | | Load 0x2,0x4
1599 e005 | | Load 0x0,0x5
159a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
159b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
159c 4801 |H | Short_Literal 0x1
159d 00db | | Load_Top At_Offset_3
159e 01d6 | | Execute Vector,Field_Write
159f e404 | | Load 0x2,0x4
15a0 e005 | | Load 0x0,0x5
15a1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
15a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
15a3 4802 |H | Short_Literal 0x2
15a4 00db | | Load_Top At_Offset_3
15a5 01d6 | | Execute Vector,Field_Write
15a6 e402 | | Load 0x2,0x2
15a7 e005 | | Load 0x0,0x5
15a8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
15a9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
15aa 4803 |H | Short_Literal 0x3
15ab 00db | | Load_Top At_Offset_3
15ac 01d6 | | Execute Vector,Field_Write
15ad 00cf | | Action Mark_Auxiliary
15ae 00db | | Load_Top At_Offset_3
15af 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
15b0 01d9 | | Execute Vector,Reverse_Bounds
15b1 0263 | c | Execute Discrete,Above_Bound
15b2 704a |pJ | Jump_Nonzero 0x15fd
15b3 00d8 | | Load_Top At_Offset_0
15b4 e602 | | Load 0x3,0x2
15b5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
15b6 01d7 | | Execute Vector,Field_Read
15b7 a604 | | Store_Unchecked 0x3,0x4
15b8 e5fd | | Load 0x2,-0x3
15b9 e604 | | Load 0x3,0x4
15ba e005 | | Load 0x0,0x5
15bb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
15bc 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
15bd 702b |p+ | Jump_Nonzero 0x15e9
15be e406 | | Load 0x2,0x6
15bf e22b | + | Load 0x1,0x2b
15c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
15c1 4801 |H | Short_Literal 0x1
15c2 4804 |H | Short_Literal 0x4
15c3 e012 | | Load 0x0,0x12
15c4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
15c5 035b | [ | Declare_Type Array,Constrained
15c6 0337 | 7 | Declare_Variable Array
15c7 e402 | | Load 0x2,0x2
15c8 e005 | | Load 0x0,0x5
15c9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
15ca 1810 | | Execute Package,Field_Execute,Field_Number 0x10
15cb 4801 |H | Short_Literal 0x1
15cc 00da | | Load_Top At_Offset_2
15cd 01d6 | | Execute Vector,Field_Write
15ce e604 | | Load 0x3,0x4
15cf e005 | | Load 0x0,0x5
15d0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
15d1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
15d2 4802 |H | Short_Literal 0x2
15d3 00da | | Load_Top At_Offset_2
15d4 01d6 | | Execute Vector,Field_Write
15d5 e5fe | | Load 0x2,-0x2
15d6 e013 | | Load 0x0,0x13
15d7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
15d8 4803 |H | Short_Literal 0x3
15d9 00da | | Load_Top At_Offset_2
15da 01d6 | | Execute Vector,Field_Write
15db e5fd | | Load 0x2,-0x3
15dc e016 | | Load 0x0,0x16
15dd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
15de 4804 |H | Short_Literal 0x4
15df 00da | | Load_Top At_Offset_2
15e0 01d6 | | Execute Vector,Field_Write
15e1 6026 |`& | Indirect_Literal Discrete,0x1608,{0x00000000, 0x00003803}
15e2 e014 | | Load 0x0,0x14
15e3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
15e4 e5fc | | Load 0x2,-0x4
15e5 e015 | | Load 0x0,0x15
15e6 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
15e7 00cc | | Action Pop_Block
15e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
15e9 e407 | | Load 0x2,0x7
15ea 00d9 | | Load_Top At_Offset_1
15eb 0273 | s | Execute Discrete,Plus
15ec 00d8 | | Load_Top At_Offset_0
15ed 00e3 | | Load_Encached Natural_Cache
15ee 0260 | ` | Execute Discrete,In_Type
15ef 7001 |p | Jump_Nonzero 0x15f1
15f0 0801 | | Execute_Immediate Raise,0x1
15f1 e604 | | Load 0x3,0x4
15f2 840d | | Call 0x2,0xd
15f3 00db | | Load_Top At_Offset_3
15f4 e005 | | Load 0x0,0x5
15f5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
15f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
15f7 00d9 | | Load_Top At_Offset_1
15f8 0a03 | | Execute_Immediate Plus,0x3
15f9 e603 | | Load 0x3,0x3
15fa 01d6 | | Execute Vector,Field_Write
15fb 00c8 | | Action Pop_Auxiliary_Range
15fc 3fb6 |? | Loop_Increasing 0x15b3
15fd 00ce | | Action Pop_Auxiliary
15fe e5fd | | Load 0x2,-0x3
15ff e002 | | Load 0x0,0x2
1600 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1601 00db | | Load_Top At_Offset_3
1602 480c |H | Short_Literal 0xc
1603 e5fc | | Load 0x2,-0x4
1604 e015 | | Load 0x0,0x15
1605 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1606 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1607 0000 | | .XXX[0x1]
1608 0000 0000 | | .LITERAL {0x00000000, 0x00003803}
160c 0000 0000 | | .BLANK 0000[0x4]
1610 ; --------------------------------------------------------------------------------------
1610 ; SUBPROGRAM
1610 ; --------------------------------------------------------------------------------------
1610 1613 | | .CONST 0x1613 ; Address of begin
1611 0004 | | .CONST 0x0004 ; Address of exception handler
1612 0001 | | .CONST 0x0001 ; Number of locals
1613 BODY_1610:
1613 INIT_1610:
1613 00da | | Load_Top At_Offset_2
1614 e005 | | Load 0x0,0x5
1615 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1616 1886 | | Execute Package,Field_Execute,Field_Number 0x86
1617 700f |p | Jump_Nonzero 0x1627
1618 00db | | Load_Top At_Offset_3
1619 e005 | | Load 0x0,0x5
161a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
161b 1886 | | Execute Package,Field_Execute,Field_Number 0x86
161c 700a |p | Jump_Nonzero 0x1627
161d 00da | | Load_Top At_Offset_2
161e e005 | | Load 0x0,0x5
161f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1620 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1621 e7fe | | Load 0x3,-0x2
1622 e005 | | Load 0x0,0x5
1623 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1624 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1625 027e | ~ | Execute Discrete,Not_Equal
1626 6802 |h | Jump_Zero 0x1629
1627 4800 |H | Short_Literal 0x0
1628 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1629 4800 |H | Short_Literal 0x0
162a e7fe | | Load 0x3,-0x2
162b e005 | | Load 0x0,0x5
162c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
162d 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
162e e7ff | | Load 0x3,-0x1
162f e005 | | Load 0x0,0x5
1630 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1631 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1632 e017 | | Load 0x0,0x17
1633 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1634 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1635 0000 0000 | | .XXX[0x3]
1637 0000 | |
1638 ; --------------------------------------------------------------------------------------
1638 ; SUBPROGRAM
1638 ; --------------------------------------------------------------------------------------
1638 163b | ; | .CONST 0x163b ; Address of begin
1639 0004 | | .CONST 0x0004 ; Address of exception handler
163a 0001 | | .CONST 0x0001 ; Number of locals
163b BODY_1638:
163b INIT_1638:
163b 4801 |H | Short_Literal 0x1
163c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
163d 0000 0000 | | .XXX[0x3]
163f 0000 | |
1640 ; --------------------------------------------------------------------------------------
1640 ; SUBPROGRAM
1640 ; --------------------------------------------------------------------------------------
1640 1654 | T | .CONST 0x1654 ; Address of begin
1641 0004 | | .CONST 0x0004 ; Address of exception handler
1642 0005 | | .CONST 0x0005 ; Number of locals
1643 INIT_1640:
1643 00db | | Load_Top At_Offset_3
1644 e013 | | Load 0x0,0x13
1645 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1646 00db | | Load_Top At_Offset_3
1647 e005 | | Load 0x0,0x5
1648 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1649 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
164a 4801 |H | Short_Literal 0x1
164b 00da | | Load_Top At_Offset_2
164c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
164d e005 | | Load 0x0,0x5
164e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
164f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1650 035b | [ | Declare_Type Array,Constrained
1651 0337 | 7 | Declare_Variable Array
1652 00e3 | | Load_Encached Natural_Cache
1653 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1654 BODY_1640:
1654 00cf | | Action Mark_Auxiliary
1655 e602 | | Load 0x3,0x2
1656 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1657 01d9 | | Execute Vector,Reverse_Bounds
1658 0263 | c | Execute Discrete,Above_Bound
1659 7021 |p! | Jump_Nonzero 0x167b
165a 4801 |H | Short_Literal 0x1
165b 00d9 | | Load_Top At_Offset_1
165c e602 | | Load 0x3,0x2
165d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
165e 01d7 | | Execute Vector,Field_Read
165f e005 | | Load 0x0,0x5
1660 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1661 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1662 e603 | | Load 0x3,0x3
1663 e017 | | Load 0x0,0x17
1664 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1665 7013 |p | Jump_Nonzero 0x1679
1666 00d8 | | Load_Top At_Offset_0
1667 e602 | | Load 0x3,0x2
1668 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1669 01d7 | | Execute Vector,Field_Read
166a e7ff | | Load 0x3,-0x1
166b e005 | | Load 0x0,0x5
166c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
166d 1884 | | Execute Package,Field_Execute,Field_Number 0x84
166e 680a |h | Jump_Zero 0x1679
166f 00d8 | | Load_Top At_Offset_0
1670 e602 | | Load 0x3,0x2
1671 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1672 01d7 | | Execute Vector,Field_Read
1673 e605 | | Load 0x3,0x5
1674 e604 | | Load 0x3,0x4
1675 01d6 | | Execute Vector,Field_Write
1676 00db | | Load_Top At_Offset_3
1677 0a01 | | Execute_Immediate Plus,0x1
1678 c605 | | Store 0x3,0x5
1679 00c8 | | Action Pop_Auxiliary_Range
167a 3fdf |? | Loop_Increasing 0x165a
167b 00ce | | Action Pop_Auxiliary
167c 4801 |H | Short_Literal 0x1
167d 00d9 | | Load_Top At_Offset_1
167e 0aff | | Execute_Immediate Plus,-0x1
167f 00db | | Load_Top At_Offset_3
1680 01cf | | Execute Vector,Slice_Read
1681 e005 | | Load 0x0,0x5
1682 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1683 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1684 01c6 | | Execute Vector,Convert_To_Formal
1685 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1686 0000 0000 | | .XXX[0x2]
1688 ; --------------------------------------------------------------------------------------
1688 ; SUBPROGRAM
1688 ; --------------------------------------------------------------------------------------
1688 16a9 | | .CONST 0x16a9 ; Address of begin
1689 0004 | | .CONST 0x0004 ; Address of exception handler
168a 0006 | | .CONST 0x0006 ; Number of locals
168b INIT_1688:
168b 00db | | Load_Top At_Offset_3
168c 00db | | Load_Top At_Offset_3
168d e013 | | Load 0x0,0x13
168e 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
168f 00db | | Load_Top At_Offset_3
1690 e005 | | Load 0x0,0x5
1691 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1692 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1693 4801 |H | Short_Literal 0x1
1694 00da | | Load_Top At_Offset_2
1695 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1696 e005 | | Load 0x0,0x5
1697 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1698 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1699 035b | [ | Declare_Type Array,Constrained
169a 0337 | 7 | Declare_Variable Array
169b 00da | | Load_Top At_Offset_2
169c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
169d 00d9 | | Load_Top At_Offset_1
169e 01d4 | | Execute Vector,Structure_Write
169f 4801 |H | Short_Literal 0x1
16a0 00db | | Load_Top At_Offset_3
16a1 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
16a2 e005 | | Load 0x0,0x5
16a3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
16a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
16a5 035b | [ | Declare_Type Array,Constrained
16a6 0337 | 7 | Declare_Variable Array
16a7 00e3 | | Load_Encached Natural_Cache
16a8 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
16a9 BODY_1688:
16a9 00cf | | Action Mark_Auxiliary
16aa 00db | | Load_Top At_Offset_3
16ab 01d9 | | Execute Vector,Reverse_Bounds
16ac 0263 | c | Execute Discrete,Above_Bound
16ad 701d |p | Jump_Nonzero 0x16cb
16ae 00d8 | | Load_Top At_Offset_0
16af e604 | | Load 0x3,0x4
16b0 01d7 | | Execute Vector,Field_Read
16b1 e005 | | Load 0x0,0x5
16b2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
16b3 1886 | | Execute Package,Field_Execute,Field_Number 0x86
16b4 7014 |p | Jump_Nonzero 0x16c9
16b5 4801 |H | Short_Literal 0x1
16b6 00d9 | | Load_Top At_Offset_1
16b7 e604 | | Load 0x3,0x4
16b8 01d7 | | Execute Vector,Field_Read
16b9 e005 | | Load 0x0,0x5
16ba 1b16 | | Execute Package,Field_Read,Field_Number 0x16
16bb 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
16bc e603 | | Load 0x3,0x3
16bd e017 | | Load 0x0,0x17
16be 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
16bf 7009 |p | Jump_Nonzero 0x16c9
16c0 00d8 | | Load_Top At_Offset_0
16c1 e604 | | Load 0x3,0x4
16c2 01d7 | | Execute Vector,Field_Read
16c3 e606 | | Load 0x3,0x6
16c4 e605 | | Load 0x3,0x5
16c5 01d6 | | Execute Vector,Field_Write
16c6 00db | | Load_Top At_Offset_3
16c7 0a01 | | Execute_Immediate Plus,0x1
16c8 c606 | | Store 0x3,0x6
16c9 00c8 | | Action Pop_Auxiliary_Range
16ca 3fe3 |? | Loop_Increasing 0x16ae
16cb 00ce | | Action Pop_Auxiliary
16cc 4801 |H | Short_Literal 0x1
16cd e602 | | Load 0x3,0x2
16ce 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
16cf 0aff | | Execute_Immediate Plus,-0x1
16d0 00db | | Load_Top At_Offset_3
16d1 01cf | | Execute Vector,Slice_Read
16d2 e005 | | Load 0x0,0x5
16d3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
16d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
16d5 01c6 | | Execute Vector,Convert_To_Formal
16d6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
16d7 0000 | | .XXX[0x1]
16d8 ; --------------------------------------------------------------------------------------
16d8 ; SUBPROGRAM
16d8 ; --------------------------------------------------------------------------------------
16d8 16df | | .CONST 0x16df ; Address of begin
16d9 0004 | | .CONST 0x0004 ; Address of exception handler
16da 0004 | | .CONST 0x0004 ; Number of locals
16db INIT_16d8:
16db 00e1 | | Load_Encached Boolean_Cache
16dc 00e1 | | Load_Encached Boolean_Cache
16dd 029f 19bb | | Declare_Subprogram INIT_19b8,For_Call
16df BODY_16d8:
16df 4800 |H | Short_Literal 0x0
16e0 e014 | | Load 0x0,0x14
16e1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
16e2 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
16e3 4801 |H | Short_Literal 0x1
16e4 e014 | | Load 0x0,0x14
16e5 181f | | Execute Package,Field_Execute,Field_Number 0x1f
16e6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
16e7 8604 | | Call 0x3,0x4
16e8 0831 | 1 | Execute_Immediate Raise,0x31
16e9 0000 0000 | | .BLANK 0000[0x7]
16f0 ; --------------------------------------------------------------------------------------
16f0 ; SUBPROGRAM
16f0 ; --------------------------------------------------------------------------------------
16f0 16f8 | | .CONST 0x16f8 ; Address of begin
16f1 0004 | | .CONST 0x0004 ; Address of exception handler
16f2 0003 | | .CONST 0x0003 ; Number of locals
16f3 INIT_16f0:
16f3 e5fe | | Load 0x2,-0x2
16f4 e402 | | Load 0x2,0x2
16f5 824b | K | Call 0x1,0x4b
16f6 029f 19d3 | | Declare_Subprogram INIT_19d0,For_Call
16f8 BODY_16f0:
16f8 00cf | | Action Mark_Auxiliary
16f9 00da | | Load_Top At_Offset_2
16fa 01d9 | | Execute Vector,Reverse_Bounds
16fb 0263 | c | Execute Discrete,Above_Bound
16fc 700a |p | Jump_Nonzero 0x1707
16fd e404 | | Load 0x2,0x4
16fe e403 | | Load 0x2,0x3
16ff 01dc | | Execute Vector,Last
1700 027d | } | Execute Discrete,Greater
1701 6802 |h | Jump_Zero 0x1704
1702 00d2 | | Pop_Control Pop_Count_2
1703 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1704 8603 | | Call 0x3,0x3
1705 00c8 | | Action Pop_Auxiliary_Range
1706 3ff6 |? | Loop_Increasing 0x16fd
1707 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1708 ; --------------------------------------------------------------------------------------
1708 ; SUBPROGRAM
1708 ; --------------------------------------------------------------------------------------
1708 170d | | .CONST 0x170d ; Address of begin
1709 171c | | .CONST 0x171c ; Address of exception handler
170a 0002 | | .CONST 0x0002 ; Number of locals
170b INIT_1708:
170b 029f 1a03 | | Declare_Subprogram INIT_1a00,For_Call
170d BODY_1708:
170d e22a | * | Load 0x1,0x2a
170e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
170f e011 | | Load 0x0,0x11
1710 180d | | Execute Package,Field_Execute,Field_Number 0xd
1711 e22a | * | Load 0x1,0x2a
1712 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1713 c404 | | Store 0x2,0x4
1714 4800 |H | Short_Literal 0x0
1715 4801 |H | Short_Literal 0x1
1716 e407 | | Load 0x2,0x7
1717 e404 | | Load 0x2,0x4
1718 e22a | * | Load 0x1,0x2a
1719 1818 | | Execute Package,Field_Execute,Field_Number 0x18
171a 8602 | | Call 0x3,0x2
171b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
171c TRAP_1708:
171c 0007 | | Action Break_Optional
171d e404 | | Load 0x2,0x4
171e e22a | * | Load 0x1,0x2a
171f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1720 4801 |H | Short_Literal 0x1
1721 4802 |H | Short_Literal 0x2
1722 e012 | | Load 0x0,0x12
1723 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1724 035b | [ | Declare_Type Array,Constrained
1725 0337 | 7 | Declare_Variable Array
1726 e5fe | | Load 0x2,-0x2
1727 e013 | | Load 0x0,0x13
1728 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1729 4801 |H | Short_Literal 0x1
172a 00da | | Load_Top At_Offset_2
172b 01d6 | | Execute Vector,Field_Write
172c e5ff | | Load 0x2,-0x1
172d e005 | | Load 0x0,0x5
172e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
172f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1730 4802 |H | Short_Literal 0x2
1731 00da | | Load_Top At_Offset_2
1732 01d6 | | Execute Vector,Field_Write
1733 6008 |` | Indirect_Literal Discrete,0x173c,{0x00000000, 0x0000380d}
1734 e014 | | Load 0x0,0x14
1735 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1736 e406 | | Load 0x2,0x6
1737 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1738 e406 | | Load 0x2,0x6
1739 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
173a 00cb | | Action Pop_Block_With_Result
173b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
173c 0000 0000 | | .LITERAL {0x00000000, 0x0000380d}
1740 ; --------------------------------------------------------------------------------------
1740 ; SUBPROGRAM
1740 ; --------------------------------------------------------------------------------------
1740 1743 | C | .CONST 0x1743 ; Address of begin
1741 0004 | | .CONST 0x0004 ; Address of exception handler
1742 0001 | | .CONST 0x0001 ; Number of locals
1743 BODY_1740:
1743 INIT_1740:
1743 e40a | | Load 0x2,0xa
1744 e015 | | Load 0x0,0x15
1745 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
1746 0c02 | | Execute_Immediate Greater_Equal,0x2
1747 6813 |h | Jump_Zero 0x175b
1748 e40d | | Load 0x2,0xd
1749 e002 | | Load 0x0,0x2
174a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
174b 4801 |H | Short_Literal 0x1
174c 4801 |H | Short_Literal 0x1
174d e012 | | Load 0x0,0x12
174e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
174f 035b | [ | Declare_Type Array,Constrained
1750 0337 | 7 | Declare_Variable Array
1751 e40a | | Load 0x2,0xa
1752 e015 | | Load 0x0,0x15
1753 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
1754 4801 |H | Short_Literal 0x1
1755 00da | | Load_Top At_Offset_2
1756 01d6 | | Execute Vector,Field_Write
1757 4804 |H | Short_Literal 0x4
1758 e5fc | | Load 0x2,-0x4
1759 e015 | | Load 0x0,0x15
175a 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
175b e40a | | Load 0x2,0xa
175c e015 | | Load 0x0,0x15
175d 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
175e 7006 |p | Jump_Nonzero 0x1765
175f e40a | | Load 0x2,0xa
1760 e015 | | Load 0x0,0x15
1761 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1762 e5fc | | Load 0x2,-0x4
1763 e015 | | Load 0x0,0x15
1764 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1765 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1766 0000 0000 | | .XXX[0x2]
1768 ; --------------------------------------------------------------------------------------
1768 ; SUBPROGRAM
1768 ; --------------------------------------------------------------------------------------
1768 176b | k | .CONST 0x176b ; Address of begin
1769 0004 | | .CONST 0x0004 ; Address of exception handler
176a 0001 | | .CONST 0x0001 ; Number of locals
176b BODY_1768:
176b INIT_1768:
176b e409 | | Load 0x2,0x9
176c a408 | | Store_Unchecked 0x2,0x8
176d e409 | | Load 0x2,0x9
176e e005 | | Load 0x0,0x5
176f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1770 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1771 824a | J | Call 0x1,0x4a
1772 a40d | | Store_Unchecked 0x2,0xd
1773 8411 | | Call 0x2,0x11
1774 e015 | | Load 0x0,0x15
1775 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1776 a40a | | Store_Unchecked 0x2,0xa
1777 e40d | | Load 0x2,0xd
1778 e002 | | Load 0x0,0x2
1779 1812 | | Execute Package,Field_Execute,Field_Number 0x12
177a 4801 |H | Short_Literal 0x1
177b 4801 |H | Short_Literal 0x1
177c e012 | | Load 0x0,0x12
177d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
177e 035b | [ | Declare_Type Array,Constrained
177f 0337 | 7 | Declare_Variable Array
1780 e409 | | Load 0x2,0x9
1781 e005 | | Load 0x0,0x5
1782 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1783 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
1784 4801 |H | Short_Literal 0x1
1785 00da | | Load_Top At_Offset_2
1786 01d6 | | Execute Vector,Field_Write
1787 4807 |H | Short_Literal 0x7
1788 e40a | | Load 0x2,0xa
1789 e015 | | Load 0x0,0x15
178a 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
178b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
178c 0000 0000 | | .BLANK 0000[0x4]
1790 ; --------------------------------------------------------------------------------------
1790 ; SUBPROGRAM
1790 ; --------------------------------------------------------------------------------------
1790 1796 | | .CONST 0x1796 ; Address of begin
1791 0004 | | .CONST 0x0004 ; Address of exception handler
1792 0002 | | .CONST 0x0002 ; Number of locals
1793 INIT_1790:
1793 e40e | | Load 0x2,0xe
1794 e015 | | Load 0x0,0x15
1795 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1796 BODY_1790:
1796 00cf | | Action Mark_Auxiliary
1797 00d9 | | Load_Top At_Offset_1
1798 01d9 | | Execute Vector,Reverse_Bounds
1799 0263 | c | Execute Discrete,Above_Bound
179a 7008 |p | Jump_Nonzero 0x17a3
179b e40a | | Load 0x2,0xa
179c 00d9 | | Load_Top At_Offset_1
179d e602 | | Load 0x3,0x2
179e 01d7 | | Execute Vector,Field_Read
179f e015 | | Load 0x0,0x15
17a0 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
17a1 00c8 | | Action Pop_Auxiliary_Range
17a2 3ff8 |? | Loop_Increasing 0x179b
17a3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
17a4 0000 0000 | | .BLANK 0000[0x4]
17a8 ; --------------------------------------------------------------------------------------
17a8 ; SUBPROGRAM
17a8 ; --------------------------------------------------------------------------------------
17a8 17ab | | .CONST 0x17ab ; Address of begin
17a9 0004 | | .CONST 0x0004 ; Address of exception handler
17aa 0001 | | .CONST 0x0001 ; Number of locals
17ab BODY_17a8:
17ab INIT_17a8:
17ab e407 | | Load 0x2,0x7
17ac e015 | | Load 0x0,0x15
17ad 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
17ae 0c02 | | Execute_Immediate Greater_Equal,0x2
17af 6813 |h | Jump_Zero 0x17c3
17b0 e408 | | Load 0x2,0x8
17b1 e002 | | Load 0x0,0x2
17b2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
17b3 4801 |H | Short_Literal 0x1
17b4 4801 |H | Short_Literal 0x1
17b5 e012 | | Load 0x0,0x12
17b6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
17b7 035b | [ | Declare_Type Array,Constrained
17b8 0337 | 7 | Declare_Variable Array
17b9 e407 | | Load 0x2,0x7
17ba e015 | | Load 0x0,0x15
17bb 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
17bc 4801 |H | Short_Literal 0x1
17bd 00da | | Load_Top At_Offset_2
17be 01d6 | | Execute Vector,Field_Write
17bf 4804 |H | Short_Literal 0x4
17c0 e5fc | | Load 0x2,-0x4
17c1 e015 | | Load 0x0,0x15
17c2 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
17c3 e407 | | Load 0x2,0x7
17c4 e015 | | Load 0x0,0x15
17c5 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
17c6 7006 |p | Jump_Nonzero 0x17cd
17c7 e407 | | Load 0x2,0x7
17c8 e015 | | Load 0x0,0x15
17c9 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
17ca e5fc | | Load 0x2,-0x4
17cb e015 | | Load 0x0,0x15
17cc 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
17cd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
17ce 0000 0000 | | .XXX[0x2]
17d0 ; --------------------------------------------------------------------------------------
17d0 ; SUBPROGRAM
17d0 ; --------------------------------------------------------------------------------------
17d0 17d3 | | .CONST 0x17d3 ; Address of begin
17d1 0004 | | .CONST 0x0004 ; Address of exception handler
17d2 0001 | | .CONST 0x0001 ; Number of locals
17d3 BODY_17d0:
17d3 INIT_17d0:
17d3 e406 | | Load 0x2,0x6
17d4 a405 | | Store_Unchecked 0x2,0x5
17d5 e406 | | Load 0x2,0x6
17d6 e005 | | Load 0x0,0x5
17d7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
17d8 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
17d9 824a | J | Call 0x1,0x4a
17da a408 | | Store_Unchecked 0x2,0x8
17db 840a | | Call 0x2,0xa
17dc e015 | | Load 0x0,0x15
17dd 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
17de a407 | | Store_Unchecked 0x2,0x7
17df e408 | | Load 0x2,0x8
17e0 e002 | | Load 0x0,0x2
17e1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
17e2 4801 |H | Short_Literal 0x1
17e3 4801 |H | Short_Literal 0x1
17e4 e012 | | Load 0x0,0x12
17e5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
17e6 035b | [ | Declare_Type Array,Constrained
17e7 0337 | 7 | Declare_Variable Array
17e8 e406 | | Load 0x2,0x6
17e9 e005 | | Load 0x0,0x5
17ea 1b16 | | Execute Package,Field_Read,Field_Number 0x16
17eb 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
17ec 4801 |H | Short_Literal 0x1
17ed 00da | | Load_Top At_Offset_2
17ee 01d6 | | Execute Vector,Field_Write
17ef 4807 |H | Short_Literal 0x7
17f0 e407 | | Load 0x2,0x7
17f1 e015 | | Load 0x0,0x15
17f2 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
17f3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
17f4 0000 0000 | | .BLANK 0000[0x4]
17f8 ; --------------------------------------------------------------------------------------
17f8 ; SUBPROGRAM
17f8 ; --------------------------------------------------------------------------------------
17f8 17fe | | .CONST 0x17fe ; Address of begin
17f9 0004 | | .CONST 0x0004 ; Address of exception handler
17fa 0002 | | .CONST 0x0002 ; Number of locals
17fb INIT_17f8:
17fb e409 | | Load 0x2,0x9
17fc e015 | | Load 0x0,0x15
17fd 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
17fe BODY_17f8:
17fe 00cf | | Action Mark_Auxiliary
17ff 00d9 | | Load_Top At_Offset_1
1800 01d9 | | Execute Vector,Reverse_Bounds
1801 0263 | c | Execute Discrete,Above_Bound
1802 7008 |p | Jump_Nonzero 0x180b
1803 e407 | | Load 0x2,0x7
1804 00d9 | | Load_Top At_Offset_1
1805 e602 | | Load 0x3,0x2
1806 01d7 | | Execute Vector,Field_Read
1807 e015 | | Load 0x0,0x15
1808 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1809 00c8 | | Action Pop_Auxiliary_Range
180a 3ff8 |? | Loop_Increasing 0x1803
180b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
180c 0000 0000 | | .BLANK 0000[0x4]
1810 ; --------------------------------------------------------------------------------------
1810 ; SUBPROGRAM
1810 ; --------------------------------------------------------------------------------------
1810 181a | | .CONST 0x181a ; Address of begin
1811 0004 | | .CONST 0x0004 ; Address of exception handler
1812 0003 | | .CONST 0x0003 ; Number of locals
1813 INIT_1810:
1813 e406 | | Load 0x2,0x6
1814 e015 | | Load 0x0,0x15
1815 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1816 e015 | | Load 0x0,0x15
1817 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1818 029f 1a4b | K| Declare_Subprogram INIT_1a48,For_Call
181a BODY_1810:
181a 00d9 | | Load_Top At_Offset_1
181b 01db | | Execute Vector,Length
181c 7001 |p | Jump_Nonzero 0x181e
181d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
181e 00cf | | Action Mark_Auxiliary
181f 00da | | Load_Top At_Offset_2
1820 01d9 | | Execute Vector,Reverse_Bounds
1821 0263 | c | Execute Discrete,Above_Bound
1822 7017 |p | Jump_Nonzero 0x183a
1823 00d8 | | Load_Top At_Offset_0
1824 e602 | | Load 0x3,0x2
1825 01d7 | | Execute Vector,Field_Read
1826 e015 | | Load 0x0,0x15
1827 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1828 a405 | | Store_Unchecked 0x2,0x5
1829 e405 | | Load 0x2,0x5
182a 0f0a | | Execute_Immediate Equal,0xa
182b 7006 |p | Jump_Nonzero 0x1832
182c e405 | | Load 0x2,0x5
182d 0f0c | | Execute_Immediate Equal,0xc
182e 7003 |p | Jump_Nonzero 0x1832
182f e405 | | Load 0x2,0x5
1830 0f0f | | Execute_Immediate Equal,0xf
1831 6806 |h | Jump_Zero 0x1838
1832 e403 | | Load 0x2,0x3
1833 e5fe | | Load 0x2,-0x2
1834 027d | } | Execute Discrete,Greater
1835 6801 |h | Jump_Zero 0x1837
1836 08e2 | | Execute_Immediate Raise,0xe2
1837 8603 | | Call 0x3,0x3
1838 00c8 | | Action Pop_Auxiliary_Range
1839 3fe9 |? | Loop_Increasing 0x1823
183a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
183b 0000 0000 | | .BLANK 0000[0x5]
1840 ; --------------------------------------------------------------------------------------
1840 ; SUBPROGRAM
1840 ; --------------------------------------------------------------------------------------
1840 1848 | H | .CONST 0x1848 ; Address of begin
1841 0004 | | .CONST 0x0004 ; Address of exception handler
1842 0002 | | .CONST 0x0002 ; Number of locals
1843 INIT_1840:
1843 e406 | | Load 0x2,0x6
1844 e015 | | Load 0x0,0x15
1845 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1846 e015 | | Load 0x0,0x15
1847 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1848 BODY_1840:
1848 00cf | | Action Mark_Auxiliary
1849 00d9 | | Load_Top At_Offset_1
184a 01d9 | | Execute Vector,Reverse_Bounds
184b 0263 | c | Execute Discrete,Above_Bound
184c 7011 |p | Jump_Nonzero 0x185e
184d 00d8 | | Load_Top At_Offset_0
184e e602 | | Load 0x3,0x2
184f 01d7 | | Execute Vector,Field_Read
1850 e015 | | Load 0x0,0x15
1851 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1852 0f03 | | Execute_Immediate Equal,0x3
1853 6808 |h | Jump_Zero 0x185c
1854 4801 |H | Short_Literal 0x1
1855 00d9 | | Load_Top At_Offset_1
1856 e602 | | Load 0x3,0x2
1857 01d7 | | Execute Vector,Field_Read
1858 e015 | | Load 0x0,0x15
1859 1818 | | Execute Package,Field_Execute,Field_Number 0x18
185a a406 | | Store_Unchecked 0x2,0x6
185b 8407 | | Call 0x2,0x7
185c 00c8 | | Action Pop_Auxiliary_Range
185d 3fef |? | Loop_Increasing 0x184d
185e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
185f 0000 | | .XXX[0x1]
1860 ; --------------------------------------------------------------------------------------
1860 ; SUBPROGRAM
1860 ; --------------------------------------------------------------------------------------
1860 1868 | h | .CONST 0x1868 ; Address of begin
1861 0004 | | .CONST 0x0004 ; Address of exception handler
1862 0002 | | .CONST 0x0002 ; Number of locals
1863 INIT_1860:
1863 e40a | | Load 0x2,0xa
1864 e5fe | | Load 0x2,-0x2
1865 8230 | 0 | Call 0x1,0x30
1866 e5ff | | Load 0x2,-0x1
1867 826c | l | Call 0x1,0x6c
1868 BODY_1860:
1868 00d8 | | Load_Top At_Offset_0
1869 01db | | Execute Vector,Length
186a 0c01 | | Execute_Immediate Greater_Equal,0x1
186b 6835 |h5 | Jump_Zero 0x18a1
186c e405 | | Load 0x2,0x5
186d 7002 |p | Jump_Nonzero 0x1870
186e e406 | | Load 0x2,0x6
186f 6807 |h | Jump_Zero 0x1877
1870 e402 | | Load 0x2,0x2
1871 e5fd | | Load 0x2,-0x3
1872 e5fe | | Load 0x2,-0x2
1873 00db | | Load_Top At_Offset_3
1874 826a | j | Call 0x1,0x6a
1875 c402 | | Store 0x2,0x2
1876 7806 |x | Jump 0x187d
1877 e402 | | Load 0x2,0x2
1878 e5fd | | Load 0x2,-0x3
1879 e5fe | | Load 0x2,-0x2
187a 00db | | Load_Top At_Offset_3
187b 826b | k | Call 0x1,0x6b
187c c402 | | Store 0x2,0x2
187d e402 | | Load 0x2,0x2
187e e015 | | Load 0x0,0x15
187f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1880 7020 |p | Jump_Nonzero 0x18a1
1881 e40a | | Load 0x2,0xa
1882 e002 | | Load 0x0,0x2
1883 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1884 4801 |H | Short_Literal 0x1
1885 4801 |H | Short_Literal 0x1
1886 e012 | | Load 0x0,0x12
1887 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1888 035b | [ | Declare_Type Array,Constrained
1889 0337 | 7 | Declare_Variable Array
188a e402 | | Load 0x2,0x2
188b e015 | | Load 0x0,0x15
188c 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
188d 4801 |H | Short_Literal 0x1
188e 00da | | Load_Top At_Offset_2
188f 01d6 | | Execute Vector,Field_Write
1890 4802 |H | Short_Literal 0x2
1891 e403 | | Load 0x2,0x3
1892 e015 | | Load 0x0,0x15
1893 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1894 e402 | | Load 0x2,0x2
1895 e015 | | Load 0x0,0x15
1896 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
1897 7006 |p | Jump_Nonzero 0x189e
1898 e402 | | Load 0x2,0x2
1899 e015 | | Load 0x0,0x15
189a 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
189b e403 | | Load 0x2,0x3
189c e015 | | Load 0x0,0x15
189d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
189e e015 | | Load 0x0,0x15
189f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
18a0 a402 | | Store_Unchecked 0x2,0x2
18a1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
18a2 0000 0000 | | .BLANK 0000[0x6]
18a8 ; --------------------------------------------------------------------------------------
18a8 ; SUBPROGRAM
18a8 ; --------------------------------------------------------------------------------------
18a8 18b3 | | .CONST 0x18b3 ; Address of begin
18a9 0004 | | .CONST 0x0004 ; Address of exception handler
18aa 0002 | | .CONST 0x0002 ; Number of locals
18ab INIT_18a8:
18ab e5fb | | Load 0x2,-0x5
18ac e5fc | | Load 0x2,-0x4
18ad e5fd | | Load 0x2,-0x3
18ae e603 | | Load 0x3,0x3
18af e602 | | Load 0x3,0x2
18b0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
18b1 01d7 | | Execute Vector,Field_Read
18b2 8233 | 3 | Call 0x1,0x33
18b3 BODY_18a8:
18b3 00d8 | | Load_Top At_Offset_0
18b4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
18b5 e408 | | Load 0x2,0x8
18b6 00d8 | | Load_Top At_Offset_0
18b7 00db | | Load_Top At_Offset_3
18b8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
18b9 0273 | s | Execute Discrete,Plus
18ba 0aff | | Execute_Immediate Plus,-0x1
18bb 00d8 | | Load_Top At_Offset_0
18bc 00e2 | | Load_Encached Integer_Cache
18bd 0260 | ` | Execute Discrete,In_Type
18be 7001 |p | Jump_Nonzero 0x18c0
18bf 0801 | | Execute_Immediate Raise,0x1
18c0 e407 | | Load 0x2,0x7
18c1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
18c2 01ce | | Execute Vector,Slice_Write
18c3 e408 | | Load 0x2,0x8
18c4 00d9 | | Load_Top At_Offset_1
18c5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
18c6 0273 | s | Execute Discrete,Plus
18c7 c408 | | Store 0x2,0x8
18c8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
18c9 0000 0000 | | .BLANK 0000[0x7]
18d0 ; --------------------------------------------------------------------------------------
18d0 ; SUBPROGRAM
18d0 ; --------------------------------------------------------------------------------------
18d0 18d3 | | .CONST 0x18d3 ; Address of begin
18d1 18e1 | | .CONST 0x18e1 ; Address of exception handler
18d2 0001 | | .CONST 0x0001 ; Number of locals
18d3 BODY_18d0:
18d3 INIT_18d0:
18d3 e5fd | | Load 0x2,-0x3
18d4 e7ff | | Load 0x3,-0x1
18d5 e013 | | Load 0x0,0x13
18d6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
18d7 a604 | | Store_Unchecked 0x3,0x4
18d8 e602 | | Load 0x3,0x2
18d9 e014 | | Load 0x0,0x14
18da 181d | | Execute Package,Field_Execute,Field_Number 0x1d
18db e603 | | Load 0x3,0x3
18dc e014 | | Load 0x0,0x14
18dd 1820 | | Execute Package,Field_Execute,Field_Number 0x20
18de e604 | | Load 0x3,0x4
18df 00cb | | Action Pop_Block_With_Result
18e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
18e1 TRAP_18d0:
18e1 0007 | | Action Break_Optional
18e2 e602 | | Load 0x3,0x2
18e3 e014 | | Load 0x0,0x14
18e4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
18e5 e603 | | Load 0x3,0x3
18e6 e014 | | Load 0x0,0x14
18e7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
18e8 00d8 | | Load_Top At_Offset_0
18e9 0101 | | Execute Exception,Reraise
18ea 0000 0000 | | .BLANK 0000[0x6]
18f0 ; --------------------------------------------------------------------------------------
18f0 ; SUBPROGRAM
18f0 ; --------------------------------------------------------------------------------------
18f0 191f | | .CONST 0x191f ; Address of begin
18f1 0004 | | .CONST 0x0004 ; Address of exception handler
18f2 0003 | | .CONST 0x0003 ; Number of locals
18f3 INIT_18f0:
18f3 e602 | | Load 0x3,0x2
18f4 e7fe | | Load 0x3,-0x2
18f5 4801 |H | Short_Literal 0x1
18f6 e005 | | Load 0x0,0x5
18f7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
18f8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
18f9 1c08 | | Execute_Immediate Run_Utility,0x8
18fa 4801 |H | Short_Literal 0x1
18fb 4801 |H | Short_Literal 0x1
18fc e005 | | Load 0x0,0x5
18fd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
18fe 1b13 | | Execute Package,Field_Read,Field_Number 0x13
18ff 035b | [ | Declare_Type Array,Constrained
1900 0337 | 7 | Declare_Variable Array
1901 e604 | | Load 0x3,0x4
1902 4801 |H | Short_Literal 0x1
1903 00da | | Load_Top At_Offset_2
1904 01d6 | | Execute Vector,Field_Write
1905 00d9 | | Load_Top At_Offset_1
1906 00d8 | | Load_Top At_Offset_0
1907 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1908 00da | | Load_Top At_Offset_2
1909 01da | | Execute Vector,Bounds
190a 00da | | Load_Top At_Offset_2
190b 01da | | Execute Vector,Bounds
190c 00da | | Load_Top At_Offset_2
190d 027f | | Execute Discrete,Equal
190e 7001 |p | Jump_Nonzero 0x1910
190f 08e0 | | Execute_Immediate Raise,0xe0
1910 00cd | | Action Spare6_Action
1911 027f | | Execute Discrete,Equal
1912 7001 |p | Jump_Nonzero 0x1914
1913 08e0 | | Execute_Immediate Raise,0xe0
1914 00d2 | | Pop_Control Pop_Count_2
1915 00d9 | | Load_Top At_Offset_1
1916 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
1917 4800 |H | Short_Literal 0x0
1918 00d9 | | Load_Top At_Offset_1
1919 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
191a 8239 | 9 | Call 0x1,0x39
191b e602 | | Load 0x3,0x2
191c e7fe | | Load 0x3,-0x2
191d 00da | | Load_Top At_Offset_2
191e 823e | > | Call 0x1,0x3e
191f BODY_18f0:
191f 00cf | | Action Mark_Auxiliary
1920 00da | | Load_Top At_Offset_2
1921 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1922 01d9 | | Execute Vector,Reverse_Bounds
1923 0263 | c | Execute Discrete,Above_Bound
1924 7008 |p | Jump_Nonzero 0x192d
1925 e7fd | | Load 0x3,-0x3
1926 00d9 | | Load_Top At_Offset_1
1927 e802 | | Load 0x4,0x2
1928 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1929 01d7 | | Execute Vector,Field_Read
192a 840d | | Call 0x2,0xd
192b 00c8 | | Action Pop_Auxiliary_Range
192c 3ff8 |? | Loop_Increasing 0x1925
192d 00ce | | Action Pop_Auxiliary
192e e602 | | Load 0x3,0x2
192f e22a | * | Load 0x1,0x2a
1930 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1931 00d8 | | Load_Top At_Offset_0
1932 00cb | | Action Pop_Block_With_Result
1933 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1934 0000 0000 | | .BLANK 0000[0x4]
1938 ; --------------------------------------------------------------------------------------
1938 ; SUBPROGRAM
1938 ; --------------------------------------------------------------------------------------
1938 1945 | E | .CONST 0x1945 ; Address of begin
1939 0004 | | .CONST 0x0004 ; Address of exception handler
193a 0003 | | .CONST 0x0003 ; Number of locals
193b INIT_1938:
193b 4801 |H | Short_Literal 0x1
193c e602 | | Load 0x3,0x2
193d e7fe | | Load 0x3,-0x2
193e 4800 |H | Short_Literal 0x0
193f e7ff | | Load 0x3,-0x1
1940 823a | : | Call 0x1,0x3a
1941 e602 | | Load 0x3,0x2
1942 e7fe | | Load 0x3,-0x2
1943 00da | | Load_Top At_Offset_2
1944 823e | > | Call 0x1,0x3e
1945 BODY_1938:
1945 e7fd | | Load 0x3,-0x3
1946 e7ff | | Load 0x3,-0x1
1947 840d | | Call 0x2,0xd
1948 e602 | | Load 0x3,0x2
1949 e22a | * | Load 0x1,0x2a
194a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
194b e7ff | | Load 0x3,-0x1
194c 00d9 | | Load_Top At_Offset_1
194d 822f | / | Call 0x1,0x2f
194e 00cb | | Action Pop_Block_With_Result
194f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1950 ; --------------------------------------------------------------------------------------
1950 ; SUBPROGRAM
1950 ; --------------------------------------------------------------------------------------
1950 195c | \ | .CONST 0x195c ; Address of begin
1951 0004 | | .CONST 0x0004 ; Address of exception handler
1952 0002 | | .CONST 0x0002 ; Number of locals
1953 INIT_1950:
1953 e7fe | | Load 0x3,-0x2
1954 00d8 | | Load_Top At_Offset_0
1955 00e3 | | Load_Encached Natural_Cache
1956 0260 | ` | Execute Discrete,In_Type
1957 7001 |p | Jump_Nonzero 0x1959
1958 0801 | | Execute_Immediate Raise,0x1
1959 e5fe | | Load 0x2,-0x2
195a e603 | | Load 0x3,0x3
195b 840f | | Call 0x2,0xf
195c BODY_1950:
195c 00cf | | Action Mark_Auxiliary
195d 00d9 | | Load_Top At_Offset_1
195e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
195f 01d9 | | Execute Vector,Reverse_Bounds
1960 0263 | c | Execute Discrete,Above_Bound
1961 701f |p | Jump_Nonzero 0x1981
1962 e604 | | Load 0x3,0x4
1963 e5fd | | Load 0x2,-0x3
1964 00da | | Load_Top At_Offset_2
1965 e802 | | Load 0x4,0x2
1966 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1967 01d7 | | Execute Vector,Field_Read
1968 e005 | | Load 0x0,0x5
1969 1b14 | | Execute Package,Field_Read,Field_Number 0x14
196a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
196b 8227 | ' | Call 0x1,0x27
196c 700b |p | Jump_Nonzero 0x1978
196d e604 | | Load 0x3,0x4
196e e5fd | | Load 0x2,-0x3
196f 00da | | Load_Top At_Offset_2
1970 e802 | | Load 0x4,0x2
1971 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1972 01d7 | | Execute Vector,Field_Read
1973 e005 | | Load 0x0,0x5
1974 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1975 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
1976 8227 | ' | Call 0x1,0x27
1977 7801 |x | Jump 0x1979
1978 4801 |H | Short_Literal 0x1
1979 a602 | | Store_Unchecked 0x3,0x2
197a e602 | | Load 0x3,0x2
197b 6803 |h | Jump_Zero 0x197f
197c 4801 |H | Short_Literal 0x1
197d 00cb | | Action Pop_Block_With_Result
197e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
197f 00c8 | | Action Pop_Auxiliary_Range
1980 3fe1 |? | Loop_Increasing 0x1962
1981 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1982 0000 0000 | | .BLANK 0000[0x6]
1988 ; --------------------------------------------------------------------------------------
1988 ; SUBPROGRAM
1988 ; --------------------------------------------------------------------------------------
1988 198f | | .CONST 0x198f ; Address of begin
1989 0004 | | .CONST 0x0004 ; Address of exception handler
198a 0002 | | .CONST 0x0002 ; Number of locals
198b INIT_1988:
198b 4800 |H | Short_Literal 0x0
198c e5fe | | Load 0x2,-0x2
198d e603 | | Load 0x3,0x3
198e 821f | | Call 0x1,0x1f
198f BODY_1988:
198f 00cf | | Action Mark_Auxiliary
1990 00d9 | | Load_Top At_Offset_1
1991 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1992 01d9 | | Execute Vector,Reverse_Bounds
1993 0263 | c | Execute Discrete,Above_Bound
1994 701f |p | Jump_Nonzero 0x19b4
1995 e604 | | Load 0x3,0x4
1996 e5fd | | Load 0x2,-0x3
1997 00da | | Load_Top At_Offset_2
1998 e802 | | Load 0x4,0x2
1999 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
199a 01d7 | | Execute Vector,Field_Read
199b e005 | | Load 0x0,0x5
199c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
199d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
199e 8227 | ' | Call 0x1,0x27
199f 700b |p | Jump_Nonzero 0x19ab
19a0 e604 | | Load 0x3,0x4
19a1 e5fd | | Load 0x2,-0x3
19a2 00da | | Load_Top At_Offset_2
19a3 e802 | | Load 0x4,0x2
19a4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
19a5 01d7 | | Execute Vector,Field_Read
19a6 e005 | | Load 0x0,0x5
19a7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
19a8 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
19a9 8227 | ' | Call 0x1,0x27
19aa 7801 |x | Jump 0x19ac
19ab 4801 |H | Short_Literal 0x1
19ac a602 | | Store_Unchecked 0x3,0x2
19ad e602 | | Load 0x3,0x2
19ae 6803 |h | Jump_Zero 0x19b2
19af 4801 |H | Short_Literal 0x1
19b0 00cb | | Action Pop_Block_With_Result
19b1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
19b2 00c8 | | Action Pop_Auxiliary_Range
19b3 3fe1 |? | Loop_Increasing 0x1995
19b4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
19b5 0000 0000 | | .XXX[0x3]
19b7 0000 | |
19b8 ; --------------------------------------------------------------------------------------
19b8 ; SUBPROGRAM
19b8 ; --------------------------------------------------------------------------------------
19b8 19be | | .CONST 0x19be ; Address of begin
19b9 19c7 | | .CONST 0x19c7 ; Address of exception handler
19ba 0002 | | .CONST 0x0002 ; Number of locals
19bb INIT_19b8:
19bb e7fe | | Load 0x3,-0x2
19bc e7ff | | Load 0x3,-0x1
19bd 8405 | | Call 0x2,0x5
19be BODY_19b8:
19be e602 | | Load 0x3,0x2
19bf e014 | | Load 0x0,0x14
19c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
19c1 e603 | | Load 0x3,0x3
19c2 e014 | | Load 0x0,0x14
19c3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
19c4 00d8 | | Load_Top At_Offset_0
19c5 00cb | | Action Pop_Block_With_Result
19c6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
19c7 TRAP_19b8:
19c7 0007 | | Action Break_Optional
19c8 e602 | | Load 0x3,0x2
19c9 e014 | | Load 0x0,0x14
19ca 181d | | Execute Package,Field_Execute,Field_Number 0x1d
19cb e603 | | Load 0x3,0x3
19cc e014 | | Load 0x0,0x14
19cd 1820 | | Execute Package,Field_Execute,Field_Number 0x20
19ce 00d8 | | Load_Top At_Offset_0
19cf 0101 | | Execute Exception,Reraise
19d0 ; --------------------------------------------------------------------------------------
19d0 ; SUBPROGRAM
19d0 ; --------------------------------------------------------------------------------------
19d0 19d9 | | .CONST 0x19d9 ; Address of begin
19d1 0004 | | .CONST 0x0004 ; Address of exception handler
19d2 0002 | | .CONST 0x0002 ; Number of locals
19d3 INIT_19d0:
19d3 e606 | | Load 0x3,0x6
19d4 e602 | | Load 0x3,0x2
19d5 01d7 | | Execute Vector,Field_Read
19d6 e005 | | Load 0x0,0x5
19d7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
19d8 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
19d9 BODY_19d0:
19d9 00cf | | Action Mark_Auxiliary
19da e5ff | | Load 0x2,-0x1
19db 01d9 | | Execute Vector,Reverse_Bounds
19dc 0263 | c | Execute Discrete,Above_Bound
19dd 7020 |p | Jump_Nonzero 0x19fe
19de 00d8 | | Load_Top At_Offset_0
19df e5ff | | Load 0x2,-0x1
19e0 01d7 | | Execute Vector,Field_Read
19e1 e005 | | Load 0x0,0x5
19e2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
19e3 180f | | Execute Package,Field_Execute,Field_Number 0xf
19e4 7017 |p | Jump_Nonzero 0x19fc
19e5 4801 |H | Short_Literal 0x1
19e6 00d9 | | Load_Top At_Offset_1
19e7 e5ff | | Load 0x2,-0x1
19e8 01d7 | | Execute Vector,Field_Read
19e9 e005 | | Load 0x0,0x5
19ea 1b16 | | Execute Package,Field_Read,Field_Number 0x16
19eb 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
19ec e005 | | Load 0x0,0x5
19ed 1b16 | | Execute Package,Field_Read,Field_Number 0x16
19ee 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
19ef e802 | | Load 0x4,0x2
19f0 e017 | | Load 0x0,0x17
19f1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
19f2 6809 |h | Jump_Zero 0x19fc
19f3 00d8 | | Load_Top At_Offset_0
19f4 e5ff | | Load 0x2,-0x1
19f5 01d7 | | Execute Vector,Field_Read
19f6 e404 | | Load 0x2,0x4
19f7 e403 | | Load 0x2,0x3
19f8 01d6 | | Execute Vector,Field_Write
19f9 e404 | | Load 0x2,0x4
19fa 0a01 | | Execute_Immediate Plus,0x1
19fb c404 | | Store 0x2,0x4
19fc 00c8 | | Action Pop_Auxiliary_Range
19fd 3fe0 |? | Loop_Increasing 0x19de
19fe 4501 |E | Exit_Suprogram New_Top_Offset 0x1
19ff 0000 | | .XXX[0x1]
1a00 ; --------------------------------------------------------------------------------------
1a00 ; SUBPROGRAM
1a00 ; --------------------------------------------------------------------------------------
1a00 1a31 | 1 | .CONST 0x1a31 ; Address of begin
1a01 0004 | | .CONST 0x0004 ; Address of exception handler
1a02 0003 | | .CONST 0x0003 ; Number of locals
1a03 INIT_1a00:
1a03 e404 | | Load 0x2,0x4
1a04 e5fe | | Load 0x2,-0x2
1a05 4801 |H | Short_Literal 0x1
1a06 e005 | | Load 0x0,0x5
1a07 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1a08 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1a09 1c08 | | Execute_Immediate Run_Utility,0x8
1a0a 4801 |H | Short_Literal 0x1
1a0b 4801 |H | Short_Literal 0x1
1a0c e005 | | Load 0x0,0x5
1a0d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1a0e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1a0f 035b | [ | Declare_Type Array,Constrained
1a10 0337 | 7 | Declare_Variable Array
1a11 e407 | | Load 0x2,0x7
1a12 4801 |H | Short_Literal 0x1
1a13 00da | | Load_Top At_Offset_2
1a14 01d6 | | Execute Vector,Field_Write
1a15 00d9 | | Load_Top At_Offset_1
1a16 00d8 | | Load_Top At_Offset_0
1a17 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a18 00da | | Load_Top At_Offset_2
1a19 01da | | Execute Vector,Bounds
1a1a 00da | | Load_Top At_Offset_2
1a1b 01da | | Execute Vector,Bounds
1a1c 00da | | Load_Top At_Offset_2
1a1d 027f | | Execute Discrete,Equal
1a1e 7001 |p | Jump_Nonzero 0x1a20
1a1f 08e0 | | Execute_Immediate Raise,0xe0
1a20 00cd | | Action Spare6_Action
1a21 027f | | Execute Discrete,Equal
1a22 7001 |p | Jump_Nonzero 0x1a24
1a23 08e0 | | Execute_Immediate Raise,0xe0
1a24 00d2 | | Pop_Control Pop_Count_2
1a25 00d9 | | Load_Top At_Offset_1
1a26 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
1a27 e405 | | Load 0x2,0x5
1a28 00d9 | | Load_Top At_Offset_1
1a29 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1a2a 8239 | 9 | Call 0x1,0x39
1a2b 4801 |H | Short_Literal 0x1
1a2c e404 | | Load 0x2,0x4
1a2d e5fe | | Load 0x2,-0x2
1a2e 4800 |H | Short_Literal 0x0
1a2f e802 | | Load 0x4,0x2
1a30 823b | ; | Call 0x1,0x3b
1a31 BODY_1a00:
1a31 e404 | | Load 0x2,0x4
1a32 e22a | * | Load 0x1,0x2a
1a33 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1a34 4800 |H | Short_Literal 0x0
1a35 00d9 | | Load_Top At_Offset_1
1a36 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1a37 e014 | | Load 0x0,0x14
1a38 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1a39 6805 |h | Jump_Zero 0x1a3f
1a3a 00d8 | | Load_Top At_Offset_0
1a3b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a3c 00cb | | Action Pop_Block_With_Result
1a3d 00cb | | Action Pop_Block_With_Result
1a3e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a3f e406 | | Load 0x2,0x6
1a40 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a41 00cb | | Action Pop_Block_With_Result
1a42 00cb | | Action Pop_Block_With_Result
1a43 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a44 0000 0000 | | .BLANK 0000[0x4]
1a48 ; --------------------------------------------------------------------------------------
1a48 ; SUBPROGRAM
1a48 ; --------------------------------------------------------------------------------------
1a48 1a4b | K | .CONST 0x1a4b ; Address of begin
1a49 1a5e | ^ | .CONST 0x1a5e ; Address of exception handler
1a4a 0001 | | .CONST 0x0001 ; Number of locals
1a4b BODY_1a48:
1a4b INIT_1a48:
1a4b 4801 |H | Short_Literal 0x1
1a4c e606 | | Load 0x3,0x6
1a4d e602 | | Load 0x3,0x2
1a4e 01d7 | | Execute Vector,Field_Read
1a4f e015 | | Load 0x0,0x15
1a50 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1a51 e005 | | Load 0x0,0x5
1a52 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1a53 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1a54 e005 | | Load 0x0,0x5
1a55 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1a56 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
1a57 e403 | | Load 0x2,0x3
1a58 e402 | | Load 0x2,0x2
1a59 01d6 | | Execute Vector,Field_Write
1a5a e403 | | Load 0x2,0x3
1a5b 0a01 | | Execute_Immediate Plus,0x1
1a5c c403 | | Store 0x2,0x3
1a5d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a5e TRAP_1a48:
1a5e 0007 | | Action Break_Optional
1a5f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a60 ; --------------------------------------------------------------------------------------
1a60 ; Debug Table
1a60 ; --------------------------------------------------------------------------------------
1a60 0004 000d | | .DEBUG4 0x0004,0x000d,0xd90b,0x0000,0x0001,0x0000
1a66 de2b b800 | + | .XXX[0x25]
1a68 0003 d09c | |
1a6a 26c0 4000 |& @ |
1a6c 0000 000f | |
1a6e bc5f 6000 | _` |
1a70 0009 213e | !>|
1a72 f900 8000 | |
1a74 0000 001f | |
1a76 78ce a000 |x |
1a78 0012 827e | ~|
1a7a 2301 0000 |# |
1a7c 0000 003e | >|
1a7e f1bd 0000 | |
1a80 0025 84fc | % |
1a82 6e02 0000 |n |
1a84 0000 007d | }|
1a86 e3b9 8000 | |
1a88 0004 09bc | |
1a8a ac04 | |
1a8b 0000 0000 | | .BLANK 0000[0x5]
1a90 000a 1379 | y| .XXX[0x63]
1a92 4808 0000 |H |
1a94 0000 01f7 | |
1a96 90e2 0000 | |
1a98 0018 26f2 | & |
1a9a 7010 0000 |p |
1a9c 0000 03ef | |
1a9e 23c0 0000 |# |
1aa0 0150 4ed7 | PN |
1aa2 c020 0000 | |
1aa4 0000 07de | |
1aa6 4b78 0000 |Kx |
1aa8 02e0 9bc8 | |
1aaa c040 0000 | @ |
1aac 0000 0fbc | |
1aae 9ee0 0000 | |
1ab0 05e1 36f7 | 6 |
1ab2 8080 0000 | |
1ab4 0000 1f79 | y|
1ab6 4da0 0000 |M |
1ab8 0c02 6f39 | o9|
1aba 0100 0000 | |
1abc 0000 3ef2 | > |
1abe bb00 0000 | |
1ac0 1884 db8a | |
1ac2 0200 0000 | |
1ac4 0000 7de5 | } |
1ac6 b580 0000 | |
1ac8 3c09 e898 |< |
1aca 0400 0000 | |
1acc 0000 fbcb | |
1ace ea00 0000 | |
1ad0 7a13 84d8 |z |
1ad2 0800 0000 | |
1ad4 0001 f798 | |
1ad6 d200 0001 | |
1ad8 2427 df20 |$' |
1ada 1000 0000 | |
1adc 0003 ef33 | 3|
1ade a000 0002 | |
1ae0 504f c460 |PO `|
1ae2 2000 0000 | |
1ae4 0007 de6b | k|
1ae6 3800 0004 |8 |
1ae8 b09f 8dc0 | |
1aea 4000 0000 |@ |
1aec 000f bcde | |
1aee 6000 0000 |` |
1af0 8137 9580 | 7 |
1af2 8000 | |
1af3 0000 0000 | | .BLANK 0000[0x4]
1af7 0001 426f | Bo| .XXX[0x63]
1af9 2901 0000 |) |
1afb 0000 003e | >|
1afd f3b9 0000 | |
1aff 0003 04de | |
1b01 4e02 0000 |N |
1b03 0000 007d | }|
1b05 e7b1 8000 | |
1b07 002a 09da | * |
1b09 f804 0000 | |
1b0b 0000 00fb | |
1b0d cfe2 0000 | |
1b0f 005c 1379 | \ y|
1b11 1808 0000 | |
1b13 0000 01f7 | |
1b15 a0c2 0000 | |
1b17 00bc 26de | & |
1b19 f010 0000 | |
1b1b 0000 03ef | |
1b1d 4380 0000 |C |
1b1f 0180 4de7 | M |
1b21 2020 0000 | |
1b23 0000 07de | |
1b25 8af8 0000 | |
1b27 0310 9b71 | q|
1b29 4040 0000 |@@ |
1b2b 0000 0fbd | |
1b2d 1de0 0000 | |
1b2f 0781 3d13 | = |
1b31 0080 0000 | |
1b33 0000 1f7a | z|
1b35 4ba0 0000 |K |
1b37 0f42 709b | Bp |
1b39 0100 0000 | |
1b3b 0000 3ef4 | > |
1b3d b700 0000 | |
1b3f 2484 fbe4 |$ |
1b41 0200 0000 | |
1b43 0000 7de9 | } |
1b45 ad80 0000 | |
1b47 4a09 f88c |J |
1b49 0400 0000 | |
1b4b 0000 fbd3 | |
1b4d da00 0000 | |
1b4f 9613 f1b8 | |
1b51 0800 0000 | |
1b53 0001 f7a8 | |
1b55 b200 0000 | |
1b57 1026 f2b0 | & |
1b59 1000 | |
1b5a 0000 0000 | | .BLANK 0000[0x5]
1b5f 284d e520 |(M | .XXX[0x62]
1b61 2000 0000 | |
1b63 0007 deaa | |
1b65 b800 0000 | |
1b67 609b c9c0 |` |
1b69 4000 0000 |@ |
1b6b 000f bd5d | ]|
1b6d 6000 0005 |` |
1b6f 413b 5f00 |A;_ |
1b71 8000 0000 | |
1b73 001f 7aca | z |
1b75 a000 000b | |
1b77 826f 2301 | o# |
1b79 0000 0000 | |
1b7b 003e f5b5 | > |
1b7d 0000 0017 | |
1b7f 84db de02 | |
1b81 0000 0000 | |
1b83 007d eba9 | } |
1b85 8000 0030 | 0|
1b87 09bc e404 | |
1b89 0000 0000 | |
1b8b 00fb d7d2 | |
1b8d 0000 0062 | b|
1b8f 136e 2808 | n( |
1b91 0000 0000 | |
1b93 01f7 b0a2 | |
1b95 0000 00f0 | |
1b97 27a2 6010 |' ` |
1b99 0000 0000 | |
1b9b 03ef 6340 | c@|
1b9d 0000 01e8 | |
1b9f 4e13 6020 |N ` |
1ba1 0000 0000 | |
1ba3 07de ca78 | x|
1ba5 0000 0490 | |
1ba7 9f7c 8040 | | @|
1ba9 0000 0000 | |
1bab 0fbd 9ce0 | |
1bad 0000 0941 | A|
1baf 3f11 8080 |? |
1bb1 0000 0000 | |
1bb3 1f7b 49a0 | {I |
1bb5 0000 12c2 | |
1bb7 7e37 0100 |~7 |
1bb9 0000 0000 | |
1bbb 3ef6 b300 |> |
1bbd 0000 0204 | |
1bbf de56 0200 | V |
1bc1 0000 0000 | | .BLANK 0000[0x5]
1bc6 0509 bca4 | | .XXX[0x3a]
1bc8 0400 0000 | |
1bca 0000 fbdb | |
1bcc ca00 0000 | |
1bce 0c13 7938 | y8|
1bd0 0800 0000 | |
1bd2 0001 f7b8 | |
1bd4 9200 0000 | |
1bd6 a827 6be0 | 'k |
1bd8 1000 0000 | |
1bda 0003 ef73 | s|
1bdc 2000 0001 | |
1bde 704d e460 |pM `|
1be0 2000 0000 | |
1be2 0007 deea | |
1be4 3800 0002 |8 |
1be6 f09b 7bc0 | { |
1be8 4000 0000 |@ |
1bea 000f bddc | |
1bec 6000 0006 |` |
1bee 0137 9c80 | 7 |
1bf0 8000 0000 | |
1bf2 001f 7bc8 | { |
1bf4 a000 000c | |
1bf6 426d c501 |Bm |
1bf8 0000 0000 | |
1bfa 003e f7b1 | > |
1bfc 0000 001e | |
1bfe 04f4 4c02 | L |