|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 6144 (0x1800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_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 0a88 | | .CONST 0x0a88 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8006 | | .CONST 0x8006 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 03e1 | | .CONST 0x03e1 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0062 | b | .CONST 0x0062 ; Number of locals
000b INIT_0008:
000b 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated
000d 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated
000f 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated
0011 029a 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call,Visible,Unelaborated
0013 029a 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call,Visible,Unelaborated
0015 029a 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Visible,Unelaborated
0017 029a 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call,Visible,Unelaborated
0019 029a 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call,Visible,Unelaborated
001b 480b |H | Short_Literal 0xb
001c 032b | + | Declare_Type Record,Incomplete,Visible
001d 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
001e 00d9 | | Load_Top At_Offset_1
001f 02a0 | | Declare_Subprogram Null_Subprogram
0020 00da | | Load_Top At_Offset_2
0021 03a3 | | Complete_Type Heap_Access,By_Defining
0022 029a 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call,Visible,Unelaborated
0024 029a 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call,Visible,Unelaborated
0026 e001 | | Load 0x0,0x1
0027 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0028 0129 | ) | Execute Any,Make_Visible
0029 4804 |H | Short_Literal 0x4
002a 0093 09c3 | | push_full_address INIT_09c0
002c 02a0 | | Declare_Subprogram Null_Subprogram
002d 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
002e 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
002f e002 | | Load 0x0,0x2
0030 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0031 00d9 | | Load_Top At_Offset_1
0032 03a2 | | Complete_Type Heap_Access,By_Renaming
0033 029a 06fb | | Declare_Subprogram INIT_06f8,For_Outer_Call,Visible,Unelaborated
0035 029a 070b | | Declare_Subprogram INIT_0708,For_Outer_Call,Visible,Unelaborated
0037 480c |H | Short_Literal 0xc
0038 032b | + | Declare_Type Record,Incomplete,Visible
0039 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
003a 00d9 | | Load_Top At_Offset_1
003b 02a0 | | Declare_Subprogram Null_Subprogram
003c 00da | | Load_Top At_Offset_2
003d 03a3 | | Complete_Type Heap_Access,By_Defining
003e 029a 0713 | | Declare_Subprogram INIT_0710,For_Outer_Call,Visible,Unelaborated
0040 029a 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call,Visible,Unelaborated
0042 4802 |H | Short_Literal 0x2
0043 032b | + | Declare_Type Record,Incomplete,Visible
0044 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
0045 00d9 | | Load_Top At_Offset_1
0046 02a0 | | Declare_Subprogram Null_Subprogram
0047 00da | | Load_Top At_Offset_2
0048 03a3 | | Complete_Type Heap_Access,By_Defining
0049 029a 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call,Visible,Unelaborated
004b 029a 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call,Visible,Unelaborated
004d 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
004e e002 | | Load 0x0,0x2
004f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0050 00d9 | | Load_Top At_Offset_1
0051 03a2 | | Complete_Type Heap_Access,By_Renaming
0052 029a 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call,Visible,Unelaborated
0054 029a 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call,Visible,Unelaborated
0056 4803 |H | Short_Literal 0x3
0057 032b | + | Declare_Type Record,Incomplete,Visible
0058 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
0059 00d9 | | Load_Top At_Offset_1
005a 02a0 | | Declare_Subprogram Null_Subprogram
005b 00da | | Load_Top At_Offset_2
005c 03a3 | | Complete_Type Heap_Access,By_Defining
005d 029a 075b | [| Declare_Subprogram INIT_0758,For_Outer_Call,Visible,Unelaborated
005f 029a 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call,Visible,Unelaborated
0061 4803 |H | Short_Literal 0x3
0062 032b | + | Declare_Type Record,Incomplete,Visible
0063 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
0064 00d9 | | Load_Top At_Offset_1
0065 02a0 | | Declare_Subprogram Null_Subprogram
0066 00da | | Load_Top At_Offset_2
0067 03a3 | | Complete_Type Heap_Access,By_Defining
0068 029a 0773 | s| Declare_Subprogram INIT_0770,For_Outer_Call,Visible,Unelaborated
006a 029a 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call,Visible,Unelaborated
006c e002 | | Load 0x0,0x2
006d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
006e 0129 | ) | Execute Any,Make_Visible
006f 029a 078b | | Declare_Subprogram INIT_0788,For_Outer_Call,Visible,Unelaborated
0071 029a 079b | | Declare_Subprogram INIT_0798,For_Outer_Call,Visible,Unelaborated
0073 4802 |H | Short_Literal 0x2
0074 032b | + | Declare_Type Record,Incomplete,Visible
0075 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
0076 00d9 | | Load_Top At_Offset_1
0077 02a0 | | Declare_Subprogram Null_Subprogram
0078 00da | | Load_Top At_Offset_2
0079 03a3 | | Complete_Type Heap_Access,By_Defining
007a 029a 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call,Visible,Unelaborated
007c 029a 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call,Visible,Unelaborated
007e 4804 |H | Short_Literal 0x4
007f 032b | + | Declare_Type Record,Incomplete,Visible
0080 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
0081 00d9 | | Load_Top At_Offset_1
0082 02a0 | | Declare_Subprogram Null_Subprogram
0083 00da | | Load_Top At_Offset_2
0084 03a3 | | Complete_Type Heap_Access,By_Defining
0085 029a 07bb | | Declare_Subprogram INIT_07b8,For_Outer_Call,Visible,Unelaborated
0087 029a 07cb | | Declare_Subprogram INIT_07c8,For_Outer_Call,Visible,Unelaborated
0089 00e3 | | Load_Encached Natural_Cache
008a 4800 |H | Short_Literal 0x0
008b 4801 |H | Short_Literal 0x1
008c 4801 |H | Short_Literal 0x1
008d 4803 |H | Short_Literal 0x3
008e 0319 | | Declare_Type Variant_Record,Incomplete,Visible
008f 029f 099b | | Declare_Subprogram INIT_0998,For_Call
0091 00d9 | | Load_Top At_Offset_1
0092 012a | * | Execute Any,Change_Utility
0093 0007 | | Action Break_Optional
0094 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative
0095 00d9 | | Load_Top At_Offset_1
0096 02a0 | | Declare_Subprogram Null_Subprogram
0097 00da | | Load_Top At_Offset_2
0098 03a3 | | Complete_Type Heap_Access,By_Defining
0099 029a 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call,Visible,Unelaborated
009b 029a 080b | | Declare_Subprogram INIT_0808,For_Outer_Call,Visible,Unelaborated
009d 029a 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call,Visible,Unelaborated
009f 029a 081b | | Declare_Subprogram INIT_0818,For_Outer_Call,Visible,Unelaborated
00a1 e216 | | Load 0x1,0x16
00a2 e003 | | Load 0x0,0x3
00a3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a4 e004 | | Load 0x0,0x4
00a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a6 e004 | | Load 0x0,0x4
00a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a8 e004 | | Load 0x0,0x4
00a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00aa e004 | | Load 0x0,0x4
00ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ac 00e1 | | Load_Encached Boolean_Cache
00ad e004 | | Load 0x0,0x4
00ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00af 00e1 | | Load_Encached Boolean_Cache
00b0 00e3 | | Load_Encached Natural_Cache
00b1 e23d | = | Load 0x1,0x3d
00b2 02a0 | | Declare_Subprogram Null_Subprogram
00b3 e215 | | Load 0x1,0x15
00b4 0326 | & | Complete_Type Record,By_Defining
00b5 e003 | | Load 0x0,0x3
00b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00b7 e21f | | Load 0x1,0x1f
00b8 00e1 | | Load_Encached Boolean_Cache
00b9 00e1 | | Load_Encached Boolean_Cache
00ba 00e1 | | Load_Encached Boolean_Cache
00bb e23d | = | Load 0x1,0x3d
00bc e004 | | Load 0x0,0x4
00bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00be 00e1 | | Load_Encached Boolean_Cache
00bf e004 | | Load 0x0,0x4
00c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c1 e235 | 5 | Load 0x1,0x35
00c2 e005 | | Load 0x0,0x5
00c3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c4 e005 | | Load 0x0,0x5
00c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c6 029f 0963 | c| Declare_Subprogram INIT_0960,For_Call
00c8 e21e | | Load 0x1,0x1e
00c9 0326 | & | Complete_Type Record,By_Defining
00ca e239 | 9 | Load 0x1,0x39
00cb 00e2 | | Load_Encached Integer_Cache
00cc 02a0 | | Declare_Subprogram Null_Subprogram
00cd e234 | 4 | Load 0x1,0x34
00ce 0326 | & | Complete_Type Record,By_Defining
00cf e006 | | Load 0x0,0x6
00d0 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00d1 e003 | | Load 0x0,0x3
00d2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d3 e007 | | Load 0x0,0x7
00d4 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
00d5 e239 | 9 | Load 0x1,0x39
00d6 02a0 | | Declare_Subprogram Null_Subprogram
00d7 e238 | 8 | Load 0x1,0x38
00d8 0326 | & | Complete_Type Record,By_Defining
00d9 e003 | | Load 0x0,0x3
00da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00db e22a | * | Load 0x1,0x2a
00dc e005 | | Load 0x0,0x5
00dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00de 029f 0983 | | Declare_Subprogram INIT_0980,For_Call
00e0 e229 | ) | Load 0x1,0x29
00e1 0326 | & | Complete_Type Record,By_Defining
00e2 e22e | . | Load 0x1,0x2e
00e3 e002 | | Load 0x0,0x2
00e4 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00e5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00e6 e231 | 1 | Load 0x1,0x31
00e7 02a0 | | Declare_Subprogram Null_Subprogram
00e8 e22d | - | Load 0x1,0x2d
00e9 0326 | & | Complete_Type Record,By_Defining
00ea e223 | # | Load 0x1,0x23
00eb e21b | | Load 0x1,0x1b
00ec 02a0 | | Declare_Subprogram Null_Subprogram
00ed e222 | " | Load 0x1,0x22
00ee 0326 | & | Complete_Type Record,By_Defining
00ef 00e3 | | Load_Encached Natural_Cache
00f0 0266 | f | Execute Discrete,Bounds
00f1 e005 | | Load 0x0,0x5
00f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f3 029f 082b | +| Declare_Subprogram INIT_0828,For_Call
00f5 4801 |H | Short_Literal 0x1
00f6 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
00f7 00e2 | | Load_Encached Integer_Cache
00f8 4801 |H | Short_Literal 0x1
00f9 636a |cj | Indirect_Literal Discrete,0x464,{0x00000000, 0x7fffffff}
00fa 00db | | Load_Top At_Offset_3
00fb 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object
00fc 029f 099b | | Declare_Subprogram INIT_0998,For_Call
00fe 4800 |H | Short_Literal 0x0
00ff 4801 |H | Short_Literal 0x1
0100 4801 |H | Short_Literal 0x1
0101 e23c | < | Load 0x1,0x3c
0102 0307 | | Complete_Type Variant_Record,By_Defining
0103 00bf | | Action Accept_Activation
0104 e001 | | Load 0x0,0x1
0105 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0106 02a0 | | Declare_Subprogram Null_Subprogram
0107 03ad | | Declare_Type Heap_Access,Defined
0108 e008 | | Load 0x0,0x8
0109 e009 | | Load 0x0,0x9
010a e001 | | Load 0x0,0x1
010b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
010c 00db | | Load_Top At_Offset_3
010d e00a | | Load 0x0,0xa
010e 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
010f 0387 | | Declare_Variable Package
0110 00d8 | | Load_Top At_Offset_0
0111 020f | | Execute Module,Activate
0112 e00b | | Load 0x0,0xb
0113 e00c | | Load 0x0,0xc
0114 e001 | | Load 0x0,0x1
0115 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0116 e243 | C | Load 0x1,0x43
0117 e00d | | Load 0x0,0xd
0118 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0119 0387 | | Declare_Variable Package
011a 00d8 | | Load_Top At_Offset_0
011b 020f | | Execute Module,Activate
011c e00e | | Load 0x0,0xe
011d e00f | | Load 0x0,0xf
011e e001 | | Load 0x0,0x1
011f 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0120 e00a | | Load 0x0,0xa
0121 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
0122 0387 | | Declare_Variable Package
0123 00d8 | | Load_Top At_Offset_0
0124 020f | | Execute Module,Activate
0125 e001 | | Load 0x0,0x1
0126 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0127 e010 | | Load 0x0,0x10
0128 0322 | " | Declare_Variable Record
0129 e010 | | Load 0x0,0x10
012a 012c | , | Execute Any,Size
012b 00d9 | | Load_Top At_Offset_1
012c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
012d e011 | | Load 0x0,0x11
012e 012c | , | Execute Any,Size
012f 00d9 | | Load_Top At_Offset_1
0130 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0131 e215 | | Load 0x1,0x15
0132 012c | , | Execute Any,Size
0133 00d9 | | Load_Top At_Offset_1
0134 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0135 e012 | | Load 0x0,0x12
0136 012c | , | Execute Any,Size
0137 00d9 | | Load_Top At_Offset_1
0138 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0139 e21e | | Load 0x1,0x1e
013a 012c | , | Execute Any,Size
013b 00d9 | | Load_Top At_Offset_1
013c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
013d e013 | | Load 0x0,0x13
013e 012c | , | Execute Any,Size
013f 00d9 | | Load_Top At_Offset_1
0140 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0141 e229 | ) | Load 0x1,0x29
0142 012c | , | Execute Any,Size
0143 00d9 | | Load_Top At_Offset_1
0144 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0145 e014 | | Load 0x0,0x14
0146 012c | , | Execute Any,Size
0147 00d9 | | Load_Top At_Offset_1
0148 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0149 e222 | " | Load 0x1,0x22
014a 012c | , | Execute Any,Size
014b 00d9 | | Load_Top At_Offset_1
014c 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
014d e22d | - | Load 0x1,0x2d
014e 012c | , | Execute Any,Size
014f 00d9 | | Load_Top At_Offset_1
0150 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0151 e234 | 4 | Load 0x1,0x34
0152 012c | , | Execute Any,Size
0153 00d9 | | Load_Top At_Offset_1
0154 380a |8 | Execute Record,Field_Write,Field_Number 0xa
0155 e238 | 8 | Load 0x1,0x38
0156 012c | , | Execute Any,Size
0157 00d9 | | Load_Top At_Offset_1
0158 380b |8 | Execute Record,Field_Write,Field_Number 0xb
0159 4800 |H | Short_Literal 0x0
015a 00d9 | | Load_Top At_Offset_1
015b 380c |8 | Execute Record,Field_Write,Field_Number 0xc
015c e015 | | Load 0x0,0x15
015d 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
015e 02c7 | | Declare_Variable Any
015f 00d8 | | Load_Top At_Offset_0
0160 1c00 | | Execute_Immediate Run_Utility,0x0
0161 e016 | | Load 0x0,0x16
0162 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0163 02c7 | | Declare_Variable Any
0164 00d8 | | Load_Top At_Offset_0
0165 1c00 | | Execute_Immediate Run_Utility,0x0
0166 e011 | | Load 0x0,0x11
0167 0322 | " | Declare_Variable Record
0168 00db | | Load_Top At_Offset_3
0169 00d9 | | Load_Top At_Offset_1
016a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
016b 4800 |H | Short_Literal 0x0
016c 00d9 | | Load_Top At_Offset_1
016d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
016e 4800 |H | Short_Literal 0x0
016f 00d9 | | Load_Top At_Offset_1
0170 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0171 4800 |H | Short_Literal 0x0
0172 00d9 | | Load_Top At_Offset_1
0173 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0174 4800 |H | Short_Literal 0x0
0175 00d9 | | Load_Top At_Offset_1
0176 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0177 4800 |H | Short_Literal 0x0
0178 00d9 | | Load_Top At_Offset_1
0179 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
017a e004 | | Load 0x0,0x4
017b 180e | | Execute Package,Field_Execute,Field_Number 0xe
017c 00d9 | | Load_Top At_Offset_1
017d 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
017e e004 | | Load 0x0,0x4
017f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0180 00d9 | | Load_Top At_Offset_1
0181 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0182 4800 |H | Short_Literal 0x0
0183 00d9 | | Load_Top At_Offset_1
0184 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0185 4800 |H | Short_Literal 0x0
0186 00d9 | | Load_Top At_Offset_1
0187 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0188 e004 | | Load 0x0,0x4
0189 180e | | Execute Package,Field_Execute,Field_Number 0xe
018a 00d9 | | Load_Top At_Offset_1
018b 380a |8 | Execute Record,Field_Write,Field_Number 0xa
018c 4800 |H | Short_Literal 0x0
018d 00d9 | | Load_Top At_Offset_1
018e 380b |8 | Execute Record,Field_Write,Field_Number 0xb
018f 4801 |H | Short_Literal 0x1
0190 00d9 | | Load_Top At_Offset_1
0191 380c |8 | Execute Record,Field_Write,Field_Number 0xc
0192 e226 | & | Load 0x1,0x26
0193 00d9 | | Load_Top At_Offset_1
0194 380d |8 | Execute Record,Field_Write,Field_Number 0xd
0195 e226 | & | Load 0x1,0x26
0196 00d9 | | Load_Top At_Offset_1
0197 380e |8 | Execute Record,Field_Write,Field_Number 0xe
0198 e21b | | Load 0x1,0x1b
0199 00d9 | | Load_Top At_Offset_1
019a 380f |8 | Execute Record,Field_Write,Field_Number 0xf
019b e216 | | Load 0x1,0x16
019c 00d9 | | Load_Top At_Offset_1
019d 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
019e 4800 |H | Short_Literal 0x0
019f 00d9 | | Load_Top At_Offset_1
01a0 3811 |8 | Execute Record,Field_Write,Field_Number 0x11
01a1 00da | | Load_Top At_Offset_2
01a2 e011 | | Load 0x0,0x11
01a3 3012 |0 | Execute Record,Field_Type,Field_Number 0x12
01a4 0119 | | Execute Any,Check_In_Formal_Type
01a5 00d9 | | Load_Top At_Offset_1
01a6 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
01a7 00d9 | | Load_Top At_Offset_1
01a8 e011 | | Load 0x0,0x11
01a9 3013 |0 | Execute Record,Field_Type,Field_Number 0x13
01aa 0119 | | Execute Any,Check_In_Formal_Type
01ab 00d9 | | Load_Top At_Offset_1
01ac 3813 |8 | Execute Record,Field_Write,Field_Number 0x13
01ad e017 | | Load 0x0,0x17
01ae 180e | | Execute Package,Field_Execute,Field_Number 0xe
01af 00d9 | | Load_Top At_Offset_1
01b0 3814 |8 | Execute Record,Field_Write,Field_Number 0x14
01b1 e018 | | Load 0x0,0x18
01b2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b3 00d9 | | Load_Top At_Offset_1
01b4 3815 |8 | Execute Record,Field_Write,Field_Number 0x15
01b5 e019 | | Load 0x0,0x19
01b6 e01a | | Load 0x0,0x1a
01b7 e012 | | Load 0x0,0x12
01b8 e21b | | Load 0x1,0x1b
01b9 e016 | | Load 0x0,0x16
01ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01bb 0387 | | Declare_Variable Package
01bc 00d8 | | Load_Top At_Offset_0
01bd 020f | | Execute Module,Activate
01be e012 | | Load 0x0,0x12
01bf 0322 | " | Declare_Variable Record
01c0 4801 |H | Short_Literal 0x1
01c1 00d9 | | Load_Top At_Offset_1
01c2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01c3 4801 |H | Short_Literal 0x1
01c4 00d9 | | Load_Top At_Offset_1
01c5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01c6 4800 |H | Short_Literal 0x0
01c7 00d9 | | Load_Top At_Offset_1
01c8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01c9 4800 |H | Short_Literal 0x0
01ca 00d9 | | Load_Top At_Offset_1
01cb 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01cc 4801 |H | Short_Literal 0x1
01cd 00d9 | | Load_Top At_Offset_1
01ce 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
01cf 4800 |H | Short_Literal 0x0
01d0 00d9 | | Load_Top At_Offset_1
01d1 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
01d2 4800 |H | Short_Literal 0x0
01d3 00d9 | | Load_Top At_Offset_1
01d4 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
01d5 4800 |H | Short_Literal 0x0
01d6 00d9 | | Load_Top At_Offset_1
01d7 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
01d8 4800 |H | Short_Literal 0x0
01d9 00d9 | | Load_Top At_Offset_1
01da 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
01db 4800 |H | Short_Literal 0x0
01dc 00d9 | | Load_Top At_Offset_1
01dd 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
01de 4800 |H | Short_Literal 0x0
01df 00d9 | | Load_Top At_Offset_1
01e0 380a |8 | Execute Record,Field_Write,Field_Number 0xa
01e1 e004 | | Load 0x0,0x4
01e2 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e3 00d9 | | Load_Top At_Offset_1
01e4 380b |8 | Execute Record,Field_Write,Field_Number 0xb
01e5 e004 | | Load 0x0,0x4
01e6 180e | | Execute Package,Field_Execute,Field_Number 0xe
01e7 00d9 | | Load_Top At_Offset_1
01e8 380c |8 | Execute Record,Field_Write,Field_Number 0xc
01e9 00d8 | | Load_Top At_Offset_0
01ea 340d |4 | Execute Record,Field_Reference,Field_Number 0xd
01eb e01b | | Load 0x0,0x1b
01ec 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ed e01c | | Load 0x0,0x1c
01ee 3002 |0 | Execute Record,Field_Type,Field_Number 0x2
01ef 0119 | | Execute Any,Check_In_Formal_Type
01f0 00d9 | | Load_Top At_Offset_1
01f1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01f2 e01b | | Load 0x0,0x1b
01f3 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01f4 e01c | | Load 0x0,0x1c
01f5 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
01f6 0119 | | Execute Any,Check_In_Formal_Type
01f7 00d9 | | Load_Top At_Offset_1
01f8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01f9 e01b | | Load 0x0,0x1b
01fa 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
01fb 00d9 | | Load_Top At_Offset_1
01fc 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01fd e01b | | Load 0x0,0x1b
01fe 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01ff 00d9 | | Load_Top At_Offset_1
0200 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0201 4800 |H | Short_Literal 0x0
0202 00d0 | | Action Swap_Control
0203 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0204 e01d | | Load 0x0,0x1d
0205 180f | | Execute Package,Field_Execute,Field_Number 0xf
0206 e012 | | Load 0x0,0x12
0207 300e |0 | Execute Record,Field_Type,Field_Number 0xe
0208 0119 | | Execute Any,Check_In_Formal_Type
0209 00d9 | | Load_Top At_Offset_1
020a 380e |8 | Execute Record,Field_Write,Field_Number 0xe
020b e01d | | Load 0x0,0x1d
020c 180f | | Execute Package,Field_Execute,Field_Number 0xf
020d e012 | | Load 0x0,0x12
020e 300f |0 | Execute Record,Field_Type,Field_Number 0xf
020f 0119 | | Execute Any,Check_In_Formal_Type
0210 00d9 | | Load_Top At_Offset_1
0211 380f |8 | Execute Record,Field_Write,Field_Number 0xf
0212 e01d | | Load 0x0,0x1d
0213 180f | | Execute Package,Field_Execute,Field_Number 0xf
0214 e012 | | Load 0x0,0x12
0215 3010 |0 | Execute Record,Field_Type,Field_Number 0x10
0216 0119 | | Execute Any,Check_In_Formal_Type
0217 00d9 | | Load_Top At_Offset_1
0218 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
0219 4800 |H | Short_Literal 0x0
021a 00d9 | | Load_Top At_Offset_1
021b 3811 |8 | Execute Record,Field_Write,Field_Number 0x11
021c e21b | | Load 0x1,0x1b
021d 00d9 | | Load_Top At_Offset_1
021e 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
021f e21b | | Load 0x1,0x1b
0220 00d9 | | Load_Top At_Offset_1
0221 3813 |8 | Execute Record,Field_Write,Field_Number 0x13
0222 e21b | | Load 0x1,0x1b
0223 00d9 | | Load_Top At_Offset_1
0224 3814 |8 | Execute Record,Field_Write,Field_Number 0x14
0225 e21b | | Load 0x1,0x1b
0226 00d9 | | Load_Top At_Offset_1
0227 3815 |8 | Execute Record,Field_Write,Field_Number 0x15
0228 e21b | | Load 0x1,0x1b
0229 00d9 | | Load_Top At_Offset_1
022a 3816 |8 | Execute Record,Field_Write,Field_Number 0x16
022b e231 | 1 | Load 0x1,0x31
022c 00d9 | | Load_Top At_Offset_1
022d 3817 |8 | Execute Record,Field_Write,Field_Number 0x17
022e 4800 |H | Short_Literal 0x0
022f 00d9 | | Load_Top At_Offset_1
0230 3818 |8 | Execute Record,Field_Write,Field_Number 0x18
0231 e22e | . | Load 0x1,0x2e
0232 00d9 | | Load_Top At_Offset_1
0233 3819 |8 | Execute Record,Field_Write,Field_Number 0x19
0234 e002 | | Load 0x0,0x2
0235 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0236 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0237 e012 | | Load 0x0,0x12
0238 301a |0 | Execute Record,Field_Type,Field_Number 0x1a
0239 0119 | | Execute Any,Check_In_Formal_Type
023a 00d9 | | Load_Top At_Offset_1
023b 381a |8 | Execute Record,Field_Write,Field_Number 0x1a
023c e21f | | Load 0x1,0x1f
023d 00d9 | | Load_Top At_Offset_1
023e 381b |8 | Execute Record,Field_Write,Field_Number 0x1b
023f 4800 |H | Short_Literal 0x0
0240 00d9 | | Load_Top At_Offset_1
0241 381c |8 | Execute Record,Field_Write,Field_Number 0x1c
0242 e01e | | Load 0x0,0x1e
0243 e01f | | Load 0x0,0x1f
0244 e013 | | Load 0x0,0x13
0245 e226 | & | Load 0x1,0x26
0246 e016 | | Load 0x0,0x16
0247 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0248 0387 | | Declare_Variable Package
0249 00d8 | | Load_Top At_Offset_0
024a 020f | | Execute Module,Activate
024b e013 | | Load 0x0,0x13
024c 0322 | " | Declare_Variable Record
024d e01b | | Load 0x0,0x1b
024e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
024f e013 | | Load 0x0,0x13
0250 3000 |0 | Execute Record,Field_Type,Field_Number 0x0
0251 0119 | | Execute Any,Check_In_Formal_Type
0252 00d9 | | Load_Top At_Offset_1
0253 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0254 e004 | | Load 0x0,0x4
0255 180e | | Execute Package,Field_Execute,Field_Number 0xe
0256 00d9 | | Load_Top At_Offset_1
0257 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0258 e01b | | Load 0x0,0x1b
0259 1810 | | Execute Package,Field_Execute,Field_Number 0x10
025a e013 | | Load 0x0,0x13
025b 3002 |0 | Execute Record,Field_Type,Field_Number 0x2
025c 0119 | | Execute Any,Check_In_Formal_Type
025d 00d9 | | Load_Top At_Offset_1
025e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
025f e004 | | Load 0x0,0x4
0260 180e | | Execute Package,Field_Execute,Field_Number 0xe
0261 00d9 | | Load_Top At_Offset_1
0262 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0263 e226 | & | Load 0x1,0x26
0264 00d9 | | Load_Top At_Offset_1
0265 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0266 e231 | 1 | Load 0x1,0x31
0267 00d9 | | Load_Top At_Offset_1
0268 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0269 4801 |H | Short_Literal 0x1
026a 00d9 | | Load_Top At_Offset_1
026b 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
026c 4801 |H | Short_Literal 0x1
026d 00d9 | | Load_Top At_Offset_1
026e 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
026f e22a | * | Load 0x1,0x2a
0270 00d9 | | Load_Top At_Offset_1
0271 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0272 e020 | | Load 0x0,0x20
0273 e021 | ! | Load 0x0,0x21
0274 e014 | | Load 0x0,0x14
0275 e231 | 1 | Load 0x1,0x31
0276 e016 | | Load 0x0,0x16
0277 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0278 0387 | | Declare_Variable Package
0279 00d8 | | Load_Top At_Offset_0
027a 020f | | Execute Module,Activate
027b e014 | | Load 0x0,0x14
027c 0322 | " | Declare_Variable Record
027d e226 | & | Load 0x1,0x26
027e 00d9 | | Load_Top At_Offset_1
027f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0280 e004 | | Load 0x0,0x4
0281 180e | | Execute Package,Field_Execute,Field_Number 0xe
0282 00d9 | | Load_Top At_Offset_1
0283 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0284 4800 |H | Short_Literal 0x0
0285 00d9 | | Load_Top At_Offset_1
0286 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0287 e21b | | Load 0x1,0x1b
0288 00d9 | | Load_Top At_Offset_1
0289 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
028a e01b | | Load 0x0,0x1b
028b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
028c e014 | | Load 0x0,0x14
028d 3004 |0 | Execute Record,Field_Type,Field_Number 0x4
028e 0119 | | Execute Any,Check_In_Formal_Type
028f 00d9 | | Load_Top At_Offset_1
0290 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0291 e014 | | Load 0x0,0x14
0292 3005 |0 | Execute Record,Field_Type,Field_Number 0x5
0293 0337 | 7 | Declare_Variable Array
0294 4805 |H | Short_Literal 0x5
0295 4802 |H | Short_Literal 0x2
0296 4800 |H | Short_Literal 0x0
0297 00d9 | | Load_Top At_Offset_1
0298 e252 | R | Load 0x1,0x52
0299 01d6 | | Execute Vector,Field_Write
029a 3ffb |? | Loop_Increasing 0x296
029b e014 | | Load 0x0,0x14
029c 3005 |0 | Execute Record,Field_Type,Field_Number 0x5
029d 0119 | | Execute Any,Check_In_Formal_Type
029e 00d9 | | Load_Top At_Offset_1
029f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
02a0 4800 |H | Short_Literal 0x0
02a1 00d9 | | Load_Top At_Offset_1
02a2 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
02a3 e223 | # | Load 0x1,0x23
02a4 00d9 | | Load_Top At_Offset_1
02a5 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
02a6 e231 | 1 | Load 0x1,0x31
02a7 00d9 | | Load_Top At_Offset_1
02a8 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
02a9 e022 | " | Load 0x0,0x22
02aa e023 | # | Load 0x0,0x23
02ab e215 | | Load 0x1,0x15
02ac e216 | | Load 0x1,0x16
02ad e016 | | Load 0x0,0x16
02ae 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02af 0387 | | Declare_Variable Package
02b0 00d8 | | Load_Top At_Offset_0
02b1 020f | | Execute Module,Activate
02b2 e215 | | Load 0x1,0x15
02b3 0322 | " | Declare_Variable Record
02b4 e216 | | Load 0x1,0x16
02b5 00d9 | | Load_Top At_Offset_1
02b6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02b7 4800 |H | Short_Literal 0x0
02b8 00d9 | | Load_Top At_Offset_1
02b9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02ba e004 | | Load 0x0,0x4
02bb 180e | | Execute Package,Field_Execute,Field_Number 0xe
02bc 00d9 | | Load_Top At_Offset_1
02bd 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02be e004 | | Load 0x0,0x4
02bf 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c0 00d9 | | Load_Top At_Offset_1
02c1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02c2 e004 | | Load 0x0,0x4
02c3 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c4 00d9 | | Load_Top At_Offset_1
02c5 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
02c6 e004 | | Load 0x0,0x4
02c7 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c8 00d9 | | Load_Top At_Offset_1
02c9 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
02ca 4800 |H | Short_Literal 0x0
02cb 00d9 | | Load_Top At_Offset_1
02cc 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
02cd e004 | | Load 0x0,0x4
02ce 180e | | Execute Package,Field_Execute,Field_Number 0xe
02cf 00d9 | | Load_Top At_Offset_1
02d0 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
02d1 4800 |H | Short_Literal 0x0
02d2 00d9 | | Load_Top At_Offset_1
02d3 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
02d4 4800 |H | Short_Literal 0x0
02d5 00d9 | | Load_Top At_Offset_1
02d6 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
02d7 e23d | = | Load 0x1,0x3d
02d8 00d9 | | Load_Top At_Offset_1
02d9 380a |8 | Execute Record,Field_Write,Field_Number 0xa
02da e024 | $ | Load 0x0,0x24
02db e025 | % | Load 0x0,0x25
02dc e21e | | Load 0x1,0x1e
02dd e21f | | Load 0x1,0x1f
02de e016 | | Load 0x0,0x16
02df 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02e0 0387 | | Declare_Variable Package
02e1 00d8 | | Load_Top At_Offset_0
02e2 020f | | Execute Module,Activate
02e3 e21e | | Load 0x1,0x1e
02e4 0322 | " | Declare_Variable Record
02e5 4800 |H | Short_Literal 0x0
02e6 00d9 | | Load_Top At_Offset_1
02e7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02e8 e21f | | Load 0x1,0x1f
02e9 00d9 | | Load_Top At_Offset_1
02ea 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02eb 4800 |H | Short_Literal 0x0
02ec 00d9 | | Load_Top At_Offset_1
02ed 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02ee 4800 |H | Short_Literal 0x0
02ef 00d9 | | Load_Top At_Offset_1
02f0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02f1 4800 |H | Short_Literal 0x0
02f2 00d9 | | Load_Top At_Offset_1
02f3 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
02f4 e23d | = | Load 0x1,0x3d
02f5 00d9 | | Load_Top At_Offset_1
02f6 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
02f7 e004 | | Load 0x0,0x4
02f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
02f9 00d9 | | Load_Top At_Offset_1
02fa 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
02fb 4800 |H | Short_Literal 0x0
02fc 00d9 | | Load_Top At_Offset_1
02fd 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
02fe e004 | | Load 0x0,0x4
02ff 180e | | Execute Package,Field_Execute,Field_Number 0xe
0300 00d9 | | Load_Top At_Offset_1
0301 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0302 e235 | 5 | Load 0x1,0x35
0303 00d9 | | Load_Top At_Offset_1
0304 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0305 e01d | | Load 0x0,0x1d
0306 180f | | Execute Package,Field_Execute,Field_Number 0xf
0307 e21e | | Load 0x1,0x1e
0308 300a |0 | Execute Record,Field_Type,Field_Number 0xa
0309 0119 | | Execute Any,Check_In_Formal_Type
030a 00d9 | | Load_Top At_Offset_1
030b 380a |8 | Execute Record,Field_Write,Field_Number 0xa
030c e01d | | Load 0x0,0x1d
030d 180f | | Execute Package,Field_Execute,Field_Number 0xf
030e e21e | | Load 0x1,0x1e
030f 300b |0 | Execute Record,Field_Type,Field_Number 0xb
0310 0119 | | Execute Any,Check_In_Formal_Type
0311 00d9 | | Load_Top At_Offset_1
0312 380b |8 | Execute Record,Field_Write,Field_Number 0xb
0313 e026 | & | Load 0x0,0x26
0314 e027 | ' | Load 0x0,0x27
0315 e234 | 4 | Load 0x1,0x34
0316 e235 | 5 | Load 0x1,0x35
0317 e016 | | Load 0x0,0x16
0318 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0319 0387 | | Declare_Variable Package
031a 00d8 | | Load_Top At_Offset_0
031b 020f | | Execute Module,Activate
031c e234 | 4 | Load 0x1,0x34
031d 0322 | " | Declare_Variable Record
031e e239 | 9 | Load 0x1,0x39
031f 00d9 | | Load_Top At_Offset_1
0320 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0321 4800 |H | Short_Literal 0x0
0322 00d9 | | Load_Top At_Offset_1
0323 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0324 e028 | ( | Load 0x0,0x28
0325 e029 | ) | Load 0x0,0x29
0326 e238 | 8 | Load 0x1,0x38
0327 e239 | 9 | Load 0x1,0x39
0328 e016 | | Load 0x0,0x16
0329 1b0f | | Execute Package,Field_Read,Field_Number 0xf
032a 0387 | | Declare_Variable Package
032b 00d8 | | Load_Top At_Offset_0
032c 020f | | Execute Module,Activate
032d e238 | 8 | Load 0x1,0x38
032e 0322 | " | Declare_Variable Record
032f 4800 |H | Short_Literal 0x0
0330 00d9 | | Load_Top At_Offset_1
0331 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0332 4800 |H | Short_Literal 0x0
0333 00d9 | | Load_Top At_Offset_1
0334 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0335 e007 | | Load 0x0,0x7
0336 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0337 00d9 | | Load_Top At_Offset_1
0338 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0339 e239 | 9 | Load 0x1,0x39
033a 00d9 | | Load_Top At_Offset_1
033b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
033c e02a | * | Load 0x0,0x2a
033d e02b | + | Load 0x0,0x2b
033e e229 | ) | Load 0x1,0x29
033f e22a | * | Load 0x1,0x2a
0340 e016 | | Load 0x0,0x16
0341 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0342 0387 | | Declare_Variable Package
0343 00d8 | | Load_Top At_Offset_0
0344 020f | | Execute Module,Activate
0345 e229 | ) | Load 0x1,0x29
0346 0322 | " | Declare_Variable Record
0347 4800 |H | Short_Literal 0x0
0348 00d9 | | Load_Top At_Offset_1
0349 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
034a e22a | * | Load 0x1,0x2a
034b 00d9 | | Load_Top At_Offset_1
034c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
034d e01d | | Load 0x0,0x1d
034e 180f | | Execute Package,Field_Execute,Field_Number 0xf
034f e229 | ) | Load 0x1,0x29
0350 3002 |0 | Execute Record,Field_Type,Field_Number 0x2
0351 0119 | | Execute Any,Check_In_Formal_Type
0352 00d9 | | Load_Top At_Offset_1
0353 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0354 e02c | , | Load 0x0,0x2c
0355 e02d | - | Load 0x0,0x2d
0356 e22d | - | Load 0x1,0x2d
0357 e22e | . | Load 0x1,0x2e
0358 e016 | | Load 0x0,0x16
0359 1b0f | | Execute Package,Field_Read,Field_Number 0xf
035a 0387 | | Declare_Variable Package
035b 00d8 | | Load_Top At_Offset_0
035c 020f | | Execute Module,Activate
035d e22d | - | Load 0x1,0x2d
035e 0322 | " | Declare_Variable Record
035f e22e | . | Load 0x1,0x2e
0360 00d9 | | Load_Top At_Offset_1
0361 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0362 e22d | - | Load 0x1,0x2d
0363 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
0364 0337 | 7 | Declare_Variable Array
0365 4805 |H | Short_Literal 0x5
0366 4800 |H | Short_Literal 0x0
0367 4800 |H | Short_Literal 0x0
0368 00d9 | | Load_Top At_Offset_1
0369 e25e | ^ | Load 0x1,0x5e
036a 01d6 | | Execute Vector,Field_Write
036b 3ffb |? | Loop_Increasing 0x367
036c e22d | - | Load 0x1,0x2d
036d 3001 |0 | Execute Record,Field_Type,Field_Number 0x1
036e 0119 | | Execute Any,Check_In_Formal_Type
036f 00d9 | | Load_Top At_Offset_1
0370 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0371 e231 | 1 | Load 0x1,0x31
0372 00d9 | | Load_Top At_Offset_1
0373 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0374 e02e | . | Load 0x0,0x2e
0375 e02f | / | Load 0x0,0x2f
0376 e222 | " | Load 0x1,0x22
0377 e223 | # | Load 0x1,0x23
0378 e016 | | Load 0x0,0x16
0379 1b0f | | Execute Package,Field_Read,Field_Number 0xf
037a 0387 | | Declare_Variable Package
037b 00d8 | | Load_Top At_Offset_0
037c 020f | | Execute Module,Activate
037d e222 | " | Load 0x1,0x22
037e 0322 | " | Declare_Variable Record
037f e223 | # | Load 0x1,0x23
0380 00d9 | | Load_Top At_Offset_1
0381 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0382 e21b | | Load 0x1,0x1b
0383 00d9 | | Load_Top At_Offset_1
0384 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0385 e030 | 0 | Load 0x0,0x30
0386 e031 | 1 | Load 0x0,0x31
0387 e23c | < | Load 0x1,0x3c
0388 e23d | = | Load 0x1,0x3d
0389 e016 | | Load 0x0,0x16
038a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
038b 0387 | | Declare_Variable Package
038c 00d8 | | Load_Top At_Offset_0
038d 020f | | Execute Module,Activate
038e 029d 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call
0390 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0391 00c7 | | Action Elaborate_Subprogram
0392 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0393 00c7 | | Action Elaborate_Subprogram
0394 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0395 00c7 | | Action Elaborate_Subprogram
0396 029d 086b | k| Declare_Subprogram INIT_0868,For_Outer_Call
0398 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0399 00c7 | | Action Elaborate_Subprogram
039a 1d0e | | Execute_Immediate Reference_Lex_1,0xe
039b 00c7 | | Action Elaborate_Subprogram
039c 1d0f | | Execute_Immediate Reference_Lex_1,0xf
039d 00c7 | | Action Elaborate_Subprogram
039e 1d10 | | Execute_Immediate Reference_Lex_1,0x10
039f 00c7 | | Action Elaborate_Subprogram
03a0 1d11 | | Execute_Immediate Reference_Lex_1,0x11
03a1 00c7 | | Action Elaborate_Subprogram
03a2 1d17 | | Execute_Immediate Reference_Lex_1,0x17
03a3 00c7 | | Action Elaborate_Subprogram
03a4 1d18 | | Execute_Immediate Reference_Lex_1,0x18
03a5 00c7 | | Action Elaborate_Subprogram
03a6 e032 | 2 | Load 0x0,0x32
03a7 e033 | 3 | Load 0x0,0x33
03a8 e016 | | Load 0x0,0x16
03a9 e00d | | Load 0x0,0xd
03aa e034 | 4 | Load 0x0,0x34
03ab e035 | 5 | Load 0x0,0x35
03ac e036 | 6 | Load 0x0,0x36
03ad e037 | 7 | Load 0x0,0x37
03ae 00b6 | | Action Make_Scope
03af 4809 |H | Short_Literal 0x9
03b0 e21a | | Load 0x1,0x1a
03b1 020e | | Execute Module,Augment_Imports
03b2 e21a | | Load 0x1,0x1a
03b3 020d | | Execute Module,Elaborate
03b4 0007 | | Action Break_Optional
03b5 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
03b6 00c7 | | Action Elaborate_Subprogram
03b7 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
03b8 00c7 | | Action Elaborate_Subprogram
03b9 1d20 | | Execute_Immediate Reference_Lex_1,0x20
03ba 00c7 | | Action Elaborate_Subprogram
03bb 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
03bc 00c7 | | Action Elaborate_Subprogram
03bd 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
03be 00c7 | | Action Elaborate_Subprogram
03bf 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
03c0 00c7 | | Action Elaborate_Subprogram
03c1 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
03c2 00c7 | | Action Elaborate_Subprogram
03c3 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
03c4 00c7 | | Action Elaborate_Subprogram
03c5 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
03c6 00c7 | | Action Elaborate_Subprogram
03c7 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
03c8 00c7 | | Action Elaborate_Subprogram
03c9 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
03ca 00c7 | | Action Elaborate_Subprogram
03cb 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
03cc 00c7 | | Action Elaborate_Subprogram
03cd 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
03ce 00c7 | | Action Elaborate_Subprogram
03cf 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
03d0 00c7 | | Action Elaborate_Subprogram
03d1 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
03d2 00c7 | | Action Elaborate_Subprogram
03d3 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
03d4 00c7 | | Action Elaborate_Subprogram
03d5 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
03d6 00c7 | | Action Elaborate_Subprogram
03d7 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
03d8 00c7 | | Action Elaborate_Subprogram
03d9 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e
03da 00c7 | | Action Elaborate_Subprogram
03db 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f
03dc 00c7 | | Action Elaborate_Subprogram
03dd 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
03de 00c7 | | Action Elaborate_Subprogram
03df 1d41 | A | Execute_Immediate Reference_Lex_1,0x41
03e0 00c7 | | Action Elaborate_Subprogram
03e1 BODY_0008:
03e1 00bc | | Action Signal_Activated
03e2 00bb | | Action Signal_Completion
03e3 0000 0000 | | .BLANK 0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03f5 | | .CONST 0x03f5 ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0005 | | .CONST 0x0005 ; Number of locals
03eb INIT_03e8:
03eb e002 | | Load 0x0,0x2
03ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ee e001 | | Load 0x0,0x1
03ef 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
03f0 e002 | | Load 0x0,0x2
03f1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03f2 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03f3 e243 | C | Load 0x1,0x43
03f4 0007 | | Action Break_Optional
03f5 BODY_03e8:
03f5 e5fb | | Load 0x2,-0x5
03f6 e002 | | Load 0x0,0x2
03f7 1b16 | | Execute Package,Field_Read,Field_Number 0x16
03f8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03f9 e5ff | | Load 0x2,-0x1
03fa 8214 | | Call 0x1,0x14
03fb 005b | [ | Store_Top Discrete,At_Offset_3
03fc c5fb | | Store 0x2,-0x5
03fd 4800 |H | Short_Literal 0x0
03fe e5fb | | Load 0x2,-0x5
03ff e038 | 8 | Load 0x0,0x38
0400 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0401 685d |h] | Jump_Zero 0x45f
0402 e5fb | | Load 0x2,-0x5
0403 e5fc | | Load 0x2,-0x4
0404 e5fe | | Load 0x2,-0x2
0405 e5ff | | Load 0x2,-0x1
0406 e404 | | Load 0x2,0x4
0407 8261 | a | Call 0x1,0x61
0408 4802 |H | Short_Literal 0x2
0409 8262 | b | Call 0x1,0x62
040a c5fc | | Store 0x2,-0x4
040b c5fb | | Store 0x2,-0x5
040c 4800 |H | Short_Literal 0x0
040d e5fb | | Load 0x2,-0x5
040e e038 | 8 | Load 0x0,0x38
040f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0410 684e |hN | Jump_Zero 0x45f
0411 4800 |H | Short_Literal 0x0
0412 e00a | | Load 0x0,0xa
0413 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0414 e5fc | | Load 0x2,-0x4
0415 e246 | F | Load 0x1,0x46
0416 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0417 e00a | | Load 0x0,0xa
0418 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0419 e5fc | | Load 0x2,-0x4
041a e244 | D | Load 0x1,0x44
041b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
041c e245 | E | Load 0x1,0x45
041d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
041e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
041f e00a | | Load 0x0,0xa
0420 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0421 e5fc | | Load 0x2,-0x4
0422 e244 | D | Load 0x1,0x44
0423 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0424 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0425 00d8 | | Load_Top At_Offset_0
0426 e245 | E | Load 0x1,0x45
0427 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0428 00db | | Load_Top At_Offset_3
0429 e00d | | Load 0x0,0xd
042a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
042b 4800 |H | Short_Literal 0x0
042c e00a | | Load 0x0,0xa
042d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
042e e5fc | | Load 0x2,-0x4
042f e246 | F | Load 0x1,0x46
0430 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0431 e24b | K | Load 0x1,0x4b
0432 e002 | | Load 0x0,0x2
0433 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0434 e403 | | Load 0x2,0x3
0435 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0436 a402 | | Store_Unchecked 0x2,0x2
0437 00db | | Load_Top At_Offset_3
0438 e039 | 9 | Load 0x0,0x39
0439 1812 | | Execute Package,Field_Execute,Field_Number 0x12
043a a247 | G | Store_Unchecked 0x1,0x47
043b e247 | G | Load 0x1,0x47
043c e00a | | Load 0x0,0xa
043d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
043e e5fc | | Load 0x2,-0x4
043f e246 | F | Load 0x1,0x46
0440 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0441 00d9 | | Load_Top At_Offset_1
0442 e402 | | Load 0x2,0x2
0443 0217 | | Execute Heap_Access,All_Reference
0444 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0445 601a |` | Indirect_Literal Discrete,0x460,{0x00000000, 0x00014000}
0446 6019 |` | Indirect_Literal Discrete,0x460,{0x00000000, 0x00014000}
0447 4800 |H | Short_Literal 0x0
0448 e403 | | Load 0x2,0x3
0449 e016 | | Load 0x0,0x16
044a 180e | | Execute Package,Field_Execute,Field_Number 0xe
044b e402 | | Load 0x2,0x2
044c 0217 | | Execute Heap_Access,All_Reference
044d 3813 |8 | Execute Record,Field_Write,Field_Number 0x13
044e 487f |H | Short_Literal 0x7f
044f 00db | | Load_Top At_Offset_3
0450 e015 | | Load 0x0,0x15
0451 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0452 e015 | | Load 0x0,0x15
0453 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0454 e402 | | Load 0x2,0x2
0455 0217 | | Execute Heap_Access,All_Reference
0456 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
0457 00db | | Load_Top At_Offset_3
0458 e017 | | Load 0x0,0x17
0459 1812 | | Execute Package,Field_Execute,Field_Number 0x12
045a 00db | | Load_Top At_Offset_3
045b e018 | | Load 0x0,0x18
045c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
045d 00db | | Load_Top At_Offset_3
045e a5fd | | Store_Unchecked 0x2,-0x3
045f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0460 0000 0000 | | .LITERAL {0x00000000, 0x00014000}
0464 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 0481 | | .CONST 0x0481 ; Address of begin
0469 0004 | | .CONST 0x0004 ; Address of exception handler
046a 0006 | | .CONST 0x0006 ; Number of locals
046b INIT_0468:
046b e002 | | Load 0x0,0x2
046c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
046d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
046e e03a | : | Load 0x0,0x3a
046f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0470 02c7 | | Declare_Variable Any
0471 00d8 | | Load_Top At_Offset_0
0472 1c00 | | Execute_Immediate Run_Utility,0x0
0473 e01b | | Load 0x0,0x1b
0474 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0475 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0476 02c7 | | Declare_Variable Any
0477 00d8 | | Load_Top At_Offset_0
0478 1c00 | | Execute_Immediate Run_Utility,0x0
0479 e01b | | Load 0x0,0x1b
047a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
047b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
047c 02c7 | | Declare_Variable Any
047d 00d8 | | Load_Top At_Offset_0
047e 1c00 | | Execute_Immediate Run_Utility,0x0
047f e01b | | Load 0x0,0x1b
0480 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0481 BODY_0468:
0481 e5fd | | Load 0x2,-0x3
0482 e002 | | Load 0x0,0x2
0483 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0484 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0485 e5ff | | Load 0x2,-0x1
0486 8214 | | Call 0x1,0x14
0487 c402 | | Store 0x2,0x2
0488 c5fd | | Store 0x2,-0x3
0489 4800 |H | Short_Literal 0x0
048a e5fd | | Load 0x2,-0x3
048b e038 | 8 | Load 0x0,0x38
048c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
048d 6859 |hY | Jump_Zero 0x4e7
048e 0092 0a3d | =| Action Push_String_Extended,0xa3d ; "Destroying state file "
0490 e5fe | | Load 0x2,-0x2
0491 e5ff | | Load 0x2,-0x1
0492 e402 | | Load 0x2,0x2
0493 8261 | a | Call 0x1,0x61
0494 01cc | | Execute Vector,Catenate
0495 0092 0a3e | >| Action Push_String_Extended,0xa3e ; "."
0497 01cc | | Execute Vector,Catenate
0498 803b | ; | Call 0x0,0x3b
0499 e01b | | Load 0x0,0x1b
049a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049b 00da | | Load_Top At_Offset_2
049c 0120 | | Execute Any,Is_Value
049d 6802 |h | Jump_Zero 0x4a0
049e 00f1 | | Load_Encached Diana_Temp_Seq
049f 7801 |x | Jump 0x4a1
04a0 00da | | Load_Top At_Offset_2
04a1 e404 | | Load 0x2,0x4
04a2 0120 | | Execute Any,Is_Value
04a3 6804 |h | Jump_Zero 0x4a8
04a4 e01b | | Load 0x0,0x1b
04a5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
04a6 1b17 | | Execute Package,Field_Read,Field_Number 0x17
04a7 7801 |x | Jump 0x4a9
04a8 e404 | | Load 0x2,0x4
04a9 e403 | | Load 0x2,0x3
04aa 0120 | | Execute Any,Is_Value
04ab 6803 |h | Jump_Zero 0x4af
04ac e03a | : | Load 0x0,0x3a
04ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ae 7801 |x | Jump 0x4b0
04af e403 | | Load 0x2,0x3
04b0 603b |`; | Indirect_Literal Discrete,0x4ec,{0x00000000, 0x00004000}
04b1 e03c | < | Load 0x0,0x3c
04b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04b3 4800 |H | Short_Literal 0x0
04b4 e01b | | Load 0x0,0x1b
04b5 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
04b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04b7 e01b | | Load 0x0,0x1b
04b8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04b9 4800 |H | Short_Literal 0x0
04ba e03d | = | Load 0x0,0x3d
04bb 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04bc e01b | | Load 0x0,0x1b
04bd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04be 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04bf e5fe | | Load 0x2,-0x2
04c0 e5ff | | Load 0x2,-0x1
04c1 e402 | | Load 0x2,0x2
04c2 8261 | a | Call 0x1,0x61
04c3 e01b | | Load 0x0,0x1b
04c4 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
04c5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04c6 c403 | | Store 0x2,0x3
04c7 c404 | | Store 0x2,0x4
04c8 c405 | | Store 0x2,0x5
04c9 0059 | Y | Store_Top Discrete,At_Offset_1
04ca 00d8 | | Load_Top At_Offset_0
04cb 681b |h | Jump_Zero 0x4e7
04cc e038 | 8 | Load 0x0,0x38
04cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ce 4801 |H | Short_Literal 0x1
04cf 4802 |H | Short_Literal 0x2
04d0 e007 | | Load 0x0,0x7
04d1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04d2 035b | [ | Declare_Type Array,Constrained
04d3 0337 | 7 | Declare_Variable Array
04d4 e5fe | | Load 0x2,-0x2
04d5 e5ff | | Load 0x2,-0x1
04d6 e402 | | Load 0x2,0x2
04d7 8261 | a | Call 0x1,0x61
04d8 e007 | | Load 0x0,0x7
04d9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04da 4801 |H | Short_Literal 0x1
04db 00da | | Load_Top At_Offset_2
04dc 01d6 | | Execute Vector,Field_Write
04dd 00da | | Load_Top At_Offset_2
04de e007 | | Load 0x0,0x7
04df 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
04e0 4802 |H | Short_Literal 0x2
04e1 00da | | Load_Top At_Offset_2
04e2 01d6 | | Execute Vector,Field_Write
04e3 6004 |` | Indirect_Literal Discrete,0x4e8,{0x00000000, 0x00005006}
04e4 e038 | 8 | Load 0x0,0x38
04e5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
04e6 c5fd | | Store 0x2,-0x3
04e7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04e8 0000 0000 | | .LITERAL {0x00000000, 0x00005006}
04ec 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f8 | | .CONST 0x04f8 ; Address of begin
04f1 0583 | | .CONST 0x0583 ; Address of exception handler
04f2 0003 | | .CONST 0x0003 ; Number of locals
04f3 INIT_04f0:
04f3 e002 | | Load 0x0,0x2
04f4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
04f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f6 e01b | | Load 0x0,0x1b
04f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f8 BODY_04f0:
04f8 e00a | | Load 0x0,0xa
04f9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
04fa e5fc | | Load 0x2,-0x4
04fb 4800 |H | Short_Literal 0x0
04fc 67ef |g | Indirect_Literal Discrete,0x4ec,{0x00000000, 0x00004000}
04fd e03c | < | Load 0x0,0x3c
04fe 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04ff e03d | = | Load 0x0,0x3d
0500 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0501 e01b | | Load 0x0,0x1b
0502 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0503 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0504 4800 |H | Short_Literal 0x0
0505 e5fe | | Load 0x2,-0x2
0506 e5ff | | Load 0x2,-0x1
0507 e00a | | Load 0x0,0xa
0508 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0509 c5fc | | Store 0x2,-0x4
050a 0059 | Y | Store_Top Discrete,At_Offset_1
050b 00d8 | | Load_Top At_Offset_0
050c 6819 |h | Jump_Zero 0x526
050d e038 | 8 | Load 0x0,0x38
050e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050f 4801 |H | Short_Literal 0x1
0510 4802 |H | Short_Literal 0x2
0511 e007 | | Load 0x0,0x7
0512 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0513 035b | [ | Declare_Type Array,Constrained
0514 0337 | 7 | Declare_Variable Array
0515 e5fe | | Load 0x2,-0x2
0516 e007 | | Load 0x0,0x7
0517 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0518 4801 |H | Short_Literal 0x1
0519 00da | | Load_Top At_Offset_2
051a 01d6 | | Execute Vector,Field_Write
051b 00da | | Load_Top At_Offset_2
051c e007 | | Load 0x0,0x7
051d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
051e 4802 |H | Short_Literal 0x2
051f 00da | | Load_Top At_Offset_2
0520 01d6 | | Execute Vector,Field_Write
0521 608e |` | Indirect_Literal Discrete,0x5b0,{0x00000000, 0x00005001}
0522 e038 | 8 | Load 0x0,0x38
0523 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0524 c5fb | | Store 0x2,-0x5
0525 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0526 0092 0a3f | ?| Action Push_String_Extended,0xa3f ; "Opened state file \x22"
0528 e5fe | | Load 0x2,-0x2
0529 01cc | | Execute Vector,Catenate
052a 0092 0a40 | @| Action Push_String_Extended,0xa40 ; "\x22 in "
052c 01cc | | Execute Vector,Catenate
052d e5ff | | Load 0x2,-0x1
052e e00a | | Load 0x0,0xa
052f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0530 011c | | Execute Any,Convert_Unchecked
0531 1c01 | | Execute_Immediate Run_Utility,0x1
0532 01cc | | Execute Vector,Catenate
0533 0092 0a41 | A| Action Push_String_Extended,0xa41 ; " Mode."
0535 01cc | | Execute Vector,Catenate
0536 803b | ; | Call 0x0,0x3b
0537 e00a | | Load 0x0,0xa
0538 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0539 e5fc | | Load 0x2,-0x4
053a e246 | F | Load 0x1,0x46
053b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
053c a247 | G | Store_Unchecked 0x1,0x47
053d e247 | G | Load 0x1,0x47
053e e00a | | Load 0x0,0xa
053f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0540 e5fc | | Load 0x2,-0x4
0541 e244 | D | Load 0x1,0x44
0542 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0543 e245 | E | Load 0x1,0x45
0544 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0545 e03e | > | Load 0x0,0x3e
0546 e03f | ? | Load 0x0,0x3f
0547 a040 | @ | Store_Unchecked 0x0,0x40
0548 e00d | | Load 0x0,0xd
0549 1819 | | Execute Package,Field_Execute,Field_Number 0x19
054a 0032 | 2 | Store_Top Heap_Access,At_Offset_2
054b 00d9 | | Load_Top At_Offset_1
054c 0217 | | Execute Heap_Access,All_Reference
054d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
054e e248 | H | Load 0x1,0x48
054f 017e | ~ | Execute Record,Not_Equal
0550 6813 |h | Jump_Zero 0x564
0551 e038 | 8 | Load 0x0,0x38
0552 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0553 4801 |H | Short_Literal 0x1
0554 4801 |H | Short_Literal 0x1
0555 e007 | | Load 0x0,0x7
0556 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0557 035b | [ | Declare_Type Array,Constrained
0558 0337 | 7 | Declare_Variable Array
0559 e5fe | | Load 0x2,-0x2
055a e007 | | Load 0x0,0x7
055b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
055c 4801 |H | Short_Literal 0x1
055d 00da | | Load_Top At_Offset_2
055e 01d6 | | Execute Vector,Field_Write
055f 604c |`L | Indirect_Literal Discrete,0x5ac,{0x00000000, 0x00005013}
0560 e038 | 8 | Load 0x0,0x38
0561 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0562 c5fb | | Store 0x2,-0x5
0563 781c |x | Jump 0x580
0564 00d9 | | Load_Top At_Offset_1
0565 0217 | | Execute Heap_Access,All_Reference
0566 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0567 00da | | Load_Top At_Offset_2
0568 0217 | | Execute Heap_Access,All_Reference
0569 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
056a e003 | | Load 0x0,0x3
056b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
056c 027c | | | Execute Discrete,Less
056d 6812 |h | Jump_Zero 0x580
056e e038 | 8 | Load 0x0,0x38
056f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0570 4801 |H | Short_Literal 0x1
0571 4801 |H | Short_Literal 0x1
0572 e007 | | Load 0x0,0x7
0573 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0574 035b | [ | Declare_Type Array,Constrained
0575 0337 | 7 | Declare_Variable Array
0576 e5fe | | Load 0x2,-0x2
0577 e007 | | Load 0x0,0x7
0578 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0579 4801 |H | Short_Literal 0x1
057a 00da | | Load_Top At_Offset_2
057b 01d6 | | Execute Vector,Field_Write
057c 602b |`+ | Indirect_Literal Discrete,0x5a8,{0x00000000, 0x00005014}
057d e038 | 8 | Load 0x0,0x38
057e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
057f c5fb | | Store 0x2,-0x5
0580 00d9 | | Load_Top At_Offset_1
0581 a5fd | | Store_Unchecked 0x2,-0x3
0582 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0583 TRAP_04f0:
0583 e038 | 8 | Load 0x0,0x38
0584 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0585 010f | | Execute Exception,Equal
0586 7008 |p | Jump_Nonzero 0x58f
0587 e038 | 8 | Load 0x0,0x38
0588 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0589 010f | | Execute Exception,Equal
058a 7004 |p | Jump_Nonzero 0x58f
058b e038 | 8 | Load 0x0,0x38
058c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
058d 010f | | Execute Exception,Equal
058e 6802 |h | Jump_Zero 0x591
058f 00d8 | | Load_Top At_Offset_0
0590 0101 | | Execute Exception,Reraise
0591 e038 | 8 | Load 0x0,0x38
0592 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0593 4801 |H | Short_Literal 0x1
0594 4801 |H | Short_Literal 0x1
0595 e007 | | Load 0x0,0x7
0596 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0597 035b | [ | Declare_Type Array,Constrained
0598 0337 | 7 | Declare_Variable Array
0599 e5fe | | Load 0x2,-0x2
059a e007 | | Load 0x0,0x7
059b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
059c 4801 |H | Short_Literal 0x1
059d 00da | | Load_Top At_Offset_2
059e 01d6 | | Execute Vector,Field_Write
059f 6004 |` | Indirect_Literal Discrete,0x5a4,{0x00000000, 0x0000500d}
05a0 e038 | 8 | Load 0x0,0x38
05a1 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
05a2 c5fb | | Store 0x2,-0x5
05a3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05a4 0000 0000 | | .LITERAL {0x00000000, 0x0000500d}
05a8 0000 0000 | | .LITERAL {0x00000000, 0x00005014}
05ac 0000 0000 | | .LITERAL {0x00000000, 0x00005013}
05b0 0000 0000 | | .LITERAL {0x00000000, 0x00005001}
05b4 0000 0000 | | .BLANK 0000[0x4]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05be | | .CONST 0x05be ; Address of begin
05b9 0004 | | .CONST 0x0004 ; Address of exception handler
05ba 0002 | | .CONST 0x0002 ; Number of locals
05bb INIT_05b8:
05bb e002 | | Load 0x0,0x2
05bc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05bd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05be BODY_05b8:
05be e5fa | | Load 0x2,-0x6
05bf e002 | | Load 0x0,0x2
05c0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05c1 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05c2 e5fe | | Load 0x2,-0x2
05c3 8214 | | Call 0x1,0x14
05c4 005a | Z | Store_Top Discrete,At_Offset_2
05c5 c5fa | | Store 0x2,-0x6
05c6 4800 |H | Short_Literal 0x0
05c7 e5fa | | Load 0x2,-0x6
05c8 e038 | 8 | Load 0x0,0x38
05c9 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
05ca 680e |h | Jump_Zero 0x5d9
05cb e5fa | | Load 0x2,-0x6
05cc e5fb | | Load 0x2,-0x5
05cd e002 | | Load 0x0,0x2
05ce 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d0 e5fd | | Load 0x2,-0x3
05d1 e5fe | | Load 0x2,-0x2
05d2 e402 | | Load 0x2,0x2
05d3 8261 | a | Call 0x1,0x61
05d4 e5ff | | Load 0x2,-0x1
05d5 820f | | Call 0x1,0xf
05d6 c5fc | | Store 0x2,-0x4
05d7 c5fb | | Store 0x2,-0x5
05d8 c5fa | | Store 0x2,-0x6
05d9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05da 0000 0000 | | .BLANK 0000[0x6]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e6 | | .CONST 0x05e6 ; Address of begin
05e1 05f9 | | .CONST 0x05f9 ; Address of exception handler
05e2 0002 | | .CONST 0x0002 ; Number of locals
05e3 INIT_05e0:
05e3 e002 | | Load 0x0,0x2
05e4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05e5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05e6 BODY_05e0:
05e6 00db | | Load_Top At_Offset_3
05e7 7003 |p | Jump_Nonzero 0x5eb
05e8 6023 |`# | Indirect_Literal Discrete,0x60c,{0x00000000, 0x0000500e}
05e9 a5fd | | Store_Unchecked 0x2,-0x3
05ea 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05eb e5fe | | Load 0x2,-0x2
05ec 7005 |p | Jump_Nonzero 0x5f2
05ed 00db | | Load_Top At_Offset_3
05ee 0217 | | Execute Heap_Access,All_Reference
05ef 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05f0 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
05f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05f2 00db | | Load_Top At_Offset_3
05f3 0217 | | Execute Heap_Access,All_Reference
05f4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05f5 e5ff | | Load 0x2,-0x1
05f6 0217 | | Execute Heap_Access,All_Reference
05f7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
05f8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05f9 TRAP_05e0:
05f9 4885 |H | Short_Literal 0x85
05fa 010f | | Execute Exception,Equal
05fb 6803 |h | Jump_Zero 0x5ff
05fc 600b |` | Indirect_Literal Discrete,0x608,{0x00000000, 0x00005010}
05fd a5fd | | Store_Unchecked 0x2,-0x3
05fe 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05ff 6004 |` | Indirect_Literal Discrete,0x604,{0x00000000, 0x00005008}
0600 a5fd | | Store_Unchecked 0x2,-0x3
0601 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0602 0000 0000 | | .XXX[0x2]
0604 0000 0000 | | .LITERAL {0x00000000, 0x00005008}
0608 0000 0000 | | .LITERAL {0x00000000, 0x00005010}
060c 0000 0000 | | .LITERAL {0x00000000, 0x0000500e}
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0613 | | .CONST 0x0613 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0001 | | .CONST 0x0001 ; Number of locals
0613 BODY_0610:
0613 INIT_0610:
0613 00da | | Load_Top At_Offset_2
0614 0217 | | Execute Heap_Access,All_Reference
0615 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0616 00db | | Load_Top At_Offset_3
0617 0217 | | Execute Heap_Access,All_Reference
0618 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
0619 0217 | | Execute Heap_Access,All_Reference
061a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
061b e5ff | | Load 0x2,-0x1
061c 0217 | | Execute Heap_Access,All_Reference
061d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
061e 8261 | a | Call 0x1,0x61
061f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0631 | 1 | .CONST 0x0631 ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0005 | | .CONST 0x0005 ; Number of locals
0623 INIT_0620:
0623 e038 | 8 | Load 0x0,0x38
0624 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0625 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0626 e002 | | Load 0x0,0x2
0627 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0628 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0629 e01b | | Load 0x0,0x1b
062a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
062b 02c7 | | Declare_Variable Any
062c 00d8 | | Load_Top At_Offset_0
062d 1c00 | | Execute_Immediate Run_Utility,0x0
062e e01b | | Load 0x0,0x1b
062f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0630 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0631 BODY_0620:
0631 00db | | Load_Top At_Offset_3
0632 e002 | | Load 0x0,0x2
0633 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0634 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0635 e5ff | | Load 0x2,-0x1
0636 8214 | | Call 0x1,0x14
0637 c403 | | Store 0x2,0x3
0638 c402 | | Store 0x2,0x2
0639 4800 |H | Short_Literal 0x0
063a e402 | | Load 0x2,0x2
063b e038 | 8 | Load 0x0,0x38
063c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
063d 681e |h | Jump_Zero 0x65c
063e e01b | | Load 0x0,0x1b
063f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0640 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0641 00da | | Load_Top At_Offset_2
0642 0120 | | Execute Any,Is_Value
0643 6803 |h | Jump_Zero 0x647
0644 e01b | | Load 0x0,0x1b
0645 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0646 7801 |x | Jump 0x648
0647 00da | | Load_Top At_Offset_2
0648 6017 |` | Indirect_Literal Discrete,0x660,{0x00000000, 0x00004000}
0649 e03c | < | Load 0x0,0x3c
064a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
064b e03d | = | Load 0x0,0x3d
064c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
064d e01b | | Load 0x0,0x1b
064e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
064f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0650 e5fe | | Load 0x2,-0x2
0651 e5ff | | Load 0x2,-0x1
0652 e403 | | Load 0x2,0x3
0653 8261 | a | Call 0x1,0x61
0654 e01b | | Load 0x0,0x1b
0655 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0656 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0657 c404 | | Store 0x2,0x4
0658 0059 | Y | Store_Top Discrete,At_Offset_1
0659 00d8 | | Load_Top At_Offset_0
065a 0f00 | | Execute_Immediate Equal,0x0
065b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
065c 4800 |H | Short_Literal 0x0
065d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
065e 0000 0000 | | .XXX[0x2]
0660 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0664 0000 0000 | | .BLANK 0000[0x4]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 0678 | x | .CONST 0x0678 ; Address of begin
0669 0004 | | .CONST 0x0004 ; Address of exception handler
066a 0003 | | .CONST 0x0003 ; Number of locals
066b INIT_0668:
066b e01b | | Load 0x0,0x1b
066c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
066d 02c7 | | Declare_Variable Any
066e 00db | | Load_Top At_Offset_3
066f e01b | | Load 0x0,0x1b
0670 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0671 a402 | | Store_Unchecked 0x2,0x2
0672 00db | | Load_Top At_Offset_3
0673 e01b | | Load 0x0,0x1b
0674 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0675 e01b | | Load 0x0,0x1b
0676 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0677 03f1 | | Declare_Variable Discrete,With_Value
0678 BODY_0668:
0678 00d9 | | Load_Top At_Offset_1
0679 e01b | | Load 0x0,0x1b
067a 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
067b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
067c 012f | / | Execute Any,Equal
067d 6839 |h9 | Jump_Zero 0x6b7
067e 00d8 | | Load_Top At_Offset_0
067f e041 | A | Load 0x0,0x41
0680 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0681 027f | | Execute Discrete,Equal
0682 6803 |h | Jump_Zero 0x686
0683 4802 |H | Short_Literal 0x2
0684 a5fe | | Store_Unchecked 0x2,-0x2
0685 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0686 00d8 | | Load_Top At_Offset_0
0687 e041 | A | Load 0x0,0x41
0688 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0689 027f | | Execute Discrete,Equal
068a 6803 |h | Jump_Zero 0x68e
068b 4801 |H | Short_Literal 0x1
068c a5fe | | Store_Unchecked 0x2,-0x2
068d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
068e 00d8 | | Load_Top At_Offset_0
068f e041 | A | Load 0x0,0x41
0690 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0691 027f | | Execute Discrete,Equal
0692 6803 |h | Jump_Zero 0x696
0693 4803 |H | Short_Literal 0x3
0694 a5fe | | Store_Unchecked 0x2,-0x2
0695 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0696 4800 |H | Short_Literal 0x0
0697 a5fe | | Store_Unchecked 0x2,-0x2
0698 e038 | 8 | Load 0x0,0x38
0699 1b0d | | Execute Package,Field_Read,Field_Number 0xd
069a 4801 |H | Short_Literal 0x1
069b 4803 |H | Short_Literal 0x3
069c e007 | | Load 0x0,0x7
069d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
069e 035b | [ | Declare_Type Array,Constrained
069f 0337 | 7 | Declare_Variable Array
06a0 e5ff | | Load 0x2,-0x1
06a1 e007 | | Load 0x0,0x7
06a2 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06a3 4801 |H | Short_Literal 0x1
06a4 00da | | Load_Top At_Offset_2
06a5 01d6 | | Execute Vector,Field_Write
06a6 00db | | Load_Top At_Offset_3
06a7 e007 | | Load 0x0,0x7
06a8 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06a9 4802 |H | Short_Literal 0x2
06aa 00da | | Load_Top At_Offset_2
06ab 01d6 | | Execute Vector,Field_Write
06ac 00da | | Load_Top At_Offset_2
06ad e007 | | Load 0x0,0x7
06ae 1820 | | Execute Package,Field_Execute,Field_Number 0x20
06af 4803 |H | Short_Literal 0x3
06b0 00da | | Load_Top At_Offset_2
06b1 01d6 | | Execute Vector,Field_Write
06b2 6029 |`) | Indirect_Literal Discrete,0x6dc,{0x00000000, 0x00002805}
06b3 e038 | 8 | Load 0x0,0x38
06b4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
06b5 c5fd | | Store 0x2,-0x3
06b6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06b7 4800 |H | Short_Literal 0x0
06b8 a5fe | | Store_Unchecked 0x2,-0x2
06b9 e038 | 8 | Load 0x0,0x38
06ba 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06bb 4801 |H | Short_Literal 0x1
06bc 4803 |H | Short_Literal 0x3
06bd e007 | | Load 0x0,0x7
06be 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06bf 035b | [ | Declare_Type Array,Constrained
06c0 0337 | 7 | Declare_Variable Array
06c1 e5ff | | Load 0x2,-0x1
06c2 e007 | | Load 0x0,0x7
06c3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06c4 4801 |H | Short_Literal 0x1
06c5 00da | | Load_Top At_Offset_2
06c6 01d6 | | Execute Vector,Field_Write
06c7 00db | | Load_Top At_Offset_3
06c8 e007 | | Load 0x0,0x7
06c9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06ca 4802 |H | Short_Literal 0x2
06cb 00da | | Load_Top At_Offset_2
06cc 01d6 | | Execute Vector,Field_Write
06cd 00da | | Load_Top At_Offset_2
06ce e007 | | Load 0x0,0x7
06cf 1820 | | Execute Package,Field_Execute,Field_Number 0x20
06d0 4803 |H | Short_Literal 0x3
06d1 00da | | Load_Top At_Offset_2
06d2 01d6 | | Execute Vector,Field_Write
06d3 6004 |` | Indirect_Literal Discrete,0x6d8,{0x00000000, 0x00002804}
06d4 e038 | 8 | Load 0x0,0x38
06d5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
06d6 c5fd | | Store 0x2,-0x3
06d7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06d8 0000 0000 | | .LITERAL {0x00000000, 0x00002804}
06dc 0000 0000 | | .LITERAL {0x00000000, 0x00002805}
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e3 | | .CONST 0x06e3 ; Address of begin
06e1 0004 | | .CONST 0x0004 ; Address of exception handler
06e2 0001 | | .CONST 0x0001 ; Number of locals
06e3 BODY_06e0:
06e3 INIT_06e0:
06e3 00da | | Load_Top At_Offset_2
06e4 0217 | | Execute Heap_Access,All_Reference
06e5 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
06e6 e253 | S | Load 0x1,0x53
06e7 e252 | R | Load 0x1,0x52
06e8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06ea 0000 0000 | | .BLANK 0000[0x6]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3 | | .CONST 0x06f3 ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0001 | | .CONST 0x0001 ; Number of locals
06f3 BODY_06f0:
06f3 INIT_06f0:
06f3 00da | | Load_Top At_Offset_2
06f4 e252 | R | Load 0x1,0x52
06f5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06f6 0033 | 3 | Store_Top Heap_Access,At_Offset_3
06f7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb | | .CONST 0x06fb ; Address of begin
06f9 0004 | | .CONST 0x0004 ; Address of exception handler
06fa 0001 | | .CONST 0x0001 ; Number of locals
06fb BODY_06f8:
06fb INIT_06f8:
06fb 00da | | Load_Top At_Offset_2
06fc 0217 | | Execute Heap_Access,All_Reference
06fd 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
06fe e24d | M | Load 0x1,0x4d
06ff e24c | L | Load 0x1,0x4c
0700 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0701 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0702 0000 0000 | | .BLANK 0000[0x6]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b | | .CONST 0x070b ; Address of begin
0709 0004 | | .CONST 0x0004 ; Address of exception handler
070a 0001 | | .CONST 0x0001 ; Number of locals
070b BODY_0708:
070b INIT_0708:
070b 00da | | Load_Top At_Offset_2
070c e24c | L | Load 0x1,0x4c
070d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
070e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
070f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713 | | .CONST 0x0713 ; Address of begin
0711 0004 | | .CONST 0x0004 ; Address of exception handler
0712 0001 | | .CONST 0x0001 ; Number of locals
0713 BODY_0710:
0713 INIT_0710:
0713 00da | | Load_Top At_Offset_2
0714 e002 | | Load 0x0,0x2
0715 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0716 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0717 0217 | | Execute Heap_Access,All_Reference
0718 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
0719 e255 | U | Load 0x1,0x55
071a e254 | T | Load 0x1,0x54
071b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
071c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
071d 0000 0000 | | .XXX[0x3]
071f 0000 | |
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723 | # | .CONST 0x0723 ; Address of begin
0721 0004 | | .CONST 0x0004 ; Address of exception handler
0722 0001 | | .CONST 0x0001 ; Number of locals
0723 BODY_0720:
0723 INIT_0720:
0723 00da | | Load_Top At_Offset_2
0724 e254 | T | Load 0x1,0x54
0725 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0726 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0727 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072b | + | .CONST 0x072b ; Address of begin
0729 0004 | | .CONST 0x0004 ; Address of exception handler
072a 0001 | | .CONST 0x0001 ; Number of locals
072b BODY_0728:
072b INIT_0728:
072b 00da | | Load_Top At_Offset_2
072c 0217 | | Execute Heap_Access,All_Reference
072d 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
072e e25f | _ | Load 0x1,0x5f
072f e25e | ^ | Load 0x1,0x5e
0730 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0731 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0732 0000 0000 | | .BLANK 0000[0x6]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073b | ; | .CONST 0x073b ; Address of begin
0739 0004 | | .CONST 0x0004 ; Address of exception handler
073a 0001 | | .CONST 0x0001 ; Number of locals
073b BODY_0738:
073b INIT_0738:
073b 00da | | Load_Top At_Offset_2
073c e25e | ^ | Load 0x1,0x5e
073d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
073e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
073f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743 | C | .CONST 0x0743 ; Address of begin
0741 0004 | | .CONST 0x0004 ; Address of exception handler
0742 0001 | | .CONST 0x0001 ; Number of locals
0743 BODY_0740:
0743 INIT_0740:
0743 00da | | Load_Top At_Offset_2
0744 0217 | | Execute Heap_Access,All_Reference
0745 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
0746 e24f | O | Load 0x1,0x4f
0747 e24e | N | Load 0x1,0x4e
0748 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0749 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
074a 0000 0000 | | .BLANK 0000[0x6]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0753 | S | .CONST 0x0753 ; Address of begin
0751 0004 | | .CONST 0x0004 ; Address of exception handler
0752 0001 | | .CONST 0x0001 ; Number of locals
0753 BODY_0750:
0753 INIT_0750:
0753 00da | | Load_Top At_Offset_2
0754 e24e | N | Load 0x1,0x4e
0755 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0756 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0757 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b | [ | .CONST 0x075b ; Address of begin
0759 0004 | | .CONST 0x0004 ; Address of exception handler
075a 0001 | | .CONST 0x0001 ; Number of locals
075b BODY_0758:
075b INIT_0758:
075b 00da | | Load_Top At_Offset_2
075c e002 | | Load 0x0,0x2
075d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
075e 1861 | a | Execute Package,Field_Execute,Field_Number 0x61
075f 0217 | | Execute Heap_Access,All_Reference
0760 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
0761 e25b | [ | Load 0x1,0x5b
0762 e25a | Z | Load 0x1,0x5a
0763 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0764 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0765 0000 0000 | | .XXX[0x3]
0767 0000 | |
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b | k | .CONST 0x076b ; Address of begin
0769 0004 | | .CONST 0x0004 ; Address of exception handler
076a 0001 | | .CONST 0x0001 ; Number of locals
076b BODY_0768:
076b INIT_0768:
076b 00da | | Load_Top At_Offset_2
076c e25a | Z | Load 0x1,0x5a
076d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
076e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
076f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 0773 | s | .CONST 0x0773 ; Address of begin
0771 0004 | | .CONST 0x0004 ; Address of exception handler
0772 0001 | | .CONST 0x0001 ; Number of locals
0773 BODY_0770:
0773 INIT_0770:
0773 00da | | Load_Top At_Offset_2
0774 0217 | | Execute Heap_Access,All_Reference
0775 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
0776 e25d | ] | Load 0x1,0x5d
0777 e25c | \ | Load 0x1,0x5c
0778 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0779 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
077a 0000 0000 | | .BLANK 0000[0x6]
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 0783 | | .CONST 0x0783 ; Address of begin
0781 0004 | | .CONST 0x0004 ; Address of exception handler
0782 0001 | | .CONST 0x0001 ; Number of locals
0783 BODY_0780:
0783 INIT_0780:
0783 00da | | Load_Top At_Offset_2
0784 e25c | \ | Load 0x1,0x5c
0785 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0786 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0787 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b | | .CONST 0x078b ; Address of begin
0789 0004 | | .CONST 0x0004 ; Address of exception handler
078a 0001 | | .CONST 0x0001 ; Number of locals
078b BODY_0788:
078b INIT_0788:
078b 00da | | Load_Top At_Offset_2
078c 0217 | | Execute Heap_Access,All_Reference
078d 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
078e e251 | Q | Load 0x1,0x51
078f e250 | P | Load 0x1,0x50
0790 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0791 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0792 0000 0000 | | .BLANK 0000[0x6]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b | | .CONST 0x079b ; Address of begin
0799 0004 | | .CONST 0x0004 ; Address of exception handler
079a 0001 | | .CONST 0x0001 ; Number of locals
079b BODY_0798:
079b INIT_0798:
079b 00da | | Load_Top At_Offset_2
079c e250 | P | Load 0x1,0x50
079d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
079e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
079f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3 | | .CONST 0x07a3 ; Address of begin
07a1 0004 | | .CONST 0x0004 ; Address of exception handler
07a2 0001 | | .CONST 0x0001 ; Number of locals
07a3 BODY_07a0:
07a3 INIT_07a0:
07a3 00da | | Load_Top At_Offset_2
07a4 0217 | | Execute Heap_Access,All_Reference
07a5 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
07a6 e257 | W | Load 0x1,0x57
07a7 e256 | V | Load 0x1,0x56
07a8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07aa 0000 0000 | | .BLANK 0000[0x6]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3 | | .CONST 0x07b3 ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0001 | | .CONST 0x0001 ; Number of locals
07b3 BODY_07b0:
07b3 INIT_07b0:
07b3 00da | | Load_Top At_Offset_2
07b4 e256 | V | Load 0x1,0x56
07b5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07b6 0033 | 3 | Store_Top Heap_Access,At_Offset_3
07b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bb | | .CONST 0x07bb ; Address of begin
07b9 0004 | | .CONST 0x0004 ; Address of exception handler
07ba 0001 | | .CONST 0x0001 ; Number of locals
07bb BODY_07b8:
07bb INIT_07b8:
07bb 00da | | Load_Top At_Offset_2
07bc 0217 | | Execute Heap_Access,All_Reference
07bd 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
07be e259 | Y | Load 0x1,0x59
07bf e258 | X | Load 0x1,0x58
07c0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07c2 0000 0000 | | .BLANK 0000[0x6]
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07cb | | .CONST 0x07cb ; Address of begin
07c9 0004 | | .CONST 0x0004 ; Address of exception handler
07ca 0001 | | .CONST 0x0001 ; Number of locals
07cb BODY_07c8:
07cb INIT_07c8:
07cb 00da | | Load_Top At_Offset_2
07cc e258 | X | Load 0x1,0x58
07cd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07ce 0033 | 3 | Store_Top Heap_Access,At_Offset_3
07cf 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3 | | .CONST 0x07d3 ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0001 | | .CONST 0x0001 ; Number of locals
07d3 BODY_07d0:
07d3 INIT_07d0:
07d3 00db | | Load_Top At_Offset_3
07d4 0217 | | Execute Heap_Access,All_Reference
07d5 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
07d6 00db | | Load_Top At_Offset_3
07d7 e23c | < | Load 0x1,0x3c
07d8 1c08 | | Execute_Immediate Run_Utility,0x8
07d9 4800 |H | Short_Literal 0x0
07da 00d9 | | Load_Top At_Offset_1
07db 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07dc 4801 |H | Short_Literal 0x1
07dd e5ff | | Load 0x2,-0x1
07de e242 | B | Load 0x1,0x42
07df 035b | [ | Declare_Type Array,Constrained
07e0 0337 | 7 | Declare_Variable Array
07e1 00d8 | | Load_Top At_Offset_0
07e2 01dc | | Execute Vector,Last
07e3 4801 |H | Short_Literal 0x1
07e4 0263 | c | Execute Discrete,Above_Bound
07e5 7009 |p | Jump_Nonzero 0x7ef
07e6 e01d | | Load 0x0,0x1d
07e7 180f | | Execute Package,Field_Execute,Field_Number 0xf
07e8 e005 | | Load 0x0,0x5
07e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ea 0119 | | Execute Any,Check_In_Formal_Type
07eb 00d9 | | Load_Top At_Offset_1
07ec e404 | | Load 0x2,0x4
07ed 01d6 | | Execute Vector,Field_Write
07ee 3ff7 |? | Loop_Increasing 0x7e6
07ef 00d9 | | Load_Top At_Offset_1
07f0 00d8 | | Load_Top At_Offset_0
07f1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07f2 00da | | Load_Top At_Offset_2
07f3 01da | | Execute Vector,Bounds
07f4 00da | | Load_Top At_Offset_2
07f5 01da | | Execute Vector,Bounds
07f6 00da | | Load_Top At_Offset_2
07f7 027f | | Execute Discrete,Equal
07f8 7001 |p | Jump_Nonzero 0x7fa
07f9 08e0 | | Execute_Immediate Raise,0xe0
07fa 00cd | | Action Spare6_Action
07fb 027f | | Execute Discrete,Equal
07fc 7001 |p | Jump_Nonzero 0x7fe
07fd 08e0 | | Execute_Immediate Raise,0xe0
07fe 00d2 | | Pop_Control Pop_Count_2
07ff 00d9 | | Load_Top At_Offset_1
0800 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
0801 e260 | ` | Load 0x1,0x60
0802 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0803 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0804 0000 0000 | | .BLANK 0000[0x4]
0808 ; --------------------------------------------------------------------------------------
0808 ; SUBPROGRAM
0808 ; --------------------------------------------------------------------------------------
0808 080b | | .CONST 0x080b ; Address of begin
0809 0004 | | .CONST 0x0004 ; Address of exception handler
080a 0001 | | .CONST 0x0001 ; Number of locals
080b BODY_0808:
080b INIT_0808:
080b 00da | | Load_Top At_Offset_2
080c e260 | ` | Load 0x1,0x60
080d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
080e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
080f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813 | | .CONST 0x0813 ; Address of begin
0811 0004 | | .CONST 0x0004 ; Address of exception handler
0812 0001 | | .CONST 0x0001 ; Number of locals
0813 BODY_0810:
0813 INIT_0810:
0813 00da | | Load_Top At_Offset_2
0814 e039 | 9 | Load 0x0,0x39
0815 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0816 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0817 0000 | | .XXX[0x1]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 081b | | .CONST 0x081b ; Address of begin
0819 0004 | | .CONST 0x0004 ; Address of exception handler
081a 0001 | | .CONST 0x0001 ; Number of locals
081b BODY_0818:
081b INIT_0818:
081b e247 | G | Load 0x1,0x47
081c 00db | | Load_Top At_Offset_3
081d e03e | > | Load 0x0,0x3e
081e e03f | ? | Load 0x0,0x3f
081f a040 | @ | Store_Unchecked 0x0,0x40
0820 e00d | | Load 0x0,0xd
0821 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0822 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0823 0000 0000 | | .BLANK 0000[0x5]
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 082b | + | .CONST 0x082b ; Address of begin
0829 0004 | | .CONST 0x0004 ; Address of exception handler
082a 0001 | | .CONST 0x0001 ; Number of locals
082b BODY_0828:
082b INIT_0828:
082b 00d1 | | Pop_Control Pop_Count_1
082c 00da | | Load_Top At_Offset_2
082d 01dc | | Execute Vector,Last
082e 00db | | Load_Top At_Offset_3
082f 01dd | | Execute Vector,First
0830 0263 | c | Execute Discrete,Above_Bound
0831 700a |p | Jump_Nonzero 0x83c
0832 00d8 | | Load_Top At_Offset_0
0833 e5ff | | Load 0x2,-0x1
0834 01d5 | | Execute Vector,Field_Reference
0835 0125 | % | Execute Any,Set_Constraint
0836 00d8 | | Load_Top At_Offset_0
0837 e5ff | | Load 0x2,-0x1
0838 01d5 | | Execute Vector,Field_Reference
0839 1c00 | | Execute_Immediate Run_Utility,0x0
083a 0a01 | | Execute_Immediate Plus,0x1
083b 7ff4 | | Jump 0x830
083c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
083d 0000 0000 | | .XXX[0x3]
083f 0000 | |
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 0843 | C | .CONST 0x0843 ; Address of begin
0841 0004 | | .CONST 0x0004 ; Address of exception handler
0842 0001 | | .CONST 0x0001 ; Number of locals
0843 BODY_0840:
0843 INIT_0840:
0843 00da | | Load_Top At_Offset_2
0844 0f02 | | Execute_Immediate Equal,0x2
0845 680f |h | Jump_Zero 0x855
0846 00db | | Load_Top At_Offset_3
0847 e01b | | Load 0x0,0x1b
0848 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0849 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
084a 0092 0a3e | >| Action Push_String_Extended,0xa3e ; "."
084c 01cc | | Execute Vector,Catenate
084d e5fd | | Load 0x2,-0x3
084e e003 | | Load 0x0,0x3
084f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0850 01cc | | Execute Vector,Catenate
0851 0092 0a42 | B| Action Push_String_Extended,0xa42 ; "_State_File"
0853 01cc | | Execute Vector,Catenate
0854 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0855 00db | | Load_Top At_Offset_3
0856 e01b | | Load 0x0,0x1b
0857 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0858 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0859 0092 0a43 | C| Action Push_String_Extended,0xa43 ; ".State.Tool_State."
085b 01cc | | Execute Vector,Catenate
085c e5fd | | Load 0x2,-0x3
085d e003 | | Load 0x0,0x3
085e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
085f 01cc | | Execute Vector,Catenate
0860 0092 0a42 | B| Action Push_String_Extended,0xa42 ; "_State_File"
0862 01cc | | Execute Vector,Catenate
0863 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0864 0000 0000 | | .BLANK 0000[0x4]
0868 ; --------------------------------------------------------------------------------------
0868 ; SUBPROGRAM
0868 ; --------------------------------------------------------------------------------------
0868 0883 | | .CONST 0x0883 ; Address of begin
0869 0004 | | .CONST 0x0004 ; Address of exception handler
086a 0006 | | .CONST 0x0006 ; Number of locals
086b INIT_0868:
086b e03a | : | Load 0x0,0x3a
086c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
086d 02c7 | | Declare_Variable Any
086e 00d8 | | Load_Top At_Offset_0
086f 1c00 | | Execute_Immediate Run_Utility,0x0
0870 e01b | | Load 0x0,0x1b
0871 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0872 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0873 02c7 | | Declare_Variable Any
0874 00d8 | | Load_Top At_Offset_0
0875 1c00 | | Execute_Immediate Run_Utility,0x0
0876 e01b | | Load 0x0,0x1b
0877 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0878 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0879 02c7 | | Declare_Variable Any
087a 00d8 | | Load_Top At_Offset_0
087b 1c00 | | Execute_Immediate Run_Utility,0x0
087c e01b | | Load 0x0,0x1b
087d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
087e e01b | | Load 0x0,0x1b
087f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0880 02ff | | Declare_Variable Variant_Record
0881 00d8 | | Load_Top At_Offset_0
0882 1c00 | | Execute_Immediate Run_Utility,0x0
0883 BODY_0868:
0883 e00a | | Load 0x0,0xa
0884 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0885 e5fd | | Load 0x2,-0x3
0886 4800 |H | Short_Literal 0x0
0887 60d4 |` | Indirect_Literal Discrete,0x95c,{0x00000000, 0x00004000}
0888 e03c | < | Load 0x0,0x3c
0889 1b0e | | Execute Package,Field_Read,Field_Number 0xe
088a e03d | = | Load 0x0,0x3d
088b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
088c e01b | | Load 0x0,0x1b
088d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
088e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
088f 4800 |H | Short_Literal 0x0
0890 e5fe | | Load 0x2,-0x2
0891 e5ff | | Load 0x2,-0x1
0892 e00a | | Load 0x0,0xa
0893 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0894 c5fd | | Store 0x2,-0x3
0895 005a | Z | Store_Top Discrete,At_Offset_2
0896 00d9 | | Load_Top At_Offset_1
0897 460e |F | Jump_Case 0xf
0898 78a0 |x | Jump 0x939 ; case 0x0
0899 780d |x | Jump 0x8a7 ; case 0x1
089a 780c |x | Jump 0x8a7 ; case 0x2
089b 780b |x | Jump 0x8a7 ; case 0x3
089c 780a |x | Jump 0x8a7 ; case 0x4
089d 7809 |x | Jump 0x8a7 ; case 0x5
089e 7808 |x | Jump 0x8a7 ; case 0x6
089f 7807 |x | Jump 0x8a7 ; case 0x7
08a0 7806 |x | Jump 0x8a7 ; case 0x8
08a1 781e |x | Jump 0x8c0 ; case 0x9
08a2 7804 |x | Jump 0x8a7 ; case 0xa
08a3 7803 |x | Jump 0x8a7 ; case 0xb
08a4 7802 |x | Jump 0x8a7 ; case 0xc
08a5 7801 |x | Jump 0x8a7 ; case 0xd
08a6 7800 |x | Jump 0x8a7 ; case 0xe
08a7 e038 | 8 | Load 0x0,0x38
08a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08a9 4801 |H | Short_Literal 0x1
08aa 4802 |H | Short_Literal 0x2
08ab e007 | | Load 0x0,0x7
08ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08ad 035b | [ | Declare_Type Array,Constrained
08ae 0337 | 7 | Declare_Variable Array
08af e5fe | | Load 0x2,-0x2
08b0 e007 | | Load 0x0,0x7
08b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08b2 4801 |H | Short_Literal 0x1
08b3 00da | | Load_Top At_Offset_2
08b4 01d6 | | Execute Vector,Field_Write
08b5 00db | | Load_Top At_Offset_3
08b6 e007 | | Load 0x0,0x7
08b7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
08b8 4802 |H | Short_Literal 0x2
08b9 00da | | Load_Top At_Offset_2
08ba 01d6 | | Execute Vector,Field_Write
08bb 609c |` | Indirect_Literal Discrete,0x958,{0x00000000, 0x00005001}
08bc e038 | 8 | Load 0x0,0x38
08bd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
08be c5fc | | Store 0x2,-0x4
08bf 7879 |xy | Jump 0x939
08c0 e01b | | Load 0x0,0x1b
08c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c2 00db | | Load_Top At_Offset_3
08c3 0120 | | Execute Any,Is_Value
08c4 6802 |h | Jump_Zero 0x8c7
08c5 00f1 | | Load_Encached Diana_Temp_Seq
08c6 7801 |x | Jump 0x8c8
08c7 00db | | Load_Top At_Offset_3
08c8 e403 | | Load 0x2,0x3
08c9 0120 | | Execute Any,Is_Value
08ca 6804 |h | Jump_Zero 0x8cf
08cb e01b | | Load 0x0,0x1b
08cc 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
08cd 1b17 | | Execute Package,Field_Read,Field_Number 0x17
08ce 7801 |x | Jump 0x8d0
08cf e403 | | Load 0x2,0x3
08d0 e402 | | Load 0x2,0x2
08d1 0120 | | Execute Any,Is_Value
08d2 6803 |h | Jump_Zero 0x8d6
08d3 e03a | : | Load 0x0,0x3a
08d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08d5 7801 |x | Jump 0x8d7
08d6 e402 | | Load 0x2,0x2
08d7 e406 | | Load 0x2,0x6
08d8 6083 |` | Indirect_Literal Discrete,0x95c,{0x00000000, 0x00004000}
08d9 e03c | < | Load 0x0,0x3c
08da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08db 4800 |H | Short_Literal 0x0
08dc e01b | | Load 0x0,0x1b
08dd 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
08de 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08df e01b | | Load 0x0,0x1b
08e0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
08e1 6072 |`r | Indirect_Literal Discrete,0x954,{0x00000000, 0x7fffffff}
08e2 4ffc |O | Short_Literal -0x4
08e3 4ffd |O | Short_Literal -0x3
08e4 e03d | = | Load 0x0,0x3d
08e5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
08e6 e01b | | Load 0x0,0x1b
08e7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
08e8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
08e9 e01b | | Load 0x0,0x1b
08ea 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
08eb e00a | | Load 0x0,0xa
08ec 180f | | Execute Package,Field_Execute,Field_Number 0xf
08ed e5fe | | Load 0x2,-0x2
08ee e01b | | Load 0x0,0x1b
08ef 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
08f0 180f | | Execute Package,Field_Execute,Field_Number 0xf
08f1 00d1 | | Pop_Control Pop_Count_1
08f2 c402 | | Store 0x2,0x2
08f3 c403 | | Store 0x2,0x3
08f4 c404 | | Store 0x2,0x4
08f5 005a | Z | Store_Top Discrete,At_Offset_2
08f6 00d9 | | Load_Top At_Offset_1
08f7 6819 |h | Jump_Zero 0x911
08f8 e038 | 8 | Load 0x0,0x38
08f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08fa 4801 |H | Short_Literal 0x1
08fb 4802 |H | Short_Literal 0x2
08fc e007 | | Load 0x0,0x7
08fd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08fe 035b | [ | Declare_Type Array,Constrained
08ff 0337 | 7 | Declare_Variable Array
0900 e5fe | | Load 0x2,-0x2
0901 e007 | | Load 0x0,0x7
0902 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0903 4801 |H | Short_Literal 0x1
0904 00da | | Load_Top At_Offset_2
0905 01d6 | | Execute Vector,Field_Write
0906 00db | | Load_Top At_Offset_3
0907 e007 | | Load 0x0,0x7
0908 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0909 4802 |H | Short_Literal 0x2
090a 00da | | Load_Top At_Offset_2
090b 01d6 | | Execute Vector,Field_Write
090c 6043 |`C | Indirect_Literal Discrete,0x950,{0x00000000, 0x00005002}
090d e038 | 8 | Load 0x0,0x38
090e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
090f c5fc | | Store 0x2,-0x4
0910 7828 |x( | Jump 0x939
0911 e00a | | Load 0x0,0xa
0912 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0913 00d9 | | Load_Top At_Offset_1
0914 e5fd | | Load 0x2,-0x3
0915 4801 |H | Short_Literal 0x1
0916 6045 |`E | Indirect_Literal Discrete,0x95c,{0x00000000, 0x00004000}
0917 e03c | < | Load 0x0,0x3c
0918 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0919 e5ff | | Load 0x2,-0x1
091a e00a | | Load 0x0,0xa
091b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
091c c5fd | | Store 0x2,-0x3
091d 00d1 | | Pop_Control Pop_Count_1
091e 005a | Z | Store_Top Discrete,At_Offset_2
091f 00d9 | | Load_Top At_Offset_1
0920 6818 |h | Jump_Zero 0x939
0921 e038 | 8 | Load 0x0,0x38
0922 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0923 4801 |H | Short_Literal 0x1
0924 4802 |H | Short_Literal 0x2
0925 e007 | | Load 0x0,0x7
0926 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0927 035b | [ | Declare_Type Array,Constrained
0928 0337 | 7 | Declare_Variable Array
0929 00da | | Load_Top At_Offset_2
092a e007 | | Load 0x0,0x7
092b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
092c 4801 |H | Short_Literal 0x1
092d 00da | | Load_Top At_Offset_2
092e 01d6 | | Execute Vector,Field_Write
092f 00db | | Load_Top At_Offset_3
0930 e007 | | Load 0x0,0x7
0931 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0932 4802 |H | Short_Literal 0x2
0933 00da | | Load_Top At_Offset_2
0934 01d6 | | Execute Vector,Field_Write
0935 6016 |` | Indirect_Literal Discrete,0x94c,{0x00000000, 0x00005004}
0936 e038 | 8 | Load 0x0,0x38
0937 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0938 c5fc | | Store 0x2,-0x4
0939 0092 0a44 | D| Action Push_String_Extended,0xa44 ; "Created state file \x22"
093b e5fe | | Load 0x2,-0x2
093c 01cc | | Execute Vector,Catenate
093d 0092 0a45 | E| Action Push_String_Extended,0xa45 ; "\x22 (Mode = "
093f 01cc | | Execute Vector,Catenate
0940 e5ff | | Load 0x2,-0x1
0941 e00a | | Load 0x0,0xa
0942 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0943 011c | | Execute Any,Convert_Unchecked
0944 1c01 | | Execute_Immediate Run_Utility,0x1
0945 01cc | | Execute Vector,Catenate
0946 0092 0a46 | F| Action Push_String_Extended,0xa46 ; ")."
0948 01cc | | Execute Vector,Catenate
0949 803b | ; | Call 0x0,0x3b
094a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
094b 0000 | | .XXX[0x1]
094c 0000 0000 | | .LITERAL {0x00000000, 0x00005004}
0950 0000 0000 | | .LITERAL {0x00000000, 0x00005002}
0954 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
0958 0000 0000 | | .LITERAL {0x00000000, 0x00005001}
095c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0960 ; --------------------------------------------------------------------------------------
0960 ; SUBPROGRAM
0960 ; --------------------------------------------------------------------------------------
0960 0963 | c | .CONST 0x0963 ; Address of begin
0961 0004 | | .CONST 0x0004 ; Address of exception handler
0962 0001 | | .CONST 0x0001 ; Number of locals
0963 BODY_0960:
0963 INIT_0960:
0963 4608 |F | Jump_Case 0x9
0964 7808 |x | Jump 0x96d ; case 0x0
0965 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0966 7813 |x | Jump 0x97a ; case 0x2
0967 7812 |x | Jump 0x97a ; case 0x3
0968 7811 |x | Jump 0x97a ; case 0x4
0969 7810 |x | Jump 0x97a ; case 0x5
096a 780f |x | Jump 0x97a ; case 0x6
096b 780e |x | Jump 0x97a ; case 0x7
096c 780d |x | Jump 0x97a ; case 0x8
096d 00da | | Load_Top At_Offset_2
096e 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
096f 0125 | % | Execute Any,Set_Constraint
0970 00da | | Load_Top At_Offset_2
0971 340a |4 | Execute Record,Field_Reference,Field_Number 0xa
0972 1c00 | | Execute_Immediate Run_Utility,0x0
0973 00da | | Load_Top At_Offset_2
0974 340b |4 | Execute Record,Field_Reference,Field_Number 0xb
0975 0125 | % | Execute Any,Set_Constraint
0976 00da | | Load_Top At_Offset_2
0977 340b |4 | Execute Record,Field_Reference,Field_Number 0xb
0978 1c00 | | Execute_Immediate Run_Utility,0x0
0979 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
097a 0869 | i | Execute_Immediate Raise,0x69
097b 0000 0000 | | .BLANK 0000[0x5]
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0983 | | .CONST 0x0983 ; Address of begin
0981 0004 | | .CONST 0x0004 ; Address of exception handler
0982 0001 | | .CONST 0x0001 ; Number of locals
0983 BODY_0980:
0983 INIT_0980:
0983 4608 |F | Jump_Case 0x9
0984 7808 |x | Jump 0x98d ; case 0x0
0985 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0986 780d |x | Jump 0x994 ; case 0x2
0987 780c |x | Jump 0x994 ; case 0x3
0988 780b |x | Jump 0x994 ; case 0x4
0989 780a |x | Jump 0x994 ; case 0x5
098a 7809 |x | Jump 0x994 ; case 0x6
098b 7808 |x | Jump 0x994 ; case 0x7
098c 7807 |x | Jump 0x994 ; case 0x8
098d 00da | | Load_Top At_Offset_2
098e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
098f 0125 | % | Execute Any,Set_Constraint
0990 00da | | Load_Top At_Offset_2
0991 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0992 1c00 | | Execute_Immediate Run_Utility,0x0
0993 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0994 0869 | i | Execute_Immediate Raise,0x69
0995 0000 0000 | | .XXX[0x3]
0997 0000 | |
0998 ; --------------------------------------------------------------------------------------
0998 ; SUBPROGRAM
0998 ; SUBPROGRAM
0998 ; --------------------------------------------------------------------------------------
0998 099b | | .CONST 0x099b ; Address of begin
0999 0004 | | .CONST 0x0004 ; Address of exception handler
099a 0001 | | .CONST 0x0001 ; Number of locals
099b BODY_0998:
099b BODY_0998:
099b INIT_0998:
099b INIT_0998:
099b 4608 |F | Jump_Case 0x9
099c 7808 |x | Jump 0x9a5 ; case 0x0
099d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
099e 781d |x | Jump 0x9bc ; case 0x2
099f 781c |x | Jump 0x9bc ; case 0x3
09a0 781b |x | Jump 0x9bc ; case 0x4
09a1 781a |x | Jump 0x9bc ; case 0x5
09a2 7819 |x | Jump 0x9bc ; case 0x6
09a3 7805 |x | Jump 0x9a9 ; case 0x7
09a4 780d |x | Jump 0x9b2 ; case 0x8
09a5 00da | | Load_Top At_Offset_2
09a6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
09a7 1c00 | | Execute_Immediate Run_Utility,0x0
09a8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
09a9 00db | | Load_Top At_Offset_3
09aa 4801 |H | Short_Literal 0x1
09ab e5fe | | Load 0x2,-0x2
09ac e242 | B | Load 0x1,0x42
09ad 035b | [ | Declare_Type Array,Constrained
09ae 4801 |H | Short_Literal 0x1
09af e5ff | | Load 0x2,-0x1
09b0 031b | | Declare_Type Variant_Record,Constrained
09b1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
09b2 00db | | Load_Top At_Offset_3
09b3 00db | | Load_Top At_Offset_3
09b4 02fc | | Declare_Variable Variant_Record,With_Constraint
09b5 4801 |H | Short_Literal 0x1
09b6 e5fe | | Load 0x2,-0x2
09b7 e242 | B | Load 0x1,0x42
09b8 0334 | 4 | Declare_Variable Array,With_Constraint
09b9 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
09ba 016a | j | QQ_execute Variant_Record,XXX
09bb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
09bc 0869 | i | Execute_Immediate Raise,0x69
09bd 0000 0000 | | .XXX[0x3]
09bf 0000 | |
09c0 ; --------------------------------------------------------------------------------------
09c0 ; SUBPROGRAM
09c0 ; --------------------------------------------------------------------------------------
09c0 09eb | | .CONST 0x09eb ; Address of begin
09c1 0004 | | .CONST 0x0004 ; Address of exception handler
09c2 001a | | .CONST 0x001a ; Number of locals
09c3 INIT_09c0:
09c3 029a 09f3 | | Declare_Subprogram INIT_09f0,For_Outer_Call,Visible,Unelaborated
09c5 029a 0a13 | | Declare_Subprogram INIT_0a10,For_Outer_Call,Visible,Unelaborated
09c7 029a 0a2b | +| Declare_Subprogram INIT_0a28,For_Outer_Call,Visible,Unelaborated
09c9 00bf | | Action Accept_Activation
09ca e001 | | Load 0x0,0x1
09cb e002 | | Load 0x0,0x2
09cc e20f | | Load 0x1,0xf
09cd e210 | | Load 0x1,0x10
09ce e003 | | Load 0x0,0x3
09cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09d0 0387 | | Declare_Variable Package
09d1 00d8 | | Load_Top At_Offset_0
09d2 020f | | Execute Module,Activate
09d3 e004 | | Load 0x0,0x4
09d4 1919 | | Execute Package,Field_Reference,Field_Number 0x19
09d5 00c6 | | Action Check_Subprogram_Elaborated
09d6 e20f | | Load 0x1,0xf
09d7 e210 | | Load 0x1,0x10
09d8 e005 | | Load 0x0,0x5
09d9 e006 | | Load 0x0,0x6
09da 4800 |H | Short_Literal 0x0
09db 0007 | | Action Break_Optional
09dc e007 | | Load 0x0,0x7
09dd e008 | | Load 0x0,0x8
09de e20f | | Load 0x1,0xf
09df e210 | | Load 0x1,0x10
09e0 e004 | | Load 0x0,0x4
09e1 1b18 | | Execute Package,Field_Read,Field_Number 0x18
09e2 0387 | | Declare_Variable Package
09e3 00d8 | | Load_Top At_Offset_0
09e4 020f | | Execute Module,Activate
09e5 1d11 | | Execute_Immediate Reference_Lex_1,0x11
09e6 00c7 | | Action Elaborate_Subprogram
09e7 1d12 | | Execute_Immediate Reference_Lex_1,0x12
09e8 00c7 | | Action Elaborate_Subprogram
09e9 1d13 | | Execute_Immediate Reference_Lex_1,0x13
09ea 00c7 | | Action Elaborate_Subprogram
09eb BODY_09c0:
09eb 00bc | | Action Signal_Activated
09ec 00bb | | Action Signal_Completion
09ed 0000 0000 | | .XXX[0x3]
09ef 0000 | |
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f8 | | .CONST 0x09f8 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0002 | | .CONST 0x0002 ; Number of locals
09f3 INIT_09f0:
09f3 e210 | | Load 0x1,0x10
09f4 e5fd | | Load 0x2,-0x3
09f5 e5fe | | Load 0x2,-0x2
09f6 8213 | | Call 0x1,0x13
09f7 0031 | 1 | Store_Top Heap_Access,At_Offset_1
09f8 BODY_09f0:
09f8 00d8 | | Load_Top At_Offset_0
09f9 e214 | | Load 0x1,0x14
09fa 1b10 | | Execute Package,Field_Read,Field_Number 0x10
09fb 0216 | | Execute Heap_Access,Convert
09fc e214 | | Load 0x1,0x14
09fd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09fe 0031 | 1 | Store_Top Heap_Access,At_Offset_1
09ff e5fe | | Load 0x2,-0x2
0a00 0217 | | Execute Heap_Access,All_Reference
0a01 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
0a02 e5ff | | Load 0x2,-0x1
0a03 e20f | | Load 0x1,0xf
0a04 0119 | | Execute Any,Check_In_Formal_Type
0a05 e214 | | Load 0x1,0x14
0a06 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a07 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0a08 00d8 | | Load_Top At_Offset_0
0a09 e210 | | Load 0x1,0x10
0a0a 0213 | | Execute Heap_Access,Check_In_Type
0a0b e21a | | Load 0x1,0x1a
0a0c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a0d a5fd | | Store_Unchecked 0x2,-0x3
0a0e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a0f 0000 | | .XXX[0x1]
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a18 | | .CONST 0x0a18 ; Address of begin
0a11 0004 | | .CONST 0x0004 ; Address of exception handler
0a12 0002 | | .CONST 0x0002 ; Number of locals
0a13 INIT_0a10:
0a13 e210 | | Load 0x1,0x10
0a14 e5fe | | Load 0x2,-0x2
0a15 e5ff | | Load 0x2,-0x1
0a16 8213 | | Call 0x1,0x13
0a17 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0a18 BODY_0a10:
0a18 00d8 | | Load_Top At_Offset_0
0a19 e214 | | Load 0x1,0x14
0a1a 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0a1b 0216 | | Execute Heap_Access,Convert
0a1c e214 | | Load 0x1,0x14
0a1d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a1e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0a1f 4800 |H | Short_Literal 0x0
0a20 a5fe | | Store_Unchecked 0x2,-0x2
0a21 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a22 0000 0000 | | .BLANK 0000[0x6]
0a28 ; --------------------------------------------------------------------------------------
0a28 ; SUBPROGRAM
0a28 ; --------------------------------------------------------------------------------------
0a28 0a2b | + | .CONST 0x0a2b ; Address of begin
0a29 0a37 | 7 | .CONST 0x0a37 ; Address of exception handler
0a2a 0001 | | .CONST 0x0001 ; Number of locals
0a2b BODY_0a28:
0a2b INIT_0a28:
0a2b 00db | | Load_Top At_Offset_3
0a2c 00db | | Load_Top At_Offset_3
0a2d e009 | | Load 0x0,0x9
0a2e 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0a2f e215 | | Load 0x1,0x15
0a30 e216 | | Load 0x1,0x16
0a31 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0a32 e004 | | Load 0x0,0x4
0a33 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0a34 e210 | | Load 0x1,0x10
0a35 0213 | | Execute Heap_Access,Check_In_Type
0a36 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a37 TRAP_0a28:
0a37 486b |Hk | Short_Literal 0x6b
0a38 010f | | Execute Exception,Equal
0a39 6802 |h | Jump_Zero 0xa3c
0a3a e210 | | Load 0x1,0x10
0a3b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a3c 0100 | | Execute Exception,Raise
0a3d ; --------------------------------------------------------------------------------------
0a3d ; STRING TABLE
0a3d ; --------------------------------------------------------------------------------------
0a3d 0016 | | .STRTAB 0x0016->0x0a48 ; "Destroying state file "
0a3e 002a | * | .STRTAB 0x002a->0x0a53 ; "."
0a3f 0029 | ) | .STRTAB 0x0029->0x0a53 ; "Opened state file \x22"
0a40 003a | : | .STRTAB 0x003a->0x0a5d ; "\x22 in "
0a41 003d | = | .STRTAB 0x003d->0x0a5f ; " Mode."
0a42 0041 | A | .STRTAB 0x0041->0x0a62 ; "_State_File"
0a43 004a | J | .STRTAB 0x004a->0x0a68 ; ".State.Tool_State."
0a44 005a | Z | .STRTAB 0x005a->0x0a71 ; "Created state file \x22"
0a45 006c | l | .STRTAB 0x006c->0x0a7b ; "\x22 (Mode = "
0a46 0074 | t | .STRTAB 0x0074->0x0a80 ; ")."
0a47 0074 | t | .STREND 0x0074->0x0a81
0a48 4465 7374 |Dest| .STRTAB_STRINGS
0a81 0000 0000 | | .BLANK 0000[0x7]
0a88 ; --------------------------------------------------------------------------------------
0a88 ; Debug Table
0a88 ; --------------------------------------------------------------------------------------
0a88 0004 000d | | .DEBUG4 0x0004,0x000d,0xd927,0x0000,0x0001,0x0000
0a8e 01fa 408c | @ | .XXX[0x172]
0a90 0041 4915 | AI |
0a92 353d 5115 |5=Q |
0a94 7d11 2549 |} %I|
0a96 150d 513d | Q=|
0a98 4964 5c00 |Id\ |
0a9a 3d4d 5105 |=MQ |
0a9c 3911 0549 |9 I|
0a9e 10b9 4d51 | MQ|
0aa0 4925 391c |I%9 |
0aa2 01fe 4090 | @ |
0aa4 0019 4d51 | MQ|
0aa6 0551 554c | QUL|
0aa8 5c00 5d4d |\ ]M|
0aaa 2535 4131 |%5A1|
0aac 157d 4d51 | }MQ|
0aae 0551 554c | QUL|
0ab0 b90d 3d39 | =9|
0ab2 1125 5125 | %Q%|
0ab4 3d38 00d4 |=8 |
0ab6 f4b0 0049 | I|
0ab8 1115 353d | 5=|
0aba 5115 7d41 |Q }A|
0abc 3d4d 5141 |=MQA|
0abe 493d 0d15 |I= |
0ac0 4d4c 01ee |ML |
0ac2 51fa 408c |Q @ |
0ac4 0025 213d | %!=|
0ac6 4d51 7d55 |MQ}U|
0ac8 3925 505c |9%P\|
0aca 0041 1125 | A %|
0acc 4915 0d51 |I Q|
0ace 3d49 64b9 |=Id |
0ad0 3d09 2915 |= ) |
0ad2 0d50 01fa | P |
0ad4 408c 0041 |@ A|
0ad6 4915 353d |I 5=|
0ad8 5115 7d55 |Q }U|
0ada 3925 517d |9%Q}|
0adc 3905 3514 |9 5 |
0ade 5c00 3d4d |\ =M|
0ae0 5105 3911 |Q 9 |
0ae2 0549 10b9 | I |
0ae4 4d51 4925 |MQI%|
0ae6 391c 01fa |9 |
0ae8 408c 0039 |@ 9|
0aea 4915 353d |I 5=|
0aec 5115 7d31 |Q }1|
0aee 2509 4905 |% I |
0af0 4964 5c00 |Id\ |
0af2 3d4d 5105 |=MQ |
0af4 3911 0549 |9 I|
0af6 10b9 4d51 | MQ|
0af8 4925 391c |I%9 |
0afa 01fa 408c | @ |
0afc 0039 4915 | 9I |
0afe 353d 5115 |5=Q |
0b00 7d35 050d |}5 |
0b02 2125 3914 |!%9 |
0b04 5c00 3d4d |\ =M|
0b06 5105 3911 |Q 9 |
0b08 0549 10b9 | I |
0b0a 4d51 4925 |MQI%|
0b0c 391c 01fa |9 |
0b0e 408c 0041 |@ A|
0b10 4915 353d |I 5=|
0b12 5115 7d11 |Q } |
0b14 2549 150d |%I |
0b16 513d 4964 |Q=Id|
0b18 5c00 3d4d |\ =M|
0b1a 5105 3911 |Q 9 |
0b1c 0549 10b9 | I |
0b1e 4d51 4925 |MQI%|
0b20 391c 01fe |9 |
0b22 4090 0019 |@ |
0b24 4d51 0551 |MQ Q|
0b26 554c 5c00 |UL\ |
0b28 5d4d 2535 |]M%5|
0b2a 4131 157d |A1 }|
0b2c 4d51 0551 |MQ Q|
0b2e 554c b90d |UL |
0b30 3d39 1125 |=9 %|
0b32 5125 3d38 |Q%=8|
0b34 00d4 f4b0 | |
0b36 0091 4915 | I |
0b38 5149 2515 |QI% |
0b3a 5915 7d05 |Y } |
0b3c 4d4d 3d0d |MM= |
0b3e 2505 5115 |% Q |
0b40 117d 1925 | } %|
0b42 3115 4d7d |1 M}|
0b44 4149 1541 |AI A|
0b46 493d 0d15 |I= |
0b48 4d4c 01ee |ML |
0b4a 51fa 408c |Q @ |
0b4c 0025 213d | %!=|
0b4e 4d51 7d55 |MQ}U|
0b50 3925 505c |9%P\|
0b52 0041 1125 | A %|
0b54 4915 0d51 |I Q|
0b56 3d49 64b9 |=Id |
0b58 3d09 2915 |= ) |
0b5a 0d50 01fa | P |
0b5c 408c 0041 |@ A|
0b5e 4915 353d |I 5=|
0b60 5115 7d55 |Q }U|
0b62 3925 517d |9%Q}|
0b64 3905 3514 |9 5 |
0b66 5c00 3d4d |\ =M|
0b68 5105 3911 |Q 9 |
0b6a 0549 10b9 | I |
0b6c 4d51 4925 |MQI%|
0b6e 391c 01fa |9 |
0b70 408c 0039 |@ 9|
0b72 4915 353d |I 5=|
0b74 5115 7d31 |Q }1|
0b76 2509 4905 |% I |
0b78 4964 5c00 |Id\ |
0b7a 3d4d 5105 |=MQ |
0b7c 3911 0549 |9 I|
0b7e 10b9 4d51 | MQ|
0b80 4925 391c |I%9 |
0b82 01fa 408c | @ |
0b84 0039 4915 | 9I |
0b86 353d 5115 |5=Q |
0b88 7d35 050d |}5 |
0b8a 2125 3914 |!%9 |
0b8c 5c00 3d4d |\ =M|
0b8e 5105 3911 |Q 9 |
0b90 0549 10b9 | I |
0b92 4d51 4925 |MQI%|
0b94 391c 01fa |9 |
0b96 408c 0041 |@ A|
0b98 4915 353d |I 5=|
0b9a 5115 7d11 |Q } |
0b9c 2549 150d |%I |
0b9e 513d 4964 |Q=Id|
0ba0 5c00 3d4d |\ =M|
0ba2 5105 3911 |Q 9 |
0ba4 0549 10b9 | I |
0ba6 4d51 4925 |MQI%|
0ba8 391c 01fa |9 |
0baa 408c 0045 |@ E|
0bac 4915 353d |I 5=|
0bae 5115 7d0d |Q } |
0bb0 3d39 3915 |=99 |
0bb2 0d51 253d | Q%=|
0bb4 385c 005d |8\ ]|
0bb6 4915 353d |I 5=|
0bb8 5115 7d0d |Q } |
0bba 3d35 3505 |=55 |
0bbc 3911 4cb9 |9 L |
0bbe 0d3d 3951 | =9Q|
0bc0 1561 5001 | aP |
0bc2 fa40 8c00 | @ |
0bc4 5951 2115 |YQ! |
0bc6 7d49 1551 |}I Q|
0bc8 4925 1559 |I% Y|
0bca 157d 0d3d | } =|
0bcc 3911 2551 |9 %Q|
0bce 253d 385c |%=8\|
0bd0 008d 5105 | Q |
0bd2 491d 1551 |I Q|
0bd4 7d11 1541 |} A|
0bd6 1539 1115 | 9 |
0bd8 3950 b949 |9P I|
0bda 1551 4925 | QI%|
0bdc 1559 157d | Y }|
0bde 0d3d 3911 | =9 |
0be0 2551 253d |%Q%=|
0be2 3801 fa40 |8 @|
0be4 8c00 1941 | A|
0be6 2105 4d15 |! M |
0be8 4c5c 0069 |L\ i|
0bea 5105 491d |Q I |
0bec 1551 7d11 | Q} |
0bee 1541 1539 | A 9|
0bf0 1115 3950 | 9P|
0bf2 b941 2105 | A! |
0bf4 4d15 7d35 |M }5|
0bf6 0540 01fe | @ |
0bf8 4090 0019 |@ |
0bfa 4d51 0551 |MQ Q|
0bfc 554c 5c00 |UL\ |
0bfe 5d4d 2535 |]M%5|