|
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: 6144 (0x1800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0b30 | 0 | .CONST 0x0b30 ; 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 8006 | | .CONST 0x8006 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00ea | | .CONST 0x00ea ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0036 | 6 | .CONST 0x0036 ; Number of locals
000b INIT_0008:
000b 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated
000d 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated
000f 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
0011 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
0013 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
0015 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated
0017 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
0019 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
001b 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
001d 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 00c4 | | Action Make_Default
002c 00c4 | | Action Make_Default
002d 00c4 | | Action Make_Default
002e 00c4 | | Action Make_Default
002f 00c4 | | Action Make_Default
0030 00c4 | | Action Make_Default
0031 00c4 | | Action Make_Default
0032 00c4 | | Action Make_Default
0033 00c4 | | Action Make_Default
0034 00c4 | | Action Make_Default
0035 00c4 | | Action Make_Default
0036 00c4 | | Action Make_Default
0037 00c4 | | Action Make_Default
0038 00c4 | | Action Make_Default
0039 00c4 | | Action Make_Default
003a 00c4 | | Action Make_Default
003b 00c4 | | Action Make_Default
003c 00c4 | | Action Make_Default
003d 00c4 | | Action Make_Default
003e 00c4 | | Action Make_Default
003f 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated
0041 c22d | - | Store 0x1,0x2d
0042 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated
0044 c22e | . | Store 0x1,0x2e
0045 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated
0047 c22f | / | Store 0x1,0x2f
0048 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated
004a c230 | 0 | Store 0x1,0x30
004b 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated
004d c231 | 1 | Store 0x1,0x31
004e 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated
0050 c217 | | Store 0x1,0x17
0051 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated
0053 c218 | | Store 0x1,0x18
0054 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated
0056 c219 | | Store 0x1,0x19
0057 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated
0059 c21a | | Store 0x1,0x1a
005a 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated
005c c21b | | Store 0x1,0x1b
005d 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated
005f c21c | | Store 0x1,0x1c
0060 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated
0062 c21d | | Store 0x1,0x1d
0063 029a 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Visible,Unelaborated
0065 c21e | | Store 0x1,0x1e
0066 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated
0068 c21f | | Store 0x1,0x1f
0069 029a 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call,Visible,Unelaborated
006b c220 | | Store 0x1,0x20
006c 029a 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call,Visible,Unelaborated
006e c232 | 2 | Store 0x1,0x32
006f 029a 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call,Visible,Unelaborated
0071 c233 | 3 | Store 0x1,0x33
0072 029a 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call,Visible,Unelaborated
0074 c234 | 4 | Store 0x1,0x34
0075 029a 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Visible,Unelaborated
0077 c235 | 5 | Store 0x1,0x35
0078 029a 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call,Visible,Unelaborated
007a c236 | 6 | Store 0x1,0x36
007b 029a 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Visible,Unelaborated
007d c223 | # | Store 0x1,0x23
007e 029a 06fb | | Declare_Subprogram INIT_06f8,For_Outer_Call,Visible,Unelaborated
0080 c224 | $ | Store 0x1,0x24
0081 029a 0773 | s| Declare_Subprogram INIT_0770,For_Outer_Call,Visible,Unelaborated
0083 c225 | % | Store 0x1,0x25
0084 029a 07db | | Declare_Subprogram INIT_07d8,For_Outer_Call,Visible,Unelaborated
0086 c226 | & | Store 0x1,0x26
0087 029a 081b | | Declare_Subprogram INIT_0818,For_Outer_Call,Visible,Unelaborated
0089 c227 | ' | Store 0x1,0x27
008a 029a 08b3 | | Declare_Subprogram INIT_08b0,For_Outer_Call,Visible,Unelaborated
008c c228 | ( | Store 0x1,0x28
008d 029a 0933 | 3| Declare_Subprogram INIT_0930,For_Outer_Call,Visible,Unelaborated
008f c229 | ) | Store 0x1,0x29
0090 029a 09c3 | | Declare_Subprogram INIT_09c0,For_Outer_Call,Visible,Unelaborated
0092 c22a | * | Store 0x1,0x2a
0093 029a 0a3b | ;| Declare_Subprogram INIT_0a38,For_Outer_Call,Visible,Unelaborated
0095 c22b | + | Store 0x1,0x2b
0096 029a 0a8b | | Declare_Subprogram INIT_0a88,For_Outer_Call,Visible,Unelaborated
0098 c22c | , | Store 0x1,0x2c
0099 00bf | | Action Accept_Activation
009a 1d0d | | Execute_Immediate Reference_Lex_1,0xd
009b 00c7 | | Action Elaborate_Subprogram
009c 1d0e | | Execute_Immediate Reference_Lex_1,0xe
009d 00c7 | | Action Elaborate_Subprogram
009e 1d0f | | Execute_Immediate Reference_Lex_1,0xf
009f 00c7 | | Action Elaborate_Subprogram
00a0 1d10 | | Execute_Immediate Reference_Lex_1,0x10
00a1 00c7 | | Action Elaborate_Subprogram
00a2 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00a3 00c7 | | Action Elaborate_Subprogram
00a4 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00a5 00c7 | | Action Elaborate_Subprogram
00a6 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00a7 00c7 | | Action Elaborate_Subprogram
00a8 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00a9 00c7 | | Action Elaborate_Subprogram
00aa 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00ab 00c7 | | Action Elaborate_Subprogram
00ac 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00ad 00c7 | | Action Elaborate_Subprogram
00ae 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
00af 00c7 | | Action Elaborate_Subprogram
00b0 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
00b1 00c7 | | Action Elaborate_Subprogram
00b2 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
00b3 00c7 | | Action Elaborate_Subprogram
00b4 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
00b5 00c7 | | Action Elaborate_Subprogram
00b6 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
00b7 00c7 | | Action Elaborate_Subprogram
00b8 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00b9 00c7 | | Action Elaborate_Subprogram
00ba 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00bb 00c7 | | Action Elaborate_Subprogram
00bc 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00bd 00c7 | | Action Elaborate_Subprogram
00be 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00bf 00c7 | | Action Elaborate_Subprogram
00c0 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00c1 00c7 | | Action Elaborate_Subprogram
00c2 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00c3 00c7 | | Action Elaborate_Subprogram
00c4 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00c5 00c7 | | Action Elaborate_Subprogram
00c6 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00c7 00c7 | | Action Elaborate_Subprogram
00c8 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00c9 00c7 | | Action Elaborate_Subprogram
00ca 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00cb 00c7 | | Action Elaborate_Subprogram
00cc 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
00cd 00c7 | | Action Elaborate_Subprogram
00ce 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
00cf 00c7 | | Action Elaborate_Subprogram
00d0 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
00d1 00c7 | | Action Elaborate_Subprogram
00d2 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
00d3 00c7 | | Action Elaborate_Subprogram
00d4 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
00d5 00c7 | | Action Elaborate_Subprogram
00d6 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00d7 00c7 | | Action Elaborate_Subprogram
00d8 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00d9 00c7 | | Action Elaborate_Subprogram
00da 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00db 00c7 | | Action Elaborate_Subprogram
00dc 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
00dd 00c7 | | Action Elaborate_Subprogram
00de 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00df 00c7 | | Action Elaborate_Subprogram
00e0 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
00e1 00c7 | | Action Elaborate_Subprogram
00e2 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
00e3 00c7 | | Action Elaborate_Subprogram
00e4 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
00e5 00c7 | | Action Elaborate_Subprogram
00e6 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
00e7 00c7 | | Action Elaborate_Subprogram
00e8 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
00e9 00c7 | | Action Elaborate_Subprogram
00ea BODY_0008:
00ea 00bc | | Action Signal_Activated
00eb 00bb | | Action Signal_Completion
00ec 0000 0000 | | .BLANK 0000[0x4]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f7 | | .CONST 0x00f7 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0002 | | .CONST 0x0002 ; Number of locals
00f3 INIT_00f0:
00f3 00da | | Load_Top At_Offset_2
00f4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00f5 00e3 | | Load_Encached Natural_Cache
00f6 03f1 | | Declare_Variable Discrete,With_Value
00f7 BODY_00f0:
00f7 00d8 | | Load_Top At_Offset_0
00f8 e5fe | | Load 0x2,-0x2
00f9 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00fa 027d | } | Execute Discrete,Greater
00fb 6803 |h | Jump_Zero 0xff
00fc e5fe | | Load 0x2,-0x2
00fd 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00fe 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
00ff 4801 |H | Short_Literal 0x1
0100 00d9 | | Load_Top At_Offset_1
0101 e5ff | | Load 0x2,-0x1
0102 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0103 01cf | | Execute Vector,Slice_Read
0104 4801 |H | Short_Literal 0x1
0105 00da | | Load_Top At_Offset_2
0106 e5fe | | Load 0x2,-0x2
0107 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0108 01ce | | Execute Vector,Slice_Write
0109 00d8 | | Load_Top At_Offset_0
010a e5fe | | Load 0x2,-0x2
010b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
010c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
010d 0000 0000 | | .XXX[0x3]
010f 0000 | |
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0118 | | .CONST 0x0118 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0002 | | .CONST 0x0002 ; Number of locals
0113 INIT_0110:
0113 00da | | Load_Top At_Offset_2
0114 0227 | ' | Execute Access,All_Reference
0115 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0116 00e3 | | Load_Encached Natural_Cache
0117 03f1 | | Declare_Variable Discrete,With_Value
0118 BODY_0110:
0118 00d8 | | Load_Top At_Offset_0
0119 e5fe | | Load 0x2,-0x2
011a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
011b 027d | } | Execute Discrete,Greater
011c 6803 |h | Jump_Zero 0x120
011d e5fe | | Load 0x2,-0x2
011e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
011f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0120 4801 |H | Short_Literal 0x1
0121 00d9 | | Load_Top At_Offset_1
0122 e5ff | | Load 0x2,-0x1
0123 0227 | ' | Execute Access,All_Reference
0124 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0125 01cf | | Execute Vector,Slice_Read
0126 4801 |H | Short_Literal 0x1
0127 00da | | Load_Top At_Offset_2
0128 e5fe | | Load 0x2,-0x2
0129 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
012a 01ce | | Execute Vector,Slice_Write
012b 00d8 | | Load_Top At_Offset_0
012c e5fe | | Load 0x2,-0x2
012d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
012e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
012f 0000 | | .XXX[0x1]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0137 | 7 | .CONST 0x0137 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0002 | | .CONST 0x0002 ; Number of locals
0133 INIT_0130:
0133 00da | | Load_Top At_Offset_2
0134 01db | | Execute Vector,Length
0135 00e3 | | Load_Encached Natural_Cache
0136 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0137 BODY_0130:
0137 00d8 | | Load_Top At_Offset_0
0138 e5fe | | Load 0x2,-0x2
0139 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
013a 027d | } | Execute Discrete,Greater
013b 6803 |h | Jump_Zero 0x13f
013c e5fe | | Load 0x2,-0x2
013d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
013e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
013f 00db | | Load_Top At_Offset_3
0140 01dd | | Execute Vector,First
0141 e5ff | | Load 0x2,-0x1
0142 01dd | | Execute Vector,First
0143 00da | | Load_Top At_Offset_2
0144 0273 | s | Execute Discrete,Plus
0145 0aff | | Execute_Immediate Plus,-0x1
0146 e5ff | | Load 0x2,-0x1
0147 01cf | | Execute Vector,Slice_Read
0148 4801 |H | Short_Literal 0x1
0149 00da | | Load_Top At_Offset_2
014a e5fe | | Load 0x2,-0x2
014b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
014c 01ce | | Execute Vector,Slice_Write
014d 00d8 | | Load_Top At_Offset_0
014e e5fe | | Load 0x2,-0x2
014f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0150 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0151 0000 0000 | | .BLANK 0000[0x7]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b 00db | | Load_Top At_Offset_3
015c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
015d 0d01 | | Execute_Immediate Less,0x1
015e 6801 |h | Jump_Zero 0x160
015f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0160 00da | | Load_Top At_Offset_2
0161 4801 |H | Short_Literal 0x1
0162 e5fe | | Load 0x2,-0x2
0163 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0164 01d6 | | Execute Vector,Field_Write
0165 4801 |H | Short_Literal 0x1
0166 e5fe | | Load 0x2,-0x2
0167 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0168 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0169 0000 0000 | | .BLANK 0000[0x7]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 e5fd | | Load 0x2,-0x3
0174 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0175 e5fe | | Load 0x2,-0x2
0176 027c | | | Execute Discrete,Less
0177 681a |h | Jump_Zero 0x192
0178 e5fd | | Load 0x2,-0x3
0179 00d8 | | Load_Top At_Offset_0
017a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
017b 00d8 | | Load_Top At_Offset_0
017c 0335 | 5 | Declare_Variable Array,Duplicate
017d 00d0 | | Action Swap_Control
017e 00d1 | | Pop_Control Pop_Count_1
017f 00d9 | | Load_Top At_Offset_1
0180 01d9 | | Execute Vector,Reverse_Bounds
0181 0263 | c | Execute Discrete,Above_Bound
0182 7005 |p | Jump_Nonzero 0x188
0183 e5ff | | Load 0x2,-0x1
0184 00d9 | | Load_Top At_Offset_1
0185 e404 | | Load 0x2,0x4
0186 01d6 | | Execute Vector,Field_Write
0187 3ffb |? | Loop_Increasing 0x183
0188 00d0 | | Action Swap_Control
0189 00d1 | | Pop_Control Pop_Count_1
018a 00d9 | | Load_Top At_Offset_1
018b 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
018c 00d1 | | Pop_Control Pop_Count_1
018d e5fd | | Load 0x2,-0x3
018e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
018f e5fd | | Load 0x2,-0x3
0190 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0191 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0192 e5fd | | Load 0x2,-0x3
0193 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0194 4801 |H | Short_Literal 0x1
0195 e5fe | | Load 0x2,-0x2
0196 00d9 | | Load_Top At_Offset_1
0197 00d9 | | Load_Top At_Offset_1
0198 e402 | | Load 0x2,0x2
0199 035b | [ | Declare_Type Array,Constrained
019a 00db | | Load_Top At_Offset_3
019b 01cd | | Execute Vector,Slice_Reference
019c 00d8 | | Load_Top At_Offset_0
019d 0335 | 5 | Declare_Variable Array,Duplicate
019e 00d0 | | Action Swap_Control
019f 00d1 | | Pop_Control Pop_Count_1
01a0 00d9 | | Load_Top At_Offset_1
01a1 01d9 | | Execute Vector,Reverse_Bounds
01a2 0263 | c | Execute Discrete,Above_Bound
01a3 7005 |p | Jump_Nonzero 0x1a9
01a4 e5ff | | Load 0x2,-0x1
01a5 00d9 | | Load_Top At_Offset_1
01a6 e406 | | Load 0x2,0x6
01a7 01d6 | | Execute Vector,Field_Write
01a8 3ffb |? | Loop_Increasing 0x1a4
01a9 00d0 | | Action Swap_Control
01aa 00d1 | | Pop_Control Pop_Count_1
01ab 00da | | Load_Top At_Offset_2
01ac 00da | | Load_Top At_Offset_2
01ad e402 | | Load 0x2,0x2
01ae 01ce | | Execute Vector,Slice_Write
01af 00d3 | | Pop_Control Pop_Count_3
01b0 00db | | Load_Top At_Offset_3
01b1 e5fd | | Load 0x2,-0x3
01b2 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01b3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01b4 0000 0000 | | .BLANK 0000[0x4]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bf | | .CONST 0x01bf ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0002 | | .CONST 0x0002 ; Number of locals
01bb INIT_01b8:
01bb 00db | | Load_Top At_Offset_3
01bc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01bd 00e3 | | Load_Encached Natural_Cache
01be 03f1 | | Declare_Variable Discrete,With_Value
01bf BODY_01b8:
01bf 00d8 | | Load_Top At_Offset_0
01c0 e5ff | | Load 0x2,-0x1
01c1 0227 | ' | Execute Access,All_Reference
01c2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01c3 027d | } | Execute Discrete,Greater
01c4 6804 |h | Jump_Zero 0x1c9
01c5 00db | | Load_Top At_Offset_3
01c6 0227 | ' | Execute Access,All_Reference
01c7 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01c8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
01c9 4801 |H | Short_Literal 0x1
01ca 00d9 | | Load_Top At_Offset_1
01cb e5fe | | Load 0x2,-0x2
01cc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01cd 01cf | | Execute Vector,Slice_Read
01ce 4801 |H | Short_Literal 0x1
01cf 00da | | Load_Top At_Offset_2
01d0 e5ff | | Load 0x2,-0x1
01d1 0229 | ) | Execute Access,All_Read
01d2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01d3 01ce | | Execute Vector,Slice_Write
01d4 00d8 | | Load_Top At_Offset_0
01d5 e5ff | | Load 0x2,-0x1
01d6 0227 | ' | Execute Access,All_Reference
01d7 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01d8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01d9 0000 0000 | | .BLANK 0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e8 | | .CONST 0x01e8 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0002 | | .CONST 0x0002 ; Number of locals
01e3 INIT_01e0:
01e3 00db | | Load_Top At_Offset_3
01e4 0227 | ' | Execute Access,All_Reference
01e5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01e6 00e3 | | Load_Encached Natural_Cache
01e7 03f1 | | Declare_Variable Discrete,With_Value
01e8 BODY_01e0:
01e8 00d8 | | Load_Top At_Offset_0
01e9 e5ff | | Load 0x2,-0x1
01ea 0227 | ' | Execute Access,All_Reference
01eb 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01ec 027d | } | Execute Discrete,Greater
01ed 6804 |h | Jump_Zero 0x1f2
01ee 00db | | Load_Top At_Offset_3
01ef 0227 | ' | Execute Access,All_Reference
01f0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
01f1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
01f2 4801 |H | Short_Literal 0x1
01f3 00d9 | | Load_Top At_Offset_1
01f4 e5fe | | Load 0x2,-0x2
01f5 0227 | ' | Execute Access,All_Reference
01f6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01f7 01cf | | Execute Vector,Slice_Read
01f8 4801 |H | Short_Literal 0x1
01f9 00da | | Load_Top At_Offset_2
01fa e5ff | | Load 0x2,-0x1
01fb 0229 | ) | Execute Access,All_Read
01fc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01fd 01ce | | Execute Vector,Slice_Write
01fe 00d8 | | Load_Top At_Offset_0
01ff e5ff | | Load 0x2,-0x1
0200 0227 | ' | Execute Access,All_Reference
0201 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0202 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0203 0000 0000 | | .BLANK 0000[0x5]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020f | | .CONST 0x020f ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0002 | | .CONST 0x0002 ; Number of locals
020b INIT_0208:
020b 00db | | Load_Top At_Offset_3
020c 01db | | Execute Vector,Length
020d 00e3 | | Load_Encached Natural_Cache
020e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
020f BODY_0208:
020f 00d8 | | Load_Top At_Offset_0
0210 e5ff | | Load 0x2,-0x1
0211 0227 | ' | Execute Access,All_Reference
0212 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0213 027d | } | Execute Discrete,Greater
0214 6804 |h | Jump_Zero 0x219
0215 00db | | Load_Top At_Offset_3
0216 0227 | ' | Execute Access,All_Reference
0217 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0218 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0219 e5fe | | Load 0x2,-0x2
021a 01dd | | Execute Vector,First
021b e5fe | | Load 0x2,-0x2
021c 01dd | | Execute Vector,First
021d 00da | | Load_Top At_Offset_2
021e 0273 | s | Execute Discrete,Plus
021f 0aff | | Execute_Immediate Plus,-0x1
0220 e5fe | | Load 0x2,-0x2
0221 01cf | | Execute Vector,Slice_Read
0222 4801 |H | Short_Literal 0x1
0223 00da | | Load_Top At_Offset_2
0224 e5ff | | Load 0x2,-0x1
0225 0229 | ) | Execute Access,All_Read
0226 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0227 01ce | | Execute Vector,Slice_Write
0228 00d8 | | Load_Top At_Offset_0
0229 e5ff | | Load 0x2,-0x1
022a 0227 | ' | Execute Access,All_Reference
022b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
022c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
022d 0000 0000 | | .XXX[0x3]
022f 0000 | |
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 00da | | Load_Top At_Offset_2
0234 0227 | ' | Execute Access,All_Reference
0235 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0236 0d01 | | Execute_Immediate Less,0x1
0237 6801 |h | Jump_Zero 0x239
0238 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0239 00db | | Load_Top At_Offset_3
023a 4801 |H | Short_Literal 0x1
023b e5ff | | Load 0x2,-0x1
023c 0227 | ' | Execute Access,All_Reference
023d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
023e 01d6 | | Execute Vector,Field_Write
023f 4801 |H | Short_Literal 0x1
0240 00db | | Load_Top At_Offset_3
0241 0227 | ' | Execute Access,All_Reference
0242 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0243 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0244 0000 0000 | | .BLANK 0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b 00da | | Load_Top At_Offset_2
024c 0227 | ' | Execute Access,All_Reference
024d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
024e e5fd | | Load 0x2,-0x3
024f 027c | | | Execute Discrete,Less
0250 681d |h | Jump_Zero 0x26e
0251 00da | | Load_Top At_Offset_2
0252 0229 | ) | Execute Access,All_Read
0253 00d8 | | Load_Top At_Offset_0
0254 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0255 00d8 | | Load_Top At_Offset_0
0256 0335 | 5 | Declare_Variable Array,Duplicate
0257 00d0 | | Action Swap_Control
0258 00d1 | | Pop_Control Pop_Count_1
0259 00d9 | | Load_Top At_Offset_1
025a 01d9 | | Execute Vector,Reverse_Bounds
025b 0263 | c | Execute Discrete,Above_Bound
025c 7005 |p | Jump_Nonzero 0x262
025d e5fe | | Load 0x2,-0x2
025e 00d9 | | Load_Top At_Offset_1
025f e404 | | Load 0x2,0x4
0260 01d6 | | Execute Vector,Field_Write
0261 3ffb |? | Loop_Increasing 0x25d
0262 00d0 | | Action Swap_Control
0263 00d1 | | Pop_Control Pop_Count_1
0264 00d9 | | Load_Top At_Offset_1
0265 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0266 00d1 | | Pop_Control Pop_Count_1
0267 00da | | Load_Top At_Offset_2
0268 0227 | ' | Execute Access,All_Reference
0269 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
026a 00db | | Load_Top At_Offset_3
026b 0227 | ' | Execute Access,All_Reference
026c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
026d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
026e 00da | | Load_Top At_Offset_2
026f 0229 | ) | Execute Access,All_Read
0270 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0271 4801 |H | Short_Literal 0x1
0272 e5fd | | Load 0x2,-0x3
0273 00d9 | | Load_Top At_Offset_1
0274 00d9 | | Load_Top At_Offset_1
0275 e402 | | Load 0x2,0x2
0276 035b | [ | Declare_Type Array,Constrained
0277 00db | | Load_Top At_Offset_3
0278 01cd | | Execute Vector,Slice_Reference
0279 00d8 | | Load_Top At_Offset_0
027a 0335 | 5 | Declare_Variable Array,Duplicate
027b 00d0 | | Action Swap_Control
027c 00d1 | | Pop_Control Pop_Count_1
027d 00d9 | | Load_Top At_Offset_1
027e 01d9 | | Execute Vector,Reverse_Bounds
027f 0263 | c | Execute Discrete,Above_Bound
0280 7005 |p | Jump_Nonzero 0x286
0281 e5fe | | Load 0x2,-0x2
0282 00d9 | | Load_Top At_Offset_1
0283 e406 | | Load 0x2,0x6
0284 01d6 | | Execute Vector,Field_Write
0285 3ffb |? | Loop_Increasing 0x281
0286 00d0 | | Action Swap_Control
0287 00d1 | | Pop_Control Pop_Count_1
0288 00da | | Load_Top At_Offset_2
0289 00da | | Load_Top At_Offset_2
028a e402 | | Load 0x2,0x2
028b 01ce | | Execute Vector,Slice_Write
028c 00d3 | | Pop_Control Pop_Count_3
028d e5fd | | Load 0x2,-0x3
028e 00db | | Load_Top At_Offset_3
028f 0227 | ' | Execute Access,All_Reference
0290 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0291 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0292 0000 0000 | | .BLANK 0000[0x6]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a6 | | .CONST 0x02a6 ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0003 | | .CONST 0x0003 ; Number of locals
029b INIT_0298:
029b e001 | | Load 0x0,0x1
029c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
029d 00db | | Load_Top At_Offset_3
029e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
029f e002 | | Load 0x0,0x2
02a0 180d | | Execute Package,Field_Execute,Field_Number 0xd
02a1 0039 | 9 | Store_Top Access,At_Offset_1
02a2 00db | | Load_Top At_Offset_3
02a3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02a4 00e3 | | Load_Encached Natural_Cache
02a5 03f1 | | Declare_Variable Discrete,With_Value
02a6 BODY_0298:
02a6 00d9 | | Load_Top At_Offset_1
02a7 a5fe | | Store_Unchecked 0x2,-0x2
02a8 4801 |H | Short_Literal 0x1
02a9 00d9 | | Load_Top At_Offset_1
02aa e5ff | | Load 0x2,-0x1
02ab 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02ac 01cf | | Execute Vector,Slice_Read
02ad 4801 |H | Short_Literal 0x1
02ae 00da | | Load_Top At_Offset_2
02af e402 | | Load 0x2,0x2
02b0 0229 | ) | Execute Access,All_Read
02b1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02b2 01ce | | Execute Vector,Slice_Write
02b3 00d8 | | Load_Top At_Offset_0
02b4 00da | | Load_Top At_Offset_2
02b5 0227 | ' | Execute Access,All_Reference
02b6 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c8 | | .CONST 0x02c8 ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0003 | | .CONST 0x0003 ; Number of locals
02bb INIT_02b8:
02bb e001 | | Load 0x0,0x1
02bc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02bd 00db | | Load_Top At_Offset_3
02be 0227 | ' | Execute Access,All_Reference
02bf 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02c0 e002 | | Load 0x0,0x2
02c1 180d | | Execute Package,Field_Execute,Field_Number 0xd
02c2 0039 | 9 | Store_Top Access,At_Offset_1
02c3 00db | | Load_Top At_Offset_3
02c4 0227 | ' | Execute Access,All_Reference
02c5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02c6 00e3 | | Load_Encached Natural_Cache
02c7 03f1 | | Declare_Variable Discrete,With_Value
02c8 BODY_02b8:
02c8 00d9 | | Load_Top At_Offset_1
02c9 a5fe | | Store_Unchecked 0x2,-0x2
02ca 4801 |H | Short_Literal 0x1
02cb 00d9 | | Load_Top At_Offset_1
02cc e5ff | | Load 0x2,-0x1
02cd 0227 | ' | Execute Access,All_Reference
02ce 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02cf 01cf | | Execute Vector,Slice_Read
02d0 4801 |H | Short_Literal 0x1
02d1 00da | | Load_Top At_Offset_2
02d2 e402 | | Load 0x2,0x2
02d3 0229 | ) | Execute Access,All_Read
02d4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02d5 01ce | | Execute Vector,Slice_Write
02d6 00d8 | | Load_Top At_Offset_0
02d7 00da | | Load_Top At_Offset_2
02d8 0227 | ' | Execute Access,All_Reference
02d9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02da 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02db 0000 0000 | | .BLANK 0000[0x5]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02f0 | | .CONST 0x02f0 ; Address of begin
02e1 0004 | | .CONST 0x0004 ; Address of exception handler
02e2 0003 | | .CONST 0x0003 ; Number of locals
02e3 INIT_02e0:
02e3 e001 | | Load 0x0,0x1
02e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e5 00db | | Load_Top At_Offset_3
02e6 01db | | Execute Vector,Length
02e7 00e3 | | Load_Encached Natural_Cache
02e8 025b | [ | Execute Discrete,Check_In_Type
02e9 e002 | | Load 0x0,0x2
02ea 180d | | Execute Package,Field_Execute,Field_Number 0xd
02eb 0039 | 9 | Store_Top Access,At_Offset_1
02ec 00db | | Load_Top At_Offset_3
02ed 01db | | Execute Vector,Length
02ee 00e3 | | Load_Encached Natural_Cache
02ef 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
02f0 BODY_02e0:
02f0 00d9 | | Load_Top At_Offset_1
02f1 a5fe | | Store_Unchecked 0x2,-0x2
02f2 e5ff | | Load 0x2,-0x1
02f3 01dd | | Execute Vector,First
02f4 e5ff | | Load 0x2,-0x1
02f5 01dd | | Execute Vector,First
02f6 00da | | Load_Top At_Offset_2
02f7 0273 | s | Execute Discrete,Plus
02f8 0aff | | Execute_Immediate Plus,-0x1
02f9 e5ff | | Load 0x2,-0x1
02fa 01cf | | Execute Vector,Slice_Read
02fb 4801 |H | Short_Literal 0x1
02fc 00da | | Load_Top At_Offset_2
02fd e402 | | Load 0x2,0x2
02fe 0229 | ) | Execute Access,All_Read
02ff 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0300 01ce | | Execute Vector,Slice_Write
0301 00d8 | | Load_Top At_Offset_0
0302 00da | | Load_Top At_Offset_2
0303 0227 | ' | Execute Access,All_Reference
0304 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0305 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0306 0000 0000 | | .XXX[0x2]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 0311 | | .CONST 0x0311 ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0002 | | .CONST 0x0002 ; Number of locals
030b INIT_0308:
030b e001 | | Load 0x0,0x1
030c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
030d 4801 |H | Short_Literal 0x1
030e e002 | | Load 0x0,0x2
030f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0310 0039 | 9 | Store_Top Access,At_Offset_1
0311 BODY_0308:
0311 00d8 | | Load_Top At_Offset_0
0312 a5fe | | Store_Unchecked 0x2,-0x2
0313 00db | | Load_Top At_Offset_3
0314 4801 |H | Short_Literal 0x1
0315 00da | | Load_Top At_Offset_2
0316 0227 | ' | Execute Access,All_Reference
0317 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0318 01d6 | | Execute Vector,Field_Write
0319 4801 |H | Short_Literal 0x1
031a 00d9 | | Load_Top At_Offset_1
031b 0227 | ' | Execute Access,All_Reference
031c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
031d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
031e 0000 0000 | | .XXX[0x2]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0329 | ) | .CONST 0x0329 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0002 | | .CONST 0x0002 ; Number of locals
0323 INIT_0320:
0323 e001 | | Load 0x0,0x1
0324 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0325 e5fe | | Load 0x2,-0x2
0326 e002 | | Load 0x0,0x2
0327 180d | | Execute Package,Field_Execute,Field_Number 0xd
0328 0039 | 9 | Store_Top Access,At_Offset_1
0329 BODY_0320:
0329 00d8 | | Load_Top At_Offset_0
032a a5fd | | Store_Unchecked 0x2,-0x3
032b 00d8 | | Load_Top At_Offset_0
032c 0229 | ) | Execute Access,All_Read
032d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
032e 4801 |H | Short_Literal 0x1
032f e5fe | | Load 0x2,-0x2
0330 00d9 | | Load_Top At_Offset_1
0331 00d9 | | Load_Top At_Offset_1
0332 e403 | | Load 0x2,0x3
0333 035b | [ | Declare_Type Array,Constrained
0334 00db | | Load_Top At_Offset_3
0335 01cd | | Execute Vector,Slice_Reference
0336 00d8 | | Load_Top At_Offset_0
0337 0335 | 5 | Declare_Variable Array,Duplicate
0338 00d0 | | Action Swap_Control
0339 00d1 | | Pop_Control Pop_Count_1
033a 00d9 | | Load_Top At_Offset_1
033b 01d9 | | Execute Vector,Reverse_Bounds
033c 0263 | c | Execute Discrete,Above_Bound
033d 7005 |p | Jump_Nonzero 0x343
033e e5ff | | Load 0x2,-0x1
033f 00d9 | | Load_Top At_Offset_1
0340 e407 | | Load 0x2,0x7
0341 01d6 | | Execute Vector,Field_Write
0342 3ffb |? | Loop_Increasing 0x33e
0343 00d0 | | Action Swap_Control
0344 00d1 | | Pop_Control Pop_Count_1
0345 00da | | Load_Top At_Offset_2
0346 00da | | Load_Top At_Offset_2
0347 e403 | | Load 0x2,0x3
0348 01ce | | Execute Vector,Slice_Write
0349 00d3 | | Pop_Control Pop_Count_3
034a e5fe | | Load 0x2,-0x2
034b 00d9 | | Load_Top At_Offset_1
034c 0227 | ' | Execute Access,All_Reference
034d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
034e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
034f 0000 | | .XXX[0x1]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 035a | Z | .CONST 0x035a ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0002 | | .CONST 0x0002 ; Number of locals
0353 INIT_0350:
0353 00db | | Load_Top At_Offset_3
0354 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0355 e5fe | | Load 0x2,-0x2
0356 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0357 0272 | r | Execute Discrete,Minus
0358 00e3 | | Load_Encached Natural_Cache
0359 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
035a BODY_0350:
035a 00d8 | | Load_Top At_Offset_0
035b e5ff | | Load 0x2,-0x1
035c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
035d 027d | } | Execute Discrete,Greater
035e 6803 |h | Jump_Zero 0x362
035f 00db | | Load_Top At_Offset_3
0360 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0361 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0362 4801 |H | Short_Literal 0x1
0363 00d9 | | Load_Top At_Offset_1
0364 e5ff | | Load 0x2,-0x1
0365 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0366 01cf | | Execute Vector,Slice_Read
0367 e5fe | | Load 0x2,-0x2
0368 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0369 0a01 | | Execute_Immediate Plus,0x1
036a e5fe | | Load 0x2,-0x2
036b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
036c 00db | | Load_Top At_Offset_3
036d 0273 | s | Execute Discrete,Plus
036e e5fe | | Load 0x2,-0x2
036f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0370 01ce | | Execute Vector,Slice_Write
0371 e5fe | | Load 0x2,-0x2
0372 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0373 00d9 | | Load_Top At_Offset_1
0374 0273 | s | Execute Discrete,Plus
0375 e5fe | | Load 0x2,-0x2
0376 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0377 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 0382 | | .CONST 0x0382 ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0002 | | .CONST 0x0002 ; Number of locals
037b INIT_0378:
037b 00db | | Load_Top At_Offset_3
037c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
037d e5fe | | Load 0x2,-0x2
037e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
037f 0272 | r | Execute Discrete,Minus
0380 00e3 | | Load_Encached Natural_Cache
0381 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0382 BODY_0378:
0382 00d8 | | Load_Top At_Offset_0
0383 e5ff | | Load 0x2,-0x1
0384 0227 | ' | Execute Access,All_Reference
0385 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0386 027d | } | Execute Discrete,Greater
0387 6804 |h | Jump_Zero 0x38c
0388 00db | | Load_Top At_Offset_3
0389 0227 | ' | Execute Access,All_Reference
038a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
038b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
038c 4801 |H | Short_Literal 0x1
038d 00d9 | | Load_Top At_Offset_1
038e e5ff | | Load 0x2,-0x1
038f 0227 | ' | Execute Access,All_Reference
0390 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0391 01cf | | Execute Vector,Slice_Read
0392 e5fe | | Load 0x2,-0x2
0393 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0394 0a01 | | Execute_Immediate Plus,0x1
0395 e5fe | | Load 0x2,-0x2
0396 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0397 00db | | Load_Top At_Offset_3
0398 0273 | s | Execute Discrete,Plus
0399 e5fe | | Load 0x2,-0x2
039a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
039b 01ce | | Execute Vector,Slice_Write
039c e5fe | | Load 0x2,-0x2
039d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
039e 00d9 | | Load_Top At_Offset_1
039f 0273 | s | Execute Discrete,Plus
03a0 e5fe | | Load 0x2,-0x2
03a1 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03a2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03a3 0000 0000 | | .BLANK 0000[0x5]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03b2 | | .CONST 0x03b2 ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0002 | | .CONST 0x0002 ; Number of locals
03ab INIT_03a8:
03ab 00db | | Load_Top At_Offset_3
03ac 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03ad e5fe | | Load 0x2,-0x2
03ae 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03af 0272 | r | Execute Discrete,Minus
03b0 00e3 | | Load_Encached Natural_Cache
03b1 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
03b2 BODY_03a8:
03b2 00d8 | | Load_Top At_Offset_0
03b3 e5ff | | Load 0x2,-0x1
03b4 01db | | Execute Vector,Length
03b5 027d | } | Execute Discrete,Greater
03b6 6803 |h | Jump_Zero 0x3ba
03b7 00db | | Load_Top At_Offset_3
03b8 01db | | Execute Vector,Length
03b9 0059 | Y | Store_Top Discrete,At_Offset_1
03ba 00db | | Load_Top At_Offset_3
03bb 01dd | | Execute Vector,First
03bc e5ff | | Load 0x2,-0x1
03bd 01dd | | Execute Vector,First
03be 00da | | Load_Top At_Offset_2
03bf 0273 | s | Execute Discrete,Plus
03c0 0aff | | Execute_Immediate Plus,-0x1
03c1 e5ff | | Load 0x2,-0x1
03c2 01cf | | Execute Vector,Slice_Read
03c3 e5fe | | Load 0x2,-0x2
03c4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03c5 0a01 | | Execute_Immediate Plus,0x1
03c6 e5fe | | Load 0x2,-0x2
03c7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03c8 00db | | Load_Top At_Offset_3
03c9 0273 | s | Execute Discrete,Plus
03ca e5fe | | Load 0x2,-0x2
03cb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03cc 01ce | | Execute Vector,Slice_Write
03cd e5fe | | Load 0x2,-0x2
03ce 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03cf 00d9 | | Load_Top At_Offset_1
03d0 0273 | s | Execute Discrete,Plus
03d1 e5fe | | Load 0x2,-0x2
03d2 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03d3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03d4 0000 0000 | | .BLANK 0000[0x4]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03e2 | | .CONST 0x03e2 ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0002 | | .CONST 0x0002 ; Number of locals
03db INIT_03d8:
03db 00db | | Load_Top At_Offset_3
03dc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03dd e5fe | | Load 0x2,-0x2
03de 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03df 0272 | r | Execute Discrete,Minus
03e0 00e3 | | Load_Encached Natural_Cache
03e1 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
03e2 BODY_03d8:
03e2 00d8 | | Load_Top At_Offset_0
03e3 0c01 | | Execute_Immediate Greater_Equal,0x1
03e4 680c |h | Jump_Zero 0x3f1
03e5 00db | | Load_Top At_Offset_3
03e6 e5fe | | Load 0x2,-0x2
03e7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03e8 0a01 | | Execute_Immediate Plus,0x1
03e9 e5fe | | Load 0x2,-0x2
03ea 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03eb 01d6 | | Execute Vector,Field_Write
03ec e5fe | | Load 0x2,-0x2
03ed 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03ee 0a01 | | Execute_Immediate Plus,0x1
03ef e5fe | | Load 0x2,-0x2
03f0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
03f1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03f2 0000 0000 | | .BLANK 0000[0x6]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0402 | | .CONST 0x0402 ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0002 | | .CONST 0x0002 ; Number of locals
03fb INIT_03f8:
03fb e5fd | | Load 0x2,-0x3
03fc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03fd e5fd | | Load 0x2,-0x3
03fe 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03ff 0272 | r | Execute Discrete,Minus
0400 00e3 | | Load_Encached Natural_Cache
0401 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0402 BODY_03f8:
0402 00d8 | | Load_Top At_Offset_0
0403 e5fe | | Load 0x2,-0x2
0404 027d | } | Execute Discrete,Greater
0405 6802 |h | Jump_Zero 0x408
0406 e5fe | | Load 0x2,-0x2
0407 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0408 e5fd | | Load 0x2,-0x3
0409 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
040a e5fd | | Load 0x2,-0x3
040b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
040c 0a01 | | Execute_Immediate Plus,0x1
040d e5fd | | Load 0x2,-0x3
040e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
040f 00db | | Load_Top At_Offset_3
0410 0273 | s | Execute Discrete,Plus
0411 00d9 | | Load_Top At_Offset_1
0412 00d9 | | Load_Top At_Offset_1
0413 e403 | | Load 0x2,0x3
0414 035b | [ | Declare_Type Array,Constrained
0415 00db | | Load_Top At_Offset_3
0416 01cd | | Execute Vector,Slice_Reference
0417 00d8 | | Load_Top At_Offset_0
0418 0335 | 5 | Declare_Variable Array,Duplicate
0419 00d0 | | Action Swap_Control
041a 00d1 | | Pop_Control Pop_Count_1
041b 00d9 | | Load_Top At_Offset_1
041c 01d9 | | Execute Vector,Reverse_Bounds
041d 0263 | c | Execute Discrete,Above_Bound
041e 7005 |p | Jump_Nonzero 0x424
041f e5ff | | Load 0x2,-0x1
0420 00d9 | | Load_Top At_Offset_1
0421 e407 | | Load 0x2,0x7
0422 01d6 | | Execute Vector,Field_Write
0423 3ffb |? | Loop_Increasing 0x41f
0424 00d0 | | Action Swap_Control
0425 00d1 | | Pop_Control Pop_Count_1
0426 00da | | Load_Top At_Offset_2
0427 00da | | Load_Top At_Offset_2
0428 e403 | | Load 0x2,0x3
0429 01ce | | Execute Vector,Slice_Write
042a 00d3 | | Pop_Control Pop_Count_3
042b e5fd | | Load 0x2,-0x3
042c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
042d e5fe | | Load 0x2,-0x2
042e 0273 | s | Execute Discrete,Plus
042f e5fd | | Load 0x2,-0x3
0430 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0431 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0432 0000 0000 | | .BLANK 0000[0x6]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 0444 | D | .CONST 0x0444 ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0002 | | .CONST 0x0002 ; Number of locals
043b INIT_0438:
043b 00da | | Load_Top At_Offset_2
043c 0227 | ' | Execute Access,All_Reference
043d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
043e 00db | | Load_Top At_Offset_3
043f 0227 | ' | Execute Access,All_Reference
0440 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0441 0272 | r | Execute Discrete,Minus
0442 00e3 | | Load_Encached Natural_Cache
0443 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0444 BODY_0438:
0444 00d8 | | Load_Top At_Offset_0
0445 e5fe | | Load 0x2,-0x2
0446 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0447 027d | } | Execute Discrete,Greater
0448 6803 |h | Jump_Zero 0x44c
0449 e5fe | | Load 0x2,-0x2
044a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
044b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
044c 4801 |H | Short_Literal 0x1
044d 00d9 | | Load_Top At_Offset_1
044e e5fe | | Load 0x2,-0x2
044f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0450 01cf | | Execute Vector,Slice_Read
0451 e5ff | | Load 0x2,-0x1
0452 0227 | ' | Execute Access,All_Reference
0453 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0454 0a01 | | Execute_Immediate Plus,0x1
0455 e5ff | | Load 0x2,-0x1
0456 0227 | ' | Execute Access,All_Reference
0457 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0458 00db | | Load_Top At_Offset_3
0459 0273 | s | Execute Discrete,Plus
045a e5ff | | Load 0x2,-0x1
045b 0229 | ) | Execute Access,All_Read
045c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
045d 01ce | | Execute Vector,Slice_Write
045e 00db | | Load_Top At_Offset_3
045f 0227 | ' | Execute Access,All_Reference
0460 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0461 00d9 | | Load_Top At_Offset_1
0462 0273 | s | Execute Discrete,Plus
0463 e5ff | | Load 0x2,-0x1
0464 0227 | ' | Execute Access,All_Reference
0465 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0466 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0467 0000 | | .XXX[0x1]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 0474 | t | .CONST 0x0474 ; Address of begin
0469 0004 | | .CONST 0x0004 ; Address of exception handler
046a 0002 | | .CONST 0x0002 ; Number of locals
046b INIT_0468:
046b 00da | | Load_Top At_Offset_2
046c 0227 | ' | Execute Access,All_Reference
046d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
046e 00db | | Load_Top At_Offset_3
046f 0227 | ' | Execute Access,All_Reference
0470 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0471 0272 | r | Execute Discrete,Minus
0472 00e3 | | Load_Encached Natural_Cache
0473 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0474 BODY_0468:
0474 00d8 | | Load_Top At_Offset_0
0475 e5fe | | Load 0x2,-0x2
0476 0227 | ' | Execute Access,All_Reference
0477 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0478 027d | } | Execute Discrete,Greater
0479 6804 |h | Jump_Zero 0x47e
047a e5fe | | Load 0x2,-0x2
047b 0227 | ' | Execute Access,All_Reference
047c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
047d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
047e 4801 |H | Short_Literal 0x1
047f 00d9 | | Load_Top At_Offset_1
0480 e5fe | | Load 0x2,-0x2
0481 0227 | ' | Execute Access,All_Reference
0482 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0483 01cf | | Execute Vector,Slice_Read
0484 e5ff | | Load 0x2,-0x1
0485 0227 | ' | Execute Access,All_Reference
0486 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0487 0a01 | | Execute_Immediate Plus,0x1
0488 e5ff | | Load 0x2,-0x1
0489 0227 | ' | Execute Access,All_Reference
048a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
048b 00db | | Load_Top At_Offset_3
048c 0273 | s | Execute Discrete,Plus
048d e5ff | | Load 0x2,-0x1
048e 0229 | ) | Execute Access,All_Read
048f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0490 01ce | | Execute Vector,Slice_Write
0491 00db | | Load_Top At_Offset_3
0492 0227 | ' | Execute Access,All_Reference
0493 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0494 00d9 | | Load_Top At_Offset_1
0495 0273 | s | Execute Discrete,Plus
0496 e5ff | | Load 0x2,-0x1
0497 0227 | ' | Execute Access,All_Reference
0498 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0499 4503 |E | Exit_Suprogram New_Top_Offset 0x3
049a 0000 0000 | | .BLANK 0000[0x6]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04ac | | .CONST 0x04ac ; Address of begin
04a1 0004 | | .CONST 0x0004 ; Address of exception handler
04a2 0002 | | .CONST 0x0002 ; Number of locals
04a3 INIT_04a0:
04a3 00da | | Load_Top At_Offset_2
04a4 0227 | ' | Execute Access,All_Reference
04a5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04a6 00db | | Load_Top At_Offset_3
04a7 0227 | ' | Execute Access,All_Reference
04a8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04a9 0272 | r | Execute Discrete,Minus
04aa 00e3 | | Load_Encached Natural_Cache
04ab 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
04ac BODY_04a0:
04ac 00d8 | | Load_Top At_Offset_0
04ad e5fe | | Load 0x2,-0x2
04ae 01db | | Execute Vector,Length
04af 027d | } | Execute Discrete,Greater
04b0 6803 |h | Jump_Zero 0x4b4
04b1 e5fe | | Load 0x2,-0x2
04b2 01db | | Execute Vector,Length
04b3 0059 | Y | Store_Top Discrete,At_Offset_1
04b4 e5fe | | Load 0x2,-0x2
04b5 01dd | | Execute Vector,First
04b6 e5fe | | Load 0x2,-0x2
04b7 01dd | | Execute Vector,First
04b8 00da | | Load_Top At_Offset_2
04b9 0273 | s | Execute Discrete,Plus
04ba 0aff | | Execute_Immediate Plus,-0x1
04bb e5fe | | Load 0x2,-0x2
04bc 01cf | | Execute Vector,Slice_Read
04bd e5ff | | Load 0x2,-0x1
04be 0227 | ' | Execute Access,All_Reference
04bf 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04c0 0a01 | | Execute_Immediate Plus,0x1
04c1 e5ff | | Load 0x2,-0x1
04c2 0227 | ' | Execute Access,All_Reference
04c3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04c4 00db | | Load_Top At_Offset_3
04c5 0273 | s | Execute Discrete,Plus
04c6 e5ff | | Load 0x2,-0x1
04c7 0229 | ) | Execute Access,All_Read
04c8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04c9 01ce | | Execute Vector,Slice_Write
04ca 00db | | Load_Top At_Offset_3
04cb 0227 | ' | Execute Access,All_Reference
04cc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04cd 00d9 | | Load_Top At_Offset_1
04ce 0273 | s | Execute Discrete,Plus
04cf e5ff | | Load 0x2,-0x1
04d0 0227 | ' | Execute Access,All_Reference
04d1 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
04d2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04d3 0000 0000 | | .BLANK 0000[0x5]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04e4 | | .CONST 0x04e4 ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0002 | | .CONST 0x0002 ; Number of locals
04db INIT_04d8:
04db 00da | | Load_Top At_Offset_2
04dc 0227 | ' | Execute Access,All_Reference
04dd 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04de 00db | | Load_Top At_Offset_3
04df 0227 | ' | Execute Access,All_Reference
04e0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04e1 0272 | r | Execute Discrete,Minus
04e2 00e3 | | Load_Encached Natural_Cache
04e3 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
04e4 BODY_04d8:
04e4 00d8 | | Load_Top At_Offset_0
04e5 0c01 | | Execute_Immediate Greater_Equal,0x1
04e6 6810 |h | Jump_Zero 0x4f7
04e7 e5fe | | Load 0x2,-0x2
04e8 e5ff | | Load 0x2,-0x1
04e9 0227 | ' | Execute Access,All_Reference
04ea 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04eb 0a01 | | Execute_Immediate Plus,0x1
04ec e5ff | | Load 0x2,-0x1
04ed 0227 | ' | Execute Access,All_Reference
04ee 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04ef 01d6 | | Execute Vector,Field_Write
04f0 00db | | Load_Top At_Offset_3
04f1 0227 | ' | Execute Access,All_Reference
04f2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04f3 0a01 | | Execute_Immediate Plus,0x1
04f4 e5ff | | Load 0x2,-0x1
04f5 0227 | ' | Execute Access,All_Reference
04f6 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
04f7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 0504 | | .CONST 0x0504 ; Address of begin
04f9 0004 | | .CONST 0x0004 ; Address of exception handler
04fa 0002 | | .CONST 0x0002 ; Number of locals
04fb INIT_04f8:
04fb 00da | | Load_Top At_Offset_2
04fc 0227 | ' | Execute Access,All_Reference
04fd 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04fe 00db | | Load_Top At_Offset_3
04ff 0227 | ' | Execute Access,All_Reference
0500 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0501 0272 | r | Execute Discrete,Minus
0502 00e3 | | Load_Encached Natural_Cache
0503 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0504 BODY_04f8:
0504 00d8 | | Load_Top At_Offset_0
0505 e5fd | | Load 0x2,-0x3
0506 027d | } | Execute Discrete,Greater
0507 6802 |h | Jump_Zero 0x50a
0508 e5fd | | Load 0x2,-0x3
0509 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
050a 00db | | Load_Top At_Offset_3
050b 0229 | ) | Execute Access,All_Read
050c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
050d e5ff | | Load 0x2,-0x1
050e 0227 | ' | Execute Access,All_Reference
050f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0510 0a01 | | Execute_Immediate Plus,0x1
0511 e5ff | | Load 0x2,-0x1
0512 0227 | ' | Execute Access,All_Reference
0513 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0514 00db | | Load_Top At_Offset_3
0515 0273 | s | Execute Discrete,Plus
0516 00d9 | | Load_Top At_Offset_1
0517 00d9 | | Load_Top At_Offset_1
0518 e403 | | Load 0x2,0x3
0519 035b | [ | Declare_Type Array,Constrained
051a 00db | | Load_Top At_Offset_3
051b 01cd | | Execute Vector,Slice_Reference
051c 00d8 | | Load_Top At_Offset_0
051d 0335 | 5 | Declare_Variable Array,Duplicate
051e 00d0 | | Action Swap_Control
051f 00d1 | | Pop_Control Pop_Count_1
0520 00d9 | | Load_Top At_Offset_1
0521 01d9 | | Execute Vector,Reverse_Bounds
0522 0263 | c | Execute Discrete,Above_Bound
0523 7005 |p | Jump_Nonzero 0x529
0524 e5fe | | Load 0x2,-0x2
0525 00d9 | | Load_Top At_Offset_1
0526 e407 | | Load 0x2,0x7
0527 01d6 | | Execute Vector,Field_Write
0528 3ffb |? | Loop_Increasing 0x524
0529 00d0 | | Action Swap_Control
052a 00d1 | | Pop_Control Pop_Count_1
052b 00da | | Load_Top At_Offset_2
052c 00da | | Load_Top At_Offset_2
052d e403 | | Load 0x2,0x3
052e 01ce | | Execute Vector,Slice_Write
052f 00d3 | | Pop_Control Pop_Count_3
0530 00db | | Load_Top At_Offset_3
0531 0227 | ' | Execute Access,All_Reference
0532 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0533 e5fd | | Load 0x2,-0x3
0534 0273 | s | Execute Discrete,Plus
0535 e5ff | | Load 0x2,-0x1
0536 0227 | ' | Execute Access,All_Reference
0537 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0538 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0539 0000 0000 | | .BLANK 0000[0x7]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0548 | H | .CONST 0x0548 ; Address of begin
0541 0004 | | .CONST 0x0004 ; Address of exception handler
0542 0003 | | .CONST 0x0003 ; Number of locals
0543 INIT_0540:
0543 00e3 | | Load_Encached Natural_Cache
0544 00db | | Load_Top At_Offset_3
0545 01db | | Execute Vector,Length
0546 00e3 | | Load_Encached Natural_Cache
0547 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0548 BODY_0540:
0548 e5fd | | Load 0x2,-0x3
0549 0227 | ' | Execute Access,All_Reference
054a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
054b 00d9 | | Load_Top At_Offset_1
054c 0273 | s | Execute Discrete,Plus
054d 005a | Z | Store_Top Discrete,At_Offset_2
054e e5fd | | Load 0x2,-0x3
054f 0227 | ' | Execute Access,All_Reference
0550 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0551 00da | | Load_Top At_Offset_2
0552 027c | | | Execute Discrete,Less
0553 6810 |h | Jump_Zero 0x564
0554 00d9 | | Load_Top At_Offset_1
0555 e5fe | | Load 0x2,-0x2
0556 0273 | s | Execute Discrete,Plus
0557 0aff | | Execute_Immediate Plus,-0x1
0558 005a | Z | Store_Top Discrete,At_Offset_2
0559 00d9 | | Load_Top At_Offset_1
055a 00da | | Load_Top At_Offset_2
055b e5fe | | Load 0x2,-0x2
055c 026f | o | Execute Discrete,Remainder
055d 0272 | r | Execute Discrete,Minus
055e 005a | Z | Store_Top Discrete,At_Offset_2
055f e5fd | | Load 0x2,-0x3
0560 00da | | Load_Top At_Offset_2
0561 e002 | | Load 0x0,0x2
0562 180f | | Execute Package,Field_Execute,Field_Number 0xf
0563 c5fd | | Store 0x2,-0x3
0564 e5ff | | Load 0x2,-0x1
0565 01dd | | Execute Vector,First
0566 e5ff | | Load 0x2,-0x1
0567 01dc | | Execute Vector,Last
0568 e5ff | | Load 0x2,-0x1
0569 01cf | | Execute Vector,Slice_Read
056a e5fd | | Load 0x2,-0x3
056b 0227 | ' | Execute Access,All_Reference
056c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
056d 0a01 | | Execute_Immediate Plus,0x1
056e e5fd | | Load 0x2,-0x3
056f 0227 | ' | Execute Access,All_Reference
0570 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0571 00db | | Load_Top At_Offset_3
0572 0273 | s | Execute Discrete,Plus
0573 e5fd | | Load 0x2,-0x3
0574 0229 | ) | Execute Access,All_Read
0575 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0576 01ce | | Execute Vector,Slice_Write
0577 e5fd | | Load 0x2,-0x3
0578 0227 | ' | Execute Access,All_Reference
0579 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
057a 00d9 | | Load_Top At_Offset_1
057b 0273 | s | Execute Discrete,Plus
057c e5fd | | Load 0x2,-0x3
057d 0227 | ' | Execute Access,All_Reference
057e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
057f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0584 | | .CONST 0x0584 ; Address of begin
0581 0004 | | .CONST 0x0004 ; Address of exception handler
0582 0002 | | .CONST 0x0002 ; Number of locals
0583 INIT_0580:
0583 00e3 | | Load_Encached Natural_Cache
0584 BODY_0580:
0584 e5fd | | Load 0x2,-0x3
0585 0227 | ' | Execute Access,All_Reference
0586 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0587 0a01 | | Execute_Immediate Plus,0x1
0588 0059 | Y | Store_Top Discrete,At_Offset_1
0589 e5fd | | Load 0x2,-0x3
058a 0227 | ' | Execute Access,All_Reference
058b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
058c 00d9 | | Load_Top At_Offset_1
058d 027c | | | Execute Discrete,Less
058e 6810 |h | Jump_Zero 0x59f
058f 00d8 | | Load_Top At_Offset_0
0590 e5fe | | Load 0x2,-0x2
0591 0273 | s | Execute Discrete,Plus
0592 0aff | | Execute_Immediate Plus,-0x1
0593 0059 | Y | Store_Top Discrete,At_Offset_1
0594 00d8 | | Load_Top At_Offset_0
0595 00d9 | | Load_Top At_Offset_1
0596 e5fe | | Load 0x2,-0x2
0597 026f | o | Execute Discrete,Remainder
0598 0272 | r | Execute Discrete,Minus
0599 0059 | Y | Store_Top Discrete,At_Offset_1
059a e5fd | | Load 0x2,-0x3
059b 00d9 | | Load_Top At_Offset_1
059c e002 | | Load 0x0,0x2
059d 180f | | Execute Package,Field_Execute,Field_Number 0xf
059e c5fd | | Store 0x2,-0x3
059f 00db | | Load_Top At_Offset_3
05a0 e5fd | | Load 0x2,-0x3
05a1 0227 | ' | Execute Access,All_Reference
05a2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05a3 0a01 | | Execute_Immediate Plus,0x1
05a4 e5fd | | Load 0x2,-0x3
05a5 0227 | ' | Execute Access,All_Reference
05a6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05a7 01d6 | | Execute Vector,Field_Write
05a8 e5fd | | Load 0x2,-0x3
05a9 0227 | ' | Execute Access,All_Reference
05aa 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05ab 0a01 | | Execute_Immediate Plus,0x1
05ac e5fd | | Load 0x2,-0x3
05ad 0227 | ' | Execute Access,All_Reference
05ae 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
05af 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b4 | | .CONST 0x05b4 ; Address of begin
05b1 0004 | | .CONST 0x0004 ; Address of exception handler
05b2 0002 | | .CONST 0x0002 ; Number of locals
05b3 INIT_05b0:
05b3 00e3 | | Load_Encached Natural_Cache
05b4 BODY_05b0:
05b4 e5fc | | Load 0x2,-0x4
05b5 0227 | ' | Execute Access,All_Reference
05b6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05b7 e5fe | | Load 0x2,-0x2
05b8 0273 | s | Execute Discrete,Plus
05b9 0059 | Y | Store_Top Discrete,At_Offset_1
05ba e5fc | | Load 0x2,-0x4
05bb 0227 | ' | Execute Access,All_Reference
05bc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05bd 00d9 | | Load_Top At_Offset_1
05be 027c | | | Execute Discrete,Less
05bf 6810 |h | Jump_Zero 0x5d0
05c0 00d8 | | Load_Top At_Offset_0
05c1 e5fd | | Load 0x2,-0x3
05c2 0273 | s | Execute Discrete,Plus
05c3 0aff | | Execute_Immediate Plus,-0x1
05c4 0059 | Y | Store_Top Discrete,At_Offset_1
05c5 00d8 | | Load_Top At_Offset_0
05c6 00d9 | | Load_Top At_Offset_1
05c7 e5fd | | Load 0x2,-0x3
05c8 026f | o | Execute Discrete,Remainder
05c9 0272 | r | Execute Discrete,Minus
05ca 0059 | Y | Store_Top Discrete,At_Offset_1
05cb e5fc | | Load 0x2,-0x4
05cc 00d9 | | Load_Top At_Offset_1
05cd e002 | | Load 0x0,0x2
05ce 180f | | Execute Package,Field_Execute,Field_Number 0xf
05cf c5fc | | Store 0x2,-0x4
05d0 e5fc | | Load 0x2,-0x4
05d1 0229 | ) | Execute Access,All_Read
05d2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05d3 e5fc | | Load 0x2,-0x4
05d4 0227 | ' | Execute Access,All_Reference
05d5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05d6 0a01 | | Execute_Immediate Plus,0x1
05d7 e5fc | | Load 0x2,-0x4
05d8 0227 | ' | Execute Access,All_Reference
05d9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05da e5fe | | Load 0x2,-0x2
05db 0273 | s | Execute Discrete,Plus
05dc 00d9 | | Load_Top At_Offset_1
05dd 00d9 | | Load_Top At_Offset_1
05de e403 | | Load 0x2,0x3
05df 035b | [ | Declare_Type Array,Constrained
05e0 00db | | Load_Top At_Offset_3
05e1 01cd | | Execute Vector,Slice_Reference
05e2 00d8 | | Load_Top At_Offset_0
05e3 0335 | 5 | Declare_Variable Array,Duplicate
05e4 00d0 | | Action Swap_Control
05e5 00d1 | | Pop_Control Pop_Count_1
05e6 00d9 | | Load_Top At_Offset_1
05e7 01d9 | | Execute Vector,Reverse_Bounds
05e8 0263 | c | Execute Discrete,Above_Bound
05e9 7005 |p | Jump_Nonzero 0x5ef
05ea e5ff | | Load 0x2,-0x1
05eb 00d9 | | Load_Top At_Offset_1
05ec e407 | | Load 0x2,0x7
05ed 01d6 | | Execute Vector,Field_Write
05ee 3ffb |? | Loop_Increasing 0x5ea
05ef 00d0 | | Action Swap_Control
05f0 00d1 | | Pop_Control Pop_Count_1
05f1 00da | | Load_Top At_Offset_2
05f2 00da | | Load_Top At_Offset_2
05f3 e403 | | Load 0x2,0x3
05f4 01ce | | Execute Vector,Slice_Write
05f5 00d3 | | Pop_Control Pop_Count_3
05f6 e5fc | | Load 0x2,-0x4
05f7 0227 | ' | Execute Access,All_Reference
05f8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05f9 e5fe | | Load 0x2,-0x2
05fa 0273 | s | Execute Discrete,Plus
05fb e5fc | | Load 0x2,-0x4
05fc 0227 | ' | Execute Access,All_Reference
05fd 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
05fe 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05ff 0000 | | .XXX[0x1]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0604 | | .CONST 0x0604 ; Address of begin
0601 0004 | | .CONST 0x0004 ; Address of exception handler
0602 0002 | | .CONST 0x0002 ; Number of locals
0603 INIT_0600:
0603 00e3 | | Load_Encached Natural_Cache
0604 BODY_0600:
0604 e5fd | | Load 0x2,-0x3
0605 0227 | ' | Execute Access,All_Reference
0606 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0607 e5ff | | Load 0x2,-0x1
0608 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0609 0273 | s | Execute Discrete,Plus
060a 0059 | Y | Store_Top Discrete,At_Offset_1
060b e5fd | | Load 0x2,-0x3
060c 0227 | ' | Execute Access,All_Reference
060d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
060e 00d9 | | Load_Top At_Offset_1
060f 027c | | | Execute Discrete,Less
0610 6810 |h | Jump_Zero 0x621
0611 00d8 | | Load_Top At_Offset_0
0612 e5fe | | Load 0x2,-0x2
0613 0273 | s | Execute Discrete,Plus
0614 0aff | | Execute_Immediate Plus,-0x1
0615 0059 | Y | Store_Top Discrete,At_Offset_1
0616 00d8 | | Load_Top At_Offset_0
0617 00d9 | | Load_Top At_Offset_1
0618 e5fe | | Load 0x2,-0x2
0619 026f | o | Execute Discrete,Remainder
061a 0272 | r | Execute Discrete,Minus
061b 0059 | Y | Store_Top Discrete,At_Offset_1
061c e5fd | | Load 0x2,-0x3
061d 00d9 | | Load_Top At_Offset_1
061e e002 | | Load 0x0,0x2
061f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0620 c5fd | | Store 0x2,-0x3
0621 4801 |H | Short_Literal 0x1
0622 e5ff | | Load 0x2,-0x1
0623 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0624 e5ff | | Load 0x2,-0x1
0625 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0626 01cf | | Execute Vector,Slice_Read
0627 e5fd | | Load 0x2,-0x3
0628 0227 | ' | Execute Access,All_Reference
0629 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
062a 0a01 | | Execute_Immediate Plus,0x1
062b e5fd | | Load 0x2,-0x3
062c 0227 | ' | Execute Access,All_Reference
062d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
062e e5ff | | Load 0x2,-0x1
062f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0630 0273 | s | Execute Discrete,Plus
0631 e5fd | | Load 0x2,-0x3
0632 0229 | ) | Execute Access,All_Read
0633 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0634 01ce | | Execute Vector,Slice_Write
0635 e5fd | | Load 0x2,-0x3
0636 0227 | ' | Execute Access,All_Reference
0637 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0638 e5ff | | Load 0x2,-0x1
0639 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
063a 0273 | s | Execute Discrete,Plus
063b e5fd | | Load 0x2,-0x3
063c 0227 | ' | Execute Access,All_Reference
063d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
063e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
063f 0000 | | .XXX[0x1]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0644 | D | .CONST 0x0644 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0002 | | .CONST 0x0002 ; Number of locals
0643 INIT_0640:
0643 00e3 | | Load_Encached Natural_Cache
0644 BODY_0640:
0644 e5fd | | Load 0x2,-0x3
0645 0227 | ' | Execute Access,All_Reference
0646 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0647 e5ff | | Load 0x2,-0x1
0648 0227 | ' | Execute Access,All_Reference
0649 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
064a 0273 | s | Execute Discrete,Plus
064b 0059 | Y | Store_Top Discrete,At_Offset_1
064c e5fd | | Load 0x2,-0x3
064d 0227 | ' | Execute Access,All_Reference
064e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
064f 00d9 | | Load_Top At_Offset_1
0650 027c | | | Execute Discrete,Less
0651 6810 |h | Jump_Zero 0x662
0652 00d8 | | Load_Top At_Offset_0
0653 e5fe | | Load 0x2,-0x2
0654 0273 | s | Execute Discrete,Plus
0655 0aff | | Execute_Immediate Plus,-0x1
0656 0059 | Y | Store_Top Discrete,At_Offset_1
0657 00d8 | | Load_Top At_Offset_0
0658 00d9 | | Load_Top At_Offset_1
0659 e5fe | | Load 0x2,-0x2
065a 026f | o | Execute Discrete,Remainder
065b 0272 | r | Execute Discrete,Minus
065c 0059 | Y | Store_Top Discrete,At_Offset_1
065d e5fd | | Load 0x2,-0x3
065e 00d9 | | Load_Top At_Offset_1
065f e002 | | Load 0x0,0x2
0660 180f | | Execute Package,Field_Execute,Field_Number 0xf
0661 c5fd | | Store 0x2,-0x3
0662 4801 |H | Short_Literal 0x1
0663 e5ff | | Load 0x2,-0x1
0664 0227 | ' | Execute Access,All_Reference
0665 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0666 e5ff | | Load 0x2,-0x1
0667 0227 | ' | Execute Access,All_Reference
0668 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0669 01cf | | Execute Vector,Slice_Read
066a e5fd | | Load 0x2,-0x3
066b 0227 | ' | Execute Access,All_Reference
066c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
066d 0a01 | | Execute_Immediate Plus,0x1
066e e5fd | | Load 0x2,-0x3
066f 0227 | ' | Execute Access,All_Reference
0670 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0671 e5ff | | Load 0x2,-0x1
0672 0227 | ' | Execute Access,All_Reference
0673 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0674 0273 | s | Execute Discrete,Plus
0675 e5fd | | Load 0x2,-0x3
0676 0229 | ) | Execute Access,All_Read
0677 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0678 01ce | | Execute Vector,Slice_Write
0679 e5fd | | Load 0x2,-0x3
067a 0227 | ' | Execute Access,All_Reference
067b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
067c e5ff | | Load 0x2,-0x1
067d 0227 | ' | Execute Access,All_Reference
067e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
067f 0273 | s | Execute Discrete,Plus
0680 e5fd | | Load 0x2,-0x3
0681 0227 | ' | Execute Access,All_Reference
0682 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0683 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0684 0000 0000 | | .BLANK 0000[0x4]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 0693 | | .CONST 0x0693 ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0003 | | .CONST 0x0003 ; Number of locals
068b INIT_0688:
068b 00db | | Load_Top At_Offset_3
068c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
068d e5fe | | Load 0x2,-0x2
068e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
068f 0272 | r | Execute Discrete,Minus
0690 00e3 | | Load_Encached Natural_Cache
0691 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0692 00e3 | | Load_Encached Natural_Cache
0693 BODY_0688:
0693 00d9 | | Load_Top At_Offset_1
0694 e5ff | | Load 0x2,-0x1
0695 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0696 027b | { | Execute Discrete,Greater_Equal
0697 6825 |h% | Jump_Zero 0x6bd
0698 4801 |H | Short_Literal 0x1
0699 e5fe | | Load 0x2,-0x2
069a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
069b e5fe | | Load 0x2,-0x2
069c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
069d 01cf | | Execute Vector,Slice_Read
069e e5ff | | Load 0x2,-0x1
069f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06a0 0a01 | | Execute_Immediate Plus,0x1
06a1 e5ff | | Load 0x2,-0x1
06a2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06a3 e5fe | | Load 0x2,-0x2
06a4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06a5 0273 | s | Execute Discrete,Plus
06a6 e5fe | | Load 0x2,-0x2
06a7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06a8 01ce | | Execute Vector,Slice_Write
06a9 4801 |H | Short_Literal 0x1
06aa e5ff | | Load 0x2,-0x1
06ab 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06ac e5ff | | Load 0x2,-0x1
06ad 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06ae 01cf | | Execute Vector,Slice_Read
06af 4801 |H | Short_Literal 0x1
06b0 e5ff | | Load 0x2,-0x1
06b1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06b2 e5fe | | Load 0x2,-0x2
06b3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06b4 01ce | | Execute Vector,Slice_Write
06b5 e5fe | | Load 0x2,-0x2
06b6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06b7 e5ff | | Load 0x2,-0x1
06b8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06b9 0273 | s | Execute Discrete,Plus
06ba e5fe | | Load 0x2,-0x2
06bb 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06bd e5ff | | Load 0x2,-0x1
06be 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06bf e5fe | | Load 0x2,-0x2
06c0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06c1 027d | } | Execute Discrete,Greater
06c2 680d |h | Jump_Zero 0x6d0
06c3 4801 |H | Short_Literal 0x1
06c4 e5fe | | Load 0x2,-0x2
06c5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06c6 e5ff | | Load 0x2,-0x1
06c7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06c8 01cf | | Execute Vector,Slice_Read
06c9 e5fe | | Load 0x2,-0x2
06ca 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
06cb e5fe | | Load 0x2,-0x2
06cc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06cd e5fe | | Load 0x2,-0x2
06ce 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06cf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06d0 4801 |H | Short_Literal 0x1
06d1 e5fe | | Load 0x2,-0x2
06d2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06d3 00da | | Load_Top At_Offset_2
06d4 0272 | r | Execute Discrete,Minus
06d5 e5fe | | Load 0x2,-0x2
06d6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06d7 01cf | | Execute Vector,Slice_Read
06d8 e5ff | | Load 0x2,-0x1
06d9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06da 0a01 | | Execute_Immediate Plus,0x1
06db e5fe | | Load 0x2,-0x2
06dc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06dd e5fe | | Load 0x2,-0x2
06de 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06df 01ce | | Execute Vector,Slice_Write
06e0 4801 |H | Short_Literal 0x1
06e1 e5ff | | Load 0x2,-0x1
06e2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06e3 e5ff | | Load 0x2,-0x1
06e4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06e5 01cf | | Execute Vector,Slice_Read
06e6 4801 |H | Short_Literal 0x1
06e7 e5ff | | Load 0x2,-0x1
06e8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06e9 e5fe | | Load 0x2,-0x2
06ea 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06eb 01ce | | Execute Vector,Slice_Write
06ec e5fe | | Load 0x2,-0x2
06ed 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06ee e5fe | | Load 0x2,-0x2
06ef 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06f0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06f1 0000 0000 | | .BLANK 0000[0x7]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 0703 | | .CONST 0x0703 ; Address of begin
06f9 0004 | | .CONST 0x0004 ; Address of exception handler
06fa 0003 | | .CONST 0x0003 ; Number of locals
06fb INIT_06f8:
06fb 00db | | Load_Top At_Offset_3
06fc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06fd e5fe | | Load 0x2,-0x2
06fe 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06ff 0272 | r | Execute Discrete,Minus
0700 00e3 | | Load_Encached Natural_Cache
0701 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0702 00e3 | | Load_Encached Natural_Cache
0703 BODY_06f8:
0703 00d9 | | Load_Top At_Offset_1
0704 e5ff | | Load 0x2,-0x1
0705 0227 | ' | Execute Access,All_Reference
0706 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0707 027b | { | Execute Discrete,Greater_Equal
0708 682b |h+ | Jump_Zero 0x734
0709 4801 |H | Short_Literal 0x1
070a e5fe | | Load 0x2,-0x2
070b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
070c e5fe | | Load 0x2,-0x2
070d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
070e 01cf | | Execute Vector,Slice_Read
070f e5ff | | Load 0x2,-0x1
0710 0227 | ' | Execute Access,All_Reference
0711 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0712 0a01 | | Execute_Immediate Plus,0x1
0713 e5ff | | Load 0x2,-0x1
0714 0227 | ' | Execute Access,All_Reference
0715 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0716 e5fe | | Load 0x2,-0x2
0717 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0718 0273 | s | Execute Discrete,Plus
0719 e5fe | | Load 0x2,-0x2
071a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
071b 01ce | | Execute Vector,Slice_Write
071c 4801 |H | Short_Literal 0x1
071d e5ff | | Load 0x2,-0x1
071e 0227 | ' | Execute Access,All_Reference
071f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0720 e5ff | | Load 0x2,-0x1
0721 0227 | ' | Execute Access,All_Reference
0722 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0723 01cf | | Execute Vector,Slice_Read
0724 4801 |H | Short_Literal 0x1
0725 e5ff | | Load 0x2,-0x1
0726 0227 | ' | Execute Access,All_Reference
0727 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0728 e5fe | | Load 0x2,-0x2
0729 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
072a 01ce | | Execute Vector,Slice_Write
072b e5fe | | Load 0x2,-0x2
072c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
072d e5ff | | Load 0x2,-0x1
072e 0227 | ' | Execute Access,All_Reference
072f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0730 0273 | s | Execute Discrete,Plus
0731 e5fe | | Load 0x2,-0x2
0732 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0733 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0734 e5ff | | Load 0x2,-0x1
0735 0227 | ' | Execute Access,All_Reference
0736 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0737 e5fe | | Load 0x2,-0x2
0738 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0739 027d | } | Execute Discrete,Greater
073a 680e |h | Jump_Zero 0x749
073b 4801 |H | Short_Literal 0x1
073c e5fe | | Load 0x2,-0x2
073d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
073e e5ff | | Load 0x2,-0x1
073f 0227 | ' | Execute Access,All_Reference
0740 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0741 01cf | | Execute Vector,Slice_Read
0742 e5fe | | Load 0x2,-0x2
0743 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0744 e5fe | | Load 0x2,-0x2
0745 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0746 e5fe | | Load 0x2,-0x2
0747 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0748 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0749 4801 |H | Short_Literal 0x1
074a e5fe | | Load 0x2,-0x2
074b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
074c 00da | | Load_Top At_Offset_2
074d 0272 | r | Execute Discrete,Minus
074e e5fe | | Load 0x2,-0x2
074f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0750 01cf | | Execute Vector,Slice_Read
0751 e5ff | | Load 0x2,-0x1
0752 0227 | ' | Execute Access,All_Reference
0753 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0754 0a01 | | Execute_Immediate Plus,0x1
0755 e5fe | | Load 0x2,-0x2
0756 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0757 e5fe | | Load 0x2,-0x2
0758 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0759 01ce | | Execute Vector,Slice_Write
075a 4801 |H | Short_Literal 0x1
075b e5ff | | Load 0x2,-0x1
075c 0227 | ' | Execute Access,All_Reference
075d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
075e e5ff | | Load 0x2,-0x1
075f 0227 | ' | Execute Access,All_Reference
0760 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0761 01cf | | Execute Vector,Slice_Read
0762 4801 |H | Short_Literal 0x1
0763 e5ff | | Load 0x2,-0x1
0764 0227 | ' | Execute Access,All_Reference
0765 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0766 e5fe | | Load 0x2,-0x2
0767 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0768 01ce | | Execute Vector,Slice_Write
0769 e5fe | | Load 0x2,-0x2
076a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
076b e5fe | | Load 0x2,-0x2
076c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
076d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
076e 0000 0000 | | .XXX[0x2]
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 077f | | .CONST 0x077f ; Address of begin
0771 0004 | | .CONST 0x0004 ; Address of exception handler
0772 0004 | | .CONST 0x0004 ; Number of locals
0773 INIT_0770:
0773 00db | | Load_Top At_Offset_3
0774 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0775 e5fe | | Load 0x2,-0x2
0776 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0777 0272 | r | Execute Discrete,Minus
0778 00e3 | | Load_Encached Natural_Cache
0779 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
077a 00e3 | | Load_Encached Natural_Cache
077b e5ff | | Load 0x2,-0x1
077c 01db | | Execute Vector,Length
077d 00e3 | | Load_Encached Natural_Cache
077e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
077f BODY_0770:
077f 00da | | Load_Top At_Offset_2
0780 00d9 | | Load_Top At_Offset_1
0781 027b | { | Execute Discrete,Greater_Equal
0782 681f |h | Jump_Zero 0x7a2
0783 4801 |H | Short_Literal 0x1
0784 e5fe | | Load 0x2,-0x2
0785 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0786 e5fe | | Load 0x2,-0x2
0787 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0788 01cf | | Execute Vector,Slice_Read
0789 00d9 | | Load_Top At_Offset_1
078a 0a01 | | Execute_Immediate Plus,0x1
078b 00da | | Load_Top At_Offset_2
078c e5fe | | Load 0x2,-0x2
078d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
078e 0273 | s | Execute Discrete,Plus
078f e5fe | | Load 0x2,-0x2
0790 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0791 01ce | | Execute Vector,Slice_Write
0792 4801 |H | Short_Literal 0x1
0793 00d9 | | Load_Top At_Offset_1
0794 e5ff | | Load 0x2,-0x1
0795 01cf | | Execute Vector,Slice_Read
0796 4801 |H | Short_Literal 0x1
0797 00da | | Load_Top At_Offset_2
0798 e5fe | | Load 0x2,-0x2
0799 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
079a 01ce | | Execute Vector,Slice_Write
079b e5fe | | Load 0x2,-0x2
079c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
079d 00d9 | | Load_Top At_Offset_1
079e 0273 | s | Execute Discrete,Plus
079f e5fe | | Load 0x2,-0x2
07a0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07a2 00d8 | | Load_Top At_Offset_0
07a3 e5fe | | Load 0x2,-0x2
07a4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07a5 027d | } | Execute Discrete,Greater
07a6 6811 |h | Jump_Zero 0x7b8
07a7 e5ff | | Load 0x2,-0x1
07a8 01dd | | Execute Vector,First
07a9 e5ff | | Load 0x2,-0x1
07aa 01dd | | Execute Vector,First
07ab e5fe | | Load 0x2,-0x2
07ac 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07ad 0273 | s | Execute Discrete,Plus
07ae 0aff | | Execute_Immediate Plus,-0x1
07af e5ff | | Load 0x2,-0x1
07b0 01cf | | Execute Vector,Slice_Read
07b1 e5fe | | Load 0x2,-0x2
07b2 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
07b3 e5fe | | Load 0x2,-0x2
07b4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07b5 e5fe | | Load 0x2,-0x2
07b6 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07b8 4801 |H | Short_Literal 0x1
07b9 e5fe | | Load 0x2,-0x2
07ba 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07bb 00db | | Load_Top At_Offset_3
07bc 0272 | r | Execute Discrete,Minus
07bd e5fe | | Load 0x2,-0x2
07be 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07bf 01cf | | Execute Vector,Slice_Read
07c0 00d9 | | Load_Top At_Offset_1
07c1 0a01 | | Execute_Immediate Plus,0x1
07c2 e5fe | | Load 0x2,-0x2
07c3 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07c4 e5fe | | Load 0x2,-0x2
07c5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07c6 01ce | | Execute Vector,Slice_Write
07c7 e5ff | | Load 0x2,-0x1
07c8 4801 |H | Short_Literal 0x1
07c9 00da | | Load_Top At_Offset_2
07ca e5fe | | Load 0x2,-0x2
07cb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07cc 01ce | | Execute Vector,Slice_Write
07cd e5fe | | Load 0x2,-0x2
07ce 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07cf e5fe | | Load 0x2,-0x2
07d0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07d1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07d2 0000 0000 | | .BLANK 0000[0x6]
07d8 ; --------------------------------------------------------------------------------------
07d8 ; SUBPROGRAM
07d8 ; --------------------------------------------------------------------------------------
07d8 07e3 | | .CONST 0x07e3 ; Address of begin
07d9 0004 | | .CONST 0x0004 ; Address of exception handler
07da 0003 | | .CONST 0x0003 ; Number of locals
07db INIT_07d8:
07db 00db | | Load_Top At_Offset_3
07dc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07dd e5fe | | Load 0x2,-0x2
07de 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07df 0272 | r | Execute Discrete,Minus
07e0 00e3 | | Load_Encached Natural_Cache
07e1 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
07e2 00e3 | | Load_Encached Natural_Cache
07e3 BODY_07d8:
07e3 00d9 | | Load_Top At_Offset_1
07e4 0c01 | | Execute_Immediate Greater_Equal,0x1
07e5 6818 |h | Jump_Zero 0x7fe
07e6 4801 |H | Short_Literal 0x1
07e7 e5fe | | Load 0x2,-0x2
07e8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07e9 e5fe | | Load 0x2,-0x2
07ea 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07eb 01cf | | Execute Vector,Slice_Read
07ec 4802 |H | Short_Literal 0x2
07ed e5fe | | Load 0x2,-0x2
07ee 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07ef 0a01 | | Execute_Immediate Plus,0x1
07f0 e5fe | | Load 0x2,-0x2
07f1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07f2 01ce | | Execute Vector,Slice_Write
07f3 e5ff | | Load 0x2,-0x1
07f4 4801 |H | Short_Literal 0x1
07f5 e5fe | | Load 0x2,-0x2
07f6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07f7 01d6 | | Execute Vector,Field_Write
07f8 e5fe | | Load 0x2,-0x2
07f9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07fa 0a01 | | Execute_Immediate Plus,0x1
07fb e5fe | | Load 0x2,-0x2
07fc 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07fd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07fe e5fe | | Load 0x2,-0x2
07ff 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0800 0d01 | | Execute_Immediate Less,0x1
0801 6801 |h | Jump_Zero 0x803
0802 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0803 4801 |H | Short_Literal 0x1
0804 e5fe | | Load 0x2,-0x2
0805 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0806 0aff | | Execute_Immediate Plus,-0x1
0807 e5fe | | Load 0x2,-0x2
0808 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0809 01cf | | Execute Vector,Slice_Read
080a 4802 |H | Short_Literal 0x2
080b e5fe | | Load 0x2,-0x2
080c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
080d e5fe | | Load 0x2,-0x2
080e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
080f 01ce | | Execute Vector,Slice_Write
0810 e5ff | | Load 0x2,-0x1
0811 4801 |H | Short_Literal 0x1
0812 e5fe | | Load 0x2,-0x2
0813 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0814 01d6 | | Execute Vector,Field_Write
0815 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0816 0000 0000 | | .XXX[0x2]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 0823 | # | .CONST 0x0823 ; Address of begin
0819 0004 | | .CONST 0x0004 ; Address of exception handler
081a 0003 | | .CONST 0x0003 ; Number of locals
081b INIT_0818:
081b e5fd | | Load 0x2,-0x3
081c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
081d e5fd | | Load 0x2,-0x3
081e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
081f 0272 | r | Execute Discrete,Minus
0820 00e3 | | Load_Encached Natural_Cache
0821 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0822 00e3 | | Load_Encached Natural_Cache
0823 BODY_0818:
0823 00d9 | | Load_Top At_Offset_1
0824 e5fe | | Load 0x2,-0x2
0825 027b | { | Execute Discrete,Greater_Equal
0826 6834 |h4 | Jump_Zero 0x85b
0827 4801 |H | Short_Literal 0x1
0828 e5fd | | Load 0x2,-0x3
0829 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
082a e5fd | | Load 0x2,-0x3
082b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
082c 01cf | | Execute Vector,Slice_Read
082d e5fe | | Load 0x2,-0x2
082e 0a01 | | Execute_Immediate Plus,0x1
082f e5fe | | Load 0x2,-0x2
0830 e5fd | | Load 0x2,-0x3
0831 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0832 0273 | s | Execute Discrete,Plus
0833 e5fd | | Load 0x2,-0x3
0834 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0835 01ce | | Execute Vector,Slice_Write
0836 e5fd | | Load 0x2,-0x3
0837 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0838 4801 |H | Short_Literal 0x1
0839 e5fe | | Load 0x2,-0x2
083a 00d9 | | Load_Top At_Offset_1
083b 00d9 | | Load_Top At_Offset_1
083c e404 | | Load 0x2,0x4
083d 035b | [ | Declare_Type Array,Constrained
083e 00db | | Load_Top At_Offset_3
083f 01cd | | Execute Vector,Slice_Reference
0840 00d8 | | Load_Top At_Offset_0
0841 0335 | 5 | Declare_Variable Array,Duplicate
0842 00d0 | | Action Swap_Control
0843 00d1 | | Pop_Control Pop_Count_1
0844 00d9 | | Load_Top At_Offset_1
0845 01d9 | | Execute Vector,Reverse_Bounds
0846 0263 | c | Execute Discrete,Above_Bound
0847 7005 |p | Jump_Nonzero 0x84d
0848 e5ff | | Load 0x2,-0x1
0849 00d9 | | Load_Top At_Offset_1
084a e408 | | Load 0x2,0x8
084b 01d6 | | Execute Vector,Field_Write
084c 3ffb |? | Loop_Increasing 0x848
084d 00d0 | | Action Swap_Control
084e 00d1 | | Pop_Control Pop_Count_1
084f 00da | | Load_Top At_Offset_2
0850 00da | | Load_Top At_Offset_2
0851 e404 | | Load 0x2,0x4
0852 01ce | | Execute Vector,Slice_Write
0853 00d3 | | Pop_Control Pop_Count_3
0854 e5fd | | Load 0x2,-0x3
0855 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0856 e5fe | | Load 0x2,-0x2
0857 0273 | s | Execute Discrete,Plus
0858 e5fd | | Load 0x2,-0x3
0859 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
085a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
085b e5fe | | Load 0x2,-0x2
085c e5fd | | Load 0x2,-0x3
085d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
085e 027d | } | Execute Discrete,Greater
085f 681a |h | Jump_Zero 0x87a
0860 e5fd | | Load 0x2,-0x3
0861 00d8 | | Load_Top At_Offset_0
0862 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0863 00d8 | | Load_Top At_Offset_0
0864 0335 | 5 | Declare_Variable Array,Duplicate
0865 00d0 | | Action Swap_Control
0866 00d1 | | Pop_Control Pop_Count_1
0867 00d9 | | Load_Top At_Offset_1
0868 01d9 | | Execute Vector,Reverse_Bounds
0869 0263 | c | Execute Discrete,Above_Bound
086a 7005 |p | Jump_Nonzero 0x870
086b e5ff | | Load 0x2,-0x1
086c 00d9 | | Load_Top At_Offset_1
086d e406 | | Load 0x2,0x6
086e 01d6 | | Execute Vector,Field_Write
086f 3ffb |? | Loop_Increasing 0x86b
0870 00d0 | | Action Swap_Control
0871 00d1 | | Pop_Control Pop_Count_1
0872 00d9 | | Load_Top At_Offset_1
0873 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0874 00d1 | | Pop_Control Pop_Count_1
0875 e5fd | | Load 0x2,-0x3
0876 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0877 e5fd | | Load 0x2,-0x3
0878 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0879 4503 |E | Exit_Suprogram New_Top_Offset 0x3
087a 4801 |H | Short_Literal 0x1
087b e5fd | | Load 0x2,-0x3
087c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
087d 00da | | Load_Top At_Offset_2
087e 0272 | r | Execute Discrete,Minus
087f e5fd | | Load 0x2,-0x3
0880 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0881 01cf | | Execute Vector,Slice_Read
0882 e5fe | | Load 0x2,-0x2
0883 0a01 | | Execute_Immediate Plus,0x1
0884 e5fd | | Load 0x2,-0x3
0885 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0886 e5fd | | Load 0x2,-0x3
0887 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0888 01ce | | Execute Vector,Slice_Write
0889 e5fd | | Load 0x2,-0x3
088a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
088b 4801 |H | Short_Literal 0x1
088c e5fe | | Load 0x2,-0x2
088d 00d9 | | Load_Top At_Offset_1
088e 00d9 | | Load_Top At_Offset_1
088f e404 | | Load 0x2,0x4
0890 035b | [ | Declare_Type Array,Constrained
0891 00db | | Load_Top At_Offset_3
0892 01cd | | Execute Vector,Slice_Reference
0893 00d8 | | Load_Top At_Offset_0
0894 0335 | 5 | Declare_Variable Array,Duplicate
0895 00d0 | | Action Swap_Control
0896 00d1 | | Pop_Control Pop_Count_1
0897 00d9 | | Load_Top At_Offset_1
0898 01d9 | | Execute Vector,Reverse_Bounds
0899 0263 | c | Execute Discrete,Above_Bound
089a 7005 |p | Jump_Nonzero 0x8a0
089b e5ff | | Load 0x2,-0x1
089c 00d9 | | Load_Top At_Offset_1
089d e408 | | Load 0x2,0x8
089e 01d6 | | Execute Vector,Field_Write
089f 3ffb |? | Loop_Increasing 0x89b
08a0 00d0 | | Action Swap_Control
08a1 00d1 | | Pop_Control Pop_Count_1
08a2 00da | | Load_Top At_Offset_2
08a3 00da | | Load_Top At_Offset_2
08a4 e404 | | Load 0x2,0x4
08a5 01ce | | Execute Vector,Slice_Write
08a6 00d3 | | Pop_Control Pop_Count_3
08a7 e5fd | | Load 0x2,-0x3
08a8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08a9 e5fd | | Load 0x2,-0x3
08aa 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
08ab 4503 |E | Exit_Suprogram New_Top_Offset 0x3
08ac 0000 0000 | | .BLANK 0000[0x4]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08bd | | .CONST 0x08bd ; Address of begin
08b1 0004 | | .CONST 0x0004 ; Address of exception handler
08b2 0003 | | .CONST 0x0003 ; Number of locals
08b3 INIT_08b0:
08b3 00da | | Load_Top At_Offset_2
08b4 0227 | ' | Execute Access,All_Reference
08b5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08b6 00db | | Load_Top At_Offset_3
08b7 0227 | ' | Execute Access,All_Reference
08b8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08b9 0272 | r | Execute Discrete,Minus
08ba 00e3 | | Load_Encached Natural_Cache
08bb 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
08bc 00e3 | | Load_Encached Natural_Cache
08bd BODY_08b0:
08bd 00d9 | | Load_Top At_Offset_1
08be e5fe | | Load 0x2,-0x2
08bf 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08c0 027b | { | Execute Discrete,Greater_Equal
08c1 682c |h, | Jump_Zero 0x8ee
08c2 4801 |H | Short_Literal 0x1
08c3 e5ff | | Load 0x2,-0x1
08c4 0227 | ' | Execute Access,All_Reference
08c5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08c6 e5ff | | Load 0x2,-0x1
08c7 0227 | ' | Execute Access,All_Reference
08c8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08c9 01cf | | Execute Vector,Slice_Read
08ca e5fe | | Load 0x2,-0x2
08cb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08cc 0a01 | | Execute_Immediate Plus,0x1
08cd e5fe | | Load 0x2,-0x2
08ce 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08cf e5ff | | Load 0x2,-0x1
08d0 0227 | ' | Execute Access,All_Reference
08d1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08d2 0273 | s | Execute Discrete,Plus
08d3 e5ff | | Load 0x2,-0x1
08d4 0229 | ) | Execute Access,All_Read
08d5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08d6 01ce | | Execute Vector,Slice_Write
08d7 4801 |H | Short_Literal 0x1
08d8 e5fe | | Load 0x2,-0x2
08d9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08da e5fe | | Load 0x2,-0x2
08db 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08dc 01cf | | Execute Vector,Slice_Read
08dd 4801 |H | Short_Literal 0x1
08de e5fe | | Load 0x2,-0x2
08df 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08e0 e5ff | | Load 0x2,-0x1
08e1 0229 | ) | Execute Access,All_Read
08e2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08e3 01ce | | Execute Vector,Slice_Write
08e4 e5ff | | Load 0x2,-0x1
08e5 0227 | ' | Execute Access,All_Reference
08e6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08e7 e5fe | | Load 0x2,-0x2
08e8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08e9 0273 | s | Execute Discrete,Plus
08ea e5ff | | Load 0x2,-0x1
08eb 0227 | ' | Execute Access,All_Reference
08ec 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
08ed 4503 |E | Exit_Suprogram New_Top_Offset 0x3
08ee e5fe | | Load 0x2,-0x2
08ef 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08f0 e5ff | | Load 0x2,-0x1
08f1 0227 | ' | Execute Access,All_Reference
08f2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08f3 027d | } | Execute Discrete,Greater
08f4 6811 |h | Jump_Zero 0x906
08f5 4801 |H | Short_Literal 0x1
08f6 e5ff | | Load 0x2,-0x1
08f7 0227 | ' | Execute Access,All_Reference
08f8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08f9 e5fe | | Load 0x2,-0x2
08fa 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
08fb 01cf | | Execute Vector,Slice_Read
08fc e5ff | | Load 0x2,-0x1
08fd 0227 | ' | Execute Access,All_Reference
08fe 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
08ff e5ff | | Load 0x2,-0x1
0900 0227 | ' | Execute Access,All_Reference
0901 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0902 e5ff | | Load 0x2,-0x1
0903 0227 | ' | Execute Access,All_Reference
0904 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0905 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0906 4801 |H | Short_Literal 0x1
0907 e5ff | | Load 0x2,-0x1
0908 0227 | ' | Execute Access,All_Reference
0909 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
090a 00da | | Load_Top At_Offset_2
090b 0272 | r | Execute Discrete,Minus
090c e5ff | | Load 0x2,-0x1
090d 0227 | ' | Execute Access,All_Reference
090e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
090f 01cf | | Execute Vector,Slice_Read
0910 e5fe | | Load 0x2,-0x2
0911 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0912 0a01 | | Execute_Immediate Plus,0x1
0913 e5ff | | Load 0x2,-0x1
0914 0227 | ' | Execute Access,All_Reference
0915 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0916 e5ff | | Load 0x2,-0x1
0917 0229 | ) | Execute Access,All_Read
0918 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0919 01ce | | Execute Vector,Slice_Write
091a 4801 |H | Short_Literal 0x1
091b e5fe | | Load 0x2,-0x2
091c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
091d e5fe | | Load 0x2,-0x2
091e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
091f 01cf | | Execute Vector,Slice_Read
0920 4801 |H | Short_Literal 0x1
0921 e5fe | | Load 0x2,-0x2
0922 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0923 e5ff | | Load 0x2,-0x1
0924 0229 | ) | Execute Access,All_Read
0925 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0926 01ce | | Execute Vector,Slice_Write
0927 e5ff | | Load 0x2,-0x1
0928 0227 | ' | Execute Access,All_Reference
0929 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
092a e5ff | | Load 0x2,-0x1
092b 0227 | ' | Execute Access,All_Reference
092c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
092d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
092e 0000 0000 | | .XXX[0x2]
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 093d | = | .CONST 0x093d ; Address of begin
0931 0004 | | .CONST 0x0004 ; Address of exception handler
0932 0003 | | .CONST 0x0003 ; Number of locals
0933 INIT_0930:
0933 00da | | Load_Top At_Offset_2
0934 0227 | ' | Execute Access,All_Reference
0935 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0936 00db | | Load_Top At_Offset_3
0937 0227 | ' | Execute Access,All_Reference
0938 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0939 0272 | r | Execute Discrete,Minus
093a 00e3 | | Load_Encached Natural_Cache
093b 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
093c 00e3 | | Load_Encached Natural_Cache
093d BODY_0930:
093d 00d9 | | Load_Top At_Offset_1
093e e5fe | | Load 0x2,-0x2
093f 0227 | ' | Execute Access,All_Reference
0940 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0941 027b | { | Execute Discrete,Greater_Equal
0942 6832 |h2 | Jump_Zero 0x975
0943 4801 |H | Short_Literal 0x1
0944 e5ff | | Load 0x2,-0x1
0945 0227 | ' | Execute Access,All_Reference
0946 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0947 e5ff | | Load 0x2,-0x1
0948 0227 | ' | Execute Access,All_Reference
0949 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
094a 01cf | | Execute Vector,Slice_Read
094b e5fe | | Load 0x2,-0x2
094c 0227 | ' | Execute Access,All_Reference
094d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
094e 0a01 | | Execute_Immediate Plus,0x1
094f e5fe | | Load 0x2,-0x2
0950 0227 | ' | Execute Access,All_Reference
0951 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0952 e5ff | | Load 0x2,-0x1
0953 0227 | ' | Execute Access,All_Reference
0954 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0955 0273 | s | Execute Discrete,Plus
0956 e5ff | | Load 0x2,-0x1
0957 0229 | ) | Execute Access,All_Read
0958 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0959 01ce | | Execute Vector,Slice_Write
095a 4801 |H | Short_Literal 0x1
095b e5fe | | Load 0x2,-0x2
095c 0227 | ' | Execute Access,All_Reference
095d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
095e e5fe | | Load 0x2,-0x2
095f 0227 | ' | Execute Access,All_Reference
0960 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0961 01cf | | Execute Vector,Slice_Read
0962 4801 |H | Short_Literal 0x1
0963 e5fe | | Load 0x2,-0x2
0964 0227 | ' | Execute Access,All_Reference
0965 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0966 e5ff | | Load 0x2,-0x1
0967 0229 | ) | Execute Access,All_Read
0968 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0969 01ce | | Execute Vector,Slice_Write
096a e5ff | | Load 0x2,-0x1
096b 0227 | ' | Execute Access,All_Reference
096c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
096d e5fe | | Load 0x2,-0x2
096e 0227 | ' | Execute Access,All_Reference
096f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0970 0273 | s | Execute Discrete,Plus
0971 e5ff | | Load 0x2,-0x1
0972 0227 | ' | Execute Access,All_Reference
0973 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0974 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0975 e5fe | | Load 0x2,-0x2
0976 0227 | ' | Execute Access,All_Reference
0977 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0978 e5ff | | Load 0x2,-0x1
0979 0227 | ' | Execute Access,All_Reference
097a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
097b 027d | } | Execute Discrete,Greater
097c 6812 |h | Jump_Zero 0x98f
097d 4801 |H | Short_Literal 0x1
097e e5ff | | Load 0x2,-0x1
097f 0227 | ' | Execute Access,All_Reference
0980 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0981 e5fe | | Load 0x2,-0x2
0982 0227 | ' | Execute Access,All_Reference
0983 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0984 01cf | | Execute Vector,Slice_Read
0985 e5ff | | Load 0x2,-0x1
0986 0227 | ' | Execute Access,All_Reference
0987 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0988 e5ff | | Load 0x2,-0x1
0989 0227 | ' | Execute Access,All_Reference
098a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
098b e5ff | | Load 0x2,-0x1
098c 0227 | ' | Execute Access,All_Reference
098d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
098e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
098f 4801 |H | Short_Literal 0x1
0990 e5ff | | Load 0x2,-0x1
0991 0227 | ' | Execute Access,All_Reference
0992 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0993 00da | | Load_Top At_Offset_2
0994 0272 | r | Execute Discrete,Minus
0995 e5ff | | Load 0x2,-0x1
0996 0227 | ' | Execute Access,All_Reference
0997 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0998 01cf | | Execute Vector,Slice_Read
0999 e5fe | | Load 0x2,-0x2
099a 0227 | ' | Execute Access,All_Reference
099b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
099c 0a01 | | Execute_Immediate Plus,0x1
099d e5ff | | Load 0x2,-0x1
099e 0227 | ' | Execute Access,All_Reference
099f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09a0 e5ff | | Load 0x2,-0x1
09a1 0229 | ) | Execute Access,All_Read
09a2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09a3 01ce | | Execute Vector,Slice_Write
09a4 4801 |H | Short_Literal 0x1
09a5 e5fe | | Load 0x2,-0x2
09a6 0227 | ' | Execute Access,All_Reference
09a7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09a8 e5fe | | Load 0x2,-0x2
09a9 0227 | ' | Execute Access,All_Reference
09aa 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09ab 01cf | | Execute Vector,Slice_Read
09ac 4801 |H | Short_Literal 0x1
09ad e5fe | | Load 0x2,-0x2
09ae 0227 | ' | Execute Access,All_Reference
09af 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09b0 e5ff | | Load 0x2,-0x1
09b1 0229 | ) | Execute Access,All_Read
09b2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09b3 01ce | | Execute Vector,Slice_Write
09b4 e5ff | | Load 0x2,-0x1
09b5 0227 | ' | Execute Access,All_Reference
09b6 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09b7 e5ff | | Load 0x2,-0x1
09b8 0227 | ' | Execute Access,All_Reference
09b9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09ba 4503 |E | Exit_Suprogram New_Top_Offset 0x3
09bb 0000 0000 | | .BLANK 0000[0x5]
09c0 ; --------------------------------------------------------------------------------------
09c0 ; SUBPROGRAM
09c0 ; --------------------------------------------------------------------------------------
09c0 09d1 | | .CONST 0x09d1 ; Address of begin
09c1 0004 | | .CONST 0x0004 ; Address of exception handler
09c2 0004 | | .CONST 0x0004 ; Number of locals
09c3 INIT_09c0:
09c3 00da | | Load_Top At_Offset_2
09c4 0227 | ' | Execute Access,All_Reference
09c5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09c6 00db | | Load_Top At_Offset_3
09c7 0227 | ' | Execute Access,All_Reference
09c8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09c9 0272 | r | Execute Discrete,Minus
09ca 00e3 | | Load_Encached Natural_Cache
09cb 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
09cc 00e3 | | Load_Encached Natural_Cache
09cd e5fe | | Load 0x2,-0x2
09ce 01db | | Execute Vector,Length
09cf 00e3 | | Load_Encached Natural_Cache
09d0 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
09d1 BODY_09c0:
09d1 00da | | Load_Top At_Offset_2
09d2 00d9 | | Load_Top At_Offset_1
09d3 027b | { | Execute Discrete,Greater_Equal
09d4 6826 |h& | Jump_Zero 0x9fb
09d5 4801 |H | Short_Literal 0x1
09d6 e5ff | | Load 0x2,-0x1
09d7 0227 | ' | Execute Access,All_Reference
09d8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09d9 e5ff | | Load 0x2,-0x1
09da 0227 | ' | Execute Access,All_Reference
09db 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09dc 01cf | | Execute Vector,Slice_Read
09dd 00d9 | | Load_Top At_Offset_1
09de 0a01 | | Execute_Immediate Plus,0x1
09df 00da | | Load_Top At_Offset_2
09e0 e5ff | | Load 0x2,-0x1
09e1 0227 | ' | Execute Access,All_Reference
09e2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09e3 0273 | s | Execute Discrete,Plus
09e4 e5ff | | Load 0x2,-0x1
09e5 0229 | ) | Execute Access,All_Read
09e6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09e7 01ce | | Execute Vector,Slice_Write
09e8 4801 |H | Short_Literal 0x1
09e9 00d9 | | Load_Top At_Offset_1
09ea e5fe | | Load 0x2,-0x2
09eb 01cf | | Execute Vector,Slice_Read
09ec 4801 |H | Short_Literal 0x1
09ed 00da | | Load_Top At_Offset_2
09ee e5ff | | Load 0x2,-0x1
09ef 0229 | ) | Execute Access,All_Read
09f0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09f1 01ce | | Execute Vector,Slice_Write
09f2 e5ff | | Load 0x2,-0x1
09f3 0227 | ' | Execute Access,All_Reference
09f4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
09f5 00d9 | | Load_Top At_Offset_1
09f6 0273 | s | Execute Discrete,Plus
09f7 e5ff | | Load 0x2,-0x1
09f8 0227 | ' | Execute Access,All_Reference
09f9 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
09fa 4503 |E | Exit_Suprogram New_Top_Offset 0x3
09fb 00d8 | | Load_Top At_Offset_0
09fc e5ff | | Load 0x2,-0x1
09fd 0227 | ' | Execute Access,All_Reference
09fe 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09ff 027d | } | Execute Discrete,Greater
0a00 6815 |h | Jump_Zero 0xa16
0a01 e5fe | | Load 0x2,-0x2
0a02 01dd | | Execute Vector,First
0a03 e5fe | | Load 0x2,-0x2
0a04 01dd | | Execute Vector,First
0a05 e5ff | | Load 0x2,-0x1
0a06 0227 | ' | Execute Access,All_Reference
0a07 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a08 0273 | s | Execute Discrete,Plus
0a09 0aff | | Execute_Immediate Plus,-0x1
0a0a e5fe | | Load 0x2,-0x2
0a0b 01cf | | Execute Vector,Slice_Read
0a0c e5ff | | Load 0x2,-0x1
0a0d 0227 | ' | Execute Access,All_Reference
0a0e 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0a0f e5ff | | Load 0x2,-0x1
0a10 0227 | ' | Execute Access,All_Reference
0a11 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a12 e5ff | | Load 0x2,-0x1
0a13 0227 | ' | Execute Access,All_Reference
0a14 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a15 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a16 4801 |H | Short_Literal 0x1
0a17 e5ff | | Load 0x2,-0x1
0a18 0227 | ' | Execute Access,All_Reference
0a19 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a1a 00db | | Load_Top At_Offset_3
0a1b 0272 | r | Execute Discrete,Minus
0a1c e5ff | | Load 0x2,-0x1
0a1d 0227 | ' | Execute Access,All_Reference
0a1e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a1f 01cf | | Execute Vector,Slice_Read
0a20 00d9 | | Load_Top At_Offset_1
0a21 0a01 | | Execute_Immediate Plus,0x1
0a22 e5ff | | Load 0x2,-0x1
0a23 0227 | ' | Execute Access,All_Reference
0a24 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a25 e5ff | | Load 0x2,-0x1
0a26 0229 | ) | Execute Access,All_Read
0a27 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a28 01ce | | Execute Vector,Slice_Write
0a29 e5fe | | Load 0x2,-0x2
0a2a 4801 |H | Short_Literal 0x1
0a2b 00da | | Load_Top At_Offset_2
0a2c e5ff | | Load 0x2,-0x1
0a2d 0229 | ) | Execute Access,All_Read
0a2e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a2f 01ce | | Execute Vector,Slice_Write
0a30 e5ff | | Load 0x2,-0x1
0a31 0227 | ' | Execute Access,All_Reference
0a32 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a33 e5ff | | Load 0x2,-0x1
0a34 0227 | ' | Execute Access,All_Reference
0a35 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a36 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a37 0000 | | .XXX[0x1]
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a45 | E | .CONST 0x0a45 ; Address of begin
0a39 0004 | | .CONST 0x0004 ; Address of exception handler
0a3a 0003 | | .CONST 0x0003 ; Number of locals
0a3b INIT_0a38:
0a3b 00da | | Load_Top At_Offset_2
0a3c 0227 | ' | Execute Access,All_Reference
0a3d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a3e 00db | | Load_Top At_Offset_3
0a3f 0227 | ' | Execute Access,All_Reference
0a40 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a41 0272 | r | Execute Discrete,Minus
0a42 00e3 | | Load_Encached Natural_Cache
0a43 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0a44 00e3 | | Load_Encached Natural_Cache
0a45 BODY_0a38:
0a45 00d9 | | Load_Top At_Offset_1
0a46 0c01 | | Execute_Immediate Greater_Equal,0x1
0a47 681f |h | Jump_Zero 0xa67
0a48 4801 |H | Short_Literal 0x1
0a49 e5ff | | Load 0x2,-0x1
0a4a 0227 | ' | Execute Access,All_Reference
0a4b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a4c e5ff | | Load 0x2,-0x1
0a4d 0227 | ' | Execute Access,All_Reference
0a4e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a4f 01cf | | Execute Vector,Slice_Read
0a50 4802 |H | Short_Literal 0x2
0a51 e5ff | | Load 0x2,-0x1
0a52 0227 | ' | Execute Access,All_Reference
0a53 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a54 0a01 | | Execute_Immediate Plus,0x1
0a55 e5ff | | Load 0x2,-0x1
0a56 0229 | ) | Execute Access,All_Read
0a57 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a58 01ce | | Execute Vector,Slice_Write
0a59 e5fe | | Load 0x2,-0x2
0a5a 4801 |H | Short_Literal 0x1
0a5b e5ff | | Load 0x2,-0x1
0a5c 0227 | ' | Execute Access,All_Reference
0a5d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a5e 01d6 | | Execute Vector,Field_Write
0a5f e5ff | | Load 0x2,-0x1
0a60 0227 | ' | Execute Access,All_Reference
0a61 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a62 0a01 | | Execute_Immediate Plus,0x1
0a63 e5ff | | Load 0x2,-0x1
0a64 0227 | ' | Execute Access,All_Reference
0a65 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a66 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a67 e5ff | | Load 0x2,-0x1
0a68 0227 | ' | Execute Access,All_Reference
0a69 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a6a 0d01 | | Execute_Immediate Less,0x1
0a6b 6801 |h | Jump_Zero 0xa6d
0a6c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a6d 4801 |H | Short_Literal 0x1
0a6e e5ff | | Load 0x2,-0x1
0a6f 0227 | ' | Execute Access,All_Reference
0a70 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a71 0aff | | Execute_Immediate Plus,-0x1
0a72 e5ff | | Load 0x2,-0x1
0a73 0227 | ' | Execute Access,All_Reference
0a74 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a75 01cf | | Execute Vector,Slice_Read
0a76 4802 |H | Short_Literal 0x2
0a77 e5ff | | Load 0x2,-0x1
0a78 0227 | ' | Execute Access,All_Reference
0a79 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a7a e5ff | | Load 0x2,-0x1
0a7b 0229 | ) | Execute Access,All_Read
0a7c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a7d 01ce | | Execute Vector,Slice_Write
0a7e e5fe | | Load 0x2,-0x2
0a7f 4801 |H | Short_Literal 0x1
0a80 e5ff | | Load 0x2,-0x1
0a81 0227 | ' | Execute Access,All_Reference
0a82 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a83 01d6 | | Execute Vector,Field_Write
0a84 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a85 0000 0000 | | .XXX[0x3]
0a87 0000 | |
0a88 ; --------------------------------------------------------------------------------------
0a88 ; SUBPROGRAM
0a88 ; --------------------------------------------------------------------------------------
0a88 0a95 | | .CONST 0x0a95 ; Address of begin
0a89 0004 | | .CONST 0x0004 ; Address of exception handler
0a8a 0003 | | .CONST 0x0003 ; Number of locals
0a8b INIT_0a88:
0a8b 00da | | Load_Top At_Offset_2
0a8c 0227 | ' | Execute Access,All_Reference
0a8d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a8e 00db | | Load_Top At_Offset_3
0a8f 0227 | ' | Execute Access,All_Reference
0a90 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a91 0272 | r | Execute Discrete,Minus
0a92 00e3 | | Load_Encached Natural_Cache
0a93 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0a94 00e3 | | Load_Encached Natural_Cache
0a95 BODY_0a88:
0a95 00d9 | | Load_Top At_Offset_1
0a96 e5fd | | Load 0x2,-0x3
0a97 027b | { | Execute Discrete,Greater_Equal
0a98 683b |h; | Jump_Zero 0xad4
0a99 4801 |H | Short_Literal 0x1
0a9a e5ff | | Load 0x2,-0x1
0a9b 0227 | ' | Execute Access,All_Reference
0a9c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a9d e5ff | | Load 0x2,-0x1
0a9e 0227 | ' | Execute Access,All_Reference
0a9f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0aa0 01cf | | Execute Vector,Slice_Read
0aa1 e5fd | | Load 0x2,-0x3
0aa2 0a01 | | Execute_Immediate Plus,0x1
0aa3 e5fd | | Load 0x2,-0x3
0aa4 e5ff | | Load 0x2,-0x1
0aa5 0227 | ' | Execute Access,All_Reference
0aa6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0aa7 0273 | s | Execute Discrete,Plus
0aa8 e5ff | | Load 0x2,-0x1
0aa9 0229 | ) | Execute Access,All_Read
0aaa 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0aab 01ce | | Execute Vector,Slice_Write
0aac e5ff | | Load 0x2,-0x1
0aad 0229 | ) | Execute Access,All_Read
0aae 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0aaf 4801 |H | Short_Literal 0x1
0ab0 e5fd | | Load 0x2,-0x3
0ab1 00d9 | | Load_Top At_Offset_1
0ab2 00d9 | | Load_Top At_Offset_1
0ab3 e404 | | Load 0x2,0x4
0ab4 035b | [ | Declare_Type Array,Constrained
0ab5 00db | | Load_Top At_Offset_3
0ab6 01cd | | Execute Vector,Slice_Reference
0ab7 00d8 | | Load_Top At_Offset_0
0ab8 0335 | 5 | Declare_Variable Array,Duplicate
0ab9 00d0 | | Action Swap_Control
0aba 00d1 | | Pop_Control Pop_Count_1
0abb 00d9 | | Load_Top At_Offset_1
0abc 01d9 | | Execute Vector,Reverse_Bounds
0abd 0263 | c | Execute Discrete,Above_Bound
0abe 7005 |p | Jump_Nonzero 0xac4
0abf e5fe | | Load 0x2,-0x2
0ac0 00d9 | | Load_Top At_Offset_1
0ac1 e408 | | Load 0x2,0x8
0ac2 01d6 | | Execute Vector,Field_Write
0ac3 3ffb |? | Loop_Increasing 0xabf
0ac4 00d0 | | Action Swap_Control
0ac5 00d1 | | Pop_Control Pop_Count_1
0ac6 00da | | Load_Top At_Offset_2
0ac7 00da | | Load_Top At_Offset_2
0ac8 e404 | | Load 0x2,0x4
0ac9 01ce | | Execute Vector,Slice_Write
0aca 00d3 | | Pop_Control Pop_Count_3
0acb e5ff | | Load 0x2,-0x1
0acc 0227 | ' | Execute Access,All_Reference
0acd 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0ace e5fd | | Load 0x2,-0x3
0acf 0273 | s | Execute Discrete,Plus
0ad0 e5ff | | Load 0x2,-0x1
0ad1 0227 | ' | Execute Access,All_Reference
0ad2 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0ad3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0ad4 e5fd | | Load 0x2,-0x3
0ad5 e5ff | | Load 0x2,-0x1
0ad6 0227 | ' | Execute Access,All_Reference
0ad7 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0ad8 027d | } | Execute Discrete,Greater
0ad9 681d |h | Jump_Zero 0xaf7
0ada e5ff | | Load 0x2,-0x1
0adb 0229 | ) | Execute Access,All_Read
0adc 00d8 | | Load_Top At_Offset_0
0add 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ade 00d8 | | Load_Top At_Offset_0
0adf 0335 | 5 | Declare_Variable Array,Duplicate
0ae0 00d0 | | Action Swap_Control
0ae1 00d1 | | Pop_Control Pop_Count_1
0ae2 00d9 | | Load_Top At_Offset_1
0ae3 01d9 | | Execute Vector,Reverse_Bounds
0ae4 0263 | c | Execute Discrete,Above_Bound
0ae5 7005 |p | Jump_Nonzero 0xaeb
0ae6 e5fe | | Load 0x2,-0x2
0ae7 00d9 | | Load_Top At_Offset_1
0ae8 e406 | | Load 0x2,0x6
0ae9 01d6 | | Execute Vector,Field_Write
0aea 3ffb |? | Loop_Increasing 0xae6
0aeb 00d0 | | Action Swap_Control
0aec 00d1 | | Pop_Control Pop_Count_1
0aed 00d9 | | Load_Top At_Offset_1
0aee 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0aef 00d1 | | Pop_Control Pop_Count_1
0af0 e5ff | | Load 0x2,-0x1
0af1 0227 | ' | Execute Access,All_Reference
0af2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0af3 e5ff | | Load 0x2,-0x1
0af4 0227 | ' | Execute Access,All_Reference
0af5 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0af6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0af7 4801 |H | Short_Literal 0x1
0af8 e5ff | | Load 0x2,-0x1
0af9 0227 | ' | Execute Access,All_Reference
0afa 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0afb 00da | | Load_Top At_Offset_2
0afc 0272 | r | Execute Discrete,Minus
0afd e5ff | | Load 0x2,-0x1
0afe 0227 | ' | Execute Access,All_Reference
0aff 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b00 01cf | | Execute Vector,Slice_Read
0b01 e5fd | | Load 0x2,-0x3
0b02 0a01 | | Execute_Immediate Plus,0x1
0b03 e5ff | | Load 0x2,-0x1
0b04 0227 | ' | Execute Access,All_Reference
0b05 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b06 e5ff | | Load 0x2,-0x1
0b07 0229 | ) | Execute Access,All_Read
0b08 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b09 01ce | | Execute Vector,Slice_Write
0b0a e5ff | | Load 0x2,-0x1
0b0b 0229 | ) | Execute Access,All_Read
0b0c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b0d 4801 |H | Short_Literal 0x1
0b0e e5fd | | Load 0x2,-0x3
0b0f 00d9 | | Load_Top At_Offset_1
0b10 00d9 | | Load_Top At_Offset_1
0b11 e404 | | Load 0x2,0x4
0b12 035b | [ | Declare_Type Array,Constrained
0b13 00db | | Load_Top At_Offset_3
0b14 01cd | | Execute Vector,Slice_Reference
0b15 00d8 | | Load_Top At_Offset_0
0b16 0335 | 5 | Declare_Variable Array,Duplicate
0b17 00d0 | | Action Swap_Control
0b18 00d1 | | Pop_Control Pop_Count_1
0b19 00d9 | | Load_Top At_Offset_1
0b1a 01d9 | | Execute Vector,Reverse_Bounds
0b1b 0263 | c | Execute Discrete,Above_Bound
0b1c 7005 |p | Jump_Nonzero 0xb22
0b1d e5fe | | Load 0x2,-0x2
0b1e 00d9 | | Load_Top At_Offset_1
0b1f e408 | | Load 0x2,0x8
0b20 01d6 | | Execute Vector,Field_Write
0b21 3ffb |? | Loop_Increasing 0xb1d
0b22 00d0 | | Action Swap_Control
0b23 00d1 | | Pop_Control Pop_Count_1
0b24 00da | | Load_Top At_Offset_2
0b25 00da | | Load_Top At_Offset_2
0b26 e404 | | Load 0x2,0x4
0b27 01ce | | Execute Vector,Slice_Write
0b28 00d3 | | Pop_Control Pop_Count_3
0b29 e5ff | | Load 0x2,-0x1
0b2a 0227 | ' | Execute Access,All_Reference
0b2b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b2c e5ff | | Load 0x2,-0x1
0b2d 0227 | ' | Execute Access,All_Reference
0b2e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0b2f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0b30 ; --------------------------------------------------------------------------------------
0b30 ; Debug Table
0b30 ; --------------------------------------------------------------------------------------
0b30 0004 0004 | | .DEBUG4 0x0004,0x0004,0xa8e8,0x0000,0x0001,0x0000
0b36 0900 000d | | .XXX[0x19]
0b38 5d00 ca7f |] |
0b3a be00 0000 | |
0b3c 0000 ca98 | |
0b3e 9180 654a | eJ|
0b40 1600 0019 | |
0b42 5000 0ca9 |P |
0b44 46c0 0ca9 |F |
0b46 5bf0 0006 |[ |
0b48 8e80 1919 | |
0b4a 8a80 0000 | |
0b4c 0000 1952 | R|
0b4e e240 | @ |
0b4f 0000 0000 | | .BLANK 0000[0x4]
0b53 0016 1440 | @| .XXX[0x9]
0b55 2000 068d | |
0b57 a187 a85c | \|
0b59 008e 0000 | |
0b5b d1b4 | |
0b5c 0000 0000 | | .BLANK 0000[0xe]
0b6a 0400 0000 | | .XXX[0xd]
0b6c 0000 0000 | |
0b6e 0001 c000 | |
0b70 0000 0032 | 2|
0b72 a5e4 c000 | |
0b74 0000 0000 | |
0b76 0001 | |
0b77 0000 0000 | | .BLANK 0000[0x4]
0b7b 4000 2c29 |@ ,)| .XXX[0xa]
0b7d 0000 0000 | |
0b7f 0065 4c09 | eL |
0b81 4000 0001 |@ |
0b83 0000 5851 | XQ|
0b85 0000 0000 | | .BLANK 0000[0x5]
0b8a 0004 8000 | | .XXX[0x1a]
0b8c 1a3a 0065 | : e|
0b8e 49f4 8000 |I |
0b90 0000 0000 | |
0b92 0000 0032 | 2|
0b94 a65d 4000 | ]@ |
0b96 014f a806 | O |
0b98 54cd a806 |T |
0b9a 54d8 4000 |T @ |
0b9c 00d5 e00c | |
0b9e a859 0000 | Y |
0ba0 0000 000c | |
0ba2 a9c5 b000 | |
0ba4 0000 0000 | | .BLANK 0000[0x4]
0ba8 02cf 4010 | @ | .XXX[0x11]
0baa 0000 d5d0 | |
0bac 40d4 0200 |@ |
0bae 4400 001a |D |
0bb0 ba00 001a | |
0bb2 bc01 950b | |
0bb4 2000 0000 | |
0bb6 0001 953b | ;|
0bb8 b400 | |
0bb9 0000 0000 | | .BLANK 0000[0x4]
0bbd 0059 e802 | Y | .XXX[0x1d]
0bbf 0000 1aba | |
0bc1 081a 8040 | @|
0bc3 0880 0003 | |
0bc5 5740 1953 |W@ S|
0bc7 9b80 0000 | |
0bc9 0000 0000 | |
0bcb 0080 0000 | |
0bcd 0000 0000 | |
0bcf 0020 0006 | |
0bd1 c240 0000 | @ |
0bd3 0000 32a7 | 2 |
0bd5 56e0 0000 |V |
0bd7 0080 000b | |
0bd9 3d00 |= |
0bda 0000 0000 | | .BLANK 0000[0x4]
0bde 32a7 96c0 |2 | .XXX[0xc]
0be0 0000 0000 | |
0be2 0000 0080 | |
0be4 0000 0000 | |
0be6 0000 0040 | @|
0be8 000b 3d00 | = |
0bea 0000 0000 | | .BLANK 0000[0x5]
0bef 0240 0003 | @ | .XXX[0x11]
0bf1 5780 32a6 |W 2 |
0bf3 4c80 0000 |L |
0bf5 0000 32a9 | 2 |
0bf7 08e0 1953 | S|
0bf9 f7c0 0006 | |
0bfb 5400 032a |T *|
0bfd 7ff8 032a | *|
0bff 8544 | D |