|
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: 7168 (0x1c00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0db0 | | .CONST 0x0db0 ; 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 8008 | | .CONST 0x8008 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0183 | | .CONST 0x0183 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0069 | i | .CONST 0x0069 ; Number of locals
000b INIT_0008:
000b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
000c e001 | | Load 0x0,0x1
000d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
000e 0129 | ) | Execute Any,Make_Visible
000f e001 | | Load 0x0,0x1
0010 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0011 0129 | ) | Execute Any,Make_Visible
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 00c4 | | Action Make_Default
002c 00c4 | | Action Make_Default
002d 00c4 | | Action Make_Default
002e 00c4 | | Action Make_Default
002f 00c4 | | Action Make_Default
0030 00c4 | | Action Make_Default
0031 00c4 | | Action Make_Default
0032 00c4 | | Action Make_Default
0033 00c4 | | Action Make_Default
0034 00c4 | | Action Make_Default
0035 00c4 | | Action Make_Default
0036 00c4 | | Action Make_Default
0037 00c4 | | Action Make_Default
0038 00c4 | | Action Make_Default
0039 00c4 | | Action Make_Default
003a 00c4 | | Action Make_Default
003b 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated
003d c233 | 3 | Store 0x1,0x33
003e 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated
0040 c211 | | Store 0x1,0x11
0041 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
0043 c235 | 5 | Store 0x1,0x35
0044 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
0046 c212 | | Store 0x1,0x12
0047 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
0049 c236 | 6 | Store 0x1,0x36
004a 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated
004c c214 | | Store 0x1,0x14
004d 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated
004f c215 | | Store 0x1,0x15
0050 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated
0052 c216 | | Store 0x1,0x16
0053 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated
0055 c217 | | Store 0x1,0x17
0056 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated
0058 c22f | / | Store 0x1,0x2f
0059 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated
005b c238 | 8 | Store 0x1,0x38
005c 029a 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call,Visible,Unelaborated
005e c21a | | Store 0x1,0x1a
005f 029a 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call,Visible,Unelaborated
0061 c21b | | Store 0x1,0x1b
0062 029a 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call,Visible,Unelaborated
0064 c237 | 7 | Store 0x1,0x37
0065 029a 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call,Visible,Unelaborated
0067 c21c | | Store 0x1,0x1c
0068 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated
006a c21d | | Store 0x1,0x1d
006b 029a 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call,Visible,Unelaborated
006d c21e | | Store 0x1,0x1e
006e 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated
0070 c21f | | Store 0x1,0x1f
0071 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated
0073 c220 | | Store 0x1,0x20
0074 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated
0076 c221 | ! | Store 0x1,0x21
0077 029a 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call,Visible,Unelaborated
0079 c222 | " | Store 0x1,0x22
007a 029a 058b | | Declare_Subprogram INIT_0588,For_Outer_Call,Visible,Unelaborated
007c c223 | # | Store 0x1,0x23
007d 029a 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call,Visible,Unelaborated
007f c224 | $ | Store 0x1,0x24
0080 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated
0082 c225 | % | Store 0x1,0x25
0083 029a 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call,Visible,Unelaborated
0085 c234 | 4 | Store 0x1,0x34
0086 029a 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call,Visible,Unelaborated
0088 c230 | 0 | Store 0x1,0x30
0089 029a 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call,Visible,Unelaborated
008b c231 | 1 | Store 0x1,0x31
008c 029a 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Visible,Unelaborated
008e c228 | ( | Store 0x1,0x28
008f 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated
0091 c229 | ) | Store 0x1,0x29
0092 029a 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call,Visible,Unelaborated
0094 c22a | * | Store 0x1,0x2a
0095 029a 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call,Visible,Unelaborated
0097 c22b | + | Store 0x1,0x2b
0098 029a 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call,Visible,Unelaborated
009a c22c | , | Store 0x1,0x2c
009b 4806 |H | Short_Literal 0x6
009c 0093 0cf3 | | push_full_address INIT_0cf0
009e 02a0 | | Declare_Subprogram Null_Subprogram
009f 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
00a0 c22d | - | Store 0x1,0x2d
00a1 480a |H | Short_Literal 0xa
00a2 032a | * | Declare_Type Record,Incomplete
00a3 c22e | . | Store 0x1,0x2e
00a4 e22e | . | Load 0x1,0x2e
00a5 02a0 | | Declare_Subprogram Null_Subprogram
00a6 e20d | | Load 0x1,0xd
00a7 03a3 | | Complete_Type Heap_Access,By_Defining
00a8 00bf | | Action Accept_Activation
00a9 0092 0d3b | ;| Action Push_String_Extended,0xd3b ; "!IO"
00ab 0092 0d3c | <| Action Push_String_Extended,0xd3c ; "!LRM"
00ad 4802 |H | Short_Literal 0x2
00ae 032a | * | Declare_Type Record,Incomplete
00af 00d8 | | Load_Top At_Offset_0
00b0 02a0 | | Declare_Subprogram Null_Subprogram
00b1 03ad | | Declare_Type Heap_Access,Defined
00b2 e002 | | Load 0x0,0x2
00b3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b5 00d9 | | Load_Top At_Offset_1
00b6 02a0 | | Declare_Subprogram Null_Subprogram
00b7 e23b | ; | Load 0x1,0x3b
00b8 0326 | & | Complete_Type Record,By_Defining
00b9 4806 |H | Short_Literal 0x6
00ba 032a | * | Declare_Type Record,Incomplete
00bb 00d8 | | Load_Top At_Offset_0
00bc 02a0 | | Declare_Subprogram Null_Subprogram
00bd 03ad | | Declare_Type Heap_Access,Defined
00be 00d8 | | Load_Top At_Offset_0
00bf e002 | | Load 0x0,0x2
00c0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c2 e002 | | Load 0x0,0x2
00c3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c4 e003 | | Load 0x0,0x3
00c5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00c6 e23c | < | Load 0x1,0x3c
00c7 00e2 | | Load_Encached Integer_Cache
00c8 029f 07ab | | Declare_Subprogram INIT_07a8,For_Call
00ca e23d | = | Load 0x1,0x3d
00cb 0326 | & | Complete_Type Record,By_Defining
00cc e004 | | Load 0x0,0x4
00cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ce e005 | | Load 0x0,0x5
00cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d0 e20e | | Load 0x1,0xe
00d1 e20f | | Load 0x1,0xf
00d2 e23e | > | Load 0x1,0x3e
00d3 00e2 | | Load_Encached Integer_Cache
00d4 00e2 | | Load_Encached Integer_Cache
00d5 e003 | | Load 0x0,0x3
00d6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d7 00e1 | | Load_Encached Boolean_Cache
00d8 e006 | | Load 0x0,0x6
00d9 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00da 029f 07cb | | Declare_Subprogram INIT_07c8,For_Call
00dc e22e | . | Load 0x1,0x2e
00dd 0326 | & | Complete_Type Record,By_Defining
00de 029b 07e3 | | Declare_Subprogram INIT_07e0,For_Outer_Call,Unelaborated
00e0 029d 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call
00e2 a007 | | Store_Unchecked 0x0,0x7
00e3 00c6 | | Action Check_Subprogram_Elaborated
00e4 e002 | | Load 0x0,0x2
00e5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e7 00e3 | | Load_Encached Natural_Cache
00e8 e002 | | Load 0x0,0x2
00e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00ea 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00eb 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
00ec e008 | | Load 0x0,0x8
00ed e009 | | Load 0x0,0x9
00ee 4800 |H | Short_Literal 0x0
00ef 0007 | | Action Break_Optional
00f0 029d 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call
00f2 029d 0823 | #| Declare_Subprogram INIT_0820,For_Outer_Call
00f4 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
00f5 00c7 | | Action Elaborate_Subprogram
00f6 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00f7 00c7 | | Action Elaborate_Subprogram
00f8 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
00f9 00c7 | | Action Elaborate_Subprogram
00fa 029d 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call
00fc 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00fd 00c7 | | Action Elaborate_Subprogram
00fe 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
00ff 00c7 | | Action Elaborate_Subprogram
0100 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0101 00c7 | | Action Elaborate_Subprogram
0102 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0103 00c7 | | Action Elaborate_Subprogram
0104 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0105 00c7 | | Action Elaborate_Subprogram
0106 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0107 00c7 | | Action Elaborate_Subprogram
0108 029d 08ab | | Declare_Subprogram INIT_08a8,For_Outer_Call
010a 029d 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call
010c 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
010d 00c7 | | Action Elaborate_Subprogram
010e 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
010f 00c7 | | Action Elaborate_Subprogram
0110 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
0111 00c7 | | Action Elaborate_Subprogram
0112 029d 092b | +| Declare_Subprogram INIT_0928,For_Outer_Call
0114 029d 09e3 | | Declare_Subprogram INIT_09e0,For_Outer_Call
0116 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0117 00c7 | | Action Elaborate_Subprogram
0118 029d 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call
011a 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
011b 00c7 | | Action Elaborate_Subprogram
011c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
011d 00c7 | | Action Elaborate_Subprogram
011e 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
011f 00c7 | | Action Elaborate_Subprogram
0120 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
0121 00c7 | | Action Elaborate_Subprogram
0122 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0123 00c7 | | Action Elaborate_Subprogram
0124 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0125 00c7 | | Action Elaborate_Subprogram
0126 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0127 00c7 | | Action Elaborate_Subprogram
0128 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0129 00c7 | | Action Elaborate_Subprogram
012a e00a | | Load 0x0,0xa
012b e00b | | Load 0x0,0xb
012c e22e | . | Load 0x1,0x2e
012d e20d | | Load 0x1,0xd
012e e00c | | Load 0x0,0xc
012f 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0130 0387 | | Declare_Variable Package
0131 00d8 | | Load_Top At_Offset_0
0132 020f | | Execute Module,Activate
0133 e00c | | Load 0x0,0xc
0134 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0135 00c6 | | Action Check_Subprogram_Elaborated
0136 e22e | . | Load 0x1,0x2e
0137 e20d | | Load 0x1,0xd
0138 e00d | | Load 0x0,0xd
0139 e00e | | Load 0x0,0xe
013a 4800 |H | Short_Literal 0x0
013b 0007 | | Action Break_Optional
013c e00f | | Load 0x0,0xf
013d 193c | < | Execute Package,Field_Reference,Field_Number 0x3c
013e 00c6 | | Action Check_Subprogram_Elaborated
013f e20d | | Load 0x1,0xd
0140 4813 |H | Short_Literal 0x13
0141 e250 | P | Load 0x1,0x50
0142 1911 | | Execute Package,Field_Reference,Field_Number 0x11
0143 e250 | P | Load 0x1,0x50
0144 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0145 e010 | | Load 0x0,0x10
0146 e011 | | Load 0x0,0x11
0147 4800 |H | Short_Literal 0x0
0148 0007 | | Action Break_Optional
0149 029d 0aab | | Declare_Subprogram INIT_0aa8,For_Outer_Call
014b e00f | | Load 0x0,0xf
014c 193d | = | Execute Package,Field_Reference,Field_Number 0x3d
014d 00c6 | | Action Check_Subprogram_Elaborated
014e e20d | | Load 0x1,0xd
014f 4813 |H | Short_Literal 0x13
0150 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d
0151 e20d | | Load 0x1,0xd
0152 e012 | | Load 0x0,0x12
0153 e013 | | Load 0x0,0x13
0154 4800 |H | Short_Literal 0x0
0155 0007 | | Action Break_Optional
0156 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0157 00c7 | | Action Elaborate_Subprogram
0158 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
0159 00c7 | | Action Elaborate_Subprogram
015a 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
015b 00c7 | | Action Elaborate_Subprogram
015c 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
015d 00c7 | | Action Elaborate_Subprogram
015e 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
015f 00c7 | | Action Elaborate_Subprogram
0160 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0161 00c7 | | Action Elaborate_Subprogram
0162 029d 0ac3 | | Declare_Subprogram INIT_0ac0,For_Outer_Call
0164 029d 0b33 | 3| Declare_Subprogram INIT_0b30,For_Outer_Call
0166 029d 0b6b | k| Declare_Subprogram INIT_0b68,For_Outer_Call
0168 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
0169 00c7 | | Action Elaborate_Subprogram
016a 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
016b 00c7 | | Action Elaborate_Subprogram
016c 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
016d 00c7 | | Action Elaborate_Subprogram
016e 029d 0b83 | | Declare_Subprogram INIT_0b80,For_Outer_Call
0170 029d 0c0b | | Declare_Subprogram INIT_0c08,For_Outer_Call
0172 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
0173 00c7 | | Action Elaborate_Subprogram
0174 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
0175 00c7 | | Action Elaborate_Subprogram
0176 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0177 00c7 | | Action Elaborate_Subprogram
0178 e00c | | Load 0x0,0xc
0179 e014 | | Load 0x0,0x14
017a e015 | | Load 0x0,0x15
017b e016 | | Load 0x0,0x16
017c e017 | | Load 0x0,0x17
017d e018 | | Load 0x0,0x18
017e 4806 |H | Short_Literal 0x6
017f e22d | - | Load 0x1,0x2d
0180 020e | | Execute Module,Augment_Imports
0181 e22d | - | Load 0x1,0x2d
0182 020d | | Execute Module,Elaborate
0183 BODY_0008:
0183 00bc | | Action Signal_Activated
0184 00bb | | Action Signal_Completion
0185 0000 0000 | | .XXX[0x3]
0187 0000 | |
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 01b3 | | .CONST 0x01b3 ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0002 | | .CONST 0x0002 ; Number of locals
018b INIT_0188:
018b e22e | . | Load 0x1,0x2e
018c 0322 | " | Declare_Variable Record
018d e5fa | | Load 0x2,-0x6
018e 00d9 | | Load_Top At_Offset_1
018f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0190 e5fe | | Load 0x2,-0x2
0191 00d9 | | Load_Top At_Offset_1
0192 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0193 4800 |H | Short_Literal 0x0
0194 00d9 | | Load_Top At_Offset_1
0195 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0196 e5fd | | Load 0x2,-0x3
0197 00d9 | | Load_Top At_Offset_1
0198 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0199 e23e | > | Load 0x1,0x3e
019a 00d9 | | Load_Top At_Offset_1
019b 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
019c 4800 |H | Short_Literal 0x0
019d 00d9 | | Load_Top At_Offset_1
019e 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
019f 4800 |H | Short_Literal 0x0
01a0 00d9 | | Load_Top At_Offset_1
01a1 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
01a2 e003 | | Load 0x0,0x3
01a3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a4 e22e | . | Load 0x1,0x2e
01a5 3007 |0 | Execute Record,Field_Type,Field_Number 0x7
01a6 0119 | | Execute Any,Check_In_Formal_Type
01a7 00d9 | | Load_Top At_Offset_1
01a8 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
01a9 e5fc | | Load 0x2,-0x4
01aa 00d9 | | Load_Top At_Offset_1
01ab 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
01ac 4800 |H | Short_Literal 0x0
01ad 00d9 | | Load_Top At_Offset_1
01ae 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
01af e20d | | Load 0x1,0xd
01b0 e018 | | Load 0x0,0x18
01b1 180d | | Execute Package,Field_Execute,Field_Number 0xd
01b2 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
01b3 BODY_0188:
01b3 4801 |H | Short_Literal 0x1
01b4 0092 0d3d | =| Action Push_String_Extended,0xd3d ; "<NONE>"
01b6 e5ff | | Load 0x2,-0x1
01b7 e019 | | Load 0x0,0x19
01b8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01b9 7014 |p | Jump_Nonzero 0x1ce
01ba 00d8 | | Load_Top At_Offset_0
01bb e5ff | | Load 0x2,-0x1
01bc 8212 | | Call 0x1,0x12
01bd 00d8 | | Load_Top At_Offset_0
01be 0217 | | Execute Heap_Access,All_Reference
01bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01c0 a5fa | | Store_Unchecked 0x2,-0x6
01c1 4800 |H | Short_Literal 0x0
01c2 e5fa | | Load 0x2,-0x6
01c3 e004 | | Load 0x0,0x4
01c4 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
01c5 6808 |h | Jump_Zero 0x1ce
01c6 0092 0d3e | >| Action Push_String_Extended,0xd3e ; "Domain for \x22"
01c8 e5ff | | Load 0x2,-0x1
01c9 01cc | | Execute Vector,Catenate
01ca 0092 0d3f | ?| Action Push_String_Extended,0xd3f ; "\x22 has been opened."
01cc 01cc | | Execute Vector,Catenate
01cd 8240 | @ | Call 0x1,0x40
01ce 00d8 | | Load_Top At_Offset_0
01cf a5fb | | Store_Unchecked 0x2,-0x5
01d0 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01d1 0000 0000 | | .BLANK 0000[0x7]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01df | | .CONST 0x01df ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0003 | | .CONST 0x0003 ; Number of locals
01db INIT_01d8:
01db e23e | > | Load 0x1,0x3e
01dc 0007 | | Action Break_Optional
01dd 00d8 | | Load_Top At_Offset_0
01de 0007 | | Action Break_Optional
01df BODY_01d8:
01df e5ff | | Load 0x2,-0x1
01e0 6823 |h# | Jump_Zero 0x204
01e1 e5ff | | Load 0x2,-0x1
01e2 0217 | | Execute Heap_Access,All_Reference
01e3 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01e4 0032 | 2 | Store_Top Heap_Access,At_Offset_2
01e5 00cf | | Action Mark_Auxiliary
01e6 781a |x | Jump 0x201
01e7 00da | | Load_Top At_Offset_2
01e8 0217 | | Execute Heap_Access,All_Reference
01e9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01ea 0032 | 2 | Store_Top Heap_Access,At_Offset_2
01eb 0092 0d40 | @| Action Push_String_Extended,0xd40 ; "State "
01ed 00db | | Load_Top At_Offset_3
01ee 0217 | | Execute Heap_Access,All_Reference
01ef 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01f0 e002 | | Load 0x0,0x2
01f1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
01f2 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
01f3 01cc | | Execute Vector,Catenate
01f4 0092 0d41 | A| Action Push_String_Extended,0xd41 ; " is being removed from the domain."
01f6 01cc | | Execute Vector,Catenate
01f7 8240 | @ | Call 0x1,0x40
01f8 4800 |H | Short_Literal 0x0
01f9 e5ff | | Load 0x2,-0x1
01fa e402 | | Load 0x2,0x2
01fb 0217 | | Execute Heap_Access,All_Reference
01fc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01fd 8236 | 6 | Call 0x1,0x36
01fe 00d9 | | Load_Top At_Offset_1
01ff 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0200 00c9 | | Action Pop_Auxiliary_Loop
0201 00da | | Load_Top At_Offset_2
0202 77e4 |w | Jump_Nonzero 0x1e7
0203 00ce | | Action Pop_Auxiliary
0204 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0205 0000 0000 | | .XXX[0x3]
0207 0000 | |
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020f | | .CONST 0x020f ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0003 | | .CONST 0x0003 ; Number of locals
020b INIT_0208:
020b e23e | > | Load 0x1,0x3e
020c 0007 | | Action Break_Optional
020d 00d8 | | Load_Top At_Offset_0
020e 0007 | | Action Break_Optional
020f BODY_0208:
020f e5ff | | Load 0x2,-0x1
0210 6823 |h# | Jump_Zero 0x234
0211 e5ff | | Load 0x2,-0x1
0212 0217 | | Execute Heap_Access,All_Reference
0213 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0214 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0215 00cf | | Action Mark_Auxiliary
0216 781a |x | Jump 0x231
0217 00da | | Load_Top At_Offset_2
0218 0217 | | Execute Heap_Access,All_Reference
0219 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
021a 0032 | 2 | Store_Top Heap_Access,At_Offset_2
021b 0092 0d40 | @| Action Push_String_Extended,0xd40 ; "State "
021d 00db | | Load_Top At_Offset_3
021e 0217 | | Execute Heap_Access,All_Reference
021f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0220 e002 | | Load 0x0,0x2
0221 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0222 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0223 01cc | | Execute Vector,Catenate
0224 0092 0d41 | A| Action Push_String_Extended,0xd41 ; " is being removed from the domain."
0226 01cc | | Execute Vector,Catenate
0227 8240 | @ | Call 0x1,0x40
0228 4801 |H | Short_Literal 0x1
0229 e5ff | | Load 0x2,-0x1
022a e402 | | Load 0x2,0x2
022b 0217 | | Execute Heap_Access,All_Reference
022c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
022d 8236 | 6 | Call 0x1,0x36
022e 00d9 | | Load_Top At_Offset_1
022f 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0230 00c9 | | Action Pop_Auxiliary_Loop
0231 00da | | Load_Top At_Offset_2
0232 77e4 |w | Jump_Nonzero 0x217
0233 00ce | | Action Pop_Auxiliary
0234 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0235 0000 0000 | | .XXX[0x3]
0237 0000 | |
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0250 | P | .CONST 0x0250 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0007 | | .CONST 0x0007 ; Number of locals
023b INIT_0238:
023b e003 | | Load 0x0,0x3
023c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
023d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
023e 02c7 | | Declare_Variable Any
023f 00d8 | | Load_Top At_Offset_0
0240 1c00 | | Execute_Immediate Run_Utility,0x0
0241 e003 | | Load 0x0,0x3
0242 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0243 02c7 | | Declare_Variable Any
0244 00d8 | | Load_Top At_Offset_0
0245 1c00 | | Execute_Immediate Run_Utility,0x0
0246 e003 | | Load 0x0,0x3
0247 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0248 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0249 e003 | | Load 0x0,0x3
024a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024b e23e | > | Load 0x1,0x3e
024c 0007 | | Action Break_Optional
024d e002 | | Load 0x0,0x2
024e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
024f 0602 | | Execute_Immediate Set_Value_Unchecked,0x2
0250 BODY_0238:
0250 e5fe | | Load 0x2,-0x2
0251 0217 | | Execute Heap_Access,All_Reference
0252 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0253 7002 |p | Jump_Nonzero 0x256
0254 4800 |H | Short_Literal 0x0
0255 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0256 e003 | | Load 0x0,0x3
0257 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0258 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0259 e402 | | Load 0x2,0x2
025a 6109 |a | Indirect_Literal Discrete,0x364,{0x00000000, 0x00004000}
025b e01a | | Load 0x0,0x1a
025c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
025d e01b | | Load 0x0,0x1b
025e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
025f e01c | | Load 0x0,0x1c
0260 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0261 4801 |H | Short_Literal 0x1
0262 4800 |H | Short_Literal 0x0
0263 e01b | | Load 0x0,0x1b
0264 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0265 e003 | | Load 0x0,0x3
0266 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0267 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0268 e5ff | | Load 0x2,-0x1
0269 e003 | | Load 0x0,0x3
026a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
026b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
026c c402 | | Store 0x2,0x2
026d c404 | | Store 0x2,0x4
026e 00db | | Load_Top At_Offset_3
026f 6824 |h$ | Jump_Zero 0x294
0270 4801 |H | Short_Literal 0x1
0271 4803 |H | Short_Literal 0x3
0272 e00f | | Load 0x0,0xf
0273 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0274 035b | [ | Declare_Type Array,Constrained
0275 0337 | 7 | Declare_Variable Array
0276 e5ff | | Load 0x2,-0x1
0277 e00f | | Load 0x0,0xf
0278 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0279 4801 |H | Short_Literal 0x1
027a 00da | | Load_Top At_Offset_2
027b 01d6 | | Execute Vector,Field_Write
027c e5fe | | Load 0x2,-0x2
027d 8220 | | Call 0x1,0x20
027e 4802 |H | Short_Literal 0x2
027f 00da | | Load_Top At_Offset_2
0280 01d6 | | Execute Vector,Field_Write
0281 e5ff | | Load 0x2,-0x1
0282 e404 | | Load 0x2,0x4
0283 e00f | | Load 0x0,0xf
0284 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0285 4803 |H | Short_Literal 0x3
0286 00da | | Load_Top At_Offset_2
0287 01d6 | | Execute Vector,Field_Write
0288 60d7 |` | Indirect_Literal Discrete,0x360,{0x00000000, 0x00003002}
0289 e004 | | Load 0x0,0x4
028a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
028b e5fe | | Load 0x2,-0x2
028c 0217 | | Execute Heap_Access,All_Reference
028d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
028e e5fe | | Load 0x2,-0x2
028f 0217 | | Execute Heap_Access,All_Reference
0290 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0291 e004 | | Load 0x0,0x4
0292 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0293 78c0 |x | Jump 0x354
0294 e402 | | Load 0x2,0x2
0295 e003 | | Load 0x0,0x3
0296 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0297 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0298 681d |h | Jump_Zero 0x2b6
0299 4801 |H | Short_Literal 0x1
029a 4802 |H | Short_Literal 0x2
029b e00f | | Load 0x0,0xf
029c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
029d 035b | [ | Declare_Type Array,Constrained
029e 0337 | 7 | Declare_Variable Array
029f e5ff | | Load 0x2,-0x1
02a0 e00f | | Load 0x0,0xf
02a1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02a2 4801 |H | Short_Literal 0x1
02a3 00da | | Load_Top At_Offset_2
02a4 01d6 | | Execute Vector,Field_Write
02a5 e5fe | | Load 0x2,-0x2
02a6 8220 | | Call 0x1,0x20
02a7 4802 |H | Short_Literal 0x2
02a8 00da | | Load_Top At_Offset_2
02a9 01d6 | | Execute Vector,Field_Write
02aa 60b1 |` | Indirect_Literal Discrete,0x35c,{0x00000000, 0x00003006}
02ab e004 | | Load 0x0,0x4
02ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02ad e5fe | | Load 0x2,-0x2
02ae 0217 | | Execute Heap_Access,All_Reference
02af 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02b0 e5fe | | Load 0x2,-0x2
02b1 0217 | | Execute Heap_Access,All_Reference
02b2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b3 e004 | | Load 0x0,0x4
02b4 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
02b5 789e |x | Jump 0x354
02b6 00cf | | Action Mark_Auxiliary
02b7 7896 |x | Jump 0x34e
02b8 e003 | | Load 0x0,0x3
02b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ba e403 | | Load 0x2,0x3
02bb 0120 | | Execute Any,Is_Value
02bc 6803 |h | Jump_Zero 0x2c0
02bd e003 | | Load 0x0,0x3
02be 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02bf 7801 |x | Jump 0x2c1
02c0 e403 | | Load 0x2,0x3
02c1 e402 | | Load 0x2,0x2
02c2 e003 | | Load 0x0,0x3
02c3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02c4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02c5 c403 | | Store 0x2,0x3
02c6 c405 | | Store 0x2,0x5
02c7 e403 | | Load 0x2,0x3
02c8 e01d | | Load 0x0,0x1d
02c9 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
02ca 6817 |h | Jump_Zero 0x2e2
02cb e5fe | | Load 0x2,-0x2
02cc 0092 0d42 | B| Action Push_String_Extended,0xd42 ; "[_"
02ce e402 | | Load 0x2,0x2
02cf e003 | | Load 0x0,0x3
02d0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02d1 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02d2 01cc | | Execute Vector,Catenate
02d3 0092 0d43 | C| Action Push_String_Extended,0xd43 ; "]'C(~Spec_View)"
02d5 01cc | | Execute Vector,Catenate
02d6 8212 | | Call 0x1,0x12
02d7 e5fe | | Load 0x2,-0x2
02d8 0217 | | Execute Heap_Access,All_Reference
02d9 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
02da e003 | | Load 0x0,0x3
02db 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02dc 686b |hk | Jump_Zero 0x348
02dd e403 | | Load 0x2,0x3
02de e5fe | | Load 0x2,-0x2
02df 0217 | | Execute Heap_Access,All_Reference
02e0 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
02e1 7866 |xf | Jump 0x348
02e2 e403 | | Load 0x2,0x3
02e3 8248 | H | Call 0x1,0x48
02e4 c403 | | Store 0x2,0x3
02e5 e5fe | | Load 0x2,-0x2
02e6 0217 | | Execute Heap_Access,All_Reference
02e7 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02e8 0033 | 3 | Store_Top Heap_Access,At_Offset_3
02e9 00cf | | Action Mark_Auxiliary
02ea 00db | | Load_Top At_Offset_3
02eb 704f |pO | Jump_Nonzero 0x33b
02ec e23e | > | Load 0x1,0x3e
02ed e018 | | Load 0x0,0x18
02ee 180d | | Execute Package,Field_Execute,Field_Number 0xd
02ef 039c | | Declare_Variable Heap_Access,By_Allocation
02f0 a406 | | Store_Unchecked 0x2,0x6
02f1 e5fe | | Load 0x2,-0x2
02f2 0219 | | Execute Heap_Access,All_Read
02f3 e406 | | Load 0x2,0x6
02f4 0219 | | Execute Heap_Access,All_Read
02f5 e406 | | Load 0x2,0x6
02f6 0219 | | Execute Heap_Access,All_Read
02f7 00da | | Load_Top At_Offset_2
02f8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02f9 00da | | Load_Top At_Offset_2
02fa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02fb e002 | | Load 0x0,0x2
02fc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02fe e5fe | | Load 0x2,-0x2
02ff 0217 | | Execute Heap_Access,All_Reference
0300 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0301 e5fe | | Load 0x2,-0x2
0302 0217 | | Execute Heap_Access,All_Reference
0303 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0304 e403 | | Load 0x2,0x3
0305 e407 | | Load 0x2,0x7
0306 e5fe | | Load 0x2,-0x2
0307 8237 | 7 | Call 0x1,0x37
0308 e002 | | Load 0x0,0x2
0309 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
030a 00db | | Load_Top At_Offset_3
030b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
030c 00db | | Load_Top At_Offset_3
030d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
030e 00db | | Load_Top At_Offset_3
030f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0310 00d3 | | Pop_Control Pop_Count_3
0311 4800 |H | Short_Literal 0x0
0312 e5fe | | Load 0x2,-0x2
0313 0217 | | Execute Heap_Access,All_Reference
0314 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0315 e004 | | Load 0x0,0x4
0316 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0317 682f |h/ | Jump_Zero 0x347
0318 e403 | | Load 0x2,0x3
0319 e406 | | Load 0x2,0x6
031a 0217 | | Execute Heap_Access,All_Reference
031b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
031c e5fe | | Load 0x2,-0x2
031d 0217 | | Execute Heap_Access,All_Reference
031e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
031f e406 | | Load 0x2,0x6
0320 0217 | | Execute Heap_Access,All_Reference
0321 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0322 4800 |H | Short_Literal 0x0
0323 e406 | | Load 0x2,0x6
0324 0217 | | Execute Heap_Access,All_Reference
0325 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0326 e23c | < | Load 0x1,0x3c
0327 e406 | | Load 0x2,0x6
0328 0217 | | Execute Heap_Access,All_Reference
0329 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
032a 00db | | Load_Top At_Offset_3
032b e5fe | | Load 0x2,-0x2
032c 0217 | | Execute Heap_Access,All_Reference
032d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
032e e5fe | | Load 0x2,-0x2
032f 0217 | | Execute Heap_Access,All_Reference
0330 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0331 0a01 | | Execute_Immediate Plus,0x1
0332 e5fe | | Load 0x2,-0x2
0333 0217 | | Execute Heap_Access,All_Reference
0334 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0335 e5fe | | Load 0x2,-0x2
0336 e406 | | Load 0x2,0x6
0337 0217 | | Execute Heap_Access,All_Reference
0338 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0339 824a | J | Call 0x1,0x4a
033a 780c |x | Jump 0x347
033b 00db | | Load_Top At_Offset_3
033c 0217 | | Execute Heap_Access,All_Reference
033d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
033e e403 | | Load 0x2,0x3
033f 012f | / | Execute Any,Equal
0340 7006 |p | Jump_Nonzero 0x347
0341 00db | | Load_Top At_Offset_3
0342 0217 | | Execute Heap_Access,All_Reference
0343 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0344 a406 | | Store_Unchecked 0x2,0x6
0345 00c9 | | Action Pop_Auxiliary_Loop
0346 7fa3 | | Jump 0x2ea
0347 00ce | | Action Pop_Auxiliary
0348 e402 | | Load 0x2,0x2
0349 e003 | | Load 0x0,0x3
034a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
034b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
034c c402 | | Store 0x2,0x2
034d 00c9 | | Action Pop_Auxiliary_Loop
034e e402 | | Load 0x2,0x2
034f e003 | | Load 0x0,0x3
0350 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0351 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0352 6f65 |oe | Jump_Zero 0x2b8
0353 00ce | | Action Pop_Auxiliary
0354 e402 | | Load 0x2,0x2
0355 e003 | | Load 0x0,0x3
0356 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0357 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0358 c402 | | Store 0x2,0x2
0359 4503 |E | Exit_Suprogram New_Top_Offset 0x3
035a 0000 0000 | | .XXX[0x2]
035c 0000 0000 | | .LITERAL {0x00000000, 0x00003006}
0360 0000 0000 | | .LITERAL {0x00000000, 0x00003002}
0364 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036f | o | .CONST 0x036f ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0003 | | .CONST 0x0003 ; Number of locals
036b INIT_0368:
036b e23e | > | Load 0x1,0x3e
036c 0007 | | Action Break_Optional
036d 00d8 | | Load_Top At_Offset_0
036e 0007 | | Action Break_Optional
036f BODY_0368:
036f e5fe | | Load 0x2,-0x2
0370 685c |h\ | Jump_Zero 0x3cd
0371 e5fe | | Load 0x2,-0x2
0372 0217 | | Execute Heap_Access,All_Reference
0373 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0374 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0375 00cf | | Action Mark_Auxiliary
0376 7843 |xC | Jump 0x3ba
0377 00da | | Load_Top At_Offset_2
0378 0217 | | Execute Heap_Access,All_Reference
0379 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
037a e5ff | | Load 0x2,-0x1
037b 021f | | Execute Heap_Access,Equal
037c 6836 |h6 | Jump_Zero 0x3b3
037d 00d9 | | Load_Top At_Offset_1
037e 7007 |p | Jump_Nonzero 0x386
037f 00da | | Load_Top At_Offset_2
0380 0217 | | Execute Heap_Access,All_Reference
0381 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0382 e5fe | | Load 0x2,-0x2
0383 0217 | | Execute Heap_Access,All_Reference
0384 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0385 7806 |x | Jump 0x38c
0386 00da | | Load_Top At_Offset_2
0387 0217 | | Execute Heap_Access,All_Reference
0388 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0389 00da | | Load_Top At_Offset_2
038a 0217 | | Execute Heap_Access,All_Reference
038b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
038c e5fe | | Load 0x2,-0x2
038d 0217 | | Execute Heap_Access,All_Reference
038e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
038f 00db | | Load_Top At_Offset_3
0390 0217 | | Execute Heap_Access,All_Reference
0391 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0392 0272 | r | Execute Discrete,Minus
0393 e5fe | | Load 0x2,-0x2
0394 0217 | | Execute Heap_Access,All_Reference
0395 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0396 e5fe | | Load 0x2,-0x2
0397 0217 | | Execute Heap_Access,All_Reference
0398 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0399 0aff | | Execute_Immediate Plus,-0x1
039a e5fe | | Load 0x2,-0x2
039b 0217 | | Execute Heap_Access,All_Reference
039c 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
039d e5fe | | Load 0x2,-0x2
039e 0219 | | Execute Heap_Access,All_Read
039f 00db | | Load_Top At_Offset_3
03a0 0219 | | Execute Heap_Access,All_Read
03a1 e402 | | Load 0x2,0x2
03a2 0219 | | Execute Heap_Access,All_Read
03a3 00da | | Load_Top At_Offset_2
03a4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03a5 00da | | Load_Top At_Offset_2
03a6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03a7 00da | | Load_Top At_Offset_2
03a8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03a9 e5fd | | Load 0x2,-0x3
03aa e002 | | Load 0x0,0x2
03ab 181f | | Execute Package,Field_Execute,Field_Number 0x1f
03ac 00db | | Load_Top At_Offset_3
03ad 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03ae 00db | | Load_Top At_Offset_3
03af 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
03b0 00db | | Load_Top At_Offset_3
03b1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03b2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03b3 00da | | Load_Top At_Offset_2
03b4 0032 | 2 | Store_Top Heap_Access,At_Offset_2
03b5 00d9 | | Load_Top At_Offset_1
03b6 0217 | | Execute Heap_Access,All_Reference
03b7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03b8 0033 | 3 | Store_Top Heap_Access,At_Offset_3
03b9 00c9 | | Action Pop_Auxiliary_Loop
03ba 00da | | Load_Top At_Offset_2
03bb 77bb |w | Jump_Nonzero 0x377
03bc 00ce | | Action Pop_Auxiliary
03bd e5ff | | Load 0x2,-0x1
03be e002 | | Load 0x0,0x2
03bf 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03c0 1886 | | Execute Package,Field_Execute,Field_Number 0x86
03c1 700b |p | Jump_Nonzero 0x3cd
03c2 0092 0d44 | D| Action Push_String_Extended,0xd44 ; "Can't remove (or find) "
03c4 e5ff | | Load 0x2,-0x1
03c5 e002 | | Load 0x0,0x2
03c6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03c7 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
03c8 01cc | | Execute Vector,Catenate
03c9 0092 0d45 | E| Action Push_String_Extended,0xd45 ; " from the domain."
03cb 01cc | | Execute Vector,Catenate
03cc 8240 | @ | Call 0x1,0x40
03cd 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03ce 0000 0000 | | .XXX[0x2]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3 | | .CONST 0x03d3 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0001 | | .CONST 0x0001 ; Number of locals
03d3 BODY_03d0:
03d3 INIT_03d0:
03d3 00da | | Load_Top At_Offset_2
03d4 021c | | Execute Heap_Access,Not_Null
03d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03d6 0000 0000 | | .XXX[0x2]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db 00da | | Load_Top At_Offset_2
03dc 0217 | | Execute Heap_Access,All_Reference
03dd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
03de e002 | | Load 0x0,0x2
03df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03e0 00d9 | | Load_Top At_Offset_1
03e1 00d0 | | Action Swap_Control
03e2 0260 | ` | Execute Discrete,In_Type
03e3 7001 |p | Jump_Nonzero 0x3e5
03e4 0801 | | Execute_Immediate Raise,0x1
03e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03e6 0000 0000 | | .XXX[0x2]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb 00da | | Load_Top At_Offset_2
03ec 0217 | | Execute Heap_Access,All_Reference
03ed 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03ef 0000 | | .XXX[0x1]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 00da | | Load_Top At_Offset_2
03f4 0217 | | Execute Heap_Access,All_Reference
03f5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03f7 0000 | | .XXX[0x1]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fd | | .CONST 0x03fd ; Address of begin
03f9 0004 | | .CONST 0x0004 ; Address of exception handler
03fa 0002 | | .CONST 0x0002 ; Number of locals
03fb INIT_03f8:
03fb e23e | > | Load 0x1,0x3e
03fc 0007 | | Action Break_Optional
03fd BODY_03f8:
03fd 00db | | Load_Top At_Offset_3
03fe 6838 |h8 | Jump_Zero 0x437
03ff 00db | | Load_Top At_Offset_3
0400 0217 | | Execute Heap_Access,All_Reference
0401 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0402 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0403 e5fe | | Load 0x2,-0x2
0404 e002 | | Load 0x0,0x2
0405 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0406 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0407 6818 |h | Jump_Zero 0x420
0408 00cf | | Action Mark_Auxiliary
0409 7812 |x | Jump 0x41c
040a 00d9 | | Load_Top At_Offset_1
040b 0217 | | Execute Heap_Access,All_Reference
040c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
040d e5fe | | Load 0x2,-0x2
040e 021f | | Execute Heap_Access,Equal
040f 6807 |h | Jump_Zero 0x417
0410 e5fb | | Load 0x2,-0x5
0411 e5fc | | Load 0x2,-0x4
0412 e5fd | | Load 0x2,-0x3
0413 e402 | | Load 0x2,0x2
0414 e5ff | | Load 0x2,-0x1
0415 824e | N | Call 0x1,0x4e
0416 7807 |x | Jump 0x41e
0417 00d9 | | Load_Top At_Offset_1
0418 0217 | | Execute Heap_Access,All_Reference
0419 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
041a 0032 | 2 | Store_Top Heap_Access,At_Offset_2
041b 00c9 | | Action Pop_Auxiliary_Loop
041c 00d9 | | Load_Top At_Offset_1
041d 77ec |w | Jump_Nonzero 0x40a
041e 00ce | | Action Pop_Auxiliary
041f 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0420 00cf | | Action Mark_Auxiliary
0421 7812 |x | Jump 0x434
0422 4800 |H | Short_Literal 0x0
0423 e5ff | | Load 0x2,-0x1
0424 0217 | | Execute Heap_Access,All_Reference
0425 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0426 e004 | | Load 0x0,0x4
0427 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0428 6806 |h | Jump_Zero 0x42f
0429 e5fb | | Load 0x2,-0x5
042a e5fc | | Load 0x2,-0x4
042b e5fd | | Load 0x2,-0x3
042c e402 | | Load 0x2,0x2
042d e5ff | | Load 0x2,-0x1
042e 824e | N | Call 0x1,0x4e
042f 00d9 | | Load_Top At_Offset_1
0430 0217 | | Execute Heap_Access,All_Reference
0431 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0432 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0433 00c9 | | Action Pop_Auxiliary_Loop
0434 00d9 | | Load_Top At_Offset_1
0435 77ec |w | Jump_Nonzero 0x422
0436 00ce | | Action Pop_Auxiliary
0437 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043d | = | .CONST 0x043d ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0002 | | .CONST 0x0002 ; Number of locals
043b INIT_0438:
043b e23e | > | Load 0x1,0x3e
043c 0007 | | Action Break_Optional
043d BODY_0438:
043d 00db | | Load_Top At_Offset_3
043e 6840 |h@ | Jump_Zero 0x47f
043f 00db | | Load_Top At_Offset_3
0440 0217 | | Execute Heap_Access,All_Reference
0441 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0442 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0443 e5fe | | Load 0x2,-0x2
0444 e002 | | Load 0x0,0x2
0445 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0446 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0447 681c |h | Jump_Zero 0x464
0448 00cf | | Action Mark_Auxiliary
0449 7816 |x | Jump 0x460
044a 00d9 | | Load_Top At_Offset_1
044b 0217 | | Execute Heap_Access,All_Reference
044c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
044d e5fe | | Load 0x2,-0x2
044e 021f | | Execute Heap_Access,Equal
044f 680b |h | Jump_Zero 0x45b
0450 00d9 | | Load_Top At_Offset_1
0451 0217 | | Execute Heap_Access,All_Reference
0452 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0453 e5fd | | Load 0x2,-0x3
0454 e002 | | Load 0x0,0x2
0455 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0456 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0457 00da | | Load_Top At_Offset_2
0458 e5ff | | Load 0x2,-0x1
0459 824f | O | Call 0x1,0x4f
045a 7807 |x | Jump 0x462
045b 00d9 | | Load_Top At_Offset_1
045c 0217 | | Execute Heap_Access,All_Reference
045d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
045e 0032 | 2 | Store_Top Heap_Access,At_Offset_2
045f 00c9 | | Action Pop_Auxiliary_Loop
0460 00d9 | | Load_Top At_Offset_1
0461 77e8 |w | Jump_Nonzero 0x44a
0462 00ce | | Action Pop_Auxiliary
0463 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0464 00cf | | Action Mark_Auxiliary
0465 7816 |x | Jump 0x47c
0466 4800 |H | Short_Literal 0x0
0467 e5ff | | Load 0x2,-0x1
0468 0217 | | Execute Heap_Access,All_Reference
0469 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
046a e004 | | Load 0x0,0x4
046b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
046c 680a |h | Jump_Zero 0x477
046d 00d9 | | Load_Top At_Offset_1
046e 0217 | | Execute Heap_Access,All_Reference
046f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0470 e5fd | | Load 0x2,-0x3
0471 e002 | | Load 0x0,0x2
0472 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0473 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0474 00da | | Load_Top At_Offset_2
0475 e5ff | | Load 0x2,-0x1
0476 824f | O | Call 0x1,0x4f
0477 00d9 | | Load_Top At_Offset_1
0478 0217 | | Execute Heap_Access,All_Reference
0479 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
047a 0032 | 2 | Store_Top Heap_Access,At_Offset_2
047b 00c9 | | Action Pop_Auxiliary_Loop
047c 00d9 | | Load_Top At_Offset_1
047d 77e8 |w | Jump_Nonzero 0x466
047e 00ce | | Action Pop_Auxiliary
047f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0485 | | .CONST 0x0485 ; Address of begin
0481 0004 | | .CONST 0x0004 ; Address of exception handler
0482 0002 | | .CONST 0x0002 ; Number of locals
0483 INIT_0480:
0483 e23e | > | Load 0x1,0x3e
0484 0007 | | Action Break_Optional
0485 BODY_0480:
0485 e5fe | | Load 0x2,-0x2
0486 e002 | | Load 0x0,0x2
0487 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0488 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0489 6816 |h | Jump_Zero 0x4a0
048a 00db | | Load_Top At_Offset_3
048b e5fe | | Load 0x2,-0x2
048c 824c | L | Call 0x1,0x4c
048d 0031 | 1 | Store_Top Heap_Access,At_Offset_1
048e 4800 |H | Short_Literal 0x0
048f e5ff | | Load 0x2,-0x1
0490 0217 | | Execute Heap_Access,All_Reference
0491 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0492 e004 | | Load 0x0,0x4
0493 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0494 6816 |h | Jump_Zero 0x4ab
0495 00d8 | | Load_Top At_Offset_0
0496 0217 | | Execute Heap_Access,All_Reference
0497 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0498 e002 | | Load 0x0,0x2
0499 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049a 00d9 | | Load_Top At_Offset_1
049b 00d0 | | Action Swap_Control
049c 0260 | ` | Execute Discrete,In_Type
049d 7001 |p | Jump_Nonzero 0x49f
049e 0801 | | Execute_Immediate Raise,0x1
049f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04a0 00db | | Load_Top At_Offset_3
04a1 0217 | | Execute Heap_Access,All_Reference
04a2 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
04a3 e002 | | Load 0x0,0x2
04a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04a5 00d9 | | Load_Top At_Offset_1
04a6 00d0 | | Action Swap_Control
04a7 0260 | ` | Execute Discrete,In_Type
04a8 7001 |p | Jump_Nonzero 0x4aa
04a9 0801 | | Execute_Immediate Raise,0x1
04aa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04ab 00db | | Load_Top At_Offset_3
04ac 0217 | | Execute Heap_Access,All_Reference
04ad 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04ae e004 | | Load 0x0,0x4
04af 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
04b0 e5ff | | Load 0x2,-0x1
04b1 0217 | | Execute Heap_Access,All_Reference
04b2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04b3 e004 | | Load 0x0,0x4
04b4 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
04b5 e004 | | Load 0x0,0x4
04b6 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
04b7 e002 | | Load 0x0,0x2
04b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04b9 00d9 | | Load_Top At_Offset_1
04ba 00d0 | | Action Swap_Control
04bb 0260 | ` | Execute Discrete,In_Type
04bc 7001 |p | Jump_Nonzero 0x4be
04bd 0801 | | Execute_Immediate Raise,0x1
04be 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04bf 0000 | | .XXX[0x1]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04ca | | .CONST 0x04ca ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0005 | | .CONST 0x0005 ; Number of locals
04c3 INIT_04c0:
04c3 e23e | > | Load 0x1,0x3e
04c4 0007 | | Action Break_Optional
04c5 e23c | < | Load 0x1,0x3c
04c6 029f 0c8b | | Declare_Subprogram INIT_0c88,For_Call
04c8 029f 0cbb | | Declare_Subprogram INIT_0cb8,For_Call
04ca BODY_04c0:
04ca e5ff | | Load 0x2,-0x1
04cb 6817 |h | Jump_Zero 0x4e3
04cc e5ff | | Load 0x2,-0x1
04cd 0217 | | Execute Heap_Access,All_Reference
04ce 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
04cf a402 | | Store_Unchecked 0x2,0x2
04d0 e5fe | | Load 0x2,-0x2
04d1 e002 | | Load 0x0,0x2
04d2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
04d3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04d4 680d |h | Jump_Zero 0x4e2
04d5 e5ff | | Load 0x2,-0x1
04d6 e5fe | | Load 0x2,-0x2
04d7 824c | L | Call 0x1,0x4c
04d8 a402 | | Store_Unchecked 0x2,0x2
04d9 4800 |H | Short_Literal 0x0
04da e5ff | | Load 0x2,-0x1
04db 0217 | | Execute Heap_Access,All_Reference
04dc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04dd e004 | | Load 0x0,0x4
04de 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
04df 6803 |h | Jump_Zero 0x4e3
04e0 8404 | | Call 0x2,0x4
04e1 7801 |x | Jump 0x4e3
04e2 8405 | | Call 0x2,0x5
04e3 e002 | | Load 0x0,0x2
04e4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04e5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04e7 0000 | | .XXX[0x1]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04f9 | | .CONST 0x04f9 ; Address of begin
04e9 0004 | | .CONST 0x0004 ; Address of exception handler
04ea 0004 | | .CONST 0x0004 ; Number of locals
04eb INIT_04e8:
04eb 00da | | Load_Top At_Offset_2
04ec 8225 | % | Call 0x1,0x25
04ed 4801 |H | Short_Literal 0x1
04ee 00d9 | | Load_Top At_Offset_1
04ef 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04f0 e002 | | Load 0x0,0x2
04f1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04f2 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
04f3 035b | [ | Declare_Type Array,Constrained
04f4 0337 | 7 | Declare_Variable Array
04f5 00d8 | | Load_Top At_Offset_0
04f6 1c00 | | Execute_Immediate Run_Utility,0x0
04f7 e004 | | Load 0x0,0x4
04f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f9 BODY_04e8:
04f9 00cf | | Action Mark_Auxiliary
04fa 00db | | Load_Top At_Offset_3
04fb 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04fc 4801 |H | Short_Literal 0x1
04fd 0263 | c | Execute Discrete,Above_Bound
04fe 7023 |p# | Jump_Nonzero 0x522
04ff 00d8 | | Load_Top At_Offset_0
0500 e403 | | Load 0x2,0x3
0501 01d5 | | Execute Vector,Field_Reference
0502 e404 | | Load 0x2,0x4
0503 00d9 | | Load_Top At_Offset_1
0504 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0505 0120 | | Execute Any,Is_Value
0506 6803 |h | Jump_Zero 0x50a
0507 e003 | | Load 0x0,0x3
0508 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0509 7802 |x | Jump 0x50c
050a 00d9 | | Load_Top At_Offset_1
050b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
050c 00db | | Load_Top At_Offset_3
050d e402 | | Load 0x2,0x2
050e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
050f 01d7 | | Execute Vector,Field_Read
0510 e002 | | Load 0x0,0x2
0511 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0512 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0513 00da | | Load_Top At_Offset_2
0514 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0515 c404 | | Store 0x2,0x4
0516 00d1 | | Pop_Control Pop_Count_1
0517 00d8 | | Load_Top At_Offset_0
0518 e403 | | Load 0x2,0x3
0519 01d5 | | Execute Vector,Field_Reference
051a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
051b 8249 | I | Call 0x1,0x49
051c 00d9 | | Load_Top At_Offset_1
051d e403 | | Load 0x2,0x3
051e 01d5 | | Execute Vector,Field_Reference
051f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0520 00c8 | | Action Pop_Auxiliary_Range
0521 3fdd |? | Loop_Increasing 0x4ff
0522 00ce | | Action Pop_Auxiliary
0523 00d9 | | Load_Top At_Offset_1
0524 e002 | | Load 0x0,0x2
0525 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0526 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0527 01c6 | | Execute Vector,Convert_To_Formal
0528 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0529 0000 0000 | | .BLANK 0000[0x7]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0533 | 3 | .CONST 0x0533 ; Address of begin
0531 0004 | | .CONST 0x0004 ; Address of exception handler
0532 0001 | | .CONST 0x0001 ; Number of locals
0533 BODY_0530:
0533 INIT_0530:
0533 00da | | Load_Top At_Offset_2
0534 0217 | | Execute Heap_Access,All_Reference
0535 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0536 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0537 0000 | | .XXX[0x1]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b | ; | .CONST 0x053b ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0001 | | .CONST 0x0001 ; Number of locals
053b BODY_0538:
053b INIT_0538:
053b 00db | | Load_Top At_Offset_3
053c 00db | | Load_Top At_Offset_3
053d 0217 | | Execute Heap_Access,All_Reference
053e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
053f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0543 | C | .CONST 0x0543 ; Address of begin
0541 0004 | | .CONST 0x0004 ; Address of exception handler
0542 0001 | | .CONST 0x0001 ; Number of locals
0543 BODY_0540:
0543 INIT_0540:
0543 4800 |H | Short_Literal 0x0
0544 00db | | Load_Top At_Offset_3
0545 0217 | | Execute Heap_Access,All_Reference
0546 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0547 e004 | | Load 0x0,0x4
0548 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0549 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
054a 0000 0000 | | .BLANK 0000[0x6]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0553 | S | .CONST 0x0553 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0001 | | .CONST 0x0001 ; Number of locals
0553 BODY_0550:
0553 INIT_0550:
0553 00da | | Load_Top At_Offset_2
0554 0217 | | Execute Heap_Access,All_Reference
0555 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0556 e004 | | Load 0x0,0x4
0557 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0558 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0559 0000 0000 | | .BLANK 0000[0x7]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563 | c | .CONST 0x0563 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0001 | | .CONST 0x0001 ; Number of locals
0563 BODY_0560:
0563 INIT_0560:
0563 00da | | Load_Top At_Offset_2
0564 e256 | V | Load 0x1,0x56
0565 e257 | W | Load 0x1,0x57
0566 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
0567 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
0568 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
0569 e00f | | Load 0x0,0xf
056a 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
056b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
056c 0000 0000 | | .BLANK 0000[0x4]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573 | s | .CONST 0x0573 ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0001 | | .CONST 0x0001 ; Number of locals
0573 BODY_0570:
0573 INIT_0570:
0573 00da | | Load_Top At_Offset_2
0574 e25e | ^ | Load 0x1,0x5e
0575 e25f | _ | Load 0x1,0x5f
0576 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60
0577 e261 | a | Load 0x1,0x61
0578 1d62 | b | Execute_Immediate Reference_Lex_1,0x62
0579 e00f | | Load 0x0,0xf
057a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
057b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
057c 0000 0000 | | .BLANK 0000[0x4]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0583 | | .CONST 0x0583 ; Address of begin
0581 0004 | | .CONST 0x0004 ; Address of exception handler
0582 0001 | | .CONST 0x0001 ; Number of locals
0583 BODY_0580:
0583 INIT_0580:
0583 0092 0d46 | F| Action Push_String_Extended,0xd46 ; "the specified domain"
0585 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0586 0000 0000 | | .XXX[0x2]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 0593 | | .CONST 0x0593 ; Address of begin
0589 0004 | | .CONST 0x0004 ; Address of exception handler
058a 0003 | | .CONST 0x0003 ; Number of locals
058b INIT_0588:
058b e003 | | Load 0x0,0x3
058c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
058d 02c7 | | Declare_Variable Any
058e 00d8 | | Load_Top At_Offset_0
058f 1c00 | | Execute_Immediate Run_Utility,0x0
0590 e003 | | Load 0x0,0x3
0591 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0592 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0593 BODY_0588:
0593 e003 | | Load 0x0,0x3
0594 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0595 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0596 00da | | Load_Top At_Offset_2
0597 0120 | | Execute Any,Is_Value
0598 6803 |h | Jump_Zero 0x59c
0599 e003 | | Load 0x0,0x3
059a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
059b 7801 |x | Jump 0x59d
059c 00da | | Load_Top At_Offset_2
059d 603a |`: | Indirect_Literal Discrete,0x5d8,{0x00000000, 0x00004000}
059e e01a | | Load 0x0,0x1a
059f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05a0 e01b | | Load 0x0,0x1b
05a1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05a2 e003 | | Load 0x0,0x3
05a3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05a4 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05a5 e5ff | | Load 0x2,-0x1
05a6 e003 | | Load 0x0,0x3
05a7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05a8 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
05a9 c402 | | Store 0x2,0x2
05aa 0059 | Y | Store_Top Discrete,At_Offset_1
05ab 00d8 | | Load_Top At_Offset_0
05ac 7004 |p | Jump_Nonzero 0x5b1
05ad e5fe | | Load 0x2,-0x2
05ae 00da | | Load_Top At_Offset_2
05af 8224 | $ | Call 0x1,0x24
05b0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05b1 4801 |H | Short_Literal 0x1
05b2 4802 |H | Short_Literal 0x2
05b3 e00f | | Load 0x0,0xf
05b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05b5 035b | [ | Declare_Type Array,Constrained
05b6 0337 | 7 | Declare_Variable Array
05b7 e5ff | | Load 0x2,-0x1
05b8 00da | | Load_Top At_Offset_2
05b9 e00f | | Load 0x0,0xf
05ba 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
05bb 4801 |H | Short_Literal 0x1
05bc 00da | | Load_Top At_Offset_2
05bd 01d6 | | Execute Vector,Field_Write
05be e5fe | | Load 0x2,-0x2
05bf 8220 | | Call 0x1,0x20
05c0 4802 |H | Short_Literal 0x2
05c1 00da | | Load_Top At_Offset_2
05c2 01d6 | | Execute Vector,Field_Write
05c3 6010 |` | Indirect_Literal Discrete,0x5d4,{0x00000000, 0x00003001}
05c4 e004 | | Load 0x0,0x4
05c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05c6 e5fe | | Load 0x2,-0x2
05c7 0217 | | Execute Heap_Access,All_Reference
05c8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05c9 e5fe | | Load 0x2,-0x2
05ca 0217 | | Execute Heap_Access,All_Reference
05cb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05cc e004 | | Load 0x0,0x4
05cd 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
05ce e002 | | Load 0x0,0x2
05cf 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05d0 180e | | Execute Package,Field_Execute,Field_Number 0xe
05d1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05d2 0000 0000 | | .XXX[0x2]
05d4 0000 0000 | | .LITERAL {0x00000000, 0x00003001}
05d8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
05dc 0000 0000 | | .BLANK 0000[0x4]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e7 | | .CONST 0x05e7 ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 0002 | | .CONST 0x0002 ; Number of locals
05e3 INIT_05e0:
05e3 00db | | Load_Top At_Offset_3
05e4 00db | | Load_Top At_Offset_3
05e5 8248 | H | Call 0x1,0x48
05e6 824b | K | Call 0x1,0x4b
05e7 BODY_05e0:
05e7 00d8 | | Load_Top At_Offset_0
05e8 7004 |p | Jump_Nonzero 0x5ed
05e9 e002 | | Load 0x0,0x2
05ea 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05eb 180e | | Execute Package,Field_Execute,Field_Number 0xe
05ec 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05ed 00d8 | | Load_Top At_Offset_0
05ee 0217 | | Execute Heap_Access,All_Reference
05ef 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05f1 0000 0000 | | .BLANK 0000[0x7]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 0606 | | .CONST 0x0606 ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0003 | | .CONST 0x0003 ; Number of locals
05fb INIT_05f8:
05fb 00da | | Load_Top At_Offset_2
05fc 0217 | | Execute Heap_Access,All_Reference
05fd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
05fe e002 | | Load 0x0,0x2
05ff 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0600 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0601 1c08 | | Execute_Immediate Run_Utility,0x8
0602 00db | | Load_Top At_Offset_3
0603 0217 | | Execute Heap_Access,All_Reference
0604 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0605 0007 | | Action Break_Optional
0606 BODY_05f8:
0606 4800 |H | Short_Literal 0x0
0607 00da | | Load_Top At_Offset_2
0608 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0609 00cf | | Action Mark_Auxiliary
060a 00da | | Load_Top At_Offset_2
060b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
060c 01d9 | | Execute Vector,Reverse_Bounds
060d 0263 | c | Execute Discrete,Above_Bound
060e 700d |p | Jump_Nonzero 0x61c
060f 00db | | Load_Top At_Offset_3
0610 0217 | | Execute Heap_Access,All_Reference
0611 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0612 00d9 | | Load_Top At_Offset_1
0613 e402 | | Load 0x2,0x2
0614 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0615 01d6 | | Execute Vector,Field_Write
0616 00db | | Load_Top At_Offset_3
0617 0217 | | Execute Heap_Access,All_Reference
0618 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0619 a403 | | Store_Unchecked 0x2,0x3
061a 00c8 | | Action Pop_Auxiliary_Range
061b 3ff3 |? | Loop_Increasing 0x60f
061c 00ce | | Action Pop_Auxiliary
061d 00d9 | | Load_Top At_Offset_1
061e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
061f 0000 | | .XXX[0x1]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0626 | & | .CONST 0x0626 ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0002 | | .CONST 0x0002 ; Number of locals
0623 INIT_0620:
0623 00da | | Load_Top At_Offset_2
0624 0217 | | Execute Heap_Access,All_Reference
0625 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0626 BODY_0620:
0626 00cf | | Action Mark_Auxiliary
0627 e5fe | | Load 0x2,-0x2
0628 4802 |H | Short_Literal 0x2
0629 0263 | c | Execute Discrete,Above_Bound
062a 700a |p | Jump_Nonzero 0x635
062b 00db | | Load_Top At_Offset_3
062c 7002 |p | Jump_Nonzero 0x62f
062d 00d2 | | Pop_Control Pop_Count_2
062e 7806 |x | Jump 0x635
062f 00db | | Load_Top At_Offset_3
0630 0217 | | Execute Heap_Access,All_Reference
0631 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0632 a402 | | Store_Unchecked 0x2,0x2
0633 00c8 | | Action Pop_Auxiliary_Range
0634 3ff6 |? | Loop_Increasing 0x62b
0635 00ce | | Action Pop_Auxiliary
0636 00d8 | | Load_Top At_Offset_0
0637 7004 |p | Jump_Nonzero 0x63c
0638 e002 | | Load 0x0,0x2
0639 1b16 | | Execute Package,Field_Read,Field_Number 0x16
063a 180e | | Execute Package,Field_Execute,Field_Number 0xe
063b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
063c 00d8 | | Load_Top At_Offset_0
063d 0217 | | Execute Heap_Access,All_Reference
063e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
063f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0648 | H | .CONST 0x0648 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0003 | | .CONST 0x0003 ; Number of locals
0643 INIT_0640:
0643 e23e | > | Load 0x1,0x3e
0644 0007 | | Action Break_Optional
0645 e002 | | Load 0x0,0x2
0646 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0647 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0648 BODY_0640:
0648 e5fe | | Load 0x2,-0x2
0649 6827 |h' | Jump_Zero 0x671
064a e5fe | | Load 0x2,-0x2
064b 0217 | | Execute Heap_Access,All_Reference
064c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
064d 0032 | 2 | Store_Top Heap_Access,At_Offset_2
064e 00cf | | Action Mark_Auxiliary
064f 781e |x | Jump 0x66e
0650 e5fe | | Load 0x2,-0x2
0651 0219 | | Execute Heap_Access,All_Read
0652 00d8 | | Load_Top At_Offset_0
0653 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0654 e002 | | Load 0x0,0x2
0655 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0656 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0657 e402 | | Load 0x2,0x2
0658 0217 | | Execute Heap_Access,All_Reference
0659 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
065a e5ff | | Load 0x2,-0x1
065b e002 | | Load 0x0,0x2
065c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
065d 1875 | u | Execute Package,Field_Execute,Field_Number 0x75
065e c403 | | Store 0x2,0x3
065f 00d9 | | Load_Top At_Offset_1
0660 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0661 00d1 | | Pop_Control Pop_Count_1
0662 00d9 | | Load_Top At_Offset_1
0663 e002 | | Load 0x0,0x2
0664 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0665 180f | | Execute Package,Field_Execute,Field_Number 0xf
0666 7002 |p | Jump_Nonzero 0x669
0667 00d9 | | Load_Top At_Offset_1
0668 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0669 00da | | Load_Top At_Offset_2
066a 0217 | | Execute Heap_Access,All_Reference
066b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
066c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
066d 00c9 | | Action Pop_Auxiliary_Loop
066e 00da | | Load_Top At_Offset_2
066f 77e0 |w | Jump_Nonzero 0x650
0670 00ce | | Action Pop_Auxiliary
0671 e002 | | Load 0x0,0x2
0672 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0673 180e | | Execute Package,Field_Execute,Field_Number 0xe
0674 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0675 0000 0000 | | .XXX[0x3]
0677 0000 | |
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 067b | { | .CONST 0x067b ; Address of begin
0679 0004 | | .CONST 0x0004 ; Address of exception handler
067a 0001 | | .CONST 0x0001 ; Number of locals
067b BODY_0678:
067b INIT_0678:
067b 00db | | Load_Top At_Offset_3
067c 0217 | | Execute Heap_Access,All_Reference
067d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
067e 00db | | Load_Top At_Offset_3
067f 8267 | g | Call 0x1,0x67
0680 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0681 0000 0000 | | .BLANK 0000[0x7]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b | | .CONST 0x068b ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0001 | | .CONST 0x0001 ; Number of locals
068b BODY_0688:
068b INIT_0688:
068b 00da | | Load_Top At_Offset_2
068c 0217 | | Execute Heap_Access,All_Reference
068d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
068e 00d8 | | Load_Top At_Offset_0
068f 0120 | | Execute Any,Is_Value
0690 7002 |p | Jump_Nonzero 0x693
0691 00d8 | | Load_Top At_Offset_0
0692 011e | | Execute Any,Convert
0693 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0694 0000 0000 | | .BLANK 0000[0x4]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b | | .CONST 0x069b ; Address of begin
0699 0004 | | .CONST 0x0004 ; Address of exception handler
069a 0001 | | .CONST 0x0001 ; Number of locals
069b BODY_0698:
069b INIT_0698:
069b 00db | | Load_Top At_Offset_3
069c 00db | | Load_Top At_Offset_3
069d 0217 | | Execute Heap_Access,All_Reference
069e 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
069f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06b0 | | .CONST 0x06b0 ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0004 | | .CONST 0x0004 ; Number of locals
06a3 INIT_06a0:
06a3 00da | | Load_Top At_Offset_2
06a4 e002 | | Load 0x0,0x2
06a5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06a6 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
06a7 00d8 | | Load_Top At_Offset_0
06a8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06a9 e002 | | Load 0x0,0x2
06aa 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06ab 1b10 | | Execute Package,Field_Read,Field_Number 0x10
06ac 1c08 | | Execute_Immediate Run_Utility,0x8
06ad e004 | | Load 0x0,0x4
06ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06af 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06b0 BODY_06a0:
06b0 00da | | Load_Top At_Offset_2
06b1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06b2 00da | | Load_Top At_Offset_2
06b3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06b4 00cf | | Action Mark_Auxiliary
06b5 00db | | Load_Top At_Offset_3
06b6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06b7 01d9 | | Execute Vector,Reverse_Bounds
06b8 0263 | c | Execute Discrete,Above_Bound
06b9 7022 |p" | Jump_Nonzero 0x6dc
06ba e403 | | Load 0x2,0x3
06bb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06bc 00d9 | | Load_Top At_Offset_1
06bd e404 | | Load 0x2,0x4
06be e002 | | Load 0x0,0x2
06bf 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06c1 00da | | Load_Top At_Offset_2
06c2 e408 | | Load 0x2,0x8
06c3 01d7 | | Execute Vector,Field_Read
06c4 00d1 | | Pop_Control Pop_Count_1
06c5 e5fe | | Load 0x2,-0x2
06c6 e407 | | Load 0x2,0x7
06c7 e402 | | Load 0x2,0x2
06c8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06c9 01d7 | | Execute Vector,Field_Read
06ca 8269 | i | Call 0x1,0x69
06cb 00da | | Load_Top At_Offset_2
06cc e408 | | Load 0x2,0x8
06cd 01d6 | | Execute Vector,Field_Write
06ce c404 | | Store 0x2,0x4
06cf 00d2 | | Pop_Control Pop_Count_2
06d0 4800 |H | Short_Literal 0x0
06d1 e404 | | Load 0x2,0x4
06d2 e004 | | Load 0x0,0x4
06d3 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
06d4 7005 |p | Jump_Nonzero 0x6da
06d5 00db | | Load_Top At_Offset_3
06d6 e403 | | Load 0x2,0x3
06d7 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06d8 4800 |H | Short_Literal 0x0
06d9 a404 | | Store_Unchecked 0x2,0x4
06da 00c8 | | Action Pop_Auxiliary_Range
06db 3fde |? | Loop_Increasing 0x6ba
06dc 00ce | | Action Pop_Auxiliary
06dd 00d9 | | Load_Top At_Offset_1
06de 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06df 0000 | | .XXX[0x1]
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06f1 | | .CONST 0x06f1 ; Address of begin
06e1 0004 | | .CONST 0x0004 ; Address of exception handler
06e2 0006 | | .CONST 0x0006 ; Number of locals
06e3 INIT_06e0:
06e3 e23e | > | Load 0x1,0x3e
06e4 0007 | | Action Break_Optional
06e5 e004 | | Load 0x0,0x4
06e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06e7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06e8 e002 | | Load 0x0,0x2
06e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06eb e002 | | Load 0x0,0x2
06ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06ed 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
06ee e002 | | Load 0x0,0x2
06ef 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06f1 BODY_06e0:
06f1 e5fe | | Load 0x2,-0x2
06f2 683b |h; | Jump_Zero 0x72e
06f3 e5fe | | Load 0x2,-0x2
06f4 0217 | | Execute Heap_Access,All_Reference
06f5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
06f6 a402 | | Store_Unchecked 0x2,0x2
06f7 e5ff | | Load 0x2,-0x1
06f8 e002 | | Load 0x0,0x2
06f9 1b15 | | Execute Package,Field_Read,Field_Number 0x15
06fa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06fb 680b |h | Jump_Zero 0x707
06fc 00db | | Load_Top At_Offset_3
06fd e002 | | Load 0x0,0x2
06fe 1b10 | | Execute Package,Field_Read,Field_Number 0x10
06ff e5ff | | Load 0x2,-0x1
0700 e002 | | Load 0x0,0x2
0701 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0702 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0703 c404 | | Store 0x2,0x4
0704 c403 | | Store 0x2,0x3
0705 00da | | Load_Top At_Offset_2
0706 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0707 00db | | Load_Top At_Offset_3
0708 e002 | | Load 0x0,0x2
0709 1b13 | | Execute Package,Field_Read,Field_Number 0x13
070a e5ff | | Load 0x2,-0x1
070b e002 | | Load 0x0,0x2
070c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
070d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
070e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
070f c403 | | Store 0x2,0x3
0710 4800 |H | Short_Literal 0x0
0711 e403 | | Load 0x2,0x3
0712 e004 | | Load 0x0,0x4
0713 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0714 6819 |h | Jump_Zero 0x72e
0715 00db | | Load_Top At_Offset_3
0716 e002 | | Load 0x0,0x2
0717 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0718 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0719 e5fe | | Load 0x2,-0x2
071a e405 | | Load 0x2,0x5
071b 8269 | i | Call 0x1,0x69
071c 0032 | 2 | Store_Top Heap_Access,At_Offset_2
071d c403 | | Store 0x2,0x3
071e 00d8 | | Load_Top At_Offset_0
071f e002 | | Load 0x0,0x2
0720 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0721 1886 | | Execute Package,Field_Execute,Field_Number 0x86
0722 700b |p | Jump_Nonzero 0x72e
0723 4800 |H | Short_Literal 0x0
0724 e403 | | Load 0x2,0x3
0725 e004 | | Load 0x0,0x4
0726 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0727 6806 |h | Jump_Zero 0x72e
0728 00d8 | | Load_Top At_Offset_0
0729 e5ff | | Load 0x2,-0x1
072a e002 | | Load 0x0,0x2
072b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
072c 1883 | | Execute Package,Field_Execute,Field_Number 0x83
072d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
072e e002 | | Load 0x0,0x2
072f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0730 180e | | Execute Package,Field_Execute,Field_Number 0xe
0731 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0732 0000 0000 | | .BLANK 0000[0x6]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 074d | M | .CONST 0x074d ; Address of begin
0739 0004 | | .CONST 0x0004 ; Address of exception handler
073a 0005 | | .CONST 0x0005 ; Number of locals
073b INIT_0738:
073b 4801 |H | Short_Literal 0x1
073c 00db | | Load_Top At_Offset_3
073d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
073e e002 | | Load 0x0,0x2
073f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0740 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0741 035b | [ | Declare_Type Array,Constrained
0742 0337 | 7 | Declare_Variable Array
0743 e002 | | Load 0x0,0x2
0744 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0745 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0746 00e2 | | Load_Encached Integer_Cache
0747 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0748 e5ff | | Load 0x2,-0x1
0749 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
074a e004 | | Load 0x0,0x4
074b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
074c 03f1 | | Declare_Variable Discrete,With_Value
074d BODY_0738:
074d 00cf | | Action Mark_Auxiliary
074e e5ff | | Load 0x2,-0x1
074f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0750 01d9 | | Execute Vector,Reverse_Bounds
0751 0263 | c | Execute Discrete,Above_Bound
0752 7031 |p1 | Jump_Nonzero 0x784
0753 e5fe | | Load 0x2,-0x2
0754 00d9 | | Load_Top At_Offset_1
0755 e5ff | | Load 0x2,-0x1
0756 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0757 01d7 | | Execute Vector,Field_Read
0758 822b | + | Call 0x1,0x2b
0759 a403 | | Store_Unchecked 0x2,0x3
075a e403 | | Load 0x2,0x3
075b e002 | | Load 0x0,0x2
075c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
075d 180f | | Execute Package,Field_Execute,Field_Number 0xf
075e 7008 |p | Jump_Nonzero 0x767
075f e404 | | Load 0x2,0x4
0760 0a01 | | Execute_Immediate Plus,0x1
0761 c404 | | Store 0x2,0x4
0762 e403 | | Load 0x2,0x3
0763 e404 | | Load 0x2,0x4
0764 e402 | | Load 0x2,0x2
0765 01d6 | | Execute Vector,Field_Write
0766 781b |x | Jump 0x782
0767 e004 | | Load 0x0,0x4
0768 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0769 4801 |H | Short_Literal 0x1
076a 4802 |H | Short_Literal 0x2
076b e00f | | Load 0x0,0xf
076c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
076d 035b | [ | Declare_Type Array,Constrained
076e 0337 | 7 | Declare_Variable Array
076f 00da | | Load_Top At_Offset_2
0770 e5ff | | Load 0x2,-0x1
0771 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0772 01d7 | | Execute Vector,Field_Read
0773 e002 | | Load 0x0,0x2
0774 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0775 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0776 4801 |H | Short_Literal 0x1
0777 00da | | Load_Top At_Offset_2
0778 01d6 | | Execute Vector,Field_Write
0779 e5fe | | Load 0x2,-0x2
077a 8220 | | Call 0x1,0x20
077b 4802 |H | Short_Literal 0x2
077c 00da | | Load_Top At_Offset_2
077d 01d6 | | Execute Vector,Field_Write
077e 6025 |`% | Indirect_Literal Discrete,0x7a4,{0x00000000, 0x00003004}
077f e004 | | Load 0x0,0x4
0780 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0781 c405 | | Store 0x2,0x5
0782 00c8 | | Action Pop_Auxiliary_Range
0783 3fcf |? | Loop_Increasing 0x753
0784 00ce | | Action Pop_Auxiliary
0785 00d9 | | Load_Top At_Offset_1
0786 e002 | | Load 0x0,0x2
0787 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0788 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0789 1c08 | | Execute_Immediate Run_Utility,0x8
078a 00d9 | | Load_Top At_Offset_1
078b 00d9 | | Load_Top At_Offset_1
078c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
078d 4801 |H | Short_Literal 0x1
078e 00db | | Load_Top At_Offset_3
078f e402 | | Load 0x2,0x2
0790 01cf | | Execute Vector,Slice_Read
0791 00d9 | | Load_Top At_Offset_1
0792 00d8 | | Load_Top At_Offset_0
0793 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0794 00da | | Load_Top At_Offset_2
0795 01da | | Execute Vector,Bounds
0796 00da | | Load_Top At_Offset_2
0797 01da | | Execute Vector,Bounds
0798 00da | | Load_Top At_Offset_2
0799 027f | | Execute Discrete,Equal
079a 7001 |p | Jump_Nonzero 0x79c
079b 08e0 | | Execute_Immediate Raise,0xe0
079c 00cd | | Action Spare6_Action
079d 027f | | Execute Discrete,Equal
079e 7001 |p | Jump_Nonzero 0x7a0
079f 08e0 | | Execute_Immediate Raise,0xe0
07a0 00d2 | | Pop_Control Pop_Count_2
07a1 00d9 | | Load_Top At_Offset_1
07a2 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
07a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07a4 0000 0000 | | .LITERAL {0x00000000, 0x00003004}
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab | | .CONST 0x07ab ; Address of begin
07a9 0004 | | .CONST 0x0004 ; Address of exception handler
07aa 0001 | | .CONST 0x0001 ; Number of locals
07ab BODY_07a8:
07ab INIT_07a8:
07ab 4608 |F | Jump_Case 0x9
07ac 7808 |x | Jump 0x7b5 ; case 0x0
07ad 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
07ae 7813 |x | Jump 0x7c2 ; case 0x2
07af 7812 |x | Jump 0x7c2 ; case 0x3
07b0 7811 |x | Jump 0x7c2 ; case 0x4
07b1 7810 |x | Jump 0x7c2 ; case 0x5
07b2 780f |x | Jump 0x7c2 ; case 0x6
07b3 780e |x | Jump 0x7c2 ; case 0x7
07b4 780d |x | Jump 0x7c2 ; case 0x8
07b5 00da | | Load_Top At_Offset_2
07b6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
07b7 0125 | % | Execute Any,Set_Constraint
07b8 00da | | Load_Top At_Offset_2
07b9 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
07ba 1c00 | | Execute_Immediate Run_Utility,0x0
07bb 00da | | Load_Top At_Offset_2
07bc 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
07bd 0125 | % | Execute Any,Set_Constraint
07be 00da | | Load_Top At_Offset_2
07bf 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
07c0 1c00 | | Execute_Immediate Run_Utility,0x0
07c1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
07c2 0869 | i | Execute_Immediate Raise,0x69
07c3 0000 0000 | | .BLANK 0000[0x5]
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07cb | | .CONST 0x07cb ; Address of begin
07c9 0004 | | .CONST 0x0004 ; Address of exception handler
07ca 0001 | | .CONST 0x0001 ; Number of locals
07cb BODY_07c8:
07cb INIT_07c8:
07cb 4608 |F | Jump_Case 0x9
07cc 7808 |x | Jump 0x7d5 ; case 0x0
07cd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
07ce 780d |x | Jump 0x7dc ; case 0x2
07cf 780c |x | Jump 0x7dc ; case 0x3
07d0 780b |x | Jump 0x7dc ; case 0x4
07d1 780a |x | Jump 0x7dc ; case 0x5
07d2 7809 |x | Jump 0x7dc ; case 0x6
07d3 7808 |x | Jump 0x7dc ; case 0x7
07d4 7807 |x | Jump 0x7dc ; case 0x8
07d5 00da | | Load_Top At_Offset_2
07d6 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
07d7 0125 | % | Execute Any,Set_Constraint
07d8 00da | | Load_Top At_Offset_2
07d9 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
07da 1c00 | | Execute_Immediate Run_Utility,0x0
07db 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
07dc 0869 | i | Execute_Immediate Raise,0x69
07dd 0000 0000 | | .XXX[0x3]
07df 0000 | |
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 07e3 | | .CONST 0x07e3 ; Address of begin
07e1 0004 | | .CONST 0x0004 ; Address of exception handler
07e2 0001 | | .CONST 0x0001 ; Number of locals
07e3 BODY_07e0:
07e3 INIT_07e0:
07e3 00da | | Load_Top At_Offset_2
07e4 e002 | | Load 0x0,0x2
07e5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07e6 181f | | Execute Package,Field_Execute,Field_Number 0x1f
07e7 e5fe | | Load 0x2,-0x2
07e8 e002 | | Load 0x0,0x2
07e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07ea 181f | | Execute Package,Field_Execute,Field_Number 0x1f
07eb 027c | | | Execute Discrete,Less
07ec 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07ed 0000 0000 | | .XXX[0x3]
07ef 0000 | |
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3 | | .CONST 0x07f3 ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0001 | | .CONST 0x0001 ; Number of locals
07f3 BODY_07f0:
07f3 INIT_07f0:
07f3 e01e | | Load 0x0,0x1e
07f4 180e | | Execute Package,Field_Execute,Field_Number 0xe
07f5 00db | | Load_Top At_Offset_3
07f6 4801 |H | Short_Literal 0x1
07f7 6004 |` | Indirect_Literal Discrete,0x7fc,{0x00000000, 0x00005802}
07f8 e004 | | Load 0x0,0x4
07f9 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
07fa 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07fb 0000 | | .XXX[0x1]
07fc 0000 0000 | | .LITERAL {0x00000000, 0x00005802}
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 080b | | .CONST 0x080b ; Address of begin
0801 0004 | | .CONST 0x0004 ; Address of exception handler
0802 0003 | | .CONST 0x0003 ; Number of locals
0803 INIT_0800:
0803 e003 | | Load 0x0,0x3
0804 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0805 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0806 02c7 | | Declare_Variable Any
0807 00d8 | | Load_Top At_Offset_0
0808 1c00 | | Execute_Immediate Run_Utility,0x0
0809 e003 | | Load 0x0,0x3
080a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
080b BODY_0800:
080b e003 | | Load 0x0,0x3
080c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
080d 00da | | Load_Top At_Offset_2
080e 0120 | | Execute Any,Is_Value
080f 6804 |h | Jump_Zero 0x814
0810 e003 | | Load 0x0,0x3
0811 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0812 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0813 7801 |x | Jump 0x815
0814 00da | | Load_Top At_Offset_2
0815 e5ff | | Load 0x2,-0x1
0816 e003 | | Load 0x0,0x3
0817 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0818 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0819 c402 | | Store 0x2,0x2
081a 0059 | Y | Store_Top Discrete,At_Offset_1
081b 00d9 | | Load_Top At_Offset_1
081c e003 | | Load 0x0,0x3
081d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
081e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
081f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 082a | * | .CONST 0x082a ; Address of begin
0821 0004 | | .CONST 0x0004 ; Address of exception handler
0822 0003 | | .CONST 0x0003 ; Number of locals
0823 INIT_0820:
0823 e003 | | Load 0x0,0x3
0824 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0825 02c7 | | Declare_Variable Any
0826 00d8 | | Load_Top At_Offset_0
0827 1c00 | | Execute_Immediate Run_Utility,0x0
0828 e003 | | Load 0x0,0x3
0829 1b0d | | Execute Package,Field_Read,Field_Number 0xd
082a BODY_0820:
082a e003 | | Load 0x0,0x3
082b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
082c 00da | | Load_Top At_Offset_2
082d 0120 | | Execute Any,Is_Value
082e 6803 |h | Jump_Zero 0x832
082f e003 | | Load 0x0,0x3
0830 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0831 7801 |x | Jump 0x833
0832 00da | | Load_Top At_Offset_2
0833 e5ff | | Load 0x2,-0x1
0834 e003 | | Load 0x0,0x3
0835 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0836 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0837 c402 | | Store 0x2,0x2
0838 0059 | Y | Store_Top Discrete,At_Offset_1
0839 00d9 | | Load_Top At_Offset_1
083a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
083b 0000 0000 | | .BLANK 0000[0x5]
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 0843 | C | .CONST 0x0843 ; Address of begin
0841 0004 | | .CONST 0x0004 ; Address of exception handler
0842 0001 | | .CONST 0x0001 ; Number of locals
0843 BODY_0840:
0843 INIT_0840:
0843 00da | | Load_Top At_Offset_2
0844 e002 | | Load 0x0,0x2
0845 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0846 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0847 0f02 | | Execute_Immediate Equal,0x2
0848 682c |h, | Jump_Zero 0x875
0849 00db | | Load_Top At_Offset_3
084a 0217 | | Execute Heap_Access,All_Reference
084b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
084c 0e02 | | Execute_Immediate Not_Equal,0x2
084d 6826 |h& | Jump_Zero 0x874
084e 00db | | Load_Top At_Offset_3
084f 0217 | | Execute Heap_Access,All_Reference
0850 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0851 7005 |p | Jump_Nonzero 0x857
0852 4802 |H | Short_Literal 0x2
0853 e5fe | | Load 0x2,-0x2
0854 0217 | | Execute Heap_Access,All_Reference
0855 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0856 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0857 4801 |H | Short_Literal 0x1
0858 4802 |H | Short_Literal 0x2
0859 e00f | | Load 0x0,0xf
085a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
085b 035b | [ | Declare_Type Array,Constrained
085c 0337 | 7 | Declare_Variable Array
085d e5fe | | Load 0x2,-0x2
085e 8220 | | Call 0x1,0x20
085f 4801 |H | Short_Literal 0x1
0860 00da | | Load_Top At_Offset_2
0861 01d6 | | Execute Vector,Field_Write
0862 00db | | Load_Top At_Offset_3
0863 e002 | | Load 0x0,0x2
0864 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0865 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0866 4802 |H | Short_Literal 0x2
0867 00da | | Load_Top At_Offset_2
0868 01d6 | | Execute Vector,Field_Write
0869 603a |`: | Indirect_Literal Discrete,0x8a4,{0x00000000, 0x00003005}
086a e004 | | Load 0x0,0x4
086b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
086c e5fe | | Load 0x2,-0x2
086d 0217 | | Execute Heap_Access,All_Reference
086e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
086f 00db | | Load_Top At_Offset_3
0870 0217 | | Execute Heap_Access,All_Reference
0871 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0872 e004 | | Load 0x0,0x4
0873 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0874 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0875 00db | | Load_Top At_Offset_3
0876 0217 | | Execute Heap_Access,All_Reference
0877 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0878 0e01 | | Execute_Immediate Not_Equal,0x1
0879 6826 |h& | Jump_Zero 0x8a0
087a 00db | | Load_Top At_Offset_3
087b 0217 | | Execute Heap_Access,All_Reference
087c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
087d 7005 |p | Jump_Nonzero 0x883
087e 4801 |H | Short_Literal 0x1
087f e5fe | | Load 0x2,-0x2
0880 0217 | | Execute Heap_Access,All_Reference
0881 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0882 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0883 4801 |H | Short_Literal 0x1
0884 4802 |H | Short_Literal 0x2
0885 e00f | | Load 0x0,0xf
0886 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0887 035b | [ | Declare_Type Array,Constrained
0888 0337 | 7 | Declare_Variable Array
0889 e5fe | | Load 0x2,-0x2
088a 8220 | | Call 0x1,0x20
088b 4801 |H | Short_Literal 0x1
088c 00da | | Load_Top At_Offset_2
088d 01d6 | | Execute Vector,Field_Write
088e 00db | | Load_Top At_Offset_3
088f e002 | | Load 0x0,0x2
0890 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0891 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0892 4802 |H | Short_Literal 0x2
0893 00da | | Load_Top At_Offset_2
0894 01d6 | | Execute Vector,Field_Write
0895 600e |` | Indirect_Literal Discrete,0x8a4,{0x00000000, 0x00003005}
0896 e004 | | Load 0x0,0x4
0897 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0898 e5fe | | Load 0x2,-0x2
0899 0217 | | Execute Heap_Access,All_Reference
089a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
089b 00db | | Load_Top At_Offset_3
089c 0217 | | Execute Heap_Access,All_Reference
089d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
089e e004 | | Load 0x0,0x4
089f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
08a0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
08a1 0000 0000 | | .XXX[0x3]
08a3 0000 | |
08a4 0000 0000 | | .LITERAL {0x00000000, 0x00003005}
08a8 ; --------------------------------------------------------------------------------------
08a8 ; SUBPROGRAM
08a8 ; --------------------------------------------------------------------------------------
08a8 08ad | | .CONST 0x08ad ; Address of begin
08a9 0004 | | .CONST 0x0004 ; Address of exception handler
08aa 0002 | | .CONST 0x0002 ; Number of locals
08ab INIT_08a8:
08ab e23e | > | Load 0x1,0x3e
08ac 0007 | | Action Break_Optional
08ad BODY_08a8:
08ad e5fe | | Load 0x2,-0x2
08ae 6816 |h | Jump_Zero 0x8c5
08af e5fe | | Load 0x2,-0x2
08b0 0217 | | Execute Heap_Access,All_Reference
08b1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
08b2 0031 | 1 | Store_Top Heap_Access,At_Offset_1
08b3 00cf | | Action Mark_Auxiliary
08b4 780d |x | Jump 0x8c2
08b5 e5ff | | Load 0x2,-0x1
08b6 00da | | Load_Top At_Offset_2
08b7 0217 | | Execute Heap_Access,All_Reference
08b8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
08b9 012f | / | Execute Any,Equal
08ba 6802 |h | Jump_Zero 0x8bd
08bb 00d9 | | Load_Top At_Offset_1
08bc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08bd 00d9 | | Load_Top At_Offset_1
08be 0217 | | Execute Heap_Access,All_Reference
08bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
08c0 0032 | 2 | Store_Top Heap_Access,At_Offset_2
08c1 00c9 | | Action Pop_Auxiliary_Loop
08c2 00d9 | | Load_Top At_Offset_1
08c3 77f1 |w | Jump_Nonzero 0x8b5
08c4 00ce | | Action Pop_Auxiliary
08c5 4801 |H | Short_Literal 0x1
08c6 4802 |H | Short_Literal 0x2
08c7 e00f | | Load 0x0,0xf
08c8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08c9 035b | [ | Declare_Type Array,Constrained
08ca 0337 | 7 | Declare_Variable Array
08cb e5ff | | Load 0x2,-0x1
08cc e00f | | Load 0x0,0xf
08cd 181a | | Execute Package,Field_Execute,Field_Number 0x1a
08ce 4801 |H | Short_Literal 0x1
08cf 00da | | Load_Top At_Offset_2
08d0 01d6 | | Execute Vector,Field_Write
08d1 e5fe | | Load 0x2,-0x2
08d2 8220 | | Call 0x1,0x20
08d3 4802 |H | Short_Literal 0x2
08d4 00da | | Load_Top At_Offset_2
08d5 01d6 | | Execute Vector,Field_Write
08d6 600d |` | Indirect_Literal Discrete,0x8e4,{0x00000000, 0x00003007}
08d7 e004 | | Load 0x0,0x4
08d8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08d9 e5fe | | Load 0x2,-0x2
08da 0217 | | Execute Heap_Access,All_Reference
08db 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
08dc e5fe | | Load 0x2,-0x2
08dd 0217 | | Execute Heap_Access,All_Reference
08de 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
08df e004 | | Load 0x0,0x4
08e0 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
08e1 e23e | > | Load 0x1,0x3e
08e2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08e3 0000 | | .XXX[0x1]
08e4 0000 0000 | | .LITERAL {0x00000000, 0x00003007}
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08ed | | .CONST 0x08ed ; Address of begin
08e9 0004 | | .CONST 0x0004 ; Address of exception handler
08ea 0002 | | .CONST 0x0002 ; Number of locals
08eb INIT_08e8:
08eb e23e | > | Load 0x1,0x3e
08ec 0007 | | Action Break_Optional
08ed BODY_08e8:
08ed e5fe | | Load 0x2,-0x2
08ee 6816 |h | Jump_Zero 0x905
08ef e5fe | | Load 0x2,-0x2
08f0 0217 | | Execute Heap_Access,All_Reference
08f1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
08f2 0031 | 1 | Store_Top Heap_Access,At_Offset_1
08f3 00cf | | Action Mark_Auxiliary
08f4 780d |x | Jump 0x902
08f5 e5ff | | Load 0x2,-0x1
08f6 00da | | Load_Top At_Offset_2
08f7 0217 | | Execute Heap_Access,All_Reference
08f8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
08f9 021f | | Execute Heap_Access,Equal
08fa 6802 |h | Jump_Zero 0x8fd
08fb 00d9 | | Load_Top At_Offset_1
08fc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08fd 00d9 | | Load_Top At_Offset_1
08fe 0217 | | Execute Heap_Access,All_Reference
08ff 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0900 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0901 00c9 | | Action Pop_Auxiliary_Loop
0902 00d9 | | Load_Top At_Offset_1
0903 77f1 |w | Jump_Nonzero 0x8f5
0904 00ce | | Action Pop_Auxiliary
0905 4801 |H | Short_Literal 0x1
0906 4802 |H | Short_Literal 0x2
0907 e00f | | Load 0x0,0xf
0908 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0909 035b | [ | Declare_Type Array,Constrained
090a 0337 | 7 | Declare_Variable Array
090b e5ff | | Load 0x2,-0x1
090c e002 | | Load 0x0,0x2
090d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
090e 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
090f 4801 |H | Short_Literal 0x1
0910 00da | | Load_Top At_Offset_2
0911 01d6 | | Execute Vector,Field_Write
0912 e5fe | | Load 0x2,-0x2
0913 8220 | | Call 0x1,0x20
0914 4802 |H | Short_Literal 0x2
0915 00da | | Load_Top At_Offset_2
0916 01d6 | | Execute Vector,Field_Write
0917 67cc |g | Indirect_Literal Discrete,0x8e4,{0x00000000, 0x00003007}
0918 e004 | | Load 0x0,0x4
0919 1813 | | Execute Package,Field_Execute,Field_Number 0x13
091a e5fe | | Load 0x2,-0x2
091b 0217 | | Execute Heap_Access,All_Reference
091c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
091d e5fe | | Load 0x2,-0x2
091e 0217 | | Execute Heap_Access,All_Reference
091f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0920 e004 | | Load 0x0,0x4
0921 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0922 e23e | > | Load 0x1,0x3e
0923 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0924 0000 0000 | | .BLANK 0000[0x4]
0928 ; --------------------------------------------------------------------------------------
0928 ; SUBPROGRAM
0928 ; --------------------------------------------------------------------------------------
0928 093f | ? | .CONST 0x093f ; Address of begin
0929 0004 | | .CONST 0x0004 ; Address of exception handler
092a 0006 | | .CONST 0x0006 ; Number of locals
092b INIT_0928:
092b e5fd | | Load 0x2,-0x3
092c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
092d e002 | | Load 0x0,0x2
092e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
092f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0930 1c08 | | Execute_Immediate Run_Utility,0x8
0931 e5fd | | Load 0x2,-0x3
0932 00d9 | | Load_Top At_Offset_1
0933 016d | m | Execute Variant_Record,Structure_Write
0934 e5fe | | Load 0x2,-0x2
0935 0217 | | Execute Heap_Access,All_Reference
0936 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0937 0007 | | Action Break_Optional
0938 e23c | < | Load 0x1,0x3c
0939 0007 | | Action Break_Optional
093a e002 | | Load 0x0,0x2
093b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
093c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
093d 00e2 | | Load_Encached Integer_Cache
093e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
093f BODY_0928:
093f 00d8 | | Load_Top At_Offset_0
0940 e402 | | Load 0x2,0x2
0941 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0942 e241 | A | Load 0x1,0x41
0943 e242 | B | Load 0x1,0x42
0944 e243 | C | Load 0x1,0x43
0945 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
0946 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
0947 8007 | | Call 0x0,0x7
0948 00d1 | | Pop_Control Pop_Count_1
0949 0059 | Y | Store_Top Discrete,At_Offset_1
094a 00cf | | Action Mark_Auxiliary
094b e402 | | Load 0x2,0x2
094c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
094d 01d9 | | Execute Vector,Reverse_Bounds
094e 0263 | c | Execute Discrete,Above_Bound
094f 704d |pM | Jump_Nonzero 0x99d
0950 00d8 | | Load_Top At_Offset_0
0951 e402 | | Load 0x2,0x2
0952 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0953 01d7 | | Execute Vector,Field_Read
0954 a405 | | Store_Unchecked 0x2,0x5
0955 00cf | | Action Mark_Auxiliary
0956 7807 |x | Jump 0x95e
0957 e403 | | Load 0x2,0x3
0958 a404 | | Store_Unchecked 0x2,0x4
0959 e403 | | Load 0x2,0x3
095a 0217 | | Execute Heap_Access,All_Reference
095b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
095c a403 | | Store_Unchecked 0x2,0x3
095d 00c9 | | Action Pop_Auxiliary_Loop
095e e403 | | Load 0x2,0x3
095f 6806 |h | Jump_Zero 0x966
0960 e405 | | Load 0x2,0x5
0961 e403 | | Load 0x2,0x3
0962 0217 | | Execute Heap_Access,All_Reference
0963 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0964 823f | ? | Call 0x1,0x3f
0965 77f1 |w | Jump_Nonzero 0x957
0966 00ce | | Action Pop_Auxiliary
0967 e403 | | Load 0x2,0x3
0968 6806 |h | Jump_Zero 0x96f
0969 e405 | | Load 0x2,0x5
096a e403 | | Load 0x2,0x3
096b 0217 | | Execute Heap_Access,All_Reference
096c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
096d 021e | | Execute Heap_Access,Maximum
096e 682c |h, | Jump_Zero 0x99b
096f e23b | ; | Load 0x1,0x3b
0970 0322 | " | Declare_Variable Record
0971 e405 | | Load 0x2,0x5
0972 00d9 | | Load_Top At_Offset_1
0973 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0974 e403 | | Load 0x2,0x3
0975 00d9 | | Load_Top At_Offset_1
0976 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0977 e23c | < | Load 0x1,0x3c
0978 e018 | | Load 0x0,0x18
0979 180d | | Execute Package,Field_Execute,Field_Number 0xd
097a 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
097b a403 | | Store_Unchecked 0x2,0x3
097c e404 | | Load 0x2,0x4
097d 7007 |p | Jump_Nonzero 0x985
097e e403 | | Load 0x2,0x3
097f e5fe | | Load 0x2,-0x2
0980 0217 | | Execute Heap_Access,All_Reference
0981 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0982 e403 | | Load 0x2,0x3
0983 a404 | | Store_Unchecked 0x2,0x4
0984 7808 |x | Jump 0x98d
0985 e403 | | Load 0x2,0x3
0986 e404 | | Load 0x2,0x4
0987 0217 | | Execute Heap_Access,All_Reference
0988 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0989 e404 | | Load 0x2,0x4
098a 0217 | | Execute Heap_Access,All_Reference
098b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
098c a404 | | Store_Unchecked 0x2,0x4
098d e5fe | | Load 0x2,-0x2
098e 0217 | | Execute Heap_Access,All_Reference
098f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0990 0a01 | | Execute_Immediate Plus,0x1
0991 e5fe | | Load 0x2,-0x2
0992 0217 | | Execute Heap_Access,All_Reference
0993 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0994 e5ff | | Load 0x2,-0x1
0995 0217 | | Execute Heap_Access,All_Reference
0996 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0997 0a01 | | Execute_Immediate Plus,0x1
0998 e5ff | | Load 0x2,-0x1
0999 0217 | | Execute Heap_Access,All_Reference
099a 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
099b 00c8 | | Action Pop_Auxiliary_Range
099c 3fb3 |? | Loop_Increasing 0x950
099d 00ce | | Action Pop_Auxiliary
099e 0092 0d47 | G| Action Push_String_Extended,0xd47 ; "Activated"
09a0 e5fd | | Load 0x2,-0x3
09a1 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09a2 00e0 | | Load_Encached Standard_Cache
09a3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
09a4 01cc | | Execute Vector,Catenate
09a5 0092 0d48 | H| Action Push_String_Extended,0xd48 ; " units."
09a7 01cc | | Execute Vector,Catenate
09a8 8240 | @ | Call 0x1,0x40
09a9 e5fc | | Load 0x2,-0x4
09aa 682b |h+ | Jump_Zero 0x9d6
09ab e5ff | | Load 0x2,-0x1
09ac 0217 | | Execute Heap_Access,All_Reference
09ad 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09ae 0f01 | | Execute_Immediate Equal,0x1
09af 680f |h | Jump_Zero 0x9bf
09b0 e5ff | | Load 0x2,-0x1
09b1 0219 | | Execute Heap_Access,All_Read
09b2 00d8 | | Load_Top At_Offset_0
09b3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09b4 e5fc | | Load 0x2,-0x4
09b5 e5ff | | Load 0x2,-0x1
09b6 8237 | 7 | Call 0x1,0x37
09b7 e402 | | Load 0x2,0x2
09b8 e002 | | Load 0x0,0x2
09b9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09ba 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
09bb 00d9 | | Load_Top At_Offset_1
09bc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09bd 00d1 | | Pop_Control Pop_Count_1
09be 4505 |E | Exit_Suprogram New_Top_Offset 0x5
09bf 4801 |H | Short_Literal 0x1
09c0 4802 |H | Short_Literal 0x2
09c1 e00f | | Load 0x0,0xf
09c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09c3 035b | [ | Declare_Type Array,Constrained
09c4 0337 | 7 | Declare_Variable Array
09c5 e5fe | | Load 0x2,-0x2
09c6 0217 | | Execute Heap_Access,All_Reference
09c7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09c8 e002 | | Load 0x0,0x2
09c9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
09ca 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
09cb 4801 |H | Short_Literal 0x1
09cc 00da | | Load_Top At_Offset_2
09cd 01d6 | | Execute Vector,Field_Write
09ce e5ff | | Load 0x2,-0x1
09cf 8220 | | Call 0x1,0x20
09d0 4802 |H | Short_Literal 0x2
09d1 00da | | Load_Top At_Offset_2
09d2 01d6 | | Execute Vector,Field_Write
09d3 6004 |` | Indirect_Literal Discrete,0x9d8,{0x00000000, 0x0000300a}
09d4 e004 | | Load 0x0,0x4
09d5 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
09d6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
09d7 0000 | | .XXX[0x1]
09d8 0000 0000 | | .LITERAL {0x00000000, 0x0000300a}
09dc 0000 0000 | | .BLANK 0000[0x4]
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3 | | .CONST 0x09e3 ; Address of begin
09e1 0004 | | .CONST 0x0004 ; Address of exception handler
09e2 0001 | | .CONST 0x0001 ; Number of locals
09e3 BODY_09e0:
09e3 INIT_09e0:
09e3 e5fb | | Load 0x2,-0x5
09e4 6837 |h7 | Jump_Zero 0xa1c
09e5 00da | | Load_Top At_Offset_2
09e6 0217 | | Execute Heap_Access,All_Reference
09e7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09e8 0f01 | | Execute_Immediate Equal,0x1
09e9 680f |h | Jump_Zero 0x9f9
09ea 4800 |H | Short_Literal 0x0
09eb e5fc | | Load 0x2,-0x4
09ec e5ff | | Load 0x2,-0x1
09ed 8237 | 7 | Call 0x1,0x37
09ee e5fe | | Load 0x2,-0x2
09ef 0217 | | Execute Heap_Access,All_Reference
09f0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09f1 e5fd | | Load 0x2,-0x3
09f2 e002 | | Load 0x0,0x2
09f3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
09f4 1890 | | Execute Package,Field_Execute,Field_Number 0x90
09f5 e5fe | | Load 0x2,-0x2
09f6 e5ff | | Load 0x2,-0x1
09f7 824d | M | Call 0x1,0x4d
09f8 4506 |E | Exit_Suprogram New_Top_Offset 0x6
09f9 4801 |H | Short_Literal 0x1
09fa 4802 |H | Short_Literal 0x2
09fb e00f | | Load 0x0,0xf
09fc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09fd 035b | [ | Declare_Type Array,Constrained
09fe 0337 | 7 | Declare_Variable Array
09ff e5fe | | Load 0x2,-0x2
0a00 0217 | | Execute Heap_Access,All_Reference
0a01 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a02 e002 | | Load 0x0,0x2
0a03 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a04 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0a05 4801 |H | Short_Literal 0x1
0a06 00da | | Load_Top At_Offset_2
0a07 01d6 | | Execute Vector,Field_Write
0a08 00db | | Load_Top At_Offset_3
0a09 8220 | | Call 0x1,0x20
0a0a 4802 |H | Short_Literal 0x2
0a0b 00da | | Load_Top At_Offset_2
0a0c 01d6 | | Execute Vector,Field_Write
0a0d 601a |` | Indirect_Literal Discrete,0xa28,{0x00000000, 0x0000300b}
0a0e e004 | | Load 0x0,0x4
0a0f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0a10 4800 |H | Short_Literal 0x0
0a11 e5fe | | Load 0x2,-0x2
0a12 0217 | | Execute Heap_Access,All_Reference
0a13 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a14 e5fd | | Load 0x2,-0x3
0a15 e002 | | Load 0x0,0x2
0a16 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a17 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0a18 e5fe | | Load 0x2,-0x2
0a19 e5ff | | Load 0x2,-0x1
0a1a 824d | M | Call 0x1,0x4d
0a1b 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0a1c e5fc | | Load 0x2,-0x4
0a1d e5fe | | Load 0x2,-0x2
0a1e 0217 | | Execute Heap_Access,All_Reference
0a1f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a20 e5fd | | Load 0x2,-0x3
0a21 e002 | | Load 0x0,0x2
0a22 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a23 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0a24 e5fe | | Load 0x2,-0x2
0a25 e5ff | | Load 0x2,-0x1
0a26 824d | M | Call 0x1,0x4d
0a27 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0a28 0000 0000 | | .LITERAL {0x00000000, 0x0000300b}
0a2c 0000 0000 | | .BLANK 0000[0x4]
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a47 | G | .CONST 0x0a47 ; Address of begin
0a31 0004 | | .CONST 0x0004 ; Address of exception handler
0a32 0006 | | .CONST 0x0006 ; Number of locals
0a33 INIT_0a30:
0a33 e5fd | | Load 0x2,-0x3
0a34 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a35 e002 | | Load 0x0,0x2
0a36 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a37 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a38 1c08 | | Execute_Immediate Run_Utility,0x8
0a39 e5fd | | Load 0x2,-0x3
0a3a 00d9 | | Load_Top At_Offset_1
0a3b 016d | m | Execute Variant_Record,Structure_Write
0a3c e5fe | | Load 0x2,-0x2
0a3d 0217 | | Execute Heap_Access,All_Reference
0a3e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a3f 0007 | | Action Break_Optional
0a40 e23c | < | Load 0x1,0x3c
0a41 0007 | | Action Break_Optional
0a42 e002 | | Load 0x0,0x2
0a43 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a44 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a45 00e2 | | Load_Encached Integer_Cache
0a46 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a47 BODY_0a30:
0a47 00d8 | | Load_Top At_Offset_0
0a48 e402 | | Load 0x2,0x2
0a49 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a4a e241 | A | Load 0x1,0x41
0a4b e242 | B | Load 0x1,0x42
0a4c e243 | C | Load 0x1,0x43
0a4d 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
0a4e 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
0a4f 8007 | | Call 0x0,0x7
0a50 00d1 | | Pop_Control Pop_Count_1
0a51 0059 | Y | Store_Top Discrete,At_Offset_1
0a52 00cf | | Action Mark_Auxiliary
0a53 e402 | | Load 0x2,0x2
0a54 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a55 01d9 | | Execute Vector,Reverse_Bounds
0a56 0263 | c | Execute Discrete,Above_Bound
0a57 7041 |pA | Jump_Nonzero 0xa99
0a58 00d8 | | Load_Top At_Offset_0
0a59 e402 | | Load 0x2,0x2
0a5a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a5b 01d7 | | Execute Vector,Field_Read
0a5c a405 | | Store_Unchecked 0x2,0x5
0a5d 00cf | | Action Mark_Auxiliary
0a5e e403 | | Load 0x2,0x3
0a5f 7001 |p | Jump_Nonzero 0xa61
0a60 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0a61 e405 | | Load 0x2,0x5
0a62 e403 | | Load 0x2,0x3
0a63 0217 | | Execute Heap_Access,All_Reference
0a64 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a65 823f | ? | Call 0x1,0x3f
0a66 6808 |h | Jump_Zero 0xa6f
0a67 e403 | | Load 0x2,0x3
0a68 a404 | | Store_Unchecked 0x2,0x4
0a69 e403 | | Load 0x2,0x3
0a6a 0217 | | Execute Heap_Access,All_Reference
0a6b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a6c a403 | | Store_Unchecked 0x2,0x3
0a6d 00c9 | | Action Pop_Auxiliary_Loop
0a6e 7fef | | Jump 0xa5e
0a6f 00ce | | Action Pop_Auxiliary
0a70 e405 | | Load 0x2,0x5
0a71 e403 | | Load 0x2,0x3
0a72 0217 | | Execute Heap_Access,All_Reference
0a73 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a74 021f | | Execute Heap_Access,Equal
0a75 6821 |h! | Jump_Zero 0xa97
0a76 e404 | | Load 0x2,0x4
0a77 7007 |p | Jump_Nonzero 0xa7f
0a78 e403 | | Load 0x2,0x3
0a79 0217 | | Execute Heap_Access,All_Reference
0a7a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a7b e5fe | | Load 0x2,-0x2
0a7c 0217 | | Execute Heap_Access,All_Reference
0a7d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0a7e 7806 |x | Jump 0xa85
0a7f e403 | | Load 0x2,0x3
0a80 0217 | | Execute Heap_Access,All_Reference
0a81 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a82 e404 | | Load 0x2,0x4
0a83 0217 | | Execute Heap_Access,All_Reference
0a84 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0a85 e403 | | Load 0x2,0x3
0a86 0217 | | Execute Heap_Access,All_Reference
0a87 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a88 a403 | | Store_Unchecked 0x2,0x3
0a89 e5fe | | Load 0x2,-0x2
0a8a 0217 | | Execute Heap_Access,All_Reference
0a8b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a8c 0aff | | Execute_Immediate Plus,-0x1
0a8d e5fe | | Load 0x2,-0x2
0a8e 0217 | | Execute Heap_Access,All_Reference
0a8f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0a90 e5ff | | Load 0x2,-0x1
0a91 0217 | | Execute Heap_Access,All_Reference
0a92 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0a93 0aff | | Execute_Immediate Plus,-0x1
0a94 e5ff | | Load 0x2,-0x1
0a95 0217 | | Execute Heap_Access,All_Reference
0a96 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0a97 00c8 | | Action Pop_Auxiliary_Range
0a98 3fbf |? | Loop_Increasing 0xa58
0a99 00ce | | Action Pop_Auxiliary
0a9a 0092 0d49 | I| Action Push_String_Extended,0xd49 ; "Deactivated"
0a9c e5fd | | Load 0x2,-0x3
0a9d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a9e 00e0 | | Load_Encached Standard_Cache
0a9f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0aa0 01cc | | Execute Vector,Catenate
0aa1 0092 0d48 | H| Action Push_String_Extended,0xd48 ; " units."
0aa3 01cc | | Execute Vector,Catenate
0aa4 8240 | @ | Call 0x1,0x40
0aa5 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0aa6 0000 0000 | | .XXX[0x2]
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; SUBPROGRAM
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0aab | | .CONST 0x0aab ; Address of begin
0aa9 0004 | | .CONST 0x0004 ; Address of exception handler
0aaa 0001 | | .CONST 0x0001 ; Number of locals
0aab BODY_0aa8:
0aab INIT_0aa8:
0aab 00db | | Load_Top At_Offset_3
0aac e006 | | Load 0x0,0x6
0aad 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0aae 00d9 | | Load_Top At_Offset_1
0aaf 00d0 | | Action Swap_Control
0ab0 0260 | ` | Execute Discrete,In_Type
0ab1 7001 |p | Jump_Nonzero 0xab3
0ab2 0801 | | Execute_Immediate Raise,0x1
0ab3 00db | | Load_Top At_Offset_3
0ab4 e251 | Q | Load 0x1,0x51
0ab5 e252 | R | Load 0x1,0x52
0ab6 1d53 | S | Execute_Immediate Reference_Lex_1,0x53
0ab7 e00c | | Load 0x0,0xc
0ab8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0ab9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0aba 0000 0000 | | .BLANK 0000[0x6]
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; SUBPROGRAM
0ac0 ; --------------------------------------------------------------------------------------
0ac0 0ac3 | | .CONST 0x0ac3 ; Address of begin
0ac1 0004 | | .CONST 0x0004 ; Address of exception handler
0ac2 0001 | | .CONST 0x0001 ; Number of locals
0ac3 BODY_0ac0:
0ac3 INIT_0ac0:
0ac3 4800 |H | Short_Literal 0x0
0ac4 00db | | Load_Top At_Offset_3
0ac5 e004 | | Load 0x0,0x4
0ac6 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0ac7 6802 |h | Jump_Zero 0xaca
0ac8 00db | | Load_Top At_Offset_3
0ac9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0aca 4800 |H | Short_Literal 0x0
0acb e5fe | | Load 0x2,-0x2
0acc e004 | | Load 0x0,0x4
0acd 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0ace 6802 |h | Jump_Zero 0xad1
0acf 00da | | Load_Top At_Offset_2
0ad0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ad1 00da | | Load_Top At_Offset_2
0ad2 e004 | | Load 0x0,0x4
0ad3 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0ad4 6057 |`W | Indirect_Literal Discrete,0xb2c,{0x00000000, 0x00000801}
0ad5 027f | | Execute Discrete,Equal
0ad6 6825 |h% | Jump_Zero 0xafc
0ad7 00db | | Load_Top At_Offset_3
0ad8 e004 | | Load 0x0,0x4
0ad9 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0ada 6051 |`Q | Indirect_Literal Discrete,0xb2c,{0x00000000, 0x00000801}
0adb 027f | | Execute Discrete,Equal
0adc 680b |h | Jump_Zero 0xae8
0add 00da | | Load_Top At_Offset_2
0ade e004 | | Load 0x0,0x4
0adf 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0ae0 e5fe | | Load 0x2,-0x2
0ae1 e004 | | Load 0x0,0x4
0ae2 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0ae3 01cc | | Execute Vector,Catenate
0ae4 6047 |`G | Indirect_Literal Discrete,0xb2c,{0x00000000, 0x00000801}
0ae5 e004 | | Load 0x0,0x4
0ae6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ae7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ae8 00da | | Load_Top At_Offset_2
0ae9 e004 | | Load 0x0,0x4
0aea 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0aeb 4801 |H | Short_Literal 0x1
0aec 4801 |H | Short_Literal 0x1
0aed e00f | | Load 0x0,0xf
0aee 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0aef 035b | [ | Declare_Type Array,Constrained
0af0 0337 | 7 | Declare_Variable Array
0af1 e5fe | | Load 0x2,-0x2
0af2 e004 | | Load 0x0,0x4
0af3 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0af4 4801 |H | Short_Literal 0x1
0af5 00da | | Load_Top At_Offset_2
0af6 01d6 | | Execute Vector,Field_Write
0af7 01cc | | Execute Vector,Catenate
0af8 6033 |`3 | Indirect_Literal Discrete,0xb2c,{0x00000000, 0x00000801}
0af9 e004 | | Load 0x0,0x4
0afa 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0afb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0afc 00db | | Load_Top At_Offset_3
0afd e004 | | Load 0x0,0x4
0afe 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0aff 602c |`, | Indirect_Literal Discrete,0xb2c,{0x00000000, 0x00000801}
0b00 027f | | Execute Discrete,Equal
0b01 6814 |h | Jump_Zero 0xb16
0b02 4801 |H | Short_Literal 0x1
0b03 4801 |H | Short_Literal 0x1
0b04 e00f | | Load 0x0,0xf
0b05 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b06 035b | [ | Declare_Type Array,Constrained
0b07 0337 | 7 | Declare_Variable Array
0b08 00db | | Load_Top At_Offset_3
0b09 e004 | | Load 0x0,0x4
0b0a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0b0b 4801 |H | Short_Literal 0x1
0b0c 00da | | Load_Top At_Offset_2
0b0d 01d6 | | Execute Vector,Field_Write
0b0e e5fe | | Load 0x2,-0x2
0b0f e004 | | Load 0x0,0x4
0b10 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0b11 01cc | | Execute Vector,Catenate
0b12 6019 |` | Indirect_Literal Discrete,0xb2c,{0x00000000, 0x00000801}
0b13 e004 | | Load 0x0,0x4
0b14 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b15 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b16 4801 |H | Short_Literal 0x1
0b17 4802 |H | Short_Literal 0x2
0b18 e00f | | Load 0x0,0xf
0b19 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b1a 035b | [ | Declare_Type Array,Constrained
0b1b 0337 | 7 | Declare_Variable Array
0b1c 00db | | Load_Top At_Offset_3
0b1d e004 | | Load 0x0,0x4
0b1e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0b1f 4801 |H | Short_Literal 0x1
0b20 00da | | Load_Top At_Offset_2
0b21 01d6 | | Execute Vector,Field_Write
0b22 e5fe | | Load 0x2,-0x2
0b23 e004 | | Load 0x0,0x4
0b24 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0b25 4802 |H | Short_Literal 0x2
0b26 00da | | Load_Top At_Offset_2
0b27 01d6 | | Execute Vector,Field_Write
0b28 6003 |` | Indirect_Literal Discrete,0xb2c,{0x00000000, 0x00000801}
0b29 e004 | | Load 0x0,0x4
0b2a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b2b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b2c 0000 0000 | | .LITERAL {0x00000000, 0x00000801}
0b30 ; --------------------------------------------------------------------------------------
0b30 ; SUBPROGRAM
0b30 ; --------------------------------------------------------------------------------------
0b30 0b33 | 3 | .CONST 0x0b33 ; Address of begin
0b31 0004 | | .CONST 0x0004 ; Address of exception handler
0b32 0001 | | .CONST 0x0001 ; Number of locals
0b33 BODY_0b30:
0b33 INIT_0b30:
0b33 00da | | Load_Top At_Offset_2
0b34 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b35 7002 |p | Jump_Nonzero 0xb38
0b36 00db | | Load_Top At_Offset_3
0b37 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b38 00db | | Load_Top At_Offset_3
0b39 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b3a 7002 |p | Jump_Nonzero 0xb3d
0b3b 00da | | Load_Top At_Offset_2
0b3c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b3d 00da | | Load_Top At_Offset_2
0b3e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b3f e5fe | | Load 0x2,-0x2
0b40 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b41 0273 | s | Execute Discrete,Plus
0b42 e002 | | Load 0x0,0x2
0b43 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b44 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b45 1c08 | | Execute_Immediate Run_Utility,0x8
0b46 e5fe | | Load 0x2,-0x2
0b47 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b48 e5ff | | Load 0x2,-0x1
0b49 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b4a 8265 | e | Call 0x1,0x65
0b4b 00d9 | | Load_Top At_Offset_1
0b4c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0b4d 00db | | Load_Top At_Offset_3
0b4e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b4f e5fe | | Load 0x2,-0x2
0b50 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b51 01cc | | Execute Vector,Catenate
0b52 00d9 | | Load_Top At_Offset_1
0b53 00d8 | | Load_Top At_Offset_0
0b54 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b55 00da | | Load_Top At_Offset_2
0b56 01da | | Execute Vector,Bounds
0b57 00da | | Load_Top At_Offset_2
0b58 01da | | Execute Vector,Bounds
0b59 00da | | Load_Top At_Offset_2
0b5a 027f | | Execute Discrete,Equal
0b5b 7001 |p | Jump_Nonzero 0xb5d
0b5c 08e0 | | Execute_Immediate Raise,0xe0
0b5d 00cd | | Action Spare6_Action
0b5e 027f | | Execute Discrete,Equal
0b5f 7001 |p | Jump_Nonzero 0xb61
0b60 08e0 | | Execute_Immediate Raise,0xe0
0b61 00d2 | | Pop_Control Pop_Count_2
0b62 00d9 | | Load_Top At_Offset_1
0b63 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b64 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b65 0000 0000 | | .XXX[0x3]
0b67 0000 | |
0b68 ; --------------------------------------------------------------------------------------
0b68 ; SUBPROGRAM
0b68 ; --------------------------------------------------------------------------------------
0b68 0b6b | k | .CONST 0x0b6b ; Address of begin
0b69 0004 | | .CONST 0x0004 ; Address of exception handler
0b6a 0001 | | .CONST 0x0001 ; Number of locals
0b6b BODY_0b68:
0b6b INIT_0b68:
0b6b 00db | | Load_Top At_Offset_3
0b6c 7004 |p | Jump_Nonzero 0xb71
0b6d e002 | | Load 0x0,0x2
0b6e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b6f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b70 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b71 00db | | Load_Top At_Offset_3
0b72 0217 | | Execute Heap_Access,All_Reference
0b73 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b74 00db | | Load_Top At_Offset_3
0b75 8267 | g | Call 0x1,0x67
0b76 e5fe | | Load 0x2,-0x2
0b77 0217 | | Execute Heap_Access,All_Reference
0b78 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b79 e5ff | | Load 0x2,-0x1
0b7a e002 | | Load 0x0,0x2
0b7b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b7c 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0b7d 8266 | f | Call 0x1,0x66
0b7e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b7f 0000 | | .XXX[0x1]
0b80 ; --------------------------------------------------------------------------------------
0b80 ; SUBPROGRAM
0b80 ; --------------------------------------------------------------------------------------
0b80 0b8f | | .CONST 0x0b8f ; Address of begin
0b81 0bd6 | | .CONST 0x0bd6 ; Address of exception handler
0b82 0004 | | .CONST 0x0004 ; Number of locals
0b83 INIT_0b80:
0b83 e003 | | Load 0x0,0x3
0b84 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b85 02c7 | | Declare_Variable Any
0b86 00d8 | | Load_Top At_Offset_0
0b87 1c00 | | Execute_Immediate Run_Utility,0x0
0b88 e01d | | Load 0x0,0x1d
0b89 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0b8a 02c7 | | Declare_Variable Any
0b8b 00d8 | | Load_Top At_Offset_0
0b8c 1c00 | | Execute_Immediate Run_Utility,0x0
0b8d e003 | | Load 0x0,0x3
0b8e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b8f BODY_0b80:
0b8f 00be | | Action Activate_Tasks
0b90 e5fe | | Load 0x2,-0x2
0b91 6843 |hC | Jump_Zero 0xbd5
0b92 e5fe | | Load 0x2,-0x2
0b93 0217 | | Execute Heap_Access,All_Reference
0b94 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0b95 c402 | | Store 0x2,0x2
0b96 00da | | Load_Top At_Offset_2
0b97 e003 | | Load 0x0,0x3
0b98 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b99 6805 |h | Jump_Zero 0xb9f
0b9a e01e | | Load 0x0,0x1e
0b9b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b9c e01e | | Load 0x0,0x1e
0b9d 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0b9e c402 | | Store 0x2,0x2
0b9f e003 | | Load 0x0,0x3
0ba0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ba1 00da | | Load_Top At_Offset_2
0ba2 4800 |H | Short_Literal 0x0
0ba3 4800 |H | Short_Literal 0x0
0ba4 e01a | | Load 0x0,0x1a
0ba5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ba6 e402 | | Load 0x2,0x2
0ba7 e01d | | Load 0x0,0x1d
0ba8 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ba9 c403 | | Store 0x2,0x3
0baa 0059 | Y | Store_Top Discrete,At_Offset_1
0bab 00d8 | | Load_Top At_Offset_0
0bac 681c |h | Jump_Zero 0xbc9
0bad e003 | | Load 0x0,0x3
0bae 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0baf c5fd | | Store 0x2,-0x3
0bb0 e004 | | Load 0x0,0x4
0bb1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bb2 4801 |H | Short_Literal 0x1
0bb3 4802 |H | Short_Literal 0x2
0bb4 e00f | | Load 0x0,0xf
0bb5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bb6 035b | [ | Declare_Type Array,Constrained
0bb7 0337 | 7 | Declare_Variable Array
0bb8 e402 | | Load 0x2,0x2
0bb9 e00f | | Load 0x0,0xf
0bba 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0bbb 4801 |H | Short_Literal 0x1
0bbc 00da | | Load_Top At_Offset_2
0bbd 01d6 | | Execute Vector,Field_Write
0bbe 00da | | Load_Top At_Offset_2
0bbf e00f | | Load 0x0,0xf
0bc0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0bc1 4802 |H | Short_Literal 0x2
0bc2 00da | | Load_Top At_Offset_2
0bc3 01d6 | | Execute Vector,Field_Write
0bc4 603b |`; | Indirect_Literal Discrete,0xc00,{0x00000000, 0x00003003}
0bc5 e004 | | Load 0x0,0x4
0bc6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0bc7 c5fc | | Store 0x2,-0x4
0bc8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0bc9 00d9 | | Load_Top At_Offset_1
0bca e5ff | | Load 0x2,-0x1
0bcb e01d | | Load 0x0,0x1d
0bcc 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0bcd c5fd | | Store 0x2,-0x3
0bce e003 | | Load 0x0,0x3
0bcf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bd0 00da | | Load_Top At_Offset_2
0bd1 e01d | | Load 0x0,0x1d
0bd2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0bd3 c403 | | Store 0x2,0x3
0bd4 0059 | Y | Store_Top Discrete,At_Offset_1
0bd5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0bd6 TRAP_0b80:
0bd6 e01d | | Load 0x0,0x1d
0bd7 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0bd8 010f | | Execute Exception,Equal
0bd9 6820 |h | Jump_Zero 0xbfa
0bda e003 | | Load 0x0,0x3
0bdb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bdc 00db | | Load_Top At_Offset_3
0bdd e01d | | Load 0x0,0x1d
0bde 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0bdf c403 | | Store 0x2,0x3
0be0 005a | Z | Store_Top Discrete,At_Offset_2
0be1 e004 | | Load 0x0,0x4
0be2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0be3 4801 |H | Short_Literal 0x1
0be4 4802 |H | Short_Literal 0x2
0be5 e00f | | Load 0x0,0xf
0be6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0be7 035b | [ | Declare_Type Array,Constrained
0be8 0337 | 7 | Declare_Variable Array
0be9 e5ff | | Load 0x2,-0x1
0bea e00f | | Load 0x0,0xf
0beb 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0bec 4801 |H | Short_Literal 0x1
0bed 00da | | Load_Top At_Offset_2
0bee 01d6 | | Execute Vector,Field_Write
0bef e402 | | Load 0x2,0x2
0bf0 e00f | | Load 0x0,0xf
0bf1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0bf2 4802 |H | Short_Literal 0x2
0bf3 00da | | Load_Top At_Offset_2
0bf4 01d6 | | Execute Vector,Field_Write
0bf5 6006 |` | Indirect_Literal Discrete,0xbfc,{0x00000000, 0x00003009}
0bf6 e004 | | Load 0x0,0x4
0bf7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0bf8 c5fc | | Store 0x2,-0x4
0bf9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0bfa 0100 | | Execute Exception,Raise
0bfb 0000 | | .XXX[0x1]
0bfc 0000 0000 | | .LITERAL {0x00000000, 0x00003009}
0c00 0000 0000 | | .LITERAL {0x00000000, 0x00003003}
0c04 0000 0000 | | .BLANK 0000[0x4]
0c08 ; --------------------------------------------------------------------------------------
0c08 ; SUBPROGRAM
0c08 ; --------------------------------------------------------------------------------------
0c08 0c19 | | .CONST 0x0c19 ; Address of begin
0c09 0004 | | .CONST 0x0004 ; Address of exception handler
0c0a 0004 | | .CONST 0x0004 ; Number of locals
0c0b INIT_0c08:
0c0b e23e | > | Load 0x1,0x3e
0c0c 0007 | | Action Break_Optional
0c0d e003 | | Load 0x0,0x3
0c0e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c0f 02c7 | | Declare_Variable Any
0c10 00d8 | | Load_Top At_Offset_0
0c11 1c00 | | Execute_Immediate Run_Utility,0x0
0c12 e5ff | | Load 0x2,-0x1
0c13 e002 | | Load 0x0,0x2
0c14 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c15 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0c16 e003 | | Load 0x0,0x3
0c17 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c18 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0c19 BODY_0c08:
0c19 e5fe | | Load 0x2,-0x2
0c1a 6861 |ha | Jump_Zero 0xc7c
0c1b e5fe | | Load 0x2,-0x2
0c1c 0217 | | Execute Heap_Access,All_Reference
0c1d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0c1e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0c1f e002 | | Load 0x0,0x2
0c20 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c21 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c22 a5fd | | Store_Unchecked 0x2,-0x3
0c23 e5ff | | Load 0x2,-0x1
0c24 e002 | | Load 0x0,0x2
0c25 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c26 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0c27 c403 | | Store 0x2,0x3
0c28 00d9 | | Load_Top At_Offset_1
0c29 e003 | | Load 0x0,0x3
0c2a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c2b 6810 |h | Jump_Zero 0xc3c
0c2c e5fc | | Load 0x2,-0x4
0c2d 00da | | Load_Top At_Offset_2
0c2e 0120 | | Execute Any,Is_Value
0c2f 6803 |h | Jump_Zero 0xc33
0c30 e003 | | Load 0x0,0x3
0c31 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c32 7801 |x | Jump 0xc34
0c33 00da | | Load_Top At_Offset_2
0c34 e5fe | | Load 0x2,-0x2
0c35 e5ff | | Load 0x2,-0x1
0c36 e002 | | Load 0x0,0x2
0c37 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c38 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0c39 8268 | h | Call 0x1,0x68
0c3a c403 | | Store 0x2,0x3
0c3b c5fc | | Store 0x2,-0x4
0c3c 4800 |H | Short_Literal 0x0
0c3d e5fc | | Load 0x2,-0x4
0c3e e004 | | Load 0x0,0x4
0c3f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0c40 683b |h; | Jump_Zero 0xc7c
0c41 00cf | | Action Mark_Auxiliary
0c42 7810 |x | Jump 0xc53
0c43 00da | | Load_Top At_Offset_2
0c44 e402 | | Load 0x2,0x2
0c45 0217 | | Execute Heap_Access,All_Reference
0c46 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0c47 012f | / | Execute Any,Equal
0c48 6805 |h | Jump_Zero 0xc4e
0c49 00db | | Load_Top At_Offset_3
0c4a 0217 | | Execute Heap_Access,All_Reference
0c4b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c4c a5fd | | Store_Unchecked 0x2,-0x3
0c4d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c4e 00db | | Load_Top At_Offset_3
0c4f 0217 | | Execute Heap_Access,All_Reference
0c50 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c51 a402 | | Store_Unchecked 0x2,0x2
0c52 00c9 | | Action Pop_Auxiliary_Loop
0c53 00db | | Load_Top At_Offset_3
0c54 77ee |w | Jump_Nonzero 0xc43
0c55 00ce | | Action Pop_Auxiliary
0c56 4801 |H | Short_Literal 0x1
0c57 e239 | 9 | Load 0x1,0x39
0c58 00da | | Load_Top At_Offset_2
0c59 e019 | | Load 0x0,0x19
0c5a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0c5b 7006 |p | Jump_Nonzero 0xc62
0c5c 4801 |H | Short_Literal 0x1
0c5d e23a | : | Load 0x1,0x3a
0c5e 00da | | Load_Top At_Offset_2
0c5f e019 | | Load 0x0,0x19
0c60 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0c61 7801 |x | Jump 0xc63
0c62 4801 |H | Short_Literal 0x1
0c63 7018 |p | Jump_Nonzero 0xc7c
0c64 e004 | | Load 0x0,0x4
0c65 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c66 4801 |H | Short_Literal 0x1
0c67 4802 |H | Short_Literal 0x2
0c68 e00f | | Load 0x0,0xf
0c69 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c6a 035b | [ | Declare_Type Array,Constrained
0c6b 0337 | 7 | Declare_Variable Array
0c6c e5ff | | Load 0x2,-0x1
0c6d e002 | | Load 0x0,0x2
0c6e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c6f 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
0c70 4801 |H | Short_Literal 0x1
0c71 00da | | Load_Top At_Offset_2
0c72 01d6 | | Execute Vector,Field_Write
0c73 e5fe | | Load 0x2,-0x2
0c74 8220 | | Call 0x1,0x20
0c75 4802 |H | Short_Literal 0x2
0c76 00da | | Load_Top At_Offset_2
0c77 01d6 | | Execute Vector,Field_Write
0c78 6007 |` | Indirect_Literal Discrete,0xc80,{0x00000000, 0x00003008}
0c79 e004 | | Load 0x0,0x4
0c7a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0c7b c5fc | | Store 0x2,-0x4
0c7c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c7d 0000 0000 | | .XXX[0x3]
0c7f 0000 | |
0c80 0000 0000 | | .LITERAL {0x00000000, 0x00003008}
0c84 0000 0000 | | .BLANK 0000[0x4]
0c88 ; --------------------------------------------------------------------------------------
0c88 ; SUBPROGRAM
0c88 ; --------------------------------------------------------------------------------------
0c88 0c92 | | .CONST 0x0c92 ; Address of begin
0c89 0004 | | .CONST 0x0004 ; Address of exception handler
0c8a 0002 | | .CONST 0x0002 ; Number of locals
0c8b INIT_0c88:
0c8b e402 | | Load 0x2,0x2
0c8c 0217 | | Execute Heap_Access,All_Reference
0c8d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0c8e e002 | | Load 0x0,0x2
0c8f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c90 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c91 1c08 | | Execute_Immediate Run_Utility,0x8
0c92 BODY_0c88:
0c92 e402 | | Load 0x2,0x2
0c93 0217 | | Execute Heap_Access,All_Reference
0c94 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0c95 a403 | | Store_Unchecked 0x2,0x3
0c96 00cf | | Action Mark_Auxiliary
0c97 00d9 | | Load_Top At_Offset_1
0c98 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c99 01d9 | | Execute Vector,Reverse_Bounds
0c9a 0263 | c | Execute Discrete,Above_Bound
0c9b 700d |p | Jump_Nonzero 0xca9
0c9c e403 | | Load 0x2,0x3
0c9d 0217 | | Execute Heap_Access,All_Reference
0c9e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c9f 00d9 | | Load_Top At_Offset_1
0ca0 e602 | | Load 0x3,0x2
0ca1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ca2 01d6 | | Execute Vector,Field_Write
0ca3 e403 | | Load 0x2,0x3
0ca4 0217 | | Execute Heap_Access,All_Reference
0ca5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ca6 a403 | | Store_Unchecked 0x2,0x3
0ca7 00c8 | | Action Pop_Auxiliary_Range
0ca8 3ff3 |? | Loop_Increasing 0xc9c
0ca9 00ce | | Action Pop_Auxiliary
0caa e5ff | | Load 0x2,-0x1
0cab 0217 | | Execute Heap_Access,All_Reference
0cac 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0cad 00d9 | | Load_Top At_Offset_1
0cae 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0caf 00d8 | | Load_Top At_Offset_0
0cb0 00cb | | Action Pop_Block_With_Result
0cb1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0cb2 0000 0000 | | .BLANK 0000[0x6]
0cb8 ; --------------------------------------------------------------------------------------
0cb8 ; SUBPROGRAM
0cb8 ; --------------------------------------------------------------------------------------
0cb8 0cc2 | | .CONST 0x0cc2 ; Address of begin
0cb9 0004 | | .CONST 0x0004 ; Address of exception handler
0cba 0002 | | .CONST 0x0002 ; Number of locals
0cbb INIT_0cb8:
0cbb e5ff | | Load 0x2,-0x1
0cbc 0217 | | Execute Heap_Access,All_Reference
0cbd 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0cbe e002 | | Load 0x0,0x2
0cbf 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0cc0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0cc1 1c08 | | Execute_Immediate Run_Utility,0x8
0cc2 BODY_0cb8:
0cc2 e402 | | Load 0x2,0x2
0cc3 0217 | | Execute Heap_Access,All_Reference
0cc4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0cc5 a403 | | Store_Unchecked 0x2,0x3
0cc6 00cf | | Action Mark_Auxiliary
0cc7 00d9 | | Load_Top At_Offset_1
0cc8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0cc9 01d9 | | Execute Vector,Reverse_Bounds
0cca 0263 | c | Execute Discrete,Above_Bound
0ccb 7017 |p | Jump_Nonzero 0xce3
0ccc e403 | | Load 0x2,0x3
0ccd 7008 |p | Jump_Nonzero 0xcd6
0cce e402 | | Load 0x2,0x2
0ccf 0217 | | Execute Heap_Access,All_Reference
0cd0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0cd1 a402 | | Store_Unchecked 0x2,0x2
0cd2 e402 | | Load 0x2,0x2
0cd3 0217 | | Execute Heap_Access,All_Reference
0cd4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0cd5 a403 | | Store_Unchecked 0x2,0x3
0cd6 e403 | | Load 0x2,0x3
0cd7 0217 | | Execute Heap_Access,All_Reference
0cd8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0cd9 00d9 | | Load_Top At_Offset_1
0cda e602 | | Load 0x3,0x2
0cdb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0cdc 01d6 | | Execute Vector,Field_Write
0cdd e403 | | Load 0x2,0x3
0cde 0217 | | Execute Heap_Access,All_Reference
0cdf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ce0 a403 | | Store_Unchecked 0x2,0x3
0ce1 00c8 | | Action Pop_Auxiliary_Range
0ce2 3fe9 |? | Loop_Increasing 0xccc
0ce3 00ce | | Action Pop_Auxiliary
0ce4 e5ff | | Load 0x2,-0x1
0ce5 0217 | | Execute Heap_Access,All_Reference
0ce6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ce7 00d9 | | Load_Top At_Offset_1
0ce8 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0ce9 00d8 | | Load_Top At_Offset_0
0cea 00cb | | Action Pop_Block_With_Result
0ceb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0cec 0000 0000 | | .BLANK 0000[0x4]
0cf0 ; --------------------------------------------------------------------------------------
0cf0 ; SUBPROGRAM
0cf0 ; --------------------------------------------------------------------------------------
0cf0 0d0e | | .CONST 0x0d0e ; Address of begin
0cf1 0004 | | .CONST 0x0004 ; Address of exception handler
0cf2 001a | | .CONST 0x001a ; Number of locals
0cf3 INIT_0cf0:
0cf3 029a 0d13 | | Declare_Subprogram INIT_0d10,For_Outer_Call,Visible,Unelaborated
0cf5 029a 0d2b | +| Declare_Subprogram INIT_0d28,For_Outer_Call,Visible,Unelaborated
0cf7 00bf | | Action Accept_Activation
0cf8 e001 | | Load 0x0,0x1
0cf9 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0cfa 00c6 | | Action Check_Subprogram_Elaborated
0cfb e20f | | Load 0x1,0xf
0cfc e210 | | Load 0x1,0x10
0cfd e002 | | Load 0x0,0x2
0cfe e003 | | Load 0x0,0x3
0cff 4800 |H | Short_Literal 0x0
0d00 0007 | | Action Break_Optional
0d01 e004 | | Load 0x0,0x4
0d02 e005 | | Load 0x0,0x5
0d03 e20f | | Load 0x1,0xf
0d04 e210 | | Load 0x1,0x10
0d05 e001 | | Load 0x0,0x1
0d06 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0d07 0387 | | Declare_Variable Package
0d08 00d8 | | Load_Top At_Offset_0
0d09 020f | | Execute Module,Activate
0d0a 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0d0b 00c7 | | Action Elaborate_Subprogram
0d0c 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0d0d 00c7 | | Action Elaborate_Subprogram
0d0e BODY_0cf0:
0d0e 00bc | | Action Signal_Activated
0d0f 00bb | | Action Signal_Completion
0d10 ; --------------------------------------------------------------------------------------
0d10 ; SUBPROGRAM
0d10 ; --------------------------------------------------------------------------------------
0d10 0d13 | | .CONST 0x0d13 ; Address of begin
0d11 0d20 | | .CONST 0x0d20 ; Address of exception handler
0d12 0001 | | .CONST 0x0001 ; Number of locals
0d13 BODY_0d10:
0d13 INIT_0d10:
0d13 00da | | Load_Top At_Offset_2
0d14 0217 | | Execute Heap_Access,All_Reference
0d15 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0d16 e006 | | Load 0x0,0x6
0d17 180d | | Execute Package,Field_Execute,Field_Number 0xd
0d18 e215 | | Load 0x1,0x15
0d19 e216 | | Load 0x1,0x16
0d1a 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0d1b e001 | | Load 0x0,0x1
0d1c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0d1d e210 | | Load 0x1,0x10
0d1e 0213 | | Execute Heap_Access,Check_In_Type
0d1f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d20 TRAP_0d10:
0d20 486b |Hk | Short_Literal 0x6b
0d21 010f | | Execute Exception,Equal
0d22 6802 |h | Jump_Zero 0xd25
0d23 e210 | | Load 0x1,0x10
0d24 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d25 0100 | | Execute Exception,Raise
0d26 0000 0000 | | .XXX[0x2]
0d28 ; --------------------------------------------------------------------------------------
0d28 ; SUBPROGRAM
0d28 ; --------------------------------------------------------------------------------------
0d28 0d32 | 2 | .CONST 0x0d32 ; Address of begin
0d29 0004 | | .CONST 0x0004 ; Address of exception handler
0d2a 0002 | | .CONST 0x0002 ; Number of locals
0d2b INIT_0d28:
0d2b 00db | | Load_Top At_Offset_3
0d2c e20f | | Load 0x1,0xf
0d2d 0119 | | Execute Any,Check_In_Formal_Type
0d2e e210 | | Load 0x1,0x10
0d2f e006 | | Load 0x0,0x6
0d30 180d | | Execute Package,Field_Execute,Field_Number 0xd
0d31 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0d32 BODY_0d28:
0d32 00d8 | | Load_Top At_Offset_0
0d33 e210 | | Load 0x1,0x10
0d34 0213 | | Execute Heap_Access,Check_In_Type
0d35 e21a | | Load 0x1,0x1a
0d36 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d37 e5ff | | Load 0x2,-0x1
0d38 0217 | | Execute Heap_Access,All_Reference
0d39 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0d3a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d3b ; --------------------------------------------------------------------------------------
0d3b ; STRING TABLE
0d3b ; --------------------------------------------------------------------------------------
0d3b 0020 | | .STRTAB 0x0020->0x0d4b ; "!IO"
0d3c 0021 | ! | .STRTAB 0x0021->0x0d4c ; "!LRM"
0d3d 0023 | # | .STRTAB 0x0023->0x0d4e ; "<NONE>"
0d3e 0027 | ' | .STRTAB 0x0027->0x0d51 ; "Domain for \x22"
0d3f 0031 | 1 | .STRTAB 0x0031->0x0d57 ; "\x22 has been opened."
0d40 0041 | A | .STRTAB 0x0041->0x0d60 ; "State "
0d41 0045 | E | .STRTAB 0x0045->0x0d63 ; " is being removed from the domain."
0d42 0065 | e | .STRTAB 0x0065->0x0d74 ; "[_"
0d43 0065 | e | .STRTAB 0x0065->0x0d75 ; "]'C(~Spec_View)"
0d44 0072 | r | .STRTAB 0x0072->0x0d7d ; "Can't remove (or find) "
0d45 0087 | | .STRTAB 0x0087->0x0d88 ; " from the domain."
0d46 0096 | | .STRTAB 0x0096->0x0d91 ; "the specified domain"
0d47 00a8 | | .STRTAB 0x00a8->0x0d9b ; "Activated"
0d48 00af | | .STRTAB 0x00af->0x0d9f ; " units."
0d49 00b4 | | .STRTAB 0x00b4->0x0da3 ; "Deactivated"
0d4a 00bd | | .STREND 0x00bd->0x0da8
0d4b 2149 4f21 |!IO!| .STRTAB_STRINGS
0da9 0000 0000 | | .BLANK 0000[0x7]
0db0 ; --------------------------------------------------------------------------------------
0db0 ; Debug Table
0db0 ; --------------------------------------------------------------------------------------
0db0 0004 000d | | .DEBUG4 0x0004,0x000d,0xd911,0x0000,0x0001,0x0000
0db6 8000 0005 | | .XXX[0x2]
0db8 0000 0000 | | .BLANK 0000[0x48]