|
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_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1a28 | ( | .CONST 0x1a28 ; 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 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call,Visible,Unelaborated
0048 c21a | | Store 0x1,0x1a
0049 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated
004b c221 | ! | Store 0x1,0x21
004c 029a 05cb | | Declare_Subprogram INIT_05c8,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 0633 | 3| Declare_Subprogram INIT_0630,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 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call
0076 029d 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call
0078 029d 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call
007a 029d 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call
007c 029d 0713 | | Declare_Subprogram INIT_0710,For_Outer_Call
007e 029d 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call
0080 029d 079b | | Declare_Subprogram INIT_0798,For_Outer_Call
0082 029d 07bb | | Declare_Subprogram INIT_07b8,For_Outer_Call
0084 029d 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call
0086 029d 085b | [| Declare_Subprogram INIT_0858,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 089b | | Declare_Subprogram INIT_0898,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 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call
0098 029d 0923 | #| Declare_Subprogram INIT_0920,For_Outer_Call
009a 029d 09d3 | | Declare_Subprogram INIT_09d0,For_Outer_Call
009c 029d 0a3b | ;| Declare_Subprogram INIT_0a38,For_Outer_Call
009e 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
009f 00c7 | | Action Elaborate_Subprogram
00a0 029d 0aab | | Declare_Subprogram INIT_0aa8,For_Outer_Call
00a2 029d 0ad3 | | Declare_Subprogram INIT_0ad0,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 0afb | | Declare_Subprogram INIT_0af8,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 0b2b | +| Declare_Subprogram INIT_0b28,For_Outer_Call
00ba 029d 0c83 | | Declare_Subprogram INIT_0c80,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 0ccb | | Declare_Subprogram INIT_0cc8,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 0d3b | ;| Declare_Subprogram INIT_0d38,For_Outer_Call
00c8 029d 0d53 | S| Declare_Subprogram INIT_0d50,For_Outer_Call
00ca 029d 0da3 | | Declare_Subprogram INIT_0da0,For_Outer_Call
00cc 029d 0ddb | | Declare_Subprogram INIT_0dd8,For_Outer_Call
00ce 029d 0deb | | Declare_Subprogram INIT_0de8,For_Outer_Call
00d0 029d 0e23 | #| Declare_Subprogram INIT_0e20,For_Outer_Call
00d2 029d 0e33 | 3| Declare_Subprogram INIT_0e30,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 0e43 | C| Declare_Subprogram INIT_0e40,For_Outer_Call,Unelaborated
00ec 029b 0f03 | | Declare_Subprogram INIT_0f00,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 0f63 | c| Declare_Subprogram INIT_0f60,For_Outer_Call
010a 029d 0f8b | | Declare_Subprogram INIT_0f88,For_Outer_Call
010c 029d 1053 | S| Declare_Subprogram INIT_1050,For_Outer_Call
010e 029d 10d3 | | Declare_Subprogram INIT_10d0,For_Outer_Call
0110 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0111 00c7 | | Action Elaborate_Subprogram
0112 029d 113b | ;| Declare_Subprogram INIT_1138,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 1163 | c| Declare_Subprogram INIT_1160,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 0334 | 4 | Declare_Variable Array,With_Constraint
0189 e5fe | | Load 0x2,-0x2
018a e013 | | Load 0x0,0x13
018b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
018c 4801 |H | Short_Literal 0x1
018d 00da | | Load_Top At_Offset_2
018e 01d6 | | Execute Vector,Field_Write
018f e5ff | | Load 0x2,-0x1
0190 e005 | | Load 0x0,0x5
0191 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0192 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0193 4802 |H | Short_Literal 0x2
0194 00da | | Load_Top At_Offset_2
0195 01d6 | | Execute Vector,Field_Write
0196 6009 |` | Indirect_Literal Discrete,0x1a0,{0x00000000, 0x00003802}
0197 e014 | | Load 0x0,0x14
0198 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0199 00db | | Load_Top At_Offset_3
019a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
019b 00da | | Load_Top At_Offset_2
019c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
019d 0000 0000 | | .XXX[0x3]
019f 0000 | |
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 117b | {| Declare_Subprogram INIT_1178,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 0334 | 4 | Declare_Variable Array,With_Constraint
01d0 e5fe | | Load 0x2,-0x2
01d1 e013 | | Load 0x0,0x13
01d2 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01d3 4801 |H | Short_Literal 0x1
01d4 00da | | Load_Top At_Offset_2
01d5 01d6 | | Execute Vector,Field_Write
01d6 4801 |H | Short_Literal 0x1
01d7 e5ff | | Load 0x2,-0x1
01d8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01d9 01d7 | | Execute Vector,Field_Read
01da e005 | | Load 0x0,0x5
01db 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01dd 4802 |H | Short_Literal 0x2
01de 00da | | Load_Top At_Offset_2
01df 01d6 | | Execute Vector,Field_Write
01e0 67bf |g | Indirect_Literal Discrete,0x1a0,{0x00000000, 0x00003802}
01e1 e014 | | Load 0x0,0x14
01e2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e3 00db | | Load_Top At_Offset_3
01e4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01e5 00da | | Load_Top At_Offset_2
01e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01e7 0000 | | .XXX[0x1]
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 118b | | Declare_Subprogram INIT_1188,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 0334 | 4 | Declare_Variable Array,With_Constraint
0221 e5fe | | Load 0x2,-0x2
0222 e013 | | Load 0x0,0x13
0223 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0224 4801 |H | Short_Literal 0x1
0225 00da | | Load_Top At_Offset_2
0226 01d6 | | Execute Vector,Field_Write
0227 e5ff | | Load 0x2,-0x1
0228 e005 | | Load 0x0,0x5
0229 1b14 | | Execute Package,Field_Read,Field_Number 0x14
022a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
022b 4802 |H | Short_Literal 0x2
022c 00da | | Load_Top At_Offset_2
022d 01d6 | | Execute Vector,Field_Write
022e 6009 |` | Indirect_Literal Discrete,0x238,{0x00000000, 0x00003804}
022f e014 | | Load 0x0,0x14
0230 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0231 00db | | Load_Top At_Offset_3
0232 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0233 00da | | Load_Top At_Offset_2
0234 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0235 0000 0000 | | .XXX[0x3]
0237 0000 | |
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 11a3 | | Declare_Subprogram INIT_11a0,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 0334 | 4 | Declare_Variable Array,With_Constraint
0268 e5fe | | Load 0x2,-0x2
0269 e013 | | Load 0x0,0x13
026a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
026b 4801 |H | Short_Literal 0x1
026c 00da | | Load_Top At_Offset_2
026d 01d6 | | Execute Vector,Field_Write
026e 4801 |H | Short_Literal 0x1
026f e5ff | | Load 0x2,-0x1
0270 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0271 01d7 | | Execute Vector,Field_Read
0272 e005 | | Load 0x0,0x5
0273 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0274 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0275 4802 |H | Short_Literal 0x2
0276 00da | | Load_Top At_Offset_2
0277 01d6 | | Execute Vector,Field_Write
0278 6007 |` | Indirect_Literal Discrete,0x280,{0x00000000, 0x00003805}
0279 e014 | | Load 0x0,0x14
027a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
027b 00db | | Load_Top At_Offset_3
027c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
027d 00da | | Load_Top At_Offset_2
027e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
027f 0000 | | .XXX[0x1]
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 02e8 | | .CONST 0x02e8 ; 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 703b |p; | Jump_Nonzero 0x2e4
02a9 00d8 | | Load_Top At_Offset_0
02aa e5fe | | Load 0x2,-0x2
02ab 01d7 | | Execute Vector,Field_Read
02ac 6835 |h5 | Jump_Zero 0x2e2
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 701f |p | Jump_Nonzero 0x2e2
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 0334 | 4 | Declare_Variable Array,With_Constraint
02cb e405 | | Load 0x2,0x5
02cc e015 | | Load 0x0,0x15
02cd 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
02ce 4801 |H | Short_Literal 0x1
02cf 00da | | Load_Top At_Offset_2
02d0 01d6 | | Execute Vector,Field_Write
02d1 4802 |H | Short_Literal 0x2
02d2 e403 | | Load 0x2,0x3
02d3 e015 | | Load 0x0,0x15
02d4 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
02d5 00db | | Load_Top At_Offset_3
02d6 e015 | | Load 0x0,0x15
02d7 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02d8 7006 |p | Jump_Nonzero 0x2df
02d9 00db | | Load_Top At_Offset_3
02da e015 | | Load 0x0,0x15
02db 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
02dc e403 | | Load 0x2,0x3
02dd e015 | | Load 0x0,0x15
02de 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
02df e015 | | Load 0x0,0x15
02e0 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02e1 a405 | | Store_Unchecked 0x2,0x5
02e2 00c8 | | Action Pop_Auxiliary_Range
02e3 3fc5 |? | Loop_Increasing 0x2a9
02e4 00ce | | Action Pop_Auxiliary
02e5 00da | | Load_Top At_Offset_2
02e6 a5fd | | Store_Unchecked 0x2,-0x3
02e7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02e8 TRAP_0298:
02e8 0007 | | Action Break_Optional
02e9 4801 |H | Short_Literal 0x1
02ea 4801 |H | Short_Literal 0x1
02eb e012 | | Load 0x0,0x12
02ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ed 0334 | 4 | Declare_Variable Array,With_Constraint
02ee e5ff | | Load 0x2,-0x1
02ef e013 | | Load 0x0,0x13
02f0 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02f1 4801 |H | Short_Literal 0x1
02f2 00da | | Load_Top At_Offset_2
02f3 01d6 | | Execute Vector,Field_Write
02f4 600b |` | Indirect_Literal Discrete,0x300,{0x00000000, 0x00003806}
02f5 e014 | | Load 0x0,0x14
02f6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f7 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
02f8 00da | | Load_Top At_Offset_2
02f9 e403 | | Load 0x2,0x3
02fa e015 | | Load 0x0,0x15
02fb 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
02fc 00db | | Load_Top At_Offset_3
02fd a5fd | | Store_Unchecked 0x2,-0x3
02fe 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02ff 0000 | | .XXX[0x1]
0300 0000 0000 | | .LITERAL {0x00000000, 0x00003806}
0304 0000 0000 | | .BLANK 0000[0x4]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 032c | , | .CONST 0x032c ; Address of begin
0309 03be | | .CONST 0x03be ; 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 11b3 | | Declare_Subprogram INIT_11b0,For_Call
032a 029f 11db | | Declare_Subprogram INIT_11d8,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 7079 |py | Jump_Nonzero 0x3ba
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 6838 |h8 | Jump_Zero 0x3b2
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 0334 | 4 | Declare_Variable Array,With_Constraint
0382 e40a | | Load 0x2,0xa
0383 e015 | | Load 0x0,0x15
0384 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0385 4801 |H | Short_Literal 0x1
0386 00da | | Load_Top At_Offset_2
0387 01d6 | | Execute Vector,Field_Write
0388 4803 |H | Short_Literal 0x3
0389 e408 | | Load 0x2,0x8
038a e015 | | Load 0x0,0x15
038b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
038c e40a | | Load 0x2,0xa
038d e015 | | Load 0x0,0x15
038e 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
038f 7006 |p | Jump_Nonzero 0x396
0390 e40a | | Load 0x2,0xa
0391 e015 | | Load 0x0,0x15
0392 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0393 e408 | | Load 0x2,0x8
0394 e015 | | Load 0x0,0x15
0395 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0396 00d8 | | Load_Top At_Offset_0
0397 e002 | | Load 0x0,0x2
0398 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0399 4801 |H | Short_Literal 0x1
039a 4801 |H | Short_Literal 0x1
039b e012 | | Load 0x0,0x12
039c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
039d 0334 | 4 | Declare_Variable Array,With_Constraint
039e e408 | | Load 0x2,0x8
039f e015 | | Load 0x0,0x15
03a0 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
03a1 4801 |H | Short_Literal 0x1
03a2 00da | | Load_Top At_Offset_2
03a3 01d6 | | Execute Vector,Field_Write
03a4 4802 |H | Short_Literal 0x2
03a5 e406 | | Load 0x2,0x6
03a6 e015 | | Load 0x0,0x15
03a7 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
03a8 e408 | | Load 0x2,0x8
03a9 e015 | | Load 0x0,0x15
03aa 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
03ab 7006 |p | Jump_Nonzero 0x3b2
03ac e408 | | Load 0x2,0x8
03ad e015 | | Load 0x0,0x15
03ae 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
03af e406 | | Load 0x2,0x6
03b0 e015 | | Load 0x0,0x15
03b1 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
03b2 e015 | | Load 0x0,0x15
03b3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03b4 a40a | | Store_Unchecked 0x2,0xa
03b5 e015 | | Load 0x0,0x15
03b6 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03b7 a408 | | Store_Unchecked 0x2,0x8
03b8 00c8 | | Action Pop_Auxiliary_Range
03b9 3f87 |? | Loop_Increasing 0x341
03ba 00ce | | Action Pop_Auxiliary
03bb e406 | | Load 0x2,0x6
03bc a5fc | | Store_Unchecked 0x2,-0x4
03bd 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03be TRAP_0308:
03be 0007 | | Action Break_Optional
03bf 4801 |H | Short_Literal 0x1
03c0 4801 |H | Short_Literal 0x1
03c1 e012 | | Load 0x0,0x12
03c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03c3 0334 | 4 | Declare_Variable Array,With_Constraint
03c4 e404 | | Load 0x2,0x4
03c5 e5ff | | Load 0x2,-0x1
03c6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03c7 01d7 | | Execute Vector,Field_Read
03c8 e005 | | Load 0x0,0x5
03c9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03ca 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03cb 4801 |H | Short_Literal 0x1
03cc 00da | | Load_Top At_Offset_2
03cd 01d6 | | Execute Vector,Field_Write
03ce 600d |` | Indirect_Literal Discrete,0x3dc,{0x00000000, 0x00003807}
03cf e014 | | Load 0x0,0x14
03d0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03d1 a40b | | Store_Unchecked 0x2,0xb
03d2 00db | | Load_Top At_Offset_3
03d3 e406 | | Load 0x2,0x6
03d4 e015 | | Load 0x0,0x15
03d5 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
03d6 e406 | | Load 0x2,0x6
03d7 a5fc | | Store_Unchecked 0x2,-0x4
03d8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03d9 0000 0000 | | .XXX[0x3]
03db 0000 | |
03dc 0000 0000 | | .LITERAL {0x00000000, 0x00003807}
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03ec | | .CONST 0x03ec ; Address of begin
03e1 0430 | 0 | .CONST 0x0430 ; 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 703b |p; | Jump_Nonzero 0x42c
03f1 00d8 | | Load_Top At_Offset_0
03f2 e5fe | | Load 0x2,-0x2
03f3 01d7 | | Execute Vector,Field_Read
03f4 6835 |h5 | Jump_Zero 0x42a
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 701f |p | Jump_Nonzero 0x42a
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 0334 | 4 | Declare_Variable Array,With_Constraint
0413 e405 | | Load 0x2,0x5
0414 e015 | | Load 0x0,0x15
0415 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0416 4801 |H | Short_Literal 0x1
0417 00da | | Load_Top At_Offset_2
0418 01d6 | | Execute Vector,Field_Write
0419 4802 |H | Short_Literal 0x2
041a e403 | | Load 0x2,0x3
041b e015 | | Load 0x0,0x15
041c 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
041d 00db | | Load_Top At_Offset_3
041e e015 | | Load 0x0,0x15
041f 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0420 7006 |p | Jump_Nonzero 0x427
0421 00db | | Load_Top At_Offset_3
0422 e015 | | Load 0x0,0x15
0423 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0424 e403 | | Load 0x2,0x3
0425 e015 | | Load 0x0,0x15
0426 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0427 e015 | | Load 0x0,0x15
0428 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0429 a405 | | Store_Unchecked 0x2,0x5
042a 00c8 | | Action Pop_Auxiliary_Range
042b 3fc5 |? | Loop_Increasing 0x3f1
042c 00ce | | Action Pop_Auxiliary
042d 00da | | Load_Top At_Offset_2
042e a5fd | | Store_Unchecked 0x2,-0x3
042f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0430 TRAP_03e0:
0430 0007 | | Action Break_Optional
0431 4801 |H | Short_Literal 0x1
0432 4801 |H | Short_Literal 0x1
0433 e012 | | Load 0x0,0x12
0434 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0435 0334 | 4 | Declare_Variable Array,With_Constraint
0436 e5ff | | Load 0x2,-0x1
0437 e013 | | Load 0x0,0x13
0438 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0439 4801 |H | Short_Literal 0x1
043a 00da | | Load_Top At_Offset_2
043b 01d6 | | Execute Vector,Field_Write
043c 600b |` | Indirect_Literal Discrete,0x448,{0x00000000, 0x00003808}
043d e014 | | Load 0x0,0x14
043e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
043f 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0440 00da | | Load_Top At_Offset_2
0441 e403 | | Load 0x2,0x3
0442 e015 | | Load 0x0,0x15
0443 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0444 00db | | Load_Top At_Offset_3
0445 a5fd | | Store_Unchecked 0x2,-0x3
0446 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0447 0000 | | .XXX[0x1]
0448 0000 0000 | | .LITERAL {0x00000000, 0x00003808}
044c 0000 0000 | | .BLANK 0000[0x4]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 046f | o | .CONST 0x046f ; Address of begin
0451 051e | | .CONST 0x051e ; 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 1213 | | Declare_Subprogram INIT_1210,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 7096 |p | Jump_Nonzero 0x51a
0484 00d8 | | Load_Top At_Offset_0
0485 e5fd | | Load 0x2,-0x3
0486 01d7 | | Execute Vector,Field_Read
0487 6890 |h | Jump_Zero 0x518
0488 00cf | | Action Mark_Auxiliary
0489 7865 |xe | Jump 0x4ef
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 0334 | 4 | Declare_Variable Array,With_Constraint
0495 e404 | | Load 0x2,0x4
0496 e402 | | Load 0x2,0x2
0497 01d7 | | Execute Vector,Field_Read
0498 e005 | | Load 0x0,0x5
0499 1b16 | | Execute Package,Field_Read,Field_Number 0x16
049a 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
049b e005 | | Load 0x0,0x5
049c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
049d 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
049e 4801 |H | Short_Literal 0x1
049f 00da | | Load_Top At_Offset_2
04a0 01d6 | | Execute Vector,Field_Write
04a1 4807 |H | Short_Literal 0x7
04a2 e407 | | Load 0x2,0x7
04a3 e015 | | Load 0x0,0x15
04a4 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
04a5 00cf | | Action Mark_Auxiliary
04a6 e405 | | Load 0x2,0x5
04a7 0aff | | Execute_Immediate Plus,-0x1
04a8 e404 | | Load 0x2,0x4
04a9 0263 | c | Execute Discrete,Above_Bound
04aa 701e |p | Jump_Nonzero 0x4c9
04ab 00d8 | | Load_Top At_Offset_0
04ac e402 | | Load 0x2,0x2
04ad 01d7 | | Execute Vector,Field_Read
04ae e005 | | Load 0x0,0x5
04af 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04b0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
04b1 7015 |p | Jump_Nonzero 0x4c7
04b2 e40d | | Load 0x2,0xd
04b3 e002 | | Load 0x0,0x2
04b4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04b5 4801 |H | Short_Literal 0x1
04b6 4801 |H | Short_Literal 0x1
04b7 e012 | | Load 0x0,0x12
04b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04b9 0334 | 4 | Declare_Variable Array,With_Constraint
04ba 00db | | Load_Top At_Offset_3
04bb e402 | | Load 0x2,0x2
04bc 01d7 | | Execute Vector,Field_Read
04bd e005 | | Load 0x0,0x5
04be 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04bf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04c0 4801 |H | Short_Literal 0x1
04c1 00da | | Load_Top At_Offset_2
04c2 01d6 | | Execute Vector,Field_Write
04c3 480e |H | Short_Literal 0xe
04c4 e407 | | Load 0x2,0x7
04c5 e015 | | Load 0x0,0x15
04c6 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
04c7 00c8 | | Action Pop_Auxiliary_Range
04c8 3fe2 |? | Loop_Increasing 0x4ab
04c9 00ce | | Action Pop_Auxiliary
04ca e407 | | Load 0x2,0x7
04cb e015 | | Load 0x0,0x15
04cc 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
04cd 0e01 | | Execute_Immediate Not_Equal,0x1
04ce 6812 |h | Jump_Zero 0x4e1
04cf 00d9 | | Load_Top At_Offset_1
04d0 e002 | | Load 0x0,0x2
04d1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04d2 4801 |H | Short_Literal 0x1
04d3 4801 |H | Short_Literal 0x1
04d4 e012 | | Load 0x0,0x12
04d5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04d6 0334 | 4 | Declare_Variable Array,With_Constraint
04d7 e407 | | Load 0x2,0x7
04d8 e015 | | Load 0x0,0x15
04d9 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
04da 4801 |H | Short_Literal 0x1
04db 00da | | Load_Top At_Offset_2
04dc 01d6 | | Execute Vector,Field_Write
04dd 4805 |H | Short_Literal 0x5
04de e408 | | Load 0x2,0x8
04df e015 | | Load 0x0,0x15
04e0 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
04e1 e407 | | Load 0x2,0x7
04e2 e015 | | Load 0x0,0x15
04e3 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
04e4 7006 |p | Jump_Nonzero 0x4eb
04e5 e407 | | Load 0x2,0x7
04e6 e015 | | Load 0x0,0x15
04e7 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
04e8 e408 | | Load 0x2,0x8
04e9 e015 | | Load 0x0,0x15
04ea 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
04eb e015 | | Load 0x0,0x15
04ec 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
04ed a407 | | Store_Unchecked 0x2,0x7
04ee 00c9 | | Action Pop_Auxiliary_Loop
04ef e405 | | Load 0x2,0x5
04f0 e402 | | Load 0x2,0x2
04f1 01dc | | Execute Vector,Last
04f2 027a | z | Execute Discrete,Less_Equal
04f3 7796 |w | Jump_Nonzero 0x48a
04f4 00ce | | Action Pop_Auxiliary
04f5 e408 | | Load 0x2,0x8
04f6 e015 | | Load 0x0,0x15
04f7 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
04f8 681f |h | Jump_Zero 0x518
04f9 00d8 | | Load_Top At_Offset_0
04fa e002 | | Load 0x0,0x2
04fb 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04fc 4801 |H | Short_Literal 0x1
04fd 4801 |H | Short_Literal 0x1
04fe e012 | | Load 0x0,0x12
04ff 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0500 0334 | 4 | Declare_Variable Array,With_Constraint
0501 e408 | | Load 0x2,0x8
0502 e015 | | Load 0x0,0x15
0503 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0504 4801 |H | Short_Literal 0x1
0505 00da | | Load_Top At_Offset_2
0506 01d6 | | Execute Vector,Field_Write
0507 4802 |H | Short_Literal 0x2
0508 e406 | | Load 0x2,0x6
0509 e015 | | Load 0x0,0x15
050a 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
050b e408 | | Load 0x2,0x8
050c e015 | | Load 0x0,0x15
050d 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
050e 7006 |p | Jump_Nonzero 0x515
050f e408 | | Load 0x2,0x8
0510 e015 | | Load 0x0,0x15
0511 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0512 e406 | | Load 0x2,0x6
0513 e015 | | Load 0x0,0x15
0514 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0515 e015 | | Load 0x0,0x15
0516 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0517 a408 | | Store_Unchecked 0x2,0x8
0518 00c8 | | Action Pop_Auxiliary_Range
0519 3f6a |?j | Loop_Increasing 0x484
051a 00ce | | Action Pop_Auxiliary
051b e406 | | Load 0x2,0x6
051c a5fc | | Store_Unchecked 0x2,-0x4
051d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
051e TRAP_0450:
051e 0007 | | Action Break_Optional
051f 4801 |H | Short_Literal 0x1
0520 4801 |H | Short_Literal 0x1
0521 e012 | | Load 0x0,0x12
0522 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0523 0334 | 4 | Declare_Variable Array,With_Constraint
0524 e404 | | Load 0x2,0x4
0525 e5ff | | Load 0x2,-0x1
0526 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0527 01d7 | | Execute Vector,Field_Read
0528 e005 | | Load 0x0,0x5
0529 1b14 | | Execute Package,Field_Read,Field_Number 0x14
052a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
052b 4801 |H | Short_Literal 0x1
052c 00da | | Load_Top At_Offset_2
052d 01d6 | | Execute Vector,Field_Write
052e 600d |` | Indirect_Literal Discrete,0x53c,{0x00000000, 0x00003809}
052f e014 | | Load 0x0,0x14
0530 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0531 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0532 00da | | Load_Top At_Offset_2
0533 e406 | | Load 0x2,0x6
0534 e015 | | Load 0x0,0x15
0535 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0536 e406 | | Load 0x2,0x6
0537 a5fc | | Store_Unchecked 0x2,-0x4
0538 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0539 0000 0000 | | .XXX[0x3]
053b 0000 | |
053c 0000 0000 | | .LITERAL {0x00000000, 0x00003809}
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0555 | U | .CONST 0x0555 ; Address of begin
0541 0004 | | .CONST 0x0004 ; Address of exception handler
0542 0007 | | .CONST 0x0007 ; Number of locals
0543 INIT_0540:
0543 e015 | | Load 0x0,0x15
0544 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0545 e015 | | Load 0x0,0x15
0546 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0547 e5fe | | Load 0x2,-0x2
0548 e013 | | Load 0x0,0x13
0549 1817 | | Execute Package,Field_Execute,Field_Number 0x17
054a e016 | | Load 0x0,0x16
054b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
054c 4801 |H | Short_Literal 0x1
054d 00d9 | | Load_Top At_Offset_1
054e 01d7 | | Execute Vector,Field_Read
054f 0007 | | Action Break_Optional
0550 4802 |H | Short_Literal 0x2
0551 00da | | Load_Top At_Offset_2
0552 01d7 | | Execute Vector,Field_Read
0553 029f 123b | ;| Declare_Subprogram INIT_1238,For_Call
0555 BODY_0540:
0555 00cf | | Action Mark_Auxiliary
0556 e016 | | Load 0x0,0x16
0557 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0558 01d9 | | Execute Vector,Reverse_Bounds
0559 0263 | c | Execute Discrete,Above_Bound
055a 7003 |p | Jump_Nonzero 0x55e
055b 8407 | | Call 0x2,0x7
055c 00c8 | | Action Pop_Auxiliary_Range
055d 3ffd |? | Loop_Increasing 0x55b
055e 00ce | | Action Pop_Auxiliary
055f e403 | | Load 0x2,0x3
0560 a5fd | | Store_Unchecked 0x2,-0x3
0561 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0562 0000 0000 | | .BLANK 0000[0x6]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 0575 | u | .CONST 0x0575 ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0006 | | .CONST 0x0006 ; Number of locals
056b INIT_0568:
056b e015 | | Load 0x0,0x15
056c 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
056d e015 | | Load 0x0,0x15
056e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
056f e015 | | Load 0x0,0x15
0570 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0571 e015 | | Load 0x0,0x15
0572 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0573 029f 1283 | | Declare_Subprogram INIT_1280,For_Call
0575 BODY_0568:
0575 e5fd | | Load 0x2,-0x3
0576 7002 |p | Jump_Nonzero 0x579
0577 e5fc | | Load 0x2,-0x4
0578 682d |h- | Jump_Zero 0x5a6
0579 e5fe | | Load 0x2,-0x2
057a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
057b 680b |h | Jump_Zero 0x587
057c e015 | | Load 0x0,0x15
057d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
057e e5f9 | | Load 0x2,-0x7
057f e5ff | | Load 0x2,-0x1
0580 e5fa | | Load 0x2,-0x6
0581 e5ff | | Load 0x2,-0x1
0582 e5fe | | Load 0x2,-0x2
0583 8220 | | Call 0x1,0x20
0584 8224 | $ | Call 0x1,0x24
0585 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0586 7806 |x | Jump 0x58d
0587 e015 | | Load 0x0,0x15
0588 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0589 e5f9 | | Load 0x2,-0x7
058a e5ff | | Load 0x2,-0x1
058b 8216 | | Call 0x1,0x16
058c 0032 | 2 | Store_Top Heap_Access,At_Offset_2
058d e5fd | | Load 0x2,-0x3
058e 6802 |h | Jump_Zero 0x591
058f 00d9 | | Load_Top At_Offset_1
0590 8406 | | Call 0x2,0x6
0591 e5fc | | Load 0x2,-0x4
0592 6813 |h | Jump_Zero 0x5a6
0593 e5fe | | Load 0x2,-0x2
0594 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0595 6808 |h | Jump_Zero 0x59e
0596 e015 | | Load 0x0,0x15
0597 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0598 e5fe | | Load 0x2,-0x2
0599 e5ff | | Load 0x2,-0x1
059a e405 | | Load 0x2,0x5
059b 826d | m | Call 0x1,0x6d
059c c403 | | Store 0x2,0x3
059d 7806 |x | Jump 0x5a4
059e e015 | | Load 0x0,0x15
059f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05a0 e5ff | | Load 0x2,-0x1
05a1 00db | | Load_Top At_Offset_3
05a2 821a | | Call 0x1,0x1a
05a3 c403 | | Store 0x2,0x3
05a4 00db | | Load_Top At_Offset_3
05a5 8406 | | Call 0x2,0x6
05a6 e5fb | | Load 0x2,-0x5
05a7 6816 |h | Jump_Zero 0x5be
05a8 e5fe | | Load 0x2,-0x2
05a9 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05aa 680b |h | Jump_Zero 0x5b6
05ab e015 | | Load 0x0,0x15
05ac 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05ad e5f9 | | Load 0x2,-0x7
05ae e5ff | | Load 0x2,-0x1
05af 4800 |H | Short_Literal 0x0
05b0 e5ff | | Load 0x2,-0x1
05b1 e5fe | | Load 0x2,-0x2
05b2 8220 | | Call 0x1,0x20
05b3 8225 | % | Call 0x1,0x25
05b4 0033 | 3 | Store_Top Heap_Access,At_Offset_3
05b5 7806 |x | Jump 0x5bc
05b6 e015 | | Load 0x0,0x15
05b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b8 e5f9 | | Load 0x2,-0x7
05b9 e5ff | | Load 0x2,-0x1
05ba 8218 | | Call 0x1,0x18
05bb 0033 | 3 | Store_Top Heap_Access,At_Offset_3
05bc 00da | | Load_Top At_Offset_2
05bd 8406 | | Call 0x2,0x6
05be e402 | | Load 0x2,0x2
05bf a5f8 | | Store_Unchecked 0x2,-0x8
05c0 4508 |E | Exit_Suprogram New_Top_Offset 0x8
05c1 0000 0000 | | .BLANK 0000[0x7]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05d0 | | .CONST 0x05d0 ; Address of begin
05c9 0004 | | .CONST 0x0004 ; Address of exception handler
05ca 0003 | | .CONST 0x0003 ; Number of locals
05cb INIT_05c8:
05cb e5fc | | Load 0x2,-0x4
05cc e015 | | Load 0x0,0x15
05cd 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
05ce e014 | | Load 0x0,0x14
05cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d0 BODY_05c8:
05d0 4800 |H | Short_Literal 0x0
05d1 a5f9 | | Store_Unchecked 0x2,-0x7
05d2 00cf | | Action Mark_Auxiliary
05d3 e5fb | | Load 0x2,-0x5
05d4 01d9 | | Execute Vector,Reverse_Bounds
05d5 0263 | c | Execute Discrete,Above_Bound
05d6 7055 |pU | Jump_Nonzero 0x62c
05d7 00cf | | Action Mark_Auxiliary
05d8 e402 | | Load 0x2,0x2
05d9 01d9 | | Execute Vector,Reverse_Bounds
05da 0263 | c | Execute Discrete,Above_Bound
05db 704d |pM | Jump_Nonzero 0x629
05dc 00d8 | | Load_Top At_Offset_0
05dd e402 | | Load 0x2,0x2
05de 01d7 | | Execute Vector,Field_Read
05df e015 | | Load 0x0,0x15
05e0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05e1 e406 | | Load 0x2,0x6
05e2 e5fb | | Load 0x2,-0x5
05e3 01d7 | | Execute Vector,Field_Read
05e4 027f | | Execute Discrete,Equal
05e5 6841 |hA | Jump_Zero 0x627
05e6 e014 | | Load 0x0,0x14
05e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05e8 e5fa | | Load 0x2,-0x6
05e9 00d8 | | Load_Top At_Offset_0
05ea 0120 | | Execute Any,Is_Value
05eb 6803 |h | Jump_Zero 0x5ef
05ec e5fd | | Load 0x2,-0x3
05ed 011e | | Execute Any,Convert
05ee 7802 |x | Jump 0x5f1
05ef e5fd | | Load 0x2,-0x3
05f0 0119 | | Execute Any,Check_In_Formal_Type
05f1 00da | | Load_Top At_Offset_2
05f2 e402 | | Load 0x2,0x2
05f3 01d7 | | Execute Vector,Field_Read
05f4 85fe | | Call 0x2,-0x2
05f5 c5fa | | Store 0x2,-0x6
05f6 c403 | | Store 0x2,0x3
05f7 e403 | | Load 0x2,0x3
05f8 6803 |h | Jump_Zero 0x5fc
05f9 e403 | | Load 0x2,0x3
05fa a5f9 | | Store_Unchecked 0x2,-0x7
05fb 4506 |E | Exit_Suprogram New_Top_Offset 0x6
05fc 4801 |H | Short_Literal 0x1
05fd 00d9 | | Load_Top At_Offset_1
05fe e402 | | Load 0x2,0x2
05ff 01d7 | | Execute Vector,Field_Read
0600 e015 | | Load 0x0,0x15
0601 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0602 0f15 | | Execute_Immediate Equal,0x15
0603 6823 |h# | Jump_Zero 0x627
0604 e014 | | Load 0x0,0x14
0605 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0606 e5fa | | Load 0x2,-0x6
0607 00d8 | | Load_Top At_Offset_0
0608 0120 | | Execute Any,Is_Value
0609 6803 |h | Jump_Zero 0x60d
060a e5fd | | Load 0x2,-0x3
060b 011e | | Execute Any,Convert
060c 7802 |x | Jump 0x60f
060d e5fd | | Load 0x2,-0x3
060e 0119 | | Execute Any,Check_In_Formal_Type
060f e5fb | | Load 0x2,-0x5
0610 4801 |H | Short_Literal 0x1
0611 e409 | | Load 0x2,0x9
0612 e402 | | Load 0x2,0x2
0613 01d7 | | Execute Vector,Field_Read
0614 e015 | | Load 0x0,0x15
0615 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0616 e015 | | Load 0x0,0x15
0617 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0618 e5fd | | Load 0x2,-0x3
0619 4ffe |O | Short_Literal -0x2
061a 4802 |H | Short_Literal 0x2
061b 0099 | | Action Reference_Dynamic
061c 4fff |O | Short_Literal -0x1
061d 4802 |H | Short_Literal 0x2
061e 0099 | | Action Reference_Dynamic
061f 8226 | & | Call 0x1,0x26
0620 c5fa | | Store 0x2,-0x6
0621 c403 | | Store 0x2,0x3
0622 e403 | | Load 0x2,0x3
0623 6803 |h | Jump_Zero 0x627
0624 e403 | | Load 0x2,0x3
0625 a5f9 | | Store_Unchecked 0x2,-0x7
0626 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0627 00c8 | | Action Pop_Auxiliary_Range
0628 3fb3 |? | Loop_Increasing 0x5dc
0629 00ce | | Action Pop_Auxiliary
062a 00c8 | | Action Pop_Auxiliary_Range
062b 3fab |? | Loop_Increasing 0x5d7
062c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
062d 0000 0000 | | .XXX[0x3]
062f 0000 | |
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 063b | ; | .CONST 0x063b ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0003 | | .CONST 0x0003 ; Number of locals
0633 INIT_0630:
0633 e014 | | Load 0x0,0x14
0634 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0635 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0636 e001 | | Load 0x0,0x1
0637 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0638 02c7 | | Declare_Variable Any
0639 00d8 | | Load_Top At_Offset_0
063a 1c00 | | Execute_Immediate Run_Utility,0x0
063b BODY_0630:
063b 00d9 | | Load_Top At_Offset_1
063c 00d9 | | Load_Top At_Offset_1
063d 0120 | | Execute Any,Is_Value
063e 6803 |h | Jump_Zero 0x642
063f e001 | | Load 0x0,0x1
0640 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0641 7801 |x | Jump 0x643
0642 00d9 | | Load_Top At_Offset_1
0643 e5ff | | Load 0x2,-0x1
0644 e005 | | Load 0x0,0x5
0645 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0646 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0647 c403 | | Store 0x2,0x3
0648 005a | Z | Store_Top Discrete,At_Offset_2
0649 00d9 | | Load_Top At_Offset_1
064a 6802 |h | Jump_Zero 0x64d
064b 4800 |H | Short_Literal 0x0
064c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
064d 00d8 | | Load_Top At_Offset_0
064e e001 | | Load 0x0,0x1
064f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0650 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0651 0000 0000 | | .BLANK 0000[0x7]
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 0667 | g | .CONST 0x0667 ; Address of begin
0659 0004 | | .CONST 0x0004 ; Address of exception handler
065a 0003 | | .CONST 0x0003 ; Number of locals
065b INIT_0658:
065b 00da | | Load_Top At_Offset_2
065c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
065d e5fe | | Load 0x2,-0x2
065e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
065f 0273 | s | Execute Discrete,Plus
0660 00e3 | | Load_Encached Natural_Cache
0661 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0662 00d8 | | Load_Top At_Offset_0
0663 e005 | | Load 0x0,0x5
0664 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0665 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0666 1c08 | | Execute_Immediate Run_Utility,0x8
0667 BODY_0658:
0667 e5fe | | Load 0x2,-0x2
0668 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0669 7002 |p | Jump_Nonzero 0x66c
066a e5ff | | Load 0x2,-0x1
066b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
066c e5ff | | Load 0x2,-0x1
066d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
066e 7002 |p | Jump_Nonzero 0x671
066f e5fe | | Load 0x2,-0x2
0670 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0671 e5ff | | Load 0x2,-0x1
0672 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0673 6805 |h | Jump_Zero 0x679
0674 e5ff | | Load 0x2,-0x1
0675 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0676 00d9 | | Load_Top At_Offset_1
0677 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0678 780b |x | Jump 0x684
0679 e5fe | | Load 0x2,-0x2
067a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
067b 6805 |h | Jump_Zero 0x681
067c e5fe | | Load 0x2,-0x2
067d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
067e 00d9 | | Load_Top At_Offset_1
067f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0680 7803 |x | Jump 0x684
0681 4800 |H | Short_Literal 0x0
0682 00d9 | | Load_Top At_Offset_1
0683 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0684 e5ff | | Load 0x2,-0x1
0685 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0686 4801 |H | Short_Literal 0x1
0687 e5ff | | Load 0x2,-0x1
0688 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0689 00db | | Load_Top At_Offset_3
068a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
068b 01ce | | Execute Vector,Slice_Write
068c e5fe | | Load 0x2,-0x2
068d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
068e e5ff | | Load 0x2,-0x1
068f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0690 0a01 | | Execute_Immediate Plus,0x1
0691 00d8 | | Load_Top At_Offset_0
0692 00e2 | | Load_Encached Integer_Cache
0693 0260 | ` | Execute Discrete,In_Type
0694 7001 |p | Jump_Nonzero 0x696
0695 0801 | | Execute_Immediate Raise,0x1
0696 00da | | Load_Top At_Offset_2
0697 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0698 01dc | | Execute Vector,Last
0699 00db | | Load_Top At_Offset_3
069a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
069b 01ce | | Execute Vector,Slice_Write
069c 00d8 | | Load_Top At_Offset_0
069d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
069e 0000 0000 | | .XXX[0x2]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06aa | | .CONST 0x06aa ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0002 | | .CONST 0x0002 ; Number of locals
06a3 INIT_06a0:
06a3 00da | | Load_Top At_Offset_2
06a4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06a5 0a01 | | Execute_Immediate Plus,0x1
06a6 e005 | | Load 0x0,0x5
06a7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06a8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06a9 1c08 | | Execute_Immediate Run_Utility,0x8
06aa BODY_06a0:
06aa 00db | | Load_Top At_Offset_3
06ab 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06ac 7009 |p | Jump_Nonzero 0x6b6
06ad 4800 |H | Short_Literal 0x0
06ae 00d9 | | Load_Top At_Offset_1
06af 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06b0 e5fe | | Load 0x2,-0x2
06b1 4801 |H | Short_Literal 0x1
06b2 00da | | Load_Top At_Offset_2
06b3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06b4 01d6 | | Execute Vector,Field_Write
06b5 7813 |x | Jump 0x6c9
06b6 00db | | Load_Top At_Offset_3
06b7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06b8 00d9 | | Load_Top At_Offset_1
06b9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06ba 00db | | Load_Top At_Offset_3
06bb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06bc 4801 |H | Short_Literal 0x1
06bd e5ff | | Load 0x2,-0x1
06be 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06bf 00db | | Load_Top At_Offset_3
06c0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06c1 01ce | | Execute Vector,Slice_Write
06c2 e5fe | | Load 0x2,-0x2
06c3 00d9 | | Load_Top At_Offset_1
06c4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06c5 01dc | | Execute Vector,Last
06c6 00da | | Load_Top At_Offset_2
06c7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06c8 01d6 | | Execute Vector,Field_Write
06c9 00d8 | | Load_Top At_Offset_0
06ca 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06cb 0000 0000 | | .BLANK 0000[0x5]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d8 | | .CONST 0x06d8 ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 0003 | | .CONST 0x0003 ; Number of locals
06d3 INIT_06d0:
06d3 00da | | Load_Top At_Offset_2
06d4 e013 | | Load 0x0,0x13
06d5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
06d6 00e3 | | Load_Encached Natural_Cache
06d7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06d8 BODY_06d0:
06d8 00cf | | Action Mark_Auxiliary
06d9 00da | | Load_Top At_Offset_2
06da 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06db 01d9 | | Execute Vector,Reverse_Bounds
06dc 0263 | c | Execute Discrete,Above_Bound
06dd 700c |p | Jump_Nonzero 0x6ea
06de 00db | | Load_Top At_Offset_3
06df 00d9 | | Load_Top At_Offset_1
06e0 e402 | | Load 0x2,0x2
06e1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06e2 01d7 | | Execute Vector,Field_Read
06e3 e005 | | Load 0x0,0x5
06e4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06e5 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
06e6 0273 | s | Execute Discrete,Plus
06e7 c403 | | Store 0x2,0x3
06e8 00c8 | | Action Pop_Auxiliary_Range
06e9 3ff4 |? | Loop_Increasing 0x6de
06ea 00ce | | Action Pop_Auxiliary
06eb 00d8 | | Load_Top At_Offset_0
06ec 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06ed 0000 0000 | | .XXX[0x3]
06ef 0000 | |
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f5 | | .CONST 0x06f5 ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0002 | | .CONST 0x0002 ; Number of locals
06f3 INIT_06f0:
06f3 00e3 | | Load_Encached Natural_Cache
06f4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06f5 BODY_06f0:
06f5 00cf | | Action Mark_Auxiliary
06f6 e5ff | | Load 0x2,-0x1
06f7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06f8 01d9 | | Execute Vector,Reverse_Bounds
06f9 0263 | c | Execute Discrete,Above_Bound
06fa 700c |p | Jump_Nonzero 0x707
06fb 00db | | Load_Top At_Offset_3
06fc 00d9 | | Load_Top At_Offset_1
06fd e5ff | | Load 0x2,-0x1
06fe 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06ff 01d7 | | Execute Vector,Field_Read
0700 e005 | | Load 0x0,0x5
0701 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0702 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0703 0273 | s | Execute Discrete,Plus
0704 c402 | | Store 0x2,0x2
0705 00c8 | | Action Pop_Auxiliary_Range
0706 3ff4 |? | Loop_Increasing 0x6fb
0707 00ce | | Action Pop_Auxiliary
0708 00d8 | | Load_Top At_Offset_0
0709 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
070a 0000 0000 | | .BLANK 0000[0x6]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0716 | | .CONST 0x0716 ; Address of begin
0711 0004 | | .CONST 0x0004 ; Address of exception handler
0712 0003 | | .CONST 0x0003 ; Number of locals
0713 INIT_0710:
0713 00e1 | | Load_Encached Boolean_Cache
0714 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0715 00e1 | | Load_Encached Boolean_Cache
0716 BODY_0710:
0716 e5fe | | Load 0x2,-0x2
0717 680c |h | Jump_Zero 0x724
0718 00e1 | | Load_Encached Boolean_Cache
0719 00da | | Load_Top At_Offset_2
071a e5fd | | Load 0x2,-0x3
071b e5ff | | Load 0x2,-0x1
071c e22a | * | Load 0x1,0x2a
071d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
071e 005b | [ | Store_Top Discrete,At_Offset_3
071f 0059 | Y | Store_Top Discrete,At_Offset_1
0720 00d8 | | Load_Top At_Offset_0
0721 6802 |h | Jump_Zero 0x724
0722 00d9 | | Load_Top At_Offset_1
0723 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0724 4800 |H | Short_Literal 0x0
0725 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0726 0000 0000 | | .XXX[0x2]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 073e | > | .CONST 0x073e ; Address of begin
0729 0004 | | .CONST 0x0004 ; Address of exception handler
072a 0006 | | .CONST 0x0006 ; Number of locals
072b INIT_0728:
072b 00da | | Load_Top At_Offset_2
072c e005 | | Load 0x0,0x5
072d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
072e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
072f 00d8 | | Load_Top At_Offset_0
0730 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0731 e005 | | Load 0x0,0x5
0732 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0733 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0734 1c08 | | Execute_Immediate Run_Utility,0x8
0735 00e3 | | Load_Encached Natural_Cache
0736 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0737 e005 | | Load 0x0,0x5
0738 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0739 1b0d | | Execute Package,Field_Read,Field_Number 0xd
073a e005 | | Load 0x0,0x5
073b 1b15 | | Execute Package,Field_Read,Field_Number 0x15
073c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
073d 0337 | 7 | Declare_Variable Array
073e BODY_0728:
073e e402 | | Load 0x2,0x2
073f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0740 e403 | | Load 0x2,0x3
0741 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0742 00cf | | Action Mark_Auxiliary
0743 e402 | | Load 0x2,0x2
0744 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0745 01d9 | | Execute Vector,Reverse_Bounds
0746 0263 | c | Execute Discrete,Above_Bound
0747 7029 |p) | Jump_Nonzero 0x771
0748 00d8 | | Load_Top At_Offset_0
0749 e402 | | Load 0x2,0x2
074a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
074b 01d7 | | Execute Vector,Field_Read
074c a405 | | Store_Unchecked 0x2,0x5
074d e405 | | Load 0x2,0x5
074e e5ff | | Load 0x2,-0x1
074f e005 | | Load 0x0,0x5
0750 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0751 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0752 e406 | | Load 0x2,0x6
0753 01d4 | | Execute Vector,Structure_Write
0754 e5fe | | Load 0x2,-0x2
0755 6804 |h | Jump_Zero 0x75a
0756 e5fe | | Load 0x2,-0x2
0757 e406 | | Load 0x2,0x6
0758 01d7 | | Execute Vector,Field_Read
0759 6815 |h | Jump_Zero 0x76f
075a e405 | | Load 0x2,0x5
075b e5fc | | Load 0x2,-0x4
075c e5fd | | Load 0x2,-0x3
075d 8232 | 2 | Call 0x1,0x32
075e 7010 |p | Jump_Nonzero 0x76f
075f e405 | | Load 0x2,0x5
0760 e404 | | Load 0x2,0x4
0761 e403 | | Load 0x2,0x3
0762 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0763 01d6 | | Execute Vector,Field_Write
0764 e404 | | Load 0x2,0x4
0765 0a01 | | Execute_Immediate Plus,0x1
0766 c404 | | Store 0x2,0x4
0767 e5fc | | Load 0x2,-0x4
0768 6806 |h | Jump_Zero 0x76f
0769 4801 |H | Short_Literal 0x1
076a 4801 |H | Short_Literal 0x1
076b e405 | | Load 0x2,0x5
076c e5fd | | Load 0x2,-0x3
076d e22a | * | Load 0x1,0x2a
076e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
076f 00c8 | | Action Pop_Auxiliary_Range
0770 3fd7 |? | Loop_Increasing 0x748
0771 00ce | | Action Pop_Auxiliary
0772 00da | | Load_Top At_Offset_2
0773 0aff | | Execute_Immediate Plus,-0x1
0774 e005 | | Load 0x0,0x5
0775 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0776 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0777 1c08 | | Execute_Immediate Run_Utility,0x8
0778 4801 |H | Short_Literal 0x1
0779 e404 | | Load 0x2,0x4
077a 0aff | | Execute_Immediate Plus,-0x1
077b e403 | | Load 0x2,0x3
077c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
077d 01cf | | Execute Vector,Slice_Read
077e 00d9 | | Load_Top At_Offset_1
077f 00d8 | | Load_Top At_Offset_0
0780 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0781 00da | | Load_Top At_Offset_2
0782 01da | | Execute Vector,Bounds
0783 00da | | Load_Top At_Offset_2
0784 01da | | Execute Vector,Bounds
0785 00da | | Load_Top At_Offset_2
0786 027f | | Execute Discrete,Equal
0787 7001 |p | Jump_Nonzero 0x789
0788 08e0 | | Execute_Immediate Raise,0xe0
0789 00cd | | Action Spare6_Action
078a 027f | | Execute Discrete,Equal
078b 7001 |p | Jump_Nonzero 0x78d
078c 08e0 | | Execute_Immediate Raise,0xe0
078d 00d2 | | Pop_Control Pop_Count_2
078e 00d9 | | Load_Top At_Offset_1
078f 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0790 e403 | | Load 0x2,0x3
0791 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0792 00d9 | | Load_Top At_Offset_1
0793 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0794 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0795 0000 0000 | | .XXX[0x3]
0797 0000 | |
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b | | .CONST 0x079b ; Address of begin
0799 0004 | | .CONST 0x0004 ; Address of exception handler
079a 0001 | | .CONST 0x0001 ; Number of locals
079b BODY_0798:
079b INIT_0798:
079b 4800 |H | Short_Literal 0x0
079c a5fd | | Store_Unchecked 0x2,-0x3
079d 00cf | | Action Mark_Auxiliary
079e 00db | | Load_Top At_Offset_3
079f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07a0 01d9 | | Execute Vector,Reverse_Bounds
07a1 0263 | c | Execute Discrete,Above_Bound
07a2 7011 |p | Jump_Nonzero 0x7b4
07a3 4801 |H | Short_Literal 0x1
07a4 00d9 | | Load_Top At_Offset_1
07a5 e5ff | | Load 0x2,-0x1
07a6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07a7 01d7 | | Execute Vector,Field_Read
07a8 e005 | | Load 0x0,0x5
07a9 1b15 | | Execute Package,Field_Read,Field_Number 0x15
07aa 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07ab e5fe | | Load 0x2,-0x2
07ac e017 | | Load 0x0,0x17
07ad 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07ae 6803 |h | Jump_Zero 0x7b2
07af 00d8 | | Load_Top At_Offset_0
07b0 a5fd | | Store_Unchecked 0x2,-0x3
07b1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07b2 00c8 | | Action Pop_Auxiliary_Range
07b3 3fef |? | Loop_Increasing 0x7a3
07b4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07b5 0000 0000 | | .XXX[0x3]
07b7 0000 | |
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07d7 | | .CONST 0x07d7 ; Address of begin
07b9 0004 | | .CONST 0x0004 ; Address of exception handler
07ba 0009 | | .CONST 0x0009 ; Number of locals
07bb INIT_07b8:
07bb 00da | | Load_Top At_Offset_2
07bc e005 | | Load 0x0,0x5
07bd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07be 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
07bf 00d8 | | Load_Top At_Offset_0
07c0 e005 | | Load 0x0,0x5
07c1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07c2 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
07c3 e5ff | | Load 0x2,-0x1
07c4 e005 | | Load 0x0,0x5
07c5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07c6 181c | | Execute Package,Field_Execute,Field_Number 0x1c
07c7 e005 | | Load 0x0,0x5
07c8 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07c9 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
07ca e014 | | Load 0x0,0x14
07cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07cc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
07cd e5fe | | Load 0x2,-0x2
07ce 8231 | 1 | Call 0x1,0x31
07cf e005 | | Load 0x0,0x5
07d0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07d1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07d2 1c08 | | Execute_Immediate Run_Utility,0x8
07d3 00e3 | | Load_Encached Natural_Cache
07d4 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
07d5 029f 12a3 | | Declare_Subprogram INIT_12a0,For_Call
07d7 BODY_07b8:
07d7 4800 |H | Short_Literal 0x0
07d8 00db | | Load_Top At_Offset_3
07d9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07da 00cf | | Action Mark_Auxiliary
07db e5fe | | Load 0x2,-0x2
07dc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07dd 01d9 | | Execute Vector,Reverse_Bounds
07de 0263 | c | Execute Discrete,Above_Bound
07df 702c |p, | Jump_Nonzero 0x80c
07e0 4800 |H | Short_Literal 0x0
07e1 00d9 | | Load_Top At_Offset_1
07e2 e5fe | | Load 0x2,-0x2
07e3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07e4 01d7 | | Execute Vector,Field_Read
07e5 e005 | | Load 0x0,0x5
07e6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07e7 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
07e8 e403 | | Load 0x2,0x3
07e9 e017 | | Load 0x0,0x17
07ea 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
07eb 701e |p | Jump_Nonzero 0x80a
07ec 00d8 | | Load_Top At_Offset_0
07ed e5fe | | Load 0x2,-0x2
07ee 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07ef 01d7 | | Execute Vector,Field_Read
07f0 e402 | | Load 0x2,0x2
07f1 e005 | | Load 0x0,0x5
07f2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07f3 1884 | | Execute Package,Field_Execute,Field_Number 0x84
07f4 6815 |h | Jump_Zero 0x80a
07f5 e406 | | Load 0x2,0x6
07f6 e005 | | Load 0x0,0x5
07f7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07f8 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
07f9 00da | | Load_Top At_Offset_2
07fa e5fe | | Load 0x2,-0x2
07fb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07fc 01d7 | | Execute Vector,Field_Read
07fd e402 | | Load 0x2,0x2
07fe e005 | | Load 0x0,0x5
07ff 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0800 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0801 c405 | | Store 0x2,0x5
0802 c406 | | Store 0x2,0x6
0803 e406 | | Load 0x2,0x6
0804 7002 |p | Jump_Nonzero 0x807
0805 8409 | | Call 0x2,0x9
0806 7803 |x | Jump 0x80a
0807 e406 | | Load 0x2,0x6
0808 e407 | | Load 0x2,0x7
0809 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
080a 00c8 | | Action Pop_Auxiliary_Range
080b 3fd4 |? | Loop_Increasing 0x7e0
080c 00ce | | Action Pop_Auxiliary
080d 00d9 | | Load_Top At_Offset_1
080e 0aff | | Execute_Immediate Plus,-0x1
080f e005 | | Load 0x0,0x5
0810 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0811 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0812 1c08 | | Execute_Immediate Run_Utility,0x8
0813 4801 |H | Short_Literal 0x1
0814 00db | | Load_Top At_Offset_3
0815 0aff | | Execute_Immediate Plus,-0x1
0816 e407 | | Load 0x2,0x7
0817 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0818 01cf | | Execute Vector,Slice_Read
0819 00d9 | | Load_Top At_Offset_1
081a 00d8 | | Load_Top At_Offset_0
081b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
081c 00da | | Load_Top At_Offset_2
081d 01da | | Execute Vector,Bounds
081e 00da | | Load_Top At_Offset_2
081f 01da | | Execute Vector,Bounds
0820 00da | | Load_Top At_Offset_2
0821 027f | | Execute Discrete,Equal
0822 7001 |p | Jump_Nonzero 0x824
0823 08e0 | | Execute_Immediate Raise,0xe0
0824 00cd | | Action Spare6_Action
0825 027f | | Execute Discrete,Equal
0826 7001 |p | Jump_Nonzero 0x828
0827 08e0 | | Execute_Immediate Raise,0xe0
0828 00d2 | | Pop_Control Pop_Count_2
0829 00d9 | | Load_Top At_Offset_1
082a 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
082b 00db | | Load_Top At_Offset_3
082c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
082d 00d9 | | Load_Top At_Offset_1
082e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
082f 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0840 | @ | .CONST 0x0840 ; Address of begin
0831 0004 | | .CONST 0x0004 ; Address of exception handler
0832 0005 | | .CONST 0x0005 ; Number of locals
0833 INIT_0830:
0833 e005 | | Load 0x0,0x5
0834 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0835 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0836 e014 | | Load 0x0,0x14
0837 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0838 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0839 4800 |H | Short_Literal 0x0
083a e005 | | Load 0x0,0x5
083b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
083c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
083d 1c08 | | Execute_Immediate Run_Utility,0x8
083e 029f 12bb | | Declare_Subprogram INIT_12b8,For_Call
0840 BODY_0830:
0840 00da | | Load_Top At_Offset_2
0841 e005 | | Load 0x0,0x5
0842 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0843 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0844 e5ff | | Load 0x2,-0x1
0845 e005 | | Load 0x0,0x5
0846 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0847 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0848 c402 | | Store 0x2,0x2
0849 005b | [ | Store_Top Discrete,At_Offset_3
084a 00da | | Load_Top At_Offset_2
084b 6805 |h | Jump_Zero 0x851
084c 00da | | Load_Top At_Offset_2
084d 00da | | Load_Top At_Offset_2
084e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
084f 00d9 | | Load_Top At_Offset_1
0850 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0851 8405 | | Call 0x2,0x5
0852 0831 | 1 | Execute_Immediate Raise,0x31
0853 0000 0000 | | .BLANK 0000[0x5]
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 0865 | e | .CONST 0x0865 ; Address of begin
0859 0004 | | .CONST 0x0004 ; Address of exception handler
085a 0004 | | .CONST 0x0004 ; Number of locals
085b INIT_0858:
085b 00db | | Load_Top At_Offset_3
085c 8230 | 0 | Call 0x1,0x30
085d e005 | | Load 0x0,0x5
085e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
085f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0860 1c08 | | Execute_Immediate Run_Utility,0x8
0861 00e3 | | Load_Encached Natural_Cache
0862 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0863 029f 12d3 | | Declare_Subprogram INIT_12d0,For_Call
0865 BODY_0858:
0865 e5ff | | Load 0x2,-0x1
0866 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0867 00db | | Load_Top At_Offset_3
0868 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0869 00cf | | Action Mark_Auxiliary
086a e5ff | | Load 0x2,-0x1
086b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
086c 01d9 | | Execute Vector,Reverse_Bounds
086d 0263 | c | Execute Discrete,Above_Bound
086e 7003 |p | Jump_Nonzero 0x872
086f 8404 | | Call 0x2,0x4
0870 00c8 | | Action Pop_Auxiliary_Range
0871 3ffd |? | Loop_Increasing 0x86f
0872 00ce | | Action Pop_Auxiliary
0873 00d9 | | Load_Top At_Offset_1
0874 0aff | | Execute_Immediate Plus,-0x1
0875 e005 | | Load 0x0,0x5
0876 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0877 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0878 1c08 | | Execute_Immediate Run_Utility,0x8
0879 4801 |H | Short_Literal 0x1
087a 00db | | Load_Top At_Offset_3
087b 0aff | | Execute_Immediate Plus,-0x1
087c e402 | | Load 0x2,0x2
087d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
087e 01cf | | Execute Vector,Slice_Read
087f 00d9 | | Load_Top At_Offset_1
0880 00d8 | | Load_Top At_Offset_0
0881 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0882 00da | | Load_Top At_Offset_2
0883 01da | | Execute Vector,Bounds
0884 00da | | Load_Top At_Offset_2
0885 01da | | Execute Vector,Bounds
0886 00da | | Load_Top At_Offset_2
0887 027f | | Execute Discrete,Equal
0888 7001 |p | Jump_Nonzero 0x88a
0889 08e0 | | Execute_Immediate Raise,0xe0
088a 00cd | | Action Spare6_Action
088b 027f | | Execute Discrete,Equal
088c 7001 |p | Jump_Nonzero 0x88e
088d 08e0 | | Execute_Immediate Raise,0xe0
088e 00d2 | | Pop_Control Pop_Count_2
088f 00d9 | | Load_Top At_Offset_1
0890 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0891 00db | | Load_Top At_Offset_3
0892 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0893 00d9 | | Load_Top At_Offset_1
0894 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0895 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0896 0000 0000 | | .XXX[0x2]
0898 ; --------------------------------------------------------------------------------------
0898 ; SUBPROGRAM
0898 ; --------------------------------------------------------------------------------------
0898 089b | | .CONST 0x089b ; Address of begin
0899 0004 | | .CONST 0x0004 ; Address of exception handler
089a 0001 | | .CONST 0x0001 ; Number of locals
089b BODY_0898:
089b INIT_0898:
089b 00da | | Load_Top At_Offset_2
089c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
089d 7002 |p | Jump_Nonzero 0x8a0
089e 00da | | Load_Top At_Offset_2
089f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
08a0 00cf | | Action Mark_Auxiliary
08a1 00db | | Load_Top At_Offset_3
08a2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08a3 01d9 | | Execute Vector,Reverse_Bounds
08a4 0263 | c | Execute Discrete,Above_Bound
08a5 700b |p | Jump_Nonzero 0x8b1
08a6 4800 |H | Short_Literal 0x0
08a7 4801 |H | Short_Literal 0x1
08a8 00da | | Load_Top At_Offset_2
08a9 e5ff | | Load 0x2,-0x1
08aa 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08ab 01d7 | | Execute Vector,Field_Read
08ac e5fd | | Load 0x2,-0x3
08ad e22a | * | Load 0x1,0x2a
08ae 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08af 00c8 | | Action Pop_Auxiliary_Range
08b0 3ff5 |? | Loop_Increasing 0x8a6
08b1 00ce | | Action Pop_Auxiliary
08b2 e5fd | | Load 0x2,-0x3
08b3 e5fe | | Load 0x2,-0x2
08b4 4801 |H | Short_Literal 0x1
08b5 e5fd | | Load 0x2,-0x3
08b6 e5fe | | Load 0x2,-0x2
08b7 e5ff | | Load 0x2,-0x1
08b8 8237 | 7 | Call 0x1,0x37
08b9 8238 | 8 | Call 0x1,0x38
08ba 00db | | Load_Top At_Offset_3
08bb 822e | . | Call 0x1,0x2e
08bc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
08bd 0000 0000 | | .XXX[0x3]
08bf 0000 | |
08c0 ; --------------------------------------------------------------------------------------
08c0 ; SUBPROGRAM
08c0 ; --------------------------------------------------------------------------------------
08c0 08d2 | | .CONST 0x08d2 ; Address of begin
08c1 0004 | | .CONST 0x0004 ; Address of exception handler
08c2 0006 | | .CONST 0x0006 ; Number of locals
08c3 INIT_08c0:
08c3 00db | | Load_Top At_Offset_3
08c4 8230 | 0 | Call 0x1,0x30
08c5 e005 | | Load 0x0,0x5
08c6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08c7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08c8 1c08 | | Execute_Immediate Run_Utility,0x8
08c9 00e3 | | Load_Encached Natural_Cache
08ca 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
08cb e005 | | Load 0x0,0x5
08cc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ce 029f 1303 | | Declare_Subprogram INIT_1300,For_Call
08d0 029f 1323 | #| Declare_Subprogram INIT_1320,For_Call
08d2 BODY_08c0:
08d2 00cf | | Action Mark_Auxiliary
08d3 e5ff | | Load 0x2,-0x1
08d4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08d5 01d9 | | Execute Vector,Reverse_Bounds
08d6 0263 | c | Execute Discrete,Above_Bound
08d7 7021 |p! | Jump_Nonzero 0x8f9
08d8 00d8 | | Load_Top At_Offset_0
08d9 e5ff | | Load 0x2,-0x1
08da 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08db 01d7 | | Execute Vector,Field_Read
08dc e403 | | Load 0x2,0x3
08dd e402 | | Load 0x2,0x2
08de 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08df 01d6 | | Execute Vector,Field_Write
08e0 e403 | | Load 0x2,0x3
08e1 0a01 | | Execute_Immediate Plus,0x1
08e2 c403 | | Store 0x2,0x3
08e3 00d8 | | Load_Top At_Offset_0
08e4 e5ff | | Load 0x2,-0x1
08e5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08e6 01d7 | | Execute Vector,Field_Read
08e7 e005 | | Load 0x0,0x5
08e8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08e9 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
08ea a404 | | Store_Unchecked 0x2,0x4
08eb e404 | | Load 0x2,0x4
08ec e005 | | Load 0x0,0x5
08ed 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08ee 180f | | Execute Package,Field_Execute,Field_Number 0xf
08ef 7007 |p | Jump_Nonzero 0x8f7
08f0 e404 | | Load 0x2,0x4
08f1 8405 | | Call 0x2,0x5
08f2 e404 | | Load 0x2,0x4
08f3 e005 | | Load 0x0,0x5
08f4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08f5 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
08f6 8406 | | Call 0x2,0x6
08f7 00c8 | | Action Pop_Auxiliary_Range
08f8 3fdf |? | Loop_Increasing 0x8d8
08f9 00ce | | Action Pop_Auxiliary
08fa 00db | | Load_Top At_Offset_3
08fb 0aff | | Execute_Immediate Plus,-0x1
08fc e005 | | Load 0x0,0x5
08fd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08fe 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08ff 1c08 | | Execute_Immediate Run_Utility,0x8
0900 e5ff | | Load 0x2,-0x1
0901 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0902 00d9 | | Load_Top At_Offset_1
0903 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0904 4801 |H | Short_Literal 0x1
0905 e403 | | Load 0x2,0x3
0906 0aff | | Execute_Immediate Plus,-0x1
0907 e402 | | Load 0x2,0x2
0908 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0909 01cf | | Execute Vector,Slice_Read
090a 00d9 | | Load_Top At_Offset_1
090b 00d8 | | Load_Top At_Offset_0
090c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
090d 00da | | Load_Top At_Offset_2
090e 01da | | Execute Vector,Bounds
090f 00da | | Load_Top At_Offset_2
0910 01da | | Execute Vector,Bounds
0911 00da | | Load_Top At_Offset_2
0912 027f | | Execute Discrete,Equal
0913 7001 |p | Jump_Nonzero 0x915
0914 08e0 | | Execute_Immediate Raise,0xe0
0915 00cd | | Action Spare6_Action
0916 027f | | Execute Discrete,Equal
0917 7001 |p | Jump_Nonzero 0x919
0918 08e0 | | Execute_Immediate Raise,0xe0
0919 00d2 | | Pop_Control Pop_Count_2
091a 00d9 | | Load_Top At_Offset_1
091b 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
091c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
091d 0000 0000 | | .XXX[0x3]
091f 0000 | |
0920 ; --------------------------------------------------------------------------------------
0920 ; SUBPROGRAM
0920 ; --------------------------------------------------------------------------------------
0920 0938 | 8 | .CONST 0x0938 ; Address of begin
0921 0004 | | .CONST 0x0004 ; Address of exception handler
0922 0006 | | .CONST 0x0006 ; Number of locals
0923 INIT_0920:
0923 e005 | | Load 0x0,0x5
0924 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0925 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0926 00db | | Load_Top At_Offset_3
0927 e005 | | Load 0x0,0x5
0928 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0929 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
092a 00d8 | | Load_Top At_Offset_0
092b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
092c 0a01 | | Execute_Immediate Plus,0x1
092d e005 | | Load 0x0,0x5
092e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
092f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0930 1c08 | | Execute_Immediate Run_Utility,0x8
0931 00e3 | | Load_Encached Natural_Cache
0932 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0933 e005 | | Load 0x0,0x5
0934 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0935 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0936 029f 1343 | C| Declare_Subprogram INIT_1340,For_Call
0938 BODY_0920:
0938 4800 |H | Short_Literal 0x0
0939 e403 | | Load 0x2,0x3
093a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
093b 00cf | | Action Mark_Auxiliary
093c e402 | | Load 0x2,0x2
093d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
093e 01d9 | | Execute Vector,Reverse_Bounds
093f 0263 | c | Execute Discrete,Above_Bound
0940 703d |p= | Jump_Nonzero 0x97e
0941 00d8 | | Load_Top At_Offset_0
0942 e402 | | Load 0x2,0x2
0943 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0944 01d7 | | Execute Vector,Field_Read
0945 8406 | | Call 0x2,0x6
0946 a405 | | Store_Unchecked 0x2,0x5
0947 e405 | | Load 0x2,0x5
0948 e005 | | Load 0x0,0x5
0949 1b14 | | Execute Package,Field_Read,Field_Number 0x14
094a 180f | | Execute Package,Field_Execute,Field_Number 0xf
094b 681b |h | Jump_Zero 0x967
094c 4801 |H | Short_Literal 0x1
094d 4802 |H | Short_Literal 0x2
094e e012 | | Load 0x0,0x12
094f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0950 0334 | 4 | Declare_Variable Array,With_Constraint
0951 00d9 | | Load_Top At_Offset_1
0952 e402 | | Load 0x2,0x2
0953 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0954 01d7 | | Execute Vector,Field_Read
0955 e005 | | Load 0x0,0x5
0956 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0957 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0958 4801 |H | Short_Literal 0x1
0959 00da | | Load_Top At_Offset_2
095a 01d6 | | Execute Vector,Field_Write
095b e5fd | | Load 0x2,-0x3
095c e013 | | Load 0x0,0x13
095d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
095e 4802 |H | Short_Literal 0x2
095f 00da | | Load_Top At_Offset_2
0960 01d6 | | Execute Vector,Field_Write
0961 606a |`j | Indirect_Literal Discrete,0x9cc,{0x00000000, 0x0000380a}
0962 e014 | | Load 0x0,0x14
0963 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0964 e403 | | Load 0x2,0x3
0965 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0966 7815 |x | Jump 0x97c
0967 e405 | | Load 0x2,0x5
0968 e5fb | | Load 0x2,-0x5
0969 e5fc | | Load 0x2,-0x4
096a 8232 | 2 | Call 0x1,0x32
096b 7010 |p | Jump_Nonzero 0x97c
096c e405 | | Load 0x2,0x5
096d e404 | | Load 0x2,0x4
096e e403 | | Load 0x2,0x3
096f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0970 01d6 | | Execute Vector,Field_Write
0971 e404 | | Load 0x2,0x4
0972 0a01 | | Execute_Immediate Plus,0x1
0973 c404 | | Store 0x2,0x4
0974 e5fb | | Load 0x2,-0x5
0975 6806 |h | Jump_Zero 0x97c
0976 4801 |H | Short_Literal 0x1
0977 4801 |H | Short_Literal 0x1
0978 e405 | | Load 0x2,0x5
0979 e5fc | | Load 0x2,-0x4
097a e22a | * | Load 0x1,0x2a
097b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
097c 00c8 | | Action Pop_Auxiliary_Range
097d 3fc3 |? | Loop_Increasing 0x941
097e 00ce | | Action Pop_Auxiliary
097f e5fe | | Load 0x2,-0x2
0980 6826 |h& | Jump_Zero 0x9a7
0981 e5fc | | Load 0x2,-0x4
0982 e5fd | | Load 0x2,-0x3
0983 e404 | | Load 0x2,0x4
0984 0aff | | Execute_Immediate Plus,-0x1
0985 e005 | | Load 0x0,0x5
0986 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0987 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0988 1c08 | | Execute_Immediate Run_Utility,0x8
0989 4801 |H | Short_Literal 0x1
098a e404 | | Load 0x2,0x4
098b 0aff | | Execute_Immediate Plus,-0x1
098c e403 | | Load 0x2,0x3
098d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
098e 01cf | | Execute Vector,Slice_Read
098f 00d9 | | Load_Top At_Offset_1
0990 00d8 | | Load_Top At_Offset_0
0991 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0992 00da | | Load_Top At_Offset_2
0993 01da | | Execute Vector,Bounds
0994 00da | | Load_Top At_Offset_2
0995 01da | | Execute Vector,Bounds
0996 00da | | Load_Top At_Offset_2
0997 027f | | Execute Discrete,Equal
0998 7001 |p | Jump_Nonzero 0x99a
0999 08e0 | | Execute_Immediate Raise,0xe0
099a 00cd | | Action Spare6_Action
099b 027f | | Execute Discrete,Equal
099c 7001 |p | Jump_Nonzero 0x99e
099d 08e0 | | Execute_Immediate Raise,0xe0
099e 00d2 | | Pop_Control Pop_Count_2
099f 00d9 | | Load_Top At_Offset_1
09a0 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
09a1 e403 | | Load 0x2,0x3
09a2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09a3 00d9 | | Load_Top At_Offset_1
09a4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09a5 8239 | 9 | Call 0x1,0x39
09a6 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
09a7 00da | | Load_Top At_Offset_2
09a8 0aff | | Execute_Immediate Plus,-0x1
09a9 e005 | | Load 0x0,0x5
09aa 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09ab 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09ac 1c08 | | Execute_Immediate Run_Utility,0x8
09ad 4801 |H | Short_Literal 0x1
09ae e404 | | Load 0x2,0x4
09af 0aff | | Execute_Immediate Plus,-0x1
09b0 e403 | | Load 0x2,0x3
09b1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09b2 01cf | | Execute Vector,Slice_Read
09b3 00d9 | | Load_Top At_Offset_1
09b4 00d8 | | Load_Top At_Offset_0
09b5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09b6 00da | | Load_Top At_Offset_2
09b7 01da | | Execute Vector,Bounds
09b8 00da | | Load_Top At_Offset_2
09b9 01da | | Execute Vector,Bounds
09ba 00da | | Load_Top At_Offset_2
09bb 027f | | Execute Discrete,Equal
09bc 7001 |p | Jump_Nonzero 0x9be
09bd 08e0 | | Execute_Immediate Raise,0xe0
09be 00cd | | Action Spare6_Action
09bf 027f | | Execute Discrete,Equal
09c0 7001 |p | Jump_Nonzero 0x9c2
09c1 08e0 | | Execute_Immediate Raise,0xe0
09c2 00d2 | | Pop_Control Pop_Count_2
09c3 00d9 | | Load_Top At_Offset_1
09c4 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
09c5 e403 | | Load 0x2,0x3
09c6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09c7 00d9 | | Load_Top At_Offset_1
09c8 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09c9 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
09ca 0000 0000 | | .XXX[0x2]
09cc 0000 0000 | | .LITERAL {0x00000000, 0x0000380a}
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09dd | | .CONST 0x09dd ; Address of begin
09d1 0004 | | .CONST 0x0004 ; Address of exception handler
09d2 0004 | | .CONST 0x0004 ; Number of locals
09d3 INIT_09d0:
09d3 e5fd | | Load 0x2,-0x3
09d4 8230 | 0 | Call 0x1,0x30
09d5 e005 | | Load 0x0,0x5
09d6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09d7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09d8 1c08 | | Execute_Immediate Run_Utility,0x8
09d9 00e3 | | Load_Encached Natural_Cache
09da 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
09db 029f 135b | [| Declare_Subprogram INIT_1358,For_Call
09dd BODY_09d0:
09dd e5ff | | Load 0x2,-0x1
09de 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09df 00db | | Load_Top At_Offset_3
09e0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09e1 00cf | | Action Mark_Auxiliary
09e2 e5ff | | Load 0x2,-0x1
09e3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09e4 01d9 | | Execute Vector,Reverse_Bounds
09e5 0263 | c | Execute Discrete,Above_Bound
09e6 7003 |p | Jump_Nonzero 0x9ea
09e7 8404 | | Call 0x2,0x4
09e8 00c8 | | Action Pop_Auxiliary_Range
09e9 3ffd |? | Loop_Increasing 0x9e7
09ea 00ce | | Action Pop_Auxiliary
09eb e5fe | | Load 0x2,-0x2
09ec 6826 |h& | Jump_Zero 0xa13
09ed e5fc | | Load 0x2,-0x4
09ee e5fd | | Load 0x2,-0x3
09ef 00db | | Load_Top At_Offset_3
09f0 0aff | | Execute_Immediate Plus,-0x1
09f1 e005 | | Load 0x0,0x5
09f2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09f3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09f4 1c08 | | Execute_Immediate Run_Utility,0x8
09f5 4801 |H | Short_Literal 0x1
09f6 e403 | | Load 0x2,0x3
09f7 0aff | | Execute_Immediate Plus,-0x1
09f8 e402 | | Load 0x2,0x2
09f9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09fa 01cf | | Execute Vector,Slice_Read
09fb 00d9 | | Load_Top At_Offset_1
09fc 00d8 | | Load_Top At_Offset_0
09fd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09fe 00da | | Load_Top At_Offset_2
09ff 01da | | Execute Vector,Bounds
0a00 00da | | Load_Top At_Offset_2
0a01 01da | | Execute Vector,Bounds
0a02 00da | | Load_Top At_Offset_2
0a03 027f | | Execute Discrete,Equal
0a04 7001 |p | Jump_Nonzero 0xa06
0a05 08e0 | | Execute_Immediate Raise,0xe0
0a06 00cd | | Action Spare6_Action
0a07 027f | | Execute Discrete,Equal
0a08 7001 |p | Jump_Nonzero 0xa0a
0a09 08e0 | | Execute_Immediate Raise,0xe0
0a0a 00d2 | | Pop_Control Pop_Count_2
0a0b 00d9 | | Load_Top At_Offset_1
0a0c 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0a0d e402 | | Load 0x2,0x2
0a0e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a0f 00d9 | | Load_Top At_Offset_1
0a10 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a11 8239 | 9 | Call 0x1,0x39
0a12 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0a13 00d9 | | Load_Top At_Offset_1
0a14 0aff | | Execute_Immediate Plus,-0x1
0a15 e005 | | Load 0x0,0x5
0a16 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a17 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a18 1c08 | | Execute_Immediate Run_Utility,0x8
0a19 4801 |H | Short_Literal 0x1
0a1a 00db | | Load_Top At_Offset_3
0a1b 0aff | | Execute_Immediate Plus,-0x1
0a1c e402 | | Load 0x2,0x2
0a1d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a1e 01cf | | Execute Vector,Slice_Read
0a1f 00d9 | | Load_Top At_Offset_1
0a20 00d8 | | Load_Top At_Offset_0
0a21 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a22 00da | | Load_Top At_Offset_2
0a23 01da | | Execute Vector,Bounds
0a24 00da | | Load_Top At_Offset_2
0a25 01da | | Execute Vector,Bounds
0a26 00da | | Load_Top At_Offset_2
0a27 027f | | Execute Discrete,Equal
0a28 7001 |p | Jump_Nonzero 0xa2a
0a29 08e0 | | Execute_Immediate Raise,0xe0
0a2a 00cd | | Action Spare6_Action
0a2b 027f | | Execute Discrete,Equal
0a2c 7001 |p | Jump_Nonzero 0xa2e
0a2d 08e0 | | Execute_Immediate Raise,0xe0
0a2e 00d2 | | Pop_Control Pop_Count_2
0a2f 00d9 | | Load_Top At_Offset_1
0a30 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0a31 00db | | Load_Top At_Offset_3
0a32 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a33 00d9 | | Load_Top At_Offset_1
0a34 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a35 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0a36 0000 0000 | | .XXX[0x2]
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a4d | M | .CONST 0x0a4d ; Address of begin
0a39 0004 | | .CONST 0x0004 ; Address of exception handler
0a3a 0007 | | .CONST 0x0007 ; Number of locals
0a3b INIT_0a38:
0a3b 00db | | Load_Top At_Offset_3
0a3c 8230 | 0 | Call 0x1,0x30
0a3d e005 | | Load 0x0,0x5
0a3e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a3f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a40 1c08 | | Execute_Immediate Run_Utility,0x8
0a41 00e3 | | Load_Encached Natural_Cache
0a42 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0a43 e005 | | Load 0x0,0x5
0a44 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a45 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a46 e005 | | Load 0x0,0x5
0a47 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a48 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a49 029f 138b | | Declare_Subprogram INIT_1388,For_Call
0a4b 029f 13db | | Declare_Subprogram INIT_13d8,For_Call
0a4d BODY_0a38:
0a4d 4800 |H | Short_Literal 0x0
0a4e e402 | | Load 0x2,0x2
0a4f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a50 00cf | | Action Mark_Auxiliary
0a51 e5ff | | Load 0x2,-0x1
0a52 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a53 01d9 | | Execute Vector,Reverse_Bounds
0a54 0263 | c | Execute Discrete,Above_Bound
0a55 702e |p. | Jump_Nonzero 0xa84
0a56 00d8 | | Load_Top At_Offset_0
0a57 e5ff | | Load 0x2,-0x1
0a58 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a59 01d7 | | Execute Vector,Field_Read
0a5a a405 | | Store_Unchecked 0x2,0x5
0a5b 00cf | | Action Mark_Auxiliary
0a5c 7811 |x | Jump 0xa6e
0a5d e405 | | Load 0x2,0x5
0a5e e005 | | Load 0x0,0x5
0a5f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a60 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a61 a404 | | Store_Unchecked 0x2,0x4
0a62 e404 | | Load 0x2,0x4
0a63 e005 | | Load 0x0,0x5
0a64 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a65 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a66 7001 |p | Jump_Nonzero 0xa68
0a67 780b |x | Jump 0xa73
0a68 e405 | | Load 0x2,0x5
0a69 e005 | | Load 0x0,0x5
0a6a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a6b 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0a6c a405 | | Store_Unchecked 0x2,0x5
0a6d 00c9 | | Action Pop_Auxiliary_Loop
0a6e e405 | | Load 0x2,0x5
0a6f e005 | | Load 0x0,0x5
0a70 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a71 180f | | Execute Package,Field_Execute,Field_Number 0xf
0a72 6fea |o | Jump_Zero 0xa5d
0a73 00ce | | Action Pop_Auxiliary
0a74 e404 | | Load 0x2,0x4
0a75 e005 | | Load 0x0,0x5
0a76 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a77 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0a78 6808 |h | Jump_Zero 0xa81
0a79 4801 |H | Short_Literal 0x1
0a7a 4801 |H | Short_Literal 0x1
0a7b e404 | | Load 0x2,0x4
0a7c e5fd | | Load 0x2,-0x3
0a7d e22a | * | Load 0x1,0x2a
0a7e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a7f 8406 | | Call 0x2,0x6
0a80 7801 |x | Jump 0xa82
0a81 8407 | | Call 0x2,0x7
0a82 00c8 | | Action Pop_Auxiliary_Range
0a83 3fd2 |? | Loop_Increasing 0xa56
0a84 00ce | | Action Pop_Auxiliary
0a85 e403 | | Load 0x2,0x3
0a86 0aff | | Execute_Immediate Plus,-0x1
0a87 e005 | | Load 0x0,0x5
0a88 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a89 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a8a 1c08 | | Execute_Immediate Run_Utility,0x8
0a8b 4801 |H | Short_Literal 0x1
0a8c e403 | | Load 0x2,0x3
0a8d 0aff | | Execute_Immediate Plus,-0x1
0a8e e402 | | Load 0x2,0x2
0a8f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a90 01cf | | Execute Vector,Slice_Read
0a91 00d9 | | Load_Top At_Offset_1
0a92 00d8 | | Load_Top At_Offset_0
0a93 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a94 00da | | Load_Top At_Offset_2
0a95 01da | | Execute Vector,Bounds
0a96 00da | | Load_Top At_Offset_2
0a97 01da | | Execute Vector,Bounds
0a98 00da | | Load_Top At_Offset_2
0a99 027f | | Execute Discrete,Equal
0a9a 7001 |p | Jump_Nonzero 0xa9c
0a9b 08e0 | | Execute_Immediate Raise,0xe0
0a9c 00cd | | Action Spare6_Action
0a9d 027f | | Execute Discrete,Equal
0a9e 7001 |p | Jump_Nonzero 0xaa0
0a9f 08e0 | | Execute_Immediate Raise,0xe0
0aa0 00d2 | | Pop_Control Pop_Count_2
0aa1 00d9 | | Load_Top At_Offset_1
0aa2 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0aa3 e402 | | Load 0x2,0x2
0aa4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0aa5 00d9 | | Load_Top At_Offset_1
0aa6 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0aa7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; SUBPROGRAM
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0aab | | .CONST 0x0aab ; Address of begin
0aa9 0004 | | .CONST 0x0004 ; Address of exception handler
0aaa 0001 | | .CONST 0x0001 ; Number of locals
0aab BODY_0aa8:
0aab INIT_0aa8:
0aab 00da | | Load_Top At_Offset_2
0aac 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0aad 7002 |p | Jump_Nonzero 0xab0
0aae 00da | | Load_Top At_Offset_2
0aaf 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0ab0 00cf | | Action Mark_Auxiliary
0ab1 00db | | Load_Top At_Offset_3
0ab2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ab3 01d9 | | Execute Vector,Reverse_Bounds
0ab4 0263 | c | Execute Discrete,Above_Bound
0ab5 700b |p | Jump_Nonzero 0xac1
0ab6 4800 |H | Short_Literal 0x0
0ab7 4801 |H | Short_Literal 0x1
0ab8 00da | | Load_Top At_Offset_2
0ab9 e5ff | | Load 0x2,-0x1
0aba 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0abb 01d7 | | Execute Vector,Field_Read
0abc e5fc | | Load 0x2,-0x4
0abd e22a | * | Load 0x1,0x2a
0abe 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0abf 00c8 | | Action Pop_Auxiliary_Range
0ac0 3ff5 |? | Loop_Increasing 0xab6
0ac1 00ce | | Action Pop_Auxiliary
0ac2 e5fc | | Load 0x2,-0x4
0ac3 e5fd | | Load 0x2,-0x3
0ac4 e5fe | | Load 0x2,-0x2
0ac5 4801 |H | Short_Literal 0x1
0ac6 e5fc | | Load 0x2,-0x4
0ac7 e5fd | | Load 0x2,-0x3
0ac8 e5fe | | Load 0x2,-0x2
0ac9 e5ff | | Load 0x2,-0x1
0aca 823b | ; | Call 0x1,0x3b
0acb 823d | = | Call 0x1,0x3d
0acc 00db | | Load_Top At_Offset_3
0acd 822e | . | Call 0x1,0x2e
0ace 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0acf 0000 | | .XXX[0x1]
0ad0 ; --------------------------------------------------------------------------------------
0ad0 ; SUBPROGRAM
0ad0 ; --------------------------------------------------------------------------------------
0ad0 0ad3 | | .CONST 0x0ad3 ; Address of begin
0ad1 0004 | | .CONST 0x0004 ; Address of exception handler
0ad2 0001 | | .CONST 0x0001 ; Number of locals
0ad3 BODY_0ad0:
0ad3 INIT_0ad0:
0ad3 00da | | Load_Top At_Offset_2
0ad4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0ad5 7002 |p | Jump_Nonzero 0xad8
0ad6 00da | | Load_Top At_Offset_2
0ad7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ad8 00cf | | Action Mark_Auxiliary
0ad9 00db | | Load_Top At_Offset_3
0ada 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0adb 01d9 | | Execute Vector,Reverse_Bounds
0adc 0263 | c | Execute Discrete,Above_Bound
0add 700b |p | Jump_Nonzero 0xae9
0ade 4800 |H | Short_Literal 0x0
0adf 4801 |H | Short_Literal 0x1
0ae0 00da | | Load_Top At_Offset_2
0ae1 e5ff | | Load 0x2,-0x1
0ae2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ae3 01d7 | | Execute Vector,Field_Read
0ae4 e5fd | | Load 0x2,-0x3
0ae5 e22a | * | Load 0x1,0x2a
0ae6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ae7 00c8 | | Action Pop_Auxiliary_Range
0ae8 3ff5 |? | Loop_Increasing 0xade
0ae9 00ce | | Action Pop_Auxiliary
0aea e5fd | | Load 0x2,-0x3
0aeb e5fe | | Load 0x2,-0x2
0aec e5fd | | Load 0x2,-0x3
0aed e5fe | | Load 0x2,-0x2
0aee e5ff | | Load 0x2,-0x1
0aef 823c | < | Call 0x1,0x3c
0af0 823e | > | Call 0x1,0x3e
0af1 00db | | Load_Top At_Offset_3
0af2 822e | . | Call 0x1,0x2e
0af3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0af4 0000 0000 | | .BLANK 0000[0x4]
0af8 ; --------------------------------------------------------------------------------------
0af8 ; SUBPROGRAM
0af8 ; --------------------------------------------------------------------------------------
0af8 0b0f | | .CONST 0x0b0f ; Address of begin
0af9 0004 | | .CONST 0x0004 ; Address of exception handler
0afa 0005 | | .CONST 0x0005 ; Number of locals
0afb INIT_0af8:
0afb 00da | | Load_Top At_Offset_2
0afc e005 | | Load 0x0,0x5
0afd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0afe 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0aff e5fe | | Load 0x2,-0x2
0b00 e005 | | Load 0x0,0x5
0b01 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b02 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0b03 00d9 | | Load_Top At_Offset_1
0b04 e005 | | Load 0x0,0x5
0b05 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b06 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0b07 00e3 | | Load_Encached Natural_Cache
0b08 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0b09 00d9 | | Load_Top At_Offset_1
0b0a e005 | | Load 0x0,0x5
0b0b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b0c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0b0d 00e3 | | Load_Encached Natural_Cache
0b0e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0b0f BODY_0af8:
0b0f 00d9 | | Load_Top At_Offset_1
0b10 00d9 | | Load_Top At_Offset_1
0b11 027f | | Execute Discrete,Equal
0b12 680c |h | Jump_Zero 0xb1f
0b13 4800 |H | Short_Literal 0x0
0b14 00db | | Load_Top At_Offset_3
0b15 e005 | | Load 0x0,0x5
0b16 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b17 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0b18 e402 | | Load 0x2,0x2
0b19 e005 | | Load 0x0,0x5
0b1a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b1b 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0b1c e017 | | Load 0x0,0x17
0b1d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0b1e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b1f 00d9 | | Load_Top At_Offset_1
0b20 00d9 | | Load_Top At_Offset_1
0b21 027c | | | Execute Discrete,Less
0b22 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b23 0000 0000 | | .BLANK 0000[0x5]
0b28 ; --------------------------------------------------------------------------------------
0b28 ; SUBPROGRAM
0b28 ; --------------------------------------------------------------------------------------
0b28 0b5a | Z | .CONST 0x0b5a ; Address of begin
0b29 0c58 | X | .CONST 0x0c58 ; Address of exception handler
0b2a 0012 | | .CONST 0x0012 ; Number of locals
0b2b INIT_0b28:
0b2b e005 | | Load 0x0,0x5
0b2c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b2d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b2e e005 | | Load 0x0,0x5
0b2f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b30 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b31 e005 | | Load 0x0,0x5
0b32 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b33 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b34 e005 | | Load 0x0,0x5
0b35 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b36 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b37 e22b | + | Load 0x1,0x2b
0b38 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b39 e5ff | | Load 0x2,-0x1
0b3a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b3b 00e3 | | Load_Encached Natural_Cache
0b3c 03f1 | | Declare_Variable Discrete,With_Value
0b3d 00e3 | | Load_Encached Natural_Cache
0b3e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b3f e5fe | | Load 0x2,-0x2
0b40 e013 | | Load 0x0,0x13
0b41 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b42 e016 | | Load 0x0,0x16
0b43 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b44 4801 |H | Short_Literal 0x1
0b45 00d9 | | Load_Top At_Offset_1
0b46 01d7 | | Execute Vector,Field_Read
0b47 0007 | | Action Break_Optional
0b48 4802 |H | Short_Literal 0x2
0b49 00da | | Load_Top At_Offset_2
0b4a 01d7 | | Execute Vector,Field_Read
0b4b 0007 | | Action Break_Optional
0b4c 029f 140b | | Declare_Subprogram INIT_1408,For_Call
0b4e 029f 142b | +| Declare_Subprogram INIT_1428,For_Call
0b50 029f 143b | ;| Declare_Subprogram INIT_1438,For_Call
0b52 029f 1463 | c| Declare_Subprogram INIT_1460,For_Call
0b54 029f 14db | | Declare_Subprogram INIT_14d8,For_Call
0b56 029f 151b | | Declare_Subprogram INIT_1518,For_Call
0b58 029f 1553 | S| Declare_Subprogram INIT_1550,For_Call
0b5a BODY_0b28:
0b5a e22b | + | Load 0x1,0x2b
0b5b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b5c e011 | | Load 0x0,0x11
0b5d 180d | | Execute Package,Field_Execute,Field_Number 0xd
0b5e e22b | + | Load 0x1,0x2b
0b5f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b60 c406 | | Store 0x2,0x6
0b61 00cf | | Action Mark_Auxiliary
0b62 e5ff | | Load 0x2,-0x1
0b63 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b64 01d9 | | Execute Vector,Reverse_Bounds
0b65 0263 | c | Execute Discrete,Above_Bound
0b66 70c2 |p | Jump_Nonzero 0xc29
0b67 00d8 | | Load_Top At_Offset_0
0b68 e5ff | | Load 0x2,-0x1
0b69 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b6a 01d7 | | Execute Vector,Field_Read
0b6b 8410 | | Call 0x2,0x10
0b6c 68ba |h | Jump_Zero 0xc27
0b6d 00d8 | | Load_Top At_Offset_0
0b6e e5ff | | Load 0x2,-0x1
0b6f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b70 01d7 | | Execute Vector,Field_Read
0b71 e005 | | Load 0x0,0x5
0b72 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b73 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0b74 a403 | | Store_Unchecked 0x2,0x3
0b75 e403 | | Load 0x2,0x3
0b76 a405 | | Store_Unchecked 0x2,0x5
0b77 00cf | | Action Mark_Auxiliary
0b78 7811 |x | Jump 0xb8a
0b79 e405 | | Load 0x2,0x5
0b7a e005 | | Load 0x0,0x5
0b7b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b7c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0b7d a404 | | Store_Unchecked 0x2,0x4
0b7e e404 | | Load 0x2,0x4
0b7f e005 | | Load 0x0,0x5
0b80 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b81 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b82 7001 |p | Jump_Nonzero 0xb84
0b83 780b |x | Jump 0xb8f
0b84 e405 | | Load 0x2,0x5
0b85 e005 | | Load 0x0,0x5
0b86 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b87 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0b88 a405 | | Store_Unchecked 0x2,0x5
0b89 00c9 | | Action Pop_Auxiliary_Loop
0b8a e405 | | Load 0x2,0x5
0b8b e005 | | Load 0x0,0x5
0b8c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b8d 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b8e 6fea |o | Jump_Zero 0xb79
0b8f 00ce | | Action Pop_Auxiliary
0b90 e404 | | Load 0x2,0x4
0b91 e005 | | Load 0x0,0x5
0b92 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b93 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0b94 6813 |h | Jump_Zero 0xba8
0b95 e404 | | Load 0x2,0x4
0b96 840c | | Call 0x2,0xc
0b97 6810 |h | Jump_Zero 0xba8
0b98 e40a | | Load 0x2,0xa
0b99 6807 |h | Jump_Zero 0xba1
0b9a e403 | | Load 0x2,0x3
0b9b 00d8 | | Load_Top At_Offset_0
0b9c e005 | | Load 0x0,0x5
0b9d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b9e 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0b9f 021f | | Execute Heap_Access,Equal
0ba0 7002 |p | Jump_Nonzero 0xba3
0ba1 e40b | | Load 0x2,0xb
0ba2 6805 |h | Jump_Zero 0xba8
0ba3 e404 | | Load 0x2,0x4
0ba4 e005 | | Load 0x0,0x5
0ba5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ba6 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0ba7 a403 | | Store_Unchecked 0x2,0x3
0ba8 e403 | | Load 0x2,0x3
0ba9 e005 | | Load 0x0,0x5
0baa 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bab 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0bac 6877 |hw | Jump_Zero 0xc24
0bad e403 | | Load 0x2,0x3
0bae e005 | | Load 0x0,0x5
0baf 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bb0 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0bb1 a402 | | Store_Unchecked 0x2,0x2
0bb2 e402 | | Load 0x2,0x2
0bb3 e005 | | Load 0x0,0x5
0bb4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bb5 180f | | Execute Package,Field_Execute,Field_Number 0xf
0bb6 7069 |pi | Jump_Nonzero 0xc20
0bb7 e40a | | Load 0x2,0xa
0bb8 7002 |p | Jump_Nonzero 0xbbb
0bb9 e40b | | Load 0x2,0xb
0bba 6865 |he | Jump_Zero 0xc20
0bbb e5fd | | Load 0x2,-0x3
0bbc e402 | | Load 0x2,0x2
0bbd e005 | | Load 0x0,0x5
0bbe 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bbf 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0bc0 7022 |p" | Jump_Nonzero 0xbe3
0bc1 e406 | | Load 0x2,0x6
0bc2 e22b | + | Load 0x1,0x2b
0bc3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0bc4 4801 |H | Short_Literal 0x1
0bc5 4803 |H | Short_Literal 0x3
0bc6 e012 | | Load 0x0,0x12
0bc7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bc8 0334 | 4 | Declare_Variable Array,With_Constraint
0bc9 e402 | | Load 0x2,0x2
0bca e005 | | Load 0x0,0x5
0bcb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0bcc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bcd 4801 |H | Short_Literal 0x1
0bce 00da | | Load_Top At_Offset_2
0bcf 01d6 | | Execute Vector,Field_Write
0bd0 e5fe | | Load 0x2,-0x2
0bd1 e013 | | Load 0x0,0x13
0bd2 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0bd3 4802 |H | Short_Literal 0x2
0bd4 00da | | Load_Top At_Offset_2
0bd5 01d6 | | Execute Vector,Field_Write
0bd6 e5fd | | Load 0x2,-0x3
0bd7 e016 | | Load 0x0,0x16
0bd8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0bd9 4803 |H | Short_Literal 0x3
0bda 00da | | Load_Top At_Offset_2
0bdb 01d6 | | Execute Vector,Field_Write
0bdc 609b |` | Indirect_Literal Discrete,0xc78,{0x00000000, 0x00003810}
0bdd e014 | | Load 0x0,0x14
0bde 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bdf e5fc | | Load 0x2,-0x4
0be0 e015 | | Load 0x0,0x15
0be1 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0be2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0be3 e408 | | Load 0x2,0x8
0be4 0a01 | | Execute_Immediate Plus,0x1
0be5 c408 | | Store 0x2,0x8
0be6 e407 | | Load 0x2,0x7
0be7 00d9 | | Load_Top At_Offset_1
0be8 0273 | s | Execute Discrete,Plus
0be9 00d8 | | Load_Top At_Offset_0
0bea 00e3 | | Load_Encached Natural_Cache
0beb 0260 | ` | Execute Discrete,In_Type
0bec 7001 |p | Jump_Nonzero 0xbee
0bed 0801 | | Execute_Immediate Raise,0x1
0bee e404 | | Load 0x2,0x4
0bef 840d | | Call 0x2,0xd
0bf0 e407 | | Load 0x2,0x7
0bf1 00d9 | | Load_Top At_Offset_1
0bf2 0273 | s | Execute Discrete,Plus
0bf3 00d8 | | Load_Top At_Offset_0
0bf4 00e3 | | Load_Encached Natural_Cache
0bf5 0260 | ` | Execute Discrete,In_Type
0bf6 7001 |p | Jump_Nonzero 0xbf8
0bf7 0801 | | Execute_Immediate Raise,0x1
0bf8 e402 | | Load 0x2,0x2
0bf9 840d | | Call 0x2,0xd
0bfa e40b | | Load 0x2,0xb
0bfb 6802 |h | Jump_Zero 0xbfe
0bfc 8412 | | Call 0x2,0x12
0bfd 7829 |x) | Jump 0xc27
0bfe e5fd | | Load 0x2,-0x3
0bff e002 | | Load 0x0,0x2
0c00 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c01 4801 |H | Short_Literal 0x1
0c02 4803 |H | Short_Literal 0x3
0c03 e012 | | Load 0x0,0x12
0c04 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c05 0334 | 4 | Declare_Variable Array,With_Constraint
0c06 e404 | | Load 0x2,0x4
0c07 e005 | | Load 0x0,0x5
0c08 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c09 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c0a 4801 |H | Short_Literal 0x1
0c0b 00da | | Load_Top At_Offset_2
0c0c 01d6 | | Execute Vector,Field_Write
0c0d e404 | | Load 0x2,0x4
0c0e e005 | | Load 0x0,0x5
0c0f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c10 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c11 4802 |H | Short_Literal 0x2
0c12 00da | | Load_Top At_Offset_2
0c13 01d6 | | Execute Vector,Field_Write
0c14 e402 | | Load 0x2,0x2
0c15 e005 | | Load 0x0,0x5
0c16 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c17 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c18 4803 |H | Short_Literal 0x3
0c19 00da | | Load_Top At_Offset_2
0c1a 01d6 | | Execute Vector,Field_Write
0c1b 480c |H | Short_Literal 0xc
0c1c e5fc | | Load 0x2,-0x4
0c1d e015 | | Load 0x0,0x15
0c1e 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0c1f 7807 |x | Jump 0xc27
0c20 00d8 | | Load_Top At_Offset_0
0c21 e403 | | Load 0x2,0x3
0c22 840e | | Call 0x2,0xe
0c23 7803 |x | Jump 0xc27
0c24 00d8 | | Load_Top At_Offset_0
0c25 e403 | | Load 0x2,0x3
0c26 840e | | Call 0x2,0xe
0c27 00c8 | | Action Pop_Auxiliary_Range
0c28 3f3e |?> | Loop_Increasing 0xb67
0c29 00c9 | | Action Pop_Auxiliary_Loop
0c2a e5ff | | Load 0x2,-0x1
0c2b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c2c 01d9 | | Execute Vector,Reverse_Bounds
0c2d 0263 | c | Execute Discrete,Above_Bound
0c2e 7024 |p$ | Jump_Nonzero 0xc53
0c2f 00d8 | | Load_Top At_Offset_0
0c30 00d9 | | Load_Top At_Offset_1
0c31 e5ff | | Load 0x2,-0x1
0c32 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c33 01d7 | | Execute Vector,Field_Read
0c34 8411 | | Call 0x2,0x11
0c35 681b |h | Jump_Zero 0xc51
0c36 00d8 | | Load_Top At_Offset_0
0c37 e5ff | | Load 0x2,-0x1
0c38 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c39 01d7 | | Execute Vector,Field_Read
0c3a e005 | | Load 0x0,0x5
0c3b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c3c 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0c3d a403 | | Store_Unchecked 0x2,0x3
0c3e e5fd | | Load 0x2,-0x3
0c3f e002 | | Load 0x0,0x2
0c40 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c41 4801 |H | Short_Literal 0x1
0c42 4801 |H | Short_Literal 0x1
0c43 e012 | | Load 0x0,0x12
0c44 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c45 0334 | 4 | Declare_Variable Array,With_Constraint
0c46 e403 | | Load 0x2,0x3
0c47 e005 | | Load 0x0,0x5
0c48 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c49 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c4a 4801 |H | Short_Literal 0x1
0c4b 00da | | Load_Top At_Offset_2
0c4c 01d6 | | Execute Vector,Field_Write
0c4d 480f |H | Short_Literal 0xf
0c4e e5fc | | Load 0x2,-0x4
0c4f e015 | | Load 0x0,0x15
0c50 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0c51 00c8 | | Action Pop_Auxiliary_Range
0c52 3fdc |? | Loop_Increasing 0xc2f
0c53 00ce | | Action Pop_Auxiliary
0c54 e406 | | Load 0x2,0x6
0c55 e22b | + | Load 0x1,0x2b
0c56 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0c57 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c58 TRAP_0b28:
0c58 0007 | | Action Break_Optional
0c59 e406 | | Load 0x2,0x6
0c5a e22b | + | Load 0x1,0x2b
0c5b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0c5c 4801 |H | Short_Literal 0x1
0c5d 4802 |H | Short_Literal 0x2
0c5e e012 | | Load 0x0,0x12
0c5f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c60 0334 | 4 | Declare_Variable Array,With_Constraint
0c61 e5fe | | Load 0x2,-0x2
0c62 e013 | | Load 0x0,0x13
0c63 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c64 4801 |H | Short_Literal 0x1
0c65 00da | | Load_Top At_Offset_2
0c66 01d6 | | Execute Vector,Field_Write
0c67 e5fd | | Load 0x2,-0x3
0c68 e016 | | Load 0x0,0x16
0c69 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0c6a 4802 |H | Short_Literal 0x2
0c6b 00da | | Load_Top At_Offset_2
0c6c 01d6 | | Execute Vector,Field_Write
0c6d 6006 |` | Indirect_Literal Discrete,0xc74,{0x00000000, 0x0000380e}
0c6e e014 | | Load 0x0,0x14
0c6f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c70 e5fc | | Load 0x2,-0x4
0c71 e015 | | Load 0x0,0x15
0c72 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0c73 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c74 0000 0000 | | .LITERAL {0x00000000, 0x0000380e}
0c78 0000 0000 | | .LITERAL {0x00000000, 0x00003810}
0c7c 0000 0000 | | .BLANK 0000[0x4]
0c80 ; --------------------------------------------------------------------------------------
0c80 ; SUBPROGRAM
0c80 ; --------------------------------------------------------------------------------------
0c80 0c89 | | .CONST 0x0c89 ; Address of begin
0c81 0004 | | .CONST 0x0004 ; Address of exception handler
0c82 0003 | | .CONST 0x0003 ; Number of locals
0c83 INIT_0c80:
0c83 00db | | Load_Top At_Offset_3
0c84 00db | | Load_Top At_Offset_3
0c85 e013 | | Load 0x0,0x13
0c86 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0c87 e015 | | Load 0x0,0x15
0c88 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0c89 BODY_0c80:
0c89 00d9 | | Load_Top At_Offset_1
0c8a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0c8b 7001 |p | Jump_Nonzero 0xc8d
0c8c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c8d e5fd | | Load 0x2,-0x3
0c8e e002 | | Load 0x0,0x2
0c8f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c90 4801 |H | Short_Literal 0x1
0c91 4801 |H | Short_Literal 0x1
0c92 e012 | | Load 0x0,0x12
0c93 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c94 0334 | 4 | Declare_Variable Array,With_Constraint
0c95 e5fe | | Load 0x2,-0x2
0c96 e005 | | Load 0x0,0x5
0c97 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c98 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0c99 4801 |H | Short_Literal 0x1
0c9a 00da | | Load_Top At_Offset_2
0c9b 01d6 | | Execute Vector,Field_Write
0c9c 4807 |H | Short_Literal 0x7
0c9d e403 | | Load 0x2,0x3
0c9e e015 | | Load 0x0,0x15
0c9f 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0ca0 00d8 | | Load_Top At_Offset_0
0ca1 e5fd | | Load 0x2,-0x3
0ca2 e5ff | | Load 0x2,-0x1
0ca3 e402 | | Load 0x2,0x2
0ca4 8247 | G | Call 0x1,0x47
0ca5 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0ca6 00d8 | | Load_Top At_Offset_0
0ca7 e015 | | Load 0x0,0x15
0ca8 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0ca9 0e01 | | Execute_Immediate Not_Equal,0x1
0caa 6812 |h | Jump_Zero 0xcbd
0cab e5fd | | Load 0x2,-0x3
0cac e002 | | Load 0x0,0x2
0cad 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0cae 4801 |H | Short_Literal 0x1
0caf 4801 |H | Short_Literal 0x1
0cb0 e012 | | Load 0x0,0x12
0cb1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cb2 0334 | 4 | Declare_Variable Array,With_Constraint
0cb3 00db | | Load_Top At_Offset_3
0cb4 e015 | | Load 0x0,0x15
0cb5 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0cb6 4801 |H | Short_Literal 0x1
0cb7 00da | | Load_Top At_Offset_2
0cb8 01d6 | | Execute Vector,Field_Write
0cb9 4803 |H | Short_Literal 0x3
0cba e5fc | | Load 0x2,-0x4
0cbb e015 | | Load 0x0,0x15
0cbc 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0cbd 00d8 | | Load_Top At_Offset_0
0cbe e015 | | Load 0x0,0x15
0cbf 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0cc0 7006 |p | Jump_Nonzero 0xcc7
0cc1 00d8 | | Load_Top At_Offset_0
0cc2 e015 | | Load 0x0,0x15
0cc3 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0cc4 e5fc | | Load 0x2,-0x4
0cc5 e015 | | Load 0x0,0x15
0cc6 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0cc7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0cc8 ; --------------------------------------------------------------------------------------
0cc8 ; SUBPROGRAM
0cc8 ; --------------------------------------------------------------------------------------
0cc8 0cd1 | | .CONST 0x0cd1 ; Address of begin
0cc9 0004 | | .CONST 0x0004 ; Address of exception handler
0cca 0003 | | .CONST 0x0003 ; Number of locals
0ccb INIT_0cc8:
0ccb 00db | | Load_Top At_Offset_3
0ccc 00db | | Load_Top At_Offset_3
0ccd e013 | | Load 0x0,0x13
0cce 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ccf e015 | | Load 0x0,0x15
0cd0 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0cd1 BODY_0cc8:
0cd1 00d9 | | Load_Top At_Offset_1
0cd2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0cd3 7001 |p | Jump_Nonzero 0xcd5
0cd4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0cd5 e5fd | | Load 0x2,-0x3
0cd6 e002 | | Load 0x0,0x2
0cd7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0cd8 4801 |H | Short_Literal 0x1
0cd9 4801 |H | Short_Literal 0x1
0cda e012 | | Load 0x0,0x12
0cdb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cdc 0334 | 4 | Declare_Variable Array,With_Constraint
0cdd e5fe | | Load 0x2,-0x2
0cde e005 | | Load 0x0,0x5
0cdf 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0ce0 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0ce1 4801 |H | Short_Literal 0x1
0ce2 00da | | Load_Top At_Offset_2
0ce3 01d6 | | Execute Vector,Field_Write
0ce4 4807 |H | Short_Literal 0x7
0ce5 e403 | | Load 0x2,0x3
0ce6 e015 | | Load 0x0,0x15
0ce7 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0ce8 00cf | | Action Mark_Auxiliary
0ce9 00da | | Load_Top At_Offset_2
0cea 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ceb 01d9 | | Execute Vector,Reverse_Bounds
0cec 0263 | c | Execute Discrete,Above_Bound
0ced 7020 |p | Jump_Nonzero 0xd0e
0cee 00d8 | | Load_Top At_Offset_0
0cef e402 | | Load 0x2,0x2
0cf0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0cf1 01d7 | | Execute Vector,Field_Read
0cf2 e005 | | Load 0x0,0x5
0cf3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0cf4 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0cf5 7016 |p | Jump_Nonzero 0xd0c
0cf6 e5fd | | Load 0x2,-0x3
0cf7 e002 | | Load 0x0,0x2
0cf8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0cf9 4801 |H | Short_Literal 0x1
0cfa 4801 |H | Short_Literal 0x1
0cfb e012 | | Load 0x0,0x12
0cfc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cfd 0334 | 4 | Declare_Variable Array,With_Constraint
0cfe 00db | | Load_Top At_Offset_3
0cff e402 | | Load 0x2,0x2
0d00 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d01 01d7 | | Execute Vector,Field_Read
0d02 e005 | | Load 0x0,0x5
0d03 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0d04 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d05 4801 |H | Short_Literal 0x1
0d06 00da | | Load_Top At_Offset_2
0d07 01d6 | | Execute Vector,Field_Write
0d08 480e |H | Short_Literal 0xe
0d09 e403 | | Load 0x2,0x3
0d0a e015 | | Load 0x0,0x15
0d0b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0d0c 00c8 | | Action Pop_Auxiliary_Range
0d0d 3fe0 |? | Loop_Increasing 0xcee
0d0e 00ce | | Action Pop_Auxiliary
0d0f 00d8 | | Load_Top At_Offset_0
0d10 e015 | | Load 0x0,0x15
0d11 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0d12 0e01 | | Execute_Immediate Not_Equal,0x1
0d13 6812 |h | Jump_Zero 0xd26
0d14 e5fd | | Load 0x2,-0x3
0d15 e002 | | Load 0x0,0x2
0d16 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d17 4801 |H | Short_Literal 0x1
0d18 4801 |H | Short_Literal 0x1
0d19 e012 | | Load 0x0,0x12
0d1a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d1b 0334 | 4 | Declare_Variable Array,With_Constraint
0d1c 00db | | Load_Top At_Offset_3
0d1d e015 | | Load 0x0,0x15
0d1e 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0d1f 4801 |H | Short_Literal 0x1
0d20 00da | | Load_Top At_Offset_2
0d21 01d6 | | Execute Vector,Field_Write
0d22 4805 |H | Short_Literal 0x5
0d23 e5fc | | Load 0x2,-0x4
0d24 e015 | | Load 0x0,0x15
0d25 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0d26 00d8 | | Load_Top At_Offset_0
0d27 e015 | | Load 0x0,0x15
0d28 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0d29 7006 |p | Jump_Nonzero 0xd30
0d2a 00d8 | | Load_Top At_Offset_0
0d2b e015 | | Load 0x0,0x15
0d2c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0d2d e5fc | | Load 0x2,-0x4
0d2e e015 | | Load 0x0,0x15
0d2f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0d30 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0d31 0000 0000 | | .BLANK 0000[0x7]
0d38 ; --------------------------------------------------------------------------------------
0d38 ; SUBPROGRAM
0d38 ; --------------------------------------------------------------------------------------
0d38 0d3d | = | .CONST 0x0d3d ; Address of begin
0d39 0004 | | .CONST 0x0004 ; Address of exception handler
0d3a 0002 | | .CONST 0x0002 ; Number of locals
0d3b INIT_0d38:
0d3b e016 | | Load 0x0,0x16
0d3c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d3d BODY_0d38:
0d3d 00cf | | Action Mark_Auxiliary
0d3e e5ff | | Load 0x2,-0x1
0d3f 01d9 | | Execute Vector,Reverse_Bounds
0d40 0263 | c | Execute Discrete,Above_Bound
0d41 700a |p | Jump_Nonzero 0xd4c
0d42 00d8 | | Load_Top At_Offset_0
0d43 a402 | | Store_Unchecked 0x2,0x2
0d44 00d8 | | Load_Top At_Offset_0
0d45 e5ff | | Load 0x2,-0x1
0d46 01d7 | | Execute Vector,Field_Read
0d47 6802 |h | Jump_Zero 0xd4a
0d48 00d2 | | Pop_Control Pop_Count_2
0d49 7802 |x | Jump 0xd4c
0d4a 00c8 | | Action Pop_Auxiliary_Range
0d4b 3ff6 |? | Loop_Increasing 0xd42
0d4c 00ce | | Action Pop_Auxiliary
0d4d 00d8 | | Load_Top At_Offset_0
0d4e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d4f 0000 | | .XXX[0x1]
0d50 ; --------------------------------------------------------------------------------------
0d50 ; SUBPROGRAM
0d50 ; --------------------------------------------------------------------------------------
0d50 0d7b | { | .CONST 0x0d7b ; Address of begin
0d51 0004 | | .CONST 0x0004 ; Address of exception handler
0d52 0011 | | .CONST 0x0011 ; Number of locals
0d53 INIT_0d50:
0d53 029f 15e3 | | Declare_Subprogram INIT_15e0,For_Call
0d55 029f 160b | | Declare_Subprogram INIT_1608,For_Call
0d57 029f 1613 | | Declare_Subprogram INIT_1610,For_Call
0d59 029f 165b | [| Declare_Subprogram INIT_1658,For_Call
0d5b 029f 16ab | | Declare_Subprogram INIT_16a8,For_Call
0d5d a00c | | Store_Unchecked 0x0,0xc
0d5e 00c6 | | Action Check_Subprogram_Elaborated
0d5f e005 | | Load 0x0,0x5
0d60 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d61 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d62 e005 | | Load 0x0,0x5
0d63 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d64 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d65 4802 |H | Short_Literal 0x2
0d66 4802 |H | Short_Literal 0x2
0d67 0099 | | Action Reference_Dynamic
0d68 4803 |H | Short_Literal 0x3
0d69 4802 |H | Short_Literal 0x2
0d6a 0099 | | Action Reference_Dynamic
0d6b 4804 |H | Short_Literal 0x4
0d6c 4802 |H | Short_Literal 0x2
0d6d 0099 | | Action Reference_Dynamic
0d6e 4806 |H | Short_Literal 0x6
0d6f 4802 |H | Short_Literal 0x2
0d70 0099 | | Action Reference_Dynamic
0d71 e005 | | Load 0x0,0x5
0d72 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d73 195a | Z | Execute Package,Field_Reference,Field_Number 0x5a
0d74 e005 | | Load 0x0,0x5
0d75 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d76 195c | \ | Execute Package,Field_Reference,Field_Number 0x5c
0d77 e018 | | Load 0x0,0x18
0d78 e019 | | Load 0x0,0x19
0d79 4811 |H | Short_Literal 0x11
0d7a 0007 | | Action Break_Optional
0d7b BODY_0d50:
0d7b e5fe | | Load 0x2,-0x2
0d7c e5ff | | Load 0x2,-0x1
0d7d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d7e e407 | | Load 0x2,0x7
0d7f e408 | | Load 0x2,0x8
0d80 4809 |H | Short_Literal 0x9
0d81 4802 |H | Short_Literal 0x2
0d82 0099 | | Action Reference_Dynamic
0d83 480a |H | Short_Literal 0xa
0d84 4802 |H | Short_Literal 0x2
0d85 0099 | | Action Reference_Dynamic
0d86 480b |H | Short_Literal 0xb
0d87 4802 |H | Short_Literal 0x2
0d88 0099 | | Action Reference_Dynamic
0d89 480c |H | Short_Literal 0xc
0d8a 4802 |H | Short_Literal 0x2
0d8b 0099 | | Action Reference_Dynamic
0d8c 480d |H | Short_Literal 0xd
0d8d 4802 |H | Short_Literal 0x2
0d8e 0099 | | Action Reference_Dynamic
0d8f 480e |H | Short_Literal 0xe
0d90 4802 |H | Short_Literal 0x2
0d91 0099 | | Action Reference_Dynamic
0d92 480f |H | Short_Literal 0xf
0d93 4802 |H | Short_Literal 0x2
0d94 0099 | | Action Reference_Dynamic
0d95 800c | | Call 0x0,0xc
0d96 e005 | | Load 0x0,0x5
0d97 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d98 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d99 01c6 | | Execute Vector,Convert_To_Formal
0d9a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0d9b 0000 0000 | | .BLANK 0000[0x5]
0da0 ; --------------------------------------------------------------------------------------
0da0 ; SUBPROGRAM
0da0 ; --------------------------------------------------------------------------------------
0da0 0db3 | | .CONST 0x0db3 ; Address of begin
0da1 0004 | | .CONST 0x0004 ; Address of exception handler
0da2 0005 | | .CONST 0x0005 ; Number of locals
0da3 INIT_0da0:
0da3 00db | | Load_Top At_Offset_3
0da4 e013 | | Load 0x0,0x13
0da5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0da6 00db | | Load_Top At_Offset_3
0da7 01da | | Execute Vector,Bounds
0da8 e005 | | Load 0x0,0x5
0da9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0daa 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0dab 035b | [ | Declare_Type Array,Constrained
0dac 0337 | 7 | Declare_Variable Array
0dad 00d8 | | Load_Top At_Offset_0
0dae 01dd | | Execute Vector,First
0daf 00e3 | | Load_Encached Natural_Cache
0db0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0db1 029f 16c3 | | Declare_Subprogram INIT_16c0,For_Call
0db3 BODY_0da0:
0db3 00cf | | Action Mark_Auxiliary
0db4 e402 | | Load 0x2,0x2
0db5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0db6 01d9 | | Execute Vector,Reverse_Bounds
0db7 0263 | c | Execute Discrete,Above_Bound
0db8 700d |p | Jump_Nonzero 0xdc6
0db9 00d8 | | Load_Top At_Offset_0
0dba e402 | | Load 0x2,0x2
0dbb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0dbc 01d7 | | Execute Vector,Field_Read
0dbd e005 | | Load 0x0,0x5
0dbe 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0dbf 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0dc0 0f01 | | Execute_Immediate Equal,0x1
0dc1 7002 |p | Jump_Nonzero 0xdc4
0dc2 e5ff | | Load 0x2,-0x1
0dc3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0dc4 00c8 | | Action Pop_Auxiliary_Range
0dc5 3ff3 |? | Loop_Increasing 0xdb9
0dc6 00ce | | Action Pop_Auxiliary
0dc7 8405 | | Call 0x2,0x5
0dc8 4801 |H | Short_Literal 0x1
0dc9 00da | | Load_Top At_Offset_2
0dca 0aff | | Execute_Immediate Plus,-0x1
0dcb e403 | | Load 0x2,0x3
0dcc 01cf | | Execute Vector,Slice_Read
0dcd e005 | | Load 0x0,0x5
0dce 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0dcf 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0dd0 01c6 | | Execute Vector,Convert_To_Formal
0dd1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0dd2 0000 0000 | | .BLANK 0000[0x6]
0dd8 ; --------------------------------------------------------------------------------------
0dd8 ; SUBPROGRAM
0dd8 ; --------------------------------------------------------------------------------------
0dd8 0ddb | | .CONST 0x0ddb ; Address of begin
0dd9 0004 | | .CONST 0x0004 ; Address of exception handler
0dda 0001 | | .CONST 0x0001 ; Number of locals
0ddb BODY_0dd8:
0ddb INIT_0dd8:
0ddb 4801 |H | Short_Literal 0x1
0ddc e5fe | | Load 0x2,-0x2
0ddd e005 | | Load 0x0,0x5
0dde 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ddf 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0de0 e5ff | | Load 0x2,-0x1
0de1 e005 | | Load 0x0,0x5
0de2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0de3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0de4 e017 | | Load 0x0,0x17
0de5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0de6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0de7 0000 | | .XXX[0x1]
0de8 ; --------------------------------------------------------------------------------------
0de8 ; SUBPROGRAM
0de8 ; --------------------------------------------------------------------------------------
0de8 0dfb | | .CONST 0x0dfb ; Address of begin
0de9 0004 | | .CONST 0x0004 ; Address of exception handler
0dea 0004 | | .CONST 0x0004 ; Number of locals
0deb INIT_0de8:
0deb e005 | | Load 0x0,0x5
0dec 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0ded 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0dee e005 | | Load 0x0,0x5
0def 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0df0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0df1 0337 | 7 | Declare_Variable Array
0df2 e5ff | | Load 0x2,-0x1
0df3 e005 | | Load 0x0,0x5
0df4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0df5 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0df6 e005 | | Load 0x0,0x5
0df7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0df8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0df9 e016 | | Load 0x0,0x16
0dfa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0dfb BODY_0de8:
0dfb 4800 |H | Short_Literal 0x0
0dfc 00d9 | | Load_Top At_Offset_1
0dfd 01d7 | | Execute Vector,Field_Read
0dfe 6804 |h | Jump_Zero 0xe03
0dff 4803 |H | Short_Literal 0x3
0e00 00d9 | | Load_Top At_Offset_1
0e01 01d7 | | Execute Vector,Field_Read
0e02 681b |h | Jump_Zero 0xe1e
0e03 e5ff | | Load 0x2,-0x1
0e04 e5fe | | Load 0x2,-0x2
0e05 e005 | | Load 0x0,0x5
0e06 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0e07 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0e08 e005 | | Load 0x0,0x5
0e09 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0e0a 188a | | Execute Package,Field_Execute,Field_Number 0x8a
0e0b 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0e0c e5fe | | Load 0x2,-0x2
0e0d 00db | | Load_Top At_Offset_3
0e0e e005 | | Load 0x0,0x5
0e0f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0e10 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0e11 00da | | Load_Top At_Offset_2
0e12 01d4 | | Execute Vector,Structure_Write
0e13 4803 |H | Short_Literal 0x3
0e14 00da | | Load_Top At_Offset_2
0e15 01d7 | | Execute Vector,Field_Read
0e16 7004 |p | Jump_Nonzero 0xe1b
0e17 4804 |H | Short_Literal 0x4
0e18 00da | | Load_Top At_Offset_2
0e19 01d7 | | Execute Vector,Field_Read
0e1a 7801 |x | Jump 0xe1c
0e1b 4801 |H | Short_Literal 0x1
0e1c 0f00 | | Execute_Immediate Equal,0x0
0e1d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e1e 4801 |H | Short_Literal 0x1
0e1f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e23 | # | .CONST 0x0e23 ; Address of begin
0e21 0004 | | .CONST 0x0004 ; Address of exception handler
0e22 0001 | | .CONST 0x0001 ; Number of locals
0e23 BODY_0e20:
0e23 INIT_0e20:
0e23 4800 |H | Short_Literal 0x0
0e24 e22c | , | Load 0x1,0x2c
0e25 4800 |H | Short_Literal 0x0
0e26 e5fe | | Load 0x2,-0x2
0e27 e5ff | | Load 0x2,-0x1
0e28 8236 | 6 | Call 0x1,0x36
0e29 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e2a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e2b 0000 0000 | | .BLANK 0000[0x5]
0e30 ; --------------------------------------------------------------------------------------
0e30 ; SUBPROGRAM
0e30 ; --------------------------------------------------------------------------------------
0e30 0e33 | 3 | .CONST 0x0e33 ; Address of begin
0e31 0004 | | .CONST 0x0004 ; Address of exception handler
0e32 0001 | | .CONST 0x0001 ; Number of locals
0e33 BODY_0e30:
0e33 INIT_0e30:
0e33 4800 |H | Short_Literal 0x0
0e34 e22c | , | Load 0x1,0x2c
0e35 e5fe | | Load 0x2,-0x2
0e36 4800 |H | Short_Literal 0x0
0e37 e5ff | | Load 0x2,-0x1
0e38 823a | : | Call 0x1,0x3a
0e39 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e3a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e3b 0000 0000 | | .BLANK 0000[0x5]
0e40 ; --------------------------------------------------------------------------------------
0e40 ; SUBPROGRAM
0e40 ; --------------------------------------------------------------------------------------
0e40 0e71 | q | .CONST 0x0e71 ; Address of begin
0e41 0ed9 | | .CONST 0x0ed9 ; Address of exception handler
0e42 000b | | .CONST 0x000b ; Number of locals
0e43 INIT_0e40:
0e43 00db | | Load_Top At_Offset_3
0e44 e013 | | Load 0x0,0x13
0e45 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0e46 e016 | | Load 0x0,0x16
0e47 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e48 4802 |H | Short_Literal 0x2
0e49 00d9 | | Load_Top At_Offset_1
0e4a 01d7 | | Execute Vector,Field_Read
0e4b 0007 | | Action Break_Optional
0e4c 4800 |H | Short_Literal 0x0
0e4d e22c | , | Load 0x1,0x2c
0e4e 4800 |H | Short_Literal 0x0
0e4f e5fe | | Load 0x2,-0x2
0e50 e5ff | | Load 0x2,-0x1
0e51 8236 | 6 | Call 0x1,0x36
0e52 00d8 | | Load_Top At_Offset_0
0e53 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e54 01da | | Execute Vector,Bounds
0e55 e005 | | Load 0x0,0x5
0e56 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e57 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0e58 035b | [ | Declare_Type Array,Constrained
0e59 0337 | 7 | Declare_Variable Array
0e5a 00e3 | | Load_Encached Natural_Cache
0e5b 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0e5c e22a | * | Load 0x1,0x2a
0e5d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0e5e e005 | | Load 0x0,0x5
0e5f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e60 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e61 4800 |H | Short_Literal 0x0
0e62 e005 | | Load 0x0,0x5
0e63 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e64 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e65 1c08 | | Execute_Immediate Run_Utility,0x8
0e66 e005 | | Load 0x0,0x5
0e67 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e68 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e69 00d9 | | Load_Top At_Offset_1
0e6a 016d | m | Execute Variant_Record,Structure_Write
0e6b e005 | | Load 0x0,0x5
0e6c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e6d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e6e e005 | | Load 0x0,0x5
0e6f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e70 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e71 BODY_0e40:
0e71 e404 | | Load 0x2,0x4
0e72 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0e73 6803 |h | Jump_Zero 0xe77
0e74 00da | | Load_Top At_Offset_2
0e75 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e76 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0e77 e22a | * | Load 0x1,0x2a
0e78 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0e79 e011 | | Load 0x0,0x11
0e7a 180d | | Execute Package,Field_Execute,Field_Number 0xd
0e7b e22a | * | Load 0x1,0x2a
0e7c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e7d c407 | | Store 0x2,0x7
0e7e 00cf | | Action Mark_Auxiliary
0e7f e404 | | Load 0x2,0x4
0e80 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e81 01d9 | | Execute Vector,Reverse_Bounds
0e82 0263 | c | Execute Discrete,Above_Bound
0e83 7047 |pG | Jump_Nonzero 0xecb
0e84 00d8 | | Load_Top At_Offset_0
0e85 e404 | | Load 0x2,0x4
0e86 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e87 01d7 | | Execute Vector,Field_Read
0e88 a408 | | Store_Unchecked 0x2,0x8
0e89 e408 | | Load 0x2,0x8
0e8a e005 | | Load 0x0,0x5
0e8b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e8c 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0e8d a40b | | Store_Unchecked 0x2,0xb
0e8e 00cf | | Action Mark_Auxiliary
0e8f 7814 |x | Jump 0xea4
0e90 e40b | | Load 0x2,0xb
0e91 e005 | | Load 0x0,0x5
0e92 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e93 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0e94 a40a | | Store_Unchecked 0x2,0xa
0e95 e40a | | Load 0x2,0xa
0e96 e005 | | Load 0x0,0x5
0e97 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0e98 180f | | Execute Package,Field_Execute,Field_Number 0xf
0e99 7001 |p | Jump_Nonzero 0xe9b
0e9a 780e |x | Jump 0xea9
0e9b e403 | | Load 0x2,0x3
0e9c 680c |h | Jump_Zero 0xea9
0e9d e40b | | Load 0x2,0xb
0e9e e005 | | Load 0x0,0x5
0e9f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ea0 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0ea1 a40b | | Store_Unchecked 0x2,0xb
0ea2 7800 |x | Jump 0xea3
0ea3 00c9 | | Action Pop_Auxiliary_Loop
0ea4 e40b | | Load 0x2,0xb
0ea5 e005 | | Load 0x0,0x5
0ea6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ea7 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ea8 6fe7 |o | Jump_Zero 0xe90
0ea9 00ce | | Action Pop_Auxiliary
0eaa e40a | | Load 0x2,0xa
0eab e005 | | Load 0x0,0x5
0eac 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ead 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0eae 6813 |h | Jump_Zero 0xec2
0eaf e40a | | Load 0x2,0xa
0eb0 4801 |H | Short_Literal 0x1
0eb1 e407 | | Load 0x2,0x7
0eb2 8232 | 2 | Call 0x1,0x32
0eb3 7015 |p | Jump_Nonzero 0xec9
0eb4 4800 |H | Short_Literal 0x0
0eb5 4801 |H | Short_Literal 0x1
0eb6 e40a | | Load 0x2,0xa
0eb7 e407 | | Load 0x2,0x7
0eb8 e22a | * | Load 0x1,0x2a
0eb9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0eba e40a | | Load 0x2,0xa
0ebb e406 | | Load 0x2,0x6
0ebc e405 | | Load 0x2,0x5
0ebd 01d6 | | Execute Vector,Field_Write
0ebe e406 | | Load 0x2,0x6
0ebf 0a01 | | Execute_Immediate Plus,0x1
0ec0 c406 | | Store 0x2,0x6
0ec1 7807 |x | Jump 0xec9
0ec2 e408 | | Load 0x2,0x8
0ec3 e406 | | Load 0x2,0x6
0ec4 e405 | | Load 0x2,0x5
0ec5 01d6 | | Execute Vector,Field_Write
0ec6 e406 | | Load 0x2,0x6
0ec7 0a01 | | Execute_Immediate Plus,0x1
0ec8 c406 | | Store 0x2,0x6
0ec9 00c8 | | Action Pop_Auxiliary_Range
0eca 3fb9 |? | Loop_Increasing 0xe84
0ecb 00ce | | Action Pop_Auxiliary
0ecc e407 | | Load 0x2,0x7
0ecd e22a | * | Load 0x1,0x2a
0ece 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0ecf 4801 |H | Short_Literal 0x1
0ed0 e406 | | Load 0x2,0x6
0ed1 0aff | | Execute_Immediate Plus,-0x1
0ed2 e405 | | Load 0x2,0x5
0ed3 01cf | | Execute Vector,Slice_Read
0ed4 e005 | | Load 0x0,0x5
0ed5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ed6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0ed7 01c6 | | Execute Vector,Convert_To_Formal
0ed8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ed9 TRAP_0e40:
0ed9 0007 | | Action Break_Optional
0eda e407 | | Load 0x2,0x7
0edb e22a | * | Load 0x1,0x2a
0edc 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0edd 4801 |H | Short_Literal 0x1
0ede 4802 |H | Short_Literal 0x2
0edf e012 | | Load 0x0,0x12
0ee0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ee1 0334 | 4 | Declare_Variable Array,With_Constraint
0ee2 e5fe | | Load 0x2,-0x2
0ee3 e013 | | Load 0x0,0x13
0ee4 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0ee5 4801 |H | Short_Literal 0x1
0ee6 00da | | Load_Top At_Offset_2
0ee7 01d6 | | Execute Vector,Field_Write
0ee8 e5ff | | Load 0x2,-0x1
0ee9 e005 | | Load 0x0,0x5
0eea 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0eeb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0eec 4802 |H | Short_Literal 0x2
0eed 00da | | Load_Top At_Offset_2
0eee 01d6 | | Execute Vector,Field_Write
0eef 6008 |` | Indirect_Literal Discrete,0xef8,{0x00000000, 0x0000380f}
0ef0 e014 | | Load 0x0,0x14
0ef1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ef2 e409 | | Load 0x2,0x9
0ef3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0ef4 00db | | Load_Top At_Offset_3
0ef5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ef6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ef7 0000 | | .XXX[0x1]
0ef8 0000 0000 | | .LITERAL {0x00000000, 0x0000380f}
0efc 0000 0000 | | .BLANK 0000[0x4]
0f00 ; --------------------------------------------------------------------------------------
0f00 ; SUBPROGRAM
0f00 ; --------------------------------------------------------------------------------------
0f00 0f23 | # | .CONST 0x0f23 ; Address of begin
0f01 0004 | | .CONST 0x0004 ; Address of exception handler
0f02 0009 | | .CONST 0x0009 ; Number of locals
0f03 INIT_0f00:
0f03 00db | | Load_Top At_Offset_3
0f04 e013 | | Load 0x0,0x13
0f05 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0f06 e016 | | Load 0x0,0x16
0f07 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f08 4802 |H | Short_Literal 0x2
0f09 00d9 | | Load_Top At_Offset_1
0f0a 01d7 | | Execute Vector,Field_Read
0f0b 0007 | | Action Break_Optional
0f0c e22a | * | Load 0x1,0x2a
0f0d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0f0e e014 | | Load 0x0,0x14
0f0f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f10 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0f11 4800 |H | Short_Literal 0x0
0f12 e005 | | Load 0x0,0x5
0f13 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f14 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f15 1c08 | | Execute_Immediate Run_Utility,0x8
0f16 e005 | | Load 0x0,0x5
0f17 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f18 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0f19 00d9 | | Load_Top At_Offset_1
0f1a 016d | m | Execute Variant_Record,Structure_Write
0f1b e005 | | Load 0x0,0x5
0f1c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f1d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f1e e005 | | Load 0x0,0x5
0f1f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f20 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f21 029f 16db | | Declare_Subprogram INIT_16d8,For_Call
0f23 BODY_0f00:
0f23 e5ff | | Load 0x2,-0x1
0f24 e005 | | Load 0x0,0x5
0f25 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f26 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0f27 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0f28 00cf | | Action Mark_Auxiliary
0f29 7814 |x | Jump 0xf3e
0f2a 00da | | Load_Top At_Offset_2
0f2b e005 | | Load 0x0,0x5
0f2c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f2d 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0f2e a407 | | Store_Unchecked 0x2,0x7
0f2f 00db | | Load_Top At_Offset_3
0f30 e005 | | Load 0x0,0x5
0f31 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f32 180f | | Execute Package,Field_Execute,Field_Number 0xf
0f33 7001 |p | Jump_Nonzero 0xf35
0f34 780e |x | Jump 0xf43
0f35 e403 | | Load 0x2,0x3
0f36 680c |h | Jump_Zero 0xf43
0f37 00da | | Load_Top At_Offset_2
0f38 e005 | | Load 0x0,0x5
0f39 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f3a 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0f3b 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0f3c 7800 |x | Jump 0xf3d
0f3d 00c9 | | Action Pop_Auxiliary_Loop
0f3e 00da | | Load_Top At_Offset_2
0f3f e005 | | Load 0x0,0x5
0f40 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f41 180f | | Execute Package,Field_Execute,Field_Number 0xf
0f42 6fe7 |o | Jump_Zero 0xf2a
0f43 00ce | | Action Pop_Auxiliary
0f44 00da | | Load_Top At_Offset_2
0f45 e005 | | Load 0x0,0x5
0f46 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f47 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
0f48 6809 |h | Jump_Zero 0xf52
0f49 00da | | Load_Top At_Offset_2
0f4a e5ff | | Load 0x2,-0x1
0f4b 021e | | Execute Heap_Access,Maximum
0f4c 6803 |h | Jump_Zero 0xf50
0f4d 00db | | Load_Top At_Offset_3
0f4e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0f4f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f50 8409 | | Call 0x2,0x9
0f51 7808 |x | Jump 0xf5a
0f52 4800 |H | Short_Literal 0x0
0f53 e22c | , | Load 0x1,0x2c
0f54 e5fe | | Load 0x2,-0x2
0f55 4800 |H | Short_Literal 0x0
0f56 e5ff | | Load 0x2,-0x1
0f57 823a | : | Call 0x1,0x3a
0f58 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0f59 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0f5a 0831 | 1 | Execute_Immediate Raise,0x31
0f5b 0000 0000 | | .BLANK 0000[0x5]
0f60 ; --------------------------------------------------------------------------------------
0f60 ; SUBPROGRAM
0f60 ; --------------------------------------------------------------------------------------
0f60 0f63 | c | .CONST 0x0f63 ; Address of begin
0f61 0004 | | .CONST 0x0004 ; Address of exception handler
0f62 0001 | | .CONST 0x0001 ; Number of locals
0f63 BODY_0f60:
0f63 INIT_0f60:
0f63 e5fd | | Load 0x2,-0x3
0f64 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0f65 6802 |h | Jump_Zero 0xf68
0f66 00da | | Load_Top At_Offset_2
0f67 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0f68 00db | | Load_Top At_Offset_3
0f69 00db | | Load_Top At_Offset_3
0f6a 01db | | Execute Vector,Length
0f6b e005 | | Load 0x0,0x5
0f6c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f6d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0f6e 1c08 | | Execute_Immediate Run_Utility,0x8
0f6f e5ff | | Load 0x2,-0x1
0f70 00d9 | | Load_Top At_Offset_1
0f71 00d8 | | Load_Top At_Offset_0
0f72 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0f73 00da | | Load_Top At_Offset_2
0f74 01da | | Execute Vector,Bounds
0f75 00da | | Load_Top At_Offset_2
0f76 01da | | Execute Vector,Bounds
0f77 00da | | Load_Top At_Offset_2
0f78 027f | | Execute Discrete,Equal
0f79 7001 |p | Jump_Nonzero 0xf7b
0f7a 08e0 | | Execute_Immediate Raise,0xe0
0f7b 00cd | | Action Spare6_Action
0f7c 027f | | Execute Discrete,Equal
0f7d 7001 |p | Jump_Nonzero 0xf7f
0f7e 08e0 | | Execute_Immediate Raise,0xe0
0f7f 00d2 | | Pop_Control Pop_Count_2
0f80 00d9 | | Load_Top At_Offset_1
0f81 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0f82 4800 |H | Short_Literal 0x0
0f83 00d9 | | Load_Top At_Offset_1
0f84 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0f85 8213 | | Call 0x1,0x13
0f86 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0f87 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0f88 ; --------------------------------------------------------------------------------------
0f88 ; SUBPROGRAM
0f88 ; --------------------------------------------------------------------------------------
0f88 0fc8 | | .CONST 0x0fc8 ; Address of begin
0f89 0004 | | .CONST 0x0004 ; Address of exception handler
0f8a 0013 | | .CONST 0x0013 ; Number of locals
0f8b INIT_0f88:
0f8b e5fd | | Load 0x2,-0x3
0f8c e5fe | | Load 0x2,-0x2
0f8d e5ff | | Load 0x2,-0x1
0f8e 8269 | i | Call 0x1,0x69
0f8f e5fe | | Load 0x2,-0x2
0f90 00d9 | | Load_Top At_Offset_1
0f91 e25e | ^ | Load 0x1,0x5e
0f92 e25f | _ | Load 0x1,0x5f
0f93 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60
0f94 1d61 | a | Execute_Immediate Reference_Lex_1,0x61
0f95 1d62 | b | Execute_Immediate Reference_Lex_1,0x62
0f96 1d63 | c | Execute_Immediate Reference_Lex_1,0x63
0f97 1d64 | d | Execute_Immediate Reference_Lex_1,0x64
0f98 1d65 | e | Execute_Immediate Reference_Lex_1,0x65
0f99 1d66 | f | Execute_Immediate Reference_Lex_1,0x66
0f9a 800c | | Call 0x0,0xc
0f9b e5fe | | Load 0x2,-0x2
0f9c 00d9 | | Load_Top At_Offset_1
0f9d 824c | L | Call 0x1,0x4c
0f9e e5fe | | Load 0x2,-0x2
0f9f e013 | | Load 0x0,0x13
0fa0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0fa1 e016 | | Load 0x0,0x16
0fa2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0fa3 4801 |H | Short_Literal 0x1
0fa4 00d9 | | Load_Top At_Offset_1
0fa5 01d7 | | Execute Vector,Field_Read
0fa6 0007 | | Action Break_Optional
0fa7 4802 |H | Short_Literal 0x2
0fa8 00da | | Load_Top At_Offset_2
0fa9 01d7 | | Execute Vector,Field_Read
0faa 0007 | | Action Break_Optional
0fab e005 | | Load 0x0,0x5
0fac 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0fad 180e | | Execute Package,Field_Execute,Field_Number 0xe
0fae e005 | | Load 0x0,0x5
0faf 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0fb0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fb1 e015 | | Load 0x0,0x15
0fb2 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0fb3 e005 | | Load 0x0,0x5
0fb4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0fb5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fb6 00e1 | | Load_Encached Boolean_Cache
0fb7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0fb8 e016 | | Load 0x0,0x16
0fb9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fba e015 | | Load 0x0,0x15
0fbb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fbc e005 | | Load 0x0,0x5
0fbd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0fbe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fbf e005 | | Load 0x0,0x5
0fc0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0fc1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0fc2 029f 1713 | | Declare_Subprogram INIT_1710,For_Call
0fc4 029f 173b | ;| Declare_Subprogram INIT_1738,For_Call
0fc6 029f 1763 | c| Declare_Subprogram INIT_1760,For_Call
0fc8 BODY_0f88:
0fc8 e404 | | Load 0x2,0x4
0fc9 01db | | Execute Vector,Length
0fca 7001 |p | Jump_Nonzero 0xfcc
0fcb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0fcc 00cf | | Action Mark_Auxiliary
0fcd e404 | | Load 0x2,0x4
0fce 01d9 | | Execute Vector,Reverse_Bounds
0fcf 0263 | c | Execute Discrete,Above_Bound
0fd0 7077 |pw | Jump_Nonzero 0x1048
0fd1 00d8 | | Load_Top At_Offset_0
0fd2 e404 | | Load 0x2,0x4
0fd3 01d7 | | Execute Vector,Field_Read
0fd4 a410 | | Store_Unchecked 0x2,0x10
0fd5 e410 | | Load 0x2,0x10
0fd6 e005 | | Load 0x0,0x5
0fd7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0fd8 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0fd9 a409 | | Store_Unchecked 0x2,0x9
0fda e408 | | Load 0x2,0x8
0fdb e005 | | Load 0x0,0x5
0fdc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0fdd 180e | | Execute Package,Field_Execute,Field_Number 0xe
0fde 021f | | Execute Heap_Access,Equal
0fdf 700a |p | Jump_Nonzero 0xfea
0fe0 e408 | | Load 0x2,0x8
0fe1 e005 | | Load 0x0,0x5
0fe2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0fe3 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0fe4 e409 | | Load 0x2,0x9
0fe5 e005 | | Load 0x0,0x5
0fe6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0fe7 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0fe8 01de | | Execute Vector,Not_Equal
0fe9 6801 |h | Jump_Zero 0xfeb
0fea 8412 | | Call 0x2,0x12
0feb e40d | | Load 0x2,0xd
0fec e410 | | Load 0x2,0x10
0fed e005 | | Load 0x0,0x5
0fee 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0fef 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0ff0 a40e | | Store_Unchecked 0x2,0xe
0ff1 e40e | | Load 0x2,0xe
0ff2 e015 | | Load 0x0,0x15
0ff3 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0ff4 684a |hJ | Jump_Zero 0x103f
0ff5 e410 | | Load 0x2,0x10
0ff6 a40b | | Store_Unchecked 0x2,0xb
0ff7 00cf | | Action Mark_Auxiliary
0ff8 7813 |x | Jump 0x100c
0ff9 e40b | | Load 0x2,0xb
0ffa e005 | | Load 0x0,0x5
0ffb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ffc 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0ffd a40f | | Store_Unchecked 0x2,0xf
0ffe e40f | | Load 0x2,0xf
0fff e005 | | Load 0x0,0x5
1000 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1001 180f | | Execute Package,Field_Execute,Field_Number 0xf
1002 7001 |p | Jump_Nonzero 0x1004
1003 780d |x | Jump 0x1011
1004 4801 |H | Short_Literal 0x1
1005 a40c | | Store_Unchecked 0x2,0xc
1006 e40b | | Load 0x2,0xb
1007 e005 | | Load 0x0,0x5
1008 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1009 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
100a a40b | | Store_Unchecked 0x2,0xb
100b 00c9 | | Action Pop_Auxiliary_Loop
100c e40b | | Load 0x2,0xb
100d e005 | | Load 0x0,0x5
100e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
100f 180f | | Execute Package,Field_Execute,Field_Number 0xf
1010 6fe8 |o | Jump_Zero 0xff9
1011 00ce | | Action Pop_Auxiliary
1012 e40f | | Load 0x2,0xf
1013 e005 | | Load 0x0,0x5
1014 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1015 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
1016 680e |h | Jump_Zero 0x1025
1017 e406 | | Load 0x2,0x6
1018 6807 |h | Jump_Zero 0x1020
1019 e410 | | Load 0x2,0x10
101a e40f | | Load 0x2,0xf
101b e005 | | Load 0x0,0x5
101c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
101d 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
101e 021f | | Execute Heap_Access,Equal
101f 7026 |p& | Jump_Nonzero 0x1046
1020 e407 | | Load 0x2,0x7
1021 6803 |h | Jump_Zero 0x1025
1022 e40c | | Load 0x2,0xc
1023 6801 |h | Jump_Zero 0x1025
1024 7821 |x! | Jump 0x1046
1025 e40e | | Load 0x2,0xe
1026 e015 | | Load 0x0,0x15
1027 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1028 6814 |h | Jump_Zero 0x103d
1029 e40d | | Load 0x2,0xd
102a e002 | | Load 0x0,0x2
102b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
102c 4801 |H | Short_Literal 0x1
102d 4801 |H | Short_Literal 0x1
102e e012 | | Load 0x0,0x12
102f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1030 0334 | 4 | Declare_Variable Array,With_Constraint
1031 e410 | | Load 0x2,0x10
1032 e005 | | Load 0x0,0x5
1033 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1034 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1035 4801 |H | Short_Literal 0x1
1036 00da | | Load_Top At_Offset_2
1037 01d6 | | Execute Vector,Field_Write
1038 480f |H | Short_Literal 0xf
1039 e40a | | Load 0x2,0xa
103a e015 | | Load 0x0,0x15
103b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
103c 7809 |x | Jump 0x1046
103d 8413 | | Call 0x2,0x13
103e 7807 |x | Jump 0x1046
103f e40e | | Load 0x2,0xe
1040 e015 | | Load 0x0,0x15
1041 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1042 e5fc | | Load 0x2,-0x4
1043 e015 | | Load 0x0,0x15
1044 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1045 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1046 00c8 | | Action Pop_Auxiliary_Range
1047 3f89 |? | Loop_Increasing 0xfd1
1048 00ce | | Action Pop_Auxiliary
1049 8411 | | Call 0x2,0x11
104a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
104b 0000 0000 | | .BLANK 0000[0x5]
1050 ; --------------------------------------------------------------------------------------
1050 ; SUBPROGRAM
1050 ; --------------------------------------------------------------------------------------
1050 1078 | x | .CONST 0x1078 ; Address of begin
1051 0004 | | .CONST 0x0004 ; Address of exception handler
1052 000c | | .CONST 0x000c ; Number of locals
1053 INIT_1050:
1053 e5fd | | Load 0x2,-0x3
1054 e5fe | | Load 0x2,-0x2
1055 e5ff | | Load 0x2,-0x1
1056 8269 | i | Call 0x1,0x69
1057 e5fe | | Load 0x2,-0x2
1058 00d9 | | Load_Top At_Offset_1
1059 e251 | Q | Load 0x1,0x51
105a e252 | R | Load 0x1,0x52
105b 1d53 | S | Execute_Immediate Reference_Lex_1,0x53
105c 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
105d 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
105e 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
105f 1d57 | W | Execute_Immediate Reference_Lex_1,0x57
1060 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
1061 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
1062 800c | | Call 0x0,0xc
1063 e5fe | | Load 0x2,-0x2
1064 00d9 | | Load_Top At_Offset_1
1065 824c | L | Call 0x1,0x4c
1066 e005 | | Load 0x0,0x5
1067 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1068 180e | | Execute Package,Field_Execute,Field_Number 0xe
1069 e005 | | Load 0x0,0x5
106a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
106b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
106c e015 | | Load 0x0,0x15
106d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
106e e016 | | Load 0x0,0x16
106f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1070 e015 | | Load 0x0,0x15
1071 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1072 029f 177b | {| Declare_Subprogram INIT_1778,For_Call
1074 029f 17a3 | | Declare_Subprogram INIT_17a0,For_Call
1076 029f 17cb | | Declare_Subprogram INIT_17c8,For_Call
1078 BODY_1050:
1078 e404 | | Load 0x2,0x4
1079 01db | | Execute Vector,Length
107a 7001 |p | Jump_Nonzero 0x107c
107b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
107c 00cf | | Action Mark_Auxiliary
107d e404 | | Load 0x2,0x4
107e 01d9 | | Execute Vector,Reverse_Bounds
107f 0263 | c | Execute Discrete,Above_Bound
1080 7049 |pI | Jump_Nonzero 0x10ca
1081 00d8 | | Load_Top At_Offset_0
1082 e404 | | Load 0x2,0x4
1083 01d7 | | Execute Vector,Field_Read
1084 e005 | | Load 0x0,0x5
1085 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1086 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
1087 a406 | | Store_Unchecked 0x2,0x6
1088 e405 | | Load 0x2,0x5
1089 e005 | | Load 0x0,0x5
108a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
108b 180e | | Execute Package,Field_Execute,Field_Number 0xe
108c 021f | | Execute Heap_Access,Equal
108d 700a |p | Jump_Nonzero 0x1098
108e e405 | | Load 0x2,0x5
108f e005 | | Load 0x0,0x5
1090 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1091 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1092 e406 | | Load 0x2,0x6
1093 e005 | | Load 0x0,0x5
1094 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1095 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1096 01de | | Execute Vector,Not_Equal
1097 6801 |h | Jump_Zero 0x1099
1098 840b | | Call 0x2,0xb
1099 e408 | | Load 0x2,0x8
109a 00d9 | | Load_Top At_Offset_1
109b e404 | | Load 0x2,0x4
109c 01d7 | | Execute Vector,Field_Read
109d e005 | | Load 0x0,0x5
109e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
109f 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
10a0 a409 | | Store_Unchecked 0x2,0x9
10a1 e409 | | Load 0x2,0x9
10a2 e015 | | Load 0x0,0x15
10a3 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
10a4 681c |h | Jump_Zero 0x10c1
10a5 e409 | | Load 0x2,0x9
10a6 e015 | | Load 0x0,0x15
10a7 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
10a8 6816 |h | Jump_Zero 0x10bf
10a9 e408 | | Load 0x2,0x8
10aa e002 | | Load 0x0,0x2
10ab 1812 | | Execute Package,Field_Execute,Field_Number 0x12
10ac 4801 |H | Short_Literal 0x1
10ad 4801 |H | Short_Literal 0x1
10ae e012 | | Load 0x0,0x12
10af 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10b0 0334 | 4 | Declare_Variable Array,With_Constraint
10b1 00db | | Load_Top At_Offset_3
10b2 e404 | | Load 0x2,0x4
10b3 01d7 | | Execute Vector,Field_Read
10b4 e005 | | Load 0x0,0x5
10b5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
10b6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10b7 4801 |H | Short_Literal 0x1
10b8 00da | | Load_Top At_Offset_2
10b9 01d6 | | Execute Vector,Field_Write
10ba 480f |H | Short_Literal 0xf
10bb e407 | | Load 0x2,0x7
10bc e015 | | Load 0x0,0x15
10bd 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
10be 7809 |x | Jump 0x10c8
10bf 840c | | Call 0x2,0xc
10c0 7807 |x | Jump 0x10c8
10c1 e409 | | Load 0x2,0x9
10c2 e015 | | Load 0x0,0x15
10c3 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
10c4 e5fc | | Load 0x2,-0x4
10c5 e015 | | Load 0x0,0x15
10c6 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
10c7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10c8 00c8 | | Action Pop_Auxiliary_Range
10c9 3fb7 |? | Loop_Increasing 0x1081
10ca 00ce | | Action Pop_Auxiliary
10cb 840a | | Call 0x2,0xa
10cc 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10cd 0000 0000 | | .XXX[0x3]
10cf 0000 | |
10d0 ; --------------------------------------------------------------------------------------
10d0 ; SUBPROGRAM
10d0 ; --------------------------------------------------------------------------------------
10d0 10e7 | | .CONST 0x10e7 ; Address of begin
10d1 0004 | | .CONST 0x0004 ; Address of exception handler
10d2 0008 | | .CONST 0x0008 ; Number of locals
10d3 INIT_10d0:
10d3 4801 |H | Short_Literal 0x1
10d4 e5fe | | Load 0x2,-0x2
10d5 e005 | | Load 0x0,0x5
10d6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
10d7 1b13 | | Execute Package,Field_Read,Field_Number 0x13
10d8 035b | [ | Declare_Type Array,Constrained
10d9 0337 | 7 | Declare_Variable Array
10da 00e3 | | Load_Encached Natural_Cache
10db 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
10dc e5ff | | Load 0x2,-0x1
10dd e015 | | Load 0x0,0x15
10de 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
10df e015 | | Load 0x0,0x15
10e0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
10e1 e012 | | Load 0x0,0x12
10e2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10e3 029f 17e3 | | Declare_Subprogram INIT_17e0,For_Call
10e5 029f 1813 | | Declare_Subprogram INIT_1810,For_Call
10e7 BODY_10d0:
10e7 00cf | | Action Mark_Auxiliary
10e8 e404 | | Load 0x2,0x4
10e9 01d9 | | Execute Vector,Reverse_Bounds
10ea 0263 | c | Execute Discrete,Above_Bound
10eb 703f |p? | Jump_Nonzero 0x112b
10ec 00d8 | | Load_Top At_Offset_0
10ed e404 | | Load 0x2,0x4
10ee 01d7 | | Execute Vector,Field_Read
10ef e015 | | Load 0x0,0x15
10f0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
10f1 e5fd | | Load 0x2,-0x3
10f2 027f | | Execute Discrete,Equal
10f3 6835 |h5 | Jump_Zero 0x1129
10f4 4801 |H | Short_Literal 0x1
10f5 00d9 | | Load_Top At_Offset_1
10f6 e404 | | Load 0x2,0x4
10f7 01d7 | | Execute Vector,Field_Read
10f8 e015 | | Load 0x0,0x15
10f9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
10fa a406 | | Store_Unchecked 0x2,0x6
10fb 00d8 | | Load_Top At_Offset_0
10fc e404 | | Load 0x2,0x4
10fd 01d7 | | Execute Vector,Field_Read
10fe e015 | | Load 0x0,0x15
10ff 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1100 4612 |F | Jump_Case 0x13
1101 7827 |x' | Jump 0x1129 ; case 0x0
1102 7826 |x& | Jump 0x1129 ; case 0x1
1103 7820 |x | Jump 0x1124 ; case 0x2
1104 780f |x | Jump 0x1114 ; case 0x3
1105 7823 |x# | Jump 0x1129 ; case 0x4
1106 7822 |x" | Jump 0x1129 ; case 0x5
1107 7821 |x! | Jump 0x1129 ; case 0x6
1108 7820 |x | Jump 0x1129 ; case 0x7
1109 781f |x | Jump 0x1129 ; case 0x8
110a 781e |x | Jump 0x1129 ; case 0x9
110b 780a |x | Jump 0x1116 ; case 0xa
110c 781c |x | Jump 0x1129 ; case 0xb
110d 7808 |x | Jump 0x1116 ; case 0xc
110e 781a |x | Jump 0x1129 ; case 0xd
110f 7819 |x | Jump 0x1129 ; case 0xe
1110 7805 |x | Jump 0x1116 ; case 0xf
1111 7817 |x | Jump 0x1129 ; case 0x10
1112 7816 |x | Jump 0x1129 ; case 0x11
1113 7815 |x | Jump 0x1129 ; case 0x12
1114 8407 | | Call 0x2,0x7
1115 7813 |x | Jump 0x1129
1116 e406 | | Load 0x2,0x6
1117 e005 | | Load 0x0,0x5
1118 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1119 1811 | | Execute Package,Field_Execute,Field_Number 0x11
111a e005 | | Load 0x0,0x5
111b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
111c 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
111d e403 | | Load 0x2,0x3
111e e402 | | Load 0x2,0x2
111f 01d6 | | Execute Vector,Field_Write
1120 e403 | | Load 0x2,0x3
1121 0a01 | | Execute_Immediate Plus,0x1
1122 c403 | | Store 0x2,0x3
1123 7805 |x | Jump 0x1129
1124 e406 | | Load 0x2,0x6
1125 e012 | | Load 0x0,0x12
1126 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
1127 7001 |p | Jump_Nonzero 0x1129
1128 8408 | | Call 0x2,0x8
1129 00c8 | | Action Pop_Auxiliary_Range
112a 3fc1 |? | Loop_Increasing 0x10ec
112b 00ce | | Action Pop_Auxiliary
112c 4801 |H | Short_Literal 0x1
112d e403 | | Load 0x2,0x3
112e 0aff | | Execute_Immediate Plus,-0x1
112f e402 | | Load 0x2,0x2
1130 01cf | | Execute Vector,Slice_Read
1131 e005 | | Load 0x0,0x5
1132 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1133 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1134 01c6 | | Execute Vector,Convert_To_Formal
1135 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1136 0000 0000 | | .XXX[0x2]
1138 ; --------------------------------------------------------------------------------------
1138 ; SUBPROGRAM
1138 ; --------------------------------------------------------------------------------------
1138 114d | M | .CONST 0x114d ; Address of begin
1139 0004 | | .CONST 0x0004 ; Address of exception handler
113a 0007 | | .CONST 0x0007 ; Number of locals
113b INIT_1138:
113b e015 | | Load 0x0,0x15
113c 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
113d e015 | | Load 0x0,0x15
113e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
113f e5fe | | Load 0x2,-0x2
1140 e013 | | Load 0x0,0x13
1141 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1142 e016 | | Load 0x0,0x16
1143 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1144 4801 |H | Short_Literal 0x1
1145 00d9 | | Load_Top At_Offset_1
1146 01d7 | | Execute Vector,Field_Read
1147 0007 | | Action Break_Optional
1148 4802 |H | Short_Literal 0x2
1149 00da | | Load_Top At_Offset_2
114a 01d7 | | Execute Vector,Field_Read
114b 029f 1833 | 3| Declare_Subprogram INIT_1830,For_Call
114d BODY_1138:
114d 00cf | | Action Mark_Auxiliary
114e e016 | | Load 0x0,0x16
114f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1150 01d9 | | Execute Vector,Reverse_Bounds
1151 0263 | c | Execute Discrete,Above_Bound
1152 7003 |p | Jump_Nonzero 0x1156
1153 8407 | | Call 0x2,0x7
1154 00c8 | | Action Pop_Auxiliary_Range
1155 3ffd |? | Loop_Increasing 0x1153
1156 00ce | | Action Pop_Auxiliary
1157 e403 | | Load 0x2,0x3
1158 a5fc | | Store_Unchecked 0x2,-0x4
1159 4504 |E | Exit_Suprogram New_Top_Offset 0x4
115a 0000 0000 | | .BLANK 0000[0x6]
1160 ; --------------------------------------------------------------------------------------
1160 ; SUBPROGRAM
1160 ; --------------------------------------------------------------------------------------
1160 116c | l | .CONST 0x116c ; Address of begin
1161 0004 | | .CONST 0x0004 ; Address of exception handler
1162 0002 | | .CONST 0x0002 ; Number of locals
1163 INIT_1160:
1163 e402 | | Load 0x2,0x2
1164 e5fe | | Load 0x2,-0x2
1165 4801 |H | Short_Literal 0x1
1166 e402 | | Load 0x2,0x2
1167 4800 |H | Short_Literal 0x0
1168 e5fe | | Load 0x2,-0x2
1169 e5ff | | Load 0x2,-0x1
116a 8236 | 6 | Call 0x1,0x36
116b 8238 | 8 | Call 0x1,0x38
116c BODY_1160:
116c e402 | | Load 0x2,0x2
116d e22a | * | Load 0x1,0x2a
116e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
116f e5ff | | Load 0x2,-0x1
1170 00d9 | | Load_Top At_Offset_1
1171 822f | / | Call 0x1,0x2f
1172 00cb | | Action Pop_Block_With_Result
1173 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1174 0000 0000 | | .BLANK 0000[0x4]
1178 ; --------------------------------------------------------------------------------------
1178 ; SUBPROGRAM
1178 ; --------------------------------------------------------------------------------------
1178 117f | | .CONST 0x117f ; Address of begin
1179 0004 | | .CONST 0x0004 ; Address of exception handler
117a 0002 | | .CONST 0x0002 ; Number of locals
117b INIT_1178:
117b e402 | | Load 0x2,0x2
117c e5fe | | Load 0x2,-0x2
117d e5ff | | Load 0x2,-0x1
117e 8238 | 8 | Call 0x1,0x38
117f BODY_1178:
117f e402 | | Load 0x2,0x2
1180 e22a | * | Load 0x1,0x2a
1181 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1182 00d8 | | Load_Top At_Offset_0
1183 00cb | | Action Pop_Block_With_Result
1184 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1185 0000 0000 | | .XXX[0x3]
1187 0000 | |
1188 ; --------------------------------------------------------------------------------------
1188 ; SUBPROGRAM
1188 ; --------------------------------------------------------------------------------------
1188 1195 | | .CONST 0x1195 ; 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 e5fd | | Load 0x2,-0x3
118e 4801 |H | Short_Literal 0x1
118f e402 | | Load 0x2,0x2
1190 e5fe | | Load 0x2,-0x2
1191 e5fd | | Load 0x2,-0x3
1192 e5ff | | Load 0x2,-0x1
1193 823a | : | Call 0x1,0x3a
1194 823d | = | Call 0x1,0x3d
1195 BODY_1188:
1195 e402 | | Load 0x2,0x2
1196 e22a | * | Load 0x1,0x2a
1197 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1198 e5ff | | Load 0x2,-0x1
1199 00d9 | | Load_Top At_Offset_1
119a 822f | / | Call 0x1,0x2f
119b 00cb | | Action Pop_Block_With_Result
119c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
119d 0000 0000 | | .XXX[0x3]
119f 0000 | |
11a0 ; --------------------------------------------------------------------------------------
11a0 ; SUBPROGRAM
11a0 ; --------------------------------------------------------------------------------------
11a0 11a8 | | .CONST 0x11a8 ; 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 e5fd | | Load 0x2,-0x3
11a6 e5ff | | Load 0x2,-0x1
11a7 823d | = | Call 0x1,0x3d
11a8 BODY_11a0:
11a8 e402 | | Load 0x2,0x2
11a9 e22a | * | Load 0x1,0x2a
11aa 181d | | Execute Package,Field_Execute,Field_Number 0x1d
11ab 00d8 | | Load_Top At_Offset_0
11ac 00cb | | Action Pop_Block_With_Result
11ad 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
11ae 0000 0000 | | .XXX[0x2]
11b0 ; --------------------------------------------------------------------------------------
11b0 ; SUBPROGRAM
11b0 ; --------------------------------------------------------------------------------------
11b0 11bc | | .CONST 0x11bc ; Address of begin
11b1 0004 | | .CONST 0x0004 ; Address of exception handler
11b2 0002 | | .CONST 0x0002 ; Number of locals
11b3 INIT_11b0:
11b3 e404 | | Load 0x2,0x4
11b4 e402 | | Load 0x2,0x2
11b5 01d7 | | Execute Vector,Field_Read
11b6 e005 | | Load 0x0,0x5
11b7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11b8 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
11b9 e005 | | Load 0x0,0x5
11ba 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11bb 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
11bc BODY_11b0:
11bc 00cf | | Action Mark_Auxiliary
11bd e405 | | Load 0x2,0x5
11be 0a01 | | Execute_Immediate Plus,0x1
11bf c405 | | Store 0x2,0x5
11c0 e405 | | Load 0x2,0x5
11c1 e402 | | Load 0x2,0x2
11c2 01dc | | Execute Vector,Last
11c3 027d | } | Execute Discrete,Greater
11c4 7010 |p | Jump_Nonzero 0x11d5
11c5 4800 |H | Short_Literal 0x0
11c6 e405 | | Load 0x2,0x5
11c7 e402 | | Load 0x2,0x2
11c8 01d7 | | Execute Vector,Field_Read
11c9 e005 | | Load 0x0,0x5
11ca 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11cb 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
11cc e005 | | Load 0x0,0x5
11cd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
11ce 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
11cf 00db | | Load_Top At_Offset_3
11d0 e017 | | Load 0x0,0x17
11d1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
11d2 6802 |h | Jump_Zero 0x11d5
11d3 00c9 | | Action Pop_Auxiliary_Loop
11d4 7fe8 | | Jump 0x11bd
11d5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11d6 0000 0000 | | .XXX[0x2]
11d8 ; --------------------------------------------------------------------------------------
11d8 ; SUBPROGRAM
11d8 ; --------------------------------------------------------------------------------------
11d8 11eb | | .CONST 0x11eb ; Address of begin
11d9 0004 | | .CONST 0x0004 ; Address of exception handler
11da 0002 | | .CONST 0x0002 ; Number of locals
11db INIT_11d8:
11db 4801 |H | Short_Literal 0x1
11dc e405 | | Load 0x2,0x5
11dd e404 | | Load 0x2,0x4
11de 0272 | r | Execute Discrete,Minus
11df e005 | | Load 0x0,0x5
11e0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
11e1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
11e2 035b | [ | Declare_Type Array,Constrained
11e3 0337 | 7 | Declare_Variable Array
11e4 e404 | | Load 0x2,0x4
11e5 e405 | | Load 0x2,0x5
11e6 0aff | | Execute_Immediate Plus,-0x1
11e7 e402 | | Load 0x2,0x2
11e8 01cf | | Execute Vector,Slice_Read
11e9 00d9 | | Load_Top At_Offset_1
11ea 01d4 | | Execute Vector,Structure_Write
11eb BODY_11d8:
11eb e40a | | Load 0x2,0xa
11ec e410 | | Load 0x2,0x10
11ed e5fe | | Load 0x2,-0x2
11ee e405 | | Load 0x2,0x5
11ef e404 | | Load 0x2,0x4
11f0 0272 | r | Execute Discrete,Minus
11f1 e005 | | Load 0x0,0x5
11f2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
11f3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
11f4 1c08 | | Execute_Immediate Run_Utility,0x8
11f5 e602 | | Load 0x3,0x2
11f6 00d9 | | Load_Top At_Offset_1
11f7 00d8 | | Load_Top At_Offset_0
11f8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
11f9 00da | | Load_Top At_Offset_2
11fa 01da | | Execute Vector,Bounds
11fb 00da | | Load_Top At_Offset_2
11fc 01da | | Execute Vector,Bounds
11fd 00da | | Load_Top At_Offset_2
11fe 027f | | Execute Discrete,Equal
11ff 7001 |p | Jump_Nonzero 0x1201
1200 08e0 | | Execute_Immediate Raise,0xe0
1201 00cd | | Action Spare6_Action
1202 027f | | Execute Discrete,Equal
1203 7001 |p | Jump_Nonzero 0x1205
1204 08e0 | | Execute_Immediate Raise,0xe0
1205 00d2 | | Pop_Control Pop_Count_2
1206 00d9 | | Load_Top At_Offset_1
1207 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
1208 4800 |H | Short_Literal 0x0
1209 00d9 | | Load_Top At_Offset_1
120a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
120b 8247 | G | Call 0x1,0x47
120c c40a | | Store 0x2,0xa
120d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
120e 0000 0000 | | .XXX[0x2]
1210 ; --------------------------------------------------------------------------------------
1210 ; SUBPROGRAM
1210 ; --------------------------------------------------------------------------------------
1210 121c | | .CONST 0x121c ; Address of begin
1211 0004 | | .CONST 0x0004 ; Address of exception handler
1212 0002 | | .CONST 0x0002 ; Number of locals
1213 INIT_1210:
1213 e404 | | Load 0x2,0x4
1214 e402 | | Load 0x2,0x2
1215 01d7 | | Execute Vector,Field_Read
1216 e005 | | Load 0x0,0x5
1217 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1218 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
1219 e005 | | Load 0x0,0x5
121a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
121b 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
121c BODY_1210:
121c 00cf | | Action Mark_Auxiliary
121d e405 | | Load 0x2,0x5
121e 0a01 | | Execute_Immediate Plus,0x1
121f c405 | | Store 0x2,0x5
1220 e405 | | Load 0x2,0x5
1221 e402 | | Load 0x2,0x2
1222 01dc | | Execute Vector,Last
1223 027d | } | Execute Discrete,Greater
1224 7010 |p | Jump_Nonzero 0x1235
1225 4800 |H | Short_Literal 0x0
1226 e405 | | Load 0x2,0x5
1227 e402 | | Load 0x2,0x2
1228 01d7 | | Execute Vector,Field_Read
1229 e005 | | Load 0x0,0x5
122a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
122b 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
122c e005 | | Load 0x0,0x5
122d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
122e 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
122f 00db | | Load_Top At_Offset_3
1230 e017 | | Load 0x0,0x17
1231 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1232 6802 |h | Jump_Zero 0x1235
1233 00c9 | | Action Pop_Auxiliary_Loop
1234 7fe8 | | Jump 0x121d
1235 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1236 0000 0000 | | .XXX[0x2]
1238 ; --------------------------------------------------------------------------------------
1238 ; SUBPROGRAM
1238 ; --------------------------------------------------------------------------------------
1238 1240 | @ | .CONST 0x1240 ; Address of begin
1239 0004 | | .CONST 0x0004 ; Address of exception handler
123a 0002 | | .CONST 0x0002 ; Number of locals
123b INIT_1238:
123b e40a | | Load 0x2,0xa
123c e5fe | | Load 0x2,-0x2
123d 8230 | 0 | Call 0x1,0x30
123e e5ff | | Load 0x2,-0x1
123f 826c | l | Call 0x1,0x6c
1240 BODY_1238:
1240 00d8 | | Load_Top At_Offset_0
1241 01db | | Execute Vector,Length
1242 0c01 | | Execute_Immediate Greater_Equal,0x1
1243 6838 |h8 | Jump_Zero 0x127c
1244 e405 | | Load 0x2,0x5
1245 7002 |p | Jump_Nonzero 0x1248
1246 e406 | | Load 0x2,0x6
1247 6809 |h | Jump_Zero 0x1251
1248 e402 | | Load 0x2,0x2
1249 e005 | | Load 0x0,0x5
124a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
124b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
124c e5fe | | Load 0x2,-0x2
124d 00db | | Load_Top At_Offset_3
124e 826a | j | Call 0x1,0x6a
124f c402 | | Store 0x2,0x2
1250 7808 |x | Jump 0x1259
1251 e402 | | Load 0x2,0x2
1252 e005 | | Load 0x0,0x5
1253 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1254 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1255 e5fe | | Load 0x2,-0x2
1256 00db | | Load_Top At_Offset_3
1257 826b | k | Call 0x1,0x6b
1258 c402 | | Store 0x2,0x2
1259 e402 | | Load 0x2,0x2
125a e015 | | Load 0x0,0x15
125b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
125c 701f |p | Jump_Nonzero 0x127c
125d e40a | | Load 0x2,0xa
125e e002 | | Load 0x0,0x2
125f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1260 4801 |H | Short_Literal 0x1
1261 4801 |H | Short_Literal 0x1
1262 e012 | | Load 0x0,0x12
1263 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1264 0334 | 4 | Declare_Variable Array,With_Constraint
1265 e402 | | Load 0x2,0x2
1266 e015 | | Load 0x0,0x15
1267 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
1268 4801 |H | Short_Literal 0x1
1269 00da | | Load_Top At_Offset_2
126a 01d6 | | Execute Vector,Field_Write
126b 4802 |H | Short_Literal 0x2
126c e403 | | Load 0x2,0x3
126d e015 | | Load 0x0,0x15
126e 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
126f e402 | | Load 0x2,0x2
1270 e015 | | Load 0x0,0x15
1271 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
1272 7006 |p | Jump_Nonzero 0x1279
1273 e402 | | Load 0x2,0x2
1274 e015 | | Load 0x0,0x15
1275 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1276 e403 | | Load 0x2,0x3
1277 e015 | | Load 0x0,0x15
1278 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1279 e015 | | Load 0x0,0x15
127a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
127b a402 | | Store_Unchecked 0x2,0x2
127c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
127d 0000 0000 | | .XXX[0x3]
127f 0000 | |
1280 ; --------------------------------------------------------------------------------------
1280 ; SUBPROGRAM
1280 ; --------------------------------------------------------------------------------------
1280 1286 | | .CONST 0x1286 ; Address of begin
1281 0004 | | .CONST 0x0004 ; Address of exception handler
1282 0002 | | .CONST 0x0002 ; Number of locals
1283 INIT_1280:
1283 00da | | Load_Top At_Offset_2
1284 e015 | | Load 0x0,0x15
1285 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1286 BODY_1280:
1286 00db | | Load_Top At_Offset_3
1287 e015 | | Load 0x0,0x15
1288 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1289 700e |p | Jump_Nonzero 0x1298
128a 00cf | | Action Mark_Auxiliary
128b 00d9 | | Load_Top At_Offset_1
128c 01d9 | | Execute Vector,Reverse_Bounds
128d 0263 | c | Execute Discrete,Above_Bound
128e 7008 |p | Jump_Nonzero 0x1297
128f e402 | | Load 0x2,0x2
1290 00d9 | | Load_Top At_Offset_1
1291 e602 | | Load 0x3,0x2
1292 01d7 | | Execute Vector,Field_Read
1293 e015 | | Load 0x0,0x15
1294 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1295 00c8 | | Action Pop_Auxiliary_Range
1296 3ff8 |? | Loop_Increasing 0x128f
1297 00ce | | Action Pop_Auxiliary
1298 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1299 0000 0000 | | .BLANK 0000[0x7]
12a0 ; --------------------------------------------------------------------------------------
12a0 ; SUBPROGRAM
12a0 ; --------------------------------------------------------------------------------------
12a0 12aa | | .CONST 0x12aa ; Address of begin
12a1 0004 | | .CONST 0x0004 ; Address of exception handler
12a2 0004 | | .CONST 0x0004 ; Number of locals
12a3 INIT_12a0:
12a3 e405 | | Load 0x2,0x5
12a4 e005 | | Load 0x0,0x5
12a5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
12a6 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
12a7 00e3 | | Load_Encached Natural_Cache
12a8 029f 187b | {| Declare_Subprogram INIT_1878,For_Call
12aa BODY_12a0:
12aa 00e3 | | Load_Encached Natural_Cache
12ab e404 | | Load 0x2,0x4
12ac e602 | | Load 0x3,0x2
12ad 8234 | 4 | Call 0x1,0x34
12ae 005a | Z | Store_Top Discrete,At_Offset_2
12af 00d9 | | Load_Top At_Offset_1
12b0 6801 |h | Jump_Zero 0x12b2
12b1 8604 | | Call 0x3,0x4
12b2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12b3 0000 0000 | | .BLANK 0000[0x5]
12b8 ; --------------------------------------------------------------------------------------
12b8 ; SUBPROGRAM
12b8 ; --------------------------------------------------------------------------------------
12b8 12c8 | | .CONST 0x12c8 ; Address of begin
12b9 0004 | | .CONST 0x0004 ; Address of exception handler
12ba 0003 | | .CONST 0x0003 ; Number of locals
12bb INIT_12b8:
12bb e5fb | | Load 0x2,-0x5
12bc e5fc | | Load 0x2,-0x4
12bd e5fd | | Load 0x2,-0x3
12be e402 | | Load 0x2,0x2
12bf 8233 | 3 | Call 0x1,0x33
12c0 e5fb | | Load 0x2,-0x5
12c1 e5fc | | Load 0x2,-0x4
12c2 e5fd | | Load 0x2,-0x3
12c3 e5fe | | Load 0x2,-0x2
12c4 e013 | | Load 0x0,0x13
12c5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
12c6 e5ff | | Load 0x2,-0x1
12c7 8235 | 5 | Call 0x1,0x35
12c8 BODY_12b8:
12c8 00d8 | | Load_Top At_Offset_0
12c9 00da | | Load_Top At_Offset_2
12ca 822e | . | Call 0x1,0x2e
12cb 00cb | | Action Pop_Block_With_Result
12cc 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
12cd 0000 0000 | | .XXX[0x3]
12cf 0000 | |
12d0 ; --------------------------------------------------------------------------------------
12d0 ; SUBPROGRAM
12d0 ; --------------------------------------------------------------------------------------
12d0 12dc | | .CONST 0x12dc ; Address of begin
12d1 0004 | | .CONST 0x0004 ; Address of exception handler
12d2 0002 | | .CONST 0x0002 ; Number of locals
12d3 INIT_12d0:
12d3 e5fc | | Load 0x2,-0x4
12d4 e5fd | | Load 0x2,-0x3
12d5 4800 |H | Short_Literal 0x0
12d6 e5fe | | Load 0x2,-0x2
12d7 e407 | | Load 0x2,0x7
12d8 e5ff | | Load 0x2,-0x1
12d9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
12da 01d7 | | Execute Vector,Field_Read
12db 8236 | 6 | Call 0x1,0x36
12dc BODY_12d0:
12dc 00d8 | | Load_Top At_Offset_0
12dd 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
12de 6804 |h | Jump_Zero 0x12e3
12df 00d8 | | Load_Top At_Offset_0
12e0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
12e1 e402 | | Load 0x2,0x2
12e2 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
12e3 00d8 | | Load_Top At_Offset_0
12e4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
12e5 6815 |h | Jump_Zero 0x12fb
12e6 00d8 | | Load_Top At_Offset_0
12e7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
12e8 e403 | | Load 0x2,0x3
12e9 00d8 | | Load_Top At_Offset_0
12ea 00db | | Load_Top At_Offset_3
12eb 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
12ec 0273 | s | Execute Discrete,Plus
12ed 0aff | | Execute_Immediate Plus,-0x1
12ee 00d8 | | Load_Top At_Offset_0
12ef 00e2 | | Load_Encached Integer_Cache
12f0 0260 | ` | Execute Discrete,In_Type
12f1 7001 |p | Jump_Nonzero 0x12f3
12f2 0801 | | Execute_Immediate Raise,0x1
12f3 e402 | | Load 0x2,0x2
12f4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
12f5 01ce | | Execute Vector,Slice_Write
12f6 e403 | | Load 0x2,0x3
12f7 00d9 | | Load_Top At_Offset_1
12f8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
12f9 0273 | s | Execute Discrete,Plus
12fa c403 | | Store 0x2,0x3
12fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12fc 0000 0000 | | .BLANK 0000[0x4]
1300 ; --------------------------------------------------------------------------------------
1300 ; SUBPROGRAM
1300 ; --------------------------------------------------------------------------------------
1300 1303 | | .CONST 0x1303 ; Address of begin
1301 0004 | | .CONST 0x0004 ; Address of exception handler
1302 0001 | | .CONST 0x0001 ; Number of locals
1303 BODY_1300:
1303 INIT_1300:
1303 00da | | Load_Top At_Offset_2
1304 e005 | | Load 0x0,0x5
1305 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1306 180f | | Execute Package,Field_Execute,Field_Number 0xf
1307 7013 |p | Jump_Nonzero 0x131b
1308 00da | | Load_Top At_Offset_2
1309 4801 |H | Short_Literal 0x1
130a e5fd | | Load 0x2,-0x3
130b 8232 | 2 | Call 0x1,0x32
130c 700e |p | Jump_Nonzero 0x131b
130d 00da | | Load_Top At_Offset_2
130e e403 | | Load 0x2,0x3
130f e402 | | Load 0x2,0x2
1310 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1311 01d6 | | Execute Vector,Field_Write
1312 e403 | | Load 0x2,0x3
1313 0a01 | | Execute_Immediate Plus,0x1
1314 c403 | | Store 0x2,0x3
1315 4800 |H | Short_Literal 0x0
1316 4801 |H | Short_Literal 0x1
1317 e7ff | | Load 0x3,-0x1
1318 e5fd | | Load 0x2,-0x3
1319 e22a | * | Load 0x1,0x2a
131a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
131b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
131c 0000 0000 | | .BLANK 0000[0x4]
1320 ; --------------------------------------------------------------------------------------
1320 ; SUBPROGRAM
1320 ; --------------------------------------------------------------------------------------
1320 1323 | # | .CONST 0x1323 ; Address of begin
1321 0004 | | .CONST 0x0004 ; Address of exception handler
1322 0001 | | .CONST 0x0001 ; Number of locals
1323 BODY_1320:
1323 INIT_1320:
1323 00cf | | Action Mark_Auxiliary
1324 00db | | Load_Top At_Offset_3
1325 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1326 01d9 | | Execute Vector,Reverse_Bounds
1327 0263 | c | Execute Discrete,Above_Bound
1328 700f |p | Jump_Nonzero 0x1338
1329 00d8 | | Load_Top At_Offset_0
132a e7ff | | Load 0x3,-0x1
132b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
132c 01d7 | | Execute Vector,Field_Read
132d 8405 | | Call 0x2,0x5
132e 00d8 | | Load_Top At_Offset_0
132f e7ff | | Load 0x3,-0x1
1330 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1331 01d7 | | Execute Vector,Field_Read
1332 e005 | | Load 0x0,0x5
1333 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1334 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
1335 8406 | | Call 0x2,0x6
1336 00c8 | | Action Pop_Auxiliary_Range
1337 3ff1 |? | Loop_Increasing 0x1329
1338 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1339 0000 0000 | | .BLANK 0000[0x7]
1340 ; --------------------------------------------------------------------------------------
1340 ; SUBPROGRAM
1340 ; --------------------------------------------------------------------------------------
1340 134a | J | .CONST 0x134a ; Address of begin
1341 0004 | | .CONST 0x0004 ; Address of exception handler
1342 0005 | | .CONST 0x0005 ; Number of locals
1343 INIT_1340:
1343 00e1 | | Load_Encached Boolean_Cache
1344 00e1 | | Load_Encached Boolean_Cache
1345 e005 | | Load 0x0,0x5
1346 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1347 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1348 029f 18a3 | | Declare_Subprogram INIT_18a0,For_Call
134a BODY_1340:
134a 4800 |H | Short_Literal 0x0
134b e014 | | Load 0x0,0x14
134c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
134d a602 | | Store_Unchecked 0x3,0x2
134e 4801 |H | Short_Literal 0x1
134f e014 | | Load 0x0,0x14
1350 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1351 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
1352 8605 | | Call 0x3,0x5
1353 0831 | 1 | Execute_Immediate Raise,0x31
1354 0000 0000 | | .BLANK 0000[0x4]
1358 ; --------------------------------------------------------------------------------------
1358 ; SUBPROGRAM
1358 ; --------------------------------------------------------------------------------------
1358 1364 | d | .CONST 0x1364 ; Address of begin
1359 0004 | | .CONST 0x0004 ; Address of exception handler
135a 0002 | | .CONST 0x0002 ; Number of locals
135b INIT_1358:
135b e5fb | | Load 0x2,-0x5
135c e5fc | | Load 0x2,-0x4
135d e5fd | | Load 0x2,-0x3
135e 4800 |H | Short_Literal 0x0
135f e407 | | Load 0x2,0x7
1360 e5ff | | Load 0x2,-0x1
1361 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1362 01d7 | | Execute Vector,Field_Read
1363 823a | : | Call 0x1,0x3a
1364 BODY_1358:
1364 00d8 | | Load_Top At_Offset_0
1365 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1366 6804 |h | Jump_Zero 0x136b
1367 00d8 | | Load_Top At_Offset_0
1368 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1369 e402 | | Load 0x2,0x2
136a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
136b 00d8 | | Load_Top At_Offset_0
136c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
136d 6815 |h | Jump_Zero 0x1383
136e 00d8 | | Load_Top At_Offset_0
136f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1370 e403 | | Load 0x2,0x3
1371 00d8 | | Load_Top At_Offset_0
1372 00db | | Load_Top At_Offset_3
1373 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1374 0273 | s | Execute Discrete,Plus
1375 0aff | | Execute_Immediate Plus,-0x1
1376 00d8 | | Load_Top At_Offset_0
1377 00e2 | | Load_Encached Integer_Cache
1378 0260 | ` | Execute Discrete,In_Type
1379 7001 |p | Jump_Nonzero 0x137b
137a 0801 | | Execute_Immediate Raise,0x1
137b e402 | | Load 0x2,0x2
137c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
137d 01ce | | Execute Vector,Slice_Write
137e e403 | | Load 0x2,0x3
137f 00d9 | | Load_Top At_Offset_1
1380 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1381 0273 | s | Execute Discrete,Plus
1382 c403 | | Store 0x2,0x3
1383 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1384 0000 0000 | | .BLANK 0000[0x4]
1388 ; --------------------------------------------------------------------------------------
1388 ; SUBPROGRAM
1388 ; --------------------------------------------------------------------------------------
1388 13b8 | | .CONST 0x13b8 ; Address of begin
1389 0004 | | .CONST 0x0004 ; Address of exception handler
138a 0003 | | .CONST 0x0003 ; Number of locals
138b INIT_1388:
138b e5fd | | Load 0x2,-0x3
138c e5fe | | Load 0x2,-0x2
138d 4801 |H | Short_Literal 0x1
138e e005 | | Load 0x0,0x5
138f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1390 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1391 1c08 | | Execute_Immediate Run_Utility,0x8
1392 4801 |H | Short_Literal 0x1
1393 4801 |H | Short_Literal 0x1
1394 e005 | | Load 0x0,0x5
1395 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1396 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1397 0334 | 4 | Declare_Variable Array,With_Constraint
1398 e404 | | Load 0x2,0x4
1399 4801 |H | Short_Literal 0x1
139a 00da | | Load_Top At_Offset_2
139b 01d6 | | Execute Vector,Field_Write
139c 00d9 | | Load_Top At_Offset_1
139d 00d8 | | Load_Top At_Offset_0
139e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
139f 00da | | Load_Top At_Offset_2
13a0 01da | | Execute Vector,Bounds
13a1 00da | | Load_Top At_Offset_2
13a2 01da | | Execute Vector,Bounds
13a3 00da | | Load_Top At_Offset_2
13a4 027f | | Execute Discrete,Equal
13a5 7001 |p | Jump_Nonzero 0x13a7
13a6 08e0 | | Execute_Immediate Raise,0xe0
13a7 00cd | | Action Spare6_Action
13a8 027f | | Execute Discrete,Equal
13a9 7001 |p | Jump_Nonzero 0x13ab
13aa 08e0 | | Execute_Immediate Raise,0xe0
13ab 00d2 | | Pop_Control Pop_Count_2
13ac 00d9 | | Load_Top At_Offset_1
13ad 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
13ae 4800 |H | Short_Literal 0x0
13af 00d9 | | Load_Top At_Offset_1
13b0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
13b1 8239 | 9 | Call 0x1,0x39
13b2 4801 |H | Short_Literal 0x1
13b3 e5fd | | Load 0x2,-0x3
13b4 e5fe | | Load 0x2,-0x2
13b5 4800 |H | Short_Literal 0x0
13b6 e602 | | Load 0x3,0x2
13b7 823b | ; | Call 0x1,0x3b
13b8 BODY_1388:
13b8 00d8 | | Load_Top At_Offset_0
13b9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
13ba 6804 |h | Jump_Zero 0x13bf
13bb 00d8 | | Load_Top At_Offset_0
13bc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
13bd e402 | | Load 0x2,0x2
13be 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
13bf 00d8 | | Load_Top At_Offset_0
13c0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
13c1 6815 |h | Jump_Zero 0x13d7
13c2 00d8 | | Load_Top At_Offset_0
13c3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
13c4 e403 | | Load 0x2,0x3
13c5 00d8 | | Load_Top At_Offset_0
13c6 00db | | Load_Top At_Offset_3
13c7 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
13c8 0273 | s | Execute Discrete,Plus
13c9 0aff | | Execute_Immediate Plus,-0x1
13ca 00d8 | | Load_Top At_Offset_0
13cb 00e2 | | Load_Encached Integer_Cache
13cc 0260 | ` | Execute Discrete,In_Type
13cd 7001 |p | Jump_Nonzero 0x13cf
13ce 0801 | | Execute_Immediate Raise,0x1
13cf e402 | | Load 0x2,0x2
13d0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
13d1 01ce | | Execute Vector,Slice_Write
13d2 e403 | | Load 0x2,0x3
13d3 00d9 | | Load_Top At_Offset_1
13d4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
13d5 0273 | s | Execute Discrete,Plus
13d6 c403 | | Store 0x2,0x3
13d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
13d8 ; --------------------------------------------------------------------------------------
13d8 ; SUBPROGRAM
13d8 ; --------------------------------------------------------------------------------------
13d8 13e4 | | .CONST 0x13e4 ; Address of begin
13d9 0004 | | .CONST 0x0004 ; Address of exception handler
13da 0002 | | .CONST 0x0002 ; Number of locals
13db INIT_13d8:
13db 4801 |H | Short_Literal 0x1
13dc e5fd | | Load 0x2,-0x3
13dd e5fe | | Load 0x2,-0x2
13de 4800 |H | Short_Literal 0x0
13df e40a | | Load 0x2,0xa
13e0 e5ff | | Load 0x2,-0x1
13e1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
13e2 01d7 | | Execute Vector,Field_Read
13e3 823a | : | Call 0x1,0x3a
13e4 BODY_13d8:
13e4 00d8 | | Load_Top At_Offset_0
13e5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
13e6 6804 |h | Jump_Zero 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 140e | | .CONST 0x140e ; Address of begin
1409 0004 | | .CONST 0x0004 ; Address of exception handler
140a 0003 | | .CONST 0x0003 ; Number of locals
140b INIT_1408:
140b 00e3 | | Load_Encached Natural_Cache
140c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
140d 00e1 | | Load_Encached Boolean_Cache
140e BODY_1408:
140e e7ff | | Load 0x3,-0x1
140f e005 | | Load 0x0,0x5
1410 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1411 180f | | Execute Package,Field_Execute,Field_Number 0xf
1412 7012 |p | Jump_Nonzero 0x1425
1413 e5fd | | Load 0x2,-0x3
1414 e7ff | | Load 0x3,-0x1
1415 e005 | | Load 0x0,0x5
1416 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1417 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1418 680c |h | Jump_Zero 0x1425
1419 00e1 | | Load_Encached Boolean_Cache
141a 00da | | Load_Top At_Offset_2
141b e7ff | | Load 0x3,-0x1
141c e406 | | Load 0x2,0x6
141d e22b | + | Load 0x1,0x2b
141e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
141f 005b | [ | Store_Top Discrete,At_Offset_3
1420 0059 | Y | Store_Top Discrete,At_Offset_1
1421 00d8 | | Load_Top At_Offset_0
1422 7002 |p | Jump_Nonzero 0x1425
1423 4801 |H | Short_Literal 0x1
1424 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1425 4800 |H | Short_Literal 0x0
1426 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1427 0000 | | .XXX[0x1]
1428 ; --------------------------------------------------------------------------------------
1428 ; SUBPROGRAM
1428 ; --------------------------------------------------------------------------------------
1428 142b | + | .CONST 0x142b ; Address of begin
1429 0004 | | .CONST 0x0004 ; Address of exception handler
142a 0001 | | .CONST 0x0001 ; Number of locals
142b BODY_1428:
142b INIT_1428:
142b 4800 |H | Short_Literal 0x0
142c e7fe | | Load 0x3,-0x2
142d e7ff | | Load 0x3,-0x1
142e e406 | | Load 0x2,0x6
142f e22b | + | Load 0x1,0x2b
1430 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1431 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1432 0000 0000 | | .BLANK 0000[0x6]
1438 ; --------------------------------------------------------------------------------------
1438 ; SUBPROGRAM
1438 ; --------------------------------------------------------------------------------------
1438 143b | ; | .CONST 0x143b ; Address of begin
1439 0004 | | .CONST 0x0004 ; Address of exception handler
143a 0001 | | .CONST 0x0001 ; Number of locals
143b BODY_1438:
143b INIT_1438:
143b e5fd | | Load 0x2,-0x3
143c e002 | | Load 0x0,0x2
143d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
143e 4801 |H | Short_Literal 0x1
143f 4802 |H | Short_Literal 0x2
1440 e012 | | Load 0x0,0x12
1441 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1442 0334 | 4 | Declare_Variable Array,With_Constraint
1443 e7ff | | Load 0x3,-0x1
1444 e005 | | Load 0x0,0x5
1445 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1446 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1447 4801 |H | Short_Literal 0x1
1448 00da | | Load_Top At_Offset_2
1449 01d6 | | Execute Vector,Field_Write
144a e7ff | | Load 0x3,-0x1
144b e005 | | Load 0x0,0x5
144c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
144d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
144e 4802 |H | Short_Literal 0x2
144f 00da | | Load_Top At_Offset_2
1450 01d6 | | Execute Vector,Field_Write
1451 480a |H | Short_Literal 0xa
1452 e5fc | | Load 0x2,-0x4
1453 e015 | | Load 0x0,0x15
1454 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1455 00db | | Load_Top At_Offset_3
1456 00db | | Load_Top At_Offset_3
1457 840d | | Call 0x2,0xd
1458 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1459 0000 0000 | | .BLANK 0000[0x7]
1460 ; --------------------------------------------------------------------------------------
1460 ; SUBPROGRAM
1460 ; --------------------------------------------------------------------------------------
1460 1479 | y | .CONST 0x1479 ; Address of begin
1461 14b0 | | .CONST 0x14b0 ; Address of exception handler
1462 0007 | | .CONST 0x0007 ; Number of locals
1463 INIT_1460:
1463 e22a | * | Load 0x1,0x2a
1464 1b13 | | Execute Package,Field_Read,Field_Number 0x13
1465 4800 |H | Short_Literal 0x0
1466 e005 | | Load 0x0,0x5
1467 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1468 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1469 1c08 | | Execute_Immediate Run_Utility,0x8
146a e005 | | Load 0x0,0x5
146b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
146c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
146d 00d9 | | Load_Top At_Offset_1
146e 016d | m | Execute Variant_Record,Structure_Write
146f e005 | | Load 0x0,0x5
1470 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1471 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1472 e005 | | Load 0x0,0x5
1473 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1474 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1475 029f 18c3 | | Declare_Subprogram INIT_18c0,For_Call
1477 029f 190b | | Declare_Subprogram INIT_1908,For_Call
1479 BODY_1460:
1479 e22a | * | Load 0x1,0x2a
147a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
147b e011 | | Load 0x0,0x11
147c 180d | | Execute Package,Field_Execute,Field_Number 0xd
147d e22a | * | Load 0x1,0x2a
147e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
147f c602 | | Store 0x3,0x2
1480 e7ff | | Load 0x3,-0x1
1481 0033 | 3 | Store_Top Heap_Access,At_Offset_3
1482 00cf | | Action Mark_Auxiliary
1483 7811 |x | Jump 0x1495
1484 00db | | Load_Top At_Offset_3
1485 e005 | | Load 0x0,0x5
1486 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1487 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1488 a604 | | Store_Unchecked 0x3,0x4
1489 e604 | | Load 0x3,0x4
148a e005 | | Load 0x0,0x5
148b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
148c 180f | | Execute Package,Field_Execute,Field_Number 0xf
148d 7001 |p | Jump_Nonzero 0x148f
148e 780b |x | Jump 0x149a
148f 00db | | Load_Top At_Offset_3
1490 e005 | | Load 0x0,0x5
1491 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1492 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
1493 a605 | | Store_Unchecked 0x3,0x5
1494 00c9 | | Action Pop_Auxiliary_Loop
1495 00db | | Load_Top At_Offset_3
1496 e005 | | Load 0x0,0x5
1497 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1498 180f | | Execute Package,Field_Execute,Field_Number 0xf
1499 6fea |o | Jump_Zero 0x1484
149a 00ce | | Action Pop_Auxiliary
149b 00db | | Load_Top At_Offset_3
149c e005 | | Load 0x0,0x5
149d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
149e 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
149f 6808 |h | Jump_Zero 0x14a8
14a0 4800 |H | Short_Literal 0x0
14a1 4801 |H | Short_Literal 0x1
14a2 e604 | | Load 0x3,0x4
14a3 e602 | | Load 0x3,0x2
14a4 e22a | * | Load 0x1,0x2a
14a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
14a6 8606 | | Call 0x3,0x6
14a7 7807 |x | Jump 0x14af
14a8 4800 |H | Short_Literal 0x0
14a9 4801 |H | Short_Literal 0x1
14aa e7ff | | Load 0x3,-0x1
14ab e602 | | Load 0x3,0x2
14ac e22a | * | Load 0x1,0x2a
14ad 1818 | | Execute Package,Field_Execute,Field_Number 0x18
14ae 8607 | | Call 0x3,0x7
14af 0831 | 1 | Execute_Immediate Raise,0x31
14b0 TRAP_1460:
14b0 0007 | | Action Break_Optional
14b1 e602 | | Load 0x3,0x2
14b2 e22a | * | Load 0x1,0x2a
14b3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
14b4 4801 |H | Short_Literal 0x1
14b5 4802 |H | Short_Literal 0x2
14b6 e012 | | Load 0x0,0x12
14b7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
14b8 0334 | 4 | Declare_Variable Array,With_Constraint
14b9 e7fe | | Load 0x3,-0x2
14ba e013 | | Load 0x0,0x13
14bb 1820 | | Execute Package,Field_Execute,Field_Number 0x20
14bc 4801 |H | Short_Literal 0x1
14bd 00da | | Load_Top At_Offset_2
14be 01d6 | | Execute Vector,Field_Write
14bf e7ff | | Load 0x3,-0x1
14c0 e005 | | Load 0x0,0x5
14c1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14c2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
14c3 4802 |H | Short_Literal 0x2
14c4 00da | | Load_Top At_Offset_2
14c5 01d6 | | Execute Vector,Field_Write
14c6 6009 |` | Indirect_Literal Discrete,0x14d0,{0x00000000, 0x00003811}
14c7 e014 | | Load 0x0,0x14
14c8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
14c9 e603 | | Load 0x3,0x3
14ca 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
14cb e603 | | Load 0x3,0x3
14cc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
14cd 0000 0000 | | .XXX[0x3]
14cf 0000 | |
14d0 0000 0000 | | .LITERAL {0x00000000, 0x00003811}
14d4 0000 0000 | | .BLANK 0000[0x4]
14d8 ; --------------------------------------------------------------------------------------
14d8 ; SUBPROGRAM
14d8 ; --------------------------------------------------------------------------------------
14d8 14e4 | | .CONST 0x14e4 ; Address of begin
14d9 0004 | | .CONST 0x0004 ; Address of exception handler
14da 0004 | | .CONST 0x0004 ; Number of locals
14db INIT_14d8:
14db 00e1 | | Load_Encached Boolean_Cache
14dc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
14dd 00db | | Load_Top At_Offset_3
14de 0007 | | Action Break_Optional
14df e002 | | Load 0x0,0x2
14e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
14e1 02c7 | | Declare_Variable Any
14e2 00d8 | | Load_Top At_Offset_0
14e3 1c00 | | Execute_Immediate Run_Utility,0x0
14e4 BODY_14d8:
14e4 00d9 | | Load_Top At_Offset_1
14e5 e005 | | Load 0x0,0x5
14e6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14e7 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
14e8 0032 | 2 | Store_Top Heap_Access,At_Offset_2
14e9 00cf | | Action Mark_Auxiliary
14ea 7826 |x& | Jump 0x1511
14eb 00da | | Load_Top At_Offset_2
14ec e005 | | Load 0x0,0x5
14ed 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14ee 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
14ef c604 | | Store 0x3,0x4
14f0 e5fd | | Load 0x2,-0x3
14f1 00db | | Load_Top At_Offset_3
14f2 e005 | | Load 0x0,0x5
14f3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14f4 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
14f5 00da | | Load_Top At_Offset_2
14f6 8227 | ' | Call 0x1,0x27
14f7 7008 |p | Jump_Nonzero 0x1500
14f8 e5fd | | Load 0x2,-0x3
14f9 00db | | Load_Top At_Offset_3
14fa e005 | | Load 0x0,0x5
14fb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
14fc 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
14fd 00da | | Load_Top At_Offset_2
14fe 8227 | ' | Call 0x1,0x27
14ff 7801 |x | Jump 0x1501
1500 4801 |H | Short_Literal 0x1
1501 a602 | | Store_Unchecked 0x3,0x2
1502 00db | | Load_Top At_Offset_3
1503 6802 |h | Jump_Zero 0x1506
1504 4801 |H | Short_Literal 0x1
1505 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1506 00da | | Load_Top At_Offset_2
1507 e005 | | Load 0x0,0x5
1508 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1509 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
150a 6809 |h | Jump_Zero 0x1514
150b 00da | | Load_Top At_Offset_2
150c e005 | | Load 0x0,0x5
150d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
150e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
150f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
1510 00c9 | | Action Pop_Auxiliary_Loop
1511 00da | | Load_Top At_Offset_2
1512 840c | | Call 0x2,0xc
1513 77d7 |w | Jump_Nonzero 0x14eb
1514 00ce | | Action Pop_Auxiliary
1515 4800 |H | Short_Literal 0x0
1516 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1517 0000 | | .XXX[0x1]
1518 ; --------------------------------------------------------------------------------------
1518 ; SUBPROGRAM
1518 ; --------------------------------------------------------------------------------------
1518 1528 | ( | .CONST 0x1528 ; Address of begin
1519 0004 | | .CONST 0x0004 ; Address of exception handler
151a 0006 | | .CONST 0x0006 ; Number of locals
151b INIT_1518:
151b 00e1 | | Load_Encached Boolean_Cache
151c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
151d 00db | | Load_Top At_Offset_3
151e 0007 | | Action Break_Optional
151f e002 | | Load 0x0,0x2
1520 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1521 02c7 | | Declare_Variable Any
1522 00d8 | | Load_Top At_Offset_0
1523 1c00 | | Execute_Immediate Run_Utility,0x0
1524 029f 1923 | #| Declare_Subprogram INIT_1920,For_Call
1526 029f 195b | [| Declare_Subprogram INIT_1958,For_Call
1528 BODY_1518:
1528 00db | | Load_Top At_Offset_3
1529 e005 | | Load 0x0,0x5
152a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
152b 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
152c a603 | | Store_Unchecked 0x3,0x3
152d 00cf | | Action Mark_Auxiliary
152e 7819 |x | Jump 0x1548
152f e5fd | | Load 0x2,-0x3
1530 4800 |H | Short_Literal 0x0
1531 e603 | | Load 0x3,0x3
1532 e005 | | Load 0x0,0x5
1533 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1534 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
1535 c604 | | Store 0x3,0x4
1536 e40a | | Load 0x2,0xa
1537 7002 |p | Jump_Nonzero 0x153a
1538 e40b | | Load 0x2,0xb
1539 6802 |h | Jump_Zero 0x153c
153a 8605 | | Call 0x3,0x5
153b 7801 |x | Jump 0x153d
153c 8606 | | Call 0x3,0x6
153d e603 | | Load 0x3,0x3
153e e005 | | Load 0x0,0x5
153f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1540 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
1541 6809 |h | Jump_Zero 0x154b
1542 e603 | | Load 0x3,0x3
1543 e005 | | Load 0x0,0x5
1544 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1545 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
1546 a603 | | Store_Unchecked 0x3,0x3
1547 00c9 | | Action Pop_Auxiliary_Loop
1548 e603 | | Load 0x3,0x3
1549 840c | | Call 0x2,0xc
154a 77e4 |w | Jump_Nonzero 0x152f
154b 00ce | | Action Pop_Auxiliary
154c 4800 |H | Short_Literal 0x0
154d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
154e 0000 0000 | | .XXX[0x2]
1550 ; --------------------------------------------------------------------------------------
1550 ; SUBPROGRAM
1550 ; --------------------------------------------------------------------------------------
1550 1568 | h | .CONST 0x1568 ; Address of begin
1551 0004 | | .CONST 0x0004 ; Address of exception handler
1552 0004 | | .CONST 0x0004 ; Number of locals
1553 INIT_1550:
1553 e402 | | Load 0x2,0x2
1554 e005 | | Load 0x0,0x5
1555 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1556 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
1557 4801 |H | Short_Literal 0x1
1558 00d9 | | Load_Top At_Offset_1
1559 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
155a 01db | | Execute Vector,Length
155b 0a03 | | Execute_Immediate Plus,0x3
155c 00d8 | | Load_Top At_Offset_0
155d 00e2 | | Load_Encached Integer_Cache
155e 0260 | ` | Execute Discrete,In_Type
155f 7001 |p | Jump_Nonzero 0x1561
1560 0801 | | Execute_Immediate Raise,0x1
1561 e012 | | Load 0x0,0x12
1562 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1563 035b | [ | Declare_Type Array,Constrained
1564 0337 | 7 | Declare_Variable Array
1565 e005 | | Load 0x0,0x5
1566 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1567 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1568 BODY_1550:
1568 e404 | | Load 0x2,0x4
1569 e005 | | Load 0x0,0x5
156a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
156b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
156c 4801 |H | Short_Literal 0x1
156d 00db | | Load_Top At_Offset_3
156e 01d6 | | Execute Vector,Field_Write
156f e404 | | Load 0x2,0x4
1570 e005 | | Load 0x0,0x5
1571 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1572 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1573 4802 |H | Short_Literal 0x2
1574 00db | | Load_Top At_Offset_3
1575 01d6 | | Execute Vector,Field_Write
1576 e402 | | Load 0x2,0x2
1577 e005 | | Load 0x0,0x5
1578 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1579 1810 | | Execute Package,Field_Execute,Field_Number 0x10
157a 4803 |H | Short_Literal 0x3
157b 00db | | Load_Top At_Offset_3
157c 01d6 | | Execute Vector,Field_Write
157d 00cf | | Action Mark_Auxiliary
157e 00db | | Load_Top At_Offset_3
157f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1580 01d9 | | Execute Vector,Reverse_Bounds
1581 0263 | c | Execute Discrete,Above_Bound
1582 7049 |pI | Jump_Nonzero 0x15cc
1583 00d8 | | Load_Top At_Offset_0
1584 e602 | | Load 0x3,0x2
1585 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1586 01d7 | | Execute Vector,Field_Read
1587 a604 | | Store_Unchecked 0x3,0x4
1588 e5fd | | Load 0x2,-0x3
1589 e604 | | Load 0x3,0x4
158a e005 | | Load 0x0,0x5
158b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
158c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
158d 702a |p* | Jump_Nonzero 0x15b8
158e e406 | | Load 0x2,0x6
158f e22b | + | Load 0x1,0x2b
1590 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1591 4801 |H | Short_Literal 0x1
1592 4804 |H | Short_Literal 0x4
1593 e012 | | Load 0x0,0x12
1594 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1595 0334 | 4 | Declare_Variable Array,With_Constraint
1596 e402 | | Load 0x2,0x2
1597 e005 | | Load 0x0,0x5
1598 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1599 1810 | | Execute Package,Field_Execute,Field_Number 0x10
159a 4801 |H | Short_Literal 0x1
159b 00da | | Load_Top At_Offset_2
159c 01d6 | | Execute Vector,Field_Write
159d e604 | | Load 0x3,0x4
159e e005 | | Load 0x0,0x5
159f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
15a0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
15a1 4802 |H | Short_Literal 0x2
15a2 00da | | Load_Top At_Offset_2
15a3 01d6 | | Execute Vector,Field_Write
15a4 e5fe | | Load 0x2,-0x2
15a5 e013 | | Load 0x0,0x13
15a6 1820 | | Execute Package,Field_Execute,Field_Number 0x20
15a7 4803 |H | Short_Literal 0x3
15a8 00da | | Load_Top At_Offset_2
15a9 01d6 | | Execute Vector,Field_Write
15aa e5fd | | Load 0x2,-0x3
15ab e016 | | Load 0x0,0x16
15ac 181c | | Execute Package,Field_Execute,Field_Number 0x1c
15ad 4804 |H | Short_Literal 0x4
15ae 00da | | Load_Top At_Offset_2
15af 01d6 | | Execute Vector,Field_Write
15b0 6027 |`' | Indirect_Literal Discrete,0x15d8,{0x00000000, 0x00003803}
15b1 e014 | | Load 0x0,0x14
15b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
15b3 e5fc | | Load 0x2,-0x4
15b4 e015 | | Load 0x0,0x15
15b5 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
15b6 00cc | | Action Pop_Block
15b7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
15b8 e407 | | Load 0x2,0x7
15b9 00d9 | | Load_Top At_Offset_1
15ba 0273 | s | Execute Discrete,Plus
15bb 00d8 | | Load_Top At_Offset_0
15bc 00e3 | | Load_Encached Natural_Cache
15bd 0260 | ` | Execute Discrete,In_Type
15be 7001 |p | Jump_Nonzero 0x15c0
15bf 0801 | | Execute_Immediate Raise,0x1
15c0 e604 | | Load 0x3,0x4
15c1 840d | | Call 0x2,0xd
15c2 00db | | Load_Top At_Offset_3
15c3 e005 | | Load 0x0,0x5
15c4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
15c5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
15c6 00d9 | | Load_Top At_Offset_1
15c7 0a03 | | Execute_Immediate Plus,0x3
15c8 e603 | | Load 0x3,0x3
15c9 01d6 | | Execute Vector,Field_Write
15ca 00c8 | | Action Pop_Auxiliary_Range
15cb 3fb7 |? | Loop_Increasing 0x1583
15cc 00ce | | Action Pop_Auxiliary
15cd e5fd | | Load 0x2,-0x3
15ce e002 | | Load 0x0,0x2
15cf 1812 | | Execute Package,Field_Execute,Field_Number 0x12
15d0 00db | | Load_Top At_Offset_3
15d1 480c |H | Short_Literal 0xc
15d2 e5fc | | Load 0x2,-0x4
15d3 e015 | | Load 0x0,0x15
15d4 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
15d5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
15d6 0000 0000 | | .XXX[0x2]
15d8 0000 0000 | | .LITERAL {0x00000000, 0x00003803}
15dc 0000 0000 | | .BLANK 0000[0x4]
15e0 ; --------------------------------------------------------------------------------------
15e0 ; SUBPROGRAM
15e0 ; --------------------------------------------------------------------------------------
15e0 15e3 | | .CONST 0x15e3 ; Address of begin
15e1 0004 | | .CONST 0x0004 ; Address of exception handler
15e2 0001 | | .CONST 0x0001 ; Number of locals
15e3 BODY_15e0:
15e3 INIT_15e0:
15e3 00da | | Load_Top At_Offset_2
15e4 e005 | | Load 0x0,0x5
15e5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
15e6 1886 | | Execute Package,Field_Execute,Field_Number 0x86
15e7 700f |p | Jump_Nonzero 0x15f7
15e8 00db | | Load_Top At_Offset_3
15e9 e005 | | Load 0x0,0x5
15ea 1b16 | | Execute Package,Field_Read,Field_Number 0x16
15eb 1886 | | Execute Package,Field_Execute,Field_Number 0x86
15ec 700a |p | Jump_Nonzero 0x15f7
15ed 00da | | Load_Top At_Offset_2
15ee e005 | | Load 0x0,0x5
15ef 1b16 | | Execute Package,Field_Read,Field_Number 0x16
15f0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
15f1 e7fe | | Load 0x3,-0x2
15f2 e005 | | Load 0x0,0x5
15f3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
15f4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
15f5 027e | ~ | Execute Discrete,Not_Equal
15f6 6802 |h | Jump_Zero 0x15f9
15f7 4800 |H | Short_Literal 0x0
15f8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
15f9 4800 |H | Short_Literal 0x0
15fa e7fe | | Load 0x3,-0x2
15fb e005 | | Load 0x0,0x5
15fc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
15fd 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
15fe e7ff | | Load 0x3,-0x1
15ff e005 | | Load 0x0,0x5
1600 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1601 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1602 e017 | | Load 0x0,0x17
1603 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1604 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1605 0000 0000 | | .XXX[0x3]
1607 0000 | |
1608 ; --------------------------------------------------------------------------------------
1608 ; SUBPROGRAM
1608 ; --------------------------------------------------------------------------------------
1608 160b | | .CONST 0x160b ; Address of begin
1609 0004 | | .CONST 0x0004 ; Address of exception handler
160a 0001 | | .CONST 0x0001 ; Number of locals
160b BODY_1608:
160b INIT_1608:
160b 4801 |H | Short_Literal 0x1
160c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
160d 0000 0000 | | .XXX[0x3]
160f 0000 | |
1610 ; --------------------------------------------------------------------------------------
1610 ; SUBPROGRAM
1610 ; --------------------------------------------------------------------------------------
1610 1624 | $ | .CONST 0x1624 ; Address of begin
1611 0004 | | .CONST 0x0004 ; Address of exception handler
1612 0005 | | .CONST 0x0005 ; Number of locals
1613 INIT_1610:
1613 00db | | Load_Top At_Offset_3
1614 e013 | | Load 0x0,0x13
1615 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1616 00db | | Load_Top At_Offset_3
1617 e005 | | Load 0x0,0x5
1618 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1619 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
161a 4801 |H | Short_Literal 0x1
161b 00da | | Load_Top At_Offset_2
161c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
161d e005 | | Load 0x0,0x5
161e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
161f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1620 035b | [ | Declare_Type Array,Constrained
1621 0337 | 7 | Declare_Variable Array
1622 00e3 | | Load_Encached Natural_Cache
1623 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1624 BODY_1610:
1624 00cf | | Action Mark_Auxiliary
1625 e602 | | Load 0x3,0x2
1626 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1627 01d9 | | Execute Vector,Reverse_Bounds
1628 0263 | c | Execute Discrete,Above_Bound
1629 7021 |p! | Jump_Nonzero 0x164b
162a 4801 |H | Short_Literal 0x1
162b 00d9 | | Load_Top At_Offset_1
162c e602 | | Load 0x3,0x2
162d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
162e 01d7 | | Execute Vector,Field_Read
162f e005 | | Load 0x0,0x5
1630 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1631 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1632 e603 | | Load 0x3,0x3
1633 e017 | | Load 0x0,0x17
1634 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
1635 7013 |p | Jump_Nonzero 0x1649
1636 00d8 | | Load_Top At_Offset_0
1637 e602 | | Load 0x3,0x2
1638 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1639 01d7 | | Execute Vector,Field_Read
163a e7ff | | Load 0x3,-0x1
163b e005 | | Load 0x0,0x5
163c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
163d 1884 | | Execute Package,Field_Execute,Field_Number 0x84
163e 680a |h | Jump_Zero 0x1649
163f 00d8 | | Load_Top At_Offset_0
1640 e602 | | Load 0x3,0x2
1641 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1642 01d7 | | Execute Vector,Field_Read
1643 e605 | | Load 0x3,0x5
1644 e604 | | Load 0x3,0x4
1645 01d6 | | Execute Vector,Field_Write
1646 00db | | Load_Top At_Offset_3
1647 0a01 | | Execute_Immediate Plus,0x1
1648 c605 | | Store 0x3,0x5
1649 00c8 | | Action Pop_Auxiliary_Range
164a 3fdf |? | Loop_Increasing 0x162a
164b 00ce | | Action Pop_Auxiliary
164c 4801 |H | Short_Literal 0x1
164d 00d9 | | Load_Top At_Offset_1
164e 0aff | | Execute_Immediate Plus,-0x1
164f 00db | | Load_Top At_Offset_3
1650 01cf | | Execute Vector,Slice_Read
1651 e005 | | Load 0x0,0x5
1652 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1653 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1654 01c6 | | Execute Vector,Convert_To_Formal
1655 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1656 0000 0000 | | .XXX[0x2]
1658 ; --------------------------------------------------------------------------------------
1658 ; SUBPROGRAM
1658 ; --------------------------------------------------------------------------------------
1658 1679 | y | .CONST 0x1679 ; Address of begin
1659 0004 | | .CONST 0x0004 ; Address of exception handler
165a 0006 | | .CONST 0x0006 ; Number of locals
165b INIT_1658:
165b 00db | | Load_Top At_Offset_3
165c 00db | | Load_Top At_Offset_3
165d e013 | | Load 0x0,0x13
165e 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
165f 00db | | Load_Top At_Offset_3
1660 e005 | | Load 0x0,0x5
1661 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1662 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
1663 4801 |H | Short_Literal 0x1
1664 00da | | Load_Top At_Offset_2
1665 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1666 e005 | | Load 0x0,0x5
1667 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1668 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1669 035b | [ | Declare_Type Array,Constrained
166a 0337 | 7 | Declare_Variable Array
166b 00da | | Load_Top At_Offset_2
166c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
166d 00d9 | | Load_Top At_Offset_1
166e 01d4 | | Execute Vector,Structure_Write
166f 4801 |H | Short_Literal 0x1
1670 00db | | Load_Top At_Offset_3
1671 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1672 e005 | | Load 0x0,0x5
1673 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1674 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1675 035b | [ | Declare_Type Array,Constrained
1676 0337 | 7 | Declare_Variable Array
1677 00e3 | | Load_Encached Natural_Cache
1678 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
1679 BODY_1658:
1679 00cf | | Action Mark_Auxiliary
167a 00db | | Load_Top At_Offset_3
167b 01d9 | | Execute Vector,Reverse_Bounds
167c 0263 | c | Execute Discrete,Above_Bound
167d 701d |p | Jump_Nonzero 0x169b
167e 00d8 | | Load_Top At_Offset_0
167f e604 | | Load 0x3,0x4
1680 01d7 | | Execute Vector,Field_Read
1681 e005 | | Load 0x0,0x5
1682 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1683 1886 | | Execute Package,Field_Execute,Field_Number 0x86
1684 7014 |p | Jump_Nonzero 0x1699
1685 4801 |H | Short_Literal 0x1
1686 00d9 | | Load_Top At_Offset_1
1687 e604 | | Load 0x3,0x4
1688 01d7 | | Execute Vector,Field_Read
1689 e005 | | Load 0x0,0x5
168a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
168b 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
168c e603 | | Load 0x3,0x3
168d e017 | | Load 0x0,0x17
168e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
168f 7009 |p | Jump_Nonzero 0x1699
1690 00d8 | | Load_Top At_Offset_0
1691 e604 | | Load 0x3,0x4
1692 01d7 | | Execute Vector,Field_Read
1693 e606 | | Load 0x3,0x6
1694 e605 | | Load 0x3,0x5
1695 01d6 | | Execute Vector,Field_Write
1696 00db | | Load_Top At_Offset_3
1697 0a01 | | Execute_Immediate Plus,0x1
1698 c606 | | Store 0x3,0x6
1699 00c8 | | Action Pop_Auxiliary_Range
169a 3fe3 |? | Loop_Increasing 0x167e
169b 00ce | | Action Pop_Auxiliary
169c 4801 |H | Short_Literal 0x1
169d e602 | | Load 0x3,0x2
169e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
169f 0aff | | Execute_Immediate Plus,-0x1
16a0 00db | | Load_Top At_Offset_3
16a1 01cf | | Execute Vector,Slice_Read
16a2 e005 | | Load 0x0,0x5
16a3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
16a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
16a5 01c6 | | Execute Vector,Convert_To_Formal
16a6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
16a7 0000 | | .XXX[0x1]
16a8 ; --------------------------------------------------------------------------------------
16a8 ; SUBPROGRAM
16a8 ; --------------------------------------------------------------------------------------
16a8 16af | | .CONST 0x16af ; Address of begin
16a9 0004 | | .CONST 0x0004 ; Address of exception handler
16aa 0004 | | .CONST 0x0004 ; Number of locals
16ab INIT_16a8:
16ab 00e1 | | Load_Encached Boolean_Cache
16ac 00e1 | | Load_Encached Boolean_Cache
16ad 029f 198b | | Declare_Subprogram INIT_1988,For_Call
16af BODY_16a8:
16af 4800 |H | Short_Literal 0x0
16b0 e014 | | Load 0x0,0x14
16b1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
16b2 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
16b3 4801 |H | Short_Literal 0x1
16b4 e014 | | Load 0x0,0x14
16b5 181f | | Execute Package,Field_Execute,Field_Number 0x1f
16b6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
16b7 8604 | | Call 0x3,0x4
16b8 0831 | 1 | Execute_Immediate Raise,0x31
16b9 0000 0000 | | .BLANK 0000[0x7]
16c0 ; --------------------------------------------------------------------------------------
16c0 ; SUBPROGRAM
16c0 ; --------------------------------------------------------------------------------------
16c0 16c8 | | .CONST 0x16c8 ; Address of begin
16c1 0004 | | .CONST 0x0004 ; Address of exception handler
16c2 0003 | | .CONST 0x0003 ; Number of locals
16c3 INIT_16c0:
16c3 e5fe | | Load 0x2,-0x2
16c4 e402 | | Load 0x2,0x2
16c5 824b | K | Call 0x1,0x4b
16c6 029f 19a3 | | Declare_Subprogram INIT_19a0,For_Call
16c8 BODY_16c0:
16c8 00cf | | Action Mark_Auxiliary
16c9 00da | | Load_Top At_Offset_2
16ca 01d9 | | Execute Vector,Reverse_Bounds
16cb 0263 | c | Execute Discrete,Above_Bound
16cc 700a |p | Jump_Nonzero 0x16d7
16cd e404 | | Load 0x2,0x4
16ce e403 | | Load 0x2,0x3
16cf 01dc | | Execute Vector,Last
16d0 027d | } | Execute Discrete,Greater
16d1 6802 |h | Jump_Zero 0x16d4
16d2 00d2 | | Pop_Control Pop_Count_2
16d3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
16d4 8603 | | Call 0x3,0x3
16d5 00c8 | | Action Pop_Auxiliary_Range
16d6 3ff6 |? | Loop_Increasing 0x16cd
16d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
16d8 ; --------------------------------------------------------------------------------------
16d8 ; SUBPROGRAM
16d8 ; --------------------------------------------------------------------------------------
16d8 16dd | | .CONST 0x16dd ; Address of begin
16d9 16ec | | .CONST 0x16ec ; Address of exception handler
16da 0002 | | .CONST 0x0002 ; Number of locals
16db INIT_16d8:
16db 029f 19d3 | | Declare_Subprogram INIT_19d0,For_Call
16dd BODY_16d8:
16dd e22a | * | Load 0x1,0x2a
16de 1b13 | | Execute Package,Field_Read,Field_Number 0x13
16df e011 | | Load 0x0,0x11
16e0 180d | | Execute Package,Field_Execute,Field_Number 0xd
16e1 e22a | * | Load 0x1,0x2a
16e2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
16e3 c404 | | Store 0x2,0x4
16e4 4800 |H | Short_Literal 0x0
16e5 4801 |H | Short_Literal 0x1
16e6 e407 | | Load 0x2,0x7
16e7 e404 | | Load 0x2,0x4
16e8 e22a | * | Load 0x1,0x2a
16e9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
16ea 8602 | | Call 0x3,0x2
16eb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
16ec TRAP_16d8:
16ec 0007 | | Action Break_Optional
16ed e404 | | Load 0x2,0x4
16ee e22a | * | Load 0x1,0x2a
16ef 181d | | Execute Package,Field_Execute,Field_Number 0x1d
16f0 4801 |H | Short_Literal 0x1
16f1 4802 |H | Short_Literal 0x2
16f2 e012 | | Load 0x0,0x12
16f3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
16f4 0334 | 4 | Declare_Variable Array,With_Constraint
16f5 e5fe | | Load 0x2,-0x2
16f6 e013 | | Load 0x0,0x13
16f7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
16f8 4801 |H | Short_Literal 0x1
16f9 00da | | Load_Top At_Offset_2
16fa 01d6 | | Execute Vector,Field_Write
16fb e5ff | | Load 0x2,-0x1
16fc e005 | | Load 0x0,0x5
16fd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
16fe 1810 | | Execute Package,Field_Execute,Field_Number 0x10
16ff 4802 |H | Short_Literal 0x2
1700 00da | | Load_Top At_Offset_2
1701 01d6 | | Execute Vector,Field_Write
1702 6009 |` | Indirect_Literal Discrete,0x170c,{0x00000000, 0x0000380d}
1703 e014 | | Load 0x0,0x14
1704 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1705 e406 | | Load 0x2,0x6
1706 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
1707 e406 | | Load 0x2,0x6
1708 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1709 00cb | | Action Pop_Block_With_Result
170a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
170b 0000 | | .XXX[0x1]
170c 0000 0000 | | .LITERAL {0x00000000, 0x0000380d}
1710 ; --------------------------------------------------------------------------------------
1710 ; SUBPROGRAM
1710 ; --------------------------------------------------------------------------------------
1710 1713 | | .CONST 0x1713 ; Address of begin
1711 0004 | | .CONST 0x0004 ; Address of exception handler
1712 0001 | | .CONST 0x0001 ; Number of locals
1713 BODY_1710:
1713 INIT_1710:
1713 e40a | | Load 0x2,0xa
1714 e015 | | Load 0x0,0x15
1715 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
1716 0c02 | | Execute_Immediate Greater_Equal,0x2
1717 6812 |h | Jump_Zero 0x172a
1718 e40d | | Load 0x2,0xd
1719 e002 | | Load 0x0,0x2
171a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
171b 4801 |H | Short_Literal 0x1
171c 4801 |H | Short_Literal 0x1
171d e012 | | Load 0x0,0x12
171e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
171f 0334 | 4 | Declare_Variable Array,With_Constraint
1720 e40a | | Load 0x2,0xa
1721 e015 | | Load 0x0,0x15
1722 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
1723 4801 |H | Short_Literal 0x1
1724 00da | | Load_Top At_Offset_2
1725 01d6 | | Execute Vector,Field_Write
1726 4804 |H | Short_Literal 0x4
1727 e5fc | | Load 0x2,-0x4
1728 e015 | | Load 0x0,0x15
1729 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
172a e40a | | Load 0x2,0xa
172b e015 | | Load 0x0,0x15
172c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
172d 7006 |p | Jump_Nonzero 0x1734
172e e40a | | Load 0x2,0xa
172f e015 | | Load 0x0,0x15
1730 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1731 e5fc | | Load 0x2,-0x4
1732 e015 | | Load 0x0,0x15
1733 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
1734 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1735 0000 0000 | | .XXX[0x3]
1737 0000 | |
1738 ; --------------------------------------------------------------------------------------
1738 ; SUBPROGRAM
1738 ; --------------------------------------------------------------------------------------
1738 173b | ; | .CONST 0x173b ; Address of begin
1739 0004 | | .CONST 0x0004 ; Address of exception handler
173a 0001 | | .CONST 0x0001 ; Number of locals
173b BODY_1738:
173b INIT_1738:
173b e409 | | Load 0x2,0x9
173c a408 | | Store_Unchecked 0x2,0x8
173d e409 | | Load 0x2,0x9
173e e005 | | Load 0x0,0x5
173f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1740 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1741 824a | J | Call 0x1,0x4a
1742 a40d | | Store_Unchecked 0x2,0xd
1743 8411 | | Call 0x2,0x11
1744 e015 | | Load 0x0,0x15
1745 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1746 a40a | | Store_Unchecked 0x2,0xa
1747 e40d | | Load 0x2,0xd
1748 e002 | | Load 0x0,0x2
1749 1812 | | Execute Package,Field_Execute,Field_Number 0x12
174a 4801 |H | Short_Literal 0x1
174b 4801 |H | Short_Literal 0x1
174c e012 | | Load 0x0,0x12
174d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
174e 0334 | 4 | Declare_Variable Array,With_Constraint
174f e409 | | Load 0x2,0x9
1750 e005 | | Load 0x0,0x5
1751 1b16 | | Execute Package,Field_Read,Field_Number 0x16
1752 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
1753 4801 |H | Short_Literal 0x1
1754 00da | | Load_Top At_Offset_2
1755 01d6 | | Execute Vector,Field_Write
1756 4807 |H | Short_Literal 0x7
1757 e40a | | Load 0x2,0xa
1758 e015 | | Load 0x0,0x15
1759 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
175a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
175b 0000 0000 | | .BLANK 0000[0x5]
1760 ; --------------------------------------------------------------------------------------
1760 ; SUBPROGRAM
1760 ; --------------------------------------------------------------------------------------
1760 1766 | f | .CONST 0x1766 ; Address of begin
1761 0004 | | .CONST 0x0004 ; Address of exception handler
1762 0002 | | .CONST 0x0002 ; Number of locals
1763 INIT_1760:
1763 e40e | | Load 0x2,0xe
1764 e015 | | Load 0x0,0x15
1765 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1766 BODY_1760:
1766 00cf | | Action Mark_Auxiliary
1767 00d9 | | Load_Top At_Offset_1
1768 01d9 | | Execute Vector,Reverse_Bounds
1769 0263 | c | Execute Discrete,Above_Bound
176a 7008 |p | Jump_Nonzero 0x1773
176b e40a | | Load 0x2,0xa
176c 00d9 | | Load_Top At_Offset_1
176d e602 | | Load 0x3,0x2
176e 01d7 | | Execute Vector,Field_Read
176f e015 | | Load 0x0,0x15
1770 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1771 00c8 | | Action Pop_Auxiliary_Range
1772 3ff8 |? | Loop_Increasing 0x176b
1773 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1774 0000 0000 | | .BLANK 0000[0x4]
1778 ; --------------------------------------------------------------------------------------
1778 ; SUBPROGRAM
1778 ; --------------------------------------------------------------------------------------
1778 177b | { | .CONST 0x177b ; Address of begin
1779 0004 | | .CONST 0x0004 ; Address of exception handler
177a 0001 | | .CONST 0x0001 ; Number of locals
177b BODY_1778:
177b INIT_1778:
177b e407 | | Load 0x2,0x7
177c e015 | | Load 0x0,0x15
177d 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
177e 0c02 | | Execute_Immediate Greater_Equal,0x2
177f 6812 |h | Jump_Zero 0x1792
1780 e408 | | Load 0x2,0x8
1781 e002 | | Load 0x0,0x2
1782 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1783 4801 |H | Short_Literal 0x1
1784 4801 |H | Short_Literal 0x1
1785 e012 | | Load 0x0,0x12
1786 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1787 0334 | 4 | Declare_Variable Array,With_Constraint
1788 e407 | | Load 0x2,0x7
1789 e015 | | Load 0x0,0x15
178a 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
178b 4801 |H | Short_Literal 0x1
178c 00da | | Load_Top At_Offset_2
178d 01d6 | | Execute Vector,Field_Write
178e 4804 |H | Short_Literal 0x4
178f e5fc | | Load 0x2,-0x4
1790 e015 | | Load 0x0,0x15
1791 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1792 e407 | | Load 0x2,0x7
1793 e015 | | Load 0x0,0x15
1794 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
1795 7006 |p | Jump_Nonzero 0x179c
1796 e407 | | Load 0x2,0x7
1797 e015 | | Load 0x0,0x15
1798 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1799 e5fc | | Load 0x2,-0x4
179a e015 | | Load 0x0,0x15
179b 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
179c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
179d 0000 0000 | | .XXX[0x3]
179f 0000 | |
17a0 ; --------------------------------------------------------------------------------------
17a0 ; SUBPROGRAM
17a0 ; --------------------------------------------------------------------------------------
17a0 17a3 | | .CONST 0x17a3 ; Address of begin
17a1 0004 | | .CONST 0x0004 ; Address of exception handler
17a2 0001 | | .CONST 0x0001 ; Number of locals
17a3 BODY_17a0:
17a3 INIT_17a0:
17a3 e406 | | Load 0x2,0x6
17a4 a405 | | Store_Unchecked 0x2,0x5
17a5 e406 | | Load 0x2,0x6
17a6 e005 | | Load 0x0,0x5
17a7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
17a8 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
17a9 824a | J | Call 0x1,0x4a
17aa a408 | | Store_Unchecked 0x2,0x8
17ab 840a | | Call 0x2,0xa
17ac e015 | | Load 0x0,0x15
17ad 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
17ae a407 | | Store_Unchecked 0x2,0x7
17af e408 | | Load 0x2,0x8
17b0 e002 | | Load 0x0,0x2
17b1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
17b2 4801 |H | Short_Literal 0x1
17b3 4801 |H | Short_Literal 0x1
17b4 e012 | | Load 0x0,0x12
17b5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
17b6 0334 | 4 | Declare_Variable Array,With_Constraint
17b7 e406 | | Load 0x2,0x6
17b8 e005 | | Load 0x0,0x5
17b9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
17ba 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
17bb 4801 |H | Short_Literal 0x1
17bc 00da | | Load_Top At_Offset_2
17bd 01d6 | | Execute Vector,Field_Write
17be 4807 |H | Short_Literal 0x7
17bf e407 | | Load 0x2,0x7
17c0 e015 | | Load 0x0,0x15
17c1 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
17c2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
17c3 0000 0000 | | .BLANK 0000[0x5]
17c8 ; --------------------------------------------------------------------------------------
17c8 ; SUBPROGRAM
17c8 ; --------------------------------------------------------------------------------------
17c8 17ce | | .CONST 0x17ce ; Address of begin
17c9 0004 | | .CONST 0x0004 ; Address of exception handler
17ca 0002 | | .CONST 0x0002 ; Number of locals
17cb INIT_17c8:
17cb e409 | | Load 0x2,0x9
17cc e015 | | Load 0x0,0x15
17cd 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
17ce BODY_17c8:
17ce 00cf | | Action Mark_Auxiliary
17cf 00d9 | | Load_Top At_Offset_1
17d0 01d9 | | Execute Vector,Reverse_Bounds
17d1 0263 | c | Execute Discrete,Above_Bound
17d2 7008 |p | Jump_Nonzero 0x17db
17d3 e407 | | Load 0x2,0x7
17d4 00d9 | | Load_Top At_Offset_1
17d5 e602 | | Load 0x3,0x2
17d6 01d7 | | Execute Vector,Field_Read
17d7 e015 | | Load 0x0,0x15
17d8 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
17d9 00c8 | | Action Pop_Auxiliary_Range
17da 3ff8 |? | Loop_Increasing 0x17d3
17db 4501 |E | Exit_Suprogram New_Top_Offset 0x1
17dc 0000 0000 | | .BLANK 0000[0x4]
17e0 ; --------------------------------------------------------------------------------------
17e0 ; SUBPROGRAM
17e0 ; --------------------------------------------------------------------------------------
17e0 17ea | | .CONST 0x17ea ; Address of begin
17e1 0004 | | .CONST 0x0004 ; Address of exception handler
17e2 0003 | | .CONST 0x0003 ; Number of locals
17e3 INIT_17e0:
17e3 e406 | | Load 0x2,0x6
17e4 e015 | | Load 0x0,0x15
17e5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
17e6 e015 | | Load 0x0,0x15
17e7 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
17e8 029f 1a13 | | Declare_Subprogram INIT_1a10,For_Call
17ea BODY_17e0:
17ea 00d9 | | Load_Top At_Offset_1
17eb 01db | | Execute Vector,Length
17ec 7001 |p | Jump_Nonzero 0x17ee
17ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1
17ee 00cf | | Action Mark_Auxiliary
17ef 00da | | Load_Top At_Offset_2
17f0 01d9 | | Execute Vector,Reverse_Bounds
17f1 0263 | c | Execute Discrete,Above_Bound
17f2 7017 |p | Jump_Nonzero 0x180a
17f3 00d8 | | Load_Top At_Offset_0
17f4 e602 | | Load 0x3,0x2
17f5 01d7 | | Execute Vector,Field_Read
17f6 e015 | | Load 0x0,0x15
17f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
17f8 a405 | | Store_Unchecked 0x2,0x5
17f9 e405 | | Load 0x2,0x5
17fa 0f0a | | Execute_Immediate Equal,0xa
17fb 7006 |p | Jump_Nonzero 0x1802
17fc e405 | | Load 0x2,0x5
17fd 0f0c | | Execute_Immediate Equal,0xc
17fe 7003 |p | Jump_Nonzero 0x1802
17ff e405 | | Load 0x2,0x5
1800 0f0f | | Execute_Immediate Equal,0xf
1801 6806 |h | Jump_Zero 0x1808
1802 e403 | | Load 0x2,0x3
1803 e5fe | | Load 0x2,-0x2
1804 027d | } | Execute Discrete,Greater
1805 6801 |h | Jump_Zero 0x1807
1806 08e2 | | Execute_Immediate Raise,0xe2
1807 8603 | | Call 0x3,0x3
1808 00c8 | | Action Pop_Auxiliary_Range
1809 3fe9 |? | Loop_Increasing 0x17f3
180a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
180b 0000 0000 | | .BLANK 0000[0x5]
1810 ; --------------------------------------------------------------------------------------
1810 ; SUBPROGRAM
1810 ; --------------------------------------------------------------------------------------
1810 1818 | | .CONST 0x1818 ; Address of begin
1811 0004 | | .CONST 0x0004 ; Address of exception handler
1812 0002 | | .CONST 0x0002 ; 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 BODY_1810:
1818 00cf | | Action Mark_Auxiliary
1819 00d9 | | Load_Top At_Offset_1
181a 01d9 | | Execute Vector,Reverse_Bounds
181b 0263 | c | Execute Discrete,Above_Bound
181c 7011 |p | Jump_Nonzero 0x182e
181d 00d8 | | Load_Top At_Offset_0
181e e602 | | Load 0x3,0x2
181f 01d7 | | Execute Vector,Field_Read
1820 e015 | | Load 0x0,0x15
1821 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1822 0f03 | | Execute_Immediate Equal,0x3
1823 6808 |h | Jump_Zero 0x182c
1824 4801 |H | Short_Literal 0x1
1825 00d9 | | Load_Top At_Offset_1
1826 e602 | | Load 0x3,0x2
1827 01d7 | | Execute Vector,Field_Read
1828 e015 | | Load 0x0,0x15
1829 1818 | | Execute Package,Field_Execute,Field_Number 0x18
182a a406 | | Store_Unchecked 0x2,0x6
182b 8407 | | Call 0x2,0x7
182c 00c8 | | Action Pop_Auxiliary_Range
182d 3fef |? | Loop_Increasing 0x181d
182e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
182f 0000 | | .XXX[0x1]
1830 ; --------------------------------------------------------------------------------------
1830 ; SUBPROGRAM
1830 ; --------------------------------------------------------------------------------------
1830 1838 | 8 | .CONST 0x1838 ; Address of begin
1831 0004 | | .CONST 0x0004 ; Address of exception handler
1832 0002 | | .CONST 0x0002 ; Number of locals
1833 INIT_1830:
1833 e40a | | Load 0x2,0xa
1834 e5fe | | Load 0x2,-0x2
1835 8230 | 0 | Call 0x1,0x30
1836 e5ff | | Load 0x2,-0x1
1837 826c | l | Call 0x1,0x6c
1838 BODY_1830:
1838 00d8 | | Load_Top At_Offset_0
1839 01db | | Execute Vector,Length
183a 0c01 | | Execute_Immediate Greater_Equal,0x1
183b 6834 |h4 | Jump_Zero 0x1870
183c e405 | | Load 0x2,0x5
183d 7002 |p | Jump_Nonzero 0x1840
183e e406 | | Load 0x2,0x6
183f 6807 |h | Jump_Zero 0x1847
1840 e402 | | Load 0x2,0x2
1841 e5fd | | Load 0x2,-0x3
1842 e5fe | | Load 0x2,-0x2
1843 00db | | Load_Top At_Offset_3
1844 826a | j | Call 0x1,0x6a
1845 c402 | | Store 0x2,0x2
1846 7806 |x | Jump 0x184d
1847 e402 | | Load 0x2,0x2
1848 e5fd | | Load 0x2,-0x3
1849 e5fe | | Load 0x2,-0x2
184a 00db | | Load_Top At_Offset_3
184b 826b | k | Call 0x1,0x6b
184c c402 | | Store 0x2,0x2
184d e402 | | Load 0x2,0x2
184e e015 | | Load 0x0,0x15
184f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1850 701f |p | Jump_Nonzero 0x1870
1851 e40a | | Load 0x2,0xa
1852 e002 | | Load 0x0,0x2
1853 1812 | | Execute Package,Field_Execute,Field_Number 0x12
1854 4801 |H | Short_Literal 0x1
1855 4801 |H | Short_Literal 0x1
1856 e012 | | Load 0x0,0x12
1857 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1858 0334 | 4 | Declare_Variable Array,With_Constraint
1859 e402 | | Load 0x2,0x2
185a e015 | | Load 0x0,0x15
185b 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
185c 4801 |H | Short_Literal 0x1
185d 00da | | Load_Top At_Offset_2
185e 01d6 | | Execute Vector,Field_Write
185f 4802 |H | Short_Literal 0x2
1860 e403 | | Load 0x2,0x3
1861 e015 | | Load 0x0,0x15
1862 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
1863 e402 | | Load 0x2,0x2
1864 e015 | | Load 0x0,0x15
1865 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
1866 7006 |p | Jump_Nonzero 0x186d
1867 e402 | | Load 0x2,0x2
1868 e015 | | Load 0x0,0x15
1869 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
186a e403 | | Load 0x2,0x3
186b e015 | | Load 0x0,0x15
186c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
186d e015 | | Load 0x0,0x15
186e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
186f a402 | | Store_Unchecked 0x2,0x2
1870 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1871 0000 0000 | | .BLANK 0000[0x7]
1878 ; --------------------------------------------------------------------------------------
1878 ; SUBPROGRAM
1878 ; --------------------------------------------------------------------------------------
1878 1883 | | .CONST 0x1883 ; Address of begin
1879 0004 | | .CONST 0x0004 ; Address of exception handler
187a 0002 | | .CONST 0x0002 ; Number of locals
187b INIT_1878:
187b e5fb | | Load 0x2,-0x5
187c e5fc | | Load 0x2,-0x4
187d e5fd | | Load 0x2,-0x3
187e e603 | | Load 0x3,0x3
187f e602 | | Load 0x3,0x2
1880 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1881 01d7 | | Execute Vector,Field_Read
1882 8233 | 3 | Call 0x1,0x33
1883 BODY_1878:
1883 00d8 | | Load_Top At_Offset_0
1884 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1885 e408 | | Load 0x2,0x8
1886 00d8 | | Load_Top At_Offset_0
1887 00db | | Load_Top At_Offset_3
1888 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1889 0273 | s | Execute Discrete,Plus
188a 0aff | | Execute_Immediate Plus,-0x1
188b 00d8 | | Load_Top At_Offset_0
188c 00e2 | | Load_Encached Integer_Cache
188d 0260 | ` | Execute Discrete,In_Type
188e 7001 |p | Jump_Nonzero 0x1890
188f 0801 | | Execute_Immediate Raise,0x1
1890 e407 | | Load 0x2,0x7
1891 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1892 01ce | | Execute Vector,Slice_Write
1893 e408 | | Load 0x2,0x8
1894 00d9 | | Load_Top At_Offset_1
1895 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1896 0273 | s | Execute Discrete,Plus
1897 c408 | | Store 0x2,0x8
1898 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1899 0000 0000 | | .BLANK 0000[0x7]
18a0 ; --------------------------------------------------------------------------------------
18a0 ; SUBPROGRAM
18a0 ; --------------------------------------------------------------------------------------
18a0 18a3 | | .CONST 0x18a3 ; Address of begin
18a1 18b1 | | .CONST 0x18b1 ; Address of exception handler
18a2 0001 | | .CONST 0x0001 ; Number of locals
18a3 BODY_18a0:
18a3 INIT_18a0:
18a3 e5fd | | Load 0x2,-0x3
18a4 e7ff | | Load 0x3,-0x1
18a5 e013 | | Load 0x0,0x13
18a6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
18a7 a604 | | Store_Unchecked 0x3,0x4
18a8 e602 | | Load 0x3,0x2
18a9 e014 | | Load 0x0,0x14
18aa 181d | | Execute Package,Field_Execute,Field_Number 0x1d
18ab e603 | | Load 0x3,0x3
18ac e014 | | Load 0x0,0x14
18ad 1820 | | Execute Package,Field_Execute,Field_Number 0x20
18ae e604 | | Load 0x3,0x4
18af 00cb | | Action Pop_Block_With_Result
18b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
18b1 TRAP_18a0:
18b1 0007 | | Action Break_Optional
18b2 e602 | | Load 0x3,0x2
18b3 e014 | | Load 0x0,0x14
18b4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
18b5 e603 | | Load 0x3,0x3
18b6 e014 | | Load 0x0,0x14
18b7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
18b8 00d8 | | Load_Top At_Offset_0
18b9 0101 | | Execute Exception,Reraise
18ba 0000 0000 | | .BLANK 0000[0x6]
18c0 ; --------------------------------------------------------------------------------------
18c0 ; SUBPROGRAM
18c0 ; --------------------------------------------------------------------------------------
18c0 18ee | | .CONST 0x18ee ; Address of begin
18c1 0004 | | .CONST 0x0004 ; Address of exception handler
18c2 0003 | | .CONST 0x0003 ; Number of locals
18c3 INIT_18c0:
18c3 e602 | | Load 0x3,0x2
18c4 e7fe | | Load 0x3,-0x2
18c5 4801 |H | Short_Literal 0x1
18c6 e005 | | Load 0x0,0x5
18c7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
18c8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
18c9 1c08 | | Execute_Immediate Run_Utility,0x8
18ca 4801 |H | Short_Literal 0x1
18cb 4801 |H | Short_Literal 0x1
18cc e005 | | Load 0x0,0x5
18cd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
18ce 1b13 | | Execute Package,Field_Read,Field_Number 0x13
18cf 0334 | 4 | Declare_Variable Array,With_Constraint
18d0 e604 | | Load 0x3,0x4
18d1 4801 |H | Short_Literal 0x1
18d2 00da | | Load_Top At_Offset_2
18d3 01d6 | | Execute Vector,Field_Write
18d4 00d9 | | Load_Top At_Offset_1
18d5 00d8 | | Load_Top At_Offset_0
18d6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
18d7 00da | | Load_Top At_Offset_2
18d8 01da | | Execute Vector,Bounds
18d9 00da | | Load_Top At_Offset_2
18da 01da | | Execute Vector,Bounds
18db 00da | | Load_Top At_Offset_2
18dc 027f | | Execute Discrete,Equal
18dd 7001 |p | Jump_Nonzero 0x18df
18de 08e0 | | Execute_Immediate Raise,0xe0
18df 00cd | | Action Spare6_Action
18e0 027f | | Execute Discrete,Equal
18e1 7001 |p | Jump_Nonzero 0x18e3
18e2 08e0 | | Execute_Immediate Raise,0xe0
18e3 00d2 | | Pop_Control Pop_Count_2
18e4 00d9 | | Load_Top At_Offset_1
18e5 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
18e6 4800 |H | Short_Literal 0x0
18e7 00d9 | | Load_Top At_Offset_1
18e8 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
18e9 8239 | 9 | Call 0x1,0x39
18ea e602 | | Load 0x3,0x2
18eb e7fe | | Load 0x3,-0x2
18ec 00da | | Load_Top At_Offset_2
18ed 823e | > | Call 0x1,0x3e
18ee BODY_18c0:
18ee 00cf | | Action Mark_Auxiliary
18ef 00da | | Load_Top At_Offset_2
18f0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
18f1 01d9 | | Execute Vector,Reverse_Bounds
18f2 0263 | c | Execute Discrete,Above_Bound
18f3 7008 |p | Jump_Nonzero 0x18fc
18f4 e7fd | | Load 0x3,-0x3
18f5 00d9 | | Load_Top At_Offset_1
18f6 e802 | | Load 0x4,0x2
18f7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
18f8 01d7 | | Execute Vector,Field_Read
18f9 840d | | Call 0x2,0xd
18fa 00c8 | | Action Pop_Auxiliary_Range
18fb 3ff8 |? | Loop_Increasing 0x18f4
18fc 00ce | | Action Pop_Auxiliary
18fd e602 | | Load 0x3,0x2
18fe e22a | * | Load 0x1,0x2a
18ff 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1900 00d8 | | Load_Top At_Offset_0
1901 00cb | | Action Pop_Block_With_Result
1902 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1903 0000 0000 | | .BLANK 0000[0x5]
1908 ; --------------------------------------------------------------------------------------
1908 ; SUBPROGRAM
1908 ; --------------------------------------------------------------------------------------
1908 1915 | | .CONST 0x1915 ; Address of begin
1909 0004 | | .CONST 0x0004 ; Address of exception handler
190a 0003 | | .CONST 0x0003 ; Number of locals
190b INIT_1908:
190b 4801 |H | Short_Literal 0x1
190c e602 | | Load 0x3,0x2
190d e7fe | | Load 0x3,-0x2
190e 4800 |H | Short_Literal 0x0
190f e7ff | | Load 0x3,-0x1
1910 823a | : | Call 0x1,0x3a
1911 e602 | | Load 0x3,0x2
1912 e7fe | | Load 0x3,-0x2
1913 00da | | Load_Top At_Offset_2
1914 823e | > | Call 0x1,0x3e
1915 BODY_1908:
1915 e7fd | | Load 0x3,-0x3
1916 e7ff | | Load 0x3,-0x1
1917 840d | | Call 0x2,0xd
1918 e602 | | Load 0x3,0x2
1919 e22a | * | Load 0x1,0x2a
191a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
191b e7ff | | Load 0x3,-0x1
191c 00d9 | | Load_Top At_Offset_1
191d 822f | / | Call 0x1,0x2f
191e 00cb | | Action Pop_Block_With_Result
191f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
1920 ; --------------------------------------------------------------------------------------
1920 ; SUBPROGRAM
1920 ; --------------------------------------------------------------------------------------
1920 192c | , | .CONST 0x192c ; Address of begin
1921 0004 | | .CONST 0x0004 ; Address of exception handler
1922 0002 | | .CONST 0x0002 ; Number of locals
1923 INIT_1920:
1923 e7fe | | Load 0x3,-0x2
1924 00d8 | | Load_Top At_Offset_0
1925 00e3 | | Load_Encached Natural_Cache
1926 0260 | ` | Execute Discrete,In_Type
1927 7001 |p | Jump_Nonzero 0x1929
1928 0801 | | Execute_Immediate Raise,0x1
1929 e5fe | | Load 0x2,-0x2
192a e603 | | Load 0x3,0x3
192b 840f | | Call 0x2,0xf
192c BODY_1920:
192c 00cf | | Action Mark_Auxiliary
192d 00d9 | | Load_Top At_Offset_1
192e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
192f 01d9 | | Execute Vector,Reverse_Bounds
1930 0263 | c | Execute Discrete,Above_Bound
1931 701f |p | Jump_Nonzero 0x1951
1932 e604 | | Load 0x3,0x4
1933 e5fd | | Load 0x2,-0x3
1934 00da | | Load_Top At_Offset_2
1935 e802 | | Load 0x4,0x2
1936 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1937 01d7 | | Execute Vector,Field_Read
1938 e005 | | Load 0x0,0x5
1939 1b14 | | Execute Package,Field_Read,Field_Number 0x14
193a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
193b 8227 | ' | Call 0x1,0x27
193c 700b |p | Jump_Nonzero 0x1948
193d e604 | | Load 0x3,0x4
193e e5fd | | Load 0x2,-0x3
193f 00da | | Load_Top At_Offset_2
1940 e802 | | Load 0x4,0x2
1941 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1942 01d7 | | Execute Vector,Field_Read
1943 e005 | | Load 0x0,0x5
1944 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1945 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
1946 8227 | ' | Call 0x1,0x27
1947 7801 |x | Jump 0x1949
1948 4801 |H | Short_Literal 0x1
1949 a602 | | Store_Unchecked 0x3,0x2
194a e602 | | Load 0x3,0x2
194b 6803 |h | Jump_Zero 0x194f
194c 4801 |H | Short_Literal 0x1
194d 00cb | | Action Pop_Block_With_Result
194e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
194f 00c8 | | Action Pop_Auxiliary_Range
1950 3fe1 |? | Loop_Increasing 0x1932
1951 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1952 0000 0000 | | .BLANK 0000[0x6]
1958 ; --------------------------------------------------------------------------------------
1958 ; SUBPROGRAM
1958 ; --------------------------------------------------------------------------------------
1958 195f | _ | .CONST 0x195f ; Address of begin
1959 0004 | | .CONST 0x0004 ; Address of exception handler
195a 0002 | | .CONST 0x0002 ; Number of locals
195b INIT_1958:
195b 4800 |H | Short_Literal 0x0
195c e5fe | | Load 0x2,-0x2
195d e603 | | Load 0x3,0x3
195e 821f | | Call 0x1,0x1f
195f BODY_1958:
195f 00cf | | Action Mark_Auxiliary
1960 00d9 | | Load_Top At_Offset_1
1961 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1962 01d9 | | Execute Vector,Reverse_Bounds
1963 0263 | c | Execute Discrete,Above_Bound
1964 701f |p | Jump_Nonzero 0x1984
1965 e604 | | Load 0x3,0x4
1966 e5fd | | Load 0x2,-0x3
1967 00da | | Load_Top At_Offset_2
1968 e802 | | Load 0x4,0x2
1969 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
196a 01d7 | | Execute Vector,Field_Read
196b e005 | | Load 0x0,0x5
196c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
196d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
196e 8227 | ' | Call 0x1,0x27
196f 700b |p | Jump_Nonzero 0x197b
1970 e604 | | Load 0x3,0x4
1971 e5fd | | Load 0x2,-0x3
1972 00da | | Load_Top At_Offset_2
1973 e802 | | Load 0x4,0x2
1974 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1975 01d7 | | Execute Vector,Field_Read
1976 e005 | | Load 0x0,0x5
1977 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1978 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
1979 8227 | ' | Call 0x1,0x27
197a 7801 |x | Jump 0x197c
197b 4801 |H | Short_Literal 0x1
197c a602 | | Store_Unchecked 0x3,0x2
197d e602 | | Load 0x3,0x2
197e 6803 |h | Jump_Zero 0x1982
197f 4801 |H | Short_Literal 0x1
1980 00cb | | Action Pop_Block_With_Result
1981 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1982 00c8 | | Action Pop_Auxiliary_Range
1983 3fe1 |? | Loop_Increasing 0x1965
1984 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1985 0000 0000 | | .XXX[0x3]
1987 0000 | |
1988 ; --------------------------------------------------------------------------------------
1988 ; SUBPROGRAM
1988 ; --------------------------------------------------------------------------------------
1988 198e | | .CONST 0x198e ; Address of begin
1989 1997 | | .CONST 0x1997 ; Address of exception handler
198a 0002 | | .CONST 0x0002 ; Number of locals
198b INIT_1988:
198b e7fe | | Load 0x3,-0x2
198c e7ff | | Load 0x3,-0x1
198d 8405 | | Call 0x2,0x5
198e BODY_1988:
198e e602 | | Load 0x3,0x2
198f e014 | | Load 0x0,0x14
1990 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1991 e603 | | Load 0x3,0x3
1992 e014 | | Load 0x0,0x14
1993 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1994 00d8 | | Load_Top At_Offset_0
1995 00cb | | Action Pop_Block_With_Result
1996 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1997 TRAP_1988:
1997 0007 | | Action Break_Optional
1998 e602 | | Load 0x3,0x2
1999 e014 | | Load 0x0,0x14
199a 181d | | Execute Package,Field_Execute,Field_Number 0x1d
199b e603 | | Load 0x3,0x3
199c e014 | | Load 0x0,0x14
199d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
199e 00d8 | | Load_Top At_Offset_0
199f 0101 | | Execute Exception,Reraise
19a0 ; --------------------------------------------------------------------------------------
19a0 ; SUBPROGRAM
19a0 ; --------------------------------------------------------------------------------------
19a0 19a9 | | .CONST 0x19a9 ; Address of begin
19a1 0004 | | .CONST 0x0004 ; Address of exception handler
19a2 0002 | | .CONST 0x0002 ; Number of locals
19a3 INIT_19a0:
19a3 e606 | | Load 0x3,0x6
19a4 e602 | | Load 0x3,0x2
19a5 01d7 | | Execute Vector,Field_Read
19a6 e005 | | Load 0x0,0x5
19a7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
19a8 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
19a9 BODY_19a0:
19a9 00cf | | Action Mark_Auxiliary
19aa e5ff | | Load 0x2,-0x1
19ab 01d9 | | Execute Vector,Reverse_Bounds
19ac 0263 | c | Execute Discrete,Above_Bound
19ad 7020 |p | Jump_Nonzero 0x19ce
19ae 00d8 | | Load_Top At_Offset_0
19af e5ff | | Load 0x2,-0x1
19b0 01d7 | | Execute Vector,Field_Read
19b1 e005 | | Load 0x0,0x5
19b2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
19b3 180f | | Execute Package,Field_Execute,Field_Number 0xf
19b4 7017 |p | Jump_Nonzero 0x19cc
19b5 4801 |H | Short_Literal 0x1
19b6 00d9 | | Load_Top At_Offset_1
19b7 e5ff | | Load 0x2,-0x1
19b8 01d7 | | Execute Vector,Field_Read
19b9 e005 | | Load 0x0,0x5
19ba 1b16 | | Execute Package,Field_Read,Field_Number 0x16
19bb 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
19bc e005 | | Load 0x0,0x5
19bd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
19be 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
19bf e802 | | Load 0x4,0x2
19c0 e017 | | Load 0x0,0x17
19c1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
19c2 6809 |h | Jump_Zero 0x19cc
19c3 00d8 | | Load_Top At_Offset_0
19c4 e5ff | | Load 0x2,-0x1
19c5 01d7 | | Execute Vector,Field_Read
19c6 e404 | | Load 0x2,0x4
19c7 e403 | | Load 0x2,0x3
19c8 01d6 | | Execute Vector,Field_Write
19c9 e404 | | Load 0x2,0x4
19ca 0a01 | | Execute_Immediate Plus,0x1
19cb c404 | | Store 0x2,0x4
19cc 00c8 | | Action Pop_Auxiliary_Range
19cd 3fe0 |? | Loop_Increasing 0x19ae
19ce 4501 |E | Exit_Suprogram New_Top_Offset 0x1
19cf 0000 | | .XXX[0x1]
19d0 ; --------------------------------------------------------------------------------------
19d0 ; SUBPROGRAM
19d0 ; --------------------------------------------------------------------------------------
19d0 1a00 | | .CONST 0x1a00 ; Address of begin
19d1 0004 | | .CONST 0x0004 ; Address of exception handler
19d2 0003 | | .CONST 0x0003 ; Number of locals
19d3 INIT_19d0:
19d3 e404 | | Load 0x2,0x4
19d4 e5fe | | Load 0x2,-0x2
19d5 4801 |H | Short_Literal 0x1
19d6 e005 | | Load 0x0,0x5
19d7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
19d8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
19d9 1c08 | | Execute_Immediate Run_Utility,0x8
19da 4801 |H | Short_Literal 0x1
19db 4801 |H | Short_Literal 0x1
19dc e005 | | Load 0x0,0x5
19dd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
19de 1b13 | | Execute Package,Field_Read,Field_Number 0x13
19df 0334 | 4 | Declare_Variable Array,With_Constraint
19e0 e407 | | Load 0x2,0x7
19e1 4801 |H | Short_Literal 0x1
19e2 00da | | Load_Top At_Offset_2
19e3 01d6 | | Execute Vector,Field_Write
19e4 00d9 | | Load_Top At_Offset_1
19e5 00d8 | | Load_Top At_Offset_0
19e6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
19e7 00da | | Load_Top At_Offset_2
19e8 01da | | Execute Vector,Bounds
19e9 00da | | Load_Top At_Offset_2
19ea 01da | | Execute Vector,Bounds
19eb 00da | | Load_Top At_Offset_2
19ec 027f | | Execute Discrete,Equal
19ed 7001 |p | Jump_Nonzero 0x19ef
19ee 08e0 | | Execute_Immediate Raise,0xe0
19ef 00cd | | Action Spare6_Action
19f0 027f | | Execute Discrete,Equal
19f1 7001 |p | Jump_Nonzero 0x19f3
19f2 08e0 | | Execute_Immediate Raise,0xe0
19f3 00d2 | | Pop_Control Pop_Count_2
19f4 00d9 | | Load_Top At_Offset_1
19f5 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
19f6 e405 | | Load 0x2,0x5
19f7 00d9 | | Load_Top At_Offset_1
19f8 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
19f9 8239 | 9 | Call 0x1,0x39
19fa 4801 |H | Short_Literal 0x1
19fb e404 | | Load 0x2,0x4
19fc e5fe | | Load 0x2,-0x2
19fd 4800 |H | Short_Literal 0x0
19fe e802 | | Load 0x4,0x2
19ff 823b | ; | Call 0x1,0x3b
1a00 BODY_19d0:
1a00 e404 | | Load 0x2,0x4
1a01 e22a | * | Load 0x1,0x2a
1a02 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1a03 00d8 | | Load_Top At_Offset_0
1a04 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1a05 7005 |p | Jump_Nonzero 0x1a0b
1a06 00d8 | | Load_Top At_Offset_0
1a07 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a08 00cb | | Action Pop_Block_With_Result
1a09 00cb | | Action Pop_Block_With_Result
1a0a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a0b e406 | | Load 0x2,0x6
1a0c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1a0d 00cb | | Action Pop_Block_With_Result
1a0e 00cb | | Action Pop_Block_With_Result
1a0f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
1a10 ; --------------------------------------------------------------------------------------
1a10 ; SUBPROGRAM
1a10 ; --------------------------------------------------------------------------------------
1a10 1a13 | | .CONST 0x1a13 ; Address of begin
1a11 1a26 | & | .CONST 0x1a26 ; Address of exception handler
1a12 0001 | | .CONST 0x0001 ; Number of locals
1a13 BODY_1a10:
1a13 INIT_1a10:
1a13 4801 |H | Short_Literal 0x1
1a14 e606 | | Load 0x3,0x6
1a15 e602 | | Load 0x3,0x2
1a16 01d7 | | Execute Vector,Field_Read
1a17 e015 | | Load 0x0,0x15
1a18 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1a19 e005 | | Load 0x0,0x5
1a1a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1a1b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1a1c e005 | | Load 0x0,0x5
1a1d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1a1e 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
1a1f e403 | | Load 0x2,0x3
1a20 e402 | | Load 0x2,0x2
1a21 01d6 | | Execute Vector,Field_Write
1a22 e403 | | Load 0x2,0x3
1a23 0a01 | | Execute_Immediate Plus,0x1
1a24 c403 | | Store 0x2,0x3
1a25 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a26 TRAP_1a10:
1a26 0007 | | Action Break_Optional
1a27 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1a28 ; --------------------------------------------------------------------------------------
1a28 ; Debug Table
1a28 ; --------------------------------------------------------------------------------------
1a28 0004 0009 | | .DEBUG4 0x0004,0x0009,0xeb37,0x0000,0x0001,0x0000
1a2e 0000 0000 | | .BLANK 0000[0x1d2]