|
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: 10240 (0x2800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦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 1238 | 8 | .CONST 0x1238 ; 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 800b | | .CONST 0x800b ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 02f4 | | .CONST 0x02f4 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 005c | \ | .CONST 0x005c ; Number of locals
000b INIT_0008:
000b 4fff |O | Short_Literal -0x1
000c 6327 |c' | Indirect_Literal Discrete,0x334,{0x00000000, 0x7fffffff}
000d 00e2 | | Load_Encached Integer_Cache
000e 03f9 | | Declare_Type Discrete,Constrained,Visible
000f e001 | | Load 0x0,0x1
0010 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0011 0129 | ) | Execute Any,Make_Visible
0012 e001 | | Load 0x0,0x1
0013 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0014 0129 | ) | Execute Any,Make_Visible
0015 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0016 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0017 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0018 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0019 4800 |H | Short_Literal 0x0
001a e002 | | Load 0x0,0x2
001b 02a0 | | Declare_Subprogram Null_Subprogram
001c 038f | | Declare_Type Package,Defined,Visible
001d 00b6 | | Action Make_Scope
001e e003 | | Load 0x0,0x3
001f e004 | | Load 0x0,0x4
0020 e005 | | Load 0x0,0x5
0021 4804 |H | Short_Literal 0x4
0022 e214 | | Load 0x1,0x14
0023 020e | | Execute Module,Augment_Imports
0024 0386 | | Declare_Variable Package,Visible
0025 4800 |H | Short_Literal 0x0
0026 e006 | | Load 0x0,0x6
0027 02a0 | | Declare_Subprogram Null_Subprogram
0028 038f | | Declare_Type Package,Defined,Visible
0029 00b6 | | Action Make_Scope
002a e005 | | Load 0x0,0x5
002b e003 | | Load 0x0,0x3
002c e004 | | Load 0x0,0x4
002d 4804 |H | Short_Literal 0x4
002e e215 | | Load 0x1,0x15
002f 020e | | Execute Module,Augment_Imports
0030 0386 | | Declare_Variable Package,Visible
0031 4800 |H | Short_Literal 0x0
0032 e007 | | Load 0x0,0x7
0033 02a0 | | Declare_Subprogram Null_Subprogram
0034 038f | | Declare_Type Package,Defined,Visible
0035 00b6 | | Action Make_Scope
0036 e003 | | Load 0x0,0x3
0037 e005 | | Load 0x0,0x5
0038 4803 |H | Short_Literal 0x3
0039 e216 | | Load 0x1,0x16
003a 020e | | Execute Module,Augment_Imports
003b 0386 | | Declare_Variable Package,Visible
003c 4800 |H | Short_Literal 0x0
003d 0093 0b43 | C| push_full_address INIT_0b40
003f 02a0 | | Declare_Subprogram Null_Subprogram
0040 038f | | Declare_Type Package,Defined,Visible
0041 0386 | | Declare_Variable Package,Visible
0042 00c4 | | Action Make_Default
0043 00c4 | | Action Make_Default
0044 00c4 | | Action Make_Default
0045 00c4 | | Action Make_Default
0046 00c4 | | Action Make_Default
0047 00c4 | | Action Make_Default
0048 00c4 | | Action Make_Default
0049 00c4 | | Action Make_Default
004a 00c4 | | Action Make_Default
004b 00c4 | | Action Make_Default
004c 00c4 | | Action Make_Default
004d 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated
004f c221 | ! | Store 0x1,0x21
0050 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated
0052 c21f | | Store 0x1,0x1f
0053 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated
0055 c220 | | Store 0x1,0x20
0056 4816 |H | Short_Literal 0x16
0057 032a | * | Declare_Type Record,Incomplete
0058 c21a | | Store 0x1,0x1a
0059 e21a | | Load 0x1,0x1a
005a 02a0 | | Declare_Subprogram Null_Subprogram
005b e212 | | Load 0x1,0x12
005c 03a3 | | Complete_Type Heap_Access,By_Defining
005d 4809 |H | Short_Literal 0x9
005e 032a | * | Declare_Type Record,Incomplete
005f c21b | | Store 0x1,0x1b
0060 e21b | | Load 0x1,0x1b
0061 02a0 | | Declare_Subprogram Null_Subprogram
0062 e213 | | Load 0x1,0x13
0063 03a3 | | Complete_Type Heap_Access,By_Defining
0064 481d |H | Short_Literal 0x1d
0065 032a | * | Declare_Type Record,Incomplete
0066 c21c | | Store 0x1,0x1c
0067 e21c | | Load 0x1,0x1c
0068 02a0 | | Declare_Subprogram Null_Subprogram
0069 e210 | | Load 0x1,0x10
006a 03a3 | | Complete_Type Heap_Access,By_Defining
006b 4809 |H | Short_Literal 0x9
006c 032a | * | Declare_Type Record,Incomplete
006d c21d | | Store 0x1,0x1d
006e e21d | | Load 0x1,0x1d
006f 02a0 | | Declare_Subprogram Null_Subprogram
0070 e211 | | Load 0x1,0x11
0071 03a3 | | Complete_Type Heap_Access,By_Defining
0072 00bf | | Action Accept_Activation
0073 00e1 | | Load_Encached Boolean_Cache
0074 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0075 e008 | | Load 0x0,0x8
0076 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0077 02c7 | | Declare_Variable Any
0078 00d8 | | Load_Top At_Offset_0
0079 1c00 | | Execute_Immediate Run_Utility,0x0
007a e008 | | Load 0x0,0x8
007b 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
007c 02c7 | | Declare_Variable Any
007d 00d8 | | Load_Top At_Offset_0
007e 1c00 | | Execute_Immediate Run_Utility,0x0
007f 00e2 | | Load_Encached Integer_Cache
0080 00e2 | | Load_Encached Integer_Cache
0081 4800 |H | Short_Literal 0x0
0082 0093 106b | k| push_full_address INIT_1068
0084 02a0 | | Declare_Subprogram Null_Subprogram
0085 038e | | Declare_Type Package,Defined
0086 e009 | | Load 0x0,0x9
0087 4801 |H | Short_Literal 0x1
0088 00da | | Load_Top At_Offset_2
0089 020e | | Execute Module,Augment_Imports
008a 0387 | | Declare_Variable Package
008b 4800 |H | Short_Literal 0x0
008c e00a | | Load 0x0,0xa
008d 02a0 | | Declare_Subprogram Null_Subprogram
008e 038e | | Declare_Type Package,Defined
008f e00b | | Load 0x0,0xb
0090 00b6 | | Action Make_Scope
0091 e00c | | Load 0x0,0xc
0092 e228 | ( | Load 0x1,0x28
0093 e00d | | Load 0x0,0xd
0094 e00e | | Load 0x0,0xe
0095 e00f | | Load 0x0,0xf
0096 4807 |H | Short_Literal 0x7
0097 e229 | ) | Load 0x1,0x29
0098 020e | | Execute Module,Augment_Imports
0099 0387 | | Declare_Variable Package
009a 4800 |H | Short_Literal 0x0
009b 0093 0f3b | ;| push_full_address INIT_0f38
009d 02a0 | | Declare_Subprogram Null_Subprogram
009e 038e | | Declare_Type Package,Defined
009f e010 | | Load 0x0,0x10
00a0 e011 | | Load 0x0,0x11
00a1 e228 | ( | Load 0x1,0x28
00a2 e00b | | Load 0x0,0xb
00a3 e012 | | Load 0x0,0x12
00a4 00b6 | | Action Make_Scope
00a5 4806 |H | Short_Literal 0x6
00a6 e22a | * | Load 0x1,0x2a
00a7 020e | | Execute Module,Augment_Imports
00a8 0387 | | Declare_Variable Package
00a9 4800 |H | Short_Literal 0x0
00aa 0093 0cd3 | | push_full_address INIT_0cd0
00ac 02a0 | | Declare_Subprogram Null_Subprogram
00ad 038e | | Declare_Type Package,Defined
00ae 00b6 | | Action Make_Scope
00af e003 | | Load 0x0,0x3
00b0 e00b | | Load 0x0,0xb
00b1 e013 | | Load 0x0,0x13
00b2 e014 | | Load 0x0,0x14
00b3 e015 | | Load 0x0,0x15
00b4 e012 | | Load 0x0,0x12
00b5 4807 |H | Short_Literal 0x7
00b6 e22b | + | Load 0x1,0x2b
00b7 020e | | Execute Module,Augment_Imports
00b8 0387 | | Declare_Variable Package
00b9 4800 |H | Short_Literal 0x0
00ba 0093 0b53 | S| push_full_address INIT_0b50
00bc 02a0 | | Declare_Subprogram Null_Subprogram
00bd 038e | | Declare_Type Package,Defined
00be 0387 | | Declare_Variable Package
00bf 4800 |H | Short_Literal 0x0
00c0 626f |bo | Indirect_Literal Discrete,0x330,{0x00000000, 0x00007fff}
00c1 00e2 | | Load_Encached Integer_Cache
00c2 03f8 | | Declare_Type Discrete,Constrained
00c3 00d8 | | Load_Top At_Offset_0
00c4 00d9 | | Load_Top At_Offset_1
00c5 00da | | Load_Top At_Offset_2
00c6 00db | | Load_Top At_Offset_3
00c7 e22d | - | Load 0x1,0x2d
00c8 00d8 | | Load_Top At_Offset_0
00c9 e22d | - | Load 0x1,0x2d
00ca 00d8 | | Load_Top At_Offset_0
00cb e22d | - | Load 0x1,0x2d
00cc 00d8 | | Load_Top At_Offset_0
00cd e22d | - | Load 0x1,0x2d
00ce 00d8 | | Load_Top At_Offset_0
00cf e22d | - | Load 0x1,0x2d
00d0 02a0 | | Declare_Subprogram Null_Subprogram
00d1 480d |H | Short_Literal 0xd
00d2 032d | - | Declare_Type Record,Defined
00d3 00d8 | | Load_Top At_Offset_0
00d4 e216 | | Load 0x1,0x16
00d5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00d6 00e2 | | Load_Encached Integer_Cache
00d7 00e2 | | Load_Encached Integer_Cache
00d8 00e2 | | Load_Encached Integer_Cache
00d9 00e2 | | Load_Encached Integer_Cache
00da e228 | ( | Load 0x1,0x28
00db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00dc e228 | ( | Load 0x1,0x28
00dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00de e00c | | Load 0x0,0xc
00df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e0 00e1 | | Load_Encached Boolean_Cache
00e1 e228 | ( | Load 0x1,0x28
00e2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e3 00e1 | | Load_Encached Boolean_Cache
00e4 00e1 | | Load_Encached Boolean_Cache
00e5 e229 | ) | Load 0x1,0x29
00e6 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
00e7 e229 | ) | Load 0x1,0x29
00e8 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
00e9 e229 | ) | Load 0x1,0x29
00ea 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
00eb e229 | ) | Load 0x1,0x29
00ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00ed e229 | ) | Load 0x1,0x29
00ee 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00ef e009 | | Load 0x0,0x9
00f0 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
00f1 e016 | | Load 0x0,0x16
00f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f3 e22a | * | Load 0x1,0x2a
00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f5 e22b | + | Load 0x1,0x2b
00f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f7 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call
00f9 e21a | | Load 0x1,0x1a
00fa 0326 | & | Complete_Type Record,By_Defining
00fb e004 | | Load 0x0,0x4
00fc 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
00fd e004 | | Load 0x0,0x4
00fe 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
00ff e004 | | Load 0x0,0x4
0100 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0101 e004 | | Load 0x0,0x4
0102 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0103 e004 | | Load 0x0,0x4
0104 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0105 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0106 029f 0403 | | Declare_Subprogram INIT_0400,For_Call
0108 4805 |H | Short_Literal 0x5
0109 032d | - | Declare_Type Record,Defined
010a 4800 |H | Short_Literal 0x0
010b 4bff |K | Short_Literal 0x3ff
010c 00e3 | | Load_Encached Natural_Cache
010d 03f8 | | Declare_Type Discrete,Constrained
010e 00e1 | | Load_Encached Boolean_Cache
010f 00e1 | | Load_Encached Boolean_Cache
0110 00e1 | | Load_Encached Boolean_Cache
0111 00e1 | | Load_Encached Boolean_Cache
0112 00e1 | | Load_Encached Boolean_Cache
0113 00e1 | | Load_Encached Boolean_Cache
0114 00e1 | | Load_Encached Boolean_Cache
0115 00e1 | | Load_Encached Boolean_Cache
0116 00e1 | | Load_Encached Boolean_Cache
0117 00e1 | | Load_Encached Boolean_Cache
0118 00e2 | | Load_Encached Integer_Cache
0119 e228 | ( | Load 0x1,0x28
011a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011b e228 | ( | Load 0x1,0x28
011c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011d e22f | / | Load 0x1,0x2f
011e e00d | | Load 0x0,0xd
011f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0120 e00d | | Load 0x0,0xd
0121 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0122 e00d | | Load 0x0,0xd
0123 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0124 e214 | | Load 0x1,0x14
0125 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b
0126 e229 | ) | Load 0x1,0x29
0127 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0128 e229 | ) | Load 0x1,0x29
0129 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
012a e229 | ) | Load 0x1,0x29
012b 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
012c e229 | ) | Load 0x1,0x29
012d 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
012e e229 | ) | Load 0x1,0x29
012f 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0130 e229 | ) | Load 0x1,0x29
0131 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
0132 e230 | 0 | Load 0x1,0x30
0133 e229 | ) | Load 0x1,0x29
0134 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0135 e215 | | Load 0x1,0x15
0136 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0137 e229 | ) | Load 0x1,0x29
0138 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0139 e229 | ) | Load 0x1,0x29
013a 1b19 | | Execute Package,Field_Read,Field_Number 0x19
013b 029f 042b | +| Declare_Subprogram INIT_0428,For_Call
013d e21c | | Load 0x1,0x1c
013e 0326 | & | Complete_Type Record,By_Defining
013f e004 | | Load 0x0,0x4
0140 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0141 e228 | ( | Load 0x1,0x28
0142 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0143 e004 | | Load 0x0,0x4
0144 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0145 e228 | ( | Load 0x1,0x28
0146 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0147 e229 | ) | Load 0x1,0x29
0148 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0149 e229 | ) | Load 0x1,0x29
014a 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
014b 00e1 | | Load_Encached Boolean_Cache
014c 00e1 | | Load_Encached Boolean_Cache
014d e229 | ) | Load 0x1,0x29
014e 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
014f 029f 0453 | S| Declare_Subprogram INIT_0450,For_Call
0151 e21b | | Load 0x1,0x1b
0152 0326 | & | Complete_Type Record,By_Defining
0153 4800 |H | Short_Literal 0x0
0154 61d7 |a | Indirect_Literal Discrete,0x32c,{0x00000000, 0x000007ff}
0155 00e3 | | Load_Encached Natural_Cache
0156 03f8 | | Declare_Type Discrete,Constrained
0157 4802 |H | Short_Literal 0x2
0158 4805 |H | Short_Literal 0x5
0159 e215 | | Load 0x1,0x15
015a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
015b 03f8 | | Declare_Type Discrete,Constrained
015c 4802 |H | Short_Literal 0x2
015d 4805 |H | Short_Literal 0x5
015e 00db | | Load_Top At_Offset_3
015f 02a0 | | Declare_Subprogram Null_Subprogram
0160 4801 |H | Short_Literal 0x1
0161 035d | ] | Declare_Type Array,Defined
0162 e229 | ) | Load 0x1,0x29
0163 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0164 e228 | ( | Load 0x1,0x28
0165 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0166 00e1 | | Load_Encached Boolean_Cache
0167 e229 | ) | Load 0x1,0x29
0168 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0169 e004 | | Load 0x0,0x4
016a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016b e233 | 3 | Load 0x1,0x33
016c e231 | 1 | Load 0x1,0x31
016d e229 | ) | Load 0x1,0x29
016e 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
016f e229 | ) | Load 0x1,0x29
0170 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
0171 029f 0473 | s| Declare_Subprogram INIT_0470,For_Call
0173 e21d | | Load 0x1,0x1d
0174 0326 | & | Complete_Type Record,By_Defining
0175 4800 |H | Short_Literal 0x0
0176 4804 |H | Short_Literal 0x4
0177 029f 048b | | Declare_Subprogram INIT_0488,For_Call
0179 03fd | | Declare_Type Discrete,Defined
017a 00e3 | | Load_Encached Natural_Cache
017b 0266 | f | Execute Discrete,Bounds
017c e004 | | Load 0x0,0x4
017d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
017e 029f 04b3 | | Declare_Subprogram INIT_04b0,For_Call
0180 4801 |H | Short_Literal 0x1
0181 0350 | P | Declare_Type Array,Defined,Bounds_With_Object
0182 00e3 | | Load_Encached Natural_Cache
0183 e003 | | Load 0x0,0x3
0184 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0185 4801 |H | Short_Literal 0x1
0186 61ad |a | Indirect_Literal Discrete,0x334,{0x00000000, 0x7fffffff}
0187 e235 | 5 | Load 0x1,0x35
0188 034e | N | QQ_Declare_Type Array,Constrained,Bounds_With_Object
0189 029f 04cb | | Declare_Subprogram INIT_04c8,For_Call
018b 4800 |H | Short_Literal 0x0
018c 4801 |H | Short_Literal 0x1
018d 4801 |H | Short_Literal 0x1
018e 4800 |H | Short_Literal 0x0
018f 4801 |H | Short_Literal 0x1
0190 4801 |H | Short_Literal 0x1
0191 031d | | Declare_Type Variant_Record,Defined
0192 e017 | | Load 0x0,0x17
0193 e018 | | Load 0x0,0x18
0194 e21a | | Load 0x1,0x1a
0195 e216 | | Load 0x1,0x16
0196 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0197 e019 | | Load 0x0,0x19
0198 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0199 0387 | | Declare_Variable Package
019a 00d8 | | Load_Top At_Offset_0
019b 020f | | Execute Module,Activate
019c e019 | | Load 0x0,0x19
019d 1919 | | Execute Package,Field_Reference,Field_Number 0x19
019e 00c6 | | Action Check_Subprogram_Elaborated
019f e21a | | Load 0x1,0x1a
01a0 e216 | | Load 0x1,0x16
01a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a2 e01a | | Load 0x0,0x1a
01a3 e01b | | Load 0x0,0x1b
01a4 4800 |H | Short_Literal 0x0
01a5 0007 | | Action Break_Optional
01a6 e01c | | Load 0x0,0x1c
01a7 e01d | | Load 0x0,0x1d
01a8 e21c | | Load 0x1,0x1c
01a9 e214 | | Load 0x1,0x14
01aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ab e019 | | Load 0x0,0x19
01ac 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01ad 0387 | | Declare_Variable Package
01ae 00d8 | | Load_Top At_Offset_0
01af 020f | | Execute Module,Activate
01b0 e019 | | Load 0x0,0x19
01b1 1919 | | Execute Package,Field_Reference,Field_Number 0x19
01b2 00c6 | | Action Check_Subprogram_Elaborated
01b3 e21c | | Load 0x1,0x1c
01b4 e214 | | Load 0x1,0x14
01b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b6 e01e | | Load 0x0,0x1e
01b7 e01f | | Load 0x0,0x1f
01b8 4800 |H | Short_Literal 0x0
01b9 0007 | | Action Break_Optional
01ba e020 | | Load 0x0,0x20
01bb e021 | ! | Load 0x0,0x21
01bc e21b | | Load 0x1,0x1b
01bd e216 | | Load 0x1,0x16
01be 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
01bf e019 | | Load 0x0,0x19
01c0 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01c1 0387 | | Declare_Variable Package
01c2 00d8 | | Load_Top At_Offset_0
01c3 020f | | Execute Module,Activate
01c4 e019 | | Load 0x0,0x19
01c5 1919 | | Execute Package,Field_Reference,Field_Number 0x19
01c6 00c6 | | Action Check_Subprogram_Elaborated
01c7 e21b | | Load 0x1,0x1b
01c8 e216 | | Load 0x1,0x16
01c9 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
01ca e022 | " | Load 0x0,0x22
01cb e023 | # | Load 0x0,0x23
01cc 4800 |H | Short_Literal 0x0
01cd 0007 | | Action Break_Optional
01ce e024 | $ | Load 0x0,0x24
01cf e025 | % | Load 0x0,0x25
01d0 e21d | | Load 0x1,0x1d
01d1 e215 | | Load 0x1,0x15
01d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d3 e019 | | Load 0x0,0x19
01d4 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01d5 0387 | | Declare_Variable Package
01d6 00d8 | | Load_Top At_Offset_0
01d7 020f | | Execute Module,Activate
01d8 e019 | | Load 0x0,0x19
01d9 1919 | | Execute Package,Field_Reference,Field_Number 0x19
01da 00c6 | | Action Check_Subprogram_Elaborated
01db e21d | | Load 0x1,0x1d
01dc e215 | | Load 0x1,0x15
01dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01de e026 | & | Load 0x0,0x26
01df e027 | ' | Load 0x0,0x27
01e0 4800 |H | Short_Literal 0x0
01e1 0007 | | Action Break_Optional
01e2 029d 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call
01e4 029d 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call
01e6 029d 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call
01e8 029d 060b | | Declare_Subprogram INIT_0608,For_Outer_Call
01ea 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
01eb 00c7 | | Action Elaborate_Subprogram
01ec 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
01ed 00c7 | | Action Elaborate_Subprogram
01ee 1d20 | | Execute_Immediate Reference_Lex_1,0x20
01ef 00c7 | | Action Elaborate_Subprogram
01f0 029d 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call
01f2 029d 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call
01f4 029d 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call
01f6 029d 06fb | | Declare_Subprogram INIT_06f8,For_Outer_Call
01f8 029d 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call
01fa 029d 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call
01fc 029d 084b | K| Declare_Subprogram INIT_0848,For_Outer_Call
01fe 029d 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call
0200 029d 0913 | | Declare_Subprogram INIT_0910,For_Outer_Call
0202 029d 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call
0204 e004 | | Load 0x0,0x4
0205 4801 |H | Short_Literal 0x1
0206 e228 | ( | Load 0x1,0x28
0207 020e | | Execute Module,Augment_Imports
0208 e228 | ( | Load 0x1,0x28
0209 020f | | Execute Module,Activate
020a e028 | ( | Load 0x0,0x28
020b e029 | ) | Load 0x0,0x29
020c e21c | | Load 0x1,0x1c
020d e229 | ) | Load 0x1,0x29
020e e019 | | Load 0x0,0x19
020f e02a | * | Load 0x0,0x2a
0210 e02b | + | Load 0x0,0x2b
0211 e02c | , | Load 0x0,0x2c
0212 4808 |H | Short_Literal 0x8
0213 e22a | * | Load 0x1,0x2a
0214 020e | | Execute Module,Augment_Imports
0215 e22a | * | Load 0x1,0x2a
0216 020f | | Execute Module,Activate
0217 e004 | | Load 0x0,0x4
0218 e243 | C | Load 0x1,0x43
0219 e249 | I | Load 0x1,0x49
021a e229 | ) | Load 0x1,0x29
021b e02c | , | Load 0x0,0x2c
021c e02d | - | Load 0x0,0x2d
021d e244 | D | Load 0x1,0x44
021e e245 | E | Load 0x1,0x45
021f 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
0220 e019 | | Load 0x0,0x19
0221 e24a | J | Load 0x1,0x4a
0222 e24b | K | Load 0x1,0x4b
0223 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c
0224 480d |H | Short_Literal 0xd
0225 e22b | + | Load 0x1,0x2b
0226 020e | | Execute Module,Augment_Imports
0227 e22b | + | Load 0x1,0x2b
0228 020f | | Execute Module,Activate
0229 e229 | ) | Load 0x1,0x29
022a 4801 |H | Short_Literal 0x1
022b e22c | , | Load 0x1,0x2c
022c 020e | | Execute Module,Augment_Imports
022d e22c | , | Load 0x1,0x2c
022e 020f | | Execute Module,Activate
022f e217 | | Load 0x1,0x17
0230 020f | | Execute Module,Activate
0231 e02e | . | Load 0x0,0x2e
0232 e02f | / | Load 0x0,0x2f
0233 e001 | | Load 0x0,0x1
0234 e030 | 0 | Load 0x0,0x30
0235 e031 | 1 | Load 0x0,0x31
0236 e019 | | Load 0x0,0x19
0237 e032 | 2 | Load 0x0,0x32
0238 e033 | 3 | Load 0x0,0x33
0239 e22e | . | Load 0x1,0x2e
023a e21a | | Load 0x1,0x1a
023b e21c | | Load 0x1,0x1c
023c e21b | | Load 0x1,0x1b
023d e21d | | Load 0x1,0x1d
023e e009 | | Load 0x0,0x9
023f e016 | | Load 0x0,0x16
0240 e22a | * | Load 0x1,0x2a
0241 e22b | + | Load 0x1,0x2b
0242 e034 | 4 | Load 0x0,0x34
0243 e035 | 5 | Load 0x0,0x35
0244 e004 | | Load 0x0,0x4
0245 e22f | / | Load 0x1,0x2f
0246 e005 | | Load 0x0,0x5
0247 e036 | 6 | Load 0x0,0x36
0248 e037 | 7 | Load 0x0,0x37
0249 e038 | 8 | Load 0x0,0x38
024a e039 | 9 | Load 0x0,0x39
024b e03a | : | Load 0x0,0x3a
024c e03b | ; | Load 0x0,0x3b
024d e03c | < | Load 0x0,0x3c
024e e03d | = | Load 0x0,0x3d
024f e03e | > | Load 0x0,0x3e
0250 e03f | ? | Load 0x0,0x3f
0251 e040 | @ | Load 0x0,0x40
0252 e041 | A | Load 0x0,0x41
0253 e042 | B | Load 0x0,0x42
0254 e043 | C | Load 0x0,0x43
0255 e044 | D | Load 0x0,0x44
0256 e045 | E | Load 0x0,0x45
0257 e046 | F | Load 0x0,0x46
0258 e047 | G | Load 0x0,0x47
0259 e048 | H | Load 0x0,0x48
025a e049 | I | Load 0x0,0x49
025b e04a | J | Load 0x0,0x4a
025c e04b | K | Load 0x0,0x4b
025d e04c | L | Load 0x0,0x4c
025e e04d | M | Load 0x0,0x4d
025f e04e | N | Load 0x0,0x4e
0260 e04f | O | Load 0x0,0x4f
0261 e003 | | Load 0x0,0x3
0262 e237 | 7 | Load 0x1,0x37
0263 e050 | P | Load 0x0,0x50
0264 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
0265 e051 | Q | Load 0x0,0x51
0266 e052 | R | Load 0x0,0x52
0267 e238 | 8 | Load 0x1,0x38
0268 e239 | 9 | Load 0x1,0x39
0269 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
026a e053 | S | Load 0x0,0x53
026b 483a |H: | Short_Literal 0x3a
026c e229 | ) | Load 0x1,0x29
026d 020e | | Execute Module,Augment_Imports
026e e229 | ) | Load 0x1,0x29
026f 020f | | Execute Module,Activate
0270 e00d | | Load 0x0,0xd
0271 e054 | T | Load 0x0,0x54
0272 e055 | U | Load 0x0,0x55
0273 e056 | V | Load 0x0,0x56
0274 e057 | W | Load 0x0,0x57
0275 e058 | X | Load 0x0,0x58
0276 e059 | Y | Load 0x0,0x59
0277 e05a | Z | Load 0x0,0x5a
0278 e00c | | Load 0x0,0xc
0279 e004 | | Load 0x0,0x4
027a e00f | | Load 0x0,0xf
027b e243 | C | Load 0x1,0x43
027c e05b | [ | Load 0x0,0x5b
027d e05c | \ | Load 0x0,0x5c
027e e05d | ] | Load 0x0,0x5d
027f e05e | ^ | Load 0x0,0x5e
0280 e237 | 7 | Load 0x1,0x37
0281 e05f | _ | Load 0x0,0x5f
0282 e060 | ` | Load 0x0,0x60
0283 e061 | a | Load 0x0,0x61
0284 e062 | b | Load 0x0,0x62
0285 e063 | c | Load 0x0,0x63
0286 e064 | d | Load 0x0,0x64
0287 e229 | ) | Load 0x1,0x29
0288 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
0289 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
028a 1d57 | W | Execute_Immediate Reference_Lex_1,0x57
028b 1d50 | P | Execute_Immediate Reference_Lex_1,0x50
028c e228 | ( | Load 0x1,0x28
028d 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
028e e051 | Q | Load 0x0,0x51
028f e052 | R | Load 0x0,0x52
0290 e065 | e | Load 0x0,0x65
0291 e22a | * | Load 0x1,0x2a
0292 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
0293 e234 | 4 | Load 0x1,0x34
0294 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59
0295 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a
0296 e22b | + | Load 0x1,0x2b
0297 e22c | , | Load 0x1,0x2c
0298 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
0299 e23d | = | Load 0x1,0x3d
029a e249 | I | Load 0x1,0x49
029b e066 | f | Load 0x0,0x66
029c e067 | g | Load 0x0,0x67
029d e02c | , | Load 0x0,0x2c
029e 1d54 | T | Execute_Immediate Reference_Lex_1,0x54
029f e068 | h | Load 0x0,0x68
02a0 e00b | | Load 0x0,0xb
02a1 e244 | D | Load 0x1,0x44
02a2 e245 | E | Load 0x1,0x45
02a3 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
02a4 e019 | | Load 0x0,0x19
02a5 e238 | 8 | Load 0x1,0x38
02a6 e239 | 9 | Load 0x1,0x39
02a7 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
02a8 e001 | | Load 0x0,0x1
02a9 4839 |H9 | Short_Literal 0x39
02aa e216 | | Load 0x1,0x16
02ab 020e | | Execute Module,Augment_Imports
02ac e216 | | Load 0x1,0x16
02ad 020f | | Execute Module,Activate
02ae a069 | i | Store_Unchecked 0x0,0x69
02af e06a | j | Load 0x0,0x6a
02b0 e06b | k | Load 0x0,0x6b
02b1 e00f | | Load 0x0,0xf
02b2 e249 | I | Load 0x1,0x49
02b3 e06c | l | Load 0x0,0x6c
02b4 e06d | m | Load 0x0,0x6d
02b5 e06e | n | Load 0x0,0x6e
02b6 e06f | o | Load 0x0,0x6f
02b7 e228 | ( | Load 0x1,0x28
02b8 e051 | Q | Load 0x0,0x51
02b9 e052 | R | Load 0x0,0x52
02ba e229 | ) | Load 0x1,0x29
02bb 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
02bc 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
02bd e070 | p | Load 0x0,0x70
02be e00b | | Load 0x0,0xb
02bf e24a | J | Load 0x1,0x4a
02c0 e24b | K | Load 0x1,0x4b
02c1 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c
02c2 e019 | | Load 0x0,0x19
02c3 e22b | + | Load 0x1,0x2b
02c4 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c
02c5 e053 | S | Load 0x0,0x53
02c6 4818 |H | Short_Literal 0x18
02c7 e215 | | Load 0x1,0x15
02c8 020e | | Execute Module,Augment_Imports
02c9 e215 | | Load 0x1,0x15
02ca 020f | | Execute Module,Activate
02cb e00f | | Load 0x0,0xf
02cc e23d | = | Load 0x1,0x3d
02cd e071 | q | Load 0x0,0x71
02ce e072 | r | Load 0x0,0x72
02cf e073 | s | Load 0x0,0x73
02d0 e074 | t | Load 0x0,0x74
02d1 e075 | u | Load 0x0,0x75
02d2 e076 | v | Load 0x0,0x76
02d3 e229 | ) | Load 0x1,0x29
02d4 e22f | / | Load 0x1,0x2f
02d5 e00d | | Load 0x0,0xd
02d6 e228 | ( | Load 0x1,0x28
02d7 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
02d8 e066 | f | Load 0x0,0x66
02d9 e051 | Q | Load 0x0,0x51
02da e00c | | Load 0x0,0xc
02db e00e | | Load 0x0,0xe
02dc e22c | , | Load 0x1,0x2c
02dd e077 | w | Load 0x0,0x77
02de e078 | x | Load 0x0,0x78
02df e079 | y | Load 0x0,0x79
02e0 e00b | | Load 0x0,0xb
02e1 e23e | > | Load 0x1,0x3e
02e2 e23f | ? | Load 0x1,0x3f
02e3 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
02e4 e019 | | Load 0x0,0x19
02e5 e053 | S | Load 0x0,0x53
02e6 e07a | z | Load 0x0,0x7a
02e7 a07b | { | Store_Unchecked 0x0,0x7b
02e8 e07c | | | Load 0x0,0x7c
02e9 e07d | } | Load 0x0,0x7d
02ea e07e | ~ | Load 0x0,0x7e
02eb e07f | | Load 0x0,0x7f
02ec e080 | | Load 0x0,0x80
02ed 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
02ee e052 | R | Load 0x0,0x52
02ef 4824 |H$ | Short_Literal 0x24
02f0 e214 | | Load 0x1,0x14
02f1 020e | | Execute Module,Augment_Imports
02f2 e214 | | Load 0x1,0x14
02f3 020f | | Execute Module,Activate
02f4 BODY_0008:
02f4 e224 | $ | Load 0x1,0x24
02f5 0120 | | Execute Any,Is_Value
02f6 6803 |h | Jump_Zero 0x2fa
02f7 e008 | | Load 0x0,0x8
02f8 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
02f9 7801 |x | Jump 0x2fb
02fa e224 | $ | Load 0x1,0x24
02fb 4be8 |K | Short_Literal 0x3e8
02fc 0092 11a2 | | Action Push_String_Extended,0x11a2 ; "DEBUG_HISTORY_ENTRIES"
02fe e008 | | Load 0x0,0x8
02ff 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0300 c224 | $ | Store 0x1,0x24
0301 e052 | R | Load 0x0,0x52
0302 180f | | Execute Package,Field_Execute,Field_Number 0xf
0303 e224 | $ | Load 0x1,0x24
0304 e008 | | Load 0x0,0x8
0305 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0306 e008 | | Load 0x0,0x8
0307 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0308 a226 | & | Store_Unchecked 0x1,0x26
0309 e226 | & | Load 0x1,0x26
030a 480a |H | Short_Literal 0xa
030b 026f | o | Execute Discrete,Remainder
030c 0f01 | | Execute_Immediate Equal,0x1
030d 681c |h | Jump_Zero 0x32a
030e e225 | % | Load 0x1,0x25
030f 0120 | | Execute Any,Is_Value
0310 6803 |h | Jump_Zero 0x314
0311 e008 | | Load 0x0,0x8
0312 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0313 7801 |x | Jump 0x315
0314 e225 | % | Load 0x1,0x25
0315 4850 |HP | Short_Literal 0x50
0316 0092 11a3 | | Action Push_String_Extended,0x11a3 ; "WINDOW_SHIFT_OVERLAP"
0318 e008 | | Load 0x0,0x8
0319 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
031a c225 | % | Store 0x1,0x25
031b e052 | R | Load 0x0,0x52
031c 180f | | Execute Package,Field_Execute,Field_Number 0xf
031d e225 | % | Load 0x1,0x25
031e e008 | | Load 0x0,0x8
031f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0320 e008 | | Load 0x0,0x8
0321 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0322 a227 | ' | Store_Unchecked 0x1,0x27
0323 e227 | ' | Load 0x1,0x27
0324 480a |H | Short_Literal 0xa
0325 026f | o | Execute Discrete,Remainder
0326 0f01 | | Execute_Immediate Equal,0x1
0327 6802 |h | Jump_Zero 0x32a
0328 4801 |H | Short_Literal 0x1
0329 a223 | # | Store_Unchecked 0x1,0x23
032a 00bc | | Action Signal_Activated
032b 00bb | | Action Signal_Completion
032c 0000 0000 | | .LITERAL {0x00000000, 0x000007ff}
0330 0000 0000 | | .LITERAL {0x00000000, 0x00007fff}
0334 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033d | = | .CONST 0x033d ; Address of begin
0339 0004 | | .CONST 0x0004 ; Address of exception handler
033a 0002 | | .CONST 0x0002 ; Number of locals
033b INIT_0338:
033b e216 | | Load 0x1,0x16
033c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
033d BODY_0338:
033d e5f8 | | Load 0x2,-0x8
033e e5f9 | | Load 0x2,-0x7
033f e216 | | Load 0x1,0x16
0340 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0341 e5fc | | Load 0x2,-0x4
0342 e5fd | | Load 0x2,-0x3
0343 e5fe | | Load 0x2,-0x2
0344 e229 | ) | Load 0x1,0x29
0345 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0346 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0347 c5f9 | | Store 0x2,-0x7
0348 c5f8 | | Store 0x2,-0x8
0349 4800 |H | Short_Literal 0x0
034a e5f8 | | Load 0x2,-0x8
034b e003 | | Load 0x0,0x3
034c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
034d 6829 |h) | Jump_Zero 0x377
034e e5fd | | Load 0x2,-0x3
034f 00d9 | | Load_Top At_Offset_1
0350 8250 | P | Call 0x1,0x50
0351 7025 |p% | Jump_Nonzero 0x377
0352 e5fb | | Load 0x2,-0x5
0353 680b |h | Jump_Zero 0x35f
0354 e5f8 | | Load 0x2,-0x8
0355 e5f9 | | Load 0x2,-0x7
0356 00da | | Load_Top At_Offset_2
0357 e5fc | | Load 0x2,-0x4
0358 e5fd | | Load 0x2,-0x3
0359 e5ff | | Load 0x2,-0x1
035a 8252 | R | Call 0x1,0x52
035b 0033 | 3 | Store_Top Heap_Access,At_Offset_3
035c c5f9 | | Store 0x2,-0x7
035d c5f8 | | Store 0x2,-0x8
035e 7818 |x | Jump 0x377
035f e003 | | Load 0x0,0x3
0360 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0361 4801 |H | Short_Literal 0x1
0362 4802 |H | Short_Literal 0x2
0363 e00f | | Load 0x0,0xf
0364 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0365 035b | [ | Declare_Type Array,Constrained
0366 0337 | 7 | Declare_Variable Array
0367 e5fd | | Load 0x2,-0x3
0368 e00f | | Load 0x0,0xf
0369 181a | | Execute Package,Field_Execute,Field_Number 0x1a
036a 4801 |H | Short_Literal 0x1
036b 00da | | Load_Top At_Offset_2
036c 01d6 | | Execute Vector,Field_Write
036d e5fc | | Load 0x2,-0x4
036e e00c | | Load 0x0,0xc
036f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0370 4802 |H | Short_Literal 0x2
0371 00da | | Load_Top At_Offset_2
0372 01d6 | | Execute Vector,Field_Write
0373 6008 |` | Indirect_Literal Discrete,0x37c,{0x00000000, 0x00002827}
0374 e003 | | Load 0x0,0x3
0375 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0376 c5f8 | | Store 0x2,-0x8
0377 00d8 | | Load_Top At_Offset_0
0378 a5fa | | Store_Unchecked 0x2,-0x6
0379 4506 |E | Exit_Suprogram New_Top_Offset 0x6
037a 0000 0000 | | .XXX[0x2]
037c 0000 0000 | | .LITERAL {0x00000000, 0x00002827}
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 038c | | .CONST 0x038c ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0003 | | .CONST 0x0003 ; Number of locals
0383 INIT_0380:
0383 e004 | | Load 0x0,0x4
0384 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0385 e051 | Q | Load 0x0,0x51
0386 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0387 02c7 | | Declare_Variable Any
0388 e5fd | | Load 0x2,-0x3
0389 e001 | | Load 0x0,0x1
038a 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
038b a403 | | Store_Unchecked 0x2,0x3
038c BODY_0380:
038c 4800 |H | Short_Literal 0x0
038d a5fc | | Store_Unchecked 0x2,-0x4
038e e5ff | | Load 0x2,-0x1
038f 6811 |h | Jump_Zero 0x3a1
0390 0092 11a4 | | Action Push_String_Extended,0x11a4 ; "State file for "
0392 e5fe | | Load 0x2,-0x2
0393 e216 | | Load 0x1,0x16
0394 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0395 01cc | | Execute Vector,Catenate
0396 0092 11a5 | | Action Push_String_Extended,0x11a5 ; " is being abandoned."
0398 01cc | | Execute Vector,Catenate
0399 824f | O | Call 0x1,0x4f
039a 00d8 | | Load_Top At_Offset_0
039b 4801 |H | Short_Literal 0x1
039c 4800 |H | Short_Literal 0x0
039d e051 | Q | Load 0x0,0x51
039e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
039f c403 | | Store 0x2,0x3
03a0 782c |x, | Jump 0x3cd
03a1 e001 | | Load 0x0,0x1
03a2 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03a3 e5fd | | Load 0x2,-0x3
03a4 e001 | | Load 0x0,0x1
03a5 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
03a6 c5fd | | Store 0x2,-0x3
03a7 005a | Z | Store_Top Discrete,At_Offset_2
03a8 00d9 | | Load_Top At_Offset_1
03a9 700b |p | Jump_Nonzero 0x3b5
03aa 0092 11a4 | | Action Push_String_Extended,0x11a4 ; "State file for "
03ac e5fe | | Load 0x2,-0x2
03ad e216 | | Load 0x1,0x16
03ae 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
03af 01cc | | Execute Vector,Catenate
03b0 0092 11a6 | | Action Push_String_Extended,0x11a6 ; " has been closed."
03b2 01cc | | Execute Vector,Catenate
03b3 824f | O | Call 0x1,0x4f
03b4 7818 |x | Jump 0x3cd
03b5 e003 | | Load 0x0,0x3
03b6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b7 4801 |H | Short_Literal 0x1
03b8 4802 |H | Short_Literal 0x2
03b9 e00f | | Load 0x0,0xf
03ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03bb 035b | [ | Declare_Type Array,Constrained
03bc 0337 | 7 | Declare_Variable Array
03bd e5fe | | Load 0x2,-0x2
03be e216 | | Load 0x1,0x16
03bf 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
03c0 4801 |H | Short_Literal 0x1
03c1 00da | | Load_Top At_Offset_2
03c2 01d6 | | Execute Vector,Field_Write
03c3 00db | | Load_Top At_Offset_3
03c4 e00f | | Load 0x0,0xf
03c5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
03c6 4802 |H | Short_Literal 0x2
03c7 00da | | Load_Top At_Offset_2
03c8 01d6 | | Execute Vector,Field_Write
03c9 6006 |` | Indirect_Literal Discrete,0x3d0,{0x00000000, 0x00005005}
03ca e003 | | Load 0x0,0x3
03cb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
03cc c5fc | | Store 0x2,-0x4
03cd e212 | | Load 0x1,0x12
03ce a5fe | | Store_Unchecked 0x2,-0x2
03cf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03d0 0000 0000 | | .LITERAL {0x00000000, 0x00005005}
03d4 0000 0000 | | .BLANK 0000[0x4]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db 00db | | Load_Top At_Offset_3
03dc 00db | | Load_Top At_Offset_3
03dd e229 | ) | Load 0x1,0x29
03de 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 4608 |F | Jump_Case 0x9
03e4 7808 |x | Jump 0x3ed ; case 0x0
03e5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
03e6 7816 |x | Jump 0x3fd ; case 0x2
03e7 7815 |x | Jump 0x3fd ; case 0x3
03e8 7814 |x | Jump 0x3fd ; case 0x4
03e9 7813 |x | Jump 0x3fd ; case 0x5
03ea 7812 |x | Jump 0x3fd ; case 0x6
03eb 7811 |x | Jump 0x3fd ; case 0x7
03ec 7810 |x | Jump 0x3fd ; case 0x8
03ed 4801 |H | Short_Literal 0x1
03ee 00db | | Load_Top At_Offset_3
03ef 380c |8 | Execute Record,Field_Write,Field_Number 0xc
03f0 00da | | Load_Top At_Offset_2
03f1 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12
03f2 0125 | % | Execute Any,Set_Constraint
03f3 00da | | Load_Top At_Offset_2
03f4 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12
03f5 1c00 | | Execute_Immediate Run_Utility,0x0
03f6 00da | | Load_Top At_Offset_2
03f7 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
03f8 0125 | % | Execute Any,Set_Constraint
03f9 00da | | Load_Top At_Offset_2
03fa 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13
03fb 1c00 | | Execute_Immediate Run_Utility,0x0
03fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
03fd 0869 | i | Execute_Immediate Raise,0x69
03fe 0000 0000 | | .XXX[0x2]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403 | | .CONST 0x0403 ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0001 | | .CONST 0x0001 ; Number of locals
0403 BODY_0400:
0403 INIT_0400:
0403 4608 |F | Jump_Case 0x9
0404 7808 |x | Jump 0x40d ; case 0x0
0405 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0406 7819 |x | Jump 0x420 ; case 0x2
0407 7818 |x | Jump 0x420 ; case 0x3
0408 7817 |x | Jump 0x420 ; case 0x4
0409 7816 |x | Jump 0x420 ; case 0x5
040a 7815 |x | Jump 0x420 ; case 0x6
040b 7814 |x | Jump 0x420 ; case 0x7
040c 7813 |x | Jump 0x420 ; case 0x8
040d 00da | | Load_Top At_Offset_2
040e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
040f 0125 | % | Execute Any,Set_Constraint
0410 00da | | Load_Top At_Offset_2
0411 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0412 1c00 | | Execute_Immediate Run_Utility,0x0
0413 00da | | Load_Top At_Offset_2
0414 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0415 0125 | % | Execute Any,Set_Constraint
0416 00da | | Load_Top At_Offset_2
0417 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0418 1c00 | | Execute_Immediate Run_Utility,0x0
0419 00da | | Load_Top At_Offset_2
041a 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
041b 0125 | % | Execute Any,Set_Constraint
041c 00da | | Load_Top At_Offset_2
041d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
041e 1c00 | | Execute_Immediate Run_Utility,0x0
041f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0420 0869 | i | Execute_Immediate Raise,0x69
0421 0000 0000 | | .BLANK 0000[0x7]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b | + | .CONST 0x042b ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0001 | | .CONST 0x0001 ; Number of locals
042b BODY_0428:
042b INIT_0428:
042b 4608 |F | Jump_Case 0x9
042c 7808 |x | Jump 0x435 ; case 0x0
042d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
042e 781c |x | Jump 0x44b ; case 0x2
042f 781b |x | Jump 0x44b ; case 0x3
0430 781a |x | Jump 0x44b ; case 0x4
0431 7819 |x | Jump 0x44b ; case 0x5
0432 7818 |x | Jump 0x44b ; case 0x6
0433 7817 |x | Jump 0x44b ; case 0x7
0434 7816 |x | Jump 0x44b ; case 0x8
0435 00da | | Load_Top At_Offset_2
0436 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0437 1c00 | | Execute_Immediate Run_Utility,0x0
0438 00da | | Load_Top At_Offset_2
0439 340e |4 | Execute Record,Field_Reference,Field_Number 0xe
043a 0125 | % | Execute Any,Set_Constraint
043b 00da | | Load_Top At_Offset_2
043c 340e |4 | Execute Record,Field_Reference,Field_Number 0xe
043d 1c00 | | Execute_Immediate Run_Utility,0x0
043e 00da | | Load_Top At_Offset_2
043f 340f |4 | Execute Record,Field_Reference,Field_Number 0xf
0440 0125 | % | Execute Any,Set_Constraint
0441 00da | | Load_Top At_Offset_2
0442 340f |4 | Execute Record,Field_Reference,Field_Number 0xf
0443 1c00 | | Execute_Immediate Run_Utility,0x0
0444 00da | | Load_Top At_Offset_2
0445 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10
0446 0125 | % | Execute Any,Set_Constraint
0447 00da | | Load_Top At_Offset_2
0448 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10
0449 1c00 | | Execute_Immediate Run_Utility,0x0
044a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
044b 0869 | i | Execute_Immediate Raise,0x69
044c 0000 0000 | | .BLANK 0000[0x4]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0453 | S | .CONST 0x0453 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0001 | | .CONST 0x0001 ; Number of locals
0453 BODY_0450:
0453 INIT_0450:
0453 4608 |F | Jump_Case 0x9
0454 7808 |x | Jump 0x45d ; case 0x0
0455 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0456 7813 |x | Jump 0x46a ; case 0x2
0457 7812 |x | Jump 0x46a ; case 0x3
0458 7811 |x | Jump 0x46a ; case 0x4
0459 7810 |x | Jump 0x46a ; case 0x5
045a 780f |x | Jump 0x46a ; case 0x6
045b 780e |x | Jump 0x46a ; case 0x7
045c 780d |x | Jump 0x46a ; case 0x8
045d 00da | | Load_Top At_Offset_2
045e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
045f 0125 | % | Execute Any,Set_Constraint
0460 00da | | Load_Top At_Offset_2
0461 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0462 1c00 | | Execute_Immediate Run_Utility,0x0
0463 00da | | Load_Top At_Offset_2
0464 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0465 0125 | % | Execute Any,Set_Constraint
0466 00da | | Load_Top At_Offset_2
0467 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0468 1c00 | | Execute_Immediate Run_Utility,0x0
0469 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
046a 0869 | i | Execute_Immediate Raise,0x69
046b 0000 0000 | | .BLANK 0000[0x5]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0473 | s | .CONST 0x0473 ; Address of begin
0471 0004 | | .CONST 0x0004 ; Address of exception handler
0472 0001 | | .CONST 0x0001 ; Number of locals
0473 BODY_0470:
0473 INIT_0470:
0473 4608 |F | Jump_Case 0x9
0474 7808 |x | Jump 0x47d ; case 0x0
0475 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0476 780d |x | Jump 0x484 ; case 0x2
0477 780c |x | Jump 0x484 ; case 0x3
0478 780b |x | Jump 0x484 ; case 0x4
0479 780a |x | Jump 0x484 ; case 0x5
047a 7809 |x | Jump 0x484 ; case 0x6
047b 7808 |x | Jump 0x484 ; case 0x7
047c 7807 |x | Jump 0x484 ; case 0x8
047d 00da | | Load_Top At_Offset_2
047e 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
047f 0125 | % | Execute Any,Set_Constraint
0480 00da | | Load_Top At_Offset_2
0481 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0482 1c00 | | Execute_Immediate Run_Utility,0x0
0483 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0484 0869 | i | Execute_Immediate Raise,0x69
0485 0000 0000 | | .XXX[0x3]
0487 0000 | |
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b | | .CONST 0x048b ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0001 | | .CONST 0x0001 ; Number of locals
048b BODY_0488:
048b INIT_0488:
048b 4607 |F | Jump_Case 0x8
048c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
048d 7806 |x | Jump 0x494 ; case 0x1
048e 7809 |x | Jump 0x498 ; case 0x2
048f 780d |x | Jump 0x49d ; case 0x3
0490 7810 |x | Jump 0x4a1 ; case 0x4
0491 7811 |x | Jump 0x4a3 ; case 0x5
0492 7812 |x | Jump 0x4a5 ; case 0x6
0493 7815 |x | Jump 0x4a9 ; case 0x7
0494 00da | | Load_Top At_Offset_2
0495 0091 119a | | Action Push_String_Extended_Indexed,0x119a ; "OTHER_SUBCLASS"
0497 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0498 00db | | Load_Top At_Offset_3
0499 00db | | Load_Top At_Offset_3
049a 00e0 | | Load_Encached Standard_Cache
049b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
049c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
049d 00da | | Load_Top At_Offset_2
049e 00e0 | | Load_Encached Standard_Cache
049f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04a0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
04a1 00db | | Load_Top At_Offset_3
04a2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
04a3 00db | | Load_Top At_Offset_3
04a4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
04a5 e234 | 4 | Load 0x1,0x34
04a6 00dc | | Load_Top At_Offset_4
04a7 0267 | g | Execute Discrete,Predecessor
04a8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
04a9 e234 | 4 | Load 0x1,0x34
04aa 00dc | | Load_Top At_Offset_4
04ab 0268 | h | Execute Discrete,Successor
04ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
04ad 0000 0000 | | .XXX[0x3]
04af 0000 | |
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3 | | .CONST 0x04b3 ; Address of begin
04b1 0004 | | .CONST 0x0004 ; Address of exception handler
04b2 0001 | | .CONST 0x0001 ; Number of locals
04b3 BODY_04b0:
04b3 INIT_04b0:
04b3 00d1 | | Pop_Control Pop_Count_1
04b4 00da | | Load_Top At_Offset_2
04b5 01dc | | Execute Vector,Last
04b6 00db | | Load_Top At_Offset_3
04b7 01dd | | Execute Vector,First
04b8 0263 | c | Execute Discrete,Above_Bound
04b9 700a |p | Jump_Nonzero 0x4c4
04ba 00d8 | | Load_Top At_Offset_0
04bb e5ff | | Load 0x2,-0x1
04bc 01d5 | | Execute Vector,Field_Reference
04bd 0125 | % | Execute Any,Set_Constraint
04be 00d8 | | Load_Top At_Offset_0
04bf e5ff | | Load 0x2,-0x1
04c0 01d5 | | Execute Vector,Field_Reference
04c1 1c00 | | Execute_Immediate Run_Utility,0x0
04c2 0a01 | | Execute_Immediate Plus,0x1
04c3 7ff4 | | Jump 0x4b8
04c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
04c5 0000 0000 | | .XXX[0x3]
04c7 0000 | |
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb | | .CONST 0x04cb ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0001 | | .CONST 0x0001 ; Number of locals
04cb BODY_04c8:
04cb INIT_04c8:
04cb 4608 |F | Jump_Case 0x9
04cc 7808 |x | Jump 0x4d5 ; case 0x0
04cd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
04ce 781d |x | Jump 0x4ec ; case 0x2
04cf 781c |x | Jump 0x4ec ; case 0x3
04d0 781b |x | Jump 0x4ec ; case 0x4
04d1 781a |x | Jump 0x4ec ; case 0x5
04d2 7819 |x | Jump 0x4ec ; case 0x6
04d3 7805 |x | Jump 0x4d9 ; case 0x7
04d4 780d |x | Jump 0x4e2 ; case 0x8
04d5 00da | | Load_Top At_Offset_2
04d6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04d7 1c00 | | Execute_Immediate Run_Utility,0x0
04d8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
04d9 00db | | Load_Top At_Offset_3
04da 4801 |H | Short_Literal 0x1
04db e5fe | | Load 0x2,-0x2
04dc e235 | 5 | Load 0x1,0x35
04dd 035b | [ | Declare_Type Array,Constrained
04de 4801 |H | Short_Literal 0x1
04df e5ff | | Load 0x2,-0x1
04e0 031b | | Declare_Type Variant_Record,Constrained
04e1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
04e2 00db | | Load_Top At_Offset_3
04e3 00db | | Load_Top At_Offset_3
04e4 02fc | | Declare_Variable Variant_Record,With_Constraint
04e5 4801 |H | Short_Literal 0x1
04e6 e5fe | | Load 0x2,-0x2
04e7 e235 | 5 | Load 0x1,0x35
04e8 0334 | 4 | Declare_Variable Array,With_Constraint
04e9 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
04ea 016a | j | QQ_execute Variant_Record,XXX
04eb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
04ec 0869 | i | Execute_Immediate Raise,0x69
04ed 0000 0000 | | .XXX[0x3]
04ef 0000 | |
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3 | | .CONST 0x04f3 ; Address of begin
04f1 0004 | | .CONST 0x0004 ; Address of exception handler
04f2 0001 | | .CONST 0x0001 ; Number of locals
04f3 BODY_04f0:
04f3 INIT_04f0:
04f3 e065 | e | Load 0x0,0x65
04f4 180e | | Execute Package,Field_Execute,Field_Number 0xe
04f5 00db | | Load_Top At_Offset_3
04f6 4801 |H | Short_Literal 0x1
04f7 6004 |` | Indirect_Literal Discrete,0x4fc,{0x00000000, 0x00005802}
04f8 e003 | | Load 0x0,0x3
04f9 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
04fa 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04fb 0000 | | .XXX[0x1]
04fc 0000 0000 | | .LITERAL {0x00000000, 0x00005802}
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503 | | .CONST 0x0503 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 0001 | | .CONST 0x0001 ; Number of locals
0503 BODY_0500:
0503 INIT_0500:
0503 00da | | Load_Top At_Offset_2
0504 0217 | | Execute Heap_Access,All_Reference
0505 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
0506 0217 | | Execute Heap_Access,All_Reference
0507 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0508 e5fe | | Load 0x2,-0x2
0509 012f | / | Execute Any,Equal
050a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
050b 0000 0000 | | .BLANK 0000[0x5]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 053c | < | .CONST 0x053c ; Address of begin
0511 05e8 | | .CONST 0x05e8 ; Address of exception handler
0512 000e | | .CONST 0x000e ; Number of locals
0513 INIT_0510:
0513 00da | | Load_Top At_Offset_2
0514 0007 | | Action Break_Optional
0515 e004 | | Load 0x0,0x4
0516 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0517 02c7 | | Declare_Variable Any
0518 e5ff | | Load 0x2,-0x1
0519 0217 | | Execute Heap_Access,All_Reference
051a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
051b a403 | | Store_Unchecked 0x2,0x3
051c e004 | | Load 0x0,0x4
051d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
051e 02c7 | | Declare_Variable Any
051f 00d8 | | Load_Top At_Offset_0
0520 1c00 | | Execute_Immediate Run_Utility,0x0
0521 e004 | | Load 0x0,0x4
0522 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0523 e004 | | Load 0x0,0x4
0524 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0525 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0526 e004 | | Load 0x0,0x4
0527 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0528 02c7 | | Declare_Variable Any
0529 00d8 | | Load_Top At_Offset_0
052a 1c00 | | Execute_Immediate Run_Utility,0x0
052b e004 | | Load 0x0,0x4
052c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
052d 02c7 | | Declare_Variable Any
052e 00d8 | | Load_Top At_Offset_0
052f 1c00 | | Execute_Immediate Run_Utility,0x0
0530 e229 | ) | Load 0x1,0x29
0531 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0532 e229 | ) | Load 0x1,0x29
0533 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
0534 e214 | | Load 0x1,0x14
0535 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0536 e216 | | Load 0x1,0x16
0537 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0538 029f 095b | [| Declare_Subprogram INIT_0958,For_Call
053a 029f 09ab | | Declare_Subprogram INIT_09a8,For_Call
053c BODY_0510:
053c e5fb | | Load 0x2,-0x5
053d e216 | | Load 0x1,0x16
053e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
053f e5fe | | Load 0x2,-0x2
0540 e229 | ) | Load 0x1,0x29
0541 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0542 c40c | | Store 0x2,0xc
0543 c5fb | | Store 0x2,-0x5
0544 4800 |H | Short_Literal 0x0
0545 e5fb | | Load 0x2,-0x5
0546 e003 | | Load 0x0,0x3
0547 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0548 689e |h | Jump_Zero 0x5e7
0549 00da | | Load_Top At_Offset_2
054a 0e02 | | Execute_Immediate Not_Equal,0x2
054b e5ff | | Load 0x2,-0x1
054c 0217 | | Execute Heap_Access,All_Reference
054d 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
054e e5fe | | Load 0x2,-0x2
054f e5ff | | Load 0x2,-0x1
0550 0217 | | Execute Heap_Access,All_Reference
0551 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0552 e5fd | | Load 0x2,-0x3
0553 e5fe | | Load 0x2,-0x2
0554 e004 | | Load 0x0,0x4
0555 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0556 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0557 e228 | ( | Load 0x1,0x28
0558 180f | | Execute Package,Field_Execute,Field_Number 0xf
0559 e5ff | | Load 0x2,-0x1
055a 0217 | | Execute Heap_Access,All_Reference
055b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
055c e5ff | | Load 0x2,-0x1
055d 0217 | | Execute Heap_Access,All_Reference
055e 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
055f 682e |h. | Jump_Zero 0x58e
0560 e004 | | Load 0x0,0x4
0561 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0562 e407 | | Load 0x2,0x7
0563 0120 | | Execute Any,Is_Value
0564 6803 |h | Jump_Zero 0x568
0565 e004 | | Load 0x0,0x4
0566 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0567 7801 |x | Jump 0x569
0568 e407 | | Load 0x2,0x7
0569 e5fe | | Load 0x2,-0x2
056a e004 | | Load 0x0,0x4
056b 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
056c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
056d c407 | | Store 0x2,0x7
056e c405 | | Store 0x2,0x5
056f 4801 |H | Short_Literal 0x1
0570 4801 |H | Short_Literal 0x1
0571 e00f | | Load 0x0,0xf
0572 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0573 035b | [ | Declare_Type Array,Constrained
0574 0337 | 7 | Declare_Variable Array
0575 e5fe | | Load 0x2,-0x2
0576 e00f | | Load 0x0,0xf
0577 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0578 4801 |H | Short_Literal 0x1
0579 00da | | Load_Top At_Offset_2
057a 01d6 | | Execute Vector,Field_Write
057b 6084 |` | Indirect_Literal Discrete,0x600,{0x00000000, 0x00002834}
057c e405 | | Load 0x2,0x5
057d e003 | | Load 0x0,0x3
057e 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
057f e407 | | Load 0x2,0x7
0580 e5ff | | Load 0x2,-0x1
0581 0217 | | Execute Heap_Access,All_Reference
0582 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0583 e5fd | | Load 0x2,-0x3
0584 e407 | | Load 0x2,0x7
0585 e004 | | Load 0x0,0x4
0586 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0587 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0588 e228 | ( | Load 0x1,0x28
0589 180f | | Execute Package,Field_Execute,Field_Number 0xf
058a e5ff | | Load 0x2,-0x1
058b 0217 | | Execute Heap_Access,All_Reference
058c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
058d 780c |x | Jump 0x59a
058e e5ff | | Load 0x2,-0x1
058f 0217 | | Execute Heap_Access,All_Reference
0590 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0591 e5ff | | Load 0x2,-0x1
0592 0217 | | Execute Heap_Access,All_Reference
0593 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0594 e5ff | | Load 0x2,-0x1
0595 0217 | | Execute Heap_Access,All_Reference
0596 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0597 e5ff | | Load 0x2,-0x1
0598 0217 | | Execute Heap_Access,All_Reference
0599 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
059a e5ff | | Load 0x2,-0x1
059b 0217 | | Execute Heap_Access,All_Reference
059c 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
059d a409 | | Store_Unchecked 0x2,0x9
059e 00cf | | Action Mark_Auxiliary
059f 780a |x | Jump 0x5aa
05a0 e005 | | Load 0x0,0x5
05a1 180f | | Execute Package,Field_Execute,Field_Number 0xf
05a2 e409 | | Load 0x2,0x9
05a3 0217 | | Execute Heap_Access,All_Reference
05a4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
05a5 e409 | | Load 0x2,0x9
05a6 0217 | | Execute Heap_Access,All_Reference
05a7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05a8 a409 | | Store_Unchecked 0x2,0x9
05a9 00c9 | | Action Pop_Auxiliary_Loop
05aa e409 | | Load 0x2,0x9
05ab 77f4 |w | Jump_Nonzero 0x5a0
05ac 00ce | | Action Pop_Auxiliary
05ad e004 | | Load 0x0,0x4
05ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05af e404 | | Load 0x2,0x4
05b0 0120 | | Execute Any,Is_Value
05b1 6803 |h | Jump_Zero 0x5b5
05b2 e004 | | Load 0x0,0x4
05b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b4 7801 |x | Jump 0x5b6
05b5 e404 | | Load 0x2,0x4
05b6 6045 |`E | Indirect_Literal Discrete,0x5fc,{0x00000000, 0x00004000}
05b7 e051 | Q | Load 0x0,0x51
05b8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b9 4800 |H | Short_Literal 0x0
05ba e5fe | | Load 0x2,-0x2
05bb e004 | | Load 0x0,0x4
05bc 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
05bd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
05be c404 | | Store 0x2,0x4
05bf c405 | | Store 0x2,0x5
05c0 4801 |H | Short_Literal 0x1
05c1 4801 |H | Short_Literal 0x1
05c2 e00f | | Load 0x0,0xf
05c3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05c4 035b | [ | Declare_Type Array,Constrained
05c5 0337 | 7 | Declare_Variable Array
05c6 e5fe | | Load 0x2,-0x2
05c7 e00f | | Load 0x0,0xf
05c8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
05c9 4801 |H | Short_Literal 0x1
05ca 00da | | Load_Top At_Offset_2
05cb 01d6 | | Execute Vector,Field_Write
05cc 602b |`+ | Indirect_Literal Discrete,0x5f8,{0x00000000, 0x00002832}
05cd e405 | | Load 0x2,0x5
05ce e003 | | Load 0x0,0x3
05cf 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
05d0 00cf | | Action Mark_Auxiliary
05d1 e402 | | Load 0x2,0x2
05d2 0217 | | Execute Heap_Access,All_Reference
05d3 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
05d4 a40a | | Store_Unchecked 0x2,0xa
05d5 840d | | Call 0x2,0xd
05d6 e5fd | | Load 0x2,-0x3
05d7 0217 | | Execute Heap_Access,All_Reference
05d8 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
05d9 7001 |p | Jump_Nonzero 0x5db
05da 780b |x | Jump 0x5e6
05db e402 | | Load 0x2,0x2
05dc 0217 | | Execute Heap_Access,All_Reference
05dd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
05de e213 | | Load 0x1,0x13
05df 0216 | | Execute Heap_Access,Convert
05e0 a402 | | Store_Unchecked 0x2,0x2
05e1 e402 | | Load 0x2,0x2
05e2 6803 |h | Jump_Zero 0x5e6
05e3 840e | | Call 0x2,0xe
05e4 00c9 | | Action Pop_Auxiliary_Loop
05e5 7feb | | Jump 0x5d1
05e6 00ce | | Action Pop_Auxiliary
05e7 4505 |E | Exit_Suprogram New_Top_Offset 0x5
05e8 TRAP_0510:
05e8 e003 | | Load 0x0,0x3
05e9 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
05ea 010f | | Execute Exception,Equal
05eb 7004 |p | Jump_Nonzero 0x5f0
05ec e003 | | Load 0x0,0x3
05ed 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e
05ee 010f | | Execute Exception,Equal
05ef 6804 |h | Jump_Zero 0x5f4
05f0 e003 | | Load 0x0,0x3
05f1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
05f2 a5fb | | Store_Unchecked 0x2,-0x5
05f3 4505 |E | Exit_Suprogram New_Top_Offset 0x5
05f4 0100 | | Execute Exception,Raise
05f5 0000 0000 | | .XXX[0x3]
05f7 0000 | |
05f8 0000 0000 | | .LITERAL {0x00000000, 0x00002832}
05fc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0600 0000 0000 | | .LITERAL {0x00000000, 0x00002834}
0604 0000 0000 | | .BLANK 0000[0x4]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 0610 | | .CONST 0x0610 ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0002 | | .CONST 0x0002 ; Number of locals
060b INIT_0608:
060b e5fb | | Load 0x2,-0x5
060c e001 | | Load 0x0,0x1
060d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
060e e20f | | Load 0x1,0xf
060f 03f1 | | Declare_Variable Discrete,With_Value
0610 BODY_0608:
0610 e5fe | | Load 0x2,-0x2
0611 e5fc | | Load 0x2,-0x4
0612 8250 | P | Call 0x1,0x50
0613 703f |p? | Jump_Nonzero 0x653
0614 0092 11a7 | | Action Push_String_Extended,0x11a7 ; "Harmonizing the state."
0616 824f | O | Call 0x1,0x4f
0617 00d8 | | Load_Top At_Offset_0
0618 0e02 | | Execute_Immediate Not_Equal,0x2
0619 6814 |h | Jump_Zero 0x62e
061a e5fa | | Load 0x2,-0x6
061b e5fb | | Load 0x2,-0x5
061c e5fc | | Load 0x2,-0x4
061d 4800 |H | Short_Literal 0x0
061e 821f | | Call 0x1,0x1f
061f c5fc | | Store 0x2,-0x4
0620 c5fb | | Store 0x2,-0x5
0621 c5fa | | Store 0x2,-0x6
0622 e5fa | | Load 0x2,-0x6
0623 e5fb | | Load 0x2,-0x5
0624 e216 | | Load 0x1,0x16
0625 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0626 e5fd | | Load 0x2,-0x3
0627 e5fe | | Load 0x2,-0x2
0628 4802 |H | Short_Literal 0x2
0629 e229 | ) | Load 0x1,0x29
062a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
062b c5fc | | Store 0x2,-0x4
062c c5fb | | Store 0x2,-0x5
062d c5fa | | Store 0x2,-0x6
062e e5fa | | Load 0x2,-0x6
062f e5ff | | Load 0x2,-0x1
0630 e5fc | | Load 0x2,-0x4
0631 e5fe | | Load 0x2,-0x2
0632 e5fc | | Load 0x2,-0x4
0633 0217 | | Execute Heap_Access,All_Reference
0634 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
0635 e213 | | Load 0x1,0x13
0636 0216 | | Execute Heap_Access,Convert
0637 8251 | Q | Call 0x1,0x51
0638 c5fa | | Store 0x2,-0x6
0639 e5fb | | Load 0x2,-0x5
063a e001 | | Load 0x0,0x1
063b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
063c 00d9 | | Load_Top At_Offset_1
063d 027e | ~ | Execute Discrete,Not_Equal
063e 6814 |h | Jump_Zero 0x653
063f e5fa | | Load 0x2,-0x6
0640 e5fb | | Load 0x2,-0x5
0641 e5fc | | Load 0x2,-0x4
0642 4800 |H | Short_Literal 0x0
0643 821f | | Call 0x1,0x1f
0644 c5fc | | Store 0x2,-0x4
0645 c5fb | | Store 0x2,-0x5
0646 c5fa | | Store 0x2,-0x6
0647 e5fa | | Load 0x2,-0x6
0648 e5fb | | Load 0x2,-0x5
0649 e216 | | Load 0x1,0x16
064a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
064b e5fd | | Load 0x2,-0x3
064c e5fe | | Load 0x2,-0x2
064d e402 | | Load 0x2,0x2
064e e229 | ) | Load 0x1,0x29
064f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0650 c5fc | | Store 0x2,-0x4
0651 c5fb | | Store 0x2,-0x5
0652 c5fa | | Store 0x2,-0x6
0653 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0654 0000 0000 | | .BLANK 0000[0x4]
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 0663 | c | .CONST 0x0663 ; Address of begin
0659 0004 | | .CONST 0x0004 ; Address of exception handler
065a 0003 | | .CONST 0x0003 ; Number of locals
065b INIT_0658:
065b 00da | | Load_Top At_Offset_2
065c 0217 | | Execute Heap_Access,All_Reference
065d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
065e e214 | | Load 0x1,0x14
065f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0660 1c08 | | Execute_Immediate Run_Utility,0x8
0661 e22a | * | Load 0x1,0x2a
0662 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0663 BODY_0658:
0663 4800 |H | Short_Literal 0x0
0664 00da | | Load_Top At_Offset_2
0665 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0666 e22a | * | Load 0x1,0x2a
0667 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0668 e5ff | | Load 0x2,-0x1
0669 e22a | * | Load 0x1,0x2a
066a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
066b 0031 | 1 | Store_Top Heap_Access,At_Offset_1
066c 00cf | | Action Mark_Auxiliary
066d 00da | | Load_Top At_Offset_2
066e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
066f 01d9 | | Execute Vector,Reverse_Bounds
0670 0263 | c | Execute Discrete,Above_Bound
0671 7037 |p7 | Jump_Nonzero 0x6a9
0672 00db | | Load_Top At_Offset_3
0673 e22a | * | Load 0x1,0x2a
0674 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0675 6821 |h! | Jump_Zero 0x697
0676 00d8 | | Load_Top At_Offset_0
0677 0aff | | Execute_Immediate Plus,-0x1
0678 e214 | | Load 0x1,0x14
0679 1b14 | | Execute Package,Field_Read,Field_Number 0x14
067a 1c08 | | Execute_Immediate Run_Utility,0x8
067b 4800 |H | Short_Literal 0x0
067c 00d9 | | Load_Top At_Offset_1
067d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
067e 4801 |H | Short_Literal 0x1
067f 00da | | Load_Top At_Offset_2
0680 0aff | | Execute_Immediate Plus,-0x1
0681 e402 | | Load 0x2,0x2
0682 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0683 01cf | | Execute Vector,Slice_Read
0684 00d9 | | Load_Top At_Offset_1
0685 00d8 | | Load_Top At_Offset_0
0686 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0687 00da | | Load_Top At_Offset_2
0688 01da | | Execute Vector,Bounds
0689 00da | | Load_Top At_Offset_2
068a 01da | | Execute Vector,Bounds
068b 00da | | Load_Top At_Offset_2
068c 027f | | Execute Discrete,Equal
068d 7001 |p | Jump_Nonzero 0x68f
068e 08e0 | | Execute_Immediate Raise,0xe0
068f 00cd | | Action Spare6_Action
0690 027f | | Execute Discrete,Equal
0691 7001 |p | Jump_Nonzero 0x693
0692 08e0 | | Execute_Immediate Raise,0xe0
0693 00d2 | | Pop_Control Pop_Count_2
0694 00d9 | | Load_Top At_Offset_1
0695 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0696 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0697 e5ff | | Load 0x2,-0x1
0698 e403 | | Load 0x2,0x3
0699 e22a | * | Load 0x1,0x2a
069a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
069b e22a | * | Load 0x1,0x2a
069c 180f | | Execute Package,Field_Execute,Field_Number 0xf
069d e210 | | Load 0x1,0x10
069e 0216 | | Execute Heap_Access,Convert
069f 00d9 | | Load_Top At_Offset_1
06a0 e402 | | Load 0x2,0x2
06a1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06a2 01d6 | | Execute Vector,Field_Write
06a3 00db | | Load_Top At_Offset_3
06a4 e22a | * | Load 0x1,0x2a
06a5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
06a6 c403 | | Store 0x2,0x3
06a7 00c8 | | Action Pop_Auxiliary_Range
06a8 3fc9 |? | Loop_Increasing 0x672
06a9 00ce | | Action Pop_Auxiliary
06aa 00d9 | | Load_Top At_Offset_1
06ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06ac 0000 0000 | | .BLANK 0000[0x4]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06b3 | | .CONST 0x06b3 ; Address of begin
06b1 0004 | | .CONST 0x0004 ; Address of exception handler
06b2 0001 | | .CONST 0x0001 ; Number of locals
06b3 BODY_06b0:
06b3 INIT_06b0:
06b3 00da | | Load_Top At_Offset_2
06b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06b5 0000 0000 | | .XXX[0x3]
06b7 0000 | |
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb | | .CONST 0x06bb ; Address of begin
06b9 0004 | | .CONST 0x0004 ; Address of exception handler
06ba 0001 | | .CONST 0x0001 ; Number of locals
06bb BODY_06b8:
06bb INIT_06b8:
06bb 4801 |H | Short_Literal 0x1
06bc 0092 11a8 | | Action Push_String_Extended,0x11a8 ; "<DEFAULT>"
06be e5fe | | Load 0x2,-0x2
06bf e066 | f | Load 0x0,0x66
06c0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
06c1 7006 |p | Jump_Nonzero 0x6c8
06c2 4801 |H | Short_Literal 0x1
06c3 00ea | | Load_Encached Null_String_Cache
06c4 e5fe | | Load 0x2,-0x2
06c5 e066 | f | Load 0x0,0x66
06c6 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
06c7 680c |h | Jump_Zero 0x6d4
06c8 00da | | Load_Top At_Offset_2
06c9 e216 | | Load 0x1,0x16
06ca 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
06cb 00db | | Load_Top At_Offset_3
06cc e216 | | Load 0x1,0x16
06cd 187c | | | Execute Package,Field_Execute,Field_Number 0x7c
06ce 01cc | | Execute Vector,Catenate
06cf 00db | | Load_Top At_Offset_3
06d0 e216 | | Load 0x1,0x16
06d1 187a | z | Execute Package,Field_Execute,Field_Number 0x7a
06d2 01cc | | Execute Vector,Catenate
06d3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06d4 00db | | Load_Top At_Offset_3
06d5 01dd | | Execute Vector,First
06d6 e5fe | | Load 0x2,-0x2
06d7 01d7 | | Execute Vector,Field_Read
06d8 0f21 | ! | Execute_Immediate Equal,0x21
06d9 6802 |h | Jump_Zero 0x6dc
06da 00db | | Load_Top At_Offset_3
06db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06dc 00db | | Load_Top At_Offset_3
06dd 01dd | | Execute Vector,First
06de e5fe | | Load 0x2,-0x2
06df 01d7 | | Execute Vector,Field_Read
06e0 0f2e | . | Execute_Immediate Equal,0x2e
06e1 6806 |h | Jump_Zero 0x6e8
06e2 00da | | Load_Top At_Offset_2
06e3 e216 | | Load 0x1,0x16
06e4 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
06e5 e5fe | | Load 0x2,-0x2
06e6 01cc | | Execute Vector,Catenate
06e7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06e8 00da | | Load_Top At_Offset_2
06e9 e216 | | Load 0x1,0x16
06ea 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
06eb 00db | | Load_Top At_Offset_3
06ec e216 | | Load 0x1,0x16
06ed 187c | | | Execute Package,Field_Execute,Field_Number 0x7c
06ee 01cc | | Execute Vector,Catenate
06ef e5fe | | Load 0x2,-0x2
06f0 01cc | | Execute Vector,Catenate
06f1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06f2 0000 0000 | | .BLANK 0000[0x6]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fe | | .CONST 0x06fe ; Address of begin
06f9 0004 | | .CONST 0x0004 ; Address of exception handler
06fa 0002 | | .CONST 0x0002 ; Number of locals
06fb INIT_06f8:
06fb e004 | | Load 0x0,0x4
06fc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06fd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06fe BODY_06f8:
06fe e004 | | Load 0x0,0x4
06ff 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0700 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0701 e5fc | | Load 0x2,-0x4
0702 6061 |`a | Indirect_Literal Discrete,0x764,{0x00000000, 0x00004000}
0703 e051 | Q | Load 0x0,0x51
0704 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0705 e052 | R | Load 0x0,0x52
0706 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0707 e070 | p | Load 0x0,0x70
0708 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0709 4801 |H | Short_Literal 0x1
070a 4800 |H | Short_Literal 0x0
070b e052 | R | Load 0x0,0x52
070c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
070d e004 | | Load 0x0,0x4
070e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
070f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0710 e5ff | | Load 0x2,-0x1
0711 e004 | | Load 0x0,0x4
0712 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0713 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0714 c5fc | | Store 0x2,-0x4
0715 0059 | Y | Store_Top Discrete,At_Offset_1
0716 00d8 | | Load_Top At_Offset_0
0717 6834 |h4 | Jump_Zero 0x74c
0718 00d8 | | Load_Top At_Offset_0
0719 0f03 | | Execute_Immediate Equal,0x3
071a 6817 |h | Jump_Zero 0x732
071b e065 | e | Load 0x0,0x65
071c 180e | | Execute Package,Field_Execute,Field_Number 0xe
071d 4801 |H | Short_Literal 0x1
071e 4801 |H | Short_Literal 0x1
071f e00f | | Load 0x0,0xf
0720 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0721 035b | [ | Declare_Type Array,Constrained
0722 0337 | 7 | Declare_Variable Array
0723 e5ff | | Load 0x2,-0x1
0724 e00f | | Load 0x0,0xf
0725 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0726 4801 |H | Short_Literal 0x1
0727 00da | | Load_Top At_Offset_2
0728 01d6 | | Execute Vector,Field_Write
0729 4801 |H | Short_Literal 0x1
072a e5fd | | Load 0x2,-0x3
072b e003 | | Load 0x0,0x3
072c 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
072d e004 | | Load 0x0,0x4
072e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
072f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0730 c5fc | | Store 0x2,-0x4
0731 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0732 e003 | | Load 0x0,0x3
0733 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0734 4801 |H | Short_Literal 0x1
0735 4802 |H | Short_Literal 0x2
0736 e00f | | Load 0x0,0xf
0737 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0738 035b | [ | Declare_Type Array,Constrained
0739 0337 | 7 | Declare_Variable Array
073a e5ff | | Load 0x2,-0x1
073b e00f | | Load 0x0,0xf
073c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
073d 4801 |H | Short_Literal 0x1
073e 00da | | Load_Top At_Offset_2
073f 01d6 | | Execute Vector,Field_Write
0740 e5ff | | Load 0x2,-0x1
0741 00db | | Load_Top At_Offset_3
0742 e00f | | Load 0x0,0xf
0743 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0744 4802 |H | Short_Literal 0x2
0745 00da | | Load_Top At_Offset_2
0746 01d6 | | Execute Vector,Field_Write
0747 e5fe | | Load 0x2,-0x2
0748 e003 | | Load 0x0,0x3
0749 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
074a c5fb | | Store 0x2,-0x5
074b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
074c e5fc | | Load 0x2,-0x4
074d e004 | | Load 0x0,0x4
074e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
074f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0750 6812 |h | Jump_Zero 0x763
0751 e065 | e | Load 0x0,0x65
0752 180e | | Execute Package,Field_Execute,Field_Number 0xe
0753 4801 |H | Short_Literal 0x1
0754 4801 |H | Short_Literal 0x1
0755 e00f | | Load 0x0,0xf
0756 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0757 035b | [ | Declare_Type Array,Constrained
0758 0337 | 7 | Declare_Variable Array
0759 e5ff | | Load 0x2,-0x1
075a e00f | | Load 0x0,0xf
075b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
075c 4801 |H | Short_Literal 0x1
075d 00da | | Load_Top At_Offset_2
075e 01d6 | | Execute Vector,Field_Write
075f 4801 |H | Short_Literal 0x1
0760 e5fd | | Load 0x2,-0x3
0761 e003 | | Load 0x0,0x3
0762 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0763 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0764 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 077f | | .CONST 0x077f ; Address of begin
0769 0004 | | .CONST 0x0004 ; Address of exception handler
076a 0007 | | .CONST 0x0007 ; Number of locals
076b INIT_0768:
076b e004 | | Load 0x0,0x4
076c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
076d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
076e 02c7 | | Declare_Variable Any
076f 00d8 | | Load_Top At_Offset_0
0770 1c00 | | Execute_Immediate Run_Utility,0x0
0771 e004 | | Load 0x0,0x4
0772 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0773 02c7 | | Declare_Variable Any
0774 00d8 | | Load_Top At_Offset_0
0775 1c00 | | Execute_Immediate Run_Utility,0x0
0776 e004 | | Load 0x0,0x4
0777 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0778 e003 | | Load 0x0,0x3
0779 1b0d | | Execute Package,Field_Read,Field_Number 0xd
077a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
077b 00e2 | | Load_Encached Integer_Cache
077c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
077d 029f 0a2b | +| Declare_Subprogram INIT_0a28,For_Call
077f BODY_0768:
077f 00da | | Load_Top At_Offset_2
0780 e402 | | Load 0x2,0x2
0781 e5fd | | Load 0x2,-0x3
0782 e5fe | | Load 0x2,-0x2
0783 e5ff | | Load 0x2,-0x1
0784 8256 | V | Call 0x1,0x56
0785 c402 | | Store 0x2,0x2
0786 005b | [ | Store_Top Discrete,At_Offset_3
0787 4800 |H | Short_Literal 0x0
0788 00db | | Load_Top At_Offset_3
0789 e003 | | Load 0x0,0x3
078a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
078b 6844 |hD | Jump_Zero 0x7d0
078c 00cf | | Action Mark_Auxiliary
078d 7836 |x6 | Jump 0x7c4
078e e004 | | Load 0x0,0x4
078f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0790 e403 | | Load 0x2,0x3
0791 0120 | | Execute Any,Is_Value
0792 6803 |h | Jump_Zero 0x796
0793 e004 | | Load 0x0,0x4
0794 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0795 7801 |x | Jump 0x797
0796 e403 | | Load 0x2,0x3
0797 e402 | | Load 0x2,0x2
0798 e004 | | Load 0x0,0x4
0799 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
079a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
079b c403 | | Store 0x2,0x3
079c c404 | | Store 0x2,0x4
079d e404 | | Load 0x2,0x4
079e 681c |h | Jump_Zero 0x7bb
079f e003 | | Load 0x0,0x3
07a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07a1 4801 |H | Short_Literal 0x1
07a2 4802 |H | Short_Literal 0x2
07a3 e00f | | Load 0x0,0xf
07a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07a5 035b | [ | Declare_Type Array,Constrained
07a6 0337 | 7 | Declare_Variable Array
07a7 e402 | | Load 0x2,0x2
07a8 e004 | | Load 0x0,0x4
07a9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07aa 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
07ab e00f | | Load 0x0,0xf
07ac 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07ad 4801 |H | Short_Literal 0x1
07ae 00da | | Load_Top At_Offset_2
07af 01d6 | | Execute Vector,Field_Write
07b0 e404 | | Load 0x2,0x4
07b1 e00f | | Load 0x0,0xf
07b2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07b3 4802 |H | Short_Literal 0x2
07b4 00da | | Load_Top At_Offset_2
07b5 01d6 | | Execute Vector,Field_Write
07b6 e5fc | | Load 0x2,-0x4
07b7 e003 | | Load 0x0,0x3
07b8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07b9 c405 | | Store 0x2,0x5
07ba 7803 |x | Jump 0x7be
07bb 00da | | Load_Top At_Offset_2
07bc 0a01 | | Execute_Immediate Plus,0x1
07bd 005b | [ | Store_Top Discrete,At_Offset_3
07be e402 | | Load 0x2,0x2
07bf e004 | | Load 0x0,0x4
07c0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07c1 181d | | Execute Package,Field_Execute,Field_Number 0x1d
07c2 c402 | | Store 0x2,0x2
07c3 00c9 | | Action Pop_Auxiliary_Loop
07c4 e402 | | Load 0x2,0x2
07c5 e004 | | Load 0x0,0x4
07c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07c7 181e | | Execute Package,Field_Execute,Field_Number 0x1e
07c8 6fc5 |o | Jump_Zero 0x78e
07c9 00ce | | Action Pop_Auxiliary
07ca e402 | | Load 0x2,0x2
07cb e004 | | Load 0x0,0x4
07cc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07cd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
07ce c402 | | Store 0x2,0x2
07cf 8407 | | Call 0x2,0x7
07d0 4800 |H | Short_Literal 0x0
07d1 e236 | 6 | Load 0x1,0x36
07d2 1c08 | | Execute_Immediate Run_Utility,0x8
07d3 00db | | Load_Top At_Offset_3
07d4 00d9 | | Load_Top At_Offset_1
07d5 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07d6 4801 |H | Short_Literal 0x1
07d7 4800 |H | Short_Literal 0x0
07d8 e235 | 5 | Load 0x1,0x35
07d9 035b | [ | Declare_Type Array,Constrained
07da 0337 | 7 | Declare_Variable Array
07db 00d9 | | Load_Top At_Offset_1
07dc 00d8 | | Load_Top At_Offset_0
07dd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07de 00da | | Load_Top At_Offset_2
07df 01da | | Execute Vector,Bounds
07e0 00da | | Load_Top At_Offset_2
07e1 01da | | Execute Vector,Bounds
07e2 00da | | Load_Top At_Offset_2
07e3 027f | | Execute Discrete,Equal
07e4 7001 |p | Jump_Nonzero 0x7e6
07e5 08e0 | | Execute_Immediate Raise,0xe0
07e6 00cd | | Action Spare6_Action
07e7 027f | | Execute Discrete,Equal
07e8 7001 |p | Jump_Nonzero 0x7ea
07e9 08e0 | | Execute_Immediate Raise,0xe0
07ea 00d2 | | Pop_Control Pop_Count_2
07eb 00d9 | | Load_Top At_Offset_1
07ec 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
07ed 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
07ee 0000 0000 | | .XXX[0x2]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07fc | | .CONST 0x07fc ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0005 | | .CONST 0x0005 ; Number of locals
07f3 INIT_07f0:
07f3 e003 | | Load 0x0,0x3
07f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
07f6 e228 | ( | Load 0x1,0x28
07f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f8 e214 | | Load 0x1,0x14
07f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07fa 029f 0a73 | s| Declare_Subprogram INIT_0a70,For_Call
07fc BODY_07f0:
07fc e5ff | | Load 0x2,-0x1
07fd 01db | | Execute Vector,Length
07fe 7003 |p | Jump_Nonzero 0x802
07ff e5fe | | Load 0x2,-0x2
0800 8253 | S | Call 0x1,0x53
0801 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0802 e5ff | | Load 0x2,-0x1
0803 01dd | | Execute Vector,First
0804 e5ff | | Load 0x2,-0x1
0805 01d7 | | Execute Vector,Field_Read
0806 0f2e | . | Execute_Immediate Equal,0x2e
0807 683b |h; | Jump_Zero 0x843
0808 e5fe | | Load 0x2,-0x2
0809 e5ff | | Load 0x2,-0x1
080a e228 | ( | Load 0x1,0x28
080b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
080c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
080d 00da | | Load_Top At_Offset_2
080e e228 | ( | Load 0x1,0x28
080f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0810 7032 |p2 | Jump_Nonzero 0x843
0811 e5fe | | Load 0x2,-0x2
0812 00db | | Load_Top At_Offset_3
0813 e22a | * | Load 0x1,0x2a
0814 180f | | Execute Package,Field_Execute,Field_Number 0xf
0815 e210 | | Load 0x1,0x10
0816 0216 | | Execute Heap_Access,Convert
0817 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0818 00d9 | | Load_Top At_Offset_1
0819 e214 | | Load 0x1,0x14
081a 180f | | Execute Package,Field_Execute,Field_Number 0xf
081b 7027 |p' | Jump_Nonzero 0x843
081c 4801 |H | Short_Literal 0x1
081d e214 | | Load 0x1,0x14
081e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
081f 1c08 | | Execute_Immediate Run_Utility,0x8
0820 4800 |H | Short_Literal 0x0
0821 00d9 | | Load_Top At_Offset_1
0822 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0823 4801 |H | Short_Literal 0x1
0824 4801 |H | Short_Literal 0x1
0825 e214 | | Load 0x1,0x14
0826 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0827 035b | [ | Declare_Type Array,Constrained
0828 0337 | 7 | Declare_Variable Array
0829 4801 |H | Short_Literal 0x1
082a 4801 |H | Short_Literal 0x1
082b e404 | | Load 0x2,0x4
082c 00d9 | | Load_Top At_Offset_1
082d e407 | | Load 0x2,0x7
082e 01d6 | | Execute Vector,Field_Write
082f 3ffb |? | Loop_Increasing 0x82b
0830 00d9 | | Load_Top At_Offset_1
0831 00d8 | | Load_Top At_Offset_0
0832 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0833 00da | | Load_Top At_Offset_2
0834 01da | | Execute Vector,Bounds
0835 00da | | Load_Top At_Offset_2
0836 01da | | Execute Vector,Bounds
0837 00da | | Load_Top At_Offset_2
0838 027f | | Execute Discrete,Equal
0839 7001 |p | Jump_Nonzero 0x83b
083a 08e0 | | Execute_Immediate Raise,0xe0
083b 00cd | | Action Spare6_Action
083c 027f | | Execute Discrete,Equal
083d 7001 |p | Jump_Nonzero 0x83f
083e 08e0 | | Execute_Immediate Raise,0xe0
083f 00d2 | | Pop_Control Pop_Count_2
0840 00d9 | | Load_Top At_Offset_1
0841 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0842 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0843 8405 | | Call 0x2,0x5
0844 0831 | 1 | Execute_Immediate Raise,0x31
0845 0000 0000 | | .XXX[0x3]
0847 0000 | |
0848 ; --------------------------------------------------------------------------------------
0848 ; SUBPROGRAM
0848 ; --------------------------------------------------------------------------------------
0848 0872 | r | .CONST 0x0872 ; Address of begin
0849 0004 | | .CONST 0x0004 ; Address of exception handler
084a 0007 | | .CONST 0x0007 ; Number of locals
084b INIT_0848:
084b e081 | | Load 0x0,0x81
084c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
084d 0124 | $ | Execute Any,Is_Constrained
084e 7009 |p | Jump_Nonzero 0x858
084f e081 | | Load 0x0,0x81
0850 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0851 1c09 | | Execute_Immediate Run_Utility,0x9
0852 e081 | | Load 0x0,0x81
0853 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0854 e02c | , | Load 0x0,0x2c
0855 180d | | Execute Package,Field_Execute,Field_Number 0xd
0856 0398 | | Declare_Variable Heap_Access,By_Allocation,With_Subtype
0857 7805 |x | Jump 0x85d
0858 e081 | | Load 0x0,0x81
0859 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
085a e02c | , | Load 0x0,0x2c
085b 180d | | Execute Package,Field_Execute,Field_Number 0xd
085c 039c | | Declare_Variable Heap_Access,By_Allocation
085d e004 | | Load 0x0,0x4
085e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
085f e081 | | Load 0x0,0x81
0860 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36
0861 02c7 | | Declare_Variable Any
0862 00d8 | | Load_Top At_Offset_0
0863 1c00 | | Execute_Immediate Run_Utility,0x0
0864 e004 | | Load 0x0,0x4
0865 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0866 02c7 | | Declare_Variable Any
0867 00d8 | | Load_Top At_Offset_0
0868 1c00 | | Execute_Immediate Run_Utility,0x0
0869 4801 |H | Short_Literal 0x1
086a 48ff |H | Short_Literal 0xff
086b e235 | 5 | Load 0x1,0x35
086c 035b | [ | Declare_Type Array,Constrained
086d 0337 | 7 | Declare_Variable Array
086e 00d8 | | Load_Top At_Offset_0
086f 1c00 | | Execute_Immediate Run_Utility,0x0
0870 00e3 | | Load_Encached Natural_Cache
0871 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0872 BODY_0848:
0872 00be | | Action Activate_Tasks
0873 e402 | | Load 0x2,0x2
0874 e004 | | Load 0x0,0x4
0875 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0876 00d9 | | Load_Top At_Offset_1
0877 0219 | | Execute Heap_Access,All_Read
0878 4800 |H | Short_Literal 0x0
0879 4800 |H | Short_Literal 0x0
087a e051 | Q | Load 0x0,0x51
087b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
087c e5ff | | Load 0x2,-0x1
087d e081 | | Load 0x0,0x81
087e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
087f 00da | | Load_Top At_Offset_2
0880 0218 | | Execute Heap_Access,All_Write
0881 c403 | | Store 0x2,0x3
0882 00d1 | | Pop_Control Pop_Count_1
0883 e403 | | Load 0x2,0x3
0884 6810 |h | Jump_Zero 0x895
0885 4801 |H | Short_Literal 0x1
0886 4801 |H | Short_Literal 0x1
0887 e00f | | Load 0x0,0xf
0888 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0889 035b | [ | Declare_Type Array,Constrained
088a 0337 | 7 | Declare_Variable Array
088b e5ff | | Load 0x2,-0x1
088c e00f | | Load 0x0,0xf
088d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
088e 4801 |H | Short_Literal 0x1
088f 00da | | Load_Top At_Offset_2
0890 01d6 | | Execute Vector,Field_Write
0891 e5fd | | Load 0x2,-0x3
0892 e403 | | Load 0x2,0x3
0893 e003 | | Load 0x0,0x3
0894 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0895 00db | | Load_Top At_Offset_3
0896 0120 | | Execute Any,Is_Value
0897 6803 |h | Jump_Zero 0x89b
0898 e081 | | Load 0x0,0x81
0899 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36
089a 7801 |x | Jump 0x89c
089b 00db | | Load_Top At_Offset_3
089c e402 | | Load 0x2,0x2
089d e081 | | Load 0x0,0x81
089e 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
089f c404 | | Store 0x2,0x4
08a0 00cf | | Action Mark_Auxiliary
08a1 7824 |x$ | Jump 0x8c6
08a2 00d9 | | Load_Top At_Offset_1
08a3 0a01 | | Execute_Immediate Plus,0x1
08a4 005a | Z | Store_Top Discrete,At_Offset_2
08a5 e404 | | Load 0x2,0x4
08a6 e081 | | Load 0x0,0x81
08a7 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
08a8 c405 | | Store 0x2,0x5
08a9 e5fe | | Load 0x2,-0x2
08aa 6812 |h | Jump_Zero 0x8bd
08ab e402 | | Load 0x2,0x2
08ac 0219 | | Execute Heap_Access,All_Read
08ad e405 | | Load 0x2,0x5
08ae e081 | | Load 0x0,0x81
08af 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
08b0 00da | | Load_Top At_Offset_2
08b1 e406 | | Load 0x2,0x6
08b2 01d6 | | Execute Vector,Field_Write
08b3 00d9 | | Load_Top At_Offset_1
08b4 00db | | Load_Top At_Offset_3
08b5 01d7 | | Execute Vector,Field_Read
08b6 e004 | | Load 0x0,0x4
08b7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
08b8 6808 |h | Jump_Zero 0x8c1
08b9 00d9 | | Load_Top At_Offset_1
08ba 0aff | | Execute_Immediate Plus,-0x1
08bb 005a | Z | Store_Top Discrete,At_Offset_2
08bc 7804 |x | Jump 0x8c1
08bd 00db | | Load_Top At_Offset_3
08be 00da | | Load_Top At_Offset_2
08bf e406 | | Load 0x2,0x6
08c0 01d6 | | Execute Vector,Field_Write
08c1 e404 | | Load 0x2,0x4
08c2 e081 | | Load 0x0,0x81
08c3 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
08c4 c404 | | Store 0x2,0x4
08c5 00c9 | | Action Pop_Auxiliary_Loop
08c6 e404 | | Load 0x2,0x4
08c7 e081 | | Load 0x0,0x81
08c8 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
08c9 6fd8 |o | Jump_Zero 0x8a2
08ca 00ce | | Action Pop_Auxiliary
08cb e402 | | Load 0x2,0x2
08cc e004 | | Load 0x0,0x4
08cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ce 00d9 | | Load_Top At_Offset_1
08cf 0219 | | Execute Heap_Access,All_Read
08d0 e081 | | Load 0x0,0x81
08d1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
08d2 00da | | Load_Top At_Offset_2
08d3 0218 | | Execute Heap_Access,All_Write
08d4 c403 | | Store 0x2,0x3
08d5 00d1 | | Pop_Control Pop_Count_1
08d6 4801 |H | Short_Literal 0x1
08d7 00d9 | | Load_Top At_Offset_1
08d8 00db | | Load_Top At_Offset_3
08d9 01cf | | Execute Vector,Slice_Read
08da e235 | 5 | Load 0x1,0x35
08db 01c6 | | Execute Vector,Convert_To_Formal
08dc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
08dd 0000 0000 | | .XXX[0x3]
08df 0000 | |
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08ea | | .CONST 0x08ea ; Address of begin
08e1 0004 | | .CONST 0x0004 ; Address of exception handler
08e2 0003 | | .CONST 0x0003 ; Number of locals
08e3 INIT_08e0:
08e3 e004 | | Load 0x0,0x4
08e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08e5 02c7 | | Declare_Variable Any
08e6 00d8 | | Load_Top At_Offset_0
08e7 1c00 | | Execute_Immediate Run_Utility,0x0
08e8 e004 | | Load 0x0,0x4
08e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ea BODY_08e0:
08ea e004 | | Load 0x0,0x4
08eb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ec 00da | | Load_Top At_Offset_2
08ed 0120 | | Execute Any,Is_Value
08ee 6803 |h | Jump_Zero 0x8f2
08ef e004 | | Load 0x0,0x4
08f0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08f1 7801 |x | Jump 0x8f3
08f2 00da | | Load_Top At_Offset_2
08f3 e5ff | | Load 0x2,-0x1
08f4 e004 | | Load 0x0,0x4
08f5 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
08f6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
08f7 c402 | | Store 0x2,0x2
08f8 0059 | Y | Store_Top Discrete,At_Offset_1
08f9 00d8 | | Load_Top At_Offset_0
08fa 6810 |h | Jump_Zero 0x90b
08fb 4801 |H | Short_Literal 0x1
08fc 4801 |H | Short_Literal 0x1
08fd e00f | | Load 0x0,0xf
08fe 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08ff 035b | [ | Declare_Type Array,Constrained
0900 0337 | 7 | Declare_Variable Array
0901 e5ff | | Load 0x2,-0x1
0902 e00f | | Load 0x0,0xf
0903 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0904 4801 |H | Short_Literal 0x1
0905 00da | | Load_Top At_Offset_2
0906 01d6 | | Execute Vector,Field_Write
0907 e5fe | | Load 0x2,-0x2
0908 00da | | Load_Top At_Offset_2
0909 e003 | | Load 0x0,0x3
090a 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
090b 00d9 | | Load_Top At_Offset_1
090c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
090d 0000 0000 | | .XXX[0x3]
090f 0000 | |
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 0919 | | .CONST 0x0919 ; Address of begin
0911 0004 | | .CONST 0x0004 ; Address of exception handler
0912 0002 | | .CONST 0x0002 ; Number of locals
0913 INIT_0910:
0913 00da | | Load_Top At_Offset_2
0914 e004 | | Load 0x0,0x4
0915 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0916 e004 | | Load 0x0,0x4
0917 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0918 03f1 | | Declare_Variable Discrete,With_Value
0919 BODY_0910:
0919 00d8 | | Load_Top At_Offset_0
091a e053 | S | Load 0x0,0x53
091b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
091c 027f | | Execute Discrete,Equal
091d 700a |p | Jump_Nonzero 0x928
091e 00d8 | | Load_Top At_Offset_0
091f e053 | S | Load 0x0,0x53
0920 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0921 027f | | Execute Discrete,Equal
0922 7005 |p | Jump_Nonzero 0x928
0923 00d8 | | Load_Top At_Offset_0
0924 e053 | S | Load 0x0,0x53
0925 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0926 027f | | Execute Discrete,Equal
0927 6802 |h | Jump_Zero 0x92a
0928 4801 |H | Short_Literal 0x1
0929 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
092a 00d8 | | Load_Top At_Offset_0
092b e053 | S | Load 0x0,0x53
092c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
092d 027f | | Execute Discrete,Equal
092e 700a |p | Jump_Nonzero 0x939
092f 00d8 | | Load_Top At_Offset_0
0930 e053 | S | Load 0x0,0x53
0931 180f | | Execute Package,Field_Execute,Field_Number 0xf
0932 027f | | Execute Discrete,Equal
0933 7005 |p | Jump_Nonzero 0x939
0934 00d8 | | Load_Top At_Offset_0
0935 e053 | S | Load 0x0,0x53
0936 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0937 027f | | Execute Discrete,Equal
0938 6802 |h | Jump_Zero 0x93b
0939 4802 |H | Short_Literal 0x2
093a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
093b 00d8 | | Load_Top At_Offset_0
093c e053 | S | Load 0x0,0x53
093d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
093e 027f | | Execute Discrete,Equal
093f 6802 |h | Jump_Zero 0x942
0940 4803 |H | Short_Literal 0x3
0941 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0942 00d8 | | Load_Top At_Offset_0
0943 e053 | S | Load 0x0,0x53
0944 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0945 027f | | Execute Discrete,Equal
0946 6802 |h | Jump_Zero 0x949
0947 4804 |H | Short_Literal 0x4
0948 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0949 4800 |H | Short_Literal 0x0
094a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
094b 0000 0000 | | .BLANK 0000[0x5]
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953 | S | .CONST 0x0953 ; Address of begin
0951 0004 | | .CONST 0x0004 ; Address of exception handler
0952 0001 | | .CONST 0x0001 ; Number of locals
0953 BODY_0950:
0953 INIT_0950:
0953 00da | | Load_Top At_Offset_2
0954 825b | [ | Call 0x1,0x5b
0955 0f01 | | Execute_Immediate Equal,0x1
0956 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0957 0000 | | .XXX[0x1]
0958 ; --------------------------------------------------------------------------------------
0958 ; SUBPROGRAM
0958 ; --------------------------------------------------------------------------------------
0958 095d | ] | .CONST 0x095d ; Address of begin
0959 0004 | | .CONST 0x0004 ; Address of exception handler
095a 0002 | | .CONST 0x0002 ; Number of locals
095b INIT_0958:
095b 029f 0adb | | Declare_Subprogram INIT_0ad8,For_Call
095d BODY_0958:
095d 00cf | | Action Mark_Auxiliary
095e 7842 |xB | Jump 0x9a1
095f e40a | | Load 0x2,0xa
0960 0217 | | Execute Heap_Access,All_Reference
0961 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0962 e004 | | Load 0x0,0x4
0963 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0964 7019 |p | Jump_Nonzero 0x97e
0965 e004 | | Load 0x0,0x4
0966 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0967 e407 | | Load 0x2,0x7
0968 0120 | | Execute Any,Is_Value
0969 6803 |h | Jump_Zero 0x96d
096a e004 | | Load 0x0,0x4
096b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
096c 7801 |x | Jump 0x96e
096d e407 | | Load 0x2,0x7
096e e40a | | Load 0x2,0xa
096f 0217 | | Execute Heap_Access,All_Reference
0970 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0971 e004 | | Load 0x0,0x4
0972 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0973 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0974 c407 | | Store 0x2,0x7
0975 c405 | | Store 0x2,0x5
0976 e5fd | | Load 0x2,-0x3
0977 e40a | | Load 0x2,0xa
0978 0217 | | Execute Heap_Access,All_Reference
0979 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
097a e22b | + | Load 0x1,0x2b
097b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
097c 8602 | | Call 0x3,0x2
097d 781e |x | Jump 0x99c
097e e003 | | Load 0x0,0x3
097f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0980 4801 |H | Short_Literal 0x1
0981 4803 |H | Short_Literal 0x3
0982 e00f | | Load 0x0,0xf
0983 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0984 035b | [ | Declare_Type Array,Constrained
0985 0337 | 7 | Declare_Variable Array
0986 e5fd | | Load 0x2,-0x3
0987 e216 | | Load 0x1,0x16
0988 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0989 4801 |H | Short_Literal 0x1
098a 00da | | Load_Top At_Offset_2
098b 01d6 | | Execute Vector,Field_Write
098c e5ff | | Load 0x2,-0x1
098d e216 | | Load 0x1,0x16
098e 1842 | B | Execute Package,Field_Execute,Field_Number 0x42
098f 4802 |H | Short_Literal 0x2
0990 00da | | Load_Top At_Offset_2
0991 01d6 | | Execute Vector,Field_Write
0992 e40a | | Load 0x2,0xa
0993 e215 | | Load 0x1,0x15
0994 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0995 4803 |H | Short_Literal 0x3
0996 00da | | Load_Top At_Offset_2
0997 01d6 | | Execute Vector,Field_Write
0998 600b |` | Indirect_Literal Discrete,0x9a4,{0x00000000, 0x00002833}
0999 e003 | | Load 0x0,0x3
099a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
099b c5fb | | Store 0x2,-0x5
099c e40a | | Load 0x2,0xa
099d 0217 | | Execute Heap_Access,All_Reference
099e 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
099f a40a | | Store_Unchecked 0x2,0xa
09a0 00c9 | | Action Pop_Auxiliary_Loop
09a1 e40a | | Load 0x2,0xa
09a2 77bc |w | Jump_Nonzero 0x95f
09a3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
09a4 0000 0000 | | .LITERAL {0x00000000, 0x00002833}
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09bf | | .CONST 0x09bf ; Address of begin
09a9 0004 | | .CONST 0x0004 ; Address of exception handler
09aa 0005 | | .CONST 0x0005 ; Number of locals
09ab INIT_09a8:
09ab e402 | | Load 0x2,0x2
09ac 0217 | | Execute Heap_Access,All_Reference
09ad 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09ae e228 | ( | Load 0x1,0x28
09af 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09b0 e004 | | Load 0x0,0x4
09b1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09b2 02c7 | | Declare_Variable Any
09b3 00d8 | | Load_Top At_Offset_0
09b4 1c00 | | Execute_Immediate Run_Utility,0x0
09b5 e402 | | Load 0x2,0x2
09b6 0217 | | Execute Heap_Access,All_Reference
09b7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
09b8 e228 | ( | Load 0x1,0x28
09b9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09ba e004 | | Load 0x0,0x4
09bb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09bc 02c7 | | Declare_Variable Any
09bd 00d8 | | Load_Top At_Offset_0
09be 1c00 | | Execute_Immediate Run_Utility,0x0
09bf BODY_09a8:
09bf e5fd | | Load 0x2,-0x3
09c0 e402 | | Load 0x2,0x2
09c1 0217 | | Execute Heap_Access,All_Reference
09c2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09c3 e22b | + | Load 0x1,0x2b
09c4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
09c5 e004 | | Load 0x0,0x4
09c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
09c7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09c8 00db | | Load_Top At_Offset_3
09c9 0120 | | Execute Any,Is_Value
09ca 6803 |h | Jump_Zero 0x9ce
09cb e004 | | Load 0x0,0x4
09cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09cd 7801 |x | Jump 0x9cf
09ce 00db | | Load_Top At_Offset_3
09cf 6054 |`T | Indirect_Literal Discrete,0xa24,{0x00000000, 0x00004000}
09d0 e051 | Q | Load 0x0,0x51
09d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09d2 e052 | R | Load 0x0,0x52
09d3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
09d4 e004 | | Load 0x0,0x4
09d5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
09d6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
09d7 e602 | | Load 0x3,0x2
09d8 e004 | | Load 0x0,0x4
09d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
09da 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
09db c603 | | Store 0x3,0x3
09dc c406 | | Store 0x2,0x6
09dd e406 | | Load 0x2,0x6
09de 6818 |h | Jump_Zero 0x9f7
09df e065 | e | Load 0x0,0x65
09e0 180e | | Execute Package,Field_Execute,Field_Number 0xe
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 035b | [ | Declare_Type Array,Constrained
09e6 0337 | 7 | Declare_Variable Array
09e7 00db | | Load_Top At_Offset_3
09e8 e00f | | Load 0x0,0xf
09e9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09ea 4801 |H | Short_Literal 0x1
09eb 00da | | Load_Top At_Offset_2
09ec 01d6 | | Execute Vector,Field_Write
09ed e602 | | Load 0x3,0x2
09ee e00f | | Load 0x0,0xf
09ef 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09f0 4802 |H | Short_Literal 0x2
09f1 00da | | Load_Top At_Offset_2
09f2 01d6 | | Execute Vector,Field_Write
09f3 602c |`, | Indirect_Literal Discrete,0xa20,{0x00000000, 0x00002814}
09f4 e003 | | Load 0x0,0x3
09f5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
09f6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
09f7 00da | | Load_Top At_Offset_2
09f8 e402 | | Load 0x2,0x2
09f9 0217 | | Execute Heap_Access,All_Reference
09fa 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09fb 4800 |H | Short_Literal 0x0
09fc e5fd | | Load 0x2,-0x3
09fd e402 | | Load 0x2,0x2
09fe e603 | | Load 0x3,0x3
09ff e22b | + | Load 0x1,0x2b
0a00 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a01 e004 | | Load 0x0,0x4
0a02 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a03 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a04 00d9 | | Load_Top At_Offset_1
0a05 0120 | | Execute Any,Is_Value
0a06 6803 |h | Jump_Zero 0xa0a
0a07 e004 | | Load 0x0,0x4
0a08 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a09 7801 |x | Jump 0xa0b
0a0a 00d9 | | Load_Top At_Offset_1
0a0b 6018 |` | Indirect_Literal Discrete,0xa24,{0x00000000, 0x00004000}
0a0c e051 | Q | Load 0x0,0x51
0a0d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a0e e052 | R | Load 0x0,0x52
0a0f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a10 e004 | | Load 0x0,0x4
0a11 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a12 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a13 e604 | | Load 0x3,0x4
0a14 e004 | | Load 0x0,0x4
0a15 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a16 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0a17 c605 | | Store 0x3,0x5
0a18 c406 | | Store 0x2,0x6
0a19 e406 | | Load 0x2,0x6
0a1a 7004 |p | Jump_Nonzero 0xa1f
0a1b 00d8 | | Load_Top At_Offset_0
0a1c e402 | | Load 0x2,0x2
0a1d 0217 | | Execute Heap_Access,All_Reference
0a1e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a1f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a20 0000 0000 | | .LITERAL {0x00000000, 0x00002814}
0a24 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0a28 ; --------------------------------------------------------------------------------------
0a28 ; SUBPROGRAM
0a28 ; --------------------------------------------------------------------------------------
0a28 0a30 | 0 | .CONST 0x0a30 ; Address of begin
0a29 0004 | | .CONST 0x0004 ; Address of exception handler
0a2a 0002 | | .CONST 0x0002 ; Number of locals
0a2b INIT_0a28:
0a2b e406 | | Load 0x2,0x6
0a2c e236 | 6 | Load 0x1,0x36
0a2d 1c08 | | Execute_Immediate Run_Utility,0x8
0a2e 00d8 | | Load_Top At_Offset_0
0a2f 1c00 | | Execute_Immediate Run_Utility,0x0
0a30 BODY_0a28:
0a30 e405 | | Load 0x2,0x5
0a31 00d9 | | Load_Top At_Offset_1
0a32 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a33 4801 |H | Short_Literal 0x1
0a34 a406 | | Store_Unchecked 0x2,0x6
0a35 00cf | | Action Mark_Auxiliary
0a36 7828 |x( | Jump 0xa5f
0a37 00d9 | | Load_Top At_Offset_1
0a38 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a39 e406 | | Load 0x2,0x6
0a3a e004 | | Load 0x0,0x4
0a3b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a3c 00d9 | | Load_Top At_Offset_1
0a3d 00db | | Load_Top At_Offset_3
0a3e 01d7 | | Execute Vector,Field_Read
0a3f 0120 | | Execute Any,Is_Value
0a40 6807 |h | Jump_Zero 0xa48
0a41 e004 | | Load 0x0,0x4
0a42 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a43 00da | | Load_Top At_Offset_2
0a44 e604 | | Load 0x3,0x4
0a45 01d7 | | Execute Vector,Field_Read
0a46 00d1 | | Pop_Control Pop_Count_1
0a47 7803 |x | Jump 0xa4b
0a48 00d9 | | Load_Top At_Offset_1
0a49 00db | | Load_Top At_Offset_3
0a4a 01d7 | | Execute Vector,Field_Read
0a4b e402 | | Load 0x2,0x2
0a4c e004 | | Load 0x0,0x4
0a4d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a4e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0a4f 00da | | Load_Top At_Offset_2
0a50 e604 | | Load 0x3,0x4
0a51 01d6 | | Execute Vector,Field_Write
0a52 c404 | | Store 0x2,0x4
0a53 00d2 | | Pop_Control Pop_Count_2
0a54 e404 | | Load 0x2,0x4
0a55 7003 |p | Jump_Nonzero 0xa59
0a56 e406 | | Load 0x2,0x6
0a57 0a01 | | Execute_Immediate Plus,0x1
0a58 c406 | | Store 0x2,0x6
0a59 e402 | | Load 0x2,0x2
0a5a e004 | | Load 0x0,0x4
0a5b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a5c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0a5d c402 | | Store 0x2,0x2
0a5e 00c9 | | Action Pop_Auxiliary_Loop
0a5f e402 | | Load 0x2,0x2
0a60 e004 | | Load 0x0,0x4
0a61 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a62 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0a63 6fd3 |o | Jump_Zero 0xa37
0a64 00ce | | Action Pop_Auxiliary
0a65 e402 | | Load 0x2,0x2
0a66 e004 | | Load 0x0,0x4
0a67 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a68 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0a69 c402 | | Store 0x2,0x2
0a6a 00d8 | | Load_Top At_Offset_0
0a6b 00cb | | Action Pop_Block_With_Result
0a6c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0a6d 0000 0000 | | .XXX[0x3]
0a6f 0000 | |
0a70 ; --------------------------------------------------------------------------------------
0a70 ; SUBPROGRAM
0a70 ; --------------------------------------------------------------------------------------
0a70 0a88 | | .CONST 0x0a88 ; Address of begin
0a71 0004 | | .CONST 0x0004 ; Address of exception handler
0a72 0005 | | .CONST 0x0005 ; Number of locals
0a73 INIT_0a70:
0a73 e5fb | | Load 0x2,-0x5
0a74 e5fc | | Load 0x2,-0x4
0a75 e5fd | | Load 0x2,-0x3
0a76 e5ff | | Load 0x2,-0x1
0a77 e5fe | | Load 0x2,-0x2
0a78 8255 | U | Call 0x1,0x55
0a79 8257 | W | Call 0x1,0x57
0a7a 4801 |H | Short_Literal 0x1
0a7b 00d9 | | Load_Top At_Offset_1
0a7c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a7d e214 | | Load 0x1,0x14
0a7e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0a7f 035b | [ | Declare_Type Array,Constrained
0a80 0337 | 7 | Declare_Variable Array
0a81 00e2 | | Load_Encached Integer_Cache
0a82 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a83 e22b | + | Load 0x1,0x2b
0a84 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a85 02ff | | Declare_Variable Variant_Record
0a86 00d8 | | Load_Top At_Offset_0
0a87 1c00 | | Execute_Immediate Run_Utility,0x0
0a88 BODY_0a70:
0a88 00db | | Load_Top At_Offset_3
0a89 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a8a a402 | | Store_Unchecked 0x2,0x2
0a8b 00cf | | Action Mark_Auxiliary
0a8c e602 | | Load 0x3,0x2
0a8d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a8e 01d9 | | Execute Vector,Reverse_Bounds
0a8f 0263 | c | Execute Discrete,Above_Bound
0a90 7022 |p" | Jump_Nonzero 0xab3
0a91 4802 |H | Short_Literal 0x2
0a92 e5fe | | Load 0x2,-0x2
0a93 00da | | Load_Top At_Offset_2
0a94 e602 | | Load 0x3,0x2
0a95 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0a96 01d7 | | Execute Vector,Field_Read
0a97 e22b | + | Load 0x1,0x2b
0a98 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a99 e605 | | Load 0x3,0x5
0a9a 016d | m | Execute Variant_Record,Structure_Write
0a9b 00db | | Load_Top At_Offset_3
0a9c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a9d 0f02 | | Execute_Immediate Equal,0x2
0a9e 6812 |h | Jump_Zero 0xab1
0a9f 00db | | Load_Top At_Offset_3
0aa0 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0aa1 0217 | | Execute Heap_Access,All_Reference
0aa2 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0aa3 e210 | | Load 0x1,0x10
0aa4 0216 | | Execute Heap_Access,Convert
0aa5 a404 | | Store_Unchecked 0x2,0x4
0aa6 e404 | | Load 0x2,0x4
0aa7 e214 | | Load 0x1,0x14
0aa8 180f | | Execute Package,Field_Execute,Field_Number 0xf
0aa9 7007 |p | Jump_Nonzero 0xab1
0aaa e604 | | Load 0x3,0x4
0aab 0a01 | | Execute_Immediate Plus,0x1
0aac c604 | | Store 0x3,0x4
0aad e404 | | Load 0x2,0x4
0aae e604 | | Load 0x3,0x4
0aaf e603 | | Load 0x3,0x3
0ab0 01d6 | | Execute Vector,Field_Write
0ab1 00c8 | | Action Pop_Auxiliary_Range
0ab2 3fde |? | Loop_Increasing 0xa91
0ab3 00ce | | Action Pop_Auxiliary
0ab4 00d9 | | Load_Top At_Offset_1
0ab5 e214 | | Load 0x1,0x14
0ab6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ab7 1c08 | | Execute_Immediate Run_Utility,0x8
0ab8 e402 | | Load 0x2,0x2
0ab9 00d9 | | Load_Top At_Offset_1
0aba 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0abb 4801 |H | Short_Literal 0x1
0abc 00db | | Load_Top At_Offset_3
0abd e603 | | Load 0x3,0x3
0abe 01cf | | Execute Vector,Slice_Read
0abf 00d9 | | Load_Top At_Offset_1
0ac0 00d8 | | Load_Top At_Offset_0
0ac1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ac2 00da | | Load_Top At_Offset_2
0ac3 01da | | Execute Vector,Bounds
0ac4 00da | | Load_Top At_Offset_2
0ac5 01da | | Execute Vector,Bounds
0ac6 00da | | Load_Top At_Offset_2
0ac7 027f | | Execute Discrete,Equal
0ac8 7001 |p | Jump_Nonzero 0xaca
0ac9 08e0 | | Execute_Immediate Raise,0xe0
0aca 00cd | | Action Spare6_Action
0acb 027f | | Execute Discrete,Equal
0acc 7001 |p | Jump_Nonzero 0xace
0acd 08e0 | | Execute_Immediate Raise,0xe0
0ace 00d2 | | Pop_Control Pop_Count_2
0acf 00d9 | | Load_Top At_Offset_1
0ad0 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0ad1 00cb | | Action Pop_Block_With_Result
0ad2 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0ad3 0000 0000 | | .BLANK 0000[0x5]
0ad8 ; --------------------------------------------------------------------------------------
0ad8 ; SUBPROGRAM
0ad8 ; --------------------------------------------------------------------------------------
0ad8 0ae6 | | .CONST 0x0ae6 ; Address of begin
0ad9 0004 | | .CONST 0x0004 ; Address of exception handler
0ada 0003 | | .CONST 0x0003 ; Number of locals
0adb INIT_0ad8:
0adb e40a | | Load 0x2,0xa
0adc 0217 | | Execute Heap_Access,All_Reference
0add 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ade e228 | ( | Load 0x1,0x28
0adf 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0ae0 e5fd | | Load 0x2,-0x3
0ae1 e216 | | Load 0x1,0x16
0ae2 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0ae3 00d9 | | Load_Top At_Offset_1
0ae4 01cc | | Execute Vector,Catenate
0ae5 0007 | | Action Break_Optional
0ae6 BODY_0ad8:
0ae6 e004 | | Load 0x0,0x4
0ae7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ae8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ae9 e408 | | Load 0x2,0x8
0aea 0120 | | Execute Any,Is_Value
0aeb 6803 |h | Jump_Zero 0xaef
0aec e004 | | Load 0x0,0x4
0aed 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0aee 7801 |x | Jump 0xaf0
0aef e408 | | Load 0x2,0x8
0af0 604b |`K | Indirect_Literal Discrete,0xb3c,{0x00000000, 0x00004000}
0af1 e051 | Q | Load 0x0,0x51
0af2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0af3 e404 | | Load 0x2,0x4
0af4 e803 | | Load 0x4,0x3
0af5 e004 | | Load 0x0,0x4
0af6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0af7 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0af8 c408 | | Store 0x2,0x8
0af9 c406 | | Store 0x2,0x6
0afa e406 | | Load 0x2,0x6
0afb 7025 |p% | Jump_Nonzero 0xb21
0afc e408 | | Load 0x2,0x8
0afd e40a | | Load 0x2,0xa
0afe 0217 | | Execute Heap_Access,All_Reference
0aff 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0b00 4800 |H | Short_Literal 0x0
0b01 e5fd | | Load 0x2,-0x3
0b02 e40a | | Load 0x2,0xa
0b03 e408 | | Load 0x2,0x8
0b04 e22b | + | Load 0x1,0x2b
0b05 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b06 e40a | | Load 0x2,0xa
0b07 0217 | | Execute Heap_Access,All_Reference
0b08 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b09 6816 |h | Jump_Zero 0xb20
0b0a e40a | | Load 0x2,0xa
0b0b 0217 | | Execute Heap_Access,All_Reference
0b0c 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b0d e210 | | Load 0x1,0x10
0b0e 0216 | | Execute Heap_Access,Convert
0b0f a40b | | Store_Unchecked 0x2,0xb
0b10 4801 |H | Short_Literal 0x1
0b11 e40b | | Load 0x2,0xb
0b12 0217 | | Execute Heap_Access,All_Reference
0b13 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0b14 e408 | | Load 0x2,0x8
0b15 e40b | | Load 0x2,0xb
0b16 0217 | | Execute Heap_Access,All_Reference
0b17 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0b18 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0b19 e5fb | | Load 0x2,-0x5
0b1a 4801 |H | Short_Literal 0x1
0b1b e5fc | | Load 0x2,-0x4
0b1c e40b | | Load 0x2,0xb
0b1d e214 | | Load 0x1,0x14
0b1e 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0b1f c5fb | | Store 0x2,-0x5
0b20 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b21 e40a | | Load 0x2,0xa
0b22 0217 | | Execute Heap_Access,All_Reference
0b23 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b24 6816 |h | Jump_Zero 0xb3b
0b25 0092 11a9 | | Action Push_String_Extended,0x11a9 ; "Bad Name_Status when resolving "
0b27 00d9 | | Load_Top At_Offset_1
0b28 01cc | | Execute Vector,Catenate
0b29 0092 11aa | | Action Push_String_Extended,0x11aa ; ". Invalidate its Unit.Data."
0b2b 01cc | | Execute Vector,Catenate
0b2c 824f | O | Call 0x1,0x4f
0b2d 4800 |H | Short_Literal 0x0
0b2e e40a | | Load 0x2,0xa
0b2f 0217 | | Execute Heap_Access,All_Reference
0b30 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b31 0217 | | Execute Heap_Access,All_Reference
0b32 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0b33 e004 | | Load 0x0,0x4
0b34 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b35 e40a | | Load 0x2,0xa
0b36 0217 | | Execute Heap_Access,All_Reference
0b37 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b38 0217 | | Execute Heap_Access,All_Reference
0b39 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
0b3a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0b3b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b3c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0b40 ; --------------------------------------------------------------------------------------
0b40 ; SUBPROGRAM
0b40 ; --------------------------------------------------------------------------------------
0b40 0b47 | G | .CONST 0x0b47 ; Address of begin
0b41 0004 | | .CONST 0x0004 ; Address of exception handler
0b42 000d | | .CONST 0x000d ; Number of locals
0b43 INIT_0b40:
0b43 00e9 | | Load_Encached String_Cache
0b44 02a0 | | Declare_Subprogram Null_Subprogram
0b45 03ae | | Declare_Type Heap_Access,Defined,Visible
0b46 00bf | | Action Accept_Activation
0b47 BODY_0b40:
0b47 00bc | | Action Signal_Activated
0b48 00bb | | Action Signal_Completion
0b49 0000 0000 | | .BLANK 0000[0x7]
0b50 ; --------------------------------------------------------------------------------------
0b50 ; SUBPROGRAM
0b50 ; --------------------------------------------------------------------------------------
0b50 0b74 | t | .CONST 0x0b74 ; Address of begin
0b51 0004 | | .CONST 0x0004 ; Address of exception handler
0b52 0014 | | .CONST 0x0014 ; Number of locals
0b53 INIT_0b50:
0b53 029a 0b7b | {| Declare_Subprogram INIT_0b78,For_Outer_Call,Visible,Unelaborated
0b55 029a 0b8b | | Declare_Subprogram INIT_0b88,For_Outer_Call,Visible,Unelaborated
0b57 029a 0bab | | Declare_Subprogram INIT_0ba8,For_Outer_Call,Visible,Unelaborated
0b59 029a 0bbb | | Declare_Subprogram INIT_0bb8,For_Outer_Call,Visible,Unelaborated
0b5b 029a 0bdb | | Declare_Subprogram INIT_0bd8,For_Outer_Call,Visible,Unelaborated
0b5d 029a 0bfb | | Declare_Subprogram INIT_0bf8,For_Outer_Call,Visible,Unelaborated
0b5f 029a 0c2b | +| Declare_Subprogram INIT_0c28,For_Outer_Call,Visible,Unelaborated
0b61 029a 0c63 | c| Declare_Subprogram INIT_0c60,For_Outer_Call,Visible,Unelaborated
0b63 00bf | | Action Accept_Activation
0b64 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0b65 00c7 | | Action Elaborate_Subprogram
0b66 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0b67 00c7 | | Action Elaborate_Subprogram
0b68 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0b69 00c7 | | Action Elaborate_Subprogram
0b6a 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0b6b 00c7 | | Action Elaborate_Subprogram
0b6c 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0b6d 00c7 | | Action Elaborate_Subprogram
0b6e 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0b6f 00c7 | | Action Elaborate_Subprogram
0b70 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0b71 00c7 | | Action Elaborate_Subprogram
0b72 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0b73 00c7 | | Action Elaborate_Subprogram
0b74 BODY_0b50:
0b74 00bc | | Action Signal_Activated
0b75 00bb | | Action Signal_Completion
0b76 0000 0000 | | .XXX[0x2]
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b7b | { | .CONST 0x0b7b ; Address of begin
0b79 0004 | | .CONST 0x0004 ; Address of exception handler
0b7a 0001 | | .CONST 0x0001 ; Number of locals
0b7b BODY_0b78:
0b7b INIT_0b78:
0b7b 00da | | Load_Top At_Offset_2
0b7c 7002 |p | Jump_Nonzero 0xb7f
0b7d 4800 |H | Short_Literal 0x0
0b7e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b7f 00da | | Load_Top At_Offset_2
0b80 0217 | | Execute Heap_Access,All_Reference
0b81 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b82 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0b83 0000 0000 | | .BLANK 0000[0x5]
0b88 ; --------------------------------------------------------------------------------------
0b88 ; SUBPROGRAM
0b88 ; --------------------------------------------------------------------------------------
0b88 0b8d | | .CONST 0x0b8d ; Address of begin
0b89 0004 | | .CONST 0x0004 ; Address of exception handler
0b8a 0002 | | .CONST 0x0002 ; Number of locals
0b8b INIT_0b88:
0b8b 029f 0c9b | | Declare_Subprogram INIT_0c98,For_Call
0b8d BODY_0b88:
0b8d 00db | | Load_Top At_Offset_3
0b8e 7005 |p | Jump_Nonzero 0xb94
0b8f e5fd | | Load 0x2,-0x3
0b90 e001 | | Load 0x0,0x1
0b91 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0b92 c5fd | | Store 0x2,-0x3
0b93 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0b94 e5fd | | Load 0x2,-0x3
0b95 700b |p | Jump_Nonzero 0xba1
0b96 e5fe | | Load 0x2,-0x2
0b97 e5ff | | Load 0x2,-0x1
0b98 00d8 | | Load_Top At_Offset_0
0b99 00e4 | | Load_Encached Positive_Cache
0b9a 0260 | ` | Execute Discrete,In_Type
0b9b 7001 |p | Jump_Nonzero 0xb9d
0b9c 0801 | | Execute_Immediate Raise,0x1
0b9d e001 | | Load 0x0,0x1
0b9e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0b9f a5fd | | Store_Unchecked 0x2,-0x3
0ba0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ba1 8402 | | Call 0x2,0x2
0ba2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ba3 0000 0000 | | .BLANK 0000[0x5]
0ba8 ; --------------------------------------------------------------------------------------
0ba8 ; SUBPROGRAM
0ba8 ; --------------------------------------------------------------------------------------
0ba8 0bab | | .CONST 0x0bab ; Address of begin
0ba9 0004 | | .CONST 0x0004 ; Address of exception handler
0baa 0001 | | .CONST 0x0001 ; Number of locals
0bab BODY_0ba8:
0bab INIT_0ba8:
0bab 00da | | Load_Top At_Offset_2
0bac 7002 |p | Jump_Nonzero 0xbaf
0bad 4800 |H | Short_Literal 0x0
0bae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0baf 00da | | Load_Top At_Offset_2
0bb0 0217 | | Execute Heap_Access,All_Reference
0bb1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0bb2 00d8 | | Load_Top At_Offset_0
0bb3 00e3 | | Load_Encached Natural_Cache
0bb4 0260 | ` | Execute Discrete,In_Type
0bb5 7001 |p | Jump_Nonzero 0xbb7
0bb6 0801 | | Execute_Immediate Raise,0x1
0bb7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; SUBPROGRAM
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0bbb | | .CONST 0x0bbb ; Address of begin
0bb9 0004 | | .CONST 0x0004 ; Address of exception handler
0bba 0001 | | .CONST 0x0001 ; Number of locals
0bbb BODY_0bb8:
0bbb INIT_0bb8:
0bbb 00db | | Load_Top At_Offset_3
0bbc 7003 |p | Jump_Nonzero 0xbc0
0bbd 6016 |` | Indirect_Literal Discrete,0xbd4,{0x00000000, 0x0000500f}
0bbe a5fd | | Store_Unchecked 0x2,-0x3
0bbf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bc0 00da | | Load_Top At_Offset_2
0bc1 e5fe | | Load 0x2,-0x2
0bc2 0217 | | Execute Heap_Access,All_Reference
0bc3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0bc4 027d | } | Execute Discrete,Greater
0bc5 6803 |h | Jump_Zero 0xbc9
0bc6 6009 |` | Indirect_Literal Discrete,0xbd0,{0x00000000, 0x00005011}
0bc7 a5fd | | Store_Unchecked 0x2,-0x3
0bc8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bc9 00da | | Load_Top At_Offset_2
0bca e5fe | | Load 0x2,-0x2
0bcb 0217 | | Execute Heap_Access,All_Reference
0bcc 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0bcd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bce 0000 0000 | | .XXX[0x2]
0bd0 0000 0000 | | .LITERAL {0x00000000, 0x00005011}
0bd4 0000 0000 | | .LITERAL {0x00000000, 0x0000500f}
0bd8 ; --------------------------------------------------------------------------------------
0bd8 ; SUBPROGRAM
0bd8 ; --------------------------------------------------------------------------------------
0bd8 0bdb | | .CONST 0x0bdb ; Address of begin
0bd9 0004 | | .CONST 0x0004 ; Address of exception handler
0bda 0001 | | .CONST 0x0001 ; Number of locals
0bdb BODY_0bd8:
0bdb INIT_0bd8:
0bdb 00db | | Load_Top At_Offset_3
0bdc 7003 |p | Jump_Nonzero 0xbe0
0bdd 67f6 |g | Indirect_Literal Discrete,0xbd4,{0x00000000, 0x0000500f}
0bde a5fc | | Store_Unchecked 0x2,-0x4
0bdf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0be0 00da | | Load_Top At_Offset_2
0be1 e5fe | | Load 0x2,-0x2
0be2 0217 | | Execute Heap_Access,All_Reference
0be3 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0be4 027b | { | Execute Discrete,Greater_Equal
0be5 6803 |h | Jump_Zero 0xbe9
0be6 600d |` | Indirect_Literal Discrete,0xbf4,{0x00000000, 0x00005012}
0be7 a5fc | | Store_Unchecked 0x2,-0x4
0be8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0be9 00da | | Load_Top At_Offset_2
0bea 0a01 | | Execute_Immediate Plus,0x1
0beb e5fe | | Load 0x2,-0x2
0bec 0217 | | Execute Heap_Access,All_Reference
0bed 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0bee 01d7 | | Execute Vector,Field_Read
0bef c5fd | | Store 0x2,-0x3
0bf0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0bf1 0000 0000 | | .XXX[0x3]
0bf3 0000 | |
0bf4 0000 0000 | | .LITERAL {0x00000000, 0x00005012}
0bf8 ; --------------------------------------------------------------------------------------
0bf8 ; SUBPROGRAM
0bf8 ; --------------------------------------------------------------------------------------
0bf8 0bfb | | .CONST 0x0bfb ; Address of begin
0bf9 0004 | | .CONST 0x0004 ; Address of exception handler
0bfa 0001 | | .CONST 0x0001 ; Number of locals
0bfb BODY_0bf8:
0bfb INIT_0bf8:
0bfb e5fd | | Load 0x2,-0x3
0bfc 7003 |p | Jump_Nonzero 0xc00
0bfd 6022 |`" | Indirect_Literal Discrete,0xc20,{0x00000000, 0x0000500f}
0bfe a5fc | | Store_Unchecked 0x2,-0x4
0bff 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c00 00da | | Load_Top At_Offset_2
0c01 e5fd | | Load 0x2,-0x3
0c02 0217 | | Execute Heap_Access,All_Reference
0c03 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0c04 027b | { | Execute Discrete,Greater_Equal
0c05 6803 |h | Jump_Zero 0xc09
0c06 6015 |` | Indirect_Literal Discrete,0xc1c,{0x00000000, 0x00005007}
0c07 a5fc | | Store_Unchecked 0x2,-0x4
0c08 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c09 00db | | Load_Top At_Offset_3
0c0a 00db | | Load_Top At_Offset_3
0c0b 0a01 | | Execute_Immediate Plus,0x1
0c0c e5fd | | Load 0x2,-0x3
0c0d 0217 | | Execute Heap_Access,All_Reference
0c0e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c0f 01d6 | | Execute Vector,Field_Write
0c10 00da | | Load_Top At_Offset_2
0c11 e5fd | | Load 0x2,-0x3
0c12 0217 | | Execute Heap_Access,All_Reference
0c13 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c14 027b | { | Execute Discrete,Greater_Equal
0c15 6805 |h | Jump_Zero 0xc1b
0c16 00da | | Load_Top At_Offset_2
0c17 0a01 | | Execute_Immediate Plus,0x1
0c18 e5fd | | Load 0x2,-0x3
0c19 0217 | | Execute Heap_Access,All_Reference
0c1a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0c1b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c1c 0000 0000 | | .LITERAL {0x00000000, 0x00005007}
0c20 0000 0000 | | .LITERAL {0x00000000, 0x0000500f}
0c24 0000 0000 | | .BLANK 0000[0x4]
0c28 ; --------------------------------------------------------------------------------------
0c28 ; SUBPROGRAM
0c28 ; --------------------------------------------------------------------------------------
0c28 0c2b | + | .CONST 0x0c2b ; Address of begin
0c29 0004 | | .CONST 0x0004 ; Address of exception handler
0c2a 0001 | | .CONST 0x0001 ; Number of locals
0c2b BODY_0c28:
0c2b INIT_0c28:
0c2b 00db | | Load_Top At_Offset_3
0c2c 7003 |p | Jump_Nonzero 0xc30
0c2d 67f2 |g | Indirect_Literal Discrete,0xc20,{0x00000000, 0x0000500f}
0c2e a5fd | | Store_Unchecked 0x2,-0x3
0c2f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c30 00db | | Load_Top At_Offset_3
0c31 0217 | | Execute Heap_Access,All_Reference
0c32 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c33 e5fe | | Load 0x2,-0x2
0c34 0217 | | Execute Heap_Access,All_Reference
0c35 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0c36 027c | | | Execute Discrete,Less
0c37 6807 |h | Jump_Zero 0xc3f
0c38 00db | | Load_Top At_Offset_3
0c39 0217 | | Execute Heap_Access,All_Reference
0c3a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c3b 0a01 | | Execute_Immediate Plus,0x1
0c3c e5fe | | Load 0x2,-0x2
0c3d 0217 | | Execute Heap_Access,All_Reference
0c3e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0c3f 00cf | | Action Mark_Auxiliary
0c40 4802 |H | Short_Literal 0x2
0c41 e5fe | | Load 0x2,-0x2
0c42 0217 | | Execute Heap_Access,All_Reference
0c43 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c44 0264 | d | Execute Discrete,Below_Bound
0c45 700d |p | Jump_Nonzero 0xc53
0c46 00d8 | | Load_Top At_Offset_0
0c47 0aff | | Execute_Immediate Plus,-0x1
0c48 e5fe | | Load 0x2,-0x2
0c49 0217 | | Execute Heap_Access,All_Reference
0c4a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c4b 01d7 | | Execute Vector,Field_Read
0c4c 00d9 | | Load_Top At_Offset_1
0c4d e5fe | | Load 0x2,-0x2
0c4e 0217 | | Execute Heap_Access,All_Reference
0c4f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c50 01d6 | | Execute Vector,Field_Write
0c51 00c8 | | Action Pop_Auxiliary_Range
0c52 37f3 |7 | Loop_Decreasing 0xc46
0c53 00ce | | Action Pop_Auxiliary
0c54 00da | | Load_Top At_Offset_2
0c55 4801 |H | Short_Literal 0x1
0c56 e5fe | | Load 0x2,-0x2
0c57 0217 | | Execute Heap_Access,All_Reference
0c58 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c59 01d6 | | Execute Vector,Field_Write
0c5a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c5b 0000 0000 | | .BLANK 0000[0x5]
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c63 | c | .CONST 0x0c63 ; Address of begin
0c61 0004 | | .CONST 0x0004 ; Address of exception handler
0c62 0001 | | .CONST 0x0001 ; Number of locals
0c63 BODY_0c60:
0c63 INIT_0c60:
0c63 00db | | Load_Top At_Offset_3
0c64 7003 |p | Jump_Nonzero 0xc68
0c65 602e |`. | Indirect_Literal Discrete,0xc94,{0x00000000, 0x0000500f}
0c66 a5fd | | Store_Unchecked 0x2,-0x3
0c67 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c68 00da | | Load_Top At_Offset_2
0c69 e5fe | | Load 0x2,-0x2
0c6a 0217 | | Execute Heap_Access,All_Reference
0c6b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c6c 027b | { | Execute Discrete,Greater_Equal
0c6d 6805 |h | Jump_Zero 0xc73
0c6e 4800 |H | Short_Literal 0x0
0c6f e5fe | | Load 0x2,-0x2
0c70 0217 | | Execute Heap_Access,All_Reference
0c71 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0c72 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c73 00db | | Load_Top At_Offset_3
0c74 0217 | | Execute Heap_Access,All_Reference
0c75 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c76 00db | | Load_Top At_Offset_3
0c77 0272 | r | Execute Discrete,Minus
0c78 e5fe | | Load 0x2,-0x2
0c79 0217 | | Execute Heap_Access,All_Reference
0c7a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0c7b 00cf | | Action Mark_Auxiliary
0c7c e5fe | | Load 0x2,-0x2
0c7d 0217 | | Execute Heap_Access,All_Reference
0c7e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0c7f 4801 |H | Short_Literal 0x1
0c80 0263 | c | Execute Discrete,Above_Bound
0c81 700e |p | Jump_Nonzero 0xc90
0c82 00d8 | | Load_Top At_Offset_0
0c83 e5ff | | Load 0x2,-0x1
0c84 0273 | s | Execute Discrete,Plus
0c85 e5fe | | Load 0x2,-0x2
0c86 0217 | | Execute Heap_Access,All_Reference
0c87 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c88 01d7 | | Execute Vector,Field_Read
0c89 00d9 | | Load_Top At_Offset_1
0c8a e5fe | | Load 0x2,-0x2
0c8b 0217 | | Execute Heap_Access,All_Reference
0c8c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0c8d 01d6 | | Execute Vector,Field_Write
0c8e 00c8 | | Action Pop_Auxiliary_Range
0c8f 3ff2 |? | Loop_Increasing 0xc82
0c90 00ce | | Action Pop_Auxiliary
0c91 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c92 0000 0000 | | .XXX[0x2]
0c94 0000 0000 | | .LITERAL {0x00000000, 0x0000500f}
0c98 ; --------------------------------------------------------------------------------------
0c98 ; SUBPROGRAM
0c98 ; --------------------------------------------------------------------------------------
0c98 0ca1 | | .CONST 0x0ca1 ; Address of begin
0c99 0004 | | .CONST 0x0004 ; Address of exception handler
0c9a 0002 | | .CONST 0x0002 ; Number of locals
0c9b INIT_0c98:
0c9b e5ff | | Load 0x2,-0x1
0c9c e001 | | Load 0x0,0x1
0c9d 1b3c | < | Execute Package,Field_Read,Field_Number 0x3c
0c9e 1c08 | | Execute_Immediate Run_Utility,0x8
0c9f 00d8 | | Load_Top At_Offset_0
0ca0 1c00 | | Execute_Immediate Run_Utility,0x0
0ca1 BODY_0c98:
0ca1 00cf | | Action Mark_Auxiliary
0ca2 e5fd | | Load 0x2,-0x3
0ca3 0217 | | Execute Heap_Access,All_Reference
0ca4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0ca5 4801 |H | Short_Literal 0x1
0ca6 0263 | c | Execute Discrete,Above_Bound
0ca7 7014 |p | Jump_Nonzero 0xcbc
0ca8 00d8 | | Load_Top At_Offset_0
0ca9 e5ff | | Load 0x2,-0x1
0caa 027d | } | Execute Discrete,Greater
0cab 6802 |h | Jump_Zero 0xcae
0cac 00d2 | | Pop_Control Pop_Count_2
0cad 780e |x | Jump 0xcbc
0cae 00d8 | | Load_Top At_Offset_0
0caf e602 | | Load 0x3,0x2
0cb0 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0cb1 00d8 | | Load_Top At_Offset_0
0cb2 e5fd | | Load 0x2,-0x3
0cb3 0217 | | Execute Heap_Access,All_Reference
0cb4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0cb5 01d7 | | Execute Vector,Field_Read
0cb6 00d9 | | Load_Top At_Offset_1
0cb7 e602 | | Load 0x3,0x2
0cb8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0cb9 01d6 | | Execute Vector,Field_Write
0cba 00c8 | | Action Pop_Auxiliary_Range
0cbb 3fec |? | Loop_Increasing 0xca8
0cbc 00ce | | Action Pop_Auxiliary
0cbd e5fd | | Load 0x2,-0x3
0cbe e001 | | Load 0x0,0x1
0cbf 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0cc0 c5fd | | Store 0x2,-0x3
0cc1 e5fe | | Load 0x2,-0x2
0cc2 e5ff | | Load 0x2,-0x1
0cc3 00d8 | | Load_Top At_Offset_0
0cc4 00e4 | | Load_Encached Positive_Cache
0cc5 0260 | ` | Execute Discrete,In_Type
0cc6 7001 |p | Jump_Nonzero 0xcc8
0cc7 0801 | | Execute_Immediate Raise,0x1
0cc8 e001 | | Load 0x0,0x1
0cc9 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0cca a5fd | | Store_Unchecked 0x2,-0x3
0ccb 00d8 | | Load_Top At_Offset_0
0ccc e5fd | | Load 0x2,-0x3
0ccd 0218 | | Execute Heap_Access,All_Write
0cce 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ccf 0000 | | .XXX[0x1]
0cd0 ; --------------------------------------------------------------------------------------
0cd0 ; SUBPROGRAM
0cd0 ; --------------------------------------------------------------------------------------
0cd0 0d66 | f | .CONST 0x0d66 ; Address of begin
0cd1 0004 | | .CONST 0x0004 ; Address of exception handler
0cd2 0025 | % | .CONST 0x0025 ; Number of locals
0cd3 INIT_0cd0:
0cd3 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0cd4 4800 |H | Short_Literal 0x0
0cd5 4802 |H | Short_Literal 0x2
0cd6 029f 0d6b | k| Declare_Subprogram INIT_0d68,For_Call
0cd8 03fe | | Declare_Type Discrete,Defined,Visible
0cd9 00d8 | | Load_Top At_Offset_0
0cda 4801 |H | Short_Literal 0x1
0cdb e001 | | Load 0x0,0x1
0cdc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0cdd 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
0cde 4801 |H | Short_Literal 0x1
0cdf e001 | | Load 0x0,0x1
0ce0 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0ce1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ce2 4801 |H | Short_Literal 0x1
0ce3 e002 | | Load 0x0,0x2
0ce4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0ce5 029f 0efb | | Declare_Subprogram INIT_0ef8,For_Call
0ce7 4803 |H | Short_Literal 0x3
0ce8 4800 |H | Short_Literal 0x0
0ce9 4803 |H | Short_Literal 0x3
0cea 4800 |H | Short_Literal 0x0
0ceb 4801 |H | Short_Literal 0x1
0cec 031e | | Declare_Type Variant_Record,Defined,Visible
0ced 029a 0d9b | | Declare_Subprogram INIT_0d98,For_Outer_Call,Visible,Unelaborated
0cef 029a 0da3 | | Declare_Subprogram INIT_0da0,For_Outer_Call,Visible,Unelaborated
0cf1 029a 0dcb | | Declare_Subprogram INIT_0dc8,For_Outer_Call,Visible,Unelaborated
0cf3 029a 0df3 | | Declare_Subprogram INIT_0df0,For_Outer_Call,Visible,Unelaborated
0cf5 029a 0e03 | | Declare_Subprogram INIT_0e00,For_Outer_Call,Visible,Unelaborated
0cf7 029a 0e13 | | Declare_Subprogram INIT_0e10,For_Outer_Call,Visible,Unelaborated
0cf9 029a 0e23 | #| Declare_Subprogram INIT_0e20,For_Outer_Call,Visible,Unelaborated
0cfb 029a 0e33 | 3| Declare_Subprogram INIT_0e30,For_Outer_Call,Visible,Unelaborated
0cfd 029a 0e43 | C| Declare_Subprogram INIT_0e40,For_Outer_Call,Visible,Unelaborated
0cff 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0d00 029a 0e53 | S| Declare_Subprogram INIT_0e50,For_Outer_Call,Visible,Unelaborated
0d02 029a 0e73 | s| Declare_Subprogram INIT_0e70,For_Outer_Call,Visible,Unelaborated
0d04 029a 0e83 | | Declare_Subprogram INIT_0e80,For_Outer_Call,Visible,Unelaborated
0d06 029a 0ea3 | | Declare_Subprogram INIT_0ea0,For_Outer_Call,Visible,Unelaborated
0d08 029a 0eb3 | | Declare_Subprogram INIT_0eb0,For_Outer_Call,Visible,Unelaborated
0d0a 4801 |H | Short_Literal 0x1
0d0b 4802 |H | Short_Literal 0x2
0d0c e20e | | Load 0x1,0xe
0d0d 03f8 | | Declare_Type Discrete,Constrained
0d0e 00d8 | | Load_Top At_Offset_0
0d0f e003 | | Load 0x0,0x3
0d10 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0d11 02a0 | | Declare_Subprogram Null_Subprogram
0d12 4802 |H | Short_Literal 0x2
0d13 032d | - | Declare_Type Record,Defined
0d14 e004 | | Load 0x0,0x4
0d15 e005 | | Load 0x0,0x5
0d16 e006 | | Load 0x0,0x6
0d17 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d18 00db | | Load_Top At_Offset_3
0d19 e006 | | Load 0x0,0x6
0d1a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d1b e006 | | Load 0x0,0x6
0d1c 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0d1d e007 | | Load 0x0,0x7
0d1e 0387 | | Declare_Variable Package
0d1f 00d8 | | Load_Top At_Offset_0
0d20 020f | | Execute Module,Activate
0d21 00d8 | | Load_Top At_Offset_0
0d22 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0d23 e20d | | Load 0x1,0xd
0d24 03a2 | | Complete_Type Heap_Access,By_Renaming
0d25 00d8 | | Load_Top At_Offset_0
0d26 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0d27 e001 | | Load 0x0,0x1
0d28 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0d29 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d2a 02a0 | | Declare_Subprogram Null_Subprogram
0d2b 4802 |H | Short_Literal 0x2
0d2c 032d | - | Declare_Type Record,Defined
0d2d 00d8 | | Load_Top At_Offset_0
0d2e 02a0 | | Declare_Subprogram Null_Subprogram
0d2f e219 | | Load 0x1,0x19
0d30 03a3 | | Complete_Type Heap_Access,By_Defining
0d31 00bf | | Action Accept_Activation
0d32 4801 |H | Short_Literal 0x1
0d33 4802 |H | Short_Literal 0x2
0d34 e002 | | Load 0x0,0x2
0d35 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0d36 02a0 | | Declare_Subprogram Null_Subprogram
0d37 4801 |H | Short_Literal 0x1
0d38 035d | ] | Declare_Type Array,Defined
0d39 00d8 | | Load_Top At_Offset_0
0d3a 0337 | 7 | Declare_Variable Array
0d3b 00d8 | | Load_Top At_Offset_0
0d3c 0335 | 5 | Declare_Variable Array,Duplicate
0d3d 00cd | | Action Spare6_Action
0d3e 6055 |`U | Indirect_Literal Discrete,0xd94,{0x00000000, 0x0000500b}
0d3f 4802 |H | Short_Literal 0x2
0d40 00da | | Load_Top At_Offset_2
0d41 01d6 | | Execute Vector,Field_Write
0d42 604d |`M | Indirect_Literal Discrete,0xd90,{0x00000000, 0x0000500a}
0d43 4801 |H | Short_Literal 0x1
0d44 00da | | Load_Top At_Offset_2
0d45 01d6 | | Execute Vector,Field_Write
0d46 00d9 | | Load_Top At_Offset_1
0d47 01d4 | | Execute Vector,Structure_Write
0d48 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0d49 00c7 | | Action Elaborate_Subprogram
0d4a 029d 0ec3 | | Declare_Subprogram INIT_0ec0,For_Outer_Call
0d4c 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0d4d 00c7 | | Action Elaborate_Subprogram
0d4e 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0d4f 00c7 | | Action Elaborate_Subprogram
0d50 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0d51 00c7 | | Action Elaborate_Subprogram
0d52 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0d53 00c7 | | Action Elaborate_Subprogram
0d54 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0d55 00c7 | | Action Elaborate_Subprogram
0d56 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0d57 00c7 | | Action Elaborate_Subprogram
0d58 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0d59 00c7 | | Action Elaborate_Subprogram
0d5a 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0d5b 00c7 | | Action Elaborate_Subprogram
0d5c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0d5d 00c7 | | Action Elaborate_Subprogram
0d5e 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0d5f 00c7 | | Action Elaborate_Subprogram
0d60 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0d61 00c7 | | Action Elaborate_Subprogram
0d62 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0d63 00c7 | | Action Elaborate_Subprogram
0d64 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0d65 00c7 | | Action Elaborate_Subprogram
0d66 BODY_0cd0:
0d66 00bc | | Action Signal_Activated
0d67 00bb | | Action Signal_Completion
0d68 ; --------------------------------------------------------------------------------------
0d68 ; SUBPROGRAM
0d68 ; --------------------------------------------------------------------------------------
0d68 0d6b | k | .CONST 0x0d6b ; Address of begin
0d69 0004 | | .CONST 0x0004 ; Address of exception handler
0d6a 0001 | | .CONST 0x0001 ; Number of locals
0d6b BODY_0d68:
0d6b INIT_0d68:
0d6b 4607 |F | Jump_Case 0x8
0d6c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0d6d 7806 |x | Jump 0xd74 ; case 0x1
0d6e 7809 |x | Jump 0xd78 ; case 0x2
0d6f 780d |x | Jump 0xd7d ; case 0x3
0d70 7810 |x | Jump 0xd81 ; case 0x4
0d71 7811 |x | Jump 0xd83 ; case 0x5
0d72 7812 |x | Jump 0xd85 ; case 0x6
0d73 7815 |x | Jump 0xd89 ; case 0x7
0d74 00da | | Load_Top At_Offset_2
0d75 0091 119f | | Action Push_String_Extended_Indexed,0x119f ; "NIL"
0d77 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0d78 00db | | Load_Top At_Offset_3
0d79 00db | | Load_Top At_Offset_3
0d7a 00e0 | | Load_Encached Standard_Cache
0d7b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0d7c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0d7d 00da | | Load_Top At_Offset_2
0d7e 00e0 | | Load_Encached Standard_Cache
0d7f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0d80 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0d81 00db | | Load_Top At_Offset_3
0d82 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0d83 00db | | Load_Top At_Offset_3
0d84 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0d85 e20e | | Load 0x1,0xe
0d86 00dc | | Load_Top At_Offset_4
0d87 0267 | g | Execute Discrete,Predecessor
0d88 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0d89 e20e | | Load 0x1,0xe
0d8a 00dc | | Load_Top At_Offset_4
0d8b 0268 | h | Execute Discrete,Successor
0d8c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0d8d 0000 0000 | | .XXX[0x3]
0d8f 0000 | |
0d90 0000 0000 | | .LITERAL {0x00000000, 0x0000500a}
0d94 0000 0000 | | .LITERAL {0x00000000, 0x0000500b}
0d98 ; --------------------------------------------------------------------------------------
0d98 ; SUBPROGRAM
0d98 ; --------------------------------------------------------------------------------------
0d98 0d9b | | .CONST 0x0d9b ; Address of begin
0d99 0004 | | .CONST 0x0004 ; Address of exception handler
0d9a 0001 | | .CONST 0x0001 ; Number of locals
0d9b BODY_0d98:
0d9b INIT_0d98:
0d9b e221 | ! | Load 0x1,0x21
0d9c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0d9d 00ca | | Action Exit_Nullary_Function
0d9e 0000 0000 | | .XXX[0x2]
0da0 ; --------------------------------------------------------------------------------------
0da0 ; SUBPROGRAM
0da0 ; --------------------------------------------------------------------------------------
0da0 0da6 | | .CONST 0x0da6 ; Address of begin
0da1 0004 | | .CONST 0x0004 ; Address of exception handler
0da2 0003 | | .CONST 0x0003 ; Number of locals
0da3 INIT_0da0:
0da3 00e1 | | Load_Encached Boolean_Cache
0da4 e220 | | Load 0x1,0x20
0da5 0322 | " | Declare_Variable Record
0da6 BODY_0da0:
0da6 00e1 | | Load_Encached Boolean_Cache
0da7 00d9 | | Load_Top At_Offset_1
0da8 e5ff | | Load 0x2,-0x1
0da9 e008 | | Load 0x0,0x8
0daa 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0dab 180d | | Execute Package,Field_Execute,Field_Number 0xd
0dac e5fe | | Load 0x2,-0x2
0dad 0217 | | Execute Heap_Access,All_Reference
0dae 3c15 |< | Execute Record,Field_Read,Field_Number 0x15
0daf e221 | ! | Load 0x1,0x21
0db0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0db1 00d1 | | Pop_Control Pop_Count_1
0db2 005a | Z | Store_Top Discrete,At_Offset_2
0db3 00d9 | | Load_Top At_Offset_1
0db4 6805 |h | Jump_Zero 0xdba
0db5 00d8 | | Load_Top At_Offset_0
0db6 e5fe | | Load 0x2,-0x2
0db7 e5fd | | Load 0x2,-0x3
0db8 8225 | % | Call 0x1,0x25
0db9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0dba 4800 |H | Short_Literal 0x0
0dbb e20f | | Load 0x1,0xf
0dbc 1c08 | | Execute_Immediate Run_Utility,0x8
0dbd 6006 |` | Indirect_Literal Discrete,0xdc4,{0x00000000, 0x0000500c}
0dbe 00d9 | | Load_Top At_Offset_1
0dbf 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0dc0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0dc1 0000 0000 | | .XXX[0x3]
0dc3 0000 | |
0dc4 0000 0000 | | .LITERAL {0x00000000, 0x0000500c}
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; SUBPROGRAM
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0dcd | | .CONST 0x0dcd ; Address of begin
0dc9 0004 | | .CONST 0x0004 ; Address of exception handler
0dca 0002 | | .CONST 0x0002 ; Number of locals
0dcb INIT_0dc8:
0dcb e220 | | Load 0x1,0x20
0dcc 0322 | " | Declare_Variable Record
0dcd BODY_0dc8:
0dcd e5fe | | Load 0x2,-0x2
0dce 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0dcf 00d9 | | Load_Top At_Offset_1
0dd0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0dd1 00d8 | | Load_Top At_Offset_0
0dd2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0dd3 0f02 | | Execute_Immediate Equal,0x2
0dd4 7007 |p | Jump_Nonzero 0xddc
0dd5 e5fe | | Load 0x2,-0x2
0dd6 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0dd7 e009 | | Load 0x0,0x9
0dd8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0dd9 00d9 | | Load_Top At_Offset_1
0dda 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0ddb 7806 |x | Jump 0xde2
0ddc e5fe | | Load 0x2,-0x2
0ddd 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0dde e00a | | Load 0x0,0xa
0ddf 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0de0 00d9 | | Load_Top At_Offset_1
0de1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0de2 e5fc | | Load 0x2,-0x4
0de3 00d9 | | Load_Top At_Offset_1
0de4 e5ff | | Load 0x2,-0x1
0de5 e008 | | Load 0x0,0x8
0de6 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0de7 180d | | Execute Package,Field_Execute,Field_Number 0xd
0de8 e5fd | | Load 0x2,-0x3
0de9 0217 | | Execute Heap_Access,All_Reference
0dea 3c15 |< | Execute Record,Field_Read,Field_Number 0x15
0deb e221 | ! | Load 0x1,0x21
0dec 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ded 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0dee 0000 0000 | | .XXX[0x2]
0df0 ; --------------------------------------------------------------------------------------
0df0 ; SUBPROGRAM
0df0 ; --------------------------------------------------------------------------------------
0df0 0df3 | | .CONST 0x0df3 ; Address of begin
0df1 0004 | | .CONST 0x0004 ; Address of exception handler
0df2 0001 | | .CONST 0x0001 ; Number of locals
0df3 BODY_0df0:
0df3 INIT_0df0:
0df3 e5fc | | Load 0x2,-0x4
0df4 e5fd | | Load 0x2,-0x3
0df5 4801 |H | Short_Literal 0x1
0df6 e20f | | Load 0x1,0xf
0df7 1c08 | | Execute_Immediate Run_Utility,0x8
0df8 e5fe | | Load 0x2,-0x2
0df9 00d9 | | Load_Top At_Offset_1
0dfa 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0dfb e5ff | | Load 0x2,-0x1
0dfc 8212 | | Call 0x1,0x12
0dfd 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0dfe 0000 0000 | | .XXX[0x2]
0e00 ; --------------------------------------------------------------------------------------
0e00 ; SUBPROGRAM
0e00 ; --------------------------------------------------------------------------------------
0e00 0e03 | | .CONST 0x0e03 ; Address of begin
0e01 0004 | | .CONST 0x0004 ; Address of exception handler
0e02 0001 | | .CONST 0x0001 ; Number of locals
0e03 BODY_0e00:
0e03 INIT_0e00:
0e03 e5fc | | Load 0x2,-0x4
0e04 e5fd | | Load 0x2,-0x3
0e05 4802 |H | Short_Literal 0x2
0e06 e20f | | Load 0x1,0xf
0e07 1c08 | | Execute_Immediate Run_Utility,0x8
0e08 e5fe | | Load 0x2,-0x2
0e09 00d9 | | Load_Top At_Offset_1
0e0a 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0e0b e5ff | | Load 0x2,-0x1
0e0c 8212 | | Call 0x1,0x12
0e0d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e0e 0000 0000 | | .XXX[0x2]
0e10 ; --------------------------------------------------------------------------------------
0e10 ; SUBPROGRAM
0e10 ; --------------------------------------------------------------------------------------
0e10 0e13 | | .CONST 0x0e13 ; Address of begin
0e11 0004 | | .CONST 0x0004 ; Address of exception handler
0e12 0001 | | .CONST 0x0001 ; Number of locals
0e13 BODY_0e10:
0e13 INIT_0e10:
0e13 00da | | Load_Top At_Offset_2
0e14 e008 | | Load 0x0,0x8
0e15 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0e16 180d | | Execute Package,Field_Execute,Field_Number 0xd
0e17 e5fe | | Load 0x2,-0x2
0e18 0217 | | Execute Heap_Access,All_Reference
0e19 3c15 |< | Execute Record,Field_Read,Field_Number 0x15
0e1a e221 | ! | Load 0x1,0x21
0e1b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0e1c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0e1d 0000 0000 | | .XXX[0x3]
0e1f 0000 | |
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e23 | # | .CONST 0x0e23 ; Address of begin
0e21 0004 | | .CONST 0x0004 ; Address of exception handler
0e22 0001 | | .CONST 0x0001 ; Number of locals
0e23 BODY_0e20:
0e23 INIT_0e20:
0e23 00da | | Load_Top At_Offset_2
0e24 0219 | | Execute Heap_Access,All_Read
0e25 e221 | ! | Load 0x1,0x21
0e26 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0e27 e5ff | | Load 0x2,-0x1
0e28 e00b | | Load 0x0,0xb
0e29 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0e2a e221 | ! | Load 0x1,0x21
0e2b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e2c 00d9 | | Load_Top At_Offset_1
0e2d 3815 |8 | Execute Record,Field_Write,Field_Number 0x15
0e2e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e2f 0000 | | .XXX[0x1]
0e30 ; --------------------------------------------------------------------------------------
0e30 ; SUBPROGRAM
0e30 ; --------------------------------------------------------------------------------------
0e30 0e33 | 3 | .CONST 0x0e33 ; Address of begin
0e31 0004 | | .CONST 0x0004 ; Address of exception handler
0e32 0001 | | .CONST 0x0001 ; Number of locals
0e33 BODY_0e30:
0e33 INIT_0e30:
0e33 00da | | Load_Top At_Offset_2
0e34 0217 | | Execute Heap_Access,All_Reference
0e35 3c15 |< | Execute Record,Field_Read,Field_Number 0x15
0e36 e221 | ! | Load 0x1,0x21
0e37 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0e38 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e39 0000 0000 | | .BLANK 0000[0x7]
0e40 ; --------------------------------------------------------------------------------------
0e40 ; SUBPROGRAM
0e40 ; --------------------------------------------------------------------------------------
0e40 0e43 | C | .CONST 0x0e43 ; Address of begin
0e41 0004 | | .CONST 0x0004 ; Address of exception handler
0e42 0001 | | .CONST 0x0001 ; Number of locals
0e43 BODY_0e40:
0e43 INIT_0e40:
0e43 00da | | Load_Top At_Offset_2
0e44 0217 | | Execute Heap_Access,All_Reference
0e45 3c15 |< | Execute Record,Field_Read,Field_Number 0x15
0e46 e221 | ! | Load 0x1,0x21
0e47 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0e48 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e49 0000 0000 | | .BLANK 0000[0x7]
0e50 ; --------------------------------------------------------------------------------------
0e50 ; SUBPROGRAM
0e50 ; --------------------------------------------------------------------------------------
0e50 0e58 | X | .CONST 0x0e58 ; Address of begin
0e51 0004 | | .CONST 0x0004 ; Address of exception handler
0e52 0003 | | .CONST 0x0003 ; Number of locals
0e53 INIT_0e50:
0e53 e00c | | Load 0x0,0xc
0e54 180d | | Execute Package,Field_Execute,Field_Number 0xd
0e55 e219 | | Load 0x1,0x19
0e56 00d9 | | Load_Top At_Offset_1
0e57 039c | | Declare_Variable Heap_Access,By_Allocation
0e58 BODY_0e50:
0e58 e5ff | | Load 0x2,-0x1
0e59 00d9 | | Load_Top At_Offset_1
0e5a 0217 | | Execute Heap_Access,All_Reference
0e5b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0e5c 00d8 | | Load_Top At_Offset_0
0e5d 0219 | | Execute Heap_Access,All_Read
0e5e e221 | ! | Load 0x1,0x21
0e5f 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0e60 00db | | Load_Top At_Offset_3
0e61 e5ff | | Load 0x2,-0x1
0e62 0217 | | Execute Heap_Access,All_Reference
0e63 3c15 |< | Execute Record,Field_Read,Field_Number 0x15
0e64 e221 | ! | Load 0x1,0x21
0e65 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0e66 00d9 | | Load_Top At_Offset_1
0e67 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0e68 00d1 | | Pop_Control Pop_Count_1
0e69 00d8 | | Load_Top At_Offset_0
0e6a a5fe | | Store_Unchecked 0x2,-0x2
0e6b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0e6c 0000 0000 | | .BLANK 0000[0x4]
0e70 ; --------------------------------------------------------------------------------------
0e70 ; SUBPROGRAM
0e70 ; --------------------------------------------------------------------------------------
0e70 0e73 | s | .CONST 0x0e73 ; Address of begin
0e71 0004 | | .CONST 0x0004 ; Address of exception handler
0e72 0001 | | .CONST 0x0001 ; Number of locals
0e73 BODY_0e70:
0e73 INIT_0e70:
0e73 00da | | Load_Top At_Offset_2
0e74 0219 | | Execute Heap_Access,All_Read
0e75 00d8 | | Load_Top At_Offset_0
0e76 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0e77 e221 | ! | Load 0x1,0x21
0e78 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0e79 00d9 | | Load_Top At_Offset_1
0e7a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0e7b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e7c 0000 0000 | | .BLANK 0000[0x4]
0e80 ; --------------------------------------------------------------------------------------
0e80 ; SUBPROGRAM
0e80 ; --------------------------------------------------------------------------------------
0e80 0e88 | | .CONST 0x0e88 ; Address of begin
0e81 0004 | | .CONST 0x0004 ; Address of exception handler
0e82 0002 | | .CONST 0x0002 ; Number of locals
0e83 INIT_0e80:
0e83 e00d | | Load 0x0,0xd
0e84 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e85 02ff | | Declare_Variable Variant_Record
0e86 00d8 | | Load_Top At_Offset_0
0e87 1c00 | | Execute_Immediate Run_Utility,0x0
0e88 BODY_0e80:
0e88 00d8 | | Load_Top At_Offset_0
0e89 e006 | | Load 0x0,0x6
0e8a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e8b 0162 | b | Execute Variant_Record,Check_In_Type
0e8c 4800 |H | Short_Literal 0x0
0e8d e5ff | | Load 0x2,-0x1
0e8e 0217 | | Execute Heap_Access,All_Reference
0e8f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0e90 e221 | ! | Load 0x1,0x21
0e91 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0e92 e006 | | Load 0x0,0x6
0e93 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e94 00d1 | | Pop_Control Pop_Count_1
0e95 00d8 | | Load_Top At_Offset_0
0e96 e008 | | Load 0x0,0x8
0e97 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0e98 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e99 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e9a 0000 0000 | | .BLANK 0000[0x6]
0ea0 ; --------------------------------------------------------------------------------------
0ea0 ; SUBPROGRAM
0ea0 ; --------------------------------------------------------------------------------------
0ea0 0ea3 | | .CONST 0x0ea3 ; Address of begin
0ea1 0004 | | .CONST 0x0004 ; Address of exception handler
0ea2 0001 | | .CONST 0x0001 ; Number of locals
0ea3 BODY_0ea0:
0ea3 INIT_0ea0:
0ea3 00da | | Load_Top At_Offset_2
0ea4 0217 | | Execute Heap_Access,All_Reference
0ea5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ea6 e221 | ! | Load 0x1,0x21
0ea7 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0ea8 00db | | Load_Top At_Offset_3
0ea9 0217 | | Execute Heap_Access,All_Reference
0eaa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0eab e5fe | | Load 0x2,-0x2
0eac 8225 | % | Call 0x1,0x25
0ead 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0eae 0000 0000 | | .XXX[0x2]
0eb0 ; --------------------------------------------------------------------------------------
0eb0 ; SUBPROGRAM
0eb0 ; --------------------------------------------------------------------------------------
0eb0 0eb3 | | .CONST 0x0eb3 ; Address of begin
0eb1 0004 | | .CONST 0x0004 ; Address of exception handler
0eb2 0001 | | .CONST 0x0001 ; Number of locals
0eb3 BODY_0eb0:
0eb3 INIT_0eb0:
0eb3 00da | | Load_Top At_Offset_2
0eb4 0217 | | Execute Heap_Access,All_Reference
0eb5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0eb6 e221 | ! | Load 0x1,0x21
0eb7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0eb8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0eb9 0000 0000 | | .BLANK 0000[0x7]
0ec0 ; --------------------------------------------------------------------------------------
0ec0 ; SUBPROGRAM
0ec0 ; --------------------------------------------------------------------------------------
0ec0 0ec3 | | .CONST 0x0ec3 ; Address of begin
0ec1 0004 | | .CONST 0x0004 ; Address of exception handler
0ec2 0001 | | .CONST 0x0001 ; Number of locals
0ec3 BODY_0ec0:
0ec3 INIT_0ec0:
0ec3 00da | | Load_Top At_Offset_2
0ec4 680e |h | Jump_Zero 0xed3
0ec5 00da | | Load_Top At_Offset_2
0ec6 e5fd | | Load 0x2,-0x3
0ec7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ec8 027e | ~ | Execute Discrete,Not_Equal
0ec9 6809 |h | Jump_Zero 0xed3
0eca 4800 |H | Short_Literal 0x0
0ecb e20f | | Load 0x1,0xf
0ecc 1c08 | | Execute_Immediate Run_Utility,0x8
0ecd 00db | | Load_Top At_Offset_3
0ece e224 | $ | Load 0x1,0x24
0ecf 01d7 | | Execute Vector,Field_Read
0ed0 00d9 | | Load_Top At_Offset_1
0ed1 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0ed2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ed3 e5fd | | Load 0x2,-0x3
0ed4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ed5 0f02 | | Execute_Immediate Equal,0x2
0ed6 7010 |p | Jump_Nonzero 0xee7
0ed7 4801 |H | Short_Literal 0x1
0ed8 e20f | | Load 0x1,0xf
0ed9 1c08 | | Execute_Immediate Run_Utility,0x8
0eda e5fd | | Load 0x2,-0x3
0edb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0edc e5fe | | Load 0x2,-0x2
0edd e00b | | Load 0x0,0xb
0ede 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0edf e00e | | Load 0x0,0xe
0ee0 e00f | | Load 0x0,0xf
0ee1 a010 | | Store_Unchecked 0x0,0x10
0ee2 e011 | | Load 0x0,0x11
0ee3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0ee4 00d9 | | Load_Top At_Offset_1
0ee5 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0ee6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ee7 4802 |H | Short_Literal 0x2
0ee8 e20f | | Load 0x1,0xf
0ee9 1c08 | | Execute_Immediate Run_Utility,0x8
0eea e5fd | | Load 0x2,-0x3
0eeb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0eec e5fe | | Load 0x2,-0x2
0eed e00b | | Load 0x0,0xb
0eee 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0eef e012 | | Load 0x0,0x12
0ef0 e013 | | Load 0x0,0x13
0ef1 a014 | | Store_Unchecked 0x0,0x14
0ef2 e011 | | Load 0x0,0x11
0ef3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0ef4 00d9 | | Load_Top At_Offset_1
0ef5 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0ef6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ef7 0000 | | .XXX[0x1]
0ef8 ; --------------------------------------------------------------------------------------
0ef8 ; SUBPROGRAM
0ef8 ; --------------------------------------------------------------------------------------
0ef8 0efb | | .CONST 0x0efb ; Address of begin
0ef9 0004 | | .CONST 0x0004 ; Address of exception handler
0efa 0001 | | .CONST 0x0001 ; Number of locals
0efb BODY_0ef8:
0efb INIT_0ef8:
0efb 4608 |F | Jump_Case 0x9
0efc 7808 |x | Jump 0xf05 ; case 0x0
0efd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0efe 7838 |x8 | Jump 0xf37 ; case 0x2
0eff 7837 |x7 | Jump 0xf37 ; case 0x3
0f00 7836 |x6 | Jump 0xf37 ; case 0x4
0f01 7835 |x5 | Jump 0xf37 ; case 0x5
0f02 7814 |x | Jump 0xf17 ; case 0x6
0f03 781e |x | Jump 0xf22 ; case 0x7
0f04 782b |x+ | Jump 0xf30 ; case 0x8
0f05 00da | | Load_Top At_Offset_2
0f06 016c | l | Execute Variant_Record,Is_Constrained
0f07 7009 |p | Jump_Nonzero 0xf11
0f08 00cf | | Action Mark_Auxiliary
0f09 4800 |H | Short_Literal 0x0
0f0a e5ff | | Load 0x2,-0x1
0f0b 1c08 | | Execute_Immediate Run_Utility,0x8
0f0c 00d8 | | Load_Top At_Offset_0
0f0d 1c00 | | Execute_Immediate Run_Utility,0x0
0f0e c5ff | | Store 0x2,-0x1
0f0f 00ce | | Action Pop_Auxiliary
0f10 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0f11 00da | | Load_Top At_Offset_2
0f12 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0f13 4602 |F | Jump_Case 0x3
0f14 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0f15 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0f16 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0f17 00db | | Load_Top At_Offset_3
0f18 4602 |F | Jump_Case 0x3
0f19 7806 |x | Jump 0xf20 ; case 0x0
0f1a 7803 |x | Jump 0xf1e ; case 0x1
0f1b 7800 |x | Jump 0xf1c ; case 0x2
0f1c 4802 |H | Short_Literal 0x2
0f1d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0f1e 4801 |H | Short_Literal 0x1
0f1f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0f20 4803 |H | Short_Literal 0x3
0f21 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0f22 00db | | Load_Top At_Offset_3
0f23 e5fe | | Load 0x2,-0x2
0f24 4602 |F | Jump_Case 0x3
0f25 7806 |x | Jump 0xf2c ; case 0x0
0f26 7803 |x | Jump 0xf2a ; case 0x1
0f27 7800 |x | Jump 0xf28 ; case 0x2
0f28 4802 |H | Short_Literal 0x2
0f29 7803 |x | Jump 0xf2d
0f2a 4801 |H | Short_Literal 0x1
0f2b 7801 |x | Jump 0xf2d
0f2c 4803 |H | Short_Literal 0x3
0f2d e5ff | | Load 0x2,-0x1
0f2e 031b | | Declare_Type Variant_Record,Constrained
0f2f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0f30 00db | | Load_Top At_Offset_3
0f31 e5fe | | Load 0x2,-0x2
0f32 e5ff | | Load 0x2,-0x1
0f33 1c06 | | Execute_Immediate Run_Utility,0x6
0f34 e5ff | | Load 0x2,-0x1
0f35 02fc | | Declare_Variable Variant_Record,With_Constraint
0f36 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0f37 0869 | i | Execute_Immediate Raise,0x69
0f38 ; --------------------------------------------------------------------------------------
0f38 ; SUBPROGRAM
0f38 ; --------------------------------------------------------------------------------------
0f38 0f9c | | .CONST 0x0f9c ; Address of begin
0f39 0004 | | .CONST 0x0004 ; Address of exception handler
0f3a 0021 | ! | .CONST 0x0021 ; Number of locals
0f3b INIT_0f38:
0f3b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0f3c 029a 0fa3 | | Declare_Subprogram INIT_0fa0,For_Outer_Call,Visible,Unelaborated
0f3e 029a 0fab | | Declare_Subprogram INIT_0fa8,For_Outer_Call,Visible,Unelaborated
0f40 029a 0fcb | | Declare_Subprogram INIT_0fc8,For_Outer_Call,Visible,Unelaborated
0f42 029a 0fdb | | Declare_Subprogram INIT_0fd8,For_Outer_Call,Visible,Unelaborated
0f44 029a 0feb | | Declare_Subprogram INIT_0fe8,For_Outer_Call,Visible,Unelaborated
0f46 029a 0ffb | | Declare_Subprogram INIT_0ff8,For_Outer_Call,Visible,Unelaborated
0f48 029a 100b | | Declare_Subprogram INIT_1008,For_Outer_Call,Visible,Unelaborated
0f4a 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0f4b 029a 101b | | Declare_Subprogram INIT_1018,For_Outer_Call,Visible,Unelaborated
0f4d 029a 103b | ;| Declare_Subprogram INIT_1038,For_Outer_Call,Visible,Unelaborated
0f4f 029a 104b | K| Declare_Subprogram INIT_1048,For_Outer_Call,Visible,Unelaborated
0f51 029a 105b | [| Declare_Subprogram INIT_1058,For_Outer_Call,Visible,Unelaborated
0f53 e001 | | Load 0x0,0x1
0f54 e002 | | Load 0x0,0x2
0f55 e003 | | Load 0x0,0x3
0f56 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f57 e004 | | Load 0x0,0x4
0f58 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0f59 e004 | | Load 0x0,0x4
0f5a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0f5b e003 | | Load 0x0,0x3
0f5c 1916 | | Execute Package,Field_Reference,Field_Number 0x16
0f5d e005 | | Load 0x0,0x5
0f5e 0387 | | Declare_Variable Package
0f5f 00d8 | | Load_Top At_Offset_0
0f60 020f | | Execute Module,Activate
0f61 00d8 | | Load_Top At_Offset_0
0f62 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0f63 e20d | | Load 0x1,0xd
0f64 03a2 | | Complete_Type Heap_Access,By_Renaming
0f65 00d8 | | Load_Top At_Offset_0
0f66 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0f67 e006 | | Load 0x0,0x6
0f68 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0f69 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f6a 02a0 | | Declare_Subprogram Null_Subprogram
0f6b 4802 |H | Short_Literal 0x2
0f6c 032d | - | Declare_Type Record,Defined
0f6d 00d8 | | Load_Top At_Offset_0
0f6e 02a0 | | Declare_Subprogram Null_Subprogram
0f6f e215 | | Load 0x1,0x15
0f70 03a3 | | Complete_Type Heap_Access,By_Defining
0f71 00bf | | Action Accept_Activation
0f72 e007 | | Load 0x0,0x7
0f73 e008 | | Load 0x0,0x8
0f74 e009 | | Load 0x0,0x9
0f75 e00a | | Load 0x0,0xa
0f76 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0f77 e00b | | Load 0x0,0xb
0f78 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0f79 0387 | | Declare_Variable Package
0f7a 00d8 | | Load_Top At_Offset_0
0f7b 020f | | Execute Module,Activate
0f7c e00b | | Load 0x0,0xb
0f7d 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0f7e 00c6 | | Action Check_Subprogram_Elaborated
0f7f e009 | | Load 0x0,0x9
0f80 e00a | | Load 0x0,0xa
0f81 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0f82 e00c | | Load 0x0,0xc
0f83 e00d | | Load 0x0,0xd
0f84 4800 |H | Short_Literal 0x0
0f85 0007 | | Action Break_Optional
0f86 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0f87 00c7 | | Action Elaborate_Subprogram
0f88 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0f89 00c7 | | Action Elaborate_Subprogram
0f8a 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0f8b 00c7 | | Action Elaborate_Subprogram
0f8c 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0f8d 00c7 | | Action Elaborate_Subprogram
0f8e 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0f8f 00c7 | | Action Elaborate_Subprogram
0f90 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0f91 00c7 | | Action Elaborate_Subprogram
0f92 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0f93 00c7 | | Action Elaborate_Subprogram
0f94 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0f95 00c7 | | Action Elaborate_Subprogram
0f96 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0f97 00c7 | | Action Elaborate_Subprogram
0f98 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0f99 00c7 | | Action Elaborate_Subprogram
0f9a 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0f9b 00c7 | | Action Elaborate_Subprogram
0f9c BODY_0f38:
0f9c 00bc | | Action Signal_Activated
0f9d 00bb | | Action Signal_Completion
0f9e 0000 0000 | | .XXX[0x2]
0fa0 ; --------------------------------------------------------------------------------------
0fa0 ; SUBPROGRAM
0fa0 ; --------------------------------------------------------------------------------------
0fa0 0fa3 | | .CONST 0x0fa3 ; Address of begin
0fa1 0004 | | .CONST 0x0004 ; Address of exception handler
0fa2 0001 | | .CONST 0x0001 ; Number of locals
0fa3 BODY_0fa0:
0fa3 INIT_0fa0:
0fa3 e21a | | Load 0x1,0x1a
0fa4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0fa5 00ca | | Action Exit_Nullary_Function
0fa6 0000 0000 | | .XXX[0x2]
0fa8 ; --------------------------------------------------------------------------------------
0fa8 ; SUBPROGRAM
0fa8 ; --------------------------------------------------------------------------------------
0fa8 0faf | | .CONST 0x0faf ; Address of begin
0fa9 0004 | | .CONST 0x0004 ; Address of exception handler
0faa 0003 | | .CONST 0x0003 ; Number of locals
0fab INIT_0fa8:
0fab e004 | | Load 0x0,0x4
0fac 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0fad 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0fae 00e1 | | Load_Encached Boolean_Cache
0faf BODY_0fa8:
0faf 00e1 | | Load_Encached Boolean_Cache
0fb0 00da | | Load_Top At_Offset_2
0fb1 e5ff | | Load 0x2,-0x1
0fb2 e5fe | | Load 0x2,-0x2
0fb3 0217 | | Execute Heap_Access,All_Reference
0fb4 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0fb5 e21a | | Load 0x1,0x1a
0fb6 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0fb7 005b | [ | Store_Top Discrete,At_Offset_3
0fb8 0059 | Y | Store_Top Discrete,At_Offset_1
0fb9 00d8 | | Load_Top At_Offset_0
0fba 680a |h | Jump_Zero 0xfc5
0fbb 00d9 | | Load_Top At_Offset_1
0fbc e5fe | | Load 0x2,-0x2
0fbd e00a | | Load 0x0,0xa
0fbe 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0fbf e21d | | Load 0x1,0x1d
0fc0 e21e | | Load 0x1,0x1e
0fc1 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0fc2 e00b | | Load 0x0,0xb
0fc3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0fc4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fc5 e00a | | Load 0x0,0xa
0fc6 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0fc7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0fc8 ; --------------------------------------------------------------------------------------
0fc8 ; SUBPROGRAM
0fc8 ; --------------------------------------------------------------------------------------
0fc8 0fcb | | .CONST 0x0fcb ; Address of begin
0fc9 0004 | | .CONST 0x0004 ; Address of exception handler
0fca 0001 | | .CONST 0x0001 ; Number of locals
0fcb BODY_0fc8:
0fcb INIT_0fc8:
0fcb e5fc | | Load 0x2,-0x4
0fcc e5fe | | Load 0x2,-0x2
0fcd e21c | | Load 0x1,0x1c
0fce 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0fcf e5ff | | Load 0x2,-0x1
0fd0 e5fd | | Load 0x2,-0x3
0fd1 0217 | | Execute Heap_Access,All_Reference
0fd2 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0fd3 e21a | | Load 0x1,0x1a
0fd4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0fd5 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0fd6 0000 0000 | | .XXX[0x2]
0fd8 ; --------------------------------------------------------------------------------------
0fd8 ; SUBPROGRAM
0fd8 ; --------------------------------------------------------------------------------------
0fd8 0fdb | | .CONST 0x0fdb ; Address of begin
0fd9 0004 | | .CONST 0x0004 ; Address of exception handler
0fda 0001 | | .CONST 0x0001 ; Number of locals
0fdb BODY_0fd8:
0fdb INIT_0fd8:
0fdb 00da | | Load_Top At_Offset_2
0fdc e5fe | | Load 0x2,-0x2
0fdd 0217 | | Execute Heap_Access,All_Reference
0fde 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0fdf e21a | | Load 0x1,0x1a
0fe0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0fe1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0fe2 0000 0000 | | .BLANK 0000[0x6]
0fe8 ; --------------------------------------------------------------------------------------
0fe8 ; SUBPROGRAM
0fe8 ; --------------------------------------------------------------------------------------
0fe8 0feb | | .CONST 0x0feb ; Address of begin
0fe9 0004 | | .CONST 0x0004 ; Address of exception handler
0fea 0001 | | .CONST 0x0001 ; Number of locals
0feb BODY_0fe8:
0feb INIT_0fe8:
0feb 00da | | Load_Top At_Offset_2
0fec 0219 | | Execute Heap_Access,All_Read
0fed e21a | | Load 0x1,0x1a
0fee 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0fef e5ff | | Load 0x2,-0x1
0ff0 e00a | | Load 0x0,0xa
0ff1 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0ff2 e21a | | Load 0x1,0x1a
0ff3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0ff4 00d9 | | Load_Top At_Offset_1
0ff5 3814 |8 | Execute Record,Field_Write,Field_Number 0x14
0ff6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ff7 0000 | | .XXX[0x1]
0ff8 ; --------------------------------------------------------------------------------------
0ff8 ; SUBPROGRAM
0ff8 ; --------------------------------------------------------------------------------------
0ff8 0ffb | | .CONST 0x0ffb ; Address of begin
0ff9 0004 | | .CONST 0x0004 ; Address of exception handler
0ffa 0001 | | .CONST 0x0001 ; Number of locals
0ffb BODY_0ff8:
0ffb INIT_0ff8:
0ffb 00da | | Load_Top At_Offset_2
0ffc 0217 | | Execute Heap_Access,All_Reference
0ffd 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
0ffe e21a | | Load 0x1,0x1a
0fff 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1000 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1001 0000 0000 | | .BLANK 0000[0x7]
1008 ; --------------------------------------------------------------------------------------
1008 ; SUBPROGRAM
1008 ; --------------------------------------------------------------------------------------
1008 100b | | .CONST 0x100b ; Address of begin
1009 0004 | | .CONST 0x0004 ; Address of exception handler
100a 0001 | | .CONST 0x0001 ; Number of locals
100b BODY_1008:
100b INIT_1008:
100b 00da | | Load_Top At_Offset_2
100c 0217 | | Execute Heap_Access,All_Reference
100d 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
100e e21a | | Load 0x1,0x1a
100f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1010 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1011 0000 0000 | | .BLANK 0000[0x7]
1018 ; --------------------------------------------------------------------------------------
1018 ; SUBPROGRAM
1018 ; --------------------------------------------------------------------------------------
1018 1020 | | .CONST 0x1020 ; Address of begin
1019 0004 | | .CONST 0x0004 ; Address of exception handler
101a 0003 | | .CONST 0x0003 ; Number of locals
101b INIT_1018:
101b e00e | | Load 0x0,0xe
101c 180d | | Execute Package,Field_Execute,Field_Number 0xd
101d e215 | | Load 0x1,0x15
101e 00d9 | | Load_Top At_Offset_1
101f 039c | | Declare_Variable Heap_Access,By_Allocation
1020 BODY_1018:
1020 e5ff | | Load 0x2,-0x1
1021 00d9 | | Load_Top At_Offset_1
1022 0217 | | Execute Heap_Access,All_Reference
1023 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
1024 00d8 | | Load_Top At_Offset_0
1025 0219 | | Execute Heap_Access,All_Read
1026 e21a | | Load 0x1,0x1a
1027 1b20 | | Execute Package,Field_Read,Field_Number 0x20
1028 00db | | Load_Top At_Offset_3
1029 e5ff | | Load 0x2,-0x1
102a 0217 | | Execute Heap_Access,All_Reference
102b 3c14 |< | Execute Record,Field_Read,Field_Number 0x14
102c e21a | | Load 0x1,0x1a
102d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
102e 00d9 | | Load_Top At_Offset_1
102f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1030 00d1 | | Pop_Control Pop_Count_1
1031 00d8 | | Load_Top At_Offset_0
1032 a5fe | | Store_Unchecked 0x2,-0x2
1033 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1034 0000 0000 | | .BLANK 0000[0x4]
1038 ; --------------------------------------------------------------------------------------
1038 ; SUBPROGRAM
1038 ; --------------------------------------------------------------------------------------
1038 103b | ; | .CONST 0x103b ; Address of begin
1039 0004 | | .CONST 0x0004 ; Address of exception handler
103a 0001 | | .CONST 0x0001 ; Number of locals
103b BODY_1038:
103b INIT_1038:
103b 00da | | Load_Top At_Offset_2
103c 0219 | | Execute Heap_Access,All_Read
103d 00d8 | | Load_Top At_Offset_0
103e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
103f e21a | | Load 0x1,0x1a
1040 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
1041 00d9 | | Load_Top At_Offset_1
1042 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1043 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1044 0000 0000 | | .BLANK 0000[0x4]
1048 ; --------------------------------------------------------------------------------------
1048 ; SUBPROGRAM
1048 ; --------------------------------------------------------------------------------------
1048 104b | K | .CONST 0x104b ; Address of begin
1049 0004 | | .CONST 0x0004 ; Address of exception handler
104a 0001 | | .CONST 0x0001 ; Number of locals
104b BODY_1048:
104b INIT_1048:
104b 00da | | Load_Top At_Offset_2
104c 0217 | | Execute Heap_Access,All_Reference
104d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
104e 00db | | Load_Top At_Offset_3
104f 0217 | | Execute Heap_Access,All_Reference
1050 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1051 e21a | | Load 0x1,0x1a
1052 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1053 e003 | | Load 0x0,0x3
1054 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1055 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1056 0000 0000 | | .XXX[0x2]
1058 ; --------------------------------------------------------------------------------------
1058 ; SUBPROGRAM
1058 ; --------------------------------------------------------------------------------------
1058 105b | [ | .CONST 0x105b ; Address of begin
1059 0004 | | .CONST 0x0004 ; Address of exception handler
105a 0001 | | .CONST 0x0001 ; Number of locals
105b BODY_1058:
105b INIT_1058:
105b 00da | | Load_Top At_Offset_2
105c 0217 | | Execute Heap_Access,All_Reference
105d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
105e e21a | | Load 0x1,0x1a
105f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1060 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1061 0000 0000 | | .BLANK 0000[0x7]
1068 ; --------------------------------------------------------------------------------------
1068 ; SUBPROGRAM
1068 ; --------------------------------------------------------------------------------------
1068 10ac | | .CONST 0x10ac ; Address of begin
1069 0004 | | .CONST 0x0004 ; Address of exception handler
106a 001d | | .CONST 0x001d ; Number of locals
106b INIT_1068:
106b e001 | | Load 0x0,0x1
106c 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
106d 0129 | ) | Execute Any,Make_Visible
106e 029a 10b3 | | Declare_Subprogram INIT_10b0,For_Outer_Call,Visible,Unelaborated
1070 029a 10bb | | Declare_Subprogram INIT_10b8,For_Outer_Call,Visible,Unelaborated
1072 029a 10cb | | Declare_Subprogram INIT_10c8,For_Outer_Call,Visible,Unelaborated
1074 029a 10db | | Declare_Subprogram INIT_10d8,For_Outer_Call,Visible,Unelaborated
1076 029a 10fb | | Declare_Subprogram INIT_10f8,For_Outer_Call,Visible,Unelaborated
1078 029a 110b | | Declare_Subprogram INIT_1108,For_Outer_Call,Visible,Unelaborated
107a 029a 111b | | Declare_Subprogram INIT_1118,For_Outer_Call,Visible,Unelaborated
107c 029a 112b | +| Declare_Subprogram INIT_1128,For_Outer_Call,Visible,Unelaborated
107e 029a 1133 | 3| Declare_Subprogram INIT_1130,For_Outer_Call,Visible,Unelaborated
1080 029a 1143 | C| Declare_Subprogram INIT_1140,For_Outer_Call,Visible,Unelaborated
1082 e001 | | Load 0x0,0x1
1083 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1084 0129 | ) | Execute Any,Make_Visible
1085 029a 1153 | S| Declare_Subprogram INIT_1150,For_Outer_Call,Visible,Unelaborated
1087 029a 116b | k| Declare_Subprogram INIT_1168,For_Outer_Call,Visible,Unelaborated
1089 029a 117b | {| Declare_Subprogram INIT_1178,For_Outer_Call,Visible,Unelaborated
108b 029a 118b | | Declare_Subprogram INIT_1188,For_Outer_Call,Visible,Unelaborated
108d 00bf | | Action Accept_Activation
108e 1d0e | | Execute_Immediate Reference_Lex_1,0xe
108f 00c7 | | Action Elaborate_Subprogram
1090 1d0f | | Execute_Immediate Reference_Lex_1,0xf
1091 00c7 | | Action Elaborate_Subprogram
1092 1d10 | | Execute_Immediate Reference_Lex_1,0x10
1093 00c7 | | Action Elaborate_Subprogram
1094 1d12 | | Execute_Immediate Reference_Lex_1,0x12
1095 00c7 | | Action Elaborate_Subprogram
1096 1d13 | | Execute_Immediate Reference_Lex_1,0x13
1097 00c7 | | Action Elaborate_Subprogram
1098 1d14 | | Execute_Immediate Reference_Lex_1,0x14
1099 00c7 | | Action Elaborate_Subprogram
109a 029d 1193 | | Declare_Subprogram INIT_1190,For_Outer_Call
109c 1d19 | | Execute_Immediate Reference_Lex_1,0x19
109d 00c7 | | Action Elaborate_Subprogram
109e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
109f 00c7 | | Action Elaborate_Subprogram
10a0 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
10a1 00c7 | | Action Elaborate_Subprogram
10a2 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
10a3 00c7 | | Action Elaborate_Subprogram
10a4 1d15 | | Execute_Immediate Reference_Lex_1,0x15
10a5 00c7 | | Action Elaborate_Subprogram
10a6 1d16 | | Execute_Immediate Reference_Lex_1,0x16
10a7 00c7 | | Action Elaborate_Subprogram
10a8 1d17 | | Execute_Immediate Reference_Lex_1,0x17
10a9 00c7 | | Action Elaborate_Subprogram
10aa 1d11 | | Execute_Immediate Reference_Lex_1,0x11
10ab 00c7 | | Action Elaborate_Subprogram
10ac BODY_1068:
10ac 00bc | | Action Signal_Activated
10ad 00bb | | Action Signal_Completion
10ae 0000 0000 | | .XXX[0x2]
10b0 ; --------------------------------------------------------------------------------------
10b0 ; SUBPROGRAM
10b0 ; --------------------------------------------------------------------------------------
10b0 10b3 | | .CONST 0x10b3 ; Address of begin
10b1 0004 | | .CONST 0x0004 ; Address of exception handler
10b2 0001 | | .CONST 0x0001 ; Number of locals
10b3 BODY_10b0:
10b3 INIT_10b0:
10b3 e001 | | Load 0x0,0x1
10b4 1814 | | Execute Package,Field_Execute,Field_Number 0x14
10b5 e20d | | Load 0x1,0xd
10b6 0216 | | Execute Heap_Access,Convert
10b7 00ca | | Action Exit_Nullary_Function
10b8 ; --------------------------------------------------------------------------------------
10b8 ; SUBPROGRAM
10b8 ; --------------------------------------------------------------------------------------
10b8 10bb | | .CONST 0x10bb ; Address of begin
10b9 0004 | | .CONST 0x0004 ; Address of exception handler
10ba 0001 | | .CONST 0x0001 ; Number of locals
10bb BODY_10b8:
10bb INIT_10b8:
10bb 4801 |H | Short_Literal 0x1
10bc e5fe | | Load 0x2,-0x2
10bd 0217 | | Execute Heap_Access,All_Reference
10be 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
10bf e001 | | Load 0x0,0x1
10c0 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
10c1 e5ff | | Load 0x2,-0x1
10c2 e001 | | Load 0x0,0x1
10c3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
10c4 e20d | | Load 0x1,0xd
10c5 0216 | | Execute Heap_Access,Convert
10c6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
10c7 0000 | | .XXX[0x1]
10c8 ; --------------------------------------------------------------------------------------
10c8 ; SUBPROGRAM
10c8 ; --------------------------------------------------------------------------------------
10c8 10cb | | .CONST 0x10cb ; Address of begin
10c9 0004 | | .CONST 0x0004 ; Address of exception handler
10ca 0001 | | .CONST 0x0001 ; Number of locals
10cb BODY_10c8:
10cb INIT_10c8:
10cb 4801 |H | Short_Literal 0x1
10cc e5fe | | Load 0x2,-0x2
10cd 0217 | | Execute Heap_Access,All_Reference
10ce 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
10cf e001 | | Load 0x0,0x1
10d0 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
10d1 e5ff | | Load 0x2,-0x1
10d2 e001 | | Load 0x0,0x1
10d3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
10d4 e20d | | Load 0x1,0xd
10d5 0216 | | Execute Heap_Access,Convert
10d6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
10d7 0000 | | .XXX[0x1]
10d8 ; --------------------------------------------------------------------------------------
10d8 ; SUBPROGRAM
10d8 ; --------------------------------------------------------------------------------------
10d8 10e3 | | .CONST 0x10e3 ; Address of begin
10d9 0004 | | .CONST 0x0004 ; Address of exception handler
10da 0003 | | .CONST 0x0003 ; Number of locals
10db INIT_10d8:
10db 00db | | Load_Top At_Offset_3
10dc e002 | | Load 0x0,0x2
10dd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
10de 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
10df 00db | | Load_Top At_Offset_3
10e0 e002 | | Load 0x0,0x2
10e1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
10e2 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
10e3 BODY_10d8:
10e3 e5fd | | Load 0x2,-0x3
10e4 00da | | Load_Top At_Offset_2
10e5 01dd | | Execute Vector,First
10e6 00da | | Load_Top At_Offset_2
10e7 01db | | Execute Vector,Length
10e8 0273 | s | Execute Discrete,Plus
10e9 00d8 | | Load_Top At_Offset_0
10ea 00e2 | | Load_Encached Integer_Cache
10eb 0260 | ` | Execute Discrete,In_Type
10ec 7001 |p | Jump_Nonzero 0x10ee
10ed 0801 | | Execute_Immediate Raise,0x1
10ee 00db | | Load_Top At_Offset_3
10ef 01dc | | Execute Vector,Last
10f0 e402 | | Load 0x2,0x2
10f1 01cf | | Execute Vector,Slice_Read
10f2 820f | | Call 0x1,0xf
10f3 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
10f4 0000 0000 | | .BLANK 0000[0x4]
10f8 ; --------------------------------------------------------------------------------------
10f8 ; SUBPROGRAM
10f8 ; --------------------------------------------------------------------------------------
10f8 10fb | | .CONST 0x10fb ; Address of begin
10f9 0004 | | .CONST 0x0004 ; Address of exception handler
10fa 0001 | | .CONST 0x0001 ; Number of locals
10fb BODY_10f8:
10fb INIT_10f8:
10fb 00da | | Load_Top At_Offset_2
10fc e001 | | Load 0x0,0x1
10fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10fe 0216 | | Execute Heap_Access,Convert
10ff e001 | | Load 0x0,0x1
1100 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1101 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1102 0000 0000 | | .BLANK 0000[0x6]
1108 ; --------------------------------------------------------------------------------------
1108 ; SUBPROGRAM
1108 ; --------------------------------------------------------------------------------------
1108 110b | | .CONST 0x110b ; Address of begin
1109 0004 | | .CONST 0x0004 ; Address of exception handler
110a 0001 | | .CONST 0x0001 ; Number of locals
110b BODY_1108:
110b INIT_1108:
110b 00da | | Load_Top At_Offset_2
110c e001 | | Load 0x0,0x1
110d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
110e 0216 | | Execute Heap_Access,Convert
110f e001 | | Load 0x0,0x1
1110 181c | | Execute Package,Field_Execute,Field_Number 0x1c
1111 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1112 0000 0000 | | .BLANK 0000[0x6]
1118 ; --------------------------------------------------------------------------------------
1118 ; SUBPROGRAM
1118 ; --------------------------------------------------------------------------------------
1118 111b | | .CONST 0x111b ; Address of begin
1119 0004 | | .CONST 0x0004 ; Address of exception handler
111a 0001 | | .CONST 0x0001 ; Number of locals
111b BODY_1118:
111b INIT_1118:
111b 00da | | Load_Top At_Offset_2
111c e001 | | Load 0x0,0x1
111d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
111e 0216 | | Execute Heap_Access,Convert
111f e001 | | Load 0x0,0x1
1120 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1121 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1122 0000 0000 | | .BLANK 0000[0x6]
1128 ; --------------------------------------------------------------------------------------
1128 ; SUBPROGRAM
1128 ; --------------------------------------------------------------------------------------
1128 112b | + | .CONST 0x112b ; Address of begin
1129 0004 | | .CONST 0x0004 ; Address of exception handler
112a 0001 | | .CONST 0x0001 ; Number of locals
112b BODY_1128:
112b INIT_1128:
112b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
112c 0000 0000 | | .BLANK 0000[0x4]
1130 ; --------------------------------------------------------------------------------------
1130 ; SUBPROGRAM
1130 ; --------------------------------------------------------------------------------------
1130 1133 | 3 | .CONST 0x1133 ; Address of begin
1131 0004 | | .CONST 0x0004 ; Address of exception handler
1132 0001 | | .CONST 0x0001 ; Number of locals
1133 BODY_1130:
1133 INIT_1130:
1133 00da | | Load_Top At_Offset_2
1134 e001 | | Load 0x0,0x1
1135 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1136 0216 | | Execute Heap_Access,Convert
1137 e001 | | Load 0x0,0x1
1138 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1139 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
113a 0000 0000 | | .BLANK 0000[0x6]
1140 ; --------------------------------------------------------------------------------------
1140 ; SUBPROGRAM
1140 ; --------------------------------------------------------------------------------------
1140 1143 | C | .CONST 0x1143 ; Address of begin
1141 0004 | | .CONST 0x0004 ; Address of exception handler
1142 0001 | | .CONST 0x0001 ; Number of locals
1143 BODY_1140:
1143 INIT_1140:
1143 00db | | Load_Top At_Offset_3
1144 0217 | | Execute Heap_Access,All_Reference
1145 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
1146 e001 | | Load 0x0,0x1
1147 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1148 00db | | Load_Top At_Offset_3
1149 e001 | | Load 0x0,0x1
114a 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
114b e20d | | Load 0x1,0xd
114c 0216 | | Execute Heap_Access,Convert
114d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
114e 0000 0000 | | .XXX[0x2]
1150 ; --------------------------------------------------------------------------------------
1150 ; SUBPROGRAM
1150 ; --------------------------------------------------------------------------------------
1150 1153 | S | .CONST 0x1153 ; Address of begin
1151 0004 | | .CONST 0x0004 ; Address of exception handler
1152 0001 | | .CONST 0x0001 ; Number of locals
1153 BODY_1150:
1153 INIT_1150:
1153 00db | | Load_Top At_Offset_3
1154 0120 | | Execute Any,Is_Value
1155 6803 |h | Jump_Zero 0x1159
1156 e001 | | Load 0x0,0x1
1157 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
1158 7804 |x | Jump 0x115d
1159 00db | | Load_Top At_Offset_3
115a e001 | | Load 0x0,0x1
115b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
115c 011e | | Execute Any,Convert
115d 00db | | Load_Top At_Offset_3
115e 0217 | | Execute Heap_Access,All_Reference
115f 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
1160 e001 | | Load 0x0,0x1
1161 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
1162 e001 | | Load 0x0,0x1
1163 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1164 c5fe | | Store 0x2,-0x2
1165 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1166 0000 0000 | | .XXX[0x2]
1168 ; --------------------------------------------------------------------------------------
1168 ; SUBPROGRAM
1168 ; --------------------------------------------------------------------------------------
1168 116b | k | .CONST 0x116b ; Address of begin
1169 0004 | | .CONST 0x0004 ; Address of exception handler
116a 0001 | | .CONST 0x0001 ; Number of locals
116b BODY_1168:
116b INIT_1168:
116b 00da | | Load_Top At_Offset_2
116c e001 | | Load 0x0,0x1
116d 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
116e 011e | | Execute Any,Convert
116f e001 | | Load 0x0,0x1
1170 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1171 c5ff | | Store 0x2,-0x1
1172 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1173 0000 0000 | | .BLANK 0000[0x5]
1178 ; --------------------------------------------------------------------------------------
1178 ; SUBPROGRAM
1178 ; --------------------------------------------------------------------------------------
1178 117b | { | .CONST 0x117b ; Address of begin
1179 0004 | | .CONST 0x0004 ; Address of exception handler
117a 0001 | | .CONST 0x0001 ; Number of locals
117b BODY_1178:
117b INIT_1178:
117b 00da | | Load_Top At_Offset_2
117c e001 | | Load 0x0,0x1
117d 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
117e e20d | | Load 0x1,0xd
117f 0216 | | Execute Heap_Access,Convert
1180 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1181 0000 0000 | | .BLANK 0000[0x7]
1188 ; --------------------------------------------------------------------------------------
1188 ; SUBPROGRAM
1188 ; --------------------------------------------------------------------------------------
1188 118b | | .CONST 0x118b ; Address of begin
1189 0004 | | .CONST 0x0004 ; Address of exception handler
118a 0001 | | .CONST 0x0001 ; Number of locals
118b BODY_1188:
118b INIT_1188:
118b 00da | | Load_Top At_Offset_2
118c e001 | | Load 0x0,0x1
118d 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
118e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
118f 0000 | | .XXX[0x1]
1190 ; --------------------------------------------------------------------------------------
1190 ; SUBPROGRAM
1190 ; --------------------------------------------------------------------------------------
1190 1193 | | .CONST 0x1193 ; Address of begin
1191 0004 | | .CONST 0x0004 ; Address of exception handler
1192 0001 | | .CONST 0x0001 ; Number of locals
1193 BODY_1190:
1193 INIT_1190:
1193 00da | | Load_Top At_Offset_2
1194 e001 | | Load 0x0,0x1
1195 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1196 0216 | | Execute Heap_Access,Convert
1197 e001 | | Load 0x0,0x1
1198 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1199 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
119a ; --------------------------------------------------------------------------------------
119a ; STRING TABLE
119a ; --------------------------------------------------------------------------------------
119a 0024 | $ | .STRTAB 0x0024->0x11ac ; "OTHER_SUBCLASS"
119b 0030 | 0 | .STRTAB 0x0030->0x11b3 ; "VIEW_SUBCLASS"
119c 003b | ; | .STRTAB 0x003b->0x11b9 ; "SUBSYSTEM_SUBCLASS"
119d 004b | K | .STRTAB 0x004b->0x11c2 ; "WORLD_SUBCLASS"
119e 0057 | W | .STRTAB 0x0057->0x11c9 ; "ACTIVITY_SUBCLASS"
119f 0066 | f | .STRTAB 0x0066->0x11d2 ; "NIL"
11a0 0067 | g | .STRTAB 0x0067->0x11d3 ; "IMPORT"
11a1 006b | k | .STRTAB 0x006b->0x11d6 ; "LINK"
11a2 006d | m | .STRTAB 0x006d->0x11d8 ; "DEBUG_HISTORY_ENTRIES"
11a3 0080 | | .STRTAB 0x0080->0x11e3 ; "WINDOW_SHIFT_OVERLAP"
11a4 0092 | | .STRTAB 0x0092->0x11ed ; "State file for "
11a5 009f | | .STRTAB 0x009f->0x11f4 ; " is being abandoned."
11a6 00b1 | | .STRTAB 0x00b1->0x11fe ; " has been closed."
11a7 00c0 | | .STRTAB 0x00c0->0x1207 ; "Harmonizing the state."
11a8 00d4 | | .STRTAB 0x00d4->0x1212 ; "<DEFAULT>"
11a9 00db | | .STRTAB 0x00db->0x1216 ; "Bad Name_Status when resolving "
11aa 00f8 | | .STRTAB 0x00f8->0x1226 ; ". Invalidate its Unit.Data."
11ab 0111 | | .STREND 0x0111->0x1233
11ac 4f54 4845 |OTHE| .STRTAB_STRINGS
1234 0000 0000 | | .BLANK 0000[0x4]
1238 ; --------------------------------------------------------------------------------------
1238 ; Debug Table
1238 ; --------------------------------------------------------------------------------------
1238 0004 000d | | .DEBUG4 0x0004,0x000d,0xd926,0x0000,0x0001,0x0000
123e 3151 250b |1Q% | .XXX[0x4]
1240 0042 0d00 | B |
1242 0000 0000 | | .BLANK 0000[0x1be]