|
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_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0d88 | | .CONST 0x0d88 ; 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 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0040 c211 | | Store 0x1,0x11
0041 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
0043 c235 | 5 | Store 0x1,0x35
0044 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
0046 c212 | | Store 0x1,0x12
0047 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated
0049 c236 | 6 | Store 0x1,0x36
004a 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated
004c c214 | | Store 0x1,0x14
004d 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated
004f c215 | | Store 0x1,0x15
0050 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated
0052 c216 | | Store 0x1,0x16
0053 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated
0055 c217 | | Store 0x1,0x17
0056 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated
0058 c22f | / | Store 0x1,0x2f
0059 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated
005b c238 | 8 | Store 0x1,0x38
005c 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated
005e c21a | | Store 0x1,0x1a
005f 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated
0061 c21b | | Store 0x1,0x1b
0062 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated
0064 c237 | 7 | Store 0x1,0x37
0065 029a 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call,Visible,Unelaborated
0067 c21c | | Store 0x1,0x1c
0068 029a 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call,Visible,Unelaborated
006a c21d | | Store 0x1,0x1d
006b 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated
006d c21e | | Store 0x1,0x1e
006e 029a 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call,Visible,Unelaborated
0070 c21f | | Store 0x1,0x1f
0071 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated
0073 c220 | | Store 0x1,0x20
0074 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated
0076 c221 | ! | Store 0x1,0x21
0077 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated
0079 c222 | " | Store 0x1,0x22
007a 029a 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call,Visible,Unelaborated
007c c223 | # | Store 0x1,0x23
007d 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated
007f c224 | $ | Store 0x1,0x24
0080 029a 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Visible,Unelaborated
0082 c225 | % | Store 0x1,0x25
0083 029a 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Visible,Unelaborated
0085 c234 | 4 | Store 0x1,0x34
0086 029a 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Visible,Unelaborated
0088 c230 | 0 | Store 0x1,0x30
0089 029a 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call,Visible,Unelaborated
008b c231 | 1 | Store 0x1,0x31
008c 029a 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call,Visible,Unelaborated
008e c228 | ( | Store 0x1,0x28
008f 029a 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Visible,Unelaborated
0091 c229 | ) | Store 0x1,0x29
0092 029a 0693 | | Declare_Subprogram INIT_0690,For_Outer_Call,Visible,Unelaborated
0094 c22a | * | Store 0x1,0x2a
0095 029a 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call,Visible,Unelaborated
0097 c22b | + | Store 0x1,0x2b
0098 029a 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call,Visible,Unelaborated
009a c22c | , | Store 0x1,0x2c
009b 4806 |H | Short_Literal 0x6
009c 0093 0ccb | | push_full_address INIT_0cc8
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 0d13 | | Action Push_String_Extended,0xd13 ; "!IO"
00ab 0092 0d14 | | Action Push_String_Extended,0xd14 ; "!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 0793 | | Declare_Subprogram INIT_0790,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 07b3 | | Declare_Subprogram INIT_07b0,For_Call
00dc e22e | . | Load 0x1,0x2e
00dd 0326 | & | Complete_Type Record,By_Defining
00de 029b 07cb | | Declare_Subprogram INIT_07c8,For_Outer_Call,Unelaborated
00e0 029d 07db | | Declare_Subprogram INIT_07d8,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 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call
00f2 029d 080b | | Declare_Subprogram INIT_0808,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 082b | +| Declare_Subprogram INIT_0828,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 0893 | | Declare_Subprogram INIT_0890,For_Outer_Call
010a 029d 08d3 | | Declare_Subprogram INIT_08d0,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 0913 | | Declare_Subprogram INIT_0910,For_Outer_Call
0114 029d 09cb | | Declare_Subprogram INIT_09c8,For_Outer_Call
0116 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0117 00c7 | | Action Elaborate_Subprogram
0118 029d 0a1b | | Declare_Subprogram INIT_0a18,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 0a93 | | Declare_Subprogram INIT_0a90,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 0aab | | Declare_Subprogram INIT_0aa8,For_Outer_Call
0164 029d 0b13 | | Declare_Subprogram INIT_0b10,For_Outer_Call
0166 029d 0b4b | K| Declare_Subprogram INIT_0b48,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 0b63 | c| Declare_Subprogram INIT_0b60,For_Outer_Call
0170 029d 0beb | | Declare_Subprogram INIT_0be8,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 0d15 | | Action Push_String_Extended,0xd15 ; "<NONE>"
01b6 e5ff | | Load 0x2,-0x1
01b7 e019 | | Load 0x0,0x19
01b8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01b9 7011 |p | Jump_Nonzero 0x1cb
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 e5fa | | Load 0x2,-0x6
01c2 7008 |p | Jump_Nonzero 0x1cb
01c3 0092 0d16 | | Action Push_String_Extended,0xd16 ; "Domain for \x22"
01c5 e5ff | | Load 0x2,-0x1
01c6 01cc | | Execute Vector,Catenate
01c7 0092 0d17 | | Action Push_String_Extended,0xd17 ; "\x22 has been opened."
01c9 01cc | | Execute Vector,Catenate
01ca 8240 | @ | Call 0x1,0x40
01cb 00d8 | | Load_Top At_Offset_0
01cc a5fb | | Store_Unchecked 0x2,-0x5
01cd 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01ce 0000 0000 | | .XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d7 | | .CONST 0x01d7 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0003 | | .CONST 0x0003 ; Number of locals
01d3 INIT_01d0:
01d3 e23e | > | Load 0x1,0x3e
01d4 0007 | | Action Break_Optional
01d5 00d8 | | Load_Top At_Offset_0
01d6 0007 | | Action Break_Optional
01d7 BODY_01d0:
01d7 e5ff | | Load 0x2,-0x1
01d8 6823 |h# | Jump_Zero 0x1fc
01d9 e5ff | | Load 0x2,-0x1
01da 0217 | | Execute Heap_Access,All_Reference
01db 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01dc 0032 | 2 | Store_Top Heap_Access,At_Offset_2
01dd 00cf | | Action Mark_Auxiliary
01de 781a |x | Jump 0x1f9
01df 00da | | Load_Top At_Offset_2
01e0 0217 | | Execute Heap_Access,All_Reference
01e1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01e2 0032 | 2 | Store_Top Heap_Access,At_Offset_2
01e3 0092 0d18 | | Action Push_String_Extended,0xd18 ; "State "
01e5 00db | | Load_Top At_Offset_3
01e6 0217 | | Execute Heap_Access,All_Reference
01e7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01e8 e002 | | Load 0x0,0x2
01e9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
01ea 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
01eb 01cc | | Execute Vector,Catenate
01ec 0092 0d19 | | Action Push_String_Extended,0xd19 ; " is being removed from the domain."
01ee 01cc | | Execute Vector,Catenate
01ef 8240 | @ | Call 0x1,0x40
01f0 4800 |H | Short_Literal 0x0
01f1 e5ff | | Load 0x2,-0x1
01f2 e402 | | Load 0x2,0x2
01f3 0217 | | Execute Heap_Access,All_Reference
01f4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01f5 8236 | 6 | Call 0x1,0x36
01f6 00d9 | | Load_Top At_Offset_1
01f7 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01f8 00c9 | | Action Pop_Auxiliary_Loop
01f9 00da | | Load_Top At_Offset_2
01fa 77e4 |w | Jump_Nonzero 0x1df
01fb 00ce | | Action Pop_Auxiliary
01fc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01fd 0000 0000 | | .XXX[0x3]
01ff 0000 | |
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0207 | | .CONST 0x0207 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0003 | | .CONST 0x0003 ; Number of locals
0203 INIT_0200:
0203 e23e | > | Load 0x1,0x3e
0204 0007 | | Action Break_Optional
0205 00d8 | | Load_Top At_Offset_0
0206 0007 | | Action Break_Optional
0207 BODY_0200:
0207 e5ff | | Load 0x2,-0x1
0208 6823 |h# | Jump_Zero 0x22c
0209 e5ff | | Load 0x2,-0x1
020a 0217 | | Execute Heap_Access,All_Reference
020b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
020c 0032 | 2 | Store_Top Heap_Access,At_Offset_2
020d 00cf | | Action Mark_Auxiliary
020e 781a |x | Jump 0x229
020f 00da | | Load_Top At_Offset_2
0210 0217 | | Execute Heap_Access,All_Reference
0211 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0212 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0213 0092 0d18 | | Action Push_String_Extended,0xd18 ; "State "
0215 00db | | Load_Top At_Offset_3
0216 0217 | | Execute Heap_Access,All_Reference
0217 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0218 e002 | | Load 0x0,0x2
0219 1b16 | | Execute Package,Field_Read,Field_Number 0x16
021a 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
021b 01cc | | Execute Vector,Catenate
021c 0092 0d19 | | Action Push_String_Extended,0xd19 ; " is being removed from the domain."
021e 01cc | | Execute Vector,Catenate
021f 8240 | @ | Call 0x1,0x40
0220 4801 |H | Short_Literal 0x1
0221 e5ff | | Load 0x2,-0x1
0222 e402 | | Load 0x2,0x2
0223 0217 | | Execute Heap_Access,All_Reference
0224 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0225 8236 | 6 | Call 0x1,0x36
0226 00d9 | | Load_Top At_Offset_1
0227 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0228 00c9 | | Action Pop_Auxiliary_Loop
0229 00da | | Load_Top At_Offset_2
022a 77e4 |w | Jump_Nonzero 0x20f
022b 00ce | | Action Pop_Auxiliary
022c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
022d 0000 0000 | | .XXX[0x3]
022f 0000 | |
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0248 | H | .CONST 0x0248 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0007 | | .CONST 0x0007 ; Number of locals
0233 INIT_0230:
0233 e003 | | Load 0x0,0x3
0234 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0235 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0236 02c7 | | Declare_Variable Any
0237 00d8 | | Load_Top At_Offset_0
0238 1c00 | | Execute_Immediate Run_Utility,0x0
0239 e003 | | Load 0x0,0x3
023a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
023b 02c7 | | Declare_Variable Any
023c 00d8 | | Load_Top At_Offset_0
023d 1c00 | | Execute_Immediate Run_Utility,0x0
023e e003 | | Load 0x0,0x3
023f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0240 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0241 e003 | | Load 0x0,0x3
0242 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0243 e23e | > | Load 0x1,0x3e
0244 0007 | | Action Break_Optional
0245 e002 | | Load 0x0,0x2
0246 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0247 0602 | | Execute_Immediate Set_Value_Unchecked,0x2
0248 BODY_0230:
0248 e5fe | | Load 0x2,-0x2
0249 0217 | | Execute Heap_Access,All_Reference
024a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
024b 7002 |p | Jump_Nonzero 0x24e
024c 4800 |H | Short_Literal 0x0
024d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
024e e003 | | Load 0x0,0x3
024f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0250 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0251 e402 | | Load 0x2,0x2
0252 6105 |a | Indirect_Literal Discrete,0x358,{0x00000000, 0x00004000}
0253 e01a | | Load 0x0,0x1a
0254 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0255 e01b | | Load 0x0,0x1b
0256 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0257 e01c | | Load 0x0,0x1c
0258 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0259 4801 |H | Short_Literal 0x1
025a 4800 |H | Short_Literal 0x0
025b e01b | | Load 0x0,0x1b
025c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
025d e003 | | Load 0x0,0x3
025e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
025f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0260 e5ff | | Load 0x2,-0x1
0261 e003 | | Load 0x0,0x3
0262 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0263 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0264 c402 | | Store 0x2,0x2
0265 c404 | | Store 0x2,0x4
0266 00db | | Load_Top At_Offset_3
0267 6823 |h# | Jump_Zero 0x28b
0268 4801 |H | Short_Literal 0x1
0269 4803 |H | Short_Literal 0x3
026a e00f | | Load 0x0,0xf
026b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
026c 0334 | 4 | Declare_Variable Array,With_Constraint
026d e5ff | | Load 0x2,-0x1
026e e00f | | Load 0x0,0xf
026f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0270 4801 |H | Short_Literal 0x1
0271 00da | | Load_Top At_Offset_2
0272 01d6 | | Execute Vector,Field_Write
0273 e5fe | | Load 0x2,-0x2
0274 8220 | | Call 0x1,0x20
0275 4802 |H | Short_Literal 0x2
0276 00da | | Load_Top At_Offset_2
0277 01d6 | | Execute Vector,Field_Write
0278 e5ff | | Load 0x2,-0x1
0279 e404 | | Load 0x2,0x4
027a e00f | | Load 0x0,0xf
027b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
027c 4803 |H | Short_Literal 0x3
027d 00da | | Load_Top At_Offset_2
027e 01d6 | | Execute Vector,Field_Write
027f 60d4 |` | Indirect_Literal Discrete,0x354,{0x00000000, 0x00003002}
0280 e004 | | Load 0x0,0x4
0281 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0282 e5fe | | Load 0x2,-0x2
0283 0217 | | Execute Heap_Access,All_Reference
0284 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0285 e5fe | | Load 0x2,-0x2
0286 0217 | | Execute Heap_Access,All_Reference
0287 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0288 e004 | | Load 0x0,0x4
0289 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
028a 78bc |x | Jump 0x347
028b e402 | | Load 0x2,0x2
028c e003 | | Load 0x0,0x3
028d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
028e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
028f 681c |h | Jump_Zero 0x2ac
0290 4801 |H | Short_Literal 0x1
0291 4802 |H | Short_Literal 0x2
0292 e00f | | Load 0x0,0xf
0293 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0294 0334 | 4 | Declare_Variable Array,With_Constraint
0295 e5ff | | Load 0x2,-0x1
0296 e00f | | Load 0x0,0xf
0297 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0298 4801 |H | Short_Literal 0x1
0299 00da | | Load_Top At_Offset_2
029a 01d6 | | Execute Vector,Field_Write
029b e5fe | | Load 0x2,-0x2
029c 8220 | | Call 0x1,0x20
029d 4802 |H | Short_Literal 0x2
029e 00da | | Load_Top At_Offset_2
029f 01d6 | | Execute Vector,Field_Write
02a0 60af |` | Indirect_Literal Discrete,0x350,{0x00000000, 0x00003006}
02a1 e004 | | Load 0x0,0x4
02a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02a3 e5fe | | Load 0x2,-0x2
02a4 0217 | | Execute Heap_Access,All_Reference
02a5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02a6 e5fe | | Load 0x2,-0x2
02a7 0217 | | Execute Heap_Access,All_Reference
02a8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02a9 e004 | | Load 0x0,0x4
02aa 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
02ab 789b |x | Jump 0x347
02ac 00cf | | Action Mark_Auxiliary
02ad 7893 |x | Jump 0x341
02ae e003 | | Load 0x0,0x3
02af 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b0 e403 | | Load 0x2,0x3
02b1 0120 | | Execute Any,Is_Value
02b2 6803 |h | Jump_Zero 0x2b6
02b3 e003 | | Load 0x0,0x3
02b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02b5 7801 |x | Jump 0x2b7
02b6 e403 | | Load 0x2,0x3
02b7 e402 | | Load 0x2,0x2
02b8 e003 | | Load 0x0,0x3
02b9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02ba 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02bb c403 | | Store 0x2,0x3
02bc c405 | | Store 0x2,0x5
02bd e403 | | Load 0x2,0x3
02be e01d | | Load 0x0,0x1d
02bf 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
02c0 6817 |h | Jump_Zero 0x2d8
02c1 e5fe | | Load 0x2,-0x2
02c2 0092 0d1a | | Action Push_String_Extended,0xd1a ; "[_"
02c4 e402 | | Load 0x2,0x2
02c5 e003 | | Load 0x0,0x3
02c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02c7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02c8 01cc | | Execute Vector,Catenate
02c9 0092 0d1b | | Action Push_String_Extended,0xd1b ; "]'C(~Spec_View)"
02cb 01cc | | Execute Vector,Catenate
02cc 8212 | | Call 0x1,0x12
02cd e5fe | | Load 0x2,-0x2
02ce 0217 | | Execute Heap_Access,All_Reference
02cf 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
02d0 e003 | | Load 0x0,0x3
02d1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02d2 6868 |hh | Jump_Zero 0x33b
02d3 e403 | | Load 0x2,0x3
02d4 e5fe | | Load 0x2,-0x2
02d5 0217 | | Execute Heap_Access,All_Reference
02d6 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
02d7 7863 |xc | Jump 0x33b
02d8 e403 | | Load 0x2,0x3
02d9 8248 | H | Call 0x1,0x48
02da c403 | | Store 0x2,0x3
02db e5fe | | Load 0x2,-0x2
02dc 0217 | | Execute Heap_Access,All_Reference
02dd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02de 0033 | 3 | Store_Top Heap_Access,At_Offset_3
02df 00cf | | Action Mark_Auxiliary
02e0 00db | | Load_Top At_Offset_3
02e1 704c |pL | Jump_Nonzero 0x32e
02e2 e23e | > | Load 0x1,0x3e
02e3 e018 | | Load 0x0,0x18
02e4 180d | | Execute Package,Field_Execute,Field_Number 0xd
02e5 039c | | Declare_Variable Heap_Access,By_Allocation
02e6 a406 | | Store_Unchecked 0x2,0x6
02e7 e5fe | | Load 0x2,-0x2
02e8 0219 | | Execute Heap_Access,All_Read
02e9 e406 | | Load 0x2,0x6
02ea 0219 | | Execute Heap_Access,All_Read
02eb e406 | | Load 0x2,0x6
02ec 0219 | | Execute Heap_Access,All_Read
02ed 00da | | Load_Top At_Offset_2
02ee 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02ef 00da | | Load_Top At_Offset_2
02f0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02f1 e002 | | Load 0x0,0x2
02f2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f4 e5fe | | Load 0x2,-0x2
02f5 0217 | | Execute Heap_Access,All_Reference
02f6 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
02f7 e5fe | | Load 0x2,-0x2
02f8 0217 | | Execute Heap_Access,All_Reference
02f9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02fa e403 | | Load 0x2,0x3
02fb e407 | | Load 0x2,0x7
02fc e5fe | | Load 0x2,-0x2
02fd 8237 | 7 | Call 0x1,0x37
02fe e002 | | Load 0x0,0x2
02ff 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0300 00db | | Load_Top At_Offset_3
0301 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0302 00db | | Load_Top At_Offset_3
0303 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0304 00db | | Load_Top At_Offset_3
0305 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0306 00d3 | | Pop_Control Pop_Count_3
0307 e5fe | | Load 0x2,-0x2
0308 0217 | | Execute Heap_Access,All_Reference
0309 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
030a 702f |p/ | Jump_Nonzero 0x33a
030b e403 | | Load 0x2,0x3
030c e406 | | Load 0x2,0x6
030d 0217 | | Execute Heap_Access,All_Reference
030e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
030f e5fe | | Load 0x2,-0x2
0310 0217 | | Execute Heap_Access,All_Reference
0311 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0312 e406 | | Load 0x2,0x6
0313 0217 | | Execute Heap_Access,All_Reference
0314 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0315 4800 |H | Short_Literal 0x0
0316 e406 | | Load 0x2,0x6
0317 0217 | | Execute Heap_Access,All_Reference
0318 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0319 e23c | < | Load 0x1,0x3c
031a e406 | | Load 0x2,0x6
031b 0217 | | Execute Heap_Access,All_Reference
031c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
031d 00db | | Load_Top At_Offset_3
031e e5fe | | Load 0x2,-0x2
031f 0217 | | Execute Heap_Access,All_Reference
0320 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0321 e5fe | | Load 0x2,-0x2
0322 0217 | | Execute Heap_Access,All_Reference
0323 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0324 0a01 | | Execute_Immediate Plus,0x1
0325 e5fe | | Load 0x2,-0x2
0326 0217 | | Execute Heap_Access,All_Reference
0327 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0328 e5fe | | Load 0x2,-0x2
0329 e406 | | Load 0x2,0x6
032a 0217 | | Execute Heap_Access,All_Reference
032b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
032c 824a | J | Call 0x1,0x4a
032d 780c |x | Jump 0x33a
032e 00db | | Load_Top At_Offset_3
032f 0217 | | Execute Heap_Access,All_Reference
0330 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0331 e403 | | Load 0x2,0x3
0332 012f | / | Execute Any,Equal
0333 7006 |p | Jump_Nonzero 0x33a
0334 00db | | Load_Top At_Offset_3
0335 0217 | | Execute Heap_Access,All_Reference
0336 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0337 a406 | | Store_Unchecked 0x2,0x6
0338 00c9 | | Action Pop_Auxiliary_Loop
0339 7fa6 | | Jump 0x2e0
033a 00ce | | Action Pop_Auxiliary
033b e402 | | Load 0x2,0x2
033c e003 | | Load 0x0,0x3
033d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
033e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
033f c402 | | Store 0x2,0x2
0340 00c9 | | Action Pop_Auxiliary_Loop
0341 e402 | | Load 0x2,0x2
0342 e003 | | Load 0x0,0x3
0343 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0344 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0345 6f68 |oh | Jump_Zero 0x2ae
0346 00ce | | Action Pop_Auxiliary
0347 e402 | | Load 0x2,0x2
0348 e003 | | Load 0x0,0x3
0349 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
034a 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
034b c402 | | Store 0x2,0x2
034c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
034d 0000 0000 | | .XXX[0x3]
034f 0000 | |
0350 0000 0000 | | .LITERAL {0x00000000, 0x00003006}
0354 0000 0000 | | .LITERAL {0x00000000, 0x00003002}
0358 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
035c 0000 0000 | | .BLANK 0000[0x4]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0367 | g | .CONST 0x0367 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0003 | | .CONST 0x0003 ; Number of locals
0363 INIT_0360:
0363 e23e | > | Load 0x1,0x3e
0364 0007 | | Action Break_Optional
0365 00d8 | | Load_Top At_Offset_0
0366 0007 | | Action Break_Optional
0367 BODY_0360:
0367 e5fe | | Load 0x2,-0x2
0368 685c |h\ | Jump_Zero 0x3c5
0369 e5fe | | Load 0x2,-0x2
036a 0217 | | Execute Heap_Access,All_Reference
036b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
036c 0032 | 2 | Store_Top Heap_Access,At_Offset_2
036d 00cf | | Action Mark_Auxiliary
036e 7843 |xC | Jump 0x3b2
036f 00da | | Load_Top At_Offset_2
0370 0217 | | Execute Heap_Access,All_Reference
0371 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0372 e5ff | | Load 0x2,-0x1
0373 021f | | Execute Heap_Access,Equal
0374 6836 |h6 | Jump_Zero 0x3ab
0375 00d9 | | Load_Top At_Offset_1
0376 7007 |p | Jump_Nonzero 0x37e
0377 00da | | Load_Top At_Offset_2
0378 0217 | | Execute Heap_Access,All_Reference
0379 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
037a e5fe | | Load 0x2,-0x2
037b 0217 | | Execute Heap_Access,All_Reference
037c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
037d 7806 |x | Jump 0x384
037e 00da | | Load_Top At_Offset_2
037f 0217 | | Execute Heap_Access,All_Reference
0380 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0381 00da | | Load_Top At_Offset_2
0382 0217 | | Execute Heap_Access,All_Reference
0383 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0384 e5fe | | Load 0x2,-0x2
0385 0217 | | Execute Heap_Access,All_Reference
0386 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0387 00db | | Load_Top At_Offset_3
0388 0217 | | Execute Heap_Access,All_Reference
0389 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
038a 0272 | r | Execute Discrete,Minus
038b e5fe | | Load 0x2,-0x2
038c 0217 | | Execute Heap_Access,All_Reference
038d 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
038e e5fe | | Load 0x2,-0x2
038f 0217 | | Execute Heap_Access,All_Reference
0390 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0391 0aff | | Execute_Immediate Plus,-0x1
0392 e5fe | | Load 0x2,-0x2
0393 0217 | | Execute Heap_Access,All_Reference
0394 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0395 e5fe | | Load 0x2,-0x2
0396 0219 | | Execute Heap_Access,All_Read
0397 00db | | Load_Top At_Offset_3
0398 0219 | | Execute Heap_Access,All_Read
0399 e402 | | Load 0x2,0x2
039a 0219 | | Execute Heap_Access,All_Read
039b 00da | | Load_Top At_Offset_2
039c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
039d 00da | | Load_Top At_Offset_2
039e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
039f 00da | | Load_Top At_Offset_2
03a0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03a1 e5fd | | Load 0x2,-0x3
03a2 e002 | | Load 0x0,0x2
03a3 181f | | Execute Package,Field_Execute,Field_Number 0x1f
03a4 00db | | Load_Top At_Offset_3
03a5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03a6 00db | | Load_Top At_Offset_3
03a7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
03a8 00db | | Load_Top At_Offset_3
03a9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03aa 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03ab 00da | | Load_Top At_Offset_2
03ac 0032 | 2 | Store_Top Heap_Access,At_Offset_2
03ad 00d9 | | Load_Top At_Offset_1
03ae 0217 | | Execute Heap_Access,All_Reference
03af 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03b0 0033 | 3 | Store_Top Heap_Access,At_Offset_3
03b1 00c9 | | Action Pop_Auxiliary_Loop
03b2 00da | | Load_Top At_Offset_2
03b3 77bb |w | Jump_Nonzero 0x36f
03b4 00ce | | Action Pop_Auxiliary
03b5 e5ff | | Load 0x2,-0x1
03b6 e002 | | Load 0x0,0x2
03b7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03b8 1886 | | Execute Package,Field_Execute,Field_Number 0x86
03b9 700b |p | Jump_Nonzero 0x3c5
03ba 0092 0d1c | | Action Push_String_Extended,0xd1c ; "Can't remove (or find) "
03bc e5ff | | Load 0x2,-0x1
03bd e002 | | Load 0x0,0x2
03be 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03bf 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
03c0 01cc | | Execute Vector,Catenate
03c1 0092 0d1d | | Action Push_String_Extended,0xd1d ; " from the domain."
03c3 01cc | | Execute Vector,Catenate
03c4 8240 | @ | Call 0x1,0x40
03c5 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03c6 0000 0000 | | .XXX[0x2]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 00da | | Load_Top At_Offset_2
03cc 021c | | Execute Heap_Access,Not_Null
03cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 0217 | | Execute Heap_Access,All_Reference
03d5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
03d6 e002 | | Load 0x0,0x2
03d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d8 00d9 | | Load_Top At_Offset_1
03d9 00d0 | | Action Swap_Control
03da 0260 | ` | Execute Discrete,In_Type
03db 7001 |p | Jump_Nonzero 0x3dd
03dc 0801 | | Execute_Immediate Raise,0x1
03dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03de 0000 0000 | | .XXX[0x2]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 00da | | Load_Top At_Offset_2
03e4 0217 | | Execute Heap_Access,All_Reference
03e5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03e7 0000 | | .XXX[0x1]
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 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03ef 0000 | | .XXX[0x1]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f5 | | .CONST 0x03f5 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0002 | | .CONST 0x0002 ; Number of locals
03f3 INIT_03f0:
03f3 e23e | > | Load 0x1,0x3e
03f4 0007 | | Action Break_Optional
03f5 BODY_03f0:
03f5 00db | | Load_Top At_Offset_3
03f6 6835 |h5 | Jump_Zero 0x42c
03f7 00db | | Load_Top At_Offset_3
03f8 0217 | | Execute Heap_Access,All_Reference
03f9 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
03fa 0031 | 1 | Store_Top Heap_Access,At_Offset_1
03fb e5fe | | Load 0x2,-0x2
03fc e002 | | Load 0x0,0x2
03fd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03fe 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03ff 6818 |h | Jump_Zero 0x418
0400 00cf | | Action Mark_Auxiliary
0401 7812 |x | Jump 0x414
0402 00d9 | | Load_Top At_Offset_1
0403 0217 | | Execute Heap_Access,All_Reference
0404 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0405 e5fe | | Load 0x2,-0x2
0406 021f | | Execute Heap_Access,Equal
0407 6807 |h | Jump_Zero 0x40f
0408 e5fb | | Load 0x2,-0x5
0409 e5fc | | Load 0x2,-0x4
040a e5fd | | Load 0x2,-0x3
040b e402 | | Load 0x2,0x2
040c e5ff | | Load 0x2,-0x1
040d 824e | N | Call 0x1,0x4e
040e 7807 |x | Jump 0x416
040f 00d9 | | Load_Top At_Offset_1
0410 0217 | | Execute Heap_Access,All_Reference
0411 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0412 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0413 00c9 | | Action Pop_Auxiliary_Loop
0414 00d9 | | Load_Top At_Offset_1
0415 77ec |w | Jump_Nonzero 0x402
0416 00ce | | Action Pop_Auxiliary
0417 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0418 00cf | | Action Mark_Auxiliary
0419 780f |x | Jump 0x429
041a e5ff | | Load 0x2,-0x1
041b 0217 | | Execute Heap_Access,All_Reference
041c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
041d 7006 |p | Jump_Nonzero 0x424
041e e5fb | | Load 0x2,-0x5
041f e5fc | | Load 0x2,-0x4
0420 e5fd | | Load 0x2,-0x3
0421 e402 | | Load 0x2,0x2
0422 e5ff | | Load 0x2,-0x1
0423 824e | N | Call 0x1,0x4e
0424 00d9 | | Load_Top At_Offset_1
0425 0217 | | Execute Heap_Access,All_Reference
0426 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0427 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0428 00c9 | | Action Pop_Auxiliary_Loop
0429 00d9 | | Load_Top At_Offset_1
042a 77ef |w | Jump_Nonzero 0x41a
042b 00ce | | Action Pop_Auxiliary
042c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
042d 0000 0000 | | .XXX[0x3]
042f 0000 | |
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0435 | 5 | .CONST 0x0435 ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0002 | | .CONST 0x0002 ; Number of locals
0433 INIT_0430:
0433 e23e | > | Load 0x1,0x3e
0434 0007 | | Action Break_Optional
0435 BODY_0430:
0435 00db | | Load_Top At_Offset_3
0436 683d |h= | Jump_Zero 0x474
0437 00db | | Load_Top At_Offset_3
0438 0217 | | Execute Heap_Access,All_Reference
0439 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
043a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
043b e5fe | | Load 0x2,-0x2
043c e002 | | Load 0x0,0x2
043d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
043e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
043f 681c |h | Jump_Zero 0x45c
0440 00cf | | Action Mark_Auxiliary
0441 7816 |x | Jump 0x458
0442 00d9 | | Load_Top At_Offset_1
0443 0217 | | Execute Heap_Access,All_Reference
0444 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0445 e5fe | | Load 0x2,-0x2
0446 021f | | Execute Heap_Access,Equal
0447 680b |h | Jump_Zero 0x453
0448 00d9 | | Load_Top At_Offset_1
0449 0217 | | Execute Heap_Access,All_Reference
044a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
044b e5fd | | Load 0x2,-0x3
044c e002 | | Load 0x0,0x2
044d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
044e 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
044f 00da | | Load_Top At_Offset_2
0450 e5ff | | Load 0x2,-0x1
0451 824f | O | Call 0x1,0x4f
0452 7807 |x | Jump 0x45a
0453 00d9 | | Load_Top At_Offset_1
0454 0217 | | Execute Heap_Access,All_Reference
0455 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0456 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0457 00c9 | | Action Pop_Auxiliary_Loop
0458 00d9 | | Load_Top At_Offset_1
0459 77e8 |w | Jump_Nonzero 0x442
045a 00ce | | Action Pop_Auxiliary
045b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
045c 00cf | | Action Mark_Auxiliary
045d 7813 |x | Jump 0x471
045e e5ff | | Load 0x2,-0x1
045f 0217 | | Execute Heap_Access,All_Reference
0460 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0461 700a |p | Jump_Nonzero 0x46c
0462 00d9 | | Load_Top At_Offset_1
0463 0217 | | Execute Heap_Access,All_Reference
0464 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0465 e5fd | | Load 0x2,-0x3
0466 e002 | | Load 0x0,0x2
0467 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0468 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0469 00da | | Load_Top At_Offset_2
046a e5ff | | Load 0x2,-0x1
046b 824f | O | Call 0x1,0x4f
046c 00d9 | | Load_Top At_Offset_1
046d 0217 | | Execute Heap_Access,All_Reference
046e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
046f 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0470 00c9 | | Action Pop_Auxiliary_Loop
0471 00d9 | | Load_Top At_Offset_1
0472 77eb |w | Jump_Nonzero 0x45e
0473 00ce | | Action Pop_Auxiliary
0474 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0475 0000 0000 | | .XXX[0x3]
0477 0000 | |
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047d | } | .CONST 0x047d ; Address of begin
0479 0004 | | .CONST 0x0004 ; Address of exception handler
047a 0002 | | .CONST 0x0002 ; Number of locals
047b INIT_0478:
047b e23e | > | Load 0x1,0x3e
047c 0007 | | Action Break_Optional
047d BODY_0478:
047d e5fe | | Load 0x2,-0x2
047e e002 | | Load 0x0,0x2
047f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0480 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0481 6813 |h | Jump_Zero 0x495
0482 00db | | Load_Top At_Offset_3
0483 e5fe | | Load 0x2,-0x2
0484 824c | L | Call 0x1,0x4c
0485 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0486 00db | | Load_Top At_Offset_3
0487 0217 | | Execute Heap_Access,All_Reference
0488 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0489 7016 |p | Jump_Nonzero 0x4a0
048a 00d8 | | Load_Top At_Offset_0
048b 0217 | | Execute Heap_Access,All_Reference
048c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
048d e002 | | Load 0x0,0x2
048e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
048f 00d9 | | Load_Top At_Offset_1
0490 00d0 | | Action Swap_Control
0491 0260 | ` | Execute Discrete,In_Type
0492 7001 |p | Jump_Nonzero 0x494
0493 0801 | | Execute_Immediate Raise,0x1
0494 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0495 00db | | Load_Top At_Offset_3
0496 0217 | | Execute Heap_Access,All_Reference
0497 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
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 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04a3 e004 | | Load 0x0,0x4
04a4 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
04a5 e5ff | | Load 0x2,-0x1
04a6 0217 | | Execute Heap_Access,All_Reference
04a7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04a8 e004 | | Load 0x0,0x4
04a9 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
04aa e004 | | Load 0x0,0x4
04ab 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
04ac e002 | | Load 0x0,0x2
04ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ae 00d9 | | Load_Top At_Offset_1
04af 00d0 | | Action Swap_Control
04b0 0260 | ` | Execute Discrete,In_Type
04b1 7001 |p | Jump_Nonzero 0x4b3
04b2 0801 | | Execute_Immediate Raise,0x1
04b3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04b4 0000 0000 | | .BLANK 0000[0x4]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04c2 | | .CONST 0x04c2 ; Address of begin
04b9 0004 | | .CONST 0x0004 ; Address of exception handler
04ba 0005 | | .CONST 0x0005 ; Number of locals
04bb INIT_04b8:
04bb e23e | > | Load 0x1,0x3e
04bc 0007 | | Action Break_Optional
04bd e23c | < | Load 0x1,0x3c
04be 029f 0c63 | c| Declare_Subprogram INIT_0c60,For_Call
04c0 029f 0c93 | | Declare_Subprogram INIT_0c90,For_Call
04c2 BODY_04b8:
04c2 e5ff | | Load 0x2,-0x1
04c3 6814 |h | Jump_Zero 0x4d8
04c4 e5ff | | Load 0x2,-0x1
04c5 0217 | | Execute Heap_Access,All_Reference
04c6 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
04c7 a402 | | Store_Unchecked 0x2,0x2
04c8 e5fe | | Load 0x2,-0x2
04c9 e002 | | Load 0x0,0x2
04ca 1b16 | | Execute Package,Field_Read,Field_Number 0x16
04cb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04cc 680a |h | Jump_Zero 0x4d7
04cd e5ff | | Load 0x2,-0x1
04ce e5fe | | Load 0x2,-0x2
04cf 824c | L | Call 0x1,0x4c
04d0 a402 | | Store_Unchecked 0x2,0x2
04d1 e5ff | | Load 0x2,-0x1
04d2 0217 | | Execute Heap_Access,All_Reference
04d3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04d4 7003 |p | Jump_Nonzero 0x4d8
04d5 8404 | | Call 0x2,0x4
04d6 7801 |x | Jump 0x4d8
04d7 8405 | | Call 0x2,0x5
04d8 e002 | | Load 0x0,0x2
04d9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04da 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04dc 0000 0000 | | .BLANK 0000[0x4]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04f1 | | .CONST 0x04f1 ; Address of begin
04e1 0004 | | .CONST 0x0004 ; Address of exception handler
04e2 0004 | | .CONST 0x0004 ; Number of locals
04e3 INIT_04e0:
04e3 00da | | Load_Top At_Offset_2
04e4 8225 | % | Call 0x1,0x25
04e5 4801 |H | Short_Literal 0x1
04e6 00d9 | | Load_Top At_Offset_1
04e7 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04e8 e002 | | Load 0x0,0x2
04e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04ea 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
04eb 035b | [ | Declare_Type Array,Constrained
04ec 0337 | 7 | Declare_Variable Array
04ed 00d8 | | Load_Top At_Offset_0
04ee 1c00 | | Execute_Immediate Run_Utility,0x0
04ef e004 | | Load 0x0,0x4
04f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f1 BODY_04e0:
04f1 00cf | | Action Mark_Auxiliary
04f2 00db | | Load_Top At_Offset_3
04f3 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04f4 4801 |H | Short_Literal 0x1
04f5 0263 | c | Execute Discrete,Above_Bound
04f6 7023 |p# | Jump_Nonzero 0x51a
04f7 00d8 | | Load_Top At_Offset_0
04f8 e403 | | Load 0x2,0x3
04f9 01d5 | | Execute Vector,Field_Reference
04fa e404 | | Load 0x2,0x4
04fb 00d9 | | Load_Top At_Offset_1
04fc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
04fd 0120 | | Execute Any,Is_Value
04fe 6803 |h | Jump_Zero 0x502
04ff e003 | | Load 0x0,0x3
0500 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0501 7802 |x | Jump 0x504
0502 00d9 | | Load_Top At_Offset_1
0503 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0504 00db | | Load_Top At_Offset_3
0505 e402 | | Load 0x2,0x2
0506 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0507 01d7 | | Execute Vector,Field_Read
0508 e002 | | Load 0x0,0x2
0509 1b16 | | Execute Package,Field_Read,Field_Number 0x16
050a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
050b 00da | | Load_Top At_Offset_2
050c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
050d c404 | | Store 0x2,0x4
050e 00d1 | | Pop_Control Pop_Count_1
050f 00d8 | | Load_Top At_Offset_0
0510 e403 | | Load 0x2,0x3
0511 01d5 | | Execute Vector,Field_Reference
0512 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0513 8249 | I | Call 0x1,0x49
0514 00d9 | | Load_Top At_Offset_1
0515 e403 | | Load 0x2,0x3
0516 01d5 | | Execute Vector,Field_Reference
0517 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0518 00c8 | | Action Pop_Auxiliary_Range
0519 3fdd |? | Loop_Increasing 0x4f7
051a 00ce | | Action Pop_Auxiliary
051b 00d9 | | Load_Top At_Offset_1
051c e002 | | Load 0x0,0x2
051d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
051e 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
051f 01c6 | | Execute Vector,Convert_To_Formal
0520 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0521 0000 0000 | | .BLANK 0000[0x7]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b | + | .CONST 0x052b ; Address of begin
0529 0004 | | .CONST 0x0004 ; Address of exception handler
052a 0001 | | .CONST 0x0001 ; Number of locals
052b BODY_0528:
052b INIT_0528:
052b 00da | | Load_Top At_Offset_2
052c 0217 | | Execute Heap_Access,All_Reference
052d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
052e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
052f 0000 | | .XXX[0x1]
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 00db | | Load_Top At_Offset_3
0534 00db | | Load_Top At_Offset_3
0535 0217 | | Execute Heap_Access,All_Reference
0536 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0537 4503 |E | Exit_Suprogram New_Top_Offset 0x3
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 00da | | Load_Top At_Offset_2
053c 0217 | | Execute Heap_Access,All_Reference
053d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
053e 0f00 | | Execute_Immediate Equal,0x0
053f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 00da | | Load_Top At_Offset_2
0544 0217 | | Execute Heap_Access,All_Reference
0545 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0546 e004 | | Load 0x0,0x4
0547 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0548 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0549 0000 0000 | | .BLANK 0000[0x7]
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 e256 | V | Load 0x1,0x56
0555 e257 | W | Load 0x1,0x57
0556 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
0557 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
0558 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
0559 e00f | | Load 0x0,0xf
055a 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
055b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
055c 0000 0000 | | .BLANK 0000[0x4]
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 e25e | ^ | Load 0x1,0x5e
0565 e25f | _ | Load 0x1,0x5f
0566 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60
0567 e261 | a | Load 0x1,0x61
0568 1d62 | b | Execute_Immediate Reference_Lex_1,0x62
0569 e00f | | Load 0x0,0xf
056a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
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 0092 0d1e | | Action Push_String_Extended,0xd1e ; "the specified domain"
0575 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0576 0000 0000 | | .XXX[0x2]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 0583 | | .CONST 0x0583 ; Address of begin
0579 0004 | | .CONST 0x0004 ; Address of exception handler
057a 0003 | | .CONST 0x0003 ; Number of locals
057b INIT_0578:
057b e003 | | Load 0x0,0x3
057c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
057d 02c7 | | Declare_Variable Any
057e 00d8 | | Load_Top At_Offset_0
057f 1c00 | | Execute_Immediate Run_Utility,0x0
0580 e003 | | Load 0x0,0x3
0581 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0582 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0583 BODY_0578:
0583 e003 | | Load 0x0,0x3
0584 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0585 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0586 00da | | Load_Top At_Offset_2
0587 0120 | | Execute Any,Is_Value
0588 6803 |h | Jump_Zero 0x58c
0589 e003 | | Load 0x0,0x3
058a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
058b 7801 |x | Jump 0x58d
058c 00da | | Load_Top At_Offset_2
058d 603a |`: | Indirect_Literal Discrete,0x5c8,{0x00000000, 0x00004000}
058e e01a | | Load 0x0,0x1a
058f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0590 e01b | | Load 0x0,0x1b
0591 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0592 e003 | | Load 0x0,0x3
0593 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0594 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0595 e5ff | | Load 0x2,-0x1
0596 e003 | | Load 0x0,0x3
0597 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0598 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0599 c402 | | Store 0x2,0x2
059a 0059 | Y | Store_Top Discrete,At_Offset_1
059b 00d8 | | Load_Top At_Offset_0
059c 7004 |p | Jump_Nonzero 0x5a1
059d e5fe | | Load 0x2,-0x2
059e 00da | | Load_Top At_Offset_2
059f 8224 | $ | Call 0x1,0x24
05a0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05a1 4801 |H | Short_Literal 0x1
05a2 4802 |H | Short_Literal 0x2
05a3 e00f | | Load 0x0,0xf
05a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05a5 0334 | 4 | Declare_Variable Array,With_Constraint
05a6 e5ff | | Load 0x2,-0x1
05a7 00da | | Load_Top At_Offset_2
05a8 e00f | | Load 0x0,0xf
05a9 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
05aa 4801 |H | Short_Literal 0x1
05ab 00da | | Load_Top At_Offset_2
05ac 01d6 | | Execute Vector,Field_Write
05ad e5fe | | Load 0x2,-0x2
05ae 8220 | | Call 0x1,0x20
05af 4802 |H | Short_Literal 0x2
05b0 00da | | Load_Top At_Offset_2
05b1 01d6 | | Execute Vector,Field_Write
05b2 6011 |` | Indirect_Literal Discrete,0x5c4,{0x00000000, 0x00003001}
05b3 e004 | | Load 0x0,0x4
05b4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05b5 e5fe | | Load 0x2,-0x2
05b6 0217 | | Execute Heap_Access,All_Reference
05b7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05b8 e5fe | | Load 0x2,-0x2
05b9 0217 | | Execute Heap_Access,All_Reference
05ba 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05bb e004 | | Load 0x0,0x4
05bc 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
05bd e002 | | Load 0x0,0x2
05be 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05bf 180e | | Execute Package,Field_Execute,Field_Number 0xe
05c0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05c1 0000 0000 | | .XXX[0x3]
05c3 0000 | |
05c4 0000 0000 | | .LITERAL {0x00000000, 0x00003001}
05c8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
05cc 0000 0000 | | .BLANK 0000[0x4]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d7 | | .CONST 0x05d7 ; Address of begin
05d1 0004 | | .CONST 0x0004 ; Address of exception handler
05d2 0002 | | .CONST 0x0002 ; Number of locals
05d3 INIT_05d0:
05d3 00db | | Load_Top At_Offset_3
05d4 00db | | Load_Top At_Offset_3
05d5 8248 | H | Call 0x1,0x48
05d6 824b | K | Call 0x1,0x4b
05d7 BODY_05d0:
05d7 00d8 | | Load_Top At_Offset_0
05d8 7004 |p | Jump_Nonzero 0x5dd
05d9 e002 | | Load 0x0,0x2
05da 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05db 180e | | Execute Package,Field_Execute,Field_Number 0xe
05dc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05dd 00d8 | | Load_Top At_Offset_0
05de 0217 | | Execute Heap_Access,All_Reference
05df 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05e0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
05e1 0000 0000 | | .BLANK 0000[0x7]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f6 | | .CONST 0x05f6 ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0003 | | .CONST 0x0003 ; Number of locals
05eb INIT_05e8:
05eb 00da | | Load_Top At_Offset_2
05ec 0217 | | Execute Heap_Access,All_Reference
05ed 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
05ee e002 | | Load 0x0,0x2
05ef 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05f0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
05f1 1c08 | | Execute_Immediate Run_Utility,0x8
05f2 00db | | Load_Top At_Offset_3
05f3 0217 | | Execute Heap_Access,All_Reference
05f4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
05f5 0007 | | Action Break_Optional
05f6 BODY_05e8:
05f6 4800 |H | Short_Literal 0x0
05f7 00da | | Load_Top At_Offset_2
05f8 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
05f9 00cf | | Action Mark_Auxiliary
05fa 00da | | Load_Top At_Offset_2
05fb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05fc 01d9 | | Execute Vector,Reverse_Bounds
05fd 0263 | c | Execute Discrete,Above_Bound
05fe 700d |p | Jump_Nonzero 0x60c
05ff 00db | | Load_Top At_Offset_3
0600 0217 | | Execute Heap_Access,All_Reference
0601 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0602 00d9 | | Load_Top At_Offset_1
0603 e402 | | Load 0x2,0x2
0604 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0605 01d6 | | Execute Vector,Field_Write
0606 00db | | Load_Top At_Offset_3
0607 0217 | | Execute Heap_Access,All_Reference
0608 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0609 a403 | | Store_Unchecked 0x2,0x3
060a 00c8 | | Action Pop_Auxiliary_Range
060b 3ff3 |? | Loop_Increasing 0x5ff
060c 00ce | | Action Pop_Auxiliary
060d 00d9 | | Load_Top At_Offset_1
060e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
060f 0000 | | .XXX[0x1]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0616 | | .CONST 0x0616 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0002 | | .CONST 0x0002 ; Number of locals
0613 INIT_0610:
0613 00da | | Load_Top At_Offset_2
0614 0217 | | Execute Heap_Access,All_Reference
0615 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0616 BODY_0610:
0616 00cf | | Action Mark_Auxiliary
0617 e5fe | | Load 0x2,-0x2
0618 4802 |H | Short_Literal 0x2
0619 0263 | c | Execute Discrete,Above_Bound
061a 700a |p | Jump_Nonzero 0x625
061b 00db | | Load_Top At_Offset_3
061c 7002 |p | Jump_Nonzero 0x61f
061d 00d2 | | Pop_Control Pop_Count_2
061e 7806 |x | Jump 0x625
061f 00db | | Load_Top At_Offset_3
0620 0217 | | Execute Heap_Access,All_Reference
0621 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0622 a402 | | Store_Unchecked 0x2,0x2
0623 00c8 | | Action Pop_Auxiliary_Range
0624 3ff6 |? | Loop_Increasing 0x61b
0625 00ce | | Action Pop_Auxiliary
0626 00d8 | | Load_Top At_Offset_0
0627 7004 |p | Jump_Nonzero 0x62c
0628 e002 | | Load 0x0,0x2
0629 1b16 | | Execute Package,Field_Read,Field_Number 0x16
062a 180e | | Execute Package,Field_Execute,Field_Number 0xe
062b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
062c 00d8 | | Load_Top At_Offset_0
062d 0217 | | Execute Heap_Access,All_Reference
062e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
062f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0638 | 8 | .CONST 0x0638 ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0003 | | .CONST 0x0003 ; Number of locals
0633 INIT_0630:
0633 e23e | > | Load 0x1,0x3e
0634 0007 | | Action Break_Optional
0635 e002 | | Load 0x0,0x2
0636 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0637 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0638 BODY_0630:
0638 e5fe | | Load 0x2,-0x2
0639 6827 |h' | Jump_Zero 0x661
063a e5fe | | Load 0x2,-0x2
063b 0217 | | Execute Heap_Access,All_Reference
063c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
063d 0032 | 2 | Store_Top Heap_Access,At_Offset_2
063e 00cf | | Action Mark_Auxiliary
063f 781e |x | Jump 0x65e
0640 e5fe | | Load 0x2,-0x2
0641 0219 | | Execute Heap_Access,All_Read
0642 00d8 | | Load_Top At_Offset_0
0643 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0644 e002 | | Load 0x0,0x2
0645 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0646 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0647 e402 | | Load 0x2,0x2
0648 0217 | | Execute Heap_Access,All_Reference
0649 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
064a e5ff | | Load 0x2,-0x1
064b e002 | | Load 0x0,0x2
064c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
064d 1875 | u | Execute Package,Field_Execute,Field_Number 0x75
064e c403 | | Store 0x2,0x3
064f 00d9 | | Load_Top At_Offset_1
0650 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0651 00d1 | | Pop_Control Pop_Count_1
0652 00d9 | | Load_Top At_Offset_1
0653 e002 | | Load 0x0,0x2
0654 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0655 180f | | Execute Package,Field_Execute,Field_Number 0xf
0656 7002 |p | Jump_Nonzero 0x659
0657 00d9 | | Load_Top At_Offset_1
0658 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0659 00da | | Load_Top At_Offset_2
065a 0217 | | Execute Heap_Access,All_Reference
065b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
065c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
065d 00c9 | | Action Pop_Auxiliary_Loop
065e 00da | | Load_Top At_Offset_2
065f 77e0 |w | Jump_Nonzero 0x640
0660 00ce | | Action Pop_Auxiliary
0661 e002 | | Load 0x0,0x2
0662 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0663 180e | | Execute Package,Field_Execute,Field_Number 0xe
0664 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0665 0000 0000 | | .XXX[0x3]
0667 0000 | |
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b | k | .CONST 0x066b ; Address of begin
0669 0004 | | .CONST 0x0004 ; Address of exception handler
066a 0001 | | .CONST 0x0001 ; Number of locals
066b BODY_0668:
066b INIT_0668:
066b 00db | | Load_Top At_Offset_3
066c 0217 | | Execute Heap_Access,All_Reference
066d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
066e 00db | | Load_Top At_Offset_3
066f 8267 | g | Call 0x1,0x67
0670 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0671 0000 0000 | | .BLANK 0000[0x7]
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 00da | | Load_Top At_Offset_2
067c 0217 | | Execute Heap_Access,All_Reference
067d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
067e 00d8 | | Load_Top At_Offset_0
067f 0120 | | Execute Any,Is_Value
0680 7002 |p | Jump_Nonzero 0x683
0681 00d8 | | Load_Top At_Offset_0
0682 011e | | Execute Any,Convert
0683 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0684 0000 0000 | | .BLANK 0000[0x4]
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 00db | | Load_Top At_Offset_3
068c 00db | | Load_Top At_Offset_3
068d 0217 | | Execute Heap_Access,All_Reference
068e 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
068f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 06a0 | | .CONST 0x06a0 ; Address of begin
0691 0004 | | .CONST 0x0004 ; Address of exception handler
0692 0004 | | .CONST 0x0004 ; Number of locals
0693 INIT_0690:
0693 00da | | Load_Top At_Offset_2
0694 e002 | | Load 0x0,0x2
0695 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0696 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0697 00d8 | | Load_Top At_Offset_0
0698 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0699 e002 | | Load 0x0,0x2
069a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
069b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
069c 1c08 | | Execute_Immediate Run_Utility,0x8
069d e004 | | Load 0x0,0x4
069e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
069f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06a0 BODY_0690:
06a0 00da | | Load_Top At_Offset_2
06a1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06a2 00da | | Load_Top At_Offset_2
06a3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06a4 00cf | | Action Mark_Auxiliary
06a5 00db | | Load_Top At_Offset_3
06a6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06a7 01d9 | | Execute Vector,Reverse_Bounds
06a8 0263 | c | Execute Discrete,Above_Bound
06a9 701f |p | Jump_Nonzero 0x6c9
06aa e403 | | Load 0x2,0x3
06ab 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06ac 00d9 | | Load_Top At_Offset_1
06ad e404 | | Load 0x2,0x4
06ae e002 | | Load 0x0,0x2
06af 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06b1 00da | | Load_Top At_Offset_2
06b2 e408 | | Load 0x2,0x8
06b3 01d7 | | Execute Vector,Field_Read
06b4 00d1 | | Pop_Control Pop_Count_1
06b5 e5fe | | Load 0x2,-0x2
06b6 e407 | | Load 0x2,0x7
06b7 e402 | | Load 0x2,0x2
06b8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06b9 01d7 | | Execute Vector,Field_Read
06ba 8269 | i | Call 0x1,0x69
06bb 00da | | Load_Top At_Offset_2
06bc e408 | | Load 0x2,0x8
06bd 01d6 | | Execute Vector,Field_Write
06be c404 | | Store 0x2,0x4
06bf 00d2 | | Pop_Control Pop_Count_2
06c0 00db | | Load_Top At_Offset_3
06c1 6805 |h | Jump_Zero 0x6c7
06c2 00db | | Load_Top At_Offset_3
06c3 e403 | | Load 0x2,0x3
06c4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06c5 4800 |H | Short_Literal 0x0
06c6 a404 | | Store_Unchecked 0x2,0x4
06c7 00c8 | | Action Pop_Auxiliary_Range
06c8 3fe1 |? | Loop_Increasing 0x6aa
06c9 00ce | | Action Pop_Auxiliary
06ca 00d9 | | Load_Top At_Offset_1
06cb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06cc 0000 0000 | | .BLANK 0000[0x4]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06e1 | | .CONST 0x06e1 ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 0006 | | .CONST 0x0006 ; Number of locals
06d3 INIT_06d0:
06d3 e23e | > | Load 0x1,0x3e
06d4 0007 | | Action Break_Optional
06d5 e004 | | Load 0x0,0x4
06d6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06d7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06d8 e002 | | Load 0x0,0x2
06d9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06db e002 | | Load 0x0,0x2
06dc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06dd 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
06de e002 | | Load 0x0,0x2
06df 1b16 | | Execute Package,Field_Read,Field_Number 0x16
06e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06e1 BODY_06d0:
06e1 e5fe | | Load 0x2,-0x2
06e2 6835 |h5 | Jump_Zero 0x718
06e3 e5fe | | Load 0x2,-0x2
06e4 0217 | | Execute Heap_Access,All_Reference
06e5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
06e6 a402 | | Store_Unchecked 0x2,0x2
06e7 e5ff | | Load 0x2,-0x1
06e8 e002 | | Load 0x0,0x2
06e9 1b15 | | Execute Package,Field_Read,Field_Number 0x15
06ea 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06eb 680b |h | Jump_Zero 0x6f7
06ec 00db | | Load_Top At_Offset_3
06ed e002 | | Load 0x0,0x2
06ee 1b10 | | Execute Package,Field_Read,Field_Number 0x10
06ef e5ff | | Load 0x2,-0x1
06f0 e002 | | Load 0x0,0x2
06f1 1b15 | | Execute Package,Field_Read,Field_Number 0x15
06f2 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06f3 c404 | | Store 0x2,0x4
06f4 c403 | | Store 0x2,0x3
06f5 00da | | Load_Top At_Offset_2
06f6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06f7 00db | | Load_Top At_Offset_3
06f8 e002 | | Load 0x0,0x2
06f9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
06fa e5ff | | Load 0x2,-0x1
06fb e002 | | Load 0x0,0x2
06fc 1b15 | | Execute Package,Field_Read,Field_Number 0x15
06fd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06fe 0033 | 3 | Store_Top Heap_Access,At_Offset_3
06ff c403 | | Store 0x2,0x3
0700 00db | | Load_Top At_Offset_3
0701 7016 |p | Jump_Nonzero 0x718
0702 00db | | Load_Top At_Offset_3
0703 e002 | | Load 0x0,0x2
0704 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0705 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0706 e5fe | | Load 0x2,-0x2
0707 e405 | | Load 0x2,0x5
0708 8269 | i | Call 0x1,0x69
0709 0032 | 2 | Store_Top Heap_Access,At_Offset_2
070a c403 | | Store 0x2,0x3
070b 00d8 | | Load_Top At_Offset_0
070c e002 | | Load 0x0,0x2
070d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
070e 1886 | | Execute Package,Field_Execute,Field_Number 0x86
070f 7008 |p | Jump_Nonzero 0x718
0710 00db | | Load_Top At_Offset_3
0711 7006 |p | Jump_Nonzero 0x718
0712 00d8 | | Load_Top At_Offset_0
0713 e5ff | | Load 0x2,-0x1
0714 e002 | | Load 0x0,0x2
0715 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0716 1883 | | Execute Package,Field_Execute,Field_Number 0x83
0717 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0718 e002 | | Load 0x0,0x2
0719 1b14 | | Execute Package,Field_Read,Field_Number 0x14
071a 180e | | Execute Package,Field_Execute,Field_Number 0xe
071b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
071c 0000 0000 | | .BLANK 0000[0x4]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0735 | 5 | .CONST 0x0735 ; Address of begin
0721 0004 | | .CONST 0x0004 ; Address of exception handler
0722 0005 | | .CONST 0x0005 ; Number of locals
0723 INIT_0720:
0723 4801 |H | Short_Literal 0x1
0724 00db | | Load_Top At_Offset_3
0725 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0726 e002 | | Load 0x0,0x2
0727 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0728 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0729 035b | [ | Declare_Type Array,Constrained
072a 0337 | 7 | Declare_Variable Array
072b e002 | | Load 0x0,0x2
072c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
072d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072e 00e2 | | Load_Encached Integer_Cache
072f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0730 e5ff | | Load 0x2,-0x1
0731 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0732 e004 | | Load 0x0,0x4
0733 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0734 03f1 | | Declare_Variable Discrete,With_Value
0735 BODY_0720:
0735 00cf | | Action Mark_Auxiliary
0736 e5ff | | Load 0x2,-0x1
0737 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0738 01d9 | | Execute Vector,Reverse_Bounds
0739 0263 | c | Execute Discrete,Above_Bound
073a 7030 |p0 | Jump_Nonzero 0x76b
073b e5fe | | Load 0x2,-0x2
073c 00d9 | | Load_Top At_Offset_1
073d e5ff | | Load 0x2,-0x1
073e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
073f 01d7 | | Execute Vector,Field_Read
0740 822b | + | Call 0x1,0x2b
0741 a403 | | Store_Unchecked 0x2,0x3
0742 e403 | | Load 0x2,0x3
0743 e002 | | Load 0x0,0x2
0744 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0745 180f | | Execute Package,Field_Execute,Field_Number 0xf
0746 7008 |p | Jump_Nonzero 0x74f
0747 e404 | | Load 0x2,0x4
0748 0a01 | | Execute_Immediate Plus,0x1
0749 c404 | | Store 0x2,0x4
074a e403 | | Load 0x2,0x3
074b e404 | | Load 0x2,0x4
074c e402 | | Load 0x2,0x2
074d 01d6 | | Execute Vector,Field_Write
074e 781a |x | Jump 0x769
074f e004 | | Load 0x0,0x4
0750 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0751 4801 |H | Short_Literal 0x1
0752 4802 |H | Short_Literal 0x2
0753 e00f | | Load 0x0,0xf
0754 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0755 0334 | 4 | Declare_Variable Array,With_Constraint
0756 00da | | Load_Top At_Offset_2
0757 e5ff | | Load 0x2,-0x1
0758 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0759 01d7 | | Execute Vector,Field_Read
075a e002 | | Load 0x0,0x2
075b 1b15 | | Execute Package,Field_Read,Field_Number 0x15
075c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
075d 4801 |H | Short_Literal 0x1
075e 00da | | Load_Top At_Offset_2
075f 01d6 | | Execute Vector,Field_Write
0760 e5fe | | Load 0x2,-0x2
0761 8220 | | Call 0x1,0x20
0762 4802 |H | Short_Literal 0x2
0763 00da | | Load_Top At_Offset_2
0764 01d6 | | Execute Vector,Field_Write
0765 6026 |`& | Indirect_Literal Discrete,0x78c,{0x00000000, 0x00003004}
0766 e004 | | Load 0x0,0x4
0767 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0768 c405 | | Store 0x2,0x5
0769 00c8 | | Action Pop_Auxiliary_Range
076a 3fd0 |? | Loop_Increasing 0x73b
076b 00ce | | Action Pop_Auxiliary
076c 00d9 | | Load_Top At_Offset_1
076d e002 | | Load 0x0,0x2
076e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
076f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0770 1c08 | | Execute_Immediate Run_Utility,0x8
0771 00d9 | | Load_Top At_Offset_1
0772 00d9 | | Load_Top At_Offset_1
0773 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0774 4801 |H | Short_Literal 0x1
0775 00db | | Load_Top At_Offset_3
0776 e402 | | Load 0x2,0x2
0777 01cf | | Execute Vector,Slice_Read
0778 00d9 | | Load_Top At_Offset_1
0779 00d8 | | Load_Top At_Offset_0
077a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
077b 00da | | Load_Top At_Offset_2
077c 01da | | Execute Vector,Bounds
077d 00da | | Load_Top At_Offset_2
077e 01da | | Execute Vector,Bounds
077f 00da | | Load_Top At_Offset_2
0780 027f | | Execute Discrete,Equal
0781 7001 |p | Jump_Nonzero 0x783
0782 08e0 | | Execute_Immediate Raise,0xe0
0783 00cd | | Action Spare6_Action
0784 027f | | Execute Discrete,Equal
0785 7001 |p | Jump_Nonzero 0x787
0786 08e0 | | Execute_Immediate Raise,0xe0
0787 00d2 | | Pop_Control Pop_Count_2
0788 00d9 | | Load_Top At_Offset_1
0789 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
078a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
078b 0000 | | .XXX[0x1]
078c 0000 0000 | | .LITERAL {0x00000000, 0x00003004}
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0793 | | .CONST 0x0793 ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0001 | | .CONST 0x0001 ; Number of locals
0793 BODY_0790:
0793 INIT_0790:
0793 4608 |F | Jump_Case 0x9
0794 7808 |x | Jump 0x79d ; case 0x0
0795 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0796 7813 |x | Jump 0x7aa ; case 0x2
0797 7812 |x | Jump 0x7aa ; case 0x3
0798 7811 |x | Jump 0x7aa ; case 0x4
0799 7810 |x | Jump 0x7aa ; case 0x5
079a 780f |x | Jump 0x7aa ; case 0x6
079b 780e |x | Jump 0x7aa ; case 0x7
079c 780d |x | Jump 0x7aa ; case 0x8
079d 00da | | Load_Top At_Offset_2
079e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
079f 0125 | % | Execute Any,Set_Constraint
07a0 00da | | Load_Top At_Offset_2
07a1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
07a2 1c00 | | Execute_Immediate Run_Utility,0x0
07a3 00da | | Load_Top At_Offset_2
07a4 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
07a5 0125 | % | Execute Any,Set_Constraint
07a6 00da | | Load_Top At_Offset_2
07a7 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
07a8 1c00 | | Execute_Immediate Run_Utility,0x0
07a9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
07aa 0869 | i | Execute_Immediate Raise,0x69
07ab 0000 0000 | | .BLANK 0000[0x5]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3 | | .CONST 0x07b3 ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0001 | | .CONST 0x0001 ; Number of locals
07b3 BODY_07b0:
07b3 INIT_07b0:
07b3 4608 |F | Jump_Case 0x9
07b4 7808 |x | Jump 0x7bd ; case 0x0
07b5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
07b6 780d |x | Jump 0x7c4 ; case 0x2
07b7 780c |x | Jump 0x7c4 ; case 0x3
07b8 780b |x | Jump 0x7c4 ; case 0x4
07b9 780a |x | Jump 0x7c4 ; case 0x5
07ba 7809 |x | Jump 0x7c4 ; case 0x6
07bb 7808 |x | Jump 0x7c4 ; case 0x7
07bc 7807 |x | Jump 0x7c4 ; case 0x8
07bd 00da | | Load_Top At_Offset_2
07be 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
07bf 0125 | % | Execute Any,Set_Constraint
07c0 00da | | Load_Top At_Offset_2
07c1 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
07c2 1c00 | | Execute_Immediate Run_Utility,0x0
07c3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
07c4 0869 | i | Execute_Immediate Raise,0x69
07c5 0000 0000 | | .XXX[0x3]
07c7 0000 | |
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 00da | | Load_Top At_Offset_2
07cc e002 | | Load 0x0,0x2
07cd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07ce 181f | | Execute Package,Field_Execute,Field_Number 0x1f
07cf e5fe | | Load 0x2,-0x2
07d0 e002 | | Load 0x0,0x2
07d1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07d2 181f | | Execute Package,Field_Execute,Field_Number 0x1f
07d3 027c | | | Execute Discrete,Less
07d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
07d5 0000 0000 | | .XXX[0x3]
07d7 0000 | |
07d8 ; --------------------------------------------------------------------------------------
07d8 ; SUBPROGRAM
07d8 ; --------------------------------------------------------------------------------------
07d8 07db | | .CONST 0x07db ; Address of begin
07d9 0004 | | .CONST 0x0004 ; Address of exception handler
07da 0001 | | .CONST 0x0001 ; Number of locals
07db BODY_07d8:
07db INIT_07d8:
07db e01e | | Load 0x0,0x1e
07dc 180e | | Execute Package,Field_Execute,Field_Number 0xe
07dd 00db | | Load_Top At_Offset_3
07de 4801 |H | Short_Literal 0x1
07df 6004 |` | Indirect_Literal Discrete,0x7e4,{0x00000000, 0x00005802}
07e0 e004 | | Load 0x0,0x4
07e1 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
07e2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07e3 0000 | | .XXX[0x1]
07e4 0000 0000 | | .LITERAL {0x00000000, 0x00005802}
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07f3 | | .CONST 0x07f3 ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0003 | | .CONST 0x0003 ; Number of locals
07eb INIT_07e8:
07eb e003 | | Load 0x0,0x3
07ec 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
07ed 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07ee 02c7 | | Declare_Variable Any
07ef 00d8 | | Load_Top At_Offset_0
07f0 1c00 | | Execute_Immediate Run_Utility,0x0
07f1 e003 | | Load 0x0,0x3
07f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f3 BODY_07e8:
07f3 e003 | | Load 0x0,0x3
07f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f5 00da | | Load_Top At_Offset_2
07f6 0120 | | Execute Any,Is_Value
07f7 6804 |h | Jump_Zero 0x7fc
07f8 e003 | | Load 0x0,0x3
07f9 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
07fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07fb 7801 |x | Jump 0x7fd
07fc 00da | | Load_Top At_Offset_2
07fd e5ff | | Load 0x2,-0x1
07fe e003 | | Load 0x0,0x3
07ff 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0800 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0801 c402 | | Store 0x2,0x2
0802 0059 | Y | Store_Top Discrete,At_Offset_1
0803 00d9 | | Load_Top At_Offset_1
0804 e003 | | Load 0x0,0x3
0805 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0806 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0807 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0808 ; --------------------------------------------------------------------------------------
0808 ; SUBPROGRAM
0808 ; --------------------------------------------------------------------------------------
0808 0812 | | .CONST 0x0812 ; Address of begin
0809 0004 | | .CONST 0x0004 ; Address of exception handler
080a 0003 | | .CONST 0x0003 ; Number of locals
080b INIT_0808:
080b e003 | | Load 0x0,0x3
080c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
080d 02c7 | | Declare_Variable Any
080e 00d8 | | Load_Top At_Offset_0
080f 1c00 | | Execute_Immediate Run_Utility,0x0
0810 e003 | | Load 0x0,0x3
0811 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0812 BODY_0808:
0812 e003 | | Load 0x0,0x3
0813 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0814 00da | | Load_Top At_Offset_2
0815 0120 | | Execute Any,Is_Value
0816 6803 |h | Jump_Zero 0x81a
0817 e003 | | Load 0x0,0x3
0818 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0819 7801 |x | Jump 0x81b
081a 00da | | Load_Top At_Offset_2
081b e5ff | | Load 0x2,-0x1
081c e003 | | Load 0x0,0x3
081d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
081e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
081f c402 | | Store 0x2,0x2
0820 0059 | Y | Store_Top Discrete,At_Offset_1
0821 00d9 | | Load_Top At_Offset_1
0822 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0823 0000 0000 | | .BLANK 0000[0x5]
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 082b | + | .CONST 0x082b ; Address of begin
0829 0004 | | .CONST 0x0004 ; Address of exception handler
082a 0001 | | .CONST 0x0001 ; Number of locals
082b BODY_0828:
082b INIT_0828:
082b 00da | | Load_Top At_Offset_2
082c e002 | | Load 0x0,0x2
082d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
082e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
082f 0f02 | | Execute_Immediate Equal,0x2
0830 682b |h+ | Jump_Zero 0x85c
0831 00db | | Load_Top At_Offset_3
0832 0217 | | Execute Heap_Access,All_Reference
0833 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0834 0e02 | | Execute_Immediate Not_Equal,0x2
0835 6825 |h% | Jump_Zero 0x85b
0836 00db | | Load_Top At_Offset_3
0837 0217 | | Execute Heap_Access,All_Reference
0838 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0839 7005 |p | Jump_Nonzero 0x83f
083a 4802 |H | Short_Literal 0x2
083b e5fe | | Load 0x2,-0x2
083c 0217 | | Execute Heap_Access,All_Reference
083d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
083e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
083f 4801 |H | Short_Literal 0x1
0840 4802 |H | Short_Literal 0x2
0841 e00f | | Load 0x0,0xf
0842 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0843 0334 | 4 | Declare_Variable Array,With_Constraint
0844 e5fe | | Load 0x2,-0x2
0845 8220 | | Call 0x1,0x20
0846 4801 |H | Short_Literal 0x1
0847 00da | | Load_Top At_Offset_2
0848 01d6 | | Execute Vector,Field_Write
0849 00db | | Load_Top At_Offset_3
084a e002 | | Load 0x0,0x2
084b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
084c 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
084d 4802 |H | Short_Literal 0x2
084e 00da | | Load_Top At_Offset_2
084f 01d6 | | Execute Vector,Field_Write
0850 6037 |`7 | Indirect_Literal Discrete,0x888,{0x00000000, 0x00003005}
0851 e004 | | Load 0x0,0x4
0852 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0853 e5fe | | Load 0x2,-0x2
0854 0217 | | Execute Heap_Access,All_Reference
0855 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0856 00db | | Load_Top At_Offset_3
0857 0217 | | Execute Heap_Access,All_Reference
0858 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0859 e004 | | Load 0x0,0x4
085a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
085b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
085c 00db | | Load_Top At_Offset_3
085d 0217 | | Execute Heap_Access,All_Reference
085e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
085f 0e01 | | Execute_Immediate Not_Equal,0x1
0860 6825 |h% | Jump_Zero 0x886
0861 00db | | Load_Top At_Offset_3
0862 0217 | | Execute Heap_Access,All_Reference
0863 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0864 7005 |p | Jump_Nonzero 0x86a
0865 4801 |H | Short_Literal 0x1
0866 e5fe | | Load 0x2,-0x2
0867 0217 | | Execute Heap_Access,All_Reference
0868 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0869 4503 |E | Exit_Suprogram New_Top_Offset 0x3
086a 4801 |H | Short_Literal 0x1
086b 4802 |H | Short_Literal 0x2
086c e00f | | Load 0x0,0xf
086d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
086e 0334 | 4 | Declare_Variable Array,With_Constraint
086f e5fe | | Load 0x2,-0x2
0870 8220 | | Call 0x1,0x20
0871 4801 |H | Short_Literal 0x1
0872 00da | | Load_Top At_Offset_2
0873 01d6 | | Execute Vector,Field_Write
0874 00db | | Load_Top At_Offset_3
0875 e002 | | Load 0x0,0x2
0876 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0877 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0878 4802 |H | Short_Literal 0x2
0879 00da | | Load_Top At_Offset_2
087a 01d6 | | Execute Vector,Field_Write
087b 600c |` | Indirect_Literal Discrete,0x888,{0x00000000, 0x00003005}
087c e004 | | Load 0x0,0x4
087d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
087e e5fe | | Load 0x2,-0x2
087f 0217 | | Execute Heap_Access,All_Reference
0880 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0881 00db | | Load_Top At_Offset_3
0882 0217 | | Execute Heap_Access,All_Reference
0883 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0884 e004 | | Load 0x0,0x4
0885 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0886 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0887 0000 | | .XXX[0x1]
0888 0000 0000 | | .LITERAL {0x00000000, 0x00003005}
088c 0000 0000 | | .BLANK 0000[0x4]
0890 ; --------------------------------------------------------------------------------------
0890 ; SUBPROGRAM
0890 ; --------------------------------------------------------------------------------------
0890 0895 | | .CONST 0x0895 ; Address of begin
0891 0004 | | .CONST 0x0004 ; Address of exception handler
0892 0002 | | .CONST 0x0002 ; Number of locals
0893 INIT_0890:
0893 e23e | > | Load 0x1,0x3e
0894 0007 | | Action Break_Optional
0895 BODY_0890:
0895 e5fe | | Load 0x2,-0x2
0896 6816 |h | Jump_Zero 0x8ad
0897 e5fe | | Load 0x2,-0x2
0898 0217 | | Execute Heap_Access,All_Reference
0899 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
089a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
089b 00cf | | Action Mark_Auxiliary
089c 780d |x | Jump 0x8aa
089d e5ff | | Load 0x2,-0x1
089e 00da | | Load_Top At_Offset_2
089f 0217 | | Execute Heap_Access,All_Reference
08a0 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
08a1 012f | / | Execute Any,Equal
08a2 6802 |h | Jump_Zero 0x8a5
08a3 00d9 | | Load_Top At_Offset_1
08a4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08a5 00d9 | | Load_Top At_Offset_1
08a6 0217 | | Execute Heap_Access,All_Reference
08a7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
08a8 0032 | 2 | Store_Top Heap_Access,At_Offset_2
08a9 00c9 | | Action Pop_Auxiliary_Loop
08aa 00d9 | | Load_Top At_Offset_1
08ab 77f1 |w | Jump_Nonzero 0x89d
08ac 00ce | | Action Pop_Auxiliary
08ad 4801 |H | Short_Literal 0x1
08ae 4802 |H | Short_Literal 0x2
08af e00f | | Load 0x0,0xf
08b0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08b1 0334 | 4 | Declare_Variable Array,With_Constraint
08b2 e5ff | | Load 0x2,-0x1
08b3 e00f | | Load 0x0,0xf
08b4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
08b5 4801 |H | Short_Literal 0x1
08b6 00da | | Load_Top At_Offset_2
08b7 01d6 | | Execute Vector,Field_Write
08b8 e5fe | | Load 0x2,-0x2
08b9 8220 | | Call 0x1,0x20
08ba 4802 |H | Short_Literal 0x2
08bb 00da | | Load_Top At_Offset_2
08bc 01d6 | | Execute Vector,Field_Write
08bd 600e |` | Indirect_Literal Discrete,0x8cc,{0x00000000, 0x00003007}
08be e004 | | Load 0x0,0x4
08bf 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08c0 e5fe | | Load 0x2,-0x2
08c1 0217 | | Execute Heap_Access,All_Reference
08c2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
08c3 e5fe | | Load 0x2,-0x2
08c4 0217 | | Execute Heap_Access,All_Reference
08c5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
08c6 e004 | | Load 0x0,0x4
08c7 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
08c8 e23e | > | Load 0x1,0x3e
08c9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08ca 0000 0000 | | .XXX[0x2]
08cc 0000 0000 | | .LITERAL {0x00000000, 0x00003007}
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08d5 | | .CONST 0x08d5 ; Address of begin
08d1 0004 | | .CONST 0x0004 ; Address of exception handler
08d2 0002 | | .CONST 0x0002 ; Number of locals
08d3 INIT_08d0:
08d3 e23e | > | Load 0x1,0x3e
08d4 0007 | | Action Break_Optional
08d5 BODY_08d0:
08d5 e5fe | | Load 0x2,-0x2
08d6 6816 |h | Jump_Zero 0x8ed
08d7 e5fe | | Load 0x2,-0x2
08d8 0217 | | Execute Heap_Access,All_Reference
08d9 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
08da 0031 | 1 | Store_Top Heap_Access,At_Offset_1
08db 00cf | | Action Mark_Auxiliary
08dc 780d |x | Jump 0x8ea
08dd e5ff | | Load 0x2,-0x1
08de 00da | | Load_Top At_Offset_2
08df 0217 | | Execute Heap_Access,All_Reference
08e0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
08e1 021f | | Execute Heap_Access,Equal
08e2 6802 |h | Jump_Zero 0x8e5
08e3 00d9 | | Load_Top At_Offset_1
08e4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08e5 00d9 | | Load_Top At_Offset_1
08e6 0217 | | Execute Heap_Access,All_Reference
08e7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
08e8 0032 | 2 | Store_Top Heap_Access,At_Offset_2
08e9 00c9 | | Action Pop_Auxiliary_Loop
08ea 00d9 | | Load_Top At_Offset_1
08eb 77f1 |w | Jump_Nonzero 0x8dd
08ec 00ce | | Action Pop_Auxiliary
08ed 4801 |H | Short_Literal 0x1
08ee 4802 |H | Short_Literal 0x2
08ef e00f | | Load 0x0,0xf
08f0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08f1 0334 | 4 | Declare_Variable Array,With_Constraint
08f2 e5ff | | Load 0x2,-0x1
08f3 e002 | | Load 0x0,0x2
08f4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
08f5 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
08f6 4801 |H | Short_Literal 0x1
08f7 00da | | Load_Top At_Offset_2
08f8 01d6 | | Execute Vector,Field_Write
08f9 e5fe | | Load 0x2,-0x2
08fa 8220 | | Call 0x1,0x20
08fb 4802 |H | Short_Literal 0x2
08fc 00da | | Load_Top At_Offset_2
08fd 01d6 | | Execute Vector,Field_Write
08fe 67cd |g | Indirect_Literal Discrete,0x8cc,{0x00000000, 0x00003007}
08ff e004 | | Load 0x0,0x4
0900 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0901 e5fe | | Load 0x2,-0x2
0902 0217 | | Execute Heap_Access,All_Reference
0903 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0904 e5fe | | Load 0x2,-0x2
0905 0217 | | Execute Heap_Access,All_Reference
0906 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0907 e004 | | Load 0x0,0x4
0908 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0909 e23e | > | Load 0x1,0x3e
090a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
090b 0000 0000 | | .BLANK 0000[0x5]
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 0927 | ' | .CONST 0x0927 ; Address of begin
0911 0004 | | .CONST 0x0004 ; Address of exception handler
0912 0006 | | .CONST 0x0006 ; Number of locals
0913 INIT_0910:
0913 e5fd | | Load 0x2,-0x3
0914 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0915 e002 | | Load 0x0,0x2
0916 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0917 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0918 1c08 | | Execute_Immediate Run_Utility,0x8
0919 e5fd | | Load 0x2,-0x3
091a 00d9 | | Load_Top At_Offset_1
091b 016d | m | Execute Variant_Record,Structure_Write
091c e5fe | | Load 0x2,-0x2
091d 0217 | | Execute Heap_Access,All_Reference
091e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
091f 0007 | | Action Break_Optional
0920 e23c | < | Load 0x1,0x3c
0921 0007 | | Action Break_Optional
0922 e002 | | Load 0x0,0x2
0923 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0924 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0925 00e2 | | Load_Encached Integer_Cache
0926 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0927 BODY_0910:
0927 00d8 | | Load_Top At_Offset_0
0928 e402 | | Load 0x2,0x2
0929 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
092a e241 | A | Load 0x1,0x41
092b e242 | B | Load 0x1,0x42
092c e243 | C | Load 0x1,0x43
092d 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
092e 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
092f 8007 | | Call 0x0,0x7
0930 00d1 | | Pop_Control Pop_Count_1
0931 0059 | Y | Store_Top Discrete,At_Offset_1
0932 00cf | | Action Mark_Auxiliary
0933 e402 | | Load 0x2,0x2
0934 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0935 01d9 | | Execute Vector,Reverse_Bounds
0936 0263 | c | Execute Discrete,Above_Bound
0937 704d |pM | Jump_Nonzero 0x985
0938 00d8 | | Load_Top At_Offset_0
0939 e402 | | Load 0x2,0x2
093a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
093b 01d7 | | Execute Vector,Field_Read
093c a405 | | Store_Unchecked 0x2,0x5
093d 00cf | | Action Mark_Auxiliary
093e 7807 |x | Jump 0x946
093f e403 | | Load 0x2,0x3
0940 a404 | | Store_Unchecked 0x2,0x4
0941 e403 | | Load 0x2,0x3
0942 0217 | | Execute Heap_Access,All_Reference
0943 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0944 a403 | | Store_Unchecked 0x2,0x3
0945 00c9 | | Action Pop_Auxiliary_Loop
0946 e403 | | Load 0x2,0x3
0947 6806 |h | Jump_Zero 0x94e
0948 e405 | | Load 0x2,0x5
0949 e403 | | Load 0x2,0x3
094a 0217 | | Execute Heap_Access,All_Reference
094b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
094c 823f | ? | Call 0x1,0x3f
094d 77f1 |w | Jump_Nonzero 0x93f
094e 00ce | | Action Pop_Auxiliary
094f e403 | | Load 0x2,0x3
0950 6806 |h | Jump_Zero 0x957
0951 e405 | | Load 0x2,0x5
0952 e403 | | Load 0x2,0x3
0953 0217 | | Execute Heap_Access,All_Reference
0954 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0955 021e | | Execute Heap_Access,Maximum
0956 682c |h, | Jump_Zero 0x983
0957 e23b | ; | Load 0x1,0x3b
0958 0322 | " | Declare_Variable Record
0959 e405 | | Load 0x2,0x5
095a 00d9 | | Load_Top At_Offset_1
095b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
095c e403 | | Load 0x2,0x3
095d 00d9 | | Load_Top At_Offset_1
095e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
095f e23c | < | Load 0x1,0x3c
0960 e018 | | Load 0x0,0x18
0961 180d | | Execute Package,Field_Execute,Field_Number 0xd
0962 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0963 a403 | | Store_Unchecked 0x2,0x3
0964 e404 | | Load 0x2,0x4
0965 7007 |p | Jump_Nonzero 0x96d
0966 e403 | | Load 0x2,0x3
0967 e5fe | | Load 0x2,-0x2
0968 0217 | | Execute Heap_Access,All_Reference
0969 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
096a e403 | | Load 0x2,0x3
096b a404 | | Store_Unchecked 0x2,0x4
096c 7808 |x | Jump 0x975
096d e403 | | Load 0x2,0x3
096e e404 | | Load 0x2,0x4
096f 0217 | | Execute Heap_Access,All_Reference
0970 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0971 e404 | | Load 0x2,0x4
0972 0217 | | Execute Heap_Access,All_Reference
0973 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0974 a404 | | Store_Unchecked 0x2,0x4
0975 e5fe | | Load 0x2,-0x2
0976 0217 | | Execute Heap_Access,All_Reference
0977 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0978 0a01 | | Execute_Immediate Plus,0x1
0979 e5fe | | Load 0x2,-0x2
097a 0217 | | Execute Heap_Access,All_Reference
097b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
097c e5ff | | Load 0x2,-0x1
097d 0217 | | Execute Heap_Access,All_Reference
097e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
097f 0a01 | | Execute_Immediate Plus,0x1
0980 e5ff | | Load 0x2,-0x1
0981 0217 | | Execute Heap_Access,All_Reference
0982 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0983 00c8 | | Action Pop_Auxiliary_Range
0984 3fb3 |? | Loop_Increasing 0x938
0985 00ce | | Action Pop_Auxiliary
0986 0092 0d1f | | Action Push_String_Extended,0xd1f ; "Activated"
0988 e5fd | | Load 0x2,-0x3
0989 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
098a 00e0 | | Load_Encached Standard_Cache
098b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
098c 01cc | | Execute Vector,Catenate
098d 0092 0d20 | | Action Push_String_Extended,0xd20 ; " units."
098f 01cc | | Execute Vector,Catenate
0990 8240 | @ | Call 0x1,0x40
0991 e5fc | | Load 0x2,-0x4
0992 682a |h* | Jump_Zero 0x9bd
0993 e5ff | | Load 0x2,-0x1
0994 0217 | | Execute Heap_Access,All_Reference
0995 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0996 0f01 | | Execute_Immediate Equal,0x1
0997 680f |h | Jump_Zero 0x9a7
0998 e5ff | | Load 0x2,-0x1
0999 0219 | | Execute Heap_Access,All_Read
099a 00d8 | | Load_Top At_Offset_0
099b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
099c e5fc | | Load 0x2,-0x4
099d e5ff | | Load 0x2,-0x1
099e 8237 | 7 | Call 0x1,0x37
099f e402 | | Load 0x2,0x2
09a0 e002 | | Load 0x0,0x2
09a1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09a2 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
09a3 00d9 | | Load_Top At_Offset_1
09a4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09a5 00d1 | | Pop_Control Pop_Count_1
09a6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
09a7 4801 |H | Short_Literal 0x1
09a8 4802 |H | Short_Literal 0x2
09a9 e00f | | Load 0x0,0xf
09aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09ab 0334 | 4 | Declare_Variable Array,With_Constraint
09ac e5fe | | Load 0x2,-0x2
09ad 0217 | | Execute Heap_Access,All_Reference
09ae 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09af e002 | | Load 0x0,0x2
09b0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
09b1 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
09b2 4801 |H | Short_Literal 0x1
09b3 00da | | Load_Top At_Offset_2
09b4 01d6 | | Execute Vector,Field_Write
09b5 e5ff | | Load 0x2,-0x1
09b6 8220 | | Call 0x1,0x20
09b7 4802 |H | Short_Literal 0x2
09b8 00da | | Load_Top At_Offset_2
09b9 01d6 | | Execute Vector,Field_Write
09ba 6005 |` | Indirect_Literal Discrete,0x9c0,{0x00000000, 0x0000300a}
09bb e004 | | Load 0x0,0x4
09bc 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
09bd 4505 |E | Exit_Suprogram New_Top_Offset 0x5
09be 0000 0000 | | .XXX[0x2]
09c0 0000 0000 | | .LITERAL {0x00000000, 0x0000300a}
09c4 0000 0000 | | .BLANK 0000[0x4]
09c8 ; --------------------------------------------------------------------------------------
09c8 ; SUBPROGRAM
09c8 ; --------------------------------------------------------------------------------------
09c8 09cb | | .CONST 0x09cb ; Address of begin
09c9 0004 | | .CONST 0x0004 ; Address of exception handler
09ca 0001 | | .CONST 0x0001 ; Number of locals
09cb BODY_09c8:
09cb INIT_09c8:
09cb e5fb | | Load 0x2,-0x5
09cc 6836 |h6 | Jump_Zero 0xa03
09cd 00da | | Load_Top At_Offset_2
09ce 0217 | | Execute Heap_Access,All_Reference
09cf 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09d0 0f01 | | Execute_Immediate Equal,0x1
09d1 680f |h | Jump_Zero 0x9e1
09d2 4800 |H | Short_Literal 0x0
09d3 e5fc | | Load 0x2,-0x4
09d4 e5ff | | Load 0x2,-0x1
09d5 8237 | 7 | Call 0x1,0x37
09d6 e5fe | | Load 0x2,-0x2
09d7 0217 | | Execute Heap_Access,All_Reference
09d8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09d9 e5fd | | Load 0x2,-0x3
09da e002 | | Load 0x0,0x2
09db 1b16 | | Execute Package,Field_Read,Field_Number 0x16
09dc 1890 | | Execute Package,Field_Execute,Field_Number 0x90
09dd e5fe | | Load 0x2,-0x2
09de e5ff | | Load 0x2,-0x1
09df 824d | M | Call 0x1,0x4d
09e0 4506 |E | Exit_Suprogram New_Top_Offset 0x6
09e1 4801 |H | Short_Literal 0x1
09e2 4802 |H | Short_Literal 0x2
09e3 e00f | | Load 0x0,0xf
09e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09e5 0334 | 4 | Declare_Variable Array,With_Constraint
09e6 e5fe | | Load 0x2,-0x2
09e7 0217 | | Execute Heap_Access,All_Reference
09e8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09e9 e002 | | Load 0x0,0x2
09ea 1b16 | | Execute Package,Field_Read,Field_Number 0x16
09eb 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
09ec 4801 |H | Short_Literal 0x1
09ed 00da | | Load_Top At_Offset_2
09ee 01d6 | | Execute Vector,Field_Write
09ef 00db | | Load_Top At_Offset_3
09f0 8220 | | Call 0x1,0x20
09f1 4802 |H | Short_Literal 0x2
09f2 00da | | Load_Top At_Offset_2
09f3 01d6 | | Execute Vector,Field_Write
09f4 601b |` | Indirect_Literal Discrete,0xa10,{0x00000000, 0x0000300b}
09f5 e004 | | Load 0x0,0x4
09f6 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
09f7 4800 |H | Short_Literal 0x0
09f8 e5fe | | Load 0x2,-0x2
09f9 0217 | | Execute Heap_Access,All_Reference
09fa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09fb e5fd | | Load 0x2,-0x3
09fc e002 | | Load 0x0,0x2
09fd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
09fe 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
09ff e5fe | | Load 0x2,-0x2
0a00 e5ff | | Load 0x2,-0x1
0a01 824d | M | Call 0x1,0x4d
0a02 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0a03 e5fc | | Load 0x2,-0x4
0a04 e5fe | | Load 0x2,-0x2
0a05 0217 | | Execute Heap_Access,All_Reference
0a06 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a07 e5fd | | Load 0x2,-0x3
0a08 e002 | | Load 0x0,0x2
0a09 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0a0a 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0a0b e5fe | | Load 0x2,-0x2
0a0c e5ff | | Load 0x2,-0x1
0a0d 824d | M | Call 0x1,0x4d
0a0e 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0a0f 0000 | | .XXX[0x1]
0a10 0000 0000 | | .LITERAL {0x00000000, 0x0000300b}
0a14 0000 0000 | | .BLANK 0000[0x4]
0a18 ; --------------------------------------------------------------------------------------
0a18 ; SUBPROGRAM
0a18 ; --------------------------------------------------------------------------------------
0a18 0a2f | / | .CONST 0x0a2f ; Address of begin
0a19 0004 | | .CONST 0x0004 ; Address of exception handler
0a1a 0006 | | .CONST 0x0006 ; Number of locals
0a1b INIT_0a18:
0a1b e5fd | | Load 0x2,-0x3
0a1c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a1d e002 | | Load 0x0,0x2
0a1e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a1f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a20 1c08 | | Execute_Immediate Run_Utility,0x8
0a21 e5fd | | Load 0x2,-0x3
0a22 00d9 | | Load_Top At_Offset_1
0a23 016d | m | Execute Variant_Record,Structure_Write
0a24 e5fe | | Load 0x2,-0x2
0a25 0217 | | Execute Heap_Access,All_Reference
0a26 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a27 0007 | | Action Break_Optional
0a28 e23c | < | Load 0x1,0x3c
0a29 0007 | | Action Break_Optional
0a2a e002 | | Load 0x0,0x2
0a2b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0a2c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a2d 00e2 | | Load_Encached Integer_Cache
0a2e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a2f BODY_0a18:
0a2f 00d8 | | Load_Top At_Offset_0
0a30 e402 | | Load 0x2,0x2
0a31 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a32 e241 | A | Load 0x1,0x41
0a33 e242 | B | Load 0x1,0x42
0a34 e243 | C | Load 0x1,0x43
0a35 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
0a36 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
0a37 8007 | | Call 0x0,0x7
0a38 00d1 | | Pop_Control Pop_Count_1
0a39 0059 | Y | Store_Top Discrete,At_Offset_1
0a3a 00cf | | Action Mark_Auxiliary
0a3b e402 | | Load 0x2,0x2
0a3c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a3d 01d9 | | Execute Vector,Reverse_Bounds
0a3e 0263 | c | Execute Discrete,Above_Bound
0a3f 7041 |pA | Jump_Nonzero 0xa81
0a40 00d8 | | Load_Top At_Offset_0
0a41 e402 | | Load 0x2,0x2
0a42 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a43 01d7 | | Execute Vector,Field_Read
0a44 a405 | | Store_Unchecked 0x2,0x5
0a45 00cf | | Action Mark_Auxiliary
0a46 e403 | | Load 0x2,0x3
0a47 7001 |p | Jump_Nonzero 0xa49
0a48 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0a49 e405 | | Load 0x2,0x5
0a4a e403 | | Load 0x2,0x3
0a4b 0217 | | Execute Heap_Access,All_Reference
0a4c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a4d 823f | ? | Call 0x1,0x3f
0a4e 6808 |h | Jump_Zero 0xa57
0a4f e403 | | Load 0x2,0x3
0a50 a404 | | Store_Unchecked 0x2,0x4
0a51 e403 | | Load 0x2,0x3
0a52 0217 | | Execute Heap_Access,All_Reference
0a53 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a54 a403 | | Store_Unchecked 0x2,0x3
0a55 00c9 | | Action Pop_Auxiliary_Loop
0a56 7fef | | Jump 0xa46
0a57 00ce | | Action Pop_Auxiliary
0a58 e405 | | Load 0x2,0x5
0a59 e403 | | Load 0x2,0x3
0a5a 0217 | | Execute Heap_Access,All_Reference
0a5b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a5c 021f | | Execute Heap_Access,Equal
0a5d 6821 |h! | Jump_Zero 0xa7f
0a5e e404 | | Load 0x2,0x4
0a5f 7007 |p | Jump_Nonzero 0xa67
0a60 e403 | | Load 0x2,0x3
0a61 0217 | | Execute Heap_Access,All_Reference
0a62 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a63 e5fe | | Load 0x2,-0x2
0a64 0217 | | Execute Heap_Access,All_Reference
0a65 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0a66 7806 |x | Jump 0xa6d
0a67 e403 | | Load 0x2,0x3
0a68 0217 | | Execute Heap_Access,All_Reference
0a69 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a6a e404 | | Load 0x2,0x4
0a6b 0217 | | Execute Heap_Access,All_Reference
0a6c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0a6d e403 | | Load 0x2,0x3
0a6e 0217 | | Execute Heap_Access,All_Reference
0a6f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a70 a403 | | Store_Unchecked 0x2,0x3
0a71 e5fe | | Load 0x2,-0x2
0a72 0217 | | Execute Heap_Access,All_Reference
0a73 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a74 0aff | | Execute_Immediate Plus,-0x1
0a75 e5fe | | Load 0x2,-0x2
0a76 0217 | | Execute Heap_Access,All_Reference
0a77 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0a78 e5ff | | Load 0x2,-0x1
0a79 0217 | | Execute Heap_Access,All_Reference
0a7a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0a7b 0aff | | Execute_Immediate Plus,-0x1
0a7c e5ff | | Load 0x2,-0x1
0a7d 0217 | | Execute Heap_Access,All_Reference
0a7e 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0a7f 00c8 | | Action Pop_Auxiliary_Range
0a80 3fbf |? | Loop_Increasing 0xa40
0a81 00ce | | Action Pop_Auxiliary
0a82 0092 0d21 | !| Action Push_String_Extended,0xd21 ; "Deactivated"
0a84 e5fd | | Load 0x2,-0x3
0a85 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a86 00e0 | | Load_Encached Standard_Cache
0a87 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a88 01cc | | Execute Vector,Catenate
0a89 0092 0d20 | | Action Push_String_Extended,0xd20 ; " units."
0a8b 01cc | | Execute Vector,Catenate
0a8c 8240 | @ | Call 0x1,0x40
0a8d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0a8e 0000 0000 | | .XXX[0x2]
0a90 ; --------------------------------------------------------------------------------------
0a90 ; SUBPROGRAM
0a90 ; --------------------------------------------------------------------------------------
0a90 0a93 | | .CONST 0x0a93 ; Address of begin
0a91 0004 | | .CONST 0x0004 ; Address of exception handler
0a92 0001 | | .CONST 0x0001 ; Number of locals
0a93 BODY_0a90:
0a93 INIT_0a90:
0a93 00db | | Load_Top At_Offset_3
0a94 e006 | | Load 0x0,0x6
0a95 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0a96 00d9 | | Load_Top At_Offset_1
0a97 00d0 | | Action Swap_Control
0a98 0260 | ` | Execute Discrete,In_Type
0a99 7001 |p | Jump_Nonzero 0xa9b
0a9a 0801 | | Execute_Immediate Raise,0x1
0a9b 00db | | Load_Top At_Offset_3
0a9c e251 | Q | Load 0x1,0x51
0a9d e252 | R | Load 0x1,0x52
0a9e 1d53 | S | Execute_Immediate Reference_Lex_1,0x53
0a9f e00c | | Load 0x0,0xc
0aa0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0aa1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0aa2 0000 0000 | | .BLANK 0000[0x6]
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; SUBPROGRAM
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0aab | | .CONST 0x0aab ; Address of begin
0aa9 0004 | | .CONST 0x0004 ; Address of exception handler
0aaa 0001 | | .CONST 0x0001 ; Number of locals
0aab BODY_0aa8:
0aab INIT_0aa8:
0aab 00da | | Load_Top At_Offset_2
0aac 7002 |p | Jump_Nonzero 0xaaf
0aad 00db | | Load_Top At_Offset_3
0aae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0aaf 00db | | Load_Top At_Offset_3
0ab0 7002 |p | Jump_Nonzero 0xab3
0ab1 00da | | Load_Top At_Offset_2
0ab2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ab3 00da | | Load_Top At_Offset_2
0ab4 e004 | | Load 0x0,0x4
0ab5 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0ab6 6055 |`U | Indirect_Literal Discrete,0xb0c,{0x00000000, 0x00000801}
0ab7 027f | | Execute Discrete,Equal
0ab8 6824 |h$ | Jump_Zero 0xadd
0ab9 00db | | Load_Top At_Offset_3
0aba e004 | | Load 0x0,0x4
0abb 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0abc 604f |`O | Indirect_Literal Discrete,0xb0c,{0x00000000, 0x00000801}
0abd 027f | | Execute Discrete,Equal
0abe 680b |h | Jump_Zero 0xaca
0abf 00da | | Load_Top At_Offset_2
0ac0 e004 | | Load 0x0,0x4
0ac1 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0ac2 e5fe | | Load 0x2,-0x2
0ac3 e004 | | Load 0x0,0x4
0ac4 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0ac5 01cc | | Execute Vector,Catenate
0ac6 6045 |`E | Indirect_Literal Discrete,0xb0c,{0x00000000, 0x00000801}
0ac7 e004 | | Load 0x0,0x4
0ac8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ac9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0aca 00da | | Load_Top At_Offset_2
0acb e004 | | Load 0x0,0x4
0acc 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0acd 4801 |H | Short_Literal 0x1
0ace 4801 |H | Short_Literal 0x1
0acf e00f | | Load 0x0,0xf
0ad0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ad1 0334 | 4 | Declare_Variable Array,With_Constraint
0ad2 e5fe | | Load 0x2,-0x2
0ad3 e004 | | Load 0x0,0x4
0ad4 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0ad5 4801 |H | Short_Literal 0x1
0ad6 00da | | Load_Top At_Offset_2
0ad7 01d6 | | Execute Vector,Field_Write
0ad8 01cc | | Execute Vector,Catenate
0ad9 6032 |`2 | Indirect_Literal Discrete,0xb0c,{0x00000000, 0x00000801}
0ada e004 | | Load 0x0,0x4
0adb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0adc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0add 00db | | Load_Top At_Offset_3
0ade e004 | | Load 0x0,0x4
0adf 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0ae0 602b |`+ | Indirect_Literal Discrete,0xb0c,{0x00000000, 0x00000801}
0ae1 027f | | Execute Discrete,Equal
0ae2 6813 |h | Jump_Zero 0xaf6
0ae3 4801 |H | Short_Literal 0x1
0ae4 4801 |H | Short_Literal 0x1
0ae5 e00f | | Load 0x0,0xf
0ae6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ae7 0334 | 4 | Declare_Variable Array,With_Constraint
0ae8 00db | | Load_Top At_Offset_3
0ae9 e004 | | Load 0x0,0x4
0aea 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0aeb 4801 |H | Short_Literal 0x1
0aec 00da | | Load_Top At_Offset_2
0aed 01d6 | | Execute Vector,Field_Write
0aee e5fe | | Load 0x2,-0x2
0aef e004 | | Load 0x0,0x4
0af0 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0af1 01cc | | Execute Vector,Catenate
0af2 6019 |` | Indirect_Literal Discrete,0xb0c,{0x00000000, 0x00000801}
0af3 e004 | | Load 0x0,0x4
0af4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0af5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0af6 4801 |H | Short_Literal 0x1
0af7 4802 |H | Short_Literal 0x2
0af8 e00f | | Load 0x0,0xf
0af9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0afa 0334 | 4 | Declare_Variable Array,With_Constraint
0afb 00db | | Load_Top At_Offset_3
0afc e004 | | Load 0x0,0x4
0afd 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0afe 4801 |H | Short_Literal 0x1
0aff 00da | | Load_Top At_Offset_2
0b00 01d6 | | Execute Vector,Field_Write
0b01 e5fe | | Load 0x2,-0x2
0b02 e004 | | Load 0x0,0x4
0b03 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0b04 4802 |H | Short_Literal 0x2
0b05 00da | | Load_Top At_Offset_2
0b06 01d6 | | Execute Vector,Field_Write
0b07 6004 |` | Indirect_Literal Discrete,0xb0c,{0x00000000, 0x00000801}
0b08 e004 | | Load 0x0,0x4
0b09 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b0a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b0b 0000 | | .XXX[0x1]
0b0c 0000 0000 | | .LITERAL {0x00000000, 0x00000801}
0b10 ; --------------------------------------------------------------------------------------
0b10 ; SUBPROGRAM
0b10 ; --------------------------------------------------------------------------------------
0b10 0b13 | | .CONST 0x0b13 ; Address of begin
0b11 0004 | | .CONST 0x0004 ; Address of exception handler
0b12 0001 | | .CONST 0x0001 ; Number of locals
0b13 BODY_0b10:
0b13 INIT_0b10:
0b13 00da | | Load_Top At_Offset_2
0b14 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b15 7002 |p | Jump_Nonzero 0xb18
0b16 00db | | Load_Top At_Offset_3
0b17 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b18 00db | | Load_Top At_Offset_3
0b19 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b1a 7002 |p | Jump_Nonzero 0xb1d
0b1b 00da | | Load_Top At_Offset_2
0b1c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b1d 00da | | Load_Top At_Offset_2
0b1e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b1f e5fe | | Load 0x2,-0x2
0b20 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b21 0273 | s | Execute Discrete,Plus
0b22 e002 | | Load 0x0,0x2
0b23 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b24 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b25 1c08 | | Execute_Immediate Run_Utility,0x8
0b26 e5fe | | Load 0x2,-0x2
0b27 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b28 e5ff | | Load 0x2,-0x1
0b29 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b2a 8265 | e | Call 0x1,0x65
0b2b 00d9 | | Load_Top At_Offset_1
0b2c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0b2d 00db | | Load_Top At_Offset_3
0b2e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b2f e5fe | | Load 0x2,-0x2
0b30 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b31 01cc | | Execute Vector,Catenate
0b32 00d9 | | Load_Top At_Offset_1
0b33 00d8 | | Load_Top At_Offset_0
0b34 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b35 00da | | Load_Top At_Offset_2
0b36 01da | | Execute Vector,Bounds
0b37 00da | | Load_Top At_Offset_2
0b38 01da | | Execute Vector,Bounds
0b39 00da | | Load_Top At_Offset_2
0b3a 027f | | Execute Discrete,Equal
0b3b 7001 |p | Jump_Nonzero 0xb3d
0b3c 08e0 | | Execute_Immediate Raise,0xe0
0b3d 00cd | | Action Spare6_Action
0b3e 027f | | Execute Discrete,Equal
0b3f 7001 |p | Jump_Nonzero 0xb41
0b40 08e0 | | Execute_Immediate Raise,0xe0
0b41 00d2 | | Pop_Control Pop_Count_2
0b42 00d9 | | Load_Top At_Offset_1
0b43 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0b44 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b45 0000 0000 | | .XXX[0x3]
0b47 0000 | |
0b48 ; --------------------------------------------------------------------------------------
0b48 ; SUBPROGRAM
0b48 ; --------------------------------------------------------------------------------------
0b48 0b4b | K | .CONST 0x0b4b ; Address of begin
0b49 0004 | | .CONST 0x0004 ; Address of exception handler
0b4a 0001 | | .CONST 0x0001 ; Number of locals
0b4b BODY_0b48:
0b4b INIT_0b48:
0b4b 00db | | Load_Top At_Offset_3
0b4c 7004 |p | Jump_Nonzero 0xb51
0b4d e002 | | Load 0x0,0x2
0b4e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0b4f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0b50 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b51 00db | | Load_Top At_Offset_3
0b52 0217 | | Execute Heap_Access,All_Reference
0b53 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0b54 00db | | Load_Top At_Offset_3
0b55 8267 | g | Call 0x1,0x67
0b56 e5fe | | Load 0x2,-0x2
0b57 0217 | | Execute Heap_Access,All_Reference
0b58 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b59 e5ff | | Load 0x2,-0x1
0b5a e002 | | Load 0x0,0x2
0b5b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0b5c 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0b5d 8266 | f | Call 0x1,0x66
0b5e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0b5f 0000 | | .XXX[0x1]
0b60 ; --------------------------------------------------------------------------------------
0b60 ; SUBPROGRAM
0b60 ; --------------------------------------------------------------------------------------
0b60 0b6f | o | .CONST 0x0b6f ; Address of begin
0b61 0bb5 | | .CONST 0x0bb5 ; Address of exception handler
0b62 0004 | | .CONST 0x0004 ; Number of locals
0b63 INIT_0b60:
0b63 e003 | | Load 0x0,0x3
0b64 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b65 02c7 | | Declare_Variable Any
0b66 00d8 | | Load_Top At_Offset_0
0b67 1c00 | | Execute_Immediate Run_Utility,0x0
0b68 e01d | | Load 0x0,0x1d
0b69 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0b6a 02c7 | | Declare_Variable Any
0b6b 00d8 | | Load_Top At_Offset_0
0b6c 1c00 | | Execute_Immediate Run_Utility,0x0
0b6d e003 | | Load 0x0,0x3
0b6e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b6f BODY_0b60:
0b6f 00be | | Action Activate_Tasks
0b70 e5fe | | Load 0x2,-0x2
0b71 6842 |hB | Jump_Zero 0xbb4
0b72 e5fe | | Load 0x2,-0x2
0b73 0217 | | Execute Heap_Access,All_Reference
0b74 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0b75 c402 | | Store 0x2,0x2
0b76 00da | | Load_Top At_Offset_2
0b77 e003 | | Load 0x0,0x3
0b78 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b79 6805 |h | Jump_Zero 0xb7f
0b7a e01e | | Load 0x0,0x1e
0b7b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b7c e01e | | Load 0x0,0x1e
0b7d 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0b7e c402 | | Store 0x2,0x2
0b7f e003 | | Load 0x0,0x3
0b80 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b81 00da | | Load_Top At_Offset_2
0b82 4800 |H | Short_Literal 0x0
0b83 4800 |H | Short_Literal 0x0
0b84 e01a | | Load 0x0,0x1a
0b85 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b86 e402 | | Load 0x2,0x2
0b87 e01d | | Load 0x0,0x1d
0b88 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0b89 c403 | | Store 0x2,0x3
0b8a 0059 | Y | Store_Top Discrete,At_Offset_1
0b8b 00d8 | | Load_Top At_Offset_0
0b8c 681b |h | Jump_Zero 0xba8
0b8d e003 | | Load 0x0,0x3
0b8e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b8f c5fd | | Store 0x2,-0x3
0b90 e004 | | Load 0x0,0x4
0b91 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b92 4801 |H | Short_Literal 0x1
0b93 4802 |H | Short_Literal 0x2
0b94 e00f | | Load 0x0,0xf
0b95 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b96 0334 | 4 | Declare_Variable Array,With_Constraint
0b97 e402 | | Load 0x2,0x2
0b98 e00f | | Load 0x0,0xf
0b99 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0b9a 4801 |H | Short_Literal 0x1
0b9b 00da | | Load_Top At_Offset_2
0b9c 01d6 | | Execute Vector,Field_Write
0b9d 00da | | Load_Top At_Offset_2
0b9e e00f | | Load 0x0,0xf
0b9f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0ba0 4802 |H | Short_Literal 0x2
0ba1 00da | | Load_Top At_Offset_2
0ba2 01d6 | | Execute Vector,Field_Write
0ba3 603c |`< | Indirect_Literal Discrete,0xbe0,{0x00000000, 0x00003003}
0ba4 e004 | | Load 0x0,0x4
0ba5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0ba6 c5fc | | Store 0x2,-0x4
0ba7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ba8 00d9 | | Load_Top At_Offset_1
0ba9 e5ff | | Load 0x2,-0x1
0baa e01d | | Load 0x0,0x1d
0bab 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0bac c5fd | | Store 0x2,-0x3
0bad e003 | | Load 0x0,0x3
0bae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0baf 00da | | Load_Top At_Offset_2
0bb0 e01d | | Load 0x0,0x1d
0bb1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0bb2 c403 | | Store 0x2,0x3
0bb3 0059 | Y | Store_Top Discrete,At_Offset_1
0bb4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0bb5 TRAP_0b60:
0bb5 e01d | | Load 0x0,0x1d
0bb6 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0bb7 010f | | Execute Exception,Equal
0bb8 681f |h | Jump_Zero 0xbd8
0bb9 e003 | | Load 0x0,0x3
0bba 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bbb 00db | | Load_Top At_Offset_3
0bbc e01d | | Load 0x0,0x1d
0bbd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0bbe c403 | | Store 0x2,0x3
0bbf 005a | Z | Store_Top Discrete,At_Offset_2
0bc0 e004 | | Load 0x0,0x4
0bc1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bc2 4801 |H | Short_Literal 0x1
0bc3 4802 |H | Short_Literal 0x2
0bc4 e00f | | Load 0x0,0xf
0bc5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bc6 0334 | 4 | Declare_Variable Array,With_Constraint
0bc7 e5ff | | Load 0x2,-0x1
0bc8 e00f | | Load 0x0,0xf
0bc9 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0bca 4801 |H | Short_Literal 0x1
0bcb 00da | | Load_Top At_Offset_2
0bcc 01d6 | | Execute Vector,Field_Write
0bcd e402 | | Load 0x2,0x2
0bce e00f | | Load 0x0,0xf
0bcf 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0bd0 4802 |H | Short_Literal 0x2
0bd1 00da | | Load_Top At_Offset_2
0bd2 01d6 | | Execute Vector,Field_Write
0bd3 6008 |` | Indirect_Literal Discrete,0xbdc,{0x00000000, 0x00003009}
0bd4 e004 | | Load 0x0,0x4
0bd5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0bd6 c5fc | | Store 0x2,-0x4
0bd7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0bd8 0100 | | Execute Exception,Raise
0bd9 0000 0000 | | .XXX[0x3]
0bdb 0000 | |
0bdc 0000 0000 | | .LITERAL {0x00000000, 0x00003009}
0be0 0000 0000 | | .LITERAL {0x00000000, 0x00003003}
0be4 0000 0000 | | .BLANK 0000[0x4]
0be8 ; --------------------------------------------------------------------------------------
0be8 ; SUBPROGRAM
0be8 ; --------------------------------------------------------------------------------------
0be8 0bf9 | | .CONST 0x0bf9 ; Address of begin
0be9 0004 | | .CONST 0x0004 ; Address of exception handler
0bea 0004 | | .CONST 0x0004 ; Number of locals
0beb INIT_0be8:
0beb e23e | > | Load 0x1,0x3e
0bec 0007 | | Action Break_Optional
0bed e003 | | Load 0x0,0x3
0bee 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bef 02c7 | | Declare_Variable Any
0bf0 00d8 | | Load_Top At_Offset_0
0bf1 1c00 | | Execute_Immediate Run_Utility,0x0
0bf2 e5ff | | Load 0x2,-0x1
0bf3 e002 | | Load 0x0,0x2
0bf4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0bf5 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0bf6 e003 | | Load 0x0,0x3
0bf7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0bf8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0bf9 BODY_0be8:
0bf9 e5fe | | Load 0x2,-0x2
0bfa 685d |h] | Jump_Zero 0xc58
0bfb e5fe | | Load 0x2,-0x2
0bfc 0217 | | Execute Heap_Access,All_Reference
0bfd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0bfe 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0bff e002 | | Load 0x0,0x2
0c00 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c01 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c02 a5fd | | Store_Unchecked 0x2,-0x3
0c03 e5ff | | Load 0x2,-0x1
0c04 e002 | | Load 0x0,0x2
0c05 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c06 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0c07 c403 | | Store 0x2,0x3
0c08 00d9 | | Load_Top At_Offset_1
0c09 e003 | | Load 0x0,0x3
0c0a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c0b 6810 |h | Jump_Zero 0xc1c
0c0c e5fc | | Load 0x2,-0x4
0c0d 00da | | Load_Top At_Offset_2
0c0e 0120 | | Execute Any,Is_Value
0c0f 6803 |h | Jump_Zero 0xc13
0c10 e003 | | Load 0x0,0x3
0c11 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c12 7801 |x | Jump 0xc14
0c13 00da | | Load_Top At_Offset_2
0c14 e5fe | | Load 0x2,-0x2
0c15 e5ff | | Load 0x2,-0x1
0c16 e002 | | Load 0x0,0x2
0c17 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c18 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0c19 8268 | h | Call 0x1,0x68
0c1a c403 | | Store 0x2,0x3
0c1b c5fc | | Store 0x2,-0x4
0c1c e5fc | | Load 0x2,-0x4
0c1d 703a |p: | Jump_Nonzero 0xc58
0c1e 00cf | | Action Mark_Auxiliary
0c1f 7810 |x | Jump 0xc30
0c20 00da | | Load_Top At_Offset_2
0c21 e402 | | Load 0x2,0x2
0c22 0217 | | Execute Heap_Access,All_Reference
0c23 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0c24 012f | / | Execute Any,Equal
0c25 6805 |h | Jump_Zero 0xc2b
0c26 00db | | Load_Top At_Offset_3
0c27 0217 | | Execute Heap_Access,All_Reference
0c28 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c29 a5fd | | Store_Unchecked 0x2,-0x3
0c2a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c2b 00db | | Load_Top At_Offset_3
0c2c 0217 | | Execute Heap_Access,All_Reference
0c2d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c2e a402 | | Store_Unchecked 0x2,0x2
0c2f 00c9 | | Action Pop_Auxiliary_Loop
0c30 00db | | Load_Top At_Offset_3
0c31 77ee |w | Jump_Nonzero 0xc20
0c32 00ce | | Action Pop_Auxiliary
0c33 4801 |H | Short_Literal 0x1
0c34 e239 | 9 | Load 0x1,0x39
0c35 00da | | Load_Top At_Offset_2
0c36 e019 | | Load 0x0,0x19
0c37 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0c38 7006 |p | Jump_Nonzero 0xc3f
0c39 4801 |H | Short_Literal 0x1
0c3a e23a | : | Load 0x1,0x3a
0c3b 00da | | Load_Top At_Offset_2
0c3c e019 | | Load 0x0,0x19
0c3d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0c3e 7801 |x | Jump 0xc40
0c3f 4801 |H | Short_Literal 0x1
0c40 7017 |p | Jump_Nonzero 0xc58
0c41 e004 | | Load 0x0,0x4
0c42 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c43 4801 |H | Short_Literal 0x1
0c44 4802 |H | Short_Literal 0x2
0c45 e00f | | Load 0x0,0xf
0c46 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c47 0334 | 4 | Declare_Variable Array,With_Constraint
0c48 e5ff | | Load 0x2,-0x1
0c49 e002 | | Load 0x0,0x2
0c4a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0c4b 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
0c4c 4801 |H | Short_Literal 0x1
0c4d 00da | | Load_Top At_Offset_2
0c4e 01d6 | | Execute Vector,Field_Write
0c4f e5fe | | Load 0x2,-0x2
0c50 8220 | | Call 0x1,0x20
0c51 4802 |H | Short_Literal 0x2
0c52 00da | | Load_Top At_Offset_2
0c53 01d6 | | Execute Vector,Field_Write
0c54 6007 |` | Indirect_Literal Discrete,0xc5c,{0x00000000, 0x00003008}
0c55 e004 | | Load 0x0,0x4
0c56 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0c57 c5fc | | Store 0x2,-0x4
0c58 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c59 0000 0000 | | .XXX[0x3]
0c5b 0000 | |
0c5c 0000 0000 | | .LITERAL {0x00000000, 0x00003008}
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c6a | j | .CONST 0x0c6a ; Address of begin
0c61 0004 | | .CONST 0x0004 ; Address of exception handler
0c62 0002 | | .CONST 0x0002 ; Number of locals
0c63 INIT_0c60:
0c63 e402 | | Load 0x2,0x2
0c64 0217 | | Execute Heap_Access,All_Reference
0c65 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0c66 e002 | | Load 0x0,0x2
0c67 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c68 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c69 1c08 | | Execute_Immediate Run_Utility,0x8
0c6a BODY_0c60:
0c6a e402 | | Load 0x2,0x2
0c6b 0217 | | Execute Heap_Access,All_Reference
0c6c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0c6d a403 | | Store_Unchecked 0x2,0x3
0c6e 00cf | | Action Mark_Auxiliary
0c6f 00d9 | | Load_Top At_Offset_1
0c70 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c71 01d9 | | Execute Vector,Reverse_Bounds
0c72 0263 | c | Execute Discrete,Above_Bound
0c73 700d |p | Jump_Nonzero 0xc81
0c74 e403 | | Load 0x2,0x3
0c75 0217 | | Execute Heap_Access,All_Reference
0c76 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c77 00d9 | | Load_Top At_Offset_1
0c78 e602 | | Load 0x3,0x2
0c79 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c7a 01d6 | | Execute Vector,Field_Write
0c7b e403 | | Load 0x2,0x3
0c7c 0217 | | Execute Heap_Access,All_Reference
0c7d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c7e a403 | | Store_Unchecked 0x2,0x3
0c7f 00c8 | | Action Pop_Auxiliary_Range
0c80 3ff3 |? | Loop_Increasing 0xc74
0c81 00ce | | Action Pop_Auxiliary
0c82 e5ff | | Load 0x2,-0x1
0c83 0217 | | Execute Heap_Access,All_Reference
0c84 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0c85 00d9 | | Load_Top At_Offset_1
0c86 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0c87 00d8 | | Load_Top At_Offset_0
0c88 00cb | | Action Pop_Block_With_Result
0c89 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0c8a 0000 0000 | | .BLANK 0000[0x6]
0c90 ; --------------------------------------------------------------------------------------
0c90 ; SUBPROGRAM
0c90 ; --------------------------------------------------------------------------------------
0c90 0c9a | | .CONST 0x0c9a ; Address of begin
0c91 0004 | | .CONST 0x0004 ; Address of exception handler
0c92 0002 | | .CONST 0x0002 ; Number of locals
0c93 INIT_0c90:
0c93 e5ff | | Load 0x2,-0x1
0c94 0217 | | Execute Heap_Access,All_Reference
0c95 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0c96 e002 | | Load 0x0,0x2
0c97 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c98 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0c99 1c08 | | Execute_Immediate Run_Utility,0x8
0c9a BODY_0c90:
0c9a e402 | | Load 0x2,0x2
0c9b 0217 | | Execute Heap_Access,All_Reference
0c9c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0c9d a403 | | Store_Unchecked 0x2,0x3
0c9e 00cf | | Action Mark_Auxiliary
0c9f 00d9 | | Load_Top At_Offset_1
0ca0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ca1 01d9 | | Execute Vector,Reverse_Bounds
0ca2 0263 | c | Execute Discrete,Above_Bound
0ca3 7017 |p | Jump_Nonzero 0xcbb
0ca4 e403 | | Load 0x2,0x3
0ca5 7008 |p | Jump_Nonzero 0xcae
0ca6 e402 | | Load 0x2,0x2
0ca7 0217 | | Execute Heap_Access,All_Reference
0ca8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ca9 a402 | | Store_Unchecked 0x2,0x2
0caa e402 | | Load 0x2,0x2
0cab 0217 | | Execute Heap_Access,All_Reference
0cac 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0cad a403 | | Store_Unchecked 0x2,0x3
0cae e403 | | Load 0x2,0x3
0caf 0217 | | Execute Heap_Access,All_Reference
0cb0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0cb1 00d9 | | Load_Top At_Offset_1
0cb2 e602 | | Load 0x3,0x2
0cb3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0cb4 01d6 | | Execute Vector,Field_Write
0cb5 e403 | | Load 0x2,0x3
0cb6 0217 | | Execute Heap_Access,All_Reference
0cb7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0cb8 a403 | | Store_Unchecked 0x2,0x3
0cb9 00c8 | | Action Pop_Auxiliary_Range
0cba 3fe9 |? | Loop_Increasing 0xca4
0cbb 00ce | | Action Pop_Auxiliary
0cbc e5ff | | Load 0x2,-0x1
0cbd 0217 | | Execute Heap_Access,All_Reference
0cbe 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0cbf 00d9 | | Load_Top At_Offset_1
0cc0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0cc1 00d8 | | Load_Top At_Offset_0
0cc2 00cb | | Action Pop_Block_With_Result
0cc3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0cc4 0000 0000 | | .BLANK 0000[0x4]
0cc8 ; --------------------------------------------------------------------------------------
0cc8 ; SUBPROGRAM
0cc8 ; --------------------------------------------------------------------------------------
0cc8 0ce6 | | .CONST 0x0ce6 ; Address of begin
0cc9 0004 | | .CONST 0x0004 ; Address of exception handler
0cca 001a | | .CONST 0x001a ; Number of locals
0ccb INIT_0cc8:
0ccb 029a 0ceb | | Declare_Subprogram INIT_0ce8,For_Outer_Call,Visible,Unelaborated
0ccd 029a 0d03 | | Declare_Subprogram INIT_0d00,For_Outer_Call,Visible,Unelaborated
0ccf 00bf | | Action Accept_Activation
0cd0 e001 | | Load 0x0,0x1
0cd1 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0cd2 00c6 | | Action Check_Subprogram_Elaborated
0cd3 e20f | | Load 0x1,0xf
0cd4 e210 | | Load 0x1,0x10
0cd5 e002 | | Load 0x0,0x2
0cd6 e003 | | Load 0x0,0x3
0cd7 4800 |H | Short_Literal 0x0
0cd8 0007 | | Action Break_Optional
0cd9 e004 | | Load 0x0,0x4
0cda e005 | | Load 0x0,0x5
0cdb e20f | | Load 0x1,0xf
0cdc e210 | | Load 0x1,0x10
0cdd e001 | | Load 0x0,0x1
0cde 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0cdf 0387 | | Declare_Variable Package
0ce0 00d8 | | Load_Top At_Offset_0
0ce1 020f | | Execute Module,Activate
0ce2 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0ce3 00c7 | | Action Elaborate_Subprogram
0ce4 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0ce5 00c7 | | Action Elaborate_Subprogram
0ce6 BODY_0cc8:
0ce6 00bc | | Action Signal_Activated
0ce7 00bb | | Action Signal_Completion
0ce8 ; --------------------------------------------------------------------------------------
0ce8 ; SUBPROGRAM
0ce8 ; --------------------------------------------------------------------------------------
0ce8 0ceb | | .CONST 0x0ceb ; Address of begin
0ce9 0cf8 | | .CONST 0x0cf8 ; Address of exception handler
0cea 0001 | | .CONST 0x0001 ; Number of locals
0ceb BODY_0ce8:
0ceb INIT_0ce8:
0ceb 00da | | Load_Top At_Offset_2
0cec 0217 | | Execute Heap_Access,All_Reference
0ced 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0cee e006 | | Load 0x0,0x6
0cef 180d | | Execute Package,Field_Execute,Field_Number 0xd
0cf0 e215 | | Load 0x1,0x15
0cf1 e216 | | Load 0x1,0x16
0cf2 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0cf3 e001 | | Load 0x0,0x1
0cf4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0cf5 e210 | | Load 0x1,0x10
0cf6 0213 | | Execute Heap_Access,Check_In_Type
0cf7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0cf8 TRAP_0ce8:
0cf8 486b |Hk | Short_Literal 0x6b
0cf9 010f | | Execute Exception,Equal
0cfa 6802 |h | Jump_Zero 0xcfd
0cfb e210 | | Load 0x1,0x10
0cfc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0cfd 0100 | | Execute Exception,Raise
0cfe 0000 0000 | | .XXX[0x2]
0d00 ; --------------------------------------------------------------------------------------
0d00 ; SUBPROGRAM
0d00 ; --------------------------------------------------------------------------------------
0d00 0d0a | | .CONST 0x0d0a ; Address of begin
0d01 0004 | | .CONST 0x0004 ; Address of exception handler
0d02 0002 | | .CONST 0x0002 ; Number of locals
0d03 INIT_0d00:
0d03 00db | | Load_Top At_Offset_3
0d04 e20f | | Load 0x1,0xf
0d05 0119 | | Execute Any,Check_In_Formal_Type
0d06 e210 | | Load 0x1,0x10
0d07 e006 | | Load 0x0,0x6
0d08 180d | | Execute Package,Field_Execute,Field_Number 0xd
0d09 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0d0a BODY_0d00:
0d0a 00d8 | | Load_Top At_Offset_0
0d0b e210 | | Load 0x1,0x10
0d0c 0213 | | Execute Heap_Access,Check_In_Type
0d0d e21a | | Load 0x1,0x1a
0d0e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0d0f e5ff | | Load 0x2,-0x1
0d10 0217 | | Execute Heap_Access,All_Reference
0d11 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0d12 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0d13 ; --------------------------------------------------------------------------------------
0d13 ; STRING TABLE
0d13 ; --------------------------------------------------------------------------------------
0d13 0020 | | .STRTAB 0x0020->0x0d23 ; "!IO"
0d14 0021 | ! | .STRTAB 0x0021->0x0d24 ; "!LRM"
0d15 0023 | # | .STRTAB 0x0023->0x0d26 ; "<NONE>"
0d16 0027 | ' | .STRTAB 0x0027->0x0d29 ; "Domain for \x22"
0d17 0031 | 1 | .STRTAB 0x0031->0x0d2f ; "\x22 has been opened."
0d18 0041 | A | .STRTAB 0x0041->0x0d38 ; "State "
0d19 0045 | E | .STRTAB 0x0045->0x0d3b ; " is being removed from the domain."
0d1a 0065 | e | .STRTAB 0x0065->0x0d4c ; "[_"
0d1b 0065 | e | .STRTAB 0x0065->0x0d4d ; "]'C(~Spec_View)"
0d1c 0072 | r | .STRTAB 0x0072->0x0d55 ; "Can't remove (or find) "
0d1d 0087 | | .STRTAB 0x0087->0x0d60 ; " from the domain."
0d1e 0096 | | .STRTAB 0x0096->0x0d69 ; "the specified domain"
0d1f 00a8 | | .STRTAB 0x00a8->0x0d73 ; "Activated"
0d20 00af | | .STRTAB 0x00af->0x0d77 ; " units."
0d21 00b4 | | .STRTAB 0x00b4->0x0d7b ; "Deactivated"
0d22 00bd | | .STREND 0x00bd->0x0d80
0d23 2149 4f21 |!IO!| .STRTAB_STRINGS
0d81 0000 0000 | | .BLANK 0000[0x7]
0d88 ; --------------------------------------------------------------------------------------
0d88 ; Debug Table
0d88 ; --------------------------------------------------------------------------------------
0d88 0004 0009 | | .DEBUG4 0x0004,0x0009,0xeb31,0x0000,0x0001,0x0000
0d8e 0000 0000 | | .XXX[0x6]
0d90 0046 74c2 | Ft |
0d92 0000 4a44 | JD|
0d94 0000 0000 | | .BLANK 0000[0x4]
0d98 0046 74c2 | Ft | .XXX[0x4]
0d9a 0000 4e44 | ND|
0d9c 0000 0000 | | .BLANK 0000[0x4]
0da0 0046 74c2 | Ft | .XXX[0x4]
0da2 0000 5344 | SD|
0da4 0000 0000 | | .BLANK 0000[0x4]
0da8 0046 74c2 | Ft | .XXX[0x4]
0daa 0000 5a44 | ZD|
0dac 0000 0000 | | .BLANK 0000[0x4]
0db0 0046 74c2 | Ft | .XXX[0x4]
0db2 0000 5dc4 | ] |
0db4 0000 0000 | | .BLANK 0000[0x4]
0db8 0046 74c2 | Ft | .XXX[0x4]
0dba 0000 61c4 | a |
0dbc 0000 0000 | | .BLANK 0000[0x4]
0dc0 0046 74c2 | Ft | .XXX[0x4]
0dc2 0000 6944 | iD|
0dc4 0000 0000 | | .BLANK 0000[0x4]
0dc8 0046 74c2 | Ft | .XXX[0x4]
0dca 0000 6d44 | mD|
0dcc 0000 0000 | | .BLANK 0000[0x4]
0dd0 0046 74c2 | Ft | .XXX[0x4]
0dd2 0000 7544 | uD|
0dd4 0000 0000 | | .BLANK 0000[0x4]
0dd8 0046 74c2 | Ft | .XXX[0x4]
0dda 0000 7944 | yD|
0ddc 0000 0000 | | .BLANK 0000[0x4]
0de0 0046 74c2 | Ft | .XXX[0x4]
0de2 0000 8144 | D|
0de4 0000 0000 | | .BLANK 0000[0x4]
0de8 0046 74c2 | Ft | .XXX[0x4]
0dea 0000 85c4 | |
0dec 0000 0000 | | .BLANK 0000[0x4]
0df0 0046 74c2 | Ft | .XXX[0x4]
0df2 0000 8d44 | D|
0df4 0000 0000 | | .BLANK 0000[0x4]
0df8 0046 74c2 | Ft | .XXX[0x4]
0dfa 0000 90c4 | |
0dfc 0000 0000 | | .BLANK 0000[0x4]