|
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: 13312 (0x3400)
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 1820 | | .CONST 0x1820 ; 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 800f | | .CONST 0x800f ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00ce | | .CONST 0x00ce ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0028 | ( | .CONST 0x0028 ; Number of locals
000b INIT_0008:
000b 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated
0017 c215 | | Store 0x1,0x15
0018 4806 |H | Short_Literal 0x6
0019 0093 1383 | | push_full_address INIT_1380
001b 02a0 | | Declare_Subprogram Null_Subprogram
001c 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
001d c212 | | Store 0x1,0x12
001e 4805 |H | Short_Literal 0x5
001f 0093 0d7b | {| push_full_address INIT_0d78
0021 02a0 | | Declare_Subprogram Null_Subprogram
0022 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
0023 c210 | | Store 0x1,0x10
0024 4805 |H | Short_Literal 0x5
0025 0093 08a3 | | push_full_address INIT_08a0
0027 02a0 | | Declare_Subprogram Null_Subprogram
0028 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
0029 c211 | | Store 0x1,0x11
002a 00bf | | Action Accept_Activation
002b 480a |H | Short_Literal 0xa
002c 480d |H | Short_Literal 0xd
002d e001 | | Load 0x0,0x1
002e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
002f 03f8 | | Declare_Type Discrete,Constrained
0030 029b 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Unelaborated
0032 029b 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Unelaborated
0034 029b 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Unelaborated
0036 029b 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Unelaborated
0038 029d 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call
003a 029d 030b | | Declare_Subprogram INIT_0308,For_Outer_Call
003c 029d 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call
003e 1d17 | | Execute_Immediate Reference_Lex_1,0x17
003f 00c7 | | Action Elaborate_Subprogram
0040 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0041 00c7 | | Action Elaborate_Subprogram
0042 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0043 00c7 | | Action Elaborate_Subprogram
0044 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0045 00c7 | | Action Elaborate_Subprogram
0046 029d 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call
0048 029d 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call
004a 1d0d | | Execute_Immediate Reference_Lex_1,0xd
004b 00c7 | | Action Elaborate_Subprogram
004c 1d15 | | Execute_Immediate Reference_Lex_1,0x15
004d 00c7 | | Action Elaborate_Subprogram
004e 1d15 | | Execute_Immediate Reference_Lex_1,0x15
004f 00c6 | | Action Check_Subprogram_Elaborated
0050 e002 | | Load 0x0,0x2
0051 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0052 e002 | | Load 0x0,0x2
0053 1929 | ) | Execute Package,Field_Reference,Field_Number 0x29
0054 e002 | | Load 0x0,0x2
0055 192d | - | Execute Package,Field_Reference,Field_Number 0x2d
0056 e002 | | Load 0x0,0x2
0057 1926 | & | Execute Package,Field_Reference,Field_Number 0x26
0058 e002 | | Load 0x0,0x2
0059 191b | | Execute Package,Field_Reference,Field_Number 0x1b
005a e003 | | Load 0x0,0x3
005b e004 | | Load 0x0,0x4
005c 4800 |H | Short_Literal 0x0
005d 0007 | | Action Break_Optional
005e e005 | | Load 0x0,0x5
005f e006 | | Load 0x0,0x6
0060 e007 | | Load 0x0,0x7
0061 e008 | | Load 0x0,0x8
0062 e009 | | Load 0x0,0x9
0063 e00a | | Load 0x0,0xa
0064 e00b | | Load 0x0,0xb
0065 e00c | | Load 0x0,0xc
0066 e00d | | Load 0x0,0xd
0067 e00e | | Load 0x0,0xe
0068 e00f | | Load 0x0,0xf
0069 e001 | | Load 0x0,0x1
006a e010 | | Load 0x0,0x10
006b e011 | | Load 0x0,0x11
006c e012 | | Load 0x0,0x12
006d e013 | | Load 0x0,0x13
006e e014 | | Load 0x0,0x14
006f 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0070 e015 | | Load 0x0,0x15
0071 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0072 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0073 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0074 e016 | | Load 0x0,0x16
0075 e002 | | Load 0x0,0x2
0076 e017 | | Load 0x0,0x17
0077 e018 | | Load 0x0,0x18
0078 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0079 e220 | | Load 0x1,0x20
007a 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
007b 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
007c 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
007d 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
007e 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
007f 00b6 | | Action Make_Scope
0080 4822 |H" | Short_Literal 0x22
0081 e212 | | Load 0x1,0x12
0082 020e | | Execute Module,Augment_Imports
0083 e212 | | Load 0x1,0x12
0084 020d | | Execute Module,Elaborate
0085 0007 | | Action Break_Optional
0086 029d 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call
0088 e006 | | Load 0x0,0x6
0089 e002 | | Load 0x0,0x2
008a e007 | | Load 0x0,0x7
008b e018 | | Load 0x0,0x18
008c e009 | | Load 0x0,0x9
008d e019 | | Load 0x0,0x19
008e e01a | | Load 0x0,0x1a
008f e00c | | Load 0x0,0xc
0090 e01b | | Load 0x0,0x1b
0091 e01c | | Load 0x0,0x1c
0092 e00f | | Load 0x0,0xf
0093 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
0094 e015 | | Load 0x0,0x15
0095 e013 | | Load 0x0,0x13
0096 e01d | | Load 0x0,0x1d
0097 e017 | | Load 0x0,0x17
0098 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0099 e001 | | Load 0x0,0x1
009a e016 | | Load 0x0,0x16
009b 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
009c 1d17 | | Execute_Immediate Reference_Lex_1,0x17
009d 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
009e e220 | | Load 0x1,0x20
009f 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00a0 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00a1 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00a2 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00a3 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00a4 00b6 | | Action Make_Scope
00a5 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00a6 481e |H | Short_Literal 0x1e
00a7 e210 | | Load 0x1,0x10
00a8 020e | | Execute Module,Augment_Imports
00a9 e210 | | Load 0x1,0x10
00aa 020d | | Execute Module,Elaborate
00ab 0007 | | Action Break_Optional
00ac e006 | | Load 0x0,0x6
00ad e01e | | Load 0x0,0x1e
00ae e002 | | Load 0x0,0x2
00af e009 | | Load 0x0,0x9
00b0 e01f | | Load 0x0,0x1f
00b1 e020 | | Load 0x0,0x20
00b2 e00c | | Load 0x0,0xc
00b3 e021 | ! | Load 0x0,0x21
00b4 e022 | " | Load 0x0,0x22
00b5 e00f | | Load 0x0,0xf
00b6 e013 | | Load 0x0,0x13
00b7 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00b8 e001 | | Load 0x0,0x1
00b9 e015 | | Load 0x0,0x15
00ba e023 | # | Load 0x0,0x23
00bb e016 | | Load 0x0,0x16
00bc e017 | | Load 0x0,0x17
00bd e018 | | Load 0x0,0x18
00be 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00bf 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00c0 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00c1 e220 | | Load 0x1,0x20
00c2 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00c3 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00c4 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00c5 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00c6 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00c7 00b6 | | Action Make_Scope
00c8 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00c9 481d |H | Short_Literal 0x1d
00ca e211 | | Load 0x1,0x11
00cb 020e | | Execute Module,Augment_Imports
00cc e211 | | Load 0x1,0x11
00cd 020d | | Execute Module,Elaborate
00ce BODY_0008:
00ce 00bc | | Action Signal_Activated
00cf 00bb | | Action Signal_Completion
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00ec | | .CONST 0x00ec ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 000b | | .CONST 0x000b ; Number of locals
00d3 INIT_00d0:
00d3 e5f8 | | Load 0x2,-0x8
00d4 e001 | | Load 0x0,0x1
00d5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
00d6 e5f8 | | Load 0x2,-0x8
00d7 e001 | | Load 0x0,0x1
00d8 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
00d9 e006 | | Load 0x0,0x6
00da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00db 03f1 | | Declare_Variable Discrete,With_Value
00dc e024 | $ | Load 0x0,0x24
00dd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00de 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00df 00e1 | | Load_Encached Boolean_Cache
00e0 e001 | | Load 0x0,0x1
00e1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00e2 00e1 | | Load_Encached Boolean_Cache
00e3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00e4 e001 | | Load 0x0,0x1
00e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e6 e001 | | Load 0x0,0x1
00e7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00e8 029f 04ab | | Declare_Subprogram INIT_04a8,For_Call
00ea 029f 04e3 | | Declare_Subprogram INIT_04e0,For_Call
00ec BODY_00d0:
00ec 00cf | | Action Mark_Auxiliary
00ed e402 | | Load 0x2,0x2
00ee 01d9 | | Execute Vector,Reverse_Bounds
00ef 0263 | c | Execute Discrete,Above_Bound
00f0 70ab |p | Jump_Nonzero 0x19c
00f1 00d8 | | Load_Top At_Offset_0
00f2 e402 | | Load 0x2,0x2
00f3 01d7 | | Execute Vector,Field_Read
00f4 a408 | | Store_Unchecked 0x2,0x8
00f5 e408 | | Load 0x2,0x8
00f6 e001 | | Load 0x0,0x1
00f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00f8 a406 | | Store_Unchecked 0x2,0x6
00f9 e406 | | Load 0x2,0x6
00fa 0f02 | | Execute_Immediate Equal,0x2
00fb 7003 |p | Jump_Nonzero 0xff
00fc e406 | | Load 0x2,0x6
00fd 0f03 | | Execute_Immediate Equal,0x3
00fe 6832 |h2 | Jump_Zero 0x131
00ff 4801 |H | Short_Literal 0x1
0100 e408 | | Load 0x2,0x8
0101 e001 | | Load 0x0,0x1
0102 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0103 e013 | | Load 0x0,0x13
0104 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0105 702b |p+ | Jump_Nonzero 0x131
0106 4801 |H | Short_Literal 0x1
0107 e408 | | Load 0x2,0x8
0108 e001 | | Load 0x0,0x1
0109 1818 | | Execute Package,Field_Execute,Field_Number 0x18
010a e001 | | Load 0x0,0x1
010b 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
010c a409 | | Store_Unchecked 0x2,0x9
010d e5f7 | | Load 0x2,-0x9
010e e409 | | Load 0x2,0x9
010f e5f9 | | Load 0x2,-0x7
0110 e5fa | | Load 0x2,-0x6
0111 0119 | | Execute Any,Check_In_Formal_Type
0112 e5fa | | Load 0x2,-0x6
0113 4ffb |O | Short_Literal -0x5
0114 4802 |H | Short_Literal 0x2
0115 0099 | | Action Reference_Dynamic
0116 4ffc |O | Short_Literal -0x4
0117 4802 |H | Short_Literal 0x2
0118 0099 | | Action Reference_Dynamic
0119 4ffd |O | Short_Literal -0x3
011a 4802 |H | Short_Literal 0x2
011b 0099 | | Action Reference_Dynamic
011c 4ffe |O | Short_Literal -0x2
011d 4802 |H | Short_Literal 0x2
011e 0099 | | Action Reference_Dynamic
011f 4fff |O | Short_Literal -0x1
0120 4802 |H | Short_Literal 0x2
0121 0099 | | Action Reference_Dynamic
0122 820d | | Call 0x1,0xd
0123 e409 | | Load 0x2,0x9
0124 e001 | | Load 0x0,0x1
0125 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0126 a403 | | Store_Unchecked 0x2,0x3
0127 4800 |H | Short_Literal 0x0
0128 e403 | | Load 0x2,0x3
0129 e006 | | Load 0x0,0x6
012a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
012b 7041 |pA | Jump_Nonzero 0x16d
012c e403 | | Load 0x2,0x3
012d e5f8 | | Load 0x2,-0x8
012e e001 | | Load 0x0,0x1
012f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0130 450a |E | Exit_Suprogram New_Top_Offset 0xa
0131 e406 | | Load 0x2,0x6
0132 0f07 | | Execute_Immediate Equal,0x7
0133 681c |h | Jump_Zero 0x150
0134 4800 |H | Short_Literal 0x0
0135 a407 | | Store_Unchecked 0x2,0x7
0136 e403 | | Load 0x2,0x3
0137 00e1 | | Load_Encached Boolean_Cache
0138 e408 | | Load 0x2,0x8
0139 e5f9 | | Load 0x2,-0x7
013a e5fa | | Load 0x2,-0x6
013b 0119 | | Execute Any,Check_In_Formal_Type
013c 85fb | | Call 0x2,-0x5
013d c405 | | Store 0x2,0x5
013e c403 | | Store 0x2,0x3
013f e405 | | Load 0x2,0x5
0140 6803 |h | Jump_Zero 0x144
0141 4801 |H | Short_Literal 0x1
0142 a407 | | Store_Unchecked 0x2,0x7
0143 7829 |x) | Jump 0x16d
0144 4800 |H | Short_Literal 0x0
0145 e403 | | Load 0x2,0x3
0146 e006 | | Load 0x0,0x6
0147 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0148 7005 |p | Jump_Nonzero 0x14e
0149 e403 | | Load 0x2,0x3
014a e5f8 | | Load 0x2,-0x8
014b e001 | | Load 0x0,0x1
014c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
014d 450a |E | Exit_Suprogram New_Top_Offset 0xa
014e 840a | | Call 0x2,0xa
014f 781d |x | Jump 0x16d
0150 e407 | | Load 0x2,0x7
0151 701b |p | Jump_Nonzero 0x16d
0152 e406 | | Load 0x2,0x6
0153 e216 | | Load 0x1,0x16
0154 0260 | ` | Execute Discrete,In_Type
0155 6817 |h | Jump_Zero 0x16d
0156 e403 | | Load 0x2,0x3
0157 00e1 | | Load_Encached Boolean_Cache
0158 e408 | | Load 0x2,0x8
0159 e5f9 | | Load 0x2,-0x7
015a e5fa | | Load 0x2,-0x6
015b 0119 | | Execute Any,Check_In_Formal_Type
015c 85fb | | Call 0x2,-0x5
015d c405 | | Store 0x2,0x5
015e c403 | | Store 0x2,0x3
015f e405 | | Load 0x2,0x5
0160 6801 |h | Jump_Zero 0x162
0161 780b |x | Jump 0x16d
0162 4800 |H | Short_Literal 0x0
0163 e403 | | Load 0x2,0x3
0164 e006 | | Load 0x0,0x6
0165 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0166 7005 |p | Jump_Nonzero 0x16c
0167 e403 | | Load 0x2,0x3
0168 e5f8 | | Load 0x2,-0x8
0169 e001 | | Load 0x0,0x1
016a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
016b 450a |E | Exit_Suprogram New_Top_Offset 0xa
016c 840a | | Call 0x2,0xa
016d e5f8 | | Load 0x2,-0x8
016e e001 | | Load 0x0,0x1
016f 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0170 7001 |p | Jump_Nonzero 0x172
0171 450a |E | Exit_Suprogram New_Top_Offset 0xa
0172 e406 | | Load 0x2,0x6
0173 0f0a | | Execute_Immediate Equal,0xa
0174 6821 |h! | Jump_Zero 0x196
0175 4801 |H | Short_Literal 0x1
0176 e408 | | Load 0x2,0x8
0177 e001 | | Load 0x0,0x1
0178 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0179 e024 | $ | Load 0x0,0x24
017a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
017b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
017c a404 | | Store_Unchecked 0x2,0x4
017d e404 | | Load 0x2,0x4
017e e024 | $ | Load 0x0,0x24
017f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0180 180f | | Execute Package,Field_Execute,Field_Number 0xf
0181 7018 |p | Jump_Nonzero 0x19a
0182 e403 | | Load 0x2,0x3
0183 e408 | | Load 0x2,0x8
0184 e001 | | Load 0x0,0x1
0185 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0186 4801 |H | Short_Literal 0x1
0187 e404 | | Load 0x2,0x4
0188 e024 | $ | Load 0x0,0x24
0189 1b14 | | Execute Package,Field_Read,Field_Number 0x14
018a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
018b c403 | | Store 0x2,0x3
018c 4800 |H | Short_Literal 0x0
018d e403 | | Load 0x2,0x3
018e e006 | | Load 0x0,0x6
018f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0190 7009 |p | Jump_Nonzero 0x19a
0191 e403 | | Load 0x2,0x3
0192 e5f8 | | Load 0x2,-0x8
0193 e001 | | Load 0x0,0x1
0194 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0195 450a |E | Exit_Suprogram New_Top_Offset 0xa
0196 e406 | | Load 0x2,0x6
0197 0f0c | | Execute_Immediate Equal,0xc
0198 6801 |h | Jump_Zero 0x19a
0199 840b | | Call 0x2,0xb
019a 00c8 | | Action Pop_Auxiliary_Range
019b 3f55 |?U | Loop_Increasing 0xf1
019c 450a |E | Exit_Suprogram New_Top_Offset 0xa
019d 0000 0000 | | .XXX[0x3]
019f 0000 | |
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 0213 | | .CONST 0x0213 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 0014 | | .CONST 0x0014 ; Number of locals
01a3 INIT_01a0:
01a3 e5f9 | | Load 0x2,-0x7
01a4 e001 | | Load 0x0,0x1
01a5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01a6 e001 | | Load 0x0,0x1
01a7 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01a8 03f1 | | Declare_Variable Discrete,With_Value
01a9 e006 | | Load 0x0,0x6
01aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ab 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01ac e018 | | Load 0x0,0x18
01ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01ae 02c7 | | Declare_Variable Any
01af 00d8 | | Load_Top At_Offset_0
01b0 1c00 | | Execute_Immediate Run_Utility,0x0
01b1 e025 | % | Load 0x0,0x25
01b2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b3 4801 |H | Short_Literal 0x1
01b4 4900 |I | Short_Literal 0x100
01b5 00e9 | | Load_Encached String_Cache
01b6 035b | [ | Declare_Type Array,Constrained
01b7 0337 | 7 | Declare_Variable Array
01b8 e002 | | Load 0x0,0x2
01b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ba 02c7 | | Declare_Variable Any
01bb 00d8 | | Load_Top At_Offset_0
01bc 1c00 | | Execute_Immediate Run_Utility,0x0
01bd 00e3 | | Load_Encached Natural_Cache
01be 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
01bf 00e3 | | Load_Encached Natural_Cache
01c0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01c1 029e 0513 | | Declare_Subprogram INIT_0510,For_Call,Unelaborated
01c3 029e 0523 | #| Declare_Subprogram INIT_0520,For_Call,Unelaborated
01c5 e026 | & | Load 0x0,0x26
01c6 e027 | ' | Load 0x0,0x27
01c7 e5fa | | Load 0x2,-0x6
01c8 4ffb |O | Short_Literal -0x5
01c9 4802 |H | Short_Literal 0x2
01ca 0099 | | Action Reference_Dynamic
01cb 4ffc |O | Short_Literal -0x4
01cc 4802 |H | Short_Literal 0x2
01cd 0099 | | Action Reference_Dynamic
01ce 480a |H | Short_Literal 0xa
01cf 4802 |H | Short_Literal 0x2
01d0 0099 | | Action Reference_Dynamic
01d1 480b |H | Short_Literal 0xb
01d2 4802 |H | Short_Literal 0x2
01d3 0099 | | Action Reference_Dynamic
01d4 4ffe |O | Short_Literal -0x2
01d5 4802 |H | Short_Literal 0x2
01d6 0099 | | Action Reference_Dynamic
01d7 0092 17e0 | | Action Push_String_Extended,0x17e0 ; "--/"
01d9 e028 | ( | Load 0x0,0x28
01da 0387 | | Declare_Variable Package
01db 00d8 | | Load_Top At_Offset_0
01dc 020f | | Execute Module,Activate
01dd 00d8 | | Load_Top At_Offset_0
01de 1b16 | | Execute Package,Field_Read,Field_Number 0x16
01df 02a0 | | Declare_Subprogram Null_Subprogram
01e0 4801 |H | Short_Literal 0x1
01e1 032d | - | Declare_Type Record,Defined
01e2 029e 0553 | S| Declare_Subprogram INIT_0550,For_Call,Unelaborated
01e4 029e 055b | [| Declare_Subprogram INIT_0558,For_Call,Unelaborated
01e6 029e 056b | k| Declare_Subprogram INIT_0568,For_Call,Unelaborated
01e8 e029 | ) | Load 0x0,0x29
01e9 e02a | * | Load 0x0,0x2a
01ea e40d | | Load 0x2,0xd
01eb 480e |H | Short_Literal 0xe
01ec 4802 |H | Short_Literal 0x2
01ed 0099 | | Action Reference_Dynamic
01ee 480f |H | Short_Literal 0xf
01ef 4802 |H | Short_Literal 0x2
01f0 0099 | | Action Reference_Dynamic
01f1 4810 |H | Short_Literal 0x10
01f2 4802 |H | Short_Literal 0x2
01f3 0099 | | Action Reference_Dynamic
01f4 e025 | % | Load 0x0,0x25
01f5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01f6 0387 | | Declare_Variable Package
01f7 00d8 | | Load_Top At_Offset_0
01f8 020f | | Execute Module,Activate
01f9 480a |H | Short_Literal 0xa
01fa 4802 |H | Short_Literal 0x2
01fb 0099 | | Action Reference_Dynamic
01fc 00c7 | | Action Elaborate_Subprogram
01fd 480b |H | Short_Literal 0xb
01fe 4802 |H | Short_Literal 0x2
01ff 0099 | | Action Reference_Dynamic
0200 00c7 | | Action Elaborate_Subprogram
0201 480e |H | Short_Literal 0xe
0202 4802 |H | Short_Literal 0x2
0203 0099 | | Action Reference_Dynamic
0204 00c7 | | Action Elaborate_Subprogram
0205 480f |H | Short_Literal 0xf
0206 4802 |H | Short_Literal 0x2
0207 0099 | | Action Reference_Dynamic
0208 00c7 | | Action Elaborate_Subprogram
0209 4810 |H | Short_Literal 0x10
020a 4802 |H | Short_Literal 0x2
020b 0099 | | Action Reference_Dynamic
020c 00c7 | | Action Elaborate_Subprogram
020d 029f 057b | {| Declare_Subprogram INIT_0578,For_Call
020f 029f 05bb | | Declare_Subprogram INIT_05b8,For_Call
0211 029f 06db | | Declare_Subprogram INIT_06d8,For_Call
0213 BODY_01a0:
0213 e402 | | Load 0x2,0x2
0214 0f0a | | Execute_Immediate Equal,0xa
0215 6815 |h | Jump_Zero 0x22b
0216 e407 | | Load 0x2,0x7
0217 e017 | | Load 0x0,0x17
0218 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0219 e018 | | Load 0x0,0x18
021a 181e | | Execute Package,Field_Execute,Field_Number 0x1e
021b 00ea | | Load_Encached Null_String_Cache
021c 4801 |H | Short_Literal 0x1
021d e5f9 | | Load 0x2,-0x7
021e e001 | | Load 0x0,0x1
021f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0220 821c | | Call 0x1,0x1c
0221 4800 |H | Short_Literal 0x0
0222 e002 | | Load 0x0,0x2
0223 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0224 c407 | | Store 0x2,0x7
0225 8412 | | Call 0x2,0x12
0226 e407 | | Load 0x2,0x7
0227 e002 | | Load 0x0,0x2
0228 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0229 c407 | | Store 0x2,0x7
022a 4508 |E | Exit_Suprogram New_Top_Offset 0x8
022b e402 | | Load 0x2,0x2
022c 0f0b | | Execute_Immediate Equal,0xb
022d 6803 |h | Jump_Zero 0x231
022e 4801 |H | Short_Literal 0x1
022f 8413 | | Call 0x2,0x13
0230 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0231 e402 | | Load 0x2,0x2
0232 0f0c | | Execute_Immediate Equal,0xc
0233 6802 |h | Jump_Zero 0x236
0234 8414 | | Call 0x2,0x14
0235 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0236 e402 | | Load 0x2,0x2
0237 0f0d | | Execute_Immediate Equal,0xd
0238 6802 |h | Jump_Zero 0x23b
0239 4802 |H | Short_Literal 0x2
023a 8413 | | Call 0x2,0x13
023b 4508 |E | Exit_Suprogram New_Top_Offset 0x8
023c 0000 0000 | | .BLANK 0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0246 | F | .CONST 0x0246 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 00da | | Load_Top At_Offset_2
0244 e001 | | Load 0x0,0x1
0245 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0246 BODY_0240:
0246 00db | | Load_Top At_Offset_3
0247 e001 | | Load 0x0,0x1
0248 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0249 0f0a | | Execute_Immediate Equal,0xa
024a 680f |h | Jump_Zero 0x25a
024b 00cf | | Action Mark_Auxiliary
024c 4802 |H | Short_Literal 0x2
024d 4801 |H | Short_Literal 0x1
024e 0007 | | Action Break_Optional
024f 00d8 | | Load_Top At_Offset_0
0250 e402 | | Load 0x2,0x2
0251 01d7 | | Execute Vector,Field_Read
0252 8219 | | Call 0x1,0x19
0253 6802 |h | Jump_Zero 0x256
0254 00d8 | | Load_Top At_Offset_0
0255 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0256 00c8 | | Action Pop_Auxiliary_Range
0257 3ff7 |? | Loop_Increasing 0x24f
0258 00ce | | Action Pop_Auxiliary
0259 7817 |x | Jump 0x271
025a 00cf | | Action Mark_Auxiliary
025b 00d9 | | Load_Top At_Offset_1
025c 01dc | | Execute Vector,Last
025d 4802 |H | Short_Literal 0x2
025e 0263 | c | Execute Discrete,Above_Bound
025f 7009 |p | Jump_Nonzero 0x269
0260 00d8 | | Load_Top At_Offset_0
0261 e402 | | Load 0x2,0x2
0262 01d7 | | Execute Vector,Field_Read
0263 8219 | | Call 0x1,0x19
0264 6802 |h | Jump_Zero 0x267
0265 00d8 | | Load_Top At_Offset_0
0266 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0267 00c8 | | Action Pop_Auxiliary_Range
0268 3ff7 |? | Loop_Increasing 0x260
0269 00ce | | Action Pop_Auxiliary
026a 4801 |H | Short_Literal 0x1
026b 00d9 | | Load_Top At_Offset_1
026c 01d7 | | Execute Vector,Field_Read
026d 8219 | | Call 0x1,0x19
026e 6802 |h | Jump_Zero 0x271
026f 4801 |H | Short_Literal 0x1
0270 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0271 4800 |H | Short_Literal 0x0
0272 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0273 0000 0000 | | .BLANK 0000[0x5]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027e | ~ | .CONST 0x027e ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0002 | | .CONST 0x0002 ; Number of locals
027b INIT_0278:
027b 00da | | Load_Top At_Offset_2
027c e001 | | Load 0x0,0x1
027d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
027e BODY_0278:
027e 00db | | Load_Top At_Offset_3
027f e001 | | Load 0x0,0x1
0280 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0281 0f0b | | Execute_Immediate Equal,0xb
0282 680f |h | Jump_Zero 0x292
0283 00cf | | Action Mark_Auxiliary
0284 4801 |H | Short_Literal 0x1
0285 4802 |H | Short_Literal 0x2
0286 0007 | | Action Break_Optional
0287 00d8 | | Load_Top At_Offset_0
0288 e402 | | Load 0x2,0x2
0289 01d7 | | Execute Vector,Field_Read
028a 8219 | | Call 0x1,0x19
028b 6802 |h | Jump_Zero 0x28e
028c 00d8 | | Load_Top At_Offset_0
028d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
028e 00c8 | | Action Pop_Auxiliary_Range
028f 37f7 |7 | Loop_Decreasing 0x287
0290 00ce | | Action Pop_Auxiliary
0291 7817 |x | Jump 0x2a9
0292 4801 |H | Short_Literal 0x1
0293 00d9 | | Load_Top At_Offset_1
0294 01d7 | | Execute Vector,Field_Read
0295 8219 | | Call 0x1,0x19
0296 6802 |h | Jump_Zero 0x299
0297 4801 |H | Short_Literal 0x1
0298 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0299 00cf | | Action Mark_Auxiliary
029a 00d9 | | Load_Top At_Offset_1
029b 01dc | | Execute Vector,Last
029c 4802 |H | Short_Literal 0x2
029d 0263 | c | Execute Discrete,Above_Bound
029e 7009 |p | Jump_Nonzero 0x2a8
029f 00d8 | | Load_Top At_Offset_0
02a0 e402 | | Load 0x2,0x2
02a1 01d7 | | Execute Vector,Field_Read
02a2 8219 | | Call 0x1,0x19
02a3 6802 |h | Jump_Zero 0x2a6
02a4 00d8 | | Load_Top At_Offset_0
02a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02a6 00c8 | | Action Pop_Auxiliary_Range
02a7 3ff7 |? | Loop_Increasing 0x29f
02a8 00ce | | Action Pop_Auxiliary
02a9 4800 |H | Short_Literal 0x0
02aa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02ab 0000 0000 | | .BLANK 0000[0x5]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3 | | .CONST 0x02b3 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0001 | | .CONST 0x0001 ; Number of locals
02b3 BODY_02b0:
02b3 INIT_02b0:
02b3 00da | | Load_Top At_Offset_2
02b4 e013 | | Load 0x0,0x13
02b5 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
02b6 0f0f | | Execute_Immediate Equal,0xf
02b7 6808 |h | Jump_Zero 0x2c0
02b8 00da | | Load_Top At_Offset_2
02b9 e024 | $ | Load 0x0,0x24
02ba 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02bb 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02bc e024 | $ | Load 0x0,0x24
02bd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02be 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
02bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02c0 4800 |H | Short_Literal 0x0
02c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02c2 0000 0000 | | .BLANK 0000[0x6]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb 00da | | Load_Top At_Offset_2
02cc e024 | $ | Load 0x0,0x24
02cd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02ce 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02cf e024 | $ | Load 0x0,0x24
02d0 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02d1 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
02d2 00db | | Load_Top At_Offset_3
02d3 e024 | $ | Load 0x0,0x24
02d4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02d5 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02d6 01cc | | Execute Vector,Catenate
02d7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02df | | .CONST 0x02df ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0003 | | .CONST 0x0003 ; Number of locals
02db INIT_02d8:
02db e024 | $ | Load 0x0,0x24
02dc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02de 00e3 | | Load_Encached Natural_Cache
02df BODY_02d8:
02df e5ff | | Load 0x2,-0x1
02e0 8217 | | Call 0x1,0x17
02e1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02e2 00d8 | | Load_Top At_Offset_0
02e3 681d |h | Jump_Zero 0x301
02e4 00d8 | | Load_Top At_Offset_0
02e5 e5ff | | Load 0x2,-0x1
02e6 e001 | | Load 0x0,0x1
02e7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02e8 e024 | $ | Load 0x0,0x24
02e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02ea 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02eb 0032 | 2 | Store_Top Heap_Access,At_Offset_2
02ec 00d9 | | Load_Top At_Offset_1
02ed e024 | $ | Load 0x0,0x24
02ee 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02ef 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02f0 e024 | $ | Load 0x0,0x24
02f1 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02f2 187f | | Execute Package,Field_Execute,Field_Number 0x7f
02f3 6805 |h | Jump_Zero 0x2f9
02f4 00d9 | | Load_Top At_Offset_1
02f5 e024 | $ | Load 0x0,0x24
02f6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02f7 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
02f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02f9 00d9 | | Load_Top At_Offset_1
02fa e024 | $ | Load 0x0,0x24
02fb 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02fc 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02fd e024 | $ | Load 0x0,0x24
02fe 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02ff 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0300 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0301 00ea | | Load_Encached Null_String_Cache
0302 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0303 0000 0000 | | .BLANK 0000[0x5]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030e | | .CONST 0x030e ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0002 | | .CONST 0x0002 ; Number of locals
030b INIT_0308:
030b e024 | $ | Load 0x0,0x24
030c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
030d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
030e BODY_0308:
030e 00db | | Load_Top At_Offset_3
030f e013 | | Load 0x0,0x13
0310 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0311 0b0f | | Execute_Immediate Case_Compare,0xf
0312 7004 |p | Jump_Nonzero 0x317
0313 0f01 | | Execute_Immediate Equal,0x1
0314 7015 |p | Jump_Nonzero 0x32a
0315 e016 | | Load 0x0,0x16
0316 0257 | W | Execute Discrete,Raise
0317 00d1 | | Pop_Control Pop_Count_1
0318 00db | | Load_Top At_Offset_3
0319 e024 | $ | Load 0x0,0x24
031a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
031b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
031c 0031 | 1 | Store_Top Heap_Access,At_Offset_1
031d 00d8 | | Load_Top At_Offset_0
031e e024 | $ | Load 0x0,0x24
031f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0320 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0321 6805 |h | Jump_Zero 0x327
0322 00d8 | | Load_Top At_Offset_0
0323 e024 | $ | Load 0x0,0x24
0324 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0325 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0326 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0327 00d8 | | Load_Top At_Offset_0
0328 821a | | Call 0x1,0x1a
0329 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
032a 00db | | Load_Top At_Offset_3
032b e013 | | Load 0x0,0x13
032c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
032d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
032e 0000 0000 | | .XXX[0x2]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 033d | = | .CONST 0x033d ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0004 | | .CONST 0x0004 ; Number of locals
0333 INIT_0330:
0333 e024 | $ | Load 0x0,0x24
0334 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0335 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0336 00db | | Load_Top At_Offset_3
0337 e001 | | Load 0x0,0x1
0338 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0339 e007 | | Load 0x0,0x7
033a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
033b 03f1 | | Declare_Variable Discrete,With_Value
033c 00e3 | | Load_Encached Natural_Cache
033d BODY_0330:
033d e5ff | | Load 0x2,-0x1
033e 8218 | | Call 0x1,0x18
033f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0340 00d8 | | Load_Top At_Offset_0
0341 6820 |h | Jump_Zero 0x362
0342 00d8 | | Load_Top At_Offset_0
0343 e5ff | | Load 0x2,-0x1
0344 e001 | | Load 0x0,0x1
0345 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0346 e024 | $ | Load 0x0,0x24
0347 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0348 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0349 0033 | 3 | Store_Top Heap_Access,At_Offset_3
034a 00d9 | | Load_Top At_Offset_1
034b 00db | | Load_Top At_Offset_3
034c e024 | $ | Load 0x0,0x24
034d 1b16 | | Execute Package,Field_Read,Field_Number 0x16
034e 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
034f e024 | $ | Load 0x0,0x24
0350 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0351 1881 | | Execute Package,Field_Execute,Field_Number 0x81
0352 6806 |h | Jump_Zero 0x359
0353 00d9 | | Load_Top At_Offset_1
0354 00db | | Load_Top At_Offset_3
0355 e024 | $ | Load 0x0,0x24
0356 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0357 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0358 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0359 00d9 | | Load_Top At_Offset_1
035a 00db | | Load_Top At_Offset_3
035b e024 | $ | Load 0x0,0x24
035c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
035d 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
035e e024 | $ | Load 0x0,0x24
035f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0360 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
0361 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0362 00ea | | Load_Encached Null_String_Cache
0363 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0364 0000 0000 | | .BLANK 0000[0x4]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 0373 | s | .CONST 0x0373 ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0003 | | .CONST 0x0003 ; Number of locals
036b INIT_0368:
036b e018 | | Load 0x0,0x18
036c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
036d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
036e e018 | | Load 0x0,0x18
036f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0370 02c7 | | Declare_Variable Any
0371 00d8 | | Load_Top At_Offset_0
0372 1c00 | | Execute_Immediate Run_Utility,0x0
0373 BODY_0368:
0373 e018 | | Load 0x0,0x18
0374 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0375 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0376 00d9 | | Load_Top At_Offset_1
0377 0120 | | Execute Any,Is_Value
0378 6803 |h | Jump_Zero 0x37c
0379 e018 | | Load 0x0,0x18
037a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
037b 7801 |x | Jump 0x37d
037c 00d9 | | Load_Top At_Offset_1
037d 6062 |`b | Indirect_Literal Discrete,0x3e0,{0x00000000, 0x00004000}
037e e017 | | Load 0x0,0x17
037f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0380 e02b | + | Load 0x0,0x2b
0381 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0382 e018 | | Load 0x0,0x18
0383 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0384 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0385 e5ff | | Load 0x2,-0x1
0386 e018 | | Load 0x0,0x18
0387 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0388 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0389 c403 | | Store 0x2,0x3
038a 005a | Z | Store_Top Discrete,At_Offset_2
038b 00d9 | | Load_Top At_Offset_1
038c 460e |F | Jump_Case 0xf
038d 7828 |x( | Jump 0x3b6 ; case 0x0
038e 780d |x | Jump 0x39c ; case 0x1
038f 780c |x | Jump 0x39c ; case 0x2
0390 783b |x; | Jump 0x3cc ; case 0x3
0391 780a |x | Jump 0x39c ; case 0x4
0392 7809 |x | Jump 0x39c ; case 0x5
0393 7808 |x | Jump 0x39c ; case 0x6
0394 7807 |x | Jump 0x39c ; case 0x7
0395 7806 |x | Jump 0x39c ; case 0x8
0396 7805 |x | Jump 0x39c ; case 0x9
0397 7804 |x | Jump 0x39c ; case 0xa
0398 7803 |x | Jump 0x39c ; case 0xb
0399 7802 |x | Jump 0x39c ; case 0xc
039a 7801 |x | Jump 0x39c ; case 0xd
039b 7800 |x | Jump 0x39c ; case 0xe
039c e006 | | Load 0x0,0x6
039d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
039e 4801 |H | Short_Literal 0x1
039f 4802 |H | Short_Literal 0x2
03a0 e013 | | Load 0x0,0x13
03a1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03a2 035b | [ | Declare_Type Array,Constrained
03a3 0337 | 7 | Declare_Variable Array
03a4 e5ff | | Load 0x2,-0x1
03a5 e013 | | Load 0x0,0x13
03a6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03a7 4801 |H | Short_Literal 0x1
03a8 00da | | Load_Top At_Offset_2
03a9 01d6 | | Execute Vector,Field_Write
03aa e5ff | | Load 0x2,-0x1
03ab e402 | | Load 0x2,0x2
03ac e013 | | Load 0x0,0x13
03ad 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
03ae 4802 |H | Short_Literal 0x2
03af 00da | | Load_Top At_Offset_2
03b0 01d6 | | Execute Vector,Field_Write
03b1 602a |`* | Indirect_Literal Discrete,0x3dc,{0x00000000, 0x0000401a}
03b2 e006 | | Load 0x0,0x6
03b3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
03b4 c5fd | | Store 0x2,-0x3
03b5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03b6 e5fe | | Load 0x2,-0x2
03b7 e002 | | Load 0x0,0x2
03b8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03b9 6806 |h | Jump_Zero 0x3c0
03ba e5fe | | Load 0x2,-0x2
03bb 4801 |H | Short_Literal 0x1
03bc e002 | | Load 0x0,0x2
03bd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03be c5fe | | Store 0x2,-0x2
03bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03c0 e5fe | | Load 0x2,-0x2
03c1 e017 | | Load 0x0,0x17
03c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03c3 e018 | | Load 0x0,0x18
03c4 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03c5 00ea | | Load_Encached Null_String_Cache
03c6 e5ff | | Load 0x2,-0x1
03c7 4801 |H | Short_Literal 0x1
03c8 e002 | | Load 0x0,0x2
03c9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03ca c5fe | | Store 0x2,-0x2
03cb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03cc e5fe | | Load 0x2,-0x2
03cd e017 | | Load 0x0,0x17
03ce 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03cf e018 | | Load 0x0,0x18
03d0 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
03d1 e018 | | Load 0x0,0x18
03d2 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03d3 00ea | | Load_Encached Null_String_Cache
03d4 e5ff | | Load 0x2,-0x1
03d5 4801 |H | Short_Literal 0x1
03d6 e002 | | Load 0x0,0x2
03d7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03d8 c5fe | | Store 0x2,-0x2
03d9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03da 0000 0000 | | .XXX[0x2]
03dc 0000 0000 | | .LITERAL {0x00000000, 0x0000401a}
03e0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03e4 0000 0000 | | .BLANK 0000[0x4]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03f3 | | .CONST 0x03f3 ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0003 | | .CONST 0x0003 ; Number of locals
03eb INIT_03e8:
03eb 0092 17e1 | | Action Push_String_Extended,0x17e1 ; "!Machine.Temporary.Downloader_Temp_D"
03ed 4800 |H | Short_Literal 0x0
03ee 4803 |H | Short_Literal 0x3
03ef 4804 |H | Short_Literal 0x4
03f0 e5ff | | Load 0x2,-0x1
03f1 e009 | | Load 0x0,0x9
03f2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03f3 BODY_03e8:
03f3 00d9 | | Load_Top At_Offset_1
03f4 00d9 | | Load_Top At_Offset_1
03f5 01cc | | Execute Vector,Catenate
03f6 e5fe | | Load 0x2,-0x2
03f7 01cc | | Execute Vector,Catenate
03f8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03f9 0000 0000 | | .BLANK 0000[0x7]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0415 | | .CONST 0x0415 ; Address of begin
0401 0493 | | .CONST 0x0493 ; Address of exception handler
0402 0006 | | .CONST 0x0006 ; Number of locals
0403 INIT_0400:
0403 e018 | | Load 0x0,0x18
0404 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0405 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0406 e018 | | Load 0x0,0x18
0407 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0408 02c7 | | Declare_Variable Any
0409 00d8 | | Load_Top At_Offset_0
040a 1c00 | | Execute_Immediate Run_Utility,0x0
040b e5ff | | Load 0x2,-0x1
040c e018 | | Load 0x0,0x18
040d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
040e 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
040f e5ff | | Load 0x2,-0x1
0410 e018 | | Load 0x0,0x18
0411 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0412 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0413 029f 0703 | | Declare_Subprogram INIT_0700,For_Call
0415 BODY_0400:
0415 00da | | Load_Top At_Offset_2
0416 01db | | Execute Vector,Length
0417 702c |p, | Jump_Nonzero 0x444
0418 e018 | | Load 0x0,0x18
0419 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
041a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
041b e403 | | Load 0x2,0x3
041c 0120 | | Execute Any,Is_Value
041d 6803 |h | Jump_Zero 0x421
041e e018 | | Load 0x0,0x18
041f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0420 7801 |x | Jump 0x422
0421 e403 | | Load 0x2,0x3
0422 6081 |` | Indirect_Literal Discrete,0x4a4,{0x00000000, 0x00004000}
0423 e017 | | Load 0x0,0x17
0424 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0425 e02b | + | Load 0x0,0x2b
0426 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0427 e018 | | Load 0x0,0x18
0428 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0429 1816 | | Execute Package,Field_Execute,Field_Number 0x16
042a 0092 17e2 | | Action Push_String_Extended,0x17e2 ; "$"
042c e018 | | Load 0x0,0x18
042d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
042e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
042f c403 | | Store 0x2,0x3
0430 c402 | | Store 0x2,0x2
0431 4801 |H | Short_Literal 0x1
0432 4801 |H | Short_Literal 0x1
0433 e013 | | Load 0x0,0x13
0434 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0435 035b | [ | Declare_Type Array,Constrained
0436 0337 | 7 | Declare_Variable Array
0437 e5ff | | Load 0x2,-0x1
0438 e013 | | Load 0x0,0x13
0439 1810 | | Execute Package,Field_Execute,Field_Number 0x10
043a 4801 |H | Short_Literal 0x1
043b 00da | | Load_Top At_Offset_2
043c 01d6 | | Execute Vector,Field_Write
043d 0092 17e2 | | Action Push_String_Extended,0x17e2 ; "$"
043f 6060 |`` | Indirect_Literal Discrete,0x4a0,{0x00000000, 0x00004009}
0440 e402 | | Load 0x2,0x2
0441 e006 | | Load 0x0,0x6
0442 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0443 7829 |x) | Jump 0x46d
0444 e018 | | Load 0x0,0x18
0445 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0446 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0447 e403 | | Load 0x2,0x3
0448 0120 | | Execute Any,Is_Value
0449 6803 |h | Jump_Zero 0x44d
044a e018 | | Load 0x0,0x18
044b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
044c 7801 |x | Jump 0x44e
044d e403 | | Load 0x2,0x3
044e 6055 |`U | Indirect_Literal Discrete,0x4a4,{0x00000000, 0x00004000}
044f e017 | | Load 0x0,0x17
0450 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0451 e02b | + | Load 0x0,0x2b
0452 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0453 e018 | | Load 0x0,0x18
0454 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0455 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0456 e404 | | Load 0x2,0x4
0457 e018 | | Load 0x0,0x18
0458 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0459 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
045a c403 | | Store 0x2,0x3
045b c402 | | Store 0x2,0x2
045c 4801 |H | Short_Literal 0x1
045d 4801 |H | Short_Literal 0x1
045e e013 | | Load 0x0,0x13
045f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0460 035b | [ | Declare_Type Array,Constrained
0461 0337 | 7 | Declare_Variable Array
0462 e5ff | | Load 0x2,-0x1
0463 e013 | | Load 0x0,0x13
0464 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0465 4801 |H | Short_Literal 0x1
0466 00da | | Load_Top At_Offset_2
0467 01d6 | | Execute Vector,Field_Write
0468 00db | | Load_Top At_Offset_3
0469 6036 |`6 | Indirect_Literal Discrete,0x4a0,{0x00000000, 0x00004009}
046a e402 | | Load 0x2,0x2
046b e006 | | Load 0x0,0x6
046c 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
046d e5fe | | Load 0x2,-0x2
046e e018 | | Load 0x0,0x18
046f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0470 027f | | Execute Discrete,Equal
0471 701f |p | Jump_Nonzero 0x491
0472 00db | | Load_Top At_Offset_3
0473 e018 | | Load 0x0,0x18
0474 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0475 e5fe | | Load 0x2,-0x2
0476 027f | | Execute Discrete,Equal
0477 7019 |p | Jump_Nonzero 0x491
0478 e015 | | Load 0x0,0x15
0479 180e | | Execute Package,Field_Execute,Field_Number 0xe
047a 4801 |H | Short_Literal 0x1
047b 4802 |H | Short_Literal 0x2
047c e013 | | Load 0x0,0x13
047d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
047e 035b | [ | Declare_Type Array,Constrained
047f 0337 | 7 | Declare_Variable Array
0480 e5ff | | Load 0x2,-0x1
0481 e013 | | Load 0x0,0x13
0482 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0483 4801 |H | Short_Literal 0x1
0484 00da | | Load_Top At_Offset_2
0485 01d6 | | Execute Vector,Field_Write
0486 e5fe | | Load 0x2,-0x2
0487 e013 | | Load 0x0,0x13
0488 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0489 4802 |H | Short_Literal 0x2
048a 00da | | Load_Top At_Offset_2
048b 01d6 | | Execute Vector,Field_Write
048c 600f |` | Indirect_Literal Discrete,0x49c,{0x00000000, 0x00004004}
048d e006 | | Load 0x0,0x6
048e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
048f e01d | | Load 0x0,0x1d
0490 0257 | W | Execute Discrete,Raise
0491 8406 | | Call 0x2,0x6
0492 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0493 TRAP_0400:
0493 e006 | | Load 0x0,0x6
0494 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0495 010f | | Execute Exception,Equal
0496 6804 |h | Jump_Zero 0x49b
0497 e006 | | Load 0x0,0x6
0498 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0499 a5fc | | Store_Unchecked 0x2,-0x4
049a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
049b 0100 | | Execute Exception,Raise
049c 0000 0000 | | .LITERAL {0x00000000, 0x00004004}
04a0 0000 0000 | | .LITERAL {0x00000000, 0x00004009}
04a4 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab | | .CONST 0x04ab ; Address of begin
04a9 0004 | | .CONST 0x0004 ; Address of exception handler
04aa 0001 | | .CONST 0x0001 ; Number of locals
04ab BODY_04a8:
04ab INIT_04a8:
04ab e408 | | Load 0x2,0x8
04ac e001 | | Load 0x0,0x1
04ad 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04ae a406 | | Store_Unchecked 0x2,0x6
04af e406 | | Load 0x2,0x6
04b0 e216 | | Load 0x1,0x16
04b1 0260 | ` | Execute Discrete,In_Type
04b2 7003 |p | Jump_Nonzero 0x4b6
04b3 e406 | | Load 0x2,0x6
04b4 0f07 | | Execute_Immediate Equal,0x7
04b5 6828 |h( | Jump_Zero 0x4de
04b6 e406 | | Load 0x2,0x6
04b7 0f07 | | Execute_Immediate Equal,0x7
04b8 6806 |h | Jump_Zero 0x4bf
04b9 e408 | | Load 0x2,0x8
04ba e5f9 | | Load 0x2,-0x7
04bb e5fa | | Load 0x2,-0x6
04bc 0119 | | Execute Any,Check_In_Formal_Type
04bd 85fc | | Call 0x2,-0x4
04be 7806 |x | Jump 0x4c5
04bf e5f7 | | Load 0x2,-0x9
04c0 e408 | | Load 0x2,0x8
04c1 e5f9 | | Load 0x2,-0x7
04c2 e5fa | | Load 0x2,-0x6
04c3 0119 | | Execute Any,Check_In_Formal_Type
04c4 85fd | | Call 0x2,-0x3
04c5 e408 | | Load 0x2,0x8
04c6 e001 | | Load 0x0,0x1
04c7 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04c8 a403 | | Store_Unchecked 0x2,0x3
04c9 4800 |H | Short_Literal 0x0
04ca e403 | | Load 0x2,0x3
04cb e006 | | Load 0x0,0x6
04cc 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
04cd 6807 |h | Jump_Zero 0x4d5
04ce e403 | | Load 0x2,0x3
04cf e408 | | Load 0x2,0x8
04d0 e5f9 | | Load 0x2,-0x7
04d1 e5fa | | Load 0x2,-0x6
04d2 0119 | | Execute Any,Check_In_Formal_Type
04d3 85fe | | Call 0x2,-0x2
04d4 c403 | | Store 0x2,0x3
04d5 4800 |H | Short_Literal 0x0
04d6 e403 | | Load 0x2,0x3
04d7 e006 | | Load 0x0,0x6
04d8 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
04d9 7004 |p | Jump_Nonzero 0x4de
04da e403 | | Load 0x2,0x3
04db e5f8 | | Load 0x2,-0x8
04dc e001 | | Load 0x0,0x1
04dd 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
04de 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04df 0000 | | .XXX[0x1]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e6 | | .CONST 0x04e6 ; Address of begin
04e1 0004 | | .CONST 0x0004 ; Address of exception handler
04e2 0002 | | .CONST 0x0002 ; Number of locals
04e3 INIT_04e0:
04e3 e408 | | Load 0x2,0x8
04e4 e001 | | Load 0x0,0x1
04e5 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04e6 BODY_04e0:
04e6 00cf | | Action Mark_Auxiliary
04e7 00d9 | | Load_Top At_Offset_1
04e8 01dc | | Execute Vector,Last
04e9 4802 |H | Short_Literal 0x2
04ea 0263 | c | Execute Discrete,Above_Bound
04eb 7023 |p# | Jump_Nonzero 0x50f
04ec 00d8 | | Load_Top At_Offset_0
04ed e602 | | Load 0x3,0x2
04ee 01d7 | | Execute Vector,Field_Read
04ef e024 | $ | Load 0x0,0x24
04f0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04f1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04f2 a404 | | Store_Unchecked 0x2,0x4
04f3 e404 | | Load 0x2,0x4
04f4 e024 | $ | Load 0x0,0x24
04f5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04f6 180f | | Execute Package,Field_Execute,Field_Number 0xf
04f7 7015 |p | Jump_Nonzero 0x50d
04f8 e403 | | Load 0x2,0x3
04f9 e408 | | Load 0x2,0x8
04fa e001 | | Load 0x0,0x1
04fb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04fc 4801 |H | Short_Literal 0x1
04fd e404 | | Load 0x2,0x4
04fe e024 | $ | Load 0x0,0x24
04ff 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0500 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0501 c403 | | Store 0x2,0x3
0502 4800 |H | Short_Literal 0x0
0503 e403 | | Load 0x2,0x3
0504 e006 | | Load 0x0,0x6
0505 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0506 7006 |p | Jump_Nonzero 0x50d
0507 e403 | | Load 0x2,0x3
0508 e5f8 | | Load 0x2,-0x8
0509 e001 | | Load 0x0,0x1
050a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
050b 00cc | | Action Pop_Block
050c 450a |E | Exit_Suprogram New_Top_Offset 0xa
050d 00c8 | | Action Pop_Auxiliary_Range
050e 3fdd |? | Loop_Increasing 0x4ec
050f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0513 | | .CONST 0x0513 ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0001 | | .CONST 0x0001 ; Number of locals
0513 BODY_0510:
0513 INIT_0510:
0513 e408 | | Load 0x2,0x8
0514 e409 | | Load 0x2,0x9
0515 027d | } | Execute Discrete,Greater
0516 6805 |h | Jump_Zero 0x51c
0517 00da | | Load_Top At_Offset_2
0518 e5fa | | Load 0x2,-0x6
0519 0119 | | Execute Any,Check_In_Formal_Type
051a 85fd | | Call 0x2,-0x3
051b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
051c 4800 |H | Short_Literal 0x0
051d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
051e 0000 0000 | | .XXX[0x2]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0523 | # | .CONST 0x0523 ; Address of begin
0521 0004 | | .CONST 0x0004 ; Address of exception handler
0522 0001 | | .CONST 0x0001 ; Number of locals
0523 BODY_0520:
0523 INIT_0520:
0523 e402 | | Load 0x2,0x2
0524 0f0a | | Execute_Immediate Equal,0xa
0525 7003 |p | Jump_Nonzero 0x529
0526 e402 | | Load 0x2,0x2
0527 0f0c | | Execute_Immediate Equal,0xc
0528 6808 |h | Jump_Zero 0x531
0529 0092 17e3 | | Action Push_String_Extended,0x17e3 ; "--/<error> "
052b e7fe | | Load 0x3,-0x2
052c 01cc | | Execute Vector,Catenate
052d 00db | | Load_Top At_Offset_3
052e e5fa | | Load 0x2,-0x6
052f 0119 | | Execute Any,Check_In_Formal_Type
0530 85fc | | Call 0x2,-0x4
0531 e006 | | Load 0x0,0x6
0532 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0533 4801 |H | Short_Literal 0x1
0534 4802 |H | Short_Literal 0x2
0535 e013 | | Load 0x0,0x13
0536 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0537 035b | [ | Declare_Type Array,Constrained
0538 0337 | 7 | Declare_Variable Array
0539 e7fe | | Load 0x3,-0x2
053a e013 | | Load 0x0,0x13
053b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
053c 4801 |H | Short_Literal 0x1
053d 00da | | Load_Top At_Offset_2
053e 01d6 | | Execute Vector,Field_Write
053f e7fd | | Load 0x3,-0x3
0540 e013 | | Load 0x0,0x13
0541 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0542 4802 |H | Short_Literal 0x2
0543 00da | | Load_Top At_Offset_2
0544 01d6 | | Execute Vector,Field_Write
0545 6006 |` | Indirect_Literal Discrete,0x54c,{0x00000000, 0x00004010}
0546 e006 | | Load 0x0,0x6
0547 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0548 c403 | | Store 0x2,0x3
0549 4504 |E | Exit_Suprogram New_Top_Offset 0x4
054a 0000 0000 | | .XXX[0x2]
054c 0000 0000 | | .LITERAL {0x00000000, 0x00004010}
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0553 | S | .CONST 0x0553 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0001 | | .CONST 0x0001 ; Number of locals
0553 BODY_0550:
0553 INIT_0550:
0553 00da | | Load_Top At_Offset_2
0554 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0555 e40c | | Load 0x2,0xc
0556 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0557 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055b | [ | .CONST 0x055b ; Address of begin
0559 0004 | | .CONST 0x0004 ; Address of exception handler
055a 0001 | | .CONST 0x0001 ; Number of locals
055b BODY_0558:
055b INIT_0558:
055b 00e1 | | Load_Encached Boolean_Cache
055c 00e2 | | Load_Encached Integer_Cache
055d e7fe | | Load 0x3,-0x2
055e e7ff | | Load 0x3,-0x1
055f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0560 e40c | | Load 0x2,0xc
0561 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0562 00d1 | | Pop_Control Pop_Count_1
0563 c7fd | | Store 0x3,-0x3
0564 c7fc | | Store 0x3,-0x4
0565 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0566 0000 0000 | | .XXX[0x2]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b | k | .CONST 0x056b ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0001 | | .CONST 0x0001 ; Number of locals
056b BODY_0568:
056b INIT_0568:
056b 00da | | Load_Top At_Offset_2
056c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
056d 4800 |H | Short_Literal 0x0
056e e40c | | Load 0x2,0xc
056f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0570 00db | | Load_Top At_Offset_3
0571 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0572 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0573 0000 0000 | | .BLANK 0000[0x5]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 0581 | | .CONST 0x0581 ; Address of begin
0579 0004 | | .CONST 0x0004 ; Address of exception handler
057a 0004 | | .CONST 0x0004 ; Number of locals
057b INIT_0578:
057b e40c | | Load 0x2,0xc
057c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
057d 029f 07ab | | Declare_Subprogram INIT_07a8,For_Call
057f 029f 07bb | | Declare_Subprogram INIT_07b8,For_Call
0581 BODY_0578:
0581 e40c | | Load 0x2,0xc
0582 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0583 e5f9 | | Load 0x2,-0x7
0584 821d | | Call 0x1,0x1d
0585 e5f8 | | Load 0x2,-0x8
0586 e5fa | | Load 0x2,-0x6
0587 0119 | | Execute Any,Check_In_Formal_Type
0588 e40c | | Load 0x2,0xc
0589 1817 | | Execute Package,Field_Execute,Field_Number 0x17
058a 0033 | 3 | Store_Top Heap_Access,At_Offset_3
058b 00cf | | Action Mark_Auxiliary
058c 7810 |x | Jump 0x59d
058d e407 | | Load 0x2,0x7
058e 8604 | | Call 0x3,0x4
058f e602 | | Load 0x3,0x2
0590 e40c | | Load 0x2,0xc
0591 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0592 4800 |H | Short_Literal 0x0
0593 e403 | | Load 0x2,0x3
0594 e006 | | Load 0x0,0x6
0595 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0596 7005 |p | Jump_Nonzero 0x59c
0597 e403 | | Load 0x2,0x3
0598 e5f9 | | Load 0x2,-0x7
0599 e001 | | Load 0x0,0x1
059a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
059b 7804 |x | Jump 0x5a0
059c 00c9 | | Action Pop_Auxiliary_Loop
059d e407 | | Load 0x2,0x7
059e 8603 | | Call 0x3,0x3
059f 6fed |o | Jump_Zero 0x58d
05a0 00ce | | Action Pop_Auxiliary
05a1 0092 17e4 | | Action Push_String_Extended,0x17e4 ; "pragma End_Of_Input;"
05a3 00db | | Load_Top At_Offset_3
05a4 e40c | | Load 0x2,0xc
05a5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
05a6 e5f8 | | Load 0x2,-0x8
05a7 0120 | | Execute Any,Is_Value
05a8 6803 |h | Jump_Zero 0x5ac
05a9 e40c | | Load 0x2,0xc
05aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05ab 7803 |x | Jump 0x5af
05ac e5f8 | | Load 0x2,-0x8
05ad e5fa | | Load 0x2,-0x6
05ae 0119 | | Execute Any,Check_In_Formal_Type
05af 00db | | Load_Top At_Offset_3
05b0 e40c | | Load 0x2,0xc
05b1 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05b2 c602 | | Store 0x3,0x2
05b3 c5f8 | | Store 0x2,-0x8
05b4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05b5 0000 0000 | | .XXX[0x3]
05b7 0000 | |
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05d7 | | .CONST 0x05d7 ; Address of begin
05b9 0004 | | .CONST 0x0004 ; Address of exception handler
05ba 000a | | .CONST 0x000a ; Number of locals
05bb INIT_05b8:
05bb e013 | | Load 0x0,0x13
05bc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05bd 00db | | Load_Top At_Offset_3
05be e5f9 | | Load 0x2,-0x7
05bf e001 | | Load 0x0,0x1
05c0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05c1 0031 | 1 | Store_Top Heap_Access,At_Offset_1
05c2 00d8 | | Load_Top At_Offset_0
05c3 821c | | Call 0x1,0x1c
05c4 e024 | $ | Load 0x0,0x24
05c5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05c7 e40d | | Load 0x2,0xd
05c8 0322 | " | Declare_Variable Record
05c9 00e1 | | Load_Encached Boolean_Cache
05ca 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05cb e018 | | Load 0x0,0x18
05cc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05cd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05ce e018 | | Load 0x0,0x18
05cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05d0 02c7 | | Declare_Variable Any
05d1 00d8 | | Load_Top At_Offset_0
05d2 1c00 | | Execute_Immediate Run_Utility,0x0
05d3 029f 0803 | | Declare_Subprogram INIT_0800,For_Call
05d5 029f 087b | {| Declare_Subprogram INIT_0878,For_Call
05d7 BODY_05b8:
05d7 e603 | | Load 0x3,0x3
05d8 01db | | Execute Vector,Length
05d9 686d |hm | Jump_Zero 0x647
05da e018 | | Load 0x0,0x18
05db 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05dc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05dd 00db | | Load_Top At_Offset_3
05de 0120 | | Execute Any,Is_Value
05df 6803 |h | Jump_Zero 0x5e3
05e0 e018 | | Load 0x0,0x18
05e1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05e2 7801 |x | Jump 0x5e4
05e3 00db | | Load_Top At_Offset_3
05e4 60eb |` | Indirect_Literal Discrete,0x6d0,{0x00000000, 0x00004000}
05e5 e017 | | Load 0x0,0x17
05e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05e7 e02b | + | Load 0x0,0x2b
05e8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05e9 e018 | | Load 0x0,0x18
05ea 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05eb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05ec e603 | | Load 0x3,0x3
05ed e018 | | Load 0x0,0x18
05ee 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05ef 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
05f0 c608 | | Store 0x3,0x8
05f1 c607 | | Store 0x3,0x7
05f2 00db | | Load_Top At_Offset_3
05f3 460e |F | Jump_Case 0xf
05f4 7828 |x( | Jump 0x61d ; case 0x0
05f5 780d |x | Jump 0x603 ; case 0x1
05f6 780c |x | Jump 0x603 ; case 0x2
05f7 7842 |xB | Jump 0x63a ; case 0x3
05f8 780a |x | Jump 0x603 ; case 0x4
05f9 7809 |x | Jump 0x603 ; case 0x5
05fa 7808 |x | Jump 0x603 ; case 0x6
05fb 7807 |x | Jump 0x603 ; case 0x7
05fc 7806 |x | Jump 0x603 ; case 0x8
05fd 7805 |x | Jump 0x603 ; case 0x9
05fe 7804 |x | Jump 0x603 ; case 0xa
05ff 7803 |x | Jump 0x603 ; case 0xb
0600 7802 |x | Jump 0x603 ; case 0xc
0601 7801 |x | Jump 0x603 ; case 0xd
0602 7800 |x | Jump 0x603 ; case 0xe
0603 e006 | | Load 0x0,0x6
0604 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0605 4801 |H | Short_Literal 0x1
0606 4802 |H | Short_Literal 0x2
0607 e013 | | Load 0x0,0x13
0608 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0609 035b | [ | Declare_Type Array,Constrained
060a 0337 | 7 | Declare_Variable Array
060b e603 | | Load 0x3,0x3
060c e013 | | Load 0x0,0x13
060d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
060e 4801 |H | Short_Literal 0x1
060f 00da | | Load_Top At_Offset_2
0610 01d6 | | Execute Vector,Field_Write
0611 e603 | | Load 0x3,0x3
0612 e607 | | Load 0x3,0x7
0613 e013 | | Load 0x0,0x13
0614 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0615 4802 |H | Short_Literal 0x2
0616 00da | | Load_Top At_Offset_2
0617 01d6 | | Execute Vector,Field_Write
0618 60b3 |` | Indirect_Literal Discrete,0x6cc,{0x00000000, 0x0000401a}
0619 e006 | | Load 0x0,0x6
061a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
061b c403 | | Store 0x2,0x3
061c 782a |x* | Jump 0x647
061d 00da | | Load_Top At_Offset_2
061e e018 | | Load 0x0,0x18
061f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0620 e018 | | Load 0x0,0x18
0621 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0622 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0623 012f | / | Execute Any,Equal
0624 a606 | | Store_Unchecked 0x3,0x6
0625 e606 | | Load 0x3,0x6
0626 7020 |p | Jump_Nonzero 0x647
0627 e006 | | Load 0x0,0x6
0628 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0629 4801 |H | Short_Literal 0x1
062a 4801 |H | Short_Literal 0x1
062b e013 | | Load 0x0,0x13
062c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
062d 035b | [ | Declare_Type Array,Constrained
062e 0337 | 7 | Declare_Variable Array
062f e603 | | Load 0x3,0x3
0630 e013 | | Load 0x0,0x13
0631 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0632 4801 |H | Short_Literal 0x1
0633 00da | | Load_Top At_Offset_2
0634 01d6 | | Execute Vector,Field_Write
0635 6092 |` | Indirect_Literal Discrete,0x6c8,{0x00000000, 0x0000401d}
0636 e006 | | Load 0x0,0x6
0637 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0638 c403 | | Store 0x2,0x3
0639 780d |x | Jump 0x647
063a e407 | | Load 0x2,0x7
063b e017 | | Load 0x0,0x17
063c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
063d e018 | | Load 0x0,0x18
063e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
063f e018 | | Load 0x0,0x18
0640 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0641 00ea | | Load_Encached Null_String_Cache
0642 e603 | | Load 0x3,0x3
0643 4801 |H | Short_Literal 0x1
0644 e002 | | Load 0x0,0x2
0645 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0646 c407 | | Store 0x2,0x7
0647 e40c | | Load 0x2,0xc
0648 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0649 e5f9 | | Load 0x2,-0x7
064a 821b | | Call 0x1,0x1b
064b e5f8 | | Load 0x2,-0x8
064c e5fa | | Load 0x2,-0x6
064d 0119 | | Execute Any,Check_In_Formal_Type
064e e40c | | Load 0x2,0xc
064f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0650 e605 | | Load 0x3,0x5
0651 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0652 e606 | | Load 0x3,0x6
0653 7003 |p | Jump_Nonzero 0x657
0654 e603 | | Load 0x3,0x3
0655 01db | | Execute Vector,Length
0656 7028 |p( | Jump_Nonzero 0x67f
0657 e606 | | Load 0x3,0x6
0658 7015 |p | Jump_Nonzero 0x66e
0659 e7ff | | Load 0x3,-0x1
065a 0f01 | | Execute_Immediate Equal,0x1
065b 6809 |h | Jump_Zero 0x665
065c 4802 |H | Short_Literal 0x2
065d e5f9 | | Load 0x2,-0x7
065e e001 | | Load 0x0,0x1
065f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0660 e024 | $ | Load 0x0,0x24
0661 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0662 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0663 a604 | | Store_Unchecked 0x3,0x4
0664 780e |x | Jump 0x673
0665 4801 |H | Short_Literal 0x1
0666 e5f9 | | Load 0x2,-0x7
0667 e001 | | Load 0x0,0x1
0668 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0669 e024 | $ | Load 0x0,0x24
066a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
066b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
066c a604 | | Store_Unchecked 0x3,0x4
066d 7805 |x | Jump 0x673
066e e602 | | Load 0x3,0x2
066f e024 | $ | Load 0x0,0x24
0670 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0671 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0672 a604 | | Store_Unchecked 0x3,0x4
0673 e604 | | Load 0x3,0x4
0674 e024 | $ | Load 0x0,0x24
0675 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0676 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0677 6805 |h | Jump_Zero 0x67d
0678 e604 | | Load 0x3,0x4
0679 e024 | $ | Load 0x0,0x24
067a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
067b 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
067c a604 | | Store_Unchecked 0x3,0x4
067d 8609 | | Call 0x3,0x9
067e 7832 |x2 | Jump 0x6b1
067f e402 | | Load 0x2,0x2
0680 0f0b | | Execute_Immediate Equal,0xb
0681 681d |h | Jump_Zero 0x69f
0682 e605 | | Load 0x3,0x5
0683 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0684 e40c | | Load 0x2,0xc
0685 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0686 700a |p | Jump_Nonzero 0x691
0687 4800 |H | Short_Literal 0x0
0688 e403 | | Load 0x2,0x3
0689 e006 | | Load 0x0,0x6
068a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
068b 6805 |h | Jump_Zero 0x691
068c 00cf | | Action Mark_Auxiliary
068d 860a | | Call 0x3,0xa
068e 00c9 | | Action Pop_Auxiliary_Loop
068f 7ffd | | Jump 0x68d
0690 00ce | | Action Pop_Auxiliary
0691 4800 |H | Short_Literal 0x0
0692 e403 | | Load 0x2,0x3
0693 e006 | | Load 0x0,0x6
0694 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0695 7004 |p | Jump_Nonzero 0x69a
0696 e403 | | Load 0x2,0x3
0697 e5f9 | | Load 0x2,-0x7
0698 e001 | | Load 0x0,0x1
0699 181f | | Execute Package,Field_Execute,Field_Number 0x1f
069a e407 | | Load 0x2,0x7
069b e002 | | Load 0x0,0x2
069c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
069d c407 | | Store 0x2,0x7
069e 7812 |x | Jump 0x6b1
069f e006 | | Load 0x0,0x6
06a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06a1 4801 |H | Short_Literal 0x1
06a2 4801 |H | Short_Literal 0x1
06a3 e013 | | Load 0x0,0x13
06a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06a5 035b | [ | Declare_Type Array,Constrained
06a6 0337 | 7 | Declare_Variable Array
06a7 e5f9 | | Load 0x2,-0x7
06a8 e001 | | Load 0x0,0x1
06a9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
06aa 4801 |H | Short_Literal 0x1
06ab 00da | | Load_Top At_Offset_2
06ac 01d6 | | Execute Vector,Field_Write
06ad 6016 |` | Indirect_Literal Discrete,0x6c4,{0x00000000, 0x0000401b}
06ae e006 | | Load 0x0,0x6
06af 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
06b0 c403 | | Store 0x2,0x3
06b1 e5f8 | | Load 0x2,-0x8
06b2 0120 | | Execute Any,Is_Value
06b3 6803 |h | Jump_Zero 0x6b7
06b4 e40c | | Load 0x2,0xc
06b5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06b6 7803 |x | Jump 0x6ba
06b7 e5f8 | | Load 0x2,-0x8
06b8 e5fa | | Load 0x2,-0x6
06b9 0119 | | Execute Any,Check_In_Formal_Type
06ba e605 | | Load 0x3,0x5
06bb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06bc e40c | | Load 0x2,0xc
06bd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06be e605 | | Load 0x3,0x5
06bf 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
06c0 c5f8 | | Store 0x2,-0x8
06c1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06c2 0000 0000 | | .XXX[0x2]
06c4 0000 0000 | | .LITERAL {0x00000000, 0x0000401b}
06c8 0000 0000 | | .LITERAL {0x00000000, 0x0000401d}
06cc 0000 0000 | | .LITERAL {0x00000000, 0x0000401a}
06d0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
06d4 0000 0000 | | .BLANK 0000[0x4]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06de | | .CONST 0x06de ; Address of begin
06d9 0004 | | .CONST 0x0004 ; Address of exception handler
06da 0002 | | .CONST 0x0002 ; Number of locals
06db INIT_06d8:
06db e5f9 | | Load 0x2,-0x7
06dc e001 | | Load 0x0,0x1
06dd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06de BODY_06d8:
06de 00cf | | Action Mark_Auxiliary
06df 00d9 | | Load_Top At_Offset_1
06e0 01dc | | Execute Vector,Last
06e1 4802 |H | Short_Literal 0x2
06e2 0263 | c | Execute Discrete,Above_Bound
06e3 7015 |p | Jump_Nonzero 0x6f9
06e4 e407 | | Load 0x2,0x7
06e5 e017 | | Load 0x0,0x17
06e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06e7 e018 | | Load 0x0,0x18
06e8 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06e9 00ea | | Load_Encached Null_String_Cache
06ea e605 | | Load 0x3,0x5
06eb e602 | | Load 0x3,0x2
06ec 01d7 | | Execute Vector,Field_Read
06ed 821c | | Call 0x1,0x1c
06ee 4800 |H | Short_Literal 0x0
06ef e002 | | Load 0x0,0x2
06f0 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06f1 c407 | | Store 0x2,0x7
06f2 8412 | | Call 0x2,0x12
06f3 e407 | | Load 0x2,0x7
06f4 e002 | | Load 0x0,0x2
06f5 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06f6 c407 | | Store 0x2,0x7
06f7 00c8 | | Action Pop_Auxiliary_Range
06f8 3feb |? | Loop_Increasing 0x6e4
06f9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06fa 0000 0000 | | .BLANK 0000[0x6]
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 071f | | .CONST 0x071f ; Address of begin
0701 0004 | | .CONST 0x0004 ; Address of exception handler
0702 0007 | | .CONST 0x0007 ; Number of locals
0703 INIT_0700:
0703 e018 | | Load 0x0,0x18
0704 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0705 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0706 02c7 | | Declare_Variable Any
0707 00d8 | | Load_Top At_Offset_0
0708 1c00 | | Execute_Immediate Run_Utility,0x0
0709 e02c | , | Load 0x0,0x2c
070a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
070b 02c7 | | Declare_Variable Any
070c 00d8 | | Load_Top At_Offset_0
070d 1c00 | | Execute_Immediate Run_Utility,0x0
070e 00f1 | | Load_Encached Diana_Temp_Seq
070f 02c7 | | Declare_Variable Any
0710 00d8 | | Load_Top At_Offset_0
0711 1c00 | | Execute_Immediate Run_Utility,0x0
0712 e018 | | Load 0x0,0x18
0713 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0714 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0715 02c7 | | Declare_Variable Any
0716 00d8 | | Load_Top At_Offset_0
0717 1c00 | | Execute_Immediate Run_Utility,0x0
0718 e018 | | Load 0x0,0x18
0719 1b14 | | Execute Package,Field_Read,Field_Number 0x14
071a 02ff | | Declare_Variable Variant_Record
071b 00d8 | | Load_Top At_Offset_0
071c 1c00 | | Execute_Immediate Run_Utility,0x0
071d e018 | | Load 0x0,0x18
071e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
071f BODY_0700:
071f e018 | | Load 0x0,0x18
0720 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0721 00db | | Load_Top At_Offset_3
0722 0120 | | Execute Any,Is_Value
0723 6804 |h | Jump_Zero 0x728
0724 e018 | | Load 0x0,0x18
0725 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0726 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0727 7801 |x | Jump 0x729
0728 00db | | Load_Top At_Offset_3
0729 6076 |`v | Indirect_Literal Discrete,0x7a0,{0x00000000, 0x00004000}
072a e017 | | Load 0x0,0x17
072b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
072c e018 | | Load 0x0,0x18
072d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
072e 4802 |H | Short_Literal 0x2
072f 606c |`l | Indirect_Literal Discrete,0x79c,{0x00000000, 0x7fffffff}
0730 606b |`k | Indirect_Literal Discrete,0x79c,{0x00000000, 0x7fffffff}
0731 e018 | | Load 0x0,0x18
0732 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0733 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0734 e5fe | | Load 0x2,-0x2
0735 e403 | | Load 0x2,0x3
0736 e018 | | Load 0x0,0x18
0737 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0738 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0739 4801 |H | Short_Literal 0x1
073a e405 | | Load 0x2,0x5
073b e018 | | Load 0x0,0x18
073c 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
073d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
073e c605 | | Store 0x3,0x5
073f 0059 | Y | Store_Top Discrete,At_Offset_1
0740 4801 |H | Short_Literal 0x1
0741 4801 |H | Short_Literal 0x1
0742 e013 | | Load 0x0,0x13
0743 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0744 035b | [ | Declare_Type Array,Constrained
0745 0337 | 7 | Declare_Variable Array
0746 e5ff | | Load 0x2,-0x1
0747 e013 | | Load 0x0,0x13
0748 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0749 4801 |H | Short_Literal 0x1
074a 00da | | Load_Top At_Offset_2
074b 01d6 | | Execute Vector,Field_Write
074c 604b |`K | Indirect_Literal Discrete,0x798,{0x00000000, 0x00004002}
074d 00da | | Load_Top At_Offset_2
074e e006 | | Load 0x0,0x6
074f 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0750 00da | | Load_Top At_Offset_2
0751 e018 | | Load 0x0,0x18
0752 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0753 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0754 c5fd | | Store 0x2,-0x3
0755 e018 | | Load 0x0,0x18
0756 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0757 e604 | | Load 0x3,0x4
0758 0120 | | Execute Any,Is_Value
0759 6802 |h | Jump_Zero 0x75c
075a 00f1 | | Load_Encached Diana_Temp_Seq
075b 7801 |x | Jump 0x75d
075c e604 | | Load 0x3,0x4
075d e602 | | Load 0x3,0x2
075e 0120 | | Execute Any,Is_Value
075f 6804 |h | Jump_Zero 0x764
0760 e018 | | Load 0x0,0x18
0761 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0762 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0763 7801 |x | Jump 0x765
0764 e602 | | Load 0x3,0x2
0765 e603 | | Load 0x3,0x3
0766 0120 | | Execute Any,Is_Value
0767 6803 |h | Jump_Zero 0x76b
0768 e02c | , | Load 0x0,0x2c
0769 1b0d | | Execute Package,Field_Read,Field_Number 0xd
076a 7801 |x | Jump 0x76c
076b e603 | | Load 0x3,0x3
076c e606 | | Load 0x3,0x6
076d 6032 |`2 | Indirect_Literal Discrete,0x7a0,{0x00000000, 0x00004000}
076e e017 | | Load 0x0,0x17
076f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0770 4800 |H | Short_Literal 0x0
0771 e018 | | Load 0x0,0x18
0772 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0773 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0774 e018 | | Load 0x0,0x18
0775 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0776 4ffc |O | Short_Literal -0x4
0777 4ffd |O | Short_Literal -0x3
0778 e5fd | | Load 0x2,-0x3
0779 e018 | | Load 0x0,0x18
077a 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
077b 180d | | Execute Package,Field_Execute,Field_Number 0xd
077c 00d1 | | Pop_Control Pop_Count_1
077d c603 | | Store 0x3,0x3
077e c602 | | Store 0x3,0x2
077f c604 | | Store 0x3,0x4
0780 0059 | Y | Store_Top Discrete,At_Offset_1
0781 4801 |H | Short_Literal 0x1
0782 4801 |H | Short_Literal 0x1
0783 e013 | | Load 0x0,0x13
0784 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0785 035b | [ | Declare_Type Array,Constrained
0786 0337 | 7 | Declare_Variable Array
0787 e5ff | | Load 0x2,-0x1
0788 e013 | | Load 0x0,0x13
0789 1810 | | Execute Package,Field_Execute,Field_Number 0x10
078a 4801 |H | Short_Literal 0x1
078b 00da | | Load_Top At_Offset_2
078c 01d6 | | Execute Vector,Field_Write
078d 6006 |` | Indirect_Literal Discrete,0x794,{0x00000000, 0x00004005}
078e 00da | | Load_Top At_Offset_2
078f e006 | | Load 0x0,0x6
0790 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0791 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0792 0000 0000 | | .XXX[0x2]
0794 0000 0000 | | .LITERAL {0x00000000, 0x00004005}
0798 0000 0000 | | .LITERAL {0x00000000, 0x00004002}
079c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
07a0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
07a4 0000 0000 | | .BLANK 0000[0x4]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab | | .CONST 0x07ab ; Address of begin
07a9 0004 | | .CONST 0x0004 ; Address of exception handler
07aa 0001 | | .CONST 0x0001 ; Number of locals
07ab BODY_07a8:
07ab INIT_07a8:
07ab e408 | | Load 0x2,0x8
07ac e409 | | Load 0x2,0x9
07ad 027d | } | Execute Discrete,Greater
07ae 6804 |h | Jump_Zero 0x7b3
07af 00da | | Load_Top At_Offset_2
07b0 e002 | | Load 0x0,0x2
07b1 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
07b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07b3 4800 |H | Short_Literal 0x0
07b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07b5 0000 0000 | | .XXX[0x3]
07b7 0000 | |
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bd | | .CONST 0x07bd ; Address of begin
07b9 0004 | | .CONST 0x0004 ; Address of exception handler
07ba 0003 | | .CONST 0x0003 ; Number of locals
07bb INIT_07b8:
07bb 00e3 | | Load_Encached Natural_Cache
07bc 00e3 | | Load_Encached Natural_Cache
07bd BODY_07b8:
07bd e408 | | Load 0x2,0x8
07be e409 | | Load 0x2,0x9
07bf 027d | } | Execute Discrete,Greater
07c0 680f |h | Jump_Zero 0x7d0
07c1 e9ff | | Load 0x4,-0x1
07c2 e002 | | Load 0x0,0x2
07c3 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
07c4 6802 |h | Jump_Zero 0x7c7
07c5 00ea | | Load_Encached Null_String_Cache
07c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07c7 00e3 | | Load_Encached Natural_Cache
07c8 e406 | | Load 0x2,0x6
07c9 e9ff | | Load 0x4,-0x1
07ca e002 | | Load 0x0,0x2
07cb 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
07cc 00d1 | | Pop_Control Pop_Count_1
07cd c409 | | Store 0x2,0x9
07ce 4801 |H | Short_Literal 0x1
07cf a408 | | Store_Unchecked 0x2,0x8
07d0 e408 | | Load 0x2,0x8
07d1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
07d2 4800 |H | Short_Literal 0x0
07d3 00d9 | | Load_Top At_Offset_1
07d4 e409 | | Load 0x2,0x9
07d5 e406 | | Load 0x2,0x6
07d6 01cf | | Execute Vector,Slice_Read
07d7 480a |H | Short_Literal 0xa
07d8 e02d | - | Load 0x0,0x2d
07d9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
07da 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
07db 00d9 | | Load_Top At_Offset_1
07dc 680b |h | Jump_Zero 0x7e8
07dd 00d9 | | Load_Top At_Offset_1
07de 0a01 | | Execute_Immediate Plus,0x1
07df c408 | | Store 0x2,0x8
07e0 00d8 | | Load_Top At_Offset_0
07e1 00da | | Load_Top At_Offset_2
07e2 0aff | | Execute_Immediate Plus,-0x1
07e3 e406 | | Load 0x2,0x6
07e4 01cf | | Execute Vector,Slice_Read
07e5 0335 | 5 | Declare_Variable Array,Duplicate
07e6 00cd | | Action Spare6_Action
07e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07e8 e409 | | Load 0x2,0x9
07e9 0a01 | | Execute_Immediate Plus,0x1
07ea c408 | | Store 0x2,0x8
07eb e9ff | | Load 0x4,-0x1
07ec e002 | | Load 0x0,0x2
07ed 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
07ee 6807 |h | Jump_Zero 0x7f6
07ef 00d8 | | Load_Top At_Offset_0
07f0 e409 | | Load 0x2,0x9
07f1 e406 | | Load 0x2,0x6
07f2 01cf | | Execute Vector,Slice_Read
07f3 0335 | 5 | Declare_Variable Array,Duplicate
07f4 00cd | | Action Spare6_Action
07f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07f6 00d8 | | Load_Top At_Offset_0
07f7 e409 | | Load 0x2,0x9
07f8 e406 | | Load 0x2,0x6
07f9 01cf | | Execute Vector,Slice_Read
07fa e9ff | | Load 0x4,-0x1
07fb 8604 | | Call 0x3,0x4
07fc 01cc | | Execute Vector,Catenate
07fd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07fe 0000 0000 | | .XXX[0x2]
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 082f | / | .CONST 0x082f ; Address of begin
0801 0004 | | .CONST 0x0004 ; Address of exception handler
0802 0008 | | .CONST 0x0008 ; Number of locals
0803 INIT_0800:
0803 e604 | | Load 0x3,0x4
0804 821a | | Call 0x1,0x1a
0805 e604 | | Load 0x3,0x4
0806 e024 | $ | Load 0x0,0x24
0807 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0808 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0809 00d9 | | Load_Top At_Offset_1
080a 01dd | | Execute Vector,First
080b 00da | | Load_Top At_Offset_2
080c 01dc | | Execute Vector,Last
080d 00da | | Load_Top At_Offset_2
080e 01db | | Execute Vector,Length
080f 0272 | r | Execute Discrete,Minus
0810 0aff | | Execute_Immediate Plus,-0x1
0811 00d8 | | Load_Top At_Offset_0
0812 00e2 | | Load_Encached Integer_Cache
0813 0260 | ` | Execute Discrete,In_Type
0814 7001 |p | Jump_Nonzero 0x816
0815 0801 | | Execute_Immediate Raise,0x1
0816 00db | | Load_Top At_Offset_3
0817 01cf | | Execute Vector,Slice_Read
0818 0007 | | Action Break_Optional
0819 e02e | . | Load 0x0,0x2e
081a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
081b 0604 | | Execute_Immediate Set_Value_Unchecked,0x4
081c e02e | . | Load 0x0,0x2e
081d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
081e 0605 | | Execute_Immediate Set_Value_Unchecked,0x5
081f 00d8 | | Load_Top At_Offset_0
0820 0007 | | Action Break_Optional
0821 e012 | | Load 0x0,0x12
0822 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0823 0337 | 7 | Declare_Variable Array
0824 e604 | | Load 0x3,0x4
0825 e024 | $ | Load 0x0,0x24
0826 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0827 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0828 e024 | $ | Load 0x0,0x24
0829 1b16 | | Execute Package,Field_Read,Field_Number 0x16
082a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
082b e007 | | Load 0x0,0x7
082c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
082d 00d9 | | Load_Top At_Offset_1
082e 01d4 | | Execute Vector,Structure_Write
082f BODY_0800:
082f 4808 |H | Short_Literal 0x8
0830 00d9 | | Load_Top At_Offset_1
0831 01d7 | | Execute Vector,Field_Read
0832 6802 |h | Jump_Zero 0x835
0833 00db | | Load_Top At_Offset_3
0834 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0835 e025 | % | Load 0x0,0x25
0836 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0837 e404 | | Load 0x2,0x4
0838 0120 | | Execute Any,Is_Value
0839 6803 |h | Jump_Zero 0x83d
083a e018 | | Load 0x0,0x18
083b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
083c 7801 |x | Jump 0x83e
083d e404 | | Load 0x2,0x4
083e e605 | | Load 0x3,0x5
083f e015 | | Load 0x0,0x15
0840 180e | | Execute Package,Field_Execute,Field_Number 0xe
0841 e017 | | Load 0x0,0x17
0842 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0843 00ea | | Load_Encached Null_String_Cache
0844 4802 |H | Short_Literal 0x2
0845 e018 | | Load 0x0,0x18
0846 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0847 00ea | | Load_Encached Null_String_Cache
0848 4801 |H | Short_Literal 0x1
0849 e807 | | Load 0x4,0x7
084a e804 | | Load 0x4,0x4
084b e411 | | Load 0x2,0x11
084c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
084d 00d1 | | Pop_Control Pop_Count_1
084e c404 | | Store 0x2,0x4
084f c405 | | Store 0x2,0x5
0850 e405 | | Load 0x2,0x5
0851 681d |h | Jump_Zero 0x86f
0852 e006 | | Load 0x0,0x6
0853 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0854 4801 |H | Short_Literal 0x1
0855 4802 |H | Short_Literal 0x2
0856 e013 | | Load 0x0,0x13
0857 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0858 035b | [ | Declare_Type Array,Constrained
0859 0337 | 7 | Declare_Variable Array
085a e604 | | Load 0x3,0x4
085b e024 | $ | Load 0x0,0x24
085c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
085d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
085e 4801 |H | Short_Literal 0x1
085f 00da | | Load_Top At_Offset_2
0860 01d6 | | Execute Vector,Field_Write
0861 e405 | | Load 0x2,0x5
0862 e025 | % | Load 0x0,0x25
0863 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0864 011c | | Execute Any,Convert_Unchecked
0865 1c01 | | Execute_Immediate Run_Utility,0x1
0866 e013 | | Load 0x0,0x13
0867 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0868 4802 |H | Short_Literal 0x2
0869 00da | | Load_Top At_Offset_2
086a 01d6 | | Execute Vector,Field_Write
086b 6004 |` | Indirect_Literal Discrete,0x870,{0x00000000, 0x0000402b}
086c e006 | | Load 0x0,0x6
086d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
086e c403 | | Store 0x2,0x3
086f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0870 0000 0000 | | .LITERAL {0x00000000, 0x0000402b}
0874 0000 0000 | | .BLANK 0000[0x4]
0878 ; --------------------------------------------------------------------------------------
0878 ; SUBPROGRAM
0878 ; --------------------------------------------------------------------------------------
0878 087f | | .CONST 0x087f ; Address of begin
0879 0004 | | .CONST 0x0004 ; Address of exception handler
087a 0002 | | .CONST 0x0002 ; Number of locals
087b INIT_0878:
087b e605 | | Load 0x3,0x5
087c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
087d e40c | | Load 0x2,0xc
087e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
087f BODY_0878:
087f 4800 |H | Short_Literal 0x0
0880 e403 | | Load 0x2,0x3
0881 e006 | | Load 0x0,0x6
0882 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0883 7006 |p | Jump_Nonzero 0x88a
0884 e403 | | Load 0x2,0x3
0885 e5f9 | | Load 0x2,-0x7
0886 e001 | | Load 0x0,0x1
0887 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0888 00cc | | Action Pop_Block
0889 7e06 |~ | Jump 0x690
088a e605 | | Load 0x3,0x5
088b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
088c e40c | | Load 0x2,0xc
088d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
088e 6806 |h | Jump_Zero 0x895
088f 00d8 | | Load_Top At_Offset_0
0890 e407 | | Load 0x2,0x7
0891 e002 | | Load 0x0,0x2
0892 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0893 00cc | | Action Pop_Block
0894 7dfb |} | Jump 0x690
0895 480a |H | Short_Literal 0xa
0896 00d9 | | Load_Top At_Offset_1
0897 01cb | | Execute Vector,Append
0898 e407 | | Load 0x2,0x7
0899 e002 | | Load 0x0,0x2
089a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
089b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
089c 0000 0000 | | .BLANK 0000[0x4]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08fd | | .CONST 0x08fd ; Address of begin
08a1 0004 | | .CONST 0x0004 ; Address of exception handler
08a2 0026 | & | .CONST 0x0026 ; Number of locals
08a3 INIT_08a0:
08a3 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
08a4 029a 0903 | | Declare_Subprogram INIT_0900,For_Outer_Call,Visible,Unelaborated
08a6 029a 0943 | C| Declare_Subprogram INIT_0940,For_Outer_Call,Visible,Unelaborated
08a8 029a 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call,Visible,Unelaborated
08aa 029a 0a03 | | Declare_Subprogram INIT_0a00,For_Outer_Call,Visible,Unelaborated
08ac 029a 0a13 | | Declare_Subprogram INIT_0a10,For_Outer_Call,Visible,Unelaborated
08ae 029a 0a23 | #| Declare_Subprogram INIT_0a20,For_Outer_Call,Visible,Unelaborated
08b0 029a 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call,Visible,Unelaborated
08b2 029a 0a3b | ;| Declare_Subprogram INIT_0a38,For_Outer_Call,Visible,Unelaborated
08b4 029a 0a43 | C| Declare_Subprogram INIT_0a40,For_Outer_Call,Visible,Unelaborated
08b6 029a 0a53 | S| Declare_Subprogram INIT_0a50,For_Outer_Call,Visible,Unelaborated
08b8 029a 0a63 | c| Declare_Subprogram INIT_0a60,For_Outer_Call,Visible,Unelaborated
08ba 029a 0a73 | s| Declare_Subprogram INIT_0a70,For_Outer_Call,Visible,Unelaborated
08bc 4806 |H | Short_Literal 0x6
08bd 032a | * | Declare_Type Record,Incomplete
08be 00d8 | | Load_Top At_Offset_0
08bf 02a0 | | Declare_Subprogram Null_Subprogram
08c0 e212 | | Load 0x1,0x12
08c1 03a3 | | Complete_Type Heap_Access,By_Defining
08c2 00bf | | Action Accept_Activation
08c3 e001 | | Load 0x0,0x1
08c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c5 e002 | | Load 0x0,0x2
08c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c7 e003 | | Load 0x0,0x3
08c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08c9 00e1 | | Load_Encached Boolean_Cache
08ca e004 | | Load 0x0,0x4
08cb 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08cc e210 | | Load 0x1,0x10
08cd 029f 0a7b | {| Declare_Subprogram INIT_0a78,For_Call
08cf e21f | | Load 0x1,0x1f
08d0 0326 | & | Complete_Type Record,By_Defining
08d1 1d13 | | Execute_Immediate Reference_Lex_1,0x13
08d2 00c7 | | Action Elaborate_Subprogram
08d3 1d14 | | Execute_Immediate Reference_Lex_1,0x14
08d4 00c7 | | Action Elaborate_Subprogram
08d5 029d 0a9b | | Declare_Subprogram INIT_0a98,For_Outer_Call
08d7 1d15 | | Execute_Immediate Reference_Lex_1,0x15
08d8 00c7 | | Action Elaborate_Subprogram
08d9 1d16 | | Execute_Immediate Reference_Lex_1,0x16
08da 00c7 | | Action Elaborate_Subprogram
08db 1d17 | | Execute_Immediate Reference_Lex_1,0x17
08dc 00c7 | | Action Elaborate_Subprogram
08dd 1d18 | | Execute_Immediate Reference_Lex_1,0x18
08de 00c7 | | Action Elaborate_Subprogram
08df 1d19 | | Execute_Immediate Reference_Lex_1,0x19
08e0 00c7 | | Action Elaborate_Subprogram
08e1 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
08e2 00c7 | | Action Elaborate_Subprogram
08e3 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
08e4 00c7 | | Action Elaborate_Subprogram
08e5 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
08e6 00c7 | | Action Elaborate_Subprogram
08e7 e005 | | Load 0x0,0x5
08e8 e006 | | Load 0x0,0x6
08e9 00db | | Load_Top At_Offset_3
08ea e212 | | Load 0x1,0x12
08eb e007 | | Load 0x0,0x7
08ec 1b18 | | Execute Package,Field_Read,Field_Number 0x18
08ed 0387 | | Declare_Variable Package
08ee 00d8 | | Load_Top At_Offset_0
08ef 020f | | Execute Module,Activate
08f0 e007 | | Load 0x0,0x7
08f1 1919 | | Execute Package,Field_Reference,Field_Number 0x19
08f2 00c6 | | Action Check_Subprogram_Elaborated
08f3 00da | | Load_Top At_Offset_2
08f4 e212 | | Load 0x1,0x12
08f5 e008 | | Load 0x0,0x8
08f6 e009 | | Load 0x0,0x9
08f7 4800 |H | Short_Literal 0x0
08f8 0007 | | Action Break_Optional
08f9 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
08fa 00c7 | | Action Elaborate_Subprogram
08fb 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
08fc 00c7 | | Action Elaborate_Subprogram
08fd BODY_08a0:
08fd 00bc | | Action Signal_Activated
08fe 00bb | | Action Signal_Completion
08ff 0000 | | .XXX[0x1]
0900 ; --------------------------------------------------------------------------------------
0900 ; SUBPROGRAM
0900 ; --------------------------------------------------------------------------------------
0900 090a | | .CONST 0x090a ; Address of begin
0901 092d | - | .CONST 0x092d ; Address of exception handler
0902 0002 | | .CONST 0x0002 ; Number of locals
0903 INIT_0900:
0903 e212 | | Load 0x1,0x12
0904 e00a | | Load 0x0,0xa
0905 180d | | Execute Package,Field_Execute,Field_Number 0xd
0906 039c | | Declare_Variable Heap_Access,By_Allocation
0907 00d8 | | Load_Top At_Offset_0
0908 0217 | | Execute Heap_Access,All_Reference
0909 1c00 | | Execute_Immediate Run_Utility,0x0
090a BODY_0900:
090a 00db | | Load_Top At_Offset_3
090b e20f | | Load 0x1,0xf
090c 0119 | | Execute Any,Check_In_Formal_Type
090d e210 | | Load 0x1,0x10
090e e00a | | Load 0x0,0xa
090f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0910 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0911 00d9 | | Load_Top At_Offset_1
0912 0217 | | Execute Heap_Access,All_Reference
0913 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0914 e5fe | | Load 0x2,-0x2
0915 00d9 | | Load_Top At_Offset_1
0916 0217 | | Execute Heap_Access,All_Reference
0917 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0918 e001 | | Load 0x0,0x1
0919 180e | | Execute Package,Field_Execute,Field_Number 0xe
091a 00d9 | | Load_Top At_Offset_1
091b 0217 | | Execute Heap_Access,All_Reference
091c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
091d 4800 |H | Short_Literal 0x0
091e 00d9 | | Load_Top At_Offset_1
091f 0217 | | Execute Heap_Access,All_Reference
0920 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0921 e004 | | Load 0x0,0x4
0922 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0923 00d9 | | Load_Top At_Offset_1
0924 0217 | | Execute Heap_Access,All_Reference
0925 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0926 00d8 | | Load_Top At_Offset_0
0927 a5fd | | Store_Unchecked 0x2,-0x3
0928 00d8 | | Load_Top At_Offset_0
0929 0217 | | Execute Heap_Access,All_Reference
092a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
092b a5fc | | Store_Unchecked 0x2,-0x4
092c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
092d TRAP_0900:
092d 010b | | Execute Exception,Is_Storage_Error
092e 680b |h | Jump_Zero 0x93a
092f e001 | | Load 0x0,0x1
0930 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0931 e00b | | Load 0x0,0xb
0932 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0933 6008 |` | Indirect_Literal Discrete,0x93c,{0x00000000, 0x00004008}
0934 e001 | | Load 0x0,0x1
0935 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0936 c5fc | | Store 0x2,-0x4
0937 e212 | | Load 0x1,0x12
0938 a5fd | | Store_Unchecked 0x2,-0x3
0939 4503 |E | Exit_Suprogram New_Top_Offset 0x3
093a 0100 | | Execute Exception,Raise
093b 0000 | | .XXX[0x1]
093c 0000 0000 | | .LITERAL {0x00000000, 0x00004008}
0940 ; --------------------------------------------------------------------------------------
0940 ; SUBPROGRAM
0940 ; --------------------------------------------------------------------------------------
0940 0943 | C | .CONST 0x0943 ; Address of begin
0941 0004 | | .CONST 0x0004 ; Address of exception handler
0942 0001 | | .CONST 0x0001 ; Number of locals
0943 BODY_0940:
0943 INIT_0940:
0943 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0944 0000 0000 | | .BLANK 0000[0x4]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 0963 | c | .CONST 0x0963 ; Address of begin
0949 09b3 | | .CONST 0x09b3 ; Address of exception handler
094a 000b | | .CONST 0x000b ; Number of locals
094b INIT_0948:
094b e001 | | Load 0x0,0x1
094c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
094d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
094e e00b | | Load 0x0,0xb
094f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0950 e00b | | Load 0x0,0xb
0951 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0952 00ea | | Load_Encached Null_String_Cache
0953 e5ff | | Load 0x2,-0x1
0954 0217 | | Execute Heap_Access,All_Reference
0955 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0956 800c | | Call 0x0,0xc
0957 029f 0acb | | Declare_Subprogram INIT_0ac8,For_Call
0959 029f 0aeb | | Declare_Subprogram INIT_0ae8,For_Call
095b 029f 0b0b | | Declare_Subprogram INIT_0b08,For_Call
095d 029f 0b7b | {| Declare_Subprogram INIT_0b78,For_Call
095f 029f 0c1b | | Declare_Subprogram INIT_0c18,For_Call
0961 029f 0cab | | Declare_Subprogram INIT_0ca8,For_Call
0963 BODY_0948:
0963 e5fe | | Load 0x2,-0x2
0964 e00d | | Load 0x0,0xd
0965 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0966 4612 |F | Jump_Case 0x13
0967 7812 |x | Jump 0x97a ; case 0x0
0968 7811 |x | Jump 0x97a ; case 0x1
0969 7810 |x | Jump 0x97a ; case 0x2
096a 780f |x | Jump 0x97a ; case 0x3
096b 780e |x | Jump 0x97a ; case 0x4
096c 780d |x | Jump 0x97a ; case 0x5
096d 780c |x | Jump 0x97a ; case 0x6
096e 780b |x | Jump 0x97a ; case 0x7
096f 780a |x | Jump 0x97a ; case 0x8
0970 7809 |x | Jump 0x97a ; case 0x9
0971 7822 |x" | Jump 0x994 ; case 0xa
0972 782d |x- | Jump 0x9a0 ; case 0xb
0973 7833 |x3 | Jump 0x9a7 ; case 0xc
0974 7805 |x | Jump 0x97a ; case 0xd
0975 7804 |x | Jump 0x97a ; case 0xe
0976 7803 |x | Jump 0x97a ; case 0xf
0977 7802 |x | Jump 0x97a ; case 0x10
0978 7801 |x | Jump 0x97a ; case 0x11
0979 7800 |x | Jump 0x97a ; case 0x12
097a e00e | | Load 0x0,0xe
097b 180e | | Execute Package,Field_Execute,Field_Number 0xe
097c 4801 |H | Short_Literal 0x1
097d 4801 |H | Short_Literal 0x1
097e e00b | | Load 0x0,0xb
097f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0980 035b | [ | Declare_Type Array,Constrained
0981 0337 | 7 | Declare_Variable Array
0982 e5fe | | Load 0x2,-0x2
0983 e00d | | Load 0x0,0xd
0984 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0985 4801 |H | Short_Literal 0x1
0986 00da | | Load_Top At_Offset_2
0987 01d6 | | Execute Vector,Field_Write
0988 606f |`o | Indirect_Literal Discrete,0x9f8,{0x00000000, 0x00004018}
0989 e001 | | Load 0x0,0x1
098a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
098b e00b | | Load 0x0,0xb
098c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
098d 606a |`j | Indirect_Literal Discrete,0x9f8,{0x00000000, 0x00004018}
098e e001 | | Load 0x0,0x1
098f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0990 e5fe | | Load 0x2,-0x2
0991 e00d | | Load 0x0,0xd
0992 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0993 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0994 4801 |H | Short_Literal 0x1
0995 e5fe | | Load 0x2,-0x2
0996 e00d | | Load 0x0,0xd
0997 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0998 a403 | | Store_Unchecked 0x2,0x3
0999 4802 |H | Short_Literal 0x2
099a e5fe | | Load 0x2,-0x2
099b e00d | | Load 0x0,0xd
099c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
099d a404 | | Store_Unchecked 0x2,0x4
099e 8409 | | Call 0x2,0x9
099f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09a0 4801 |H | Short_Literal 0x1
09a1 e5fe | | Load 0x2,-0x2
09a2 e00d | | Load 0x0,0xd
09a3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
09a4 a403 | | Store_Unchecked 0x2,0x3
09a5 840a | | Call 0x2,0xa
09a6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09a7 4801 |H | Short_Literal 0x1
09a8 e5fe | | Load 0x2,-0x2
09a9 e00d | | Load 0x0,0xd
09aa 1818 | | Execute Package,Field_Execute,Field_Number 0x18
09ab a403 | | Store_Unchecked 0x2,0x3
09ac 4802 |H | Short_Literal 0x2
09ad e5fe | | Load 0x2,-0x2
09ae e00d | | Load 0x0,0xd
09af 1818 | | Execute Package,Field_Execute,Field_Number 0x18
09b0 a404 | | Store_Unchecked 0x2,0x4
09b1 840b | | Call 0x2,0xb
09b2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09b3 TRAP_0948:
09b3 e00f | | Load 0x0,0xf
09b4 010f | | Execute Exception,Equal
09b5 6816 |h | Jump_Zero 0x9cc
09b6 e5ff | | Load 0x2,-0x1
09b7 0219 | | Execute Heap_Access,All_Read
09b8 e001 | | Load 0x0,0x1
09b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09ba 4801 |H | Short_Literal 0x1
09bb 4801 |H | Short_Literal 0x1
09bc e00b | | Load 0x0,0xb
09bd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09be 035b | [ | Declare_Type Array,Constrained
09bf 0337 | 7 | Declare_Variable Array
09c0 e5fe | | Load 0x2,-0x2
09c1 e00d | | Load 0x0,0xd
09c2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
09c3 4801 |H | Short_Literal 0x1
09c4 00da | | Load_Top At_Offset_2
09c5 01d6 | | Execute Vector,Field_Write
09c6 602d |`- | Indirect_Literal Discrete,0x9f4,{0x00000000, 0x00004007}
09c7 e001 | | Load 0x0,0x1
09c8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
09c9 00d9 | | Load_Top At_Offset_1
09ca 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09cb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09cc e010 | | Load 0x0,0x10
09cd 010f | | Execute Exception,Equal
09ce 681c |h | Jump_Zero 0x9eb
09cf e5ff | | Load 0x2,-0x1
09d0 8220 | | Call 0x1,0x20
09d1 e00e | | Load 0x0,0xe
09d2 180e | | Execute Package,Field_Execute,Field_Number 0xe
09d3 4801 |H | Short_Literal 0x1
09d4 4801 |H | Short_Literal 0x1
09d5 e00b | | Load 0x0,0xb
09d6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09d7 035b | [ | Declare_Type Array,Constrained
09d8 0337 | 7 | Declare_Variable Array
09d9 e5fe | | Load 0x2,-0x2
09da e00d | | Load 0x0,0xd
09db 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
09dc 4801 |H | Short_Literal 0x1
09dd 00da | | Load_Top At_Offset_2
09de 01d6 | | Execute Vector,Field_Write
09df 6010 |` | Indirect_Literal Discrete,0x9f0,{0x00000000, 0x00004019}
09e0 e001 | | Load 0x0,0x1
09e1 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
09e2 e00b | | Load 0x0,0xb
09e3 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
09e4 600b |` | Indirect_Literal Discrete,0x9f0,{0x00000000, 0x00004019}
09e5 e001 | | Load 0x0,0x1
09e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09e7 e5fe | | Load 0x2,-0x2
09e8 e00d | | Load 0x0,0xd
09e9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
09ea 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09eb e5ff | | Load 0x2,-0x1
09ec 8220 | | Call 0x1,0x20
09ed 00d8 | | Load_Top At_Offset_0
09ee 0101 | | Execute Exception,Reraise
09ef 0000 | | .XXX[0x1]
09f0 0000 0000 | | .LITERAL {0x00000000, 0x00004019}
09f4 0000 0000 | | .LITERAL {0x00000000, 0x00004007}
09f8 0000 0000 | | .LITERAL {0x00000000, 0x00004018}
09fc 0000 0000 | | .BLANK 0000[0x4]
0a00 ; --------------------------------------------------------------------------------------
0a00 ; SUBPROGRAM
0a00 ; --------------------------------------------------------------------------------------
0a00 0a03 | | .CONST 0x0a03 ; Address of begin
0a01 0004 | | .CONST 0x0004 ; Address of exception handler
0a02 0001 | | .CONST 0x0001 ; Number of locals
0a03 BODY_0a00:
0a03 INIT_0a00:
0a03 00da | | Load_Top At_Offset_2
0a04 0217 | | Execute Heap_Access,All_Reference
0a05 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a06 0219 | | Execute Heap_Access,All_Read
0a07 c5fe | | Store 0x2,-0x2
0a08 e210 | | Load 0x1,0x10
0a09 00db | | Load_Top At_Offset_3
0a0a 0217 | | Execute Heap_Access,All_Reference
0a0b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0a0c 00da | | Load_Top At_Offset_2
0a0d 8220 | | Call 0x1,0x20
0a0e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a0f 0000 | | .XXX[0x1]
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a13 | | .CONST 0x0a13 ; Address of begin
0a11 0004 | | .CONST 0x0004 ; Address of exception handler
0a12 0001 | | .CONST 0x0001 ; Number of locals
0a13 BODY_0a10:
0a13 INIT_0a10:
0a13 00da | | Load_Top At_Offset_2
0a14 0217 | | Execute Heap_Access,All_Reference
0a15 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a16 00d8 | | Load_Top At_Offset_0
0a17 0120 | | Execute Any,Is_Value
0a18 7002 |p | Jump_Nonzero 0xa1b
0a19 00d8 | | Load_Top At_Offset_0
0a1a 011e | | Execute Any,Convert
0a1b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a1c 0000 0000 | | .BLANK 0000[0x4]
0a20 ; --------------------------------------------------------------------------------------
0a20 ; SUBPROGRAM
0a20 ; --------------------------------------------------------------------------------------
0a20 0a23 | # | .CONST 0x0a23 ; Address of begin
0a21 0004 | | .CONST 0x0004 ; Address of exception handler
0a22 0001 | | .CONST 0x0001 ; Number of locals
0a23 BODY_0a20:
0a23 INIT_0a20:
0a23 00da | | Load_Top At_Offset_2
0a24 0217 | | Execute Heap_Access,All_Reference
0a25 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0a26 e210 | | Load 0x1,0x10
0a27 0213 | | Execute Heap_Access,Check_In_Type
0a28 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a29 0000 0000 | | .BLANK 0000[0x7]
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a33 | 3 | .CONST 0x0a33 ; Address of begin
0a31 0004 | | .CONST 0x0004 ; Address of exception handler
0a32 0001 | | .CONST 0x0001 ; Number of locals
0a33 BODY_0a30:
0a33 INIT_0a30:
0a33 00da | | Load_Top At_Offset_2
0a34 0217 | | Execute Heap_Access,All_Reference
0a35 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a36 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a37 0000 | | .XXX[0x1]
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a3b | ; | .CONST 0x0a3b ; Address of begin
0a39 0004 | | .CONST 0x0004 ; Address of exception handler
0a3a 0001 | | .CONST 0x0001 ; Number of locals
0a3b BODY_0a38:
0a3b INIT_0a38:
0a3b 00db | | Load_Top At_Offset_3
0a3c 00db | | Load_Top At_Offset_3
0a3d 0217 | | Execute Heap_Access,All_Reference
0a3e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0a3f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a40 ; --------------------------------------------------------------------------------------
0a40 ; SUBPROGRAM
0a40 ; --------------------------------------------------------------------------------------
0a40 0a43 | C | .CONST 0x0a43 ; Address of begin
0a41 0004 | | .CONST 0x0004 ; Address of exception handler
0a42 0001 | | .CONST 0x0001 ; Number of locals
0a43 BODY_0a40:
0a43 INIT_0a40:
0a43 4800 |H | Short_Literal 0x0
0a44 00db | | Load_Top At_Offset_3
0a45 0217 | | Execute Heap_Access,All_Reference
0a46 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a47 e001 | | Load 0x0,0x1
0a48 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a49 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a4a 0000 0000 | | .BLANK 0000[0x6]
0a50 ; --------------------------------------------------------------------------------------
0a50 ; SUBPROGRAM
0a50 ; --------------------------------------------------------------------------------------
0a50 0a53 | S | .CONST 0x0a53 ; Address of begin
0a51 0004 | | .CONST 0x0004 ; Address of exception handler
0a52 0001 | | .CONST 0x0001 ; Number of locals
0a53 BODY_0a50:
0a53 INIT_0a50:
0a53 00da | | Load_Top At_Offset_2
0a54 0217 | | Execute Heap_Access,All_Reference
0a55 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a56 e001 | | Load 0x0,0x1
0a57 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0a58 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a59 0000 0000 | | .BLANK 0000[0x7]
0a60 ; --------------------------------------------------------------------------------------
0a60 ; SUBPROGRAM
0a60 ; --------------------------------------------------------------------------------------
0a60 0a63 | c | .CONST 0x0a63 ; Address of begin
0a61 0004 | | .CONST 0x0004 ; Address of exception handler
0a62 0001 | | .CONST 0x0001 ; Number of locals
0a63 BODY_0a60:
0a63 INIT_0a60:
0a63 00da | | Load_Top At_Offset_2
0a64 e00a | | Load 0x0,0xa
0a65 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a66 e222 | " | Load 0x1,0x22
0a67 e223 | # | Load 0x1,0x23
0a68 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0a69 e007 | | Load 0x0,0x7
0a6a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0a6b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a6c 0000 0000 | | .BLANK 0000[0x4]
0a70 ; --------------------------------------------------------------------------------------
0a70 ; SUBPROGRAM
0a70 ; --------------------------------------------------------------------------------------
0a70 0a73 | s | .CONST 0x0a73 ; Address of begin
0a71 0004 | | .CONST 0x0004 ; Address of exception handler
0a72 0001 | | .CONST 0x0001 ; Number of locals
0a73 BODY_0a70:
0a73 INIT_0a70:
0a73 00da | | Load_Top At_Offset_2
0a74 e221 | ! | Load 0x1,0x21
0a75 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a76 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a77 0000 | | .XXX[0x1]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a7b | { | .CONST 0x0a7b ; Address of begin
0a79 0004 | | .CONST 0x0004 ; Address of exception handler
0a7a 0001 | | .CONST 0x0001 ; Number of locals
0a7b BODY_0a78:
0a7b INIT_0a78:
0a7b 4608 |F | Jump_Case 0x9
0a7c 7808 |x | Jump 0xa85 ; case 0x0
0a7d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0a7e 7813 |x | Jump 0xa92 ; case 0x2
0a7f 7812 |x | Jump 0xa92 ; case 0x3
0a80 7811 |x | Jump 0xa92 ; case 0x4
0a81 7810 |x | Jump 0xa92 ; case 0x5
0a82 780f |x | Jump 0xa92 ; case 0x6
0a83 780e |x | Jump 0xa92 ; case 0x7
0a84 780d |x | Jump 0xa92 ; case 0x8
0a85 00da | | Load_Top At_Offset_2
0a86 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0a87 0125 | % | Execute Any,Set_Constraint
0a88 00da | | Load_Top At_Offset_2
0a89 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0a8a 1c00 | | Execute_Immediate Run_Utility,0x0
0a8b 00da | | Load_Top At_Offset_2
0a8c 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0a8d 0125 | % | Execute Any,Set_Constraint
0a8e 00da | | Load_Top At_Offset_2
0a8f 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0a90 1c00 | | Execute_Immediate Run_Utility,0x0
0a91 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0a92 0869 | i | Execute_Immediate Raise,0x69
0a93 0000 0000 | | .BLANK 0000[0x5]
0a98 ; --------------------------------------------------------------------------------------
0a98 ; SUBPROGRAM
0a98 ; --------------------------------------------------------------------------------------
0a98 0a9b | | .CONST 0x0a9b ; Address of begin
0a99 0004 | | .CONST 0x0004 ; Address of exception handler
0a9a 0001 | | .CONST 0x0001 ; Number of locals
0a9b BODY_0a98:
0a9b INIT_0a98:
0a9b 00da | | Load_Top At_Offset_2
0a9c 0217 | | Execute Heap_Access,All_Reference
0a9d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0a9e 6827 |h' | Jump_Zero 0xac6
0a9f 00da | | Load_Top At_Offset_2
0aa0 0217 | | Execute Heap_Access,All_Reference
0aa1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0aa2 e003 | | Load 0x0,0x3
0aa3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0aa4 7014 |p | Jump_Nonzero 0xab9
0aa5 00da | | Load_Top At_Offset_2
0aa6 0219 | | Execute Heap_Access,All_Read
0aa7 00d8 | | Load_Top At_Offset_0
0aa8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0aa9 e011 | | Load 0x0,0x11
0aaa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0aab e012 | | Load 0x0,0x12
0aac 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0aad 00ea | | Load_Encached Null_String_Cache
0aae 00ea | | Load_Encached Null_String_Cache
0aaf e5ff | | Load 0x2,-0x1
0ab0 0217 | | Execute Heap_Access,All_Reference
0ab1 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0ab2 800c | | Call 0x0,0xc
0ab3 4800 |H | Short_Literal 0x0
0ab4 e003 | | Load 0x0,0x3
0ab5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0ab6 00d9 | | Load_Top At_Offset_1
0ab7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0ab8 00d1 | | Pop_Control Pop_Count_1
0ab9 00da | | Load_Top At_Offset_2
0aba 0219 | | Execute Heap_Access,All_Read
0abb 00d8 | | Load_Top At_Offset_0
0abc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0abd e003 | | Load 0x0,0x3
0abe 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0abf 00d9 | | Load_Top At_Offset_1
0ac0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0ac1 00d1 | | Pop_Control Pop_Count_1
0ac2 4800 |H | Short_Literal 0x0
0ac3 00db | | Load_Top At_Offset_3
0ac4 0217 | | Execute Heap_Access,All_Reference
0ac5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0ac6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ac7 0000 | | .XXX[0x1]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0acb | | .CONST 0x0acb ; Address of begin
0ac9 0004 | | .CONST 0x0004 ; Address of exception handler
0aca 0001 | | .CONST 0x0001 ; Number of locals
0acb BODY_0ac8:
0acb INIT_0ac8:
0acb 00da | | Load_Top At_Offset_2
0acc e00b | | Load 0x0,0xb
0acd 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0ace 0b0f | | Execute_Immediate Case_Compare,0xf
0acf 7004 |p | Jump_Nonzero 0xad4
0ad0 0f01 | | Execute_Immediate Equal,0x1
0ad1 700c |p | Jump_Nonzero 0xade
0ad2 e010 | | Load 0x0,0x10
0ad3 0257 | W | Execute Discrete,Raise
0ad4 00d1 | | Pop_Control Pop_Count_1
0ad5 e5ff | | Load 0x2,-0x1
0ad6 0217 | | Execute Heap_Access,All_Reference
0ad7 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0ad8 0219 | | Execute Heap_Access,All_Read
0ad9 e20f | | Load 0x1,0xf
0ada 0119 | | Execute Any,Check_In_Formal_Type
0adb e5fe | | Load 0x2,-0x2
0adc 8211 | | Call 0x1,0x11
0add 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ade 00da | | Load_Top At_Offset_2
0adf e00b | | Load 0x0,0xb
0ae0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0ae1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ae2 0000 0000 | | .BLANK 0000[0x6]
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; SUBPROGRAM
0ae8 ; --------------------------------------------------------------------------------------
0ae8 0aed | | .CONST 0x0aed ; Address of begin
0ae9 0af3 | | .CONST 0x0af3 ; Address of exception handler
0aea 0002 | | .CONST 0x0002 ; Number of locals
0aeb INIT_0ae8:
0aeb 029f 0d13 | | Declare_Subprogram INIT_0d10,For_Call
0aed BODY_0ae8:
0aed e7fe | | Load 0x3,-0x2
0aee e002 | | Load 0x0,0x2
0aef 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0af0 c7fe | | Store 0x3,-0x2
0af1 8602 | | Call 0x3,0x2
0af2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0af3 TRAP_0ae8:
0af3 0007 | | Action Break_Optional
0af4 e00e | | Load 0x0,0xe
0af5 180e | | Execute Package,Field_Execute,Field_Number 0xe
0af6 e00b | | Load 0x0,0xb
0af7 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0af8 6007 |` | Indirect_Literal Discrete,0xb00,{0x00000000, 0x00004026}
0af9 e001 | | Load 0x0,0x1
0afa 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0afb e00f | | Load 0x0,0xf
0afc 0257 | W | Execute Discrete,Raise
0afd 0000 0000 | | .XXX[0x3]
0aff 0000 | |
0b00 0000 0000 | | .LITERAL {0x00000000, 0x00004026}
0b04 0000 0000 | | .BLANK 0000[0x4]
0b08 ; --------------------------------------------------------------------------------------
0b08 ; SUBPROGRAM
0b08 ; --------------------------------------------------------------------------------------
0b08 0b17 | | .CONST 0x0b17 ; Address of begin
0b09 0b55 | U | .CONST 0x0b55 ; Address of exception handler
0b0a 0004 | | .CONST 0x0004 ; Number of locals
0b0b INIT_0b08:
0b0b 4801 |H | Short_Literal 0x1
0b0c 4a00 |J | Short_Literal 0x200
0b0d e003 | | Load 0x0,0x3
0b0e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0b0f 035b | [ | Declare_Type Array,Constrained
0b10 0337 | 7 | Declare_Variable Array
0b11 00e3 | | Load_Encached Natural_Cache
0b12 e003 | | Load 0x0,0x3
0b13 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b14 02c7 | | Declare_Variable Any
0b15 00d8 | | Load_Top At_Offset_0
0b16 1c00 | | Execute_Immediate Run_Utility,0x0
0b17 BODY_0b08:
0b17 e7ff | | Load 0x3,-0x1
0b18 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
0b1a 01df | | Execute Vector,Equal
0b1b 6805 |h | Jump_Zero 0xb21
0b1c e5ff | | Load 0x2,-0x1
0b1d 0217 | | Execute Heap_Access,All_Reference
0b1e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b1f c604 | | Store 0x3,0x4
0b20 780b |x | Jump 0xb2c
0b21 00d8 | | Load_Top At_Offset_0
0b22 e011 | | Load 0x0,0x11
0b23 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b24 e012 | | Load 0x0,0x12
0b25 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0b26 00ea | | Load_Encached Null_String_Cache
0b27 e7ff | | Load 0x3,-0x1
0b28 4800 |H | Short_Literal 0x0
0b29 e003 | | Load 0x0,0x3
0b2a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b2b c604 | | Store 0x3,0x4
0b2c e7fd | | Load 0x3,-0x3
0b2d 00ea | | Load_Encached Null_String_Cache
0b2e e7fe | | Load 0x3,-0x2
0b2f e002 | | Load 0x0,0x2
0b30 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b31 c7fd | | Store 0x3,-0x3
0b32 00cf | | Action Mark_Auxiliary
0b33 780f |x | Jump 0xb43
0b34 00e3 | | Load_Encached Natural_Cache
0b35 e602 | | Load 0x3,0x2
0b36 00db | | Load_Top At_Offset_3
0b37 e003 | | Load 0x0,0x3
0b38 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0b39 00d1 | | Pop_Control Pop_Count_1
0b3a 005b | [ | Store_Top Discrete,At_Offset_3
0b3b 4801 |H | Short_Literal 0x1
0b3c 00db | | Load_Top At_Offset_3
0b3d e602 | | Load 0x3,0x2
0b3e 01cf | | Execute Vector,Slice_Read
0b3f e7fd | | Load 0x3,-0x3
0b40 e002 | | Load 0x0,0x2
0b41 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0b42 00c9 | | Action Pop_Auxiliary_Loop
0b43 00d9 | | Load_Top At_Offset_1
0b44 e003 | | Load 0x0,0x3
0b45 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0b46 6fed |o | Jump_Zero 0xb34
0b47 00ce | | Action Pop_Auxiliary
0b48 e7ff | | Load 0x3,-0x1
0b49 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
0b4b 01de | | Execute Vector,Not_Equal
0b4c 6804 |h | Jump_Zero 0xb51
0b4d 00d8 | | Load_Top At_Offset_0
0b4e e003 | | Load 0x0,0x3
0b4f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0b50 c604 | | Store 0x3,0x4
0b51 e7fd | | Load 0x3,-0x3
0b52 e002 | | Load 0x0,0x2
0b53 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0b54 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0b55 TRAP_0b08:
0b55 0007 | | Action Break_Optional
0b56 e00e | | Load 0x0,0xe
0b57 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b58 4801 |H | Short_Literal 0x1
0b59 4802 |H | Short_Literal 0x2
0b5a e00b | | Load 0x0,0xb
0b5b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b5c 035b | [ | Declare_Type Array,Constrained
0b5d 0337 | 7 | Declare_Variable Array
0b5e e7ff | | Load 0x3,-0x1
0b5f e00b | | Load 0x0,0xb
0b60 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b61 4801 |H | Short_Literal 0x1
0b62 00da | | Load_Top At_Offset_2
0b63 01d6 | | Execute Vector,Field_Write
0b64 e7fe | | Load 0x3,-0x2
0b65 e00b | | Load 0x0,0xb
0b66 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b67 4802 |H | Short_Literal 0x2
0b68 00da | | Load_Top At_Offset_2
0b69 01d6 | | Execute Vector,Field_Write
0b6a 6005 |` | Indirect_Literal Discrete,0xb70,{0x00000000, 0x00004025}
0b6b e001 | | Load 0x0,0x1
0b6c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0b6d e00f | | Load 0x0,0xf
0b6e 0257 | W | Execute Discrete,Raise
0b6f 0000 | | .XXX[0x1]
0b70 0000 0000 | | .LITERAL {0x00000000, 0x00004025}
0b74 0000 0000 | | .BLANK 0000[0x4]
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b7f | | .CONST 0x0b7f ; Address of begin
0b79 0004 | | .CONST 0x0004 ; Address of exception handler
0b7a 0003 | | .CONST 0x0003 ; Number of locals
0b7b INIT_0b78:
0b7b e403 | | Load 0x2,0x3
0b7c 8013 | | Call 0x0,0x13
0b7d e404 | | Load 0x2,0x4
0b7e 8406 | | Call 0x2,0x6
0b7f BODY_0b78:
0b7f e5fe | | Load 0x2,-0x2
0b80 8014 | | Call 0x0,0x14
0b81 7026 |p& | Jump_Nonzero 0xba8
0b82 e5ff | | Load 0x2,-0x1
0b83 0219 | | Execute Heap_Access,All_Read
0b84 00d8 | | Load_Top At_Offset_0
0b85 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b86 00da | | Load_Top At_Offset_2
0b87 e602 | | Load 0x3,0x2
0b88 8408 | | Call 0x2,0x8
0b89 00d9 | | Load_Top At_Offset_1
0b8a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0b8b 00d1 | | Pop_Control Pop_Count_1
0b8c e5fe | | Load 0x2,-0x2
0b8d e00d | | Load 0x0,0xd
0b8e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b8f 6817 |h | Jump_Zero 0xba7
0b90 e00e | | Load 0x0,0xe
0b91 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b92 4801 |H | Short_Literal 0x1
0b93 4802 |H | Short_Literal 0x2
0b94 e00b | | Load 0x0,0xb
0b95 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b96 035b | [ | Declare_Type Array,Constrained
0b97 0337 | 7 | Declare_Variable Array
0b98 00db | | Load_Top At_Offset_3
0b99 e00b | | Load 0x0,0xb
0b9a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b9b 4801 |H | Short_Literal 0x1
0b9c 00da | | Load_Top At_Offset_2
0b9d 01d6 | | Execute Vector,Field_Write
0b9e 00da | | Load_Top At_Offset_2
0b9f e00b | | Load 0x0,0xb
0ba0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ba1 4802 |H | Short_Literal 0x2
0ba2 00da | | Load_Top At_Offset_2
0ba3 01d6 | | Execute Vector,Field_Write
0ba4 606b |`k | Indirect_Literal Discrete,0xc10,{0x00000000, 0x00004022}
0ba5 e001 | | Load 0x0,0x1
0ba6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0ba7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ba8 e5fe | | Load 0x2,-0x2
0ba9 e00d | | Load 0x0,0xd
0baa 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0bab 7002 |p | Jump_Nonzero 0xbae
0bac 00cc | | Action Pop_Block
0bad 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0bae e5ff | | Load 0x2,-0x1
0baf 0219 | | Execute Heap_Access,All_Read
0bb0 e402 | | Load 0x2,0x2
0bb1 00d9 | | Load_Top At_Offset_1
0bb2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0bb3 e405 | | Load 0x2,0x5
0bb4 8015 | | Call 0x0,0x15
0bb5 00da | | Load_Top At_Offset_2
0bb6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0bb7 c402 | | Store 0x2,0x2
0bb8 00d1 | | Pop_Control Pop_Count_1
0bb9 4800 |H | Short_Literal 0x0
0bba e402 | | Load 0x2,0x2
0bbb e001 | | Load 0x0,0x1
0bbc 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0bbd 6805 |h | Jump_Zero 0xbc3
0bbe 4801 |H | Short_Literal 0x1
0bbf e5ff | | Load 0x2,-0x1
0bc0 0217 | | Execute Heap_Access,All_Reference
0bc1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0bc2 7806 |x | Jump 0xbc9
0bc3 e402 | | Load 0x2,0x2
0bc4 e5fe | | Load 0x2,-0x2
0bc5 e00d | | Load 0x0,0xd
0bc6 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0bc7 00cc | | Action Pop_Block
0bc8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0bc9 e5ff | | Load 0x2,-0x1
0bca 0219 | | Execute Heap_Access,All_Read
0bcb 00d8 | | Load_Top At_Offset_0
0bcc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0bcd e5fe | | Load 0x2,-0x2
0bce e016 | | Load 0x0,0x16
0bcf a017 | | Store_Unchecked 0x0,0x17
0bd0 a018 | | Store_Unchecked 0x0,0x18
0bd1 a019 | | Store_Unchecked 0x0,0x19
0bd2 a01a | | Store_Unchecked 0x0,0x1a
0bd3 a01b | | Store_Unchecked 0x0,0x1b
0bd4 e01c | | Load 0x0,0x1c
0bd5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0bd6 00d9 | | Load_Top At_Offset_1
0bd7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0bd8 00d1 | | Pop_Control Pop_Count_1
0bd9 e5ff | | Load 0x2,-0x1
0bda 0219 | | Execute Heap_Access,All_Read
0bdb 00d8 | | Load_Top At_Offset_0
0bdc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0bdd 4800 |H | Short_Literal 0x0
0bde e003 | | Load 0x0,0x3
0bdf 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0be0 00d9 | | Load_Top At_Offset_1
0be1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0be2 00d1 | | Pop_Control Pop_Count_1
0be3 e5ff | | Load 0x2,-0x1
0be4 0219 | | Execute Heap_Access,All_Read
0be5 00d8 | | Load_Top At_Offset_0
0be6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0be7 00da | | Load_Top At_Offset_2
0be8 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
0bea 8408 | | Call 0x2,0x8
0beb 00d9 | | Load_Top At_Offset_1
0bec 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0bed 00d1 | | Pop_Control Pop_Count_1
0bee e5fe | | Load 0x2,-0x2
0bef e00d | | Load 0x0,0xd
0bf0 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0bf1 6817 |h | Jump_Zero 0xc09
0bf2 e00e | | Load 0x0,0xe
0bf3 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bf4 4801 |H | Short_Literal 0x1
0bf5 4802 |H | Short_Literal 0x2
0bf6 e00b | | Load 0x0,0xb
0bf7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bf8 035b | [ | Declare_Type Array,Constrained
0bf9 0337 | 7 | Declare_Variable Array
0bfa 00db | | Load_Top At_Offset_3
0bfb e00b | | Load 0x0,0xb
0bfc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bfd 4801 |H | Short_Literal 0x1
0bfe 00da | | Load_Top At_Offset_2
0bff 01d6 | | Execute Vector,Field_Write
0c00 00da | | Load_Top At_Offset_2
0c01 e00b | | Load 0x0,0xb
0c02 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c03 4802 |H | Short_Literal 0x2
0c04 00da | | Load_Top At_Offset_2
0c05 01d6 | | Execute Vector,Field_Write
0c06 6005 |` | Indirect_Literal Discrete,0xc0c,{0x00000000, 0x00004021}
0c07 e001 | | Load 0x0,0x1
0c08 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c09 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c0a 0000 0000 | | .XXX[0x2]
0c0c 0000 0000 | | .LITERAL {0x00000000, 0x00004021}
0c10 0000 0000 | | .LITERAL {0x00000000, 0x00004022}
0c14 0000 0000 | | .BLANK 0000[0x4]
0c18 ; --------------------------------------------------------------------------------------
0c18 ; SUBPROGRAM
0c18 ; --------------------------------------------------------------------------------------
0c18 0c1d | | .CONST 0x0c1d ; Address of begin
0c19 0004 | | .CONST 0x0004 ; Address of exception handler
0c1a 0002 | | .CONST 0x0002 ; Number of locals
0c1b INIT_0c18:
0c1b e403 | | Load 0x2,0x3
0c1c 8013 | | Call 0x0,0x13
0c1d BODY_0c18:
0c1d e5fe | | Load 0x2,-0x2
0c1e 801d | | Call 0x0,0x1d
0c1f 7029 |p) | Jump_Nonzero 0xc49
0c20 e403 | | Load 0x2,0x3
0c21 e00b | | Load 0x0,0xb
0c22 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0c23 0f01 | | Execute_Immediate Equal,0x1
0c24 6824 |h$ | Jump_Zero 0xc49
0c25 e403 | | Load 0x2,0x3
0c26 e00b | | Load 0x0,0xb
0c27 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c28 01db | | Execute Vector,Length
0c29 681f |h | Jump_Zero 0xc49
0c2a e5ff | | Load 0x2,-0x1
0c2b 0219 | | Execute Heap_Access,All_Read
0c2c 00d8 | | Load_Top At_Offset_0
0c2d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c2e 00da | | Load_Top At_Offset_2
0c2f 8407 | | Call 0x2,0x7
0c30 00d9 | | Load_Top At_Offset_1
0c31 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0c32 00d1 | | Pop_Control Pop_Count_1
0c33 e5fe | | Load 0x2,-0x2
0c34 e00d | | Load 0x0,0xd
0c35 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c36 6811 |h | Jump_Zero 0xc48
0c37 e00e | | Load 0x0,0xe
0c38 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c39 4801 |H | Short_Literal 0x1
0c3a 4801 |H | Short_Literal 0x1
0c3b e00b | | Load 0x0,0xb
0c3c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c3d 035b | [ | Declare_Type Array,Constrained
0c3e 0337 | 7 | Declare_Variable Array
0c3f 00da | | Load_Top At_Offset_2
0c40 e00b | | Load 0x0,0xb
0c41 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c42 4801 |H | Short_Literal 0x1
0c43 00da | | Load_Top At_Offset_2
0c44 01d6 | | Execute Vector,Field_Write
0c45 605e |`^ | Indirect_Literal Discrete,0xca4,{0x00000000, 0x00004024}
0c46 e001 | | Load 0x0,0x1
0c47 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c48 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c49 e5ff | | Load 0x2,-0x1
0c4a 0219 | | Execute Heap_Access,All_Read
0c4b e402 | | Load 0x2,0x2
0c4c 00d9 | | Load_Top At_Offset_1
0c4d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c4e e405 | | Load 0x2,0x5
0c4f 8015 | | Call 0x0,0x15
0c50 00da | | Load_Top At_Offset_2
0c51 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0c52 c402 | | Store 0x2,0x2
0c53 00d1 | | Pop_Control Pop_Count_1
0c54 4800 |H | Short_Literal 0x0
0c55 e402 | | Load 0x2,0x2
0c56 e001 | | Load 0x0,0x1
0c57 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0c58 6805 |h | Jump_Zero 0xc5e
0c59 4801 |H | Short_Literal 0x1
0c5a e5ff | | Load 0x2,-0x1
0c5b 0217 | | Execute Heap_Access,All_Reference
0c5c 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0c5d 7806 |x | Jump 0xc64
0c5e e402 | | Load 0x2,0x2
0c5f e5fe | | Load 0x2,-0x2
0c60 e00d | | Load 0x0,0xd
0c61 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0c62 00cc | | Action Pop_Block
0c63 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c64 e5ff | | Load 0x2,-0x1
0c65 0219 | | Execute Heap_Access,All_Read
0c66 00d8 | | Load_Top At_Offset_0
0c67 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c68 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
0c6a 8407 | | Call 0x2,0x7
0c6b 00d9 | | Load_Top At_Offset_1
0c6c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0c6d 00d1 | | Pop_Control Pop_Count_1
0c6e e5ff | | Load 0x2,-0x1
0c6f 0219 | | Execute Heap_Access,All_Read
0c70 00d8 | | Load_Top At_Offset_0
0c71 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c72 4800 |H | Short_Literal 0x0
0c73 e003 | | Load 0x0,0x3
0c74 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0c75 00d9 | | Load_Top At_Offset_1
0c76 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0c77 00d1 | | Pop_Control Pop_Count_1
0c78 e5ff | | Load 0x2,-0x1
0c79 0219 | | Execute Heap_Access,All_Read
0c7a 00d8 | | Load_Top At_Offset_0
0c7b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c7c e5fe | | Load 0x2,-0x2
0c7d e016 | | Load 0x0,0x16
0c7e a017 | | Store_Unchecked 0x0,0x17
0c7f a018 | | Store_Unchecked 0x0,0x18
0c80 a019 | | Store_Unchecked 0x0,0x19
0c81 a01a | | Store_Unchecked 0x0,0x1a
0c82 a01b | | Store_Unchecked 0x0,0x1b
0c83 e01c | | Load 0x0,0x1c
0c84 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0c85 00d9 | | Load_Top At_Offset_1
0c86 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0c87 00d1 | | Pop_Control Pop_Count_1
0c88 e5fe | | Load 0x2,-0x2
0c89 e00d | | Load 0x0,0xd
0c8a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c8b 6811 |h | Jump_Zero 0xc9d
0c8c e00e | | Load 0x0,0xe
0c8d 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c8e 4801 |H | Short_Literal 0x1
0c8f 4801 |H | Short_Literal 0x1
0c90 e00b | | Load 0x0,0xb
0c91 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c92 035b | [ | Declare_Type Array,Constrained
0c93 0337 | 7 | Declare_Variable Array
0c94 00da | | Load_Top At_Offset_2
0c95 e00b | | Load 0x0,0xb
0c96 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c97 4801 |H | Short_Literal 0x1
0c98 00da | | Load_Top At_Offset_2
0c99 01d6 | | Execute Vector,Field_Write
0c9a 6005 |` | Indirect_Literal Discrete,0xca0,{0x00000000, 0x00004023}
0c9b e001 | | Load 0x0,0x1
0c9c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c9d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c9e 0000 0000 | | .XXX[0x2]
0ca0 0000 0000 | | .LITERAL {0x00000000, 0x00004023}
0ca4 0000 0000 | | .LITERAL {0x00000000, 0x00004024}
0ca8 ; --------------------------------------------------------------------------------------
0ca8 ; SUBPROGRAM
0ca8 ; --------------------------------------------------------------------------------------
0ca8 0caf | | .CONST 0x0caf ; Address of begin
0ca9 0004 | | .CONST 0x0004 ; Address of exception handler
0caa 0003 | | .CONST 0x0003 ; Number of locals
0cab INIT_0ca8:
0cab e404 | | Load 0x2,0x4
0cac 8013 | | Call 0x0,0x13
0cad e403 | | Load 0x2,0x3
0cae 8406 | | Call 0x2,0x6
0caf BODY_0ca8:
0caf e5ff | | Load 0x2,-0x1
0cb0 0219 | | Execute Heap_Access,All_Read
0cb1 e402 | | Load 0x2,0x2
0cb2 00d9 | | Load_Top At_Offset_1
0cb3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0cb4 e405 | | Load 0x2,0x5
0cb5 8015 | | Call 0x0,0x15
0cb6 00da | | Load_Top At_Offset_2
0cb7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0cb8 c402 | | Store 0x2,0x2
0cb9 00d1 | | Pop_Control Pop_Count_1
0cba 4800 |H | Short_Literal 0x0
0cbb e402 | | Load 0x2,0x2
0cbc e001 | | Load 0x0,0x1
0cbd 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0cbe 6805 |h | Jump_Zero 0xcc4
0cbf 4801 |H | Short_Literal 0x1
0cc0 e5ff | | Load 0x2,-0x1
0cc1 0217 | | Execute Heap_Access,All_Reference
0cc2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0cc3 7806 |x | Jump 0xcca
0cc4 e402 | | Load 0x2,0x2
0cc5 e5fe | | Load 0x2,-0x2
0cc6 e00d | | Load 0x0,0xd
0cc7 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0cc8 00cc | | Action Pop_Block
0cc9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0cca e5ff | | Load 0x2,-0x1
0ccb 0219 | | Execute Heap_Access,All_Read
0ccc 00d8 | | Load_Top At_Offset_0
0ccd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0cce e5fe | | Load 0x2,-0x2
0ccf e016 | | Load 0x0,0x16
0cd0 a017 | | Store_Unchecked 0x0,0x17
0cd1 a018 | | Store_Unchecked 0x0,0x18
0cd2 a019 | | Store_Unchecked 0x0,0x19
0cd3 a01a | | Store_Unchecked 0x0,0x1a
0cd4 a01b | | Store_Unchecked 0x0,0x1b
0cd5 e01c | | Load 0x0,0x1c
0cd6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0cd7 00d9 | | Load_Top At_Offset_1
0cd8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0cd9 00d1 | | Pop_Control Pop_Count_1
0cda e5ff | | Load 0x2,-0x1
0cdb 0219 | | Execute Heap_Access,All_Read
0cdc 00d8 | | Load_Top At_Offset_0
0cdd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0cde 4800 |H | Short_Literal 0x0
0cdf e003 | | Load 0x0,0x3
0ce0 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0ce1 00d9 | | Load_Top At_Offset_1
0ce2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0ce3 00d1 | | Pop_Control Pop_Count_1
0ce4 e5ff | | Load 0x2,-0x1
0ce5 0219 | | Execute Heap_Access,All_Read
0ce6 00d8 | | Load_Top At_Offset_0
0ce7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0ce8 00da | | Load_Top At_Offset_2
0ce9 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
0ceb 8408 | | Call 0x2,0x8
0cec 00d9 | | Load_Top At_Offset_1
0ced 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0cee 00d1 | | Pop_Control Pop_Count_1
0cef e5fe | | Load 0x2,-0x2
0cf0 e00d | | Load 0x0,0xd
0cf1 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0cf2 6817 |h | Jump_Zero 0xd0a
0cf3 e00e | | Load 0x0,0xe
0cf4 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cf5 4801 |H | Short_Literal 0x1
0cf6 4802 |H | Short_Literal 0x2
0cf7 e00b | | Load 0x0,0xb
0cf8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cf9 035b | [ | Declare_Type Array,Constrained
0cfa 0337 | 7 | Declare_Variable Array
0cfb 00db | | Load_Top At_Offset_3
0cfc e00b | | Load 0x0,0xb
0cfd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0cfe 4801 |H | Short_Literal 0x1
0cff 00da | | Load_Top At_Offset_2
0d00 01d6 | | Execute Vector,Field_Write
0d01 00da | | Load_Top At_Offset_2
0d02 e00b | | Load 0x0,0xb
0d03 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d04 4802 |H | Short_Literal 0x2
0d05 00da | | Load_Top At_Offset_2
0d06 01d6 | | Execute Vector,Field_Write
0d07 6004 |` | Indirect_Literal Discrete,0xd0c,{0x00000000, 0x00004021}
0d08 e001 | | Load 0x0,0x1
0d09 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d0a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d0b 0000 | | .XXX[0x1]
0d0c 0000 0000 | | .LITERAL {0x00000000, 0x00004021}
0d10 ; --------------------------------------------------------------------------------------
0d10 ; SUBPROGRAM
0d10 ; --------------------------------------------------------------------------------------
0d10 0d27 | ' | .CONST 0x0d27 ; Address of begin
0d11 0004 | | .CONST 0x0004 ; Address of exception handler
0d12 0007 | | .CONST 0x0007 ; Number of locals
0d13 INIT_0d10:
0d13 e003 | | Load 0x0,0x3
0d14 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d15 02c7 | | Declare_Variable Any
0d16 00d8 | | Load_Top At_Offset_0
0d17 1c00 | | Execute_Immediate Run_Utility,0x0
0d18 e7fe | | Load 0x3,-0x2
0d19 e002 | | Load 0x0,0x2
0d1a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0d1b e7fe | | Load 0x3,-0x2
0d1c e002 | | Load 0x0,0x2
0d1d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0d1e 4801 |H | Short_Literal 0x1
0d1f 00d9 | | Load_Top At_Offset_1
0d20 e003 | | Load 0x0,0x3
0d21 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0d22 035b | [ | Declare_Type Array,Constrained
0d23 0337 | 7 | Declare_Variable Array
0d24 00e3 | | Load_Encached Natural_Cache
0d25 029f 0d6b | k| Declare_Subprogram INIT_0d68,For_Call
0d27 BODY_0d10:
0d27 e7ff | | Load 0x3,-0x1
0d28 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
0d2a 01df | | Execute Vector,Equal
0d2b 6805 |h | Jump_Zero 0xd31
0d2c e5ff | | Load 0x2,-0x1
0d2d 0217 | | Execute Heap_Access,All_Reference
0d2e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0d2f c802 | | Store 0x4,0x2
0d30 780d |x | Jump 0xd3e
0d31 e802 | | Load 0x4,0x2
0d32 e011 | | Load 0x0,0x11
0d33 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d34 e012 | | Load 0x0,0x12
0d35 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0d36 e012 | | Load 0x0,0x12
0d37 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0d38 00ea | | Load_Encached Null_String_Cache
0d39 8807 | | Call 0x4,0x7
0d3a 4801 |H | Short_Literal 0x1
0d3b e003 | | Load 0x0,0x3
0d3c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d3d c802 | | Store 0x4,0x2
0d3e 00cf | | Action Mark_Auxiliary
0d3f 780f |x | Jump 0xd4f
0d40 00e3 | | Load_Encached Natural_Cache
0d41 e805 | | Load 0x4,0x5
0d42 e7fe | | Load 0x3,-0x2
0d43 e002 | | Load 0x0,0x2
0d44 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d45 00d1 | | Pop_Control Pop_Count_1
0d46 005b | [ | Store_Top Discrete,At_Offset_3
0d47 4801 |H | Short_Literal 0x1
0d48 00db | | Load_Top At_Offset_3
0d49 e805 | | Load 0x4,0x5
0d4a 01cf | | Execute Vector,Slice_Read
0d4b e802 | | Load 0x4,0x2
0d4c e003 | | Load 0x0,0x3
0d4d 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0d4e 00c9 | | Action Pop_Auxiliary_Loop
0d4f e7fe | | Load 0x3,-0x2
0d50 e002 | | Load 0x0,0x2
0d51 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0d52 6fed |o | Jump_Zero 0xd40
0d53 00ce | | Action Pop_Auxiliary
0d54 e7ff | | Load 0x3,-0x1
0d55 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
0d57 01de | | Execute Vector,Not_Equal
0d58 6804 |h | Jump_Zero 0xd5d
0d59 e802 | | Load 0x4,0x2
0d5a e003 | | Load 0x0,0x3
0d5b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0d5c c802 | | Store 0x4,0x2
0d5d e7fe | | Load 0x3,-0x2
0d5e e002 | | Load 0x0,0x2
0d5f 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0d60 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d61 0000 0000 | | .BLANK 0000[0x7]
0d68 ; --------------------------------------------------------------------------------------
0d68 ; SUBPROGRAM
0d68 ; --------------------------------------------------------------------------------------
0d68 0d6b | k | .CONST 0x0d6b ; Address of begin
0d69 0004 | | .CONST 0x0004 ; Address of exception handler
0d6a 0001 | | .CONST 0x0001 ; Number of locals
0d6b BODY_0d68:
0d6b INIT_0d68:
0d6b e7ff | | Load 0x3,-0x1
0d6c 01db | | Execute Vector,Length
0d6d 7002 |p | Jump_Nonzero 0xd70
0d6e e803 | | Load 0x4,0x3
0d6f 00ca | | Action Exit_Nullary_Function
0d70 e7ff | | Load 0x3,-0x1
0d71 0335 | 5 | Declare_Variable Array,Duplicate
0d72 00cd | | Action Spare6_Action
0d73 00ca | | Action Exit_Nullary_Function
0d74 0000 0000 | | .BLANK 0000[0x4]
0d78 ; --------------------------------------------------------------------------------------
0d78 ; SUBPROGRAM
0d78 ; --------------------------------------------------------------------------------------
0d78 0de2 | | .CONST 0x0de2 ; Address of begin
0d79 0004 | | .CONST 0x0004 ; Address of exception handler
0d7a 0028 | ( | .CONST 0x0028 ; Number of locals
0d7b INIT_0d78:
0d7b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0d7c 029a 0deb | | Declare_Subprogram INIT_0de8,For_Outer_Call,Visible,Unelaborated
0d7e 029a 0e8b | | Declare_Subprogram INIT_0e88,For_Outer_Call,Visible,Unelaborated
0d80 029a 0f0b | | Declare_Subprogram INIT_0f08,For_Outer_Call,Visible,Unelaborated
0d82 029a 0f13 | | Declare_Subprogram INIT_0f10,For_Outer_Call,Visible,Unelaborated
0d84 029a 0fc3 | | Declare_Subprogram INIT_0fc0,For_Outer_Call,Visible,Unelaborated
0d86 029a 0fe3 | | Declare_Subprogram INIT_0fe0,For_Outer_Call,Visible,Unelaborated
0d88 029a 0feb | | Declare_Subprogram INIT_0fe8,For_Outer_Call,Visible,Unelaborated
0d8a 029a 0ffb | | Declare_Subprogram INIT_0ff8,For_Outer_Call,Visible,Unelaborated
0d8c 029a 100b | | Declare_Subprogram INIT_1008,For_Outer_Call,Visible,Unelaborated
0d8e 029a 1013 | | Declare_Subprogram INIT_1010,For_Outer_Call,Visible,Unelaborated
0d90 029a 101b | | Declare_Subprogram INIT_1018,For_Outer_Call,Visible,Unelaborated
0d92 029a 102b | +| Declare_Subprogram INIT_1028,For_Outer_Call,Visible,Unelaborated
0d94 029a 103b | ;| Declare_Subprogram INIT_1038,For_Outer_Call,Visible,Unelaborated
0d96 029a 104b | K| Declare_Subprogram INIT_1048,For_Outer_Call,Visible,Unelaborated
0d98 4809 |H | Short_Literal 0x9
0d99 032a | * | Declare_Type Record,Incomplete
0d9a 00d8 | | Load_Top At_Offset_0
0d9b 02a0 | | Declare_Subprogram Null_Subprogram
0d9c e212 | | Load 0x1,0x12
0d9d 03a3 | | Complete_Type Heap_Access,By_Defining
0d9e 00bf | | Action Accept_Activation
0d9f e001 | | Load 0x0,0x1
0da0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0da1 e002 | | Load 0x0,0x2
0da2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0da3 e003 | | Load 0x0,0x3
0da4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0da5 e004 | | Load 0x0,0x4
0da6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0da7 00e1 | | Load_Encached Boolean_Cache
0da8 e002 | | Load 0x0,0x2
0da9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0daa 00e1 | | Load_Encached Boolean_Cache
0dab e005 | | Load 0x0,0x5
0dac 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0dad e210 | | Load 0x1,0x10
0dae 029f 1053 | S| Declare_Subprogram INIT_1050,For_Call
0db0 e221 | ! | Load 0x1,0x21
0db1 0326 | & | Complete_Type Record,By_Defining
0db2 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0db3 00c7 | | Action Elaborate_Subprogram
0db4 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0db5 00c7 | | Action Elaborate_Subprogram
0db6 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0db7 00c7 | | Action Elaborate_Subprogram
0db8 029d 107b | {| Declare_Subprogram INIT_1078,For_Outer_Call
0dba 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0dbb 00c7 | | Action Elaborate_Subprogram
0dbc 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0dbd 00c7 | | Action Elaborate_Subprogram
0dbe 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0dbf 00c7 | | Action Elaborate_Subprogram
0dc0 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0dc1 00c7 | | Action Elaborate_Subprogram
0dc2 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0dc3 00c7 | | Action Elaborate_Subprogram
0dc4 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0dc5 00c7 | | Action Elaborate_Subprogram
0dc6 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0dc7 00c7 | | Action Elaborate_Subprogram
0dc8 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0dc9 00c7 | | Action Elaborate_Subprogram
0dca 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0dcb 00c7 | | Action Elaborate_Subprogram
0dcc e006 | | Load 0x0,0x6
0dcd e007 | | Load 0x0,0x7
0dce 00db | | Load_Top At_Offset_3
0dcf e212 | | Load 0x1,0x12
0dd0 e008 | | Load 0x0,0x8
0dd1 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0dd2 0387 | | Declare_Variable Package
0dd3 00d8 | | Load_Top At_Offset_0
0dd4 020f | | Execute Module,Activate
0dd5 e008 | | Load 0x0,0x8
0dd6 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0dd7 00c6 | | Action Check_Subprogram_Elaborated
0dd8 00da | | Load_Top At_Offset_2
0dd9 e212 | | Load 0x1,0x12
0dda e009 | | Load 0x0,0x9
0ddb e00a | | Load 0x0,0xa
0ddc 4800 |H | Short_Literal 0x0
0ddd 0007 | | Action Break_Optional
0dde 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0ddf 00c7 | | Action Elaborate_Subprogram
0de0 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0de1 00c7 | | Action Elaborate_Subprogram
0de2 BODY_0d78:
0de2 00bc | | Action Signal_Activated
0de3 00bb | | Action Signal_Completion
0de4 0000 0000 | | .BLANK 0000[0x4]
0de8 ; --------------------------------------------------------------------------------------
0de8 ; SUBPROGRAM
0de8 ; --------------------------------------------------------------------------------------
0de8 0df7 | | .CONST 0x0df7 ; Address of begin
0de9 0e3e | > | .CONST 0x0e3e ; Address of exception handler
0dea 0003 | | .CONST 0x0003 ; Number of locals
0deb INIT_0de8:
0deb e004 | | Load 0x0,0x4
0dec 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ded 02c7 | | Declare_Variable Any
0dee 00d8 | | Load_Top At_Offset_0
0def 1c00 | | Execute_Immediate Run_Utility,0x0
0df0 e212 | | Load 0x1,0x12
0df1 e00b | | Load 0x0,0xb
0df2 180d | | Execute Package,Field_Execute,Field_Number 0xd
0df3 039c | | Declare_Variable Heap_Access,By_Allocation
0df4 00d8 | | Load_Top At_Offset_0
0df5 0217 | | Execute Heap_Access,All_Reference
0df6 1c00 | | Execute_Immediate Run_Utility,0x0
0df7 BODY_0de8:
0df7 e5ff | | Load 0x2,-0x1
0df8 e20f | | Load 0x1,0xf
0df9 0119 | | Execute Any,Check_In_Formal_Type
0dfa e210 | | Load 0x1,0x10
0dfb e00b | | Load 0x0,0xb
0dfc 180d | | Execute Package,Field_Execute,Field_Number 0xd
0dfd 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0dfe 00d9 | | Load_Top At_Offset_1
0dff 0217 | | Execute Heap_Access,All_Reference
0e00 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0e01 e5fa | | Load 0x2,-0x6
0e02 00da | | Load_Top At_Offset_2
0e03 e5fd | | Load 0x2,-0x3
0e04 e5fe | | Load 0x2,-0x2
0e05 800c | | Call 0x0,0xc
0e06 c402 | | Store 0x2,0x2
0e07 c5fa | | Store 0x2,-0x6
0e08 4800 |H | Short_Literal 0x0
0e09 e5fa | | Load 0x2,-0x6
0e0a e001 | | Load 0x0,0x1
0e0b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0e0c 6811 |h | Jump_Zero 0xe1e
0e0d e00d | | Load 0x0,0xd
0e0e 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e0f 4801 |H | Short_Literal 0x1
0e10 4801 |H | Short_Literal 0x1
0e11 e00e | | Load 0x0,0xe
0e12 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e13 035b | [ | Declare_Type Array,Constrained
0e14 0337 | 7 | Declare_Variable Array
0e15 e5fe | | Load 0x2,-0x2
0e16 e00e | | Load 0x0,0xe
0e17 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e18 4801 |H | Short_Literal 0x1
0e19 00da | | Load_Top At_Offset_2
0e1a 01d6 | | Execute Vector,Field_Write
0e1b 6068 |`h | Indirect_Literal Discrete,0xe84,{0x00000000, 0x00004029}
0e1c e001 | | Load 0x0,0x1
0e1d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0e1e e5fa | | Load 0x2,-0x6
0e1f 00d9 | | Load_Top At_Offset_1
0e20 0217 | | Execute Heap_Access,All_Reference
0e21 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0e22 e5fc | | Load 0x2,-0x4
0e23 00d9 | | Load_Top At_Offset_1
0e24 0217 | | Execute Heap_Access,All_Reference
0e25 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0e26 00d9 | | Load_Top At_Offset_1
0e27 00d9 | | Load_Top At_Offset_1
0e28 0217 | | Execute Heap_Access,All_Reference
0e29 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0e2a 4801 |H | Short_Literal 0x1
0e2b 00d9 | | Load_Top At_Offset_1
0e2c 0217 | | Execute Heap_Access,All_Reference
0e2d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0e2e 4800 |H | Short_Literal 0x0
0e2f 00d9 | | Load_Top At_Offset_1
0e30 0217 | | Execute Heap_Access,All_Reference
0e31 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0e32 e005 | | Load 0x0,0x5
0e33 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e34 00d9 | | Load_Top At_Offset_1
0e35 0217 | | Execute Heap_Access,All_Reference
0e36 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0e37 00d8 | | Load_Top At_Offset_0
0e38 a5fb | | Store_Unchecked 0x2,-0x5
0e39 00d8 | | Load_Top At_Offset_0
0e3a 0217 | | Execute Heap_Access,All_Reference
0e3b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0e3c a5fa | | Store_Unchecked 0x2,-0x6
0e3d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e3e TRAP_0de8:
0e3e e00f | | Load 0x0,0xf
0e3f 010f | | Execute Exception,Equal
0e40 681b |h | Jump_Zero 0xe5c
0e41 e001 | | Load 0x0,0x1
0e42 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e43 4801 |H | Short_Literal 0x1
0e44 4802 |H | Short_Literal 0x2
0e45 e00e | | Load 0x0,0xe
0e46 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e47 035b | [ | Declare_Type Array,Constrained
0e48 0337 | 7 | Declare_Variable Array
0e49 e5fe | | Load 0x2,-0x2
0e4a e00e | | Load 0x0,0xe
0e4b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e4c 4801 |H | Short_Literal 0x1
0e4d 00da | | Load_Top At_Offset_2
0e4e 01d6 | | Execute Vector,Field_Write
0e4f e5fd | | Load 0x2,-0x3
0e50 e00e | | Load 0x0,0xe
0e51 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0e52 4802 |H | Short_Literal 0x2
0e53 00da | | Load_Top At_Offset_2
0e54 01d6 | | Execute Vector,Field_Write
0e55 602a |`* | Indirect_Literal Discrete,0xe80,{0x00000000, 0x0000400a}
0e56 e001 | | Load 0x0,0x1
0e57 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0e58 c5fa | | Store 0x2,-0x6
0e59 e212 | | Load 0x1,0x12
0e5a a5fb | | Store_Unchecked 0x2,-0x5
0e5b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e5c 010b | | Execute Exception,Is_Storage_Error
0e5d 681b |h | Jump_Zero 0xe79
0e5e e001 | | Load 0x0,0x1
0e5f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e60 4801 |H | Short_Literal 0x1
0e61 4802 |H | Short_Literal 0x2
0e62 e00e | | Load 0x0,0xe
0e63 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e64 035b | [ | Declare_Type Array,Constrained
0e65 0337 | 7 | Declare_Variable Array
0e66 e5fe | | Load 0x2,-0x2
0e67 e00e | | Load 0x0,0xe
0e68 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e69 4801 |H | Short_Literal 0x1
0e6a 00da | | Load_Top At_Offset_2
0e6b 01d6 | | Execute Vector,Field_Write
0e6c e5fd | | Load 0x2,-0x3
0e6d e00e | | Load 0x0,0xe
0e6e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0e6f 4802 |H | Short_Literal 0x2
0e70 00da | | Load_Top At_Offset_2
0e71 01d6 | | Execute Vector,Field_Write
0e72 6009 |` | Indirect_Literal Discrete,0xe7c,{0x00000000, 0x00004003}
0e73 e001 | | Load 0x0,0x1
0e74 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0e75 c5fa | | Store 0x2,-0x6
0e76 e212 | | Load 0x1,0x12
0e77 a5fb | | Store_Unchecked 0x2,-0x5
0e78 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e79 0100 | | Execute Exception,Raise
0e7a 0000 0000 | | .XXX[0x2]
0e7c 0000 0000 | | .LITERAL {0x00000000, 0x00004003}
0e80 0000 0000 | | .LITERAL {0x00000000, 0x0000400a}
0e84 0000 0000 | | .LITERAL {0x00000000, 0x00004029}
0e88 ; --------------------------------------------------------------------------------------
0e88 ; SUBPROGRAM
0e88 ; --------------------------------------------------------------------------------------
0e88 0e97 | | .CONST 0x0e97 ; Address of begin
0e89 0ee7 | | .CONST 0x0ee7 ; Address of exception handler
0e8a 0003 | | .CONST 0x0003 ; Number of locals
0e8b INIT_0e88:
0e8b e002 | | Load 0x0,0x2
0e8c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e8d 02c7 | | Declare_Variable Any
0e8e 00d8 | | Load_Top At_Offset_0
0e8f 1c00 | | Execute_Immediate Run_Utility,0x0
0e90 e212 | | Load 0x1,0x12
0e91 e00b | | Load 0x0,0xb
0e92 180d | | Execute Package,Field_Execute,Field_Number 0xd
0e93 039c | | Declare_Variable Heap_Access,By_Allocation
0e94 00d8 | | Load_Top At_Offset_0
0e95 0217 | | Execute Heap_Access,All_Reference
0e96 1c00 | | Execute_Immediate Run_Utility,0x0
0e97 BODY_0e88:
0e97 e5ff | | Load 0x2,-0x1
0e98 e20f | | Load 0x1,0xf
0e99 0119 | | Execute Any,Check_In_Formal_Type
0e9a e210 | | Load 0x1,0x10
0e9b e00b | | Load 0x0,0xb
0e9c 180d | | Execute Package,Field_Execute,Field_Number 0xd
0e9d 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0e9e 00d9 | | Load_Top At_Offset_1
0e9f 0217 | | Execute Heap_Access,All_Reference
0ea0 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0ea1 e001 | | Load 0x0,0x1
0ea2 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ea3 00d9 | | Load_Top At_Offset_1
0ea4 0217 | | Execute Heap_Access,All_Reference
0ea5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0ea6 e5fd | | Load 0x2,-0x3
0ea7 00d9 | | Load_Top At_Offset_1
0ea8 0217 | | Execute Heap_Access,All_Reference
0ea9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0eaa e5fe | | Load 0x2,-0x2
0eab 00d9 | | Load_Top At_Offset_1
0eac 0217 | | Execute Heap_Access,All_Reference
0ead 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0eae 00d9 | | Load_Top At_Offset_1
0eaf e010 | | Load 0x0,0x10
0eb0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0eb1 e004 | | Load 0x0,0x4
0eb2 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0eb3 e004 | | Load 0x0,0x4
0eb4 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0eb5 00ea | | Load_Encached Null_String_Cache
0eb6 e5fe | | Load 0x2,-0x2
0eb7 e004 | | Load 0x0,0x4
0eb8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0eb9 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0eba 4801 |H | Short_Literal 0x1
0ebb e002 | | Load 0x0,0x2
0ebc 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ebd c402 | | Store 0x2,0x2
0ebe e00d | | Load 0x0,0xd
0ebf 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ec0 4801 |H | Short_Literal 0x1
0ec1 4801 |H | Short_Literal 0x1
0ec2 e00e | | Load 0x0,0xe
0ec3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ec4 035b | [ | Declare_Type Array,Constrained
0ec5 0337 | 7 | Declare_Variable Array
0ec6 e5fe | | Load 0x2,-0x2
0ec7 e00e | | Load 0x0,0xe
0ec8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0ec9 4801 |H | Short_Literal 0x1
0eca 00da | | Load_Top At_Offset_2
0ecb 01d6 | | Execute Vector,Field_Write
0ecc 6033 |`3 | Indirect_Literal Discrete,0xf00,{0x00000000, 0x0000402a}
0ecd e001 | | Load 0x0,0x1
0ece 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0ecf 00d9 | | Load_Top At_Offset_1
0ed0 00d9 | | Load_Top At_Offset_1
0ed1 0217 | | Execute Heap_Access,All_Reference
0ed2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0ed3 4800 |H | Short_Literal 0x0
0ed4 00d9 | | Load_Top At_Offset_1
0ed5 0217 | | Execute Heap_Access,All_Reference
0ed6 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0ed7 4800 |H | Short_Literal 0x0
0ed8 00d9 | | Load_Top At_Offset_1
0ed9 0217 | | Execute Heap_Access,All_Reference
0eda 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0edb e005 | | Load 0x0,0x5
0edc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0edd 00d9 | | Load_Top At_Offset_1
0ede 0217 | | Execute Heap_Access,All_Reference
0edf 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0ee0 00d8 | | Load_Top At_Offset_0
0ee1 a5fc | | Store_Unchecked 0x2,-0x4
0ee2 00d8 | | Load_Top At_Offset_0
0ee3 0217 | | Execute Heap_Access,All_Reference
0ee4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ee5 a5fb | | Store_Unchecked 0x2,-0x5
0ee6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0ee7 TRAP_0e88:
0ee7 010b | | Execute Exception,Is_Storage_Error
0ee8 6815 |h | Jump_Zero 0xefe
0ee9 e001 | | Load 0x0,0x1
0eea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0eeb 4801 |H | Short_Literal 0x1
0eec 4801 |H | Short_Literal 0x1
0eed e00e | | Load 0x0,0xe
0eee 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0eef 035b | [ | Declare_Type Array,Constrained
0ef0 0337 | 7 | Declare_Variable Array
0ef1 e5fe | | Load 0x2,-0x2
0ef2 e00e | | Load 0x0,0xe
0ef3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0ef4 4801 |H | Short_Literal 0x1
0ef5 00da | | Load_Top At_Offset_2
0ef6 01d6 | | Execute Vector,Field_Write
0ef7 6784 |g | Indirect_Literal Discrete,0xe7c,{0x00000000, 0x00004003}
0ef8 e001 | | Load 0x0,0x1
0ef9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0efa c5fb | | Store 0x2,-0x5
0efb e212 | | Load 0x1,0x12
0efc a5fc | | Store_Unchecked 0x2,-0x4
0efd 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0efe 0100 | | Execute Exception,Raise
0eff 0000 | | .XXX[0x1]
0f00 0000 0000 | | .LITERAL {0x00000000, 0x0000402a}
0f04 0000 0000 | | .BLANK 0000[0x4]
0f08 ; --------------------------------------------------------------------------------------
0f08 ; SUBPROGRAM
0f08 ; --------------------------------------------------------------------------------------
0f08 0f0b | | .CONST 0x0f0b ; Address of begin
0f09 0004 | | .CONST 0x0004 ; Address of exception handler
0f0a 0001 | | .CONST 0x0001 ; Number of locals
0f0b BODY_0f08:
0f0b INIT_0f08:
0f0b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0f0c 0000 0000 | | .BLANK 0000[0x4]
0f10 ; --------------------------------------------------------------------------------------
0f10 ; SUBPROGRAM
0f10 ; --------------------------------------------------------------------------------------
0f10 0f3f | ? | .CONST 0x0f3f ; Address of begin
0f11 0f94 | | .CONST 0x0f94 ; Address of exception handler
0f12 000f | | .CONST 0x000f ; Number of locals
0f13 INIT_0f10:
0f13 e001 | | Load 0x0,0x1
0f14 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f15 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0f16 e002 | | Load 0x0,0x2
0f17 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f18 02c7 | | Declare_Variable Any
0f19 00d8 | | Load_Top At_Offset_0
0f1a 1c00 | | Execute_Immediate Run_Utility,0x0
0f1b e002 | | Load 0x0,0x2
0f1c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f1d 02c7 | | Declare_Variable Any
0f1e 00d8 | | Load_Top At_Offset_0
0f1f 1c00 | | Execute_Immediate Run_Utility,0x0
0f20 e00e | | Load 0x0,0xe
0f21 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f22 e00e | | Load 0x0,0xe
0f23 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0f24 00ea | | Load_Encached Null_String_Cache
0f25 e5ff | | Load 0x2,-0x1
0f26 0217 | | Execute Heap_Access,All_Reference
0f27 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0f28 8011 | | Call 0x0,0x11
0f29 4801 |H | Short_Literal 0x1
0f2a 4900 |I | Short_Literal 0x100
0f2b 00e9 | | Load_Encached String_Cache
0f2c 035b | [ | Declare_Type Array,Constrained
0f2d 0337 | 7 | Declare_Variable Array
0f2e 00e3 | | Load_Encached Natural_Cache
0f2f e5ff | | Load 0x2,-0x1
0f30 0217 | | Execute Heap_Access,All_Reference
0f31 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0f32 e004 | | Load 0x0,0x4
0f33 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0f34 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0f35 029f 10ab | | Declare_Subprogram INIT_10a8,For_Call
0f37 029f 1133 | 3| Declare_Subprogram INIT_1130,For_Call
0f39 029f 114b | K| Declare_Subprogram INIT_1148,For_Call
0f3b 029f 122b | +| Declare_Subprogram INIT_1228,For_Call
0f3d 029f 12cb | | Declare_Subprogram INIT_12c8,For_Call
0f3f BODY_0f10:
0f3f e5fe | | Load 0x2,-0x2
0f40 e012 | | Load 0x0,0x12
0f41 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0f42 4612 |F | Jump_Case 0x13
0f43 7812 |x | Jump 0xf56 ; case 0x0
0f44 7811 |x | Jump 0xf56 ; case 0x1
0f45 7810 |x | Jump 0xf56 ; case 0x2
0f46 780f |x | Jump 0xf56 ; case 0x3
0f47 780e |x | Jump 0xf56 ; case 0x4
0f48 780d |x | Jump 0xf56 ; case 0x5
0f49 780c |x | Jump 0xf56 ; case 0x6
0f4a 780b |x | Jump 0xf56 ; case 0x7
0f4b 780a |x | Jump 0xf56 ; case 0x8
0f4c 7809 |x | Jump 0xf56 ; case 0x9
0f4d 7822 |x" | Jump 0xf70 ; case 0xa
0f4e 782d |x- | Jump 0xf7c ; case 0xb
0f4f 7838 |x8 | Jump 0xf88 ; case 0xc
0f50 7805 |x | Jump 0xf56 ; case 0xd
0f51 7804 |x | Jump 0xf56 ; case 0xe
0f52 7803 |x | Jump 0xf56 ; case 0xf
0f53 7802 |x | Jump 0xf56 ; case 0x10
0f54 7801 |x | Jump 0xf56 ; case 0x11
0f55 7800 |x | Jump 0xf56 ; case 0x12
0f56 e00d | | Load 0x0,0xd
0f57 180e | | Execute Package,Field_Execute,Field_Number 0xe
0f58 4801 |H | Short_Literal 0x1
0f59 4801 |H | Short_Literal 0x1
0f5a e00e | | Load 0x0,0xe
0f5b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f5c 035b | [ | Declare_Type Array,Constrained
0f5d 0337 | 7 | Declare_Variable Array
0f5e e5fe | | Load 0x2,-0x2
0f5f e012 | | Load 0x0,0x12
0f60 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0f61 4801 |H | Short_Literal 0x1
0f62 00da | | Load_Top At_Offset_2
0f63 01d6 | | Execute Vector,Field_Write
0f64 6057 |`W | Indirect_Literal Discrete,0xfbc,{0x00000000, 0x00004016}
0f65 e001 | | Load 0x0,0x1
0f66 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0f67 e00e | | Load 0x0,0xe
0f68 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0f69 6052 |`R | Indirect_Literal Discrete,0xfbc,{0x00000000, 0x00004016}
0f6a e001 | | Load 0x0,0x1
0f6b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f6c e5fe | | Load 0x2,-0x2
0f6d e012 | | Load 0x0,0x12
0f6e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0f6f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f70 4801 |H | Short_Literal 0x1
0f71 e5fe | | Load 0x2,-0x2
0f72 e012 | | Load 0x0,0x12
0f73 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f74 a405 | | Store_Unchecked 0x2,0x5
0f75 4802 |H | Short_Literal 0x2
0f76 e5fe | | Load 0x2,-0x2
0f77 e012 | | Load 0x0,0x12
0f78 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f79 a406 | | Store_Unchecked 0x2,0x6
0f7a 840d | | Call 0x2,0xd
0f7b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f7c 4801 |H | Short_Literal 0x1
0f7d e5fe | | Load 0x2,-0x2
0f7e e012 | | Load 0x0,0x12
0f7f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f80 a405 | | Store_Unchecked 0x2,0x5
0f81 4802 |H | Short_Literal 0x2
0f82 e5fe | | Load 0x2,-0x2
0f83 e012 | | Load 0x0,0x12
0f84 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f85 a406 | | Store_Unchecked 0x2,0x6
0f86 840e | | Call 0x2,0xe
0f87 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f88 4801 |H | Short_Literal 0x1
0f89 e5fe | | Load 0x2,-0x2
0f8a e012 | | Load 0x0,0x12
0f8b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f8c a405 | | Store_Unchecked 0x2,0x5
0f8d 4802 |H | Short_Literal 0x2
0f8e e5fe | | Load 0x2,-0x2
0f8f e012 | | Load 0x0,0x12
0f90 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f91 a406 | | Store_Unchecked 0x2,0x6
0f92 840f | | Call 0x2,0xf
0f93 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f94 TRAP_0f10:
0f94 e013 | | Load 0x0,0x13
0f95 010f | | Execute Exception,Equal
0f96 681c |h | Jump_Zero 0xfb3
0f97 e5ff | | Load 0x2,-0x1
0f98 8222 | " | Call 0x1,0x22
0f99 e00d | | Load 0x0,0xd
0f9a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0f9b 4801 |H | Short_Literal 0x1
0f9c 4801 |H | Short_Literal 0x1
0f9d e00e | | Load 0x0,0xe
0f9e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f9f 035b | [ | Declare_Type Array,Constrained
0fa0 0337 | 7 | Declare_Variable Array
0fa1 e5fe | | Load 0x2,-0x2
0fa2 e012 | | Load 0x0,0x12
0fa3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0fa4 4801 |H | Short_Literal 0x1
0fa5 00da | | Load_Top At_Offset_2
0fa6 01d6 | | Execute Vector,Field_Write
0fa7 6010 |` | Indirect_Literal Discrete,0xfb8,{0x00000000, 0x00004019}
0fa8 e001 | | Load 0x0,0x1
0fa9 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0faa e00e | | Load 0x0,0xe
0fab 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0fac 600b |` | Indirect_Literal Discrete,0xfb8,{0x00000000, 0x00004019}
0fad e001 | | Load 0x0,0x1
0fae 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0faf e5fe | | Load 0x2,-0x2
0fb0 e012 | | Load 0x0,0x12
0fb1 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0fb2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0fb3 e5ff | | Load 0x2,-0x1
0fb4 8222 | " | Call 0x1,0x22
0fb5 00d8 | | Load_Top At_Offset_0
0fb6 0101 | | Execute Exception,Reraise
0fb7 0000 | | .XXX[0x1]
0fb8 0000 0000 | | .LITERAL {0x00000000, 0x00004019}
0fbc 0000 0000 | | .LITERAL {0x00000000, 0x00004016}
0fc0 ; --------------------------------------------------------------------------------------
0fc0 ; SUBPROGRAM
0fc0 ; --------------------------------------------------------------------------------------
0fc0 0fc3 | | .CONST 0x0fc3 ; Address of begin
0fc1 0004 | | .CONST 0x0004 ; Address of exception handler
0fc2 0001 | | .CONST 0x0001 ; Number of locals
0fc3 BODY_0fc0:
0fc3 INIT_0fc0:
0fc3 00da | | Load_Top At_Offset_2
0fc4 0217 | | Execute Heap_Access,All_Reference
0fc5 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0fc6 0219 | | Execute Heap_Access,All_Read
0fc7 c5fe | | Store 0x2,-0x2
0fc8 00da | | Load_Top At_Offset_2
0fc9 0217 | | Execute Heap_Access,All_Reference
0fca 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0fcb 7009 |p | Jump_Nonzero 0xfd5
0fcc 00da | | Load_Top At_Offset_2
0fcd 0219 | | Execute Heap_Access,All_Read
0fce 00d8 | | Load_Top At_Offset_0
0fcf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0fd0 e002 | | Load 0x0,0x2
0fd1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0fd2 00d9 | | Load_Top At_Offset_1
0fd3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0fd4 00d1 | | Pop_Control Pop_Count_1
0fd5 e210 | | Load 0x1,0x10
0fd6 00db | | Load_Top At_Offset_3
0fd7 0217 | | Execute Heap_Access,All_Reference
0fd8 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0fd9 00da | | Load_Top At_Offset_2
0fda 8222 | " | Call 0x1,0x22
0fdb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0fdc 0000 0000 | | .BLANK 0000[0x4]
0fe0 ; --------------------------------------------------------------------------------------
0fe0 ; SUBPROGRAM
0fe0 ; --------------------------------------------------------------------------------------
0fe0 0fe3 | | .CONST 0x0fe3 ; Address of begin
0fe1 0004 | | .CONST 0x0004 ; Address of exception handler
0fe2 0001 | | .CONST 0x0001 ; Number of locals
0fe3 BODY_0fe0:
0fe3 INIT_0fe0:
0fe3 00da | | Load_Top At_Offset_2
0fe4 0217 | | Execute Heap_Access,All_Reference
0fe5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0fe6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0fe7 0000 | | .XXX[0x1]
0fe8 ; --------------------------------------------------------------------------------------
0fe8 ; SUBPROGRAM
0fe8 ; --------------------------------------------------------------------------------------
0fe8 0feb | | .CONST 0x0feb ; Address of begin
0fe9 0004 | | .CONST 0x0004 ; Address of exception handler
0fea 0001 | | .CONST 0x0001 ; Number of locals
0feb BODY_0fe8:
0feb INIT_0fe8:
0feb 00da | | Load_Top At_Offset_2
0fec 0217 | | Execute Heap_Access,All_Reference
0fed 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0fee 00d8 | | Load_Top At_Offset_0
0fef 0120 | | Execute Any,Is_Value
0ff0 7002 |p | Jump_Nonzero 0xff3
0ff1 00d8 | | Load_Top At_Offset_0
0ff2 011e | | Execute Any,Convert
0ff3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ff4 0000 0000 | | .BLANK 0000[0x4]
0ff8 ; --------------------------------------------------------------------------------------
0ff8 ; SUBPROGRAM
0ff8 ; --------------------------------------------------------------------------------------
0ff8 0ffb | | .CONST 0x0ffb ; Address of begin
0ff9 0004 | | .CONST 0x0004 ; Address of exception handler
0ffa 0001 | | .CONST 0x0001 ; Number of locals
0ffb BODY_0ff8:
0ffb INIT_0ff8:
0ffb 00da | | Load_Top At_Offset_2
0ffc 0217 | | Execute Heap_Access,All_Reference
0ffd 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0ffe e210 | | Load 0x1,0x10
0fff 0213 | | Execute Heap_Access,Check_In_Type
1000 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1001 0000 0000 | | .BLANK 0000[0x7]
1008 ; --------------------------------------------------------------------------------------
1008 ; SUBPROGRAM
1008 ; --------------------------------------------------------------------------------------
1008 100b | | .CONST 0x100b ; Address of begin
1009 0004 | | .CONST 0x0004 ; Address of exception handler
100a 0001 | | .CONST 0x0001 ; Number of locals
100b BODY_1008:
100b INIT_1008:
100b 00da | | Load_Top At_Offset_2
100c 0217 | | Execute Heap_Access,All_Reference
100d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
100e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
100f 0000 | | .XXX[0x1]
1010 ; --------------------------------------------------------------------------------------
1010 ; SUBPROGRAM
1010 ; --------------------------------------------------------------------------------------
1010 1013 | | .CONST 0x1013 ; Address of begin
1011 0004 | | .CONST 0x0004 ; Address of exception handler
1012 0001 | | .CONST 0x0001 ; Number of locals
1013 BODY_1010:
1013 INIT_1010:
1013 00db | | Load_Top At_Offset_3
1014 00db | | Load_Top At_Offset_3
1015 0217 | | Execute Heap_Access,All_Reference
1016 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
1017 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1018 ; --------------------------------------------------------------------------------------
1018 ; SUBPROGRAM
1018 ; --------------------------------------------------------------------------------------
1018 101b | | .CONST 0x101b ; Address of begin
1019 0004 | | .CONST 0x0004 ; Address of exception handler
101a 0001 | | .CONST 0x0001 ; Number of locals
101b BODY_1018:
101b INIT_1018:
101b 4800 |H | Short_Literal 0x0
101c 00db | | Load_Top At_Offset_3
101d 0217 | | Execute Heap_Access,All_Reference
101e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
101f e001 | | Load 0x0,0x1
1020 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1021 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1022 0000 0000 | | .BLANK 0000[0x6]
1028 ; --------------------------------------------------------------------------------------
1028 ; SUBPROGRAM
1028 ; --------------------------------------------------------------------------------------
1028 102b | + | .CONST 0x102b ; Address of begin
1029 0004 | | .CONST 0x0004 ; Address of exception handler
102a 0001 | | .CONST 0x0001 ; Number of locals
102b BODY_1028:
102b INIT_1028:
102b 00da | | Load_Top At_Offset_2
102c 0217 | | Execute Heap_Access,All_Reference
102d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
102e e001 | | Load 0x0,0x1
102f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1030 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1031 0000 0000 | | .BLANK 0000[0x7]
1038 ; --------------------------------------------------------------------------------------
1038 ; SUBPROGRAM
1038 ; --------------------------------------------------------------------------------------
1038 103b | ; | .CONST 0x103b ; Address of begin
1039 0004 | | .CONST 0x0004 ; Address of exception handler
103a 0001 | | .CONST 0x0001 ; Number of locals
103b BODY_1038:
103b INIT_1038:
103b 00da | | Load_Top At_Offset_2
103c e00b | | Load 0x0,0xb
103d 180d | | Execute Package,Field_Execute,Field_Number 0xd
103e e224 | $ | Load 0x1,0x24
103f e225 | % | Load 0x1,0x25
1040 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
1041 e008 | | Load 0x0,0x8
1042 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1043 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1044 0000 0000 | | .BLANK 0000[0x4]
1048 ; --------------------------------------------------------------------------------------
1048 ; SUBPROGRAM
1048 ; --------------------------------------------------------------------------------------
1048 104b | K | .CONST 0x104b ; Address of begin
1049 0004 | | .CONST 0x0004 ; Address of exception handler
104a 0001 | | .CONST 0x0001 ; Number of locals
104b BODY_1048:
104b INIT_1048:
104b 00da | | Load_Top At_Offset_2
104c e223 | # | Load 0x1,0x23
104d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
104e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
104f 0000 | | .XXX[0x1]
1050 ; --------------------------------------------------------------------------------------
1050 ; SUBPROGRAM
1050 ; --------------------------------------------------------------------------------------
1050 1053 | S | .CONST 0x1053 ; Address of begin
1051 0004 | | .CONST 0x0004 ; Address of exception handler
1052 0001 | | .CONST 0x0001 ; Number of locals
1053 BODY_1050:
1053 INIT_1050:
1053 4608 |F | Jump_Case 0x9
1054 7808 |x | Jump 0x105d ; case 0x0
1055 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
1056 7819 |x | Jump 0x1070 ; case 0x2
1057 7818 |x | Jump 0x1070 ; case 0x3
1058 7817 |x | Jump 0x1070 ; case 0x4
1059 7816 |x | Jump 0x1070 ; case 0x5
105a 7815 |x | Jump 0x1070 ; case 0x6
105b 7814 |x | Jump 0x1070 ; case 0x7
105c 7813 |x | Jump 0x1070 ; case 0x8
105d 00da | | Load_Top At_Offset_2
105e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
105f 0125 | % | Execute Any,Set_Constraint
1060 00da | | Load_Top At_Offset_2
1061 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
1062 1c00 | | Execute_Immediate Run_Utility,0x0
1063 00da | | Load_Top At_Offset_2
1064 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
1065 0125 | % | Execute Any,Set_Constraint
1066 00da | | Load_Top At_Offset_2
1067 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
1068 1c00 | | Execute_Immediate Run_Utility,0x0
1069 00da | | Load_Top At_Offset_2
106a 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
106b 0125 | % | Execute Any,Set_Constraint
106c 00da | | Load_Top At_Offset_2
106d 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
106e 1c00 | | Execute_Immediate Run_Utility,0x0
106f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
1070 0869 | i | Execute_Immediate Raise,0x69
1071 0000 0000 | | .BLANK 0000[0x7]
1078 ; --------------------------------------------------------------------------------------
1078 ; SUBPROGRAM
1078 ; --------------------------------------------------------------------------------------
1078 107b | { | .CONST 0x107b ; Address of begin
1079 0004 | | .CONST 0x0004 ; Address of exception handler
107a 0001 | | .CONST 0x0001 ; Number of locals
107b BODY_1078:
107b INIT_1078:
107b 00da | | Load_Top At_Offset_2
107c 0217 | | Execute Heap_Access,All_Reference
107d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
107e 6827 |h' | Jump_Zero 0x10a6
107f 00da | | Load_Top At_Offset_2
1080 0217 | | Execute Heap_Access,All_Reference
1081 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1082 e002 | | Load 0x0,0x2
1083 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1084 7014 |p | Jump_Nonzero 0x1099
1085 00da | | Load_Top At_Offset_2
1086 0219 | | Execute Heap_Access,All_Read
1087 00d8 | | Load_Top At_Offset_0
1088 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1089 e010 | | Load 0x0,0x10
108a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
108b e004 | | Load 0x0,0x4
108c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
108d 00ea | | Load_Encached Null_String_Cache
108e 00ea | | Load_Encached Null_String_Cache
108f e5ff | | Load 0x2,-0x1
1090 0217 | | Execute Heap_Access,All_Reference
1091 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
1092 8011 | | Call 0x0,0x11
1093 4800 |H | Short_Literal 0x0
1094 e002 | | Load 0x0,0x2
1095 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1096 00d9 | | Load_Top At_Offset_1
1097 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1098 00d1 | | Pop_Control Pop_Count_1
1099 00da | | Load_Top At_Offset_2
109a 0219 | | Execute Heap_Access,All_Read
109b 00d8 | | Load_Top At_Offset_0
109c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
109d e002 | | Load 0x0,0x2
109e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
109f 00d9 | | Load_Top At_Offset_1
10a0 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
10a1 00d1 | | Pop_Control Pop_Count_1
10a2 4800 |H | Short_Literal 0x0
10a3 00db | | Load_Top At_Offset_3
10a4 0217 | | Execute Heap_Access,All_Reference
10a5 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
10a6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
10a7 0000 | | .XXX[0x1]
10a8 ; --------------------------------------------------------------------------------------
10a8 ; SUBPROGRAM
10a8 ; --------------------------------------------------------------------------------------
10a8 10ab | | .CONST 0x10ab ; Address of begin
10a9 0004 | | .CONST 0x0004 ; Address of exception handler
10aa 0001 | | .CONST 0x0001 ; Number of locals
10ab BODY_10a8:
10ab INIT_10a8:
10ab 00da | | Load_Top At_Offset_2
10ac 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
10ae 01df | | Execute Vector,Equal
10af 680a |h | Jump_Zero 0x10ba
10b0 e5ff | | Load 0x2,-0x1
10b1 0217 | | Execute Heap_Access,All_Reference
10b2 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
10b3 c404 | | Store 0x2,0x4
10b4 e404 | | Load 0x2,0x4
10b5 4800 |H | Short_Literal 0x0
10b6 e002 | | Load 0x0,0x2
10b7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
10b8 c404 | | Store 0x2,0x4
10b9 780b |x | Jump 0x10c5
10ba e404 | | Load 0x2,0x4
10bb e010 | | Load 0x0,0x10
10bc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10bd e004 | | Load 0x0,0x4
10be 181e | | Execute Package,Field_Execute,Field_Number 0x1e
10bf 00ea | | Load_Encached Null_String_Cache
10c0 e7ff | | Load 0x3,-0x1
10c1 4800 |H | Short_Literal 0x0
10c2 e002 | | Load 0x0,0x2
10c3 1814 | | Execute Package,Field_Execute,Field_Number 0x14
10c4 c404 | | Store 0x2,0x4
10c5 e5ff | | Load 0x2,-0x1
10c6 0217 | | Execute Heap_Access,All_Reference
10c7 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
10c8 681d |h | Jump_Zero 0x10e6
10c9 00db | | Load_Top At_Offset_3
10ca 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
10cc 01df | | Execute Vector,Equal
10cd 680a |h | Jump_Zero 0x10d8
10ce e5ff | | Load 0x2,-0x1
10cf 0217 | | Execute Heap_Access,All_Reference
10d0 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
10d1 c403 | | Store 0x2,0x3
10d2 e403 | | Load 0x2,0x3
10d3 4801 |H | Short_Literal 0x1
10d4 e002 | | Load 0x0,0x2
10d5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
10d6 c403 | | Store 0x2,0x3
10d7 7826 |x& | Jump 0x10fe
10d8 e403 | | Load 0x2,0x3
10d9 e010 | | Load 0x0,0x10
10da 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10db e004 | | Load 0x0,0x4
10dc 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
10dd e004 | | Load 0x0,0x4
10de 181e | | Execute Package,Field_Execute,Field_Number 0x1e
10df 00ea | | Load_Encached Null_String_Cache
10e0 e7fe | | Load 0x3,-0x2
10e1 4801 |H | Short_Literal 0x1
10e2 e002 | | Load 0x0,0x2
10e3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
10e4 c403 | | Store 0x2,0x3
10e5 7818 |x | Jump 0x10fe
10e6 e7fd | | Load 0x3,-0x3
10e7 680e |h | Jump_Zero 0x10f6
10e8 e403 | | Load 0x2,0x3
10e9 e010 | | Load 0x0,0x10
10ea 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10eb e004 | | Load 0x0,0x4
10ec 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
10ed e004 | | Load 0x0,0x4
10ee 181e | | Execute Package,Field_Execute,Field_Number 0x1e
10ef 00ea | | Load_Encached Null_String_Cache
10f0 e7fe | | Load 0x3,-0x2
10f1 4801 |H | Short_Literal 0x1
10f2 e002 | | Load 0x0,0x2
10f3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
10f4 c403 | | Store 0x2,0x3
10f5 7808 |x | Jump 0x10fe
10f6 e5ff | | Load 0x2,-0x1
10f7 0217 | | Execute Heap_Access,All_Reference
10f8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
10f9 c403 | | Store 0x2,0x3
10fa 00db | | Load_Top At_Offset_3
10fb e403 | | Load 0x2,0x3
10fc e002 | | Load 0x0,0x2
10fd 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
10fe 00cf | | Action Mark_Auxiliary
10ff 780f |x | Jump 0x110f
1100 00e3 | | Load_Encached Natural_Cache
1101 e408 | | Load 0x2,0x8
1102 e404 | | Load 0x2,0x4
1103 e002 | | Load 0x0,0x2
1104 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
1105 00d1 | | Pop_Control Pop_Count_1
1106 c409 | | Store 0x2,0x9
1107 4801 |H | Short_Literal 0x1
1108 e409 | | Load 0x2,0x9
1109 e408 | | Load 0x2,0x8
110a 01cf | | Execute Vector,Slice_Read
110b e403 | | Load 0x2,0x3
110c e002 | | Load 0x0,0x2
110d 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
110e 00c9 | | Action Pop_Auxiliary_Loop
110f e404 | | Load 0x2,0x4
1110 e002 | | Load 0x0,0x2
1111 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
1112 6fed |o | Jump_Zero 0x1100
1113 00ce | | Action Pop_Auxiliary
1114 00da | | Load_Top At_Offset_2
1115 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
1117 01de | | Execute Vector,Not_Equal
1118 6804 |h | Jump_Zero 0x111d
1119 e404 | | Load 0x2,0x4
111a e002 | | Load 0x0,0x2
111b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
111c c404 | | Store 0x2,0x4
111d e7fd | | Load 0x3,-0x3
111e 7009 |p | Jump_Nonzero 0x1128
111f e5ff | | Load 0x2,-0x1
1120 0217 | | Execute Heap_Access,All_Reference
1121 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1122 6809 |h | Jump_Zero 0x112c
1123 00db | | Load_Top At_Offset_3
1124 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
1126 01de | | Execute Vector,Not_Equal
1127 6804 |h | Jump_Zero 0x112c
1128 e403 | | Load 0x2,0x3
1129 e002 | | Load 0x0,0x2
112a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
112b c403 | | Store 0x2,0x3
112c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
112d 0000 0000 | | .XXX[0x3]
112f 0000 | |
1130 ; --------------------------------------------------------------------------------------
1130 ; SUBPROGRAM
1130 ; --------------------------------------------------------------------------------------
1130 1135 | 5 | .CONST 0x1135 ; Address of begin
1131 0004 | | .CONST 0x0004 ; Address of exception handler
1132 0002 | | .CONST 0x0002 ; Number of locals
1133 INIT_1130:
1133 029f 1343 | C| Declare_Subprogram INIT_1340,For_Call
1135 BODY_1130:
1135 00db | | Load_Top At_Offset_3
1136 e00e | | Load 0x0,0xe
1137 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1138 0b0f | | Execute_Immediate Case_Compare,0xf
1139 7004 |p | Jump_Nonzero 0x113e
113a 0f01 | | Execute_Immediate Equal,0x1
113b 7005 |p | Jump_Nonzero 0x1141
113c e013 | | Load 0x0,0x13
113d 0257 | W | Execute Discrete,Raise
113e 00d1 | | Pop_Control Pop_Count_1
113f 8602 | | Call 0x3,0x2
1140 7804 |x | Jump 0x1145
1141 00db | | Load_Top At_Offset_3
1142 e00e | | Load 0x0,0xe
1143 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1144 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1145 0831 | 1 | Execute_Immediate Raise,0x31
1146 0000 0000 | | .XXX[0x2]
1148 ; --------------------------------------------------------------------------------------
1148 ; SUBPROGRAM
1148 ; --------------------------------------------------------------------------------------
1148 1158 | X | .CONST 0x1158 ; Address of begin
1149 0004 | | .CONST 0x0004 ; Address of exception handler
114a 0005 | | .CONST 0x0005 ; Number of locals
114b INIT_1148:
114b e405 | | Load 0x2,0x5
114c 8014 | | Call 0x0,0x14
114d e406 | | Load 0x2,0x6
114e 840c | | Call 0x2,0xc
114f 00e1 | | Load_Encached Boolean_Cache
1150 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1151 e00e | | Load 0x0,0xe
1152 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1153 4803 |H | Short_Literal 0x3
1154 e5fe | | Load 0x2,-0x2
1155 e012 | | Load 0x0,0x12
1156 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1157 0031 | 1 | Store_Top Heap_Access,At_Offset_1
1158 BODY_1148:
1158 e5fe | | Load 0x2,-0x2
1159 8015 | | Call 0x0,0x15
115a 704a |pJ | Jump_Nonzero 0x11a5
115b 00d8 | | Load_Top At_Offset_0
115c e00e | | Load 0x0,0xe
115d 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
115e 700e |p | Jump_Nonzero 0x116d
115f 00d8 | | Load_Top At_Offset_0
1160 e00e | | Load 0x0,0xe
1161 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1162 0f01 | | Execute_Immediate Equal,0x1
1163 6809 |h | Jump_Zero 0x116d
1164 00d8 | | Load_Top At_Offset_0
1165 e00e | | Load 0x0,0xe
1166 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1167 0092 17e6 | | Action Push_String_Extended,0x17e6 ; "<SCRIPT_FILE>"
1169 01df | | Execute Vector,Equal
116a 6802 |h | Jump_Zero 0x116d
116b 4801 |H | Short_Literal 0x1
116c 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
116d 00d9 | | Load_Top At_Offset_1
116e 00db | | Load_Top At_Offset_3
116f e602 | | Load 0x3,0x2
1170 840b | | Call 0x2,0xb
1171 e5fe | | Load 0x2,-0x2
1172 e012 | | Load 0x0,0x12
1173 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1174 682f |h/ | Jump_Zero 0x11a4
1175 e5ff | | Load 0x2,-0x1
1176 0217 | | Execute Heap_Access,All_Reference
1177 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1178 7002 |p | Jump_Nonzero 0x117b
1179 00d9 | | Load_Top At_Offset_1
117a 6818 |h | Jump_Zero 0x1193
117b e00d | | Load 0x0,0xd
117c 180e | | Execute Package,Field_Execute,Field_Number 0xe
117d 4801 |H | Short_Literal 0x1
117e 4802 |H | Short_Literal 0x2
117f e00e | | Load 0x0,0xe
1180 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1181 035b | [ | Declare_Type Array,Constrained
1182 0337 | 7 | Declare_Variable Array
1183 e602 | | Load 0x3,0x2
1184 e00e | | Load 0x0,0xe
1185 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1186 4801 |H | Short_Literal 0x1
1187 00da | | Load_Top At_Offset_2
1188 01d6 | | Execute Vector,Field_Write
1189 e603 | | Load 0x3,0x3
118a e00e | | Load 0x0,0xe
118b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
118c 4802 |H | Short_Literal 0x2
118d 00da | | Load_Top At_Offset_2
118e 01d6 | | Execute Vector,Field_Write
118f 6090 |` | Indirect_Literal Discrete,0x1220,{0x00000000, 0x00004020}
1190 e001 | | Load 0x0,0x1
1191 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1192 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1193 e00d | | Load 0x0,0xd
1194 180e | | Execute Package,Field_Execute,Field_Number 0xe
1195 4801 |H | Short_Literal 0x1
1196 4801 |H | Short_Literal 0x1
1197 e00e | | Load 0x0,0xe
1198 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1199 035b | [ | Declare_Type Array,Constrained
119a 0337 | 7 | Declare_Variable Array
119b e602 | | Load 0x3,0x2
119c e00e | | Load 0x0,0xe
119d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
119e 4801 |H | Short_Literal 0x1
119f 00da | | Load_Top At_Offset_2
11a0 01d6 | | Execute Vector,Field_Write
11a1 607a |`z | Indirect_Literal Discrete,0x121c,{0x00000000, 0x00004028}
11a2 e001 | | Load 0x0,0x1
11a3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
11a4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11a5 e5fe | | Load 0x2,-0x2
11a6 e012 | | Load 0x0,0x12
11a7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
11a8 7002 |p | Jump_Nonzero 0x11ab
11a9 00cc | | Action Pop_Block
11aa 4504 |E | Exit_Suprogram New_Top_Offset 0x4
11ab e5ff | | Load 0x2,-0x1
11ac 0219 | | Execute Heap_Access,All_Read
11ad e402 | | Load 0x2,0x2
11ae 00d9 | | Load_Top At_Offset_1
11af 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
11b0 e407 | | Load 0x2,0x7
11b1 8016 | | Call 0x0,0x16
11b2 00da | | Load_Top At_Offset_2
11b3 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
11b4 c402 | | Store 0x2,0x2
11b5 00d1 | | Pop_Control Pop_Count_1
11b6 4800 |H | Short_Literal 0x0
11b7 e402 | | Load 0x2,0x2
11b8 e001 | | Load 0x0,0x1
11b9 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
11ba 6805 |h | Jump_Zero 0x11c0
11bb 4801 |H | Short_Literal 0x1
11bc e5ff | | Load 0x2,-0x1
11bd 0217 | | Execute Heap_Access,All_Reference
11be 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
11bf 7806 |x | Jump 0x11c6
11c0 e402 | | Load 0x2,0x2
11c1 e5fe | | Load 0x2,-0x2
11c2 e012 | | Load 0x0,0x12
11c3 181f | | Execute Package,Field_Execute,Field_Number 0x1f
11c4 00cc | | Action Pop_Block
11c5 4504 |E | Exit_Suprogram New_Top_Offset 0x4
11c6 e5ff | | Load 0x2,-0x1
11c7 0219 | | Execute Heap_Access,All_Read
11c8 00d8 | | Load_Top At_Offset_0
11c9 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
11ca e5fe | | Load 0x2,-0x2
11cb e017 | | Load 0x0,0x17
11cc a018 | | Store_Unchecked 0x0,0x18
11cd a019 | | Store_Unchecked 0x0,0x19
11ce a01a | | Store_Unchecked 0x0,0x1a
11cf a01b | | Store_Unchecked 0x0,0x1b
11d0 a01c | | Store_Unchecked 0x0,0x1c
11d1 e01d | | Load 0x0,0x1d
11d2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
11d3 00d9 | | Load_Top At_Offset_1
11d4 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
11d5 00d1 | | Pop_Control Pop_Count_1
11d6 e5ff | | Load 0x2,-0x1
11d7 0219 | | Execute Heap_Access,All_Read
11d8 00d8 | | Load_Top At_Offset_0
11d9 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
11da 4800 |H | Short_Literal 0x0
11db e002 | | Load 0x0,0x2
11dc 181b | | Execute Package,Field_Execute,Field_Number 0x1b
11dd 00d9 | | Load_Top At_Offset_1
11de 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
11df 00d1 | | Pop_Control Pop_Count_1
11e0 4800 |H | Short_Literal 0x0
11e1 00db | | Load_Top At_Offset_3
11e2 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
11e4 840b | | Call 0x2,0xb
11e5 e5fe | | Load 0x2,-0x2
11e6 e012 | | Load 0x0,0x12
11e7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
11e8 682d |h- | Jump_Zero 0x1216
11e9 e5ff | | Load 0x2,-0x1
11ea 0217 | | Execute Heap_Access,All_Reference
11eb 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
11ec 6818 |h | Jump_Zero 0x1205
11ed e00d | | Load 0x0,0xd
11ee 180e | | Execute Package,Field_Execute,Field_Number 0xe
11ef 4801 |H | Short_Literal 0x1
11f0 4802 |H | Short_Literal 0x2
11f1 e00e | | Load 0x0,0xe
11f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
11f3 035b | [ | Declare_Type Array,Constrained
11f4 0337 | 7 | Declare_Variable Array
11f5 e602 | | Load 0x3,0x2
11f6 e00e | | Load 0x0,0xe
11f7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11f8 4801 |H | Short_Literal 0x1
11f9 00da | | Load_Top At_Offset_2
11fa 01d6 | | Execute Vector,Field_Write
11fb e603 | | Load 0x3,0x3
11fc e00e | | Load 0x0,0xe
11fd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11fe 4802 |H | Short_Literal 0x2
11ff 00da | | Load_Top At_Offset_2
1200 01d6 | | Execute Vector,Field_Write
1201 6016 |` | Indirect_Literal Discrete,0x1218,{0x00000000, 0x0000401f}
1202 e001 | | Load 0x0,0x1
1203 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1204 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1205 e00d | | Load 0x0,0xd
1206 180e | | Execute Package,Field_Execute,Field_Number 0xe
1207 4801 |H | Short_Literal 0x1
1208 4801 |H | Short_Literal 0x1
1209 e00e | | Load 0x0,0xe
120a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
120b 035b | [ | Declare_Type Array,Constrained
120c 0337 | 7 | Declare_Variable Array
120d e602 | | Load 0x3,0x2
120e e00e | | Load 0x0,0xe
120f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1210 4801 |H | Short_Literal 0x1
1211 00da | | Load_Top At_Offset_2
1212 01d6 | | Execute Vector,Field_Write
1213 6004 |` | Indirect_Literal Discrete,0x1218,{0x00000000, 0x0000401f}
1214 e001 | | Load 0x0,0x1
1215 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1216 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1217 0000 | | .XXX[0x1]
1218 0000 0000 | | .LITERAL {0x00000000, 0x0000401f}
121c 0000 0000 | | .LITERAL {0x00000000, 0x00004028}
1220 0000 0000 | | .LITERAL {0x00000000, 0x00004020}
1224 0000 0000 | | .BLANK 0000[0x4]
1228 ; --------------------------------------------------------------------------------------
1228 ; SUBPROGRAM
1228 ; --------------------------------------------------------------------------------------
1228 122f | / | .CONST 0x122f ; Address of begin
1229 0004 | | .CONST 0x0004 ; Address of exception handler
122a 0003 | | .CONST 0x0003 ; Number of locals
122b INIT_1228:
122b e405 | | Load 0x2,0x5
122c 8014 | | Call 0x0,0x14
122d e406 | | Load 0x2,0x6
122e 840c | | Call 0x2,0xc
122f BODY_1228:
122f e5fe | | Load 0x2,-0x2
1230 801e | | Call 0x0,0x1e
1231 702a |p* | Jump_Nonzero 0x125c
1232 e405 | | Load 0x2,0x5
1233 e00e | | Load 0x0,0xe
1234 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1235 0f01 | | Execute_Immediate Equal,0x1
1236 6825 |h% | Jump_Zero 0x125c
1237 e405 | | Load 0x2,0x5
1238 e00e | | Load 0x0,0xe
1239 1811 | | Execute Package,Field_Execute,Field_Number 0x11
123a 01db | | Execute Vector,Length
123b 6820 |h | Jump_Zero 0x125c
123c 4800 |H | Short_Literal 0x0
123d 00da | | Load_Top At_Offset_2
123e 00da | | Load_Top At_Offset_2
123f 840b | | Call 0x2,0xb
1240 e5fe | | Load 0x2,-0x2
1241 e012 | | Load 0x0,0x12
1242 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1243 6817 |h | Jump_Zero 0x125b
1244 e00d | | Load 0x0,0xd
1245 180e | | Execute Package,Field_Execute,Field_Number 0xe
1246 4801 |H | Short_Literal 0x1
1247 4802 |H | Short_Literal 0x2
1248 e00e | | Load 0x0,0xe
1249 1b0f | | Execute Package,Field_Read,Field_Number 0xf
124a 035b | [ | Declare_Type Array,Constrained
124b 0337 | 7 | Declare_Variable Array
124c 00da | | Load_Top At_Offset_2
124d e00e | | Load 0x0,0xe
124e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
124f 4801 |H | Short_Literal 0x1
1250 00da | | Load_Top At_Offset_2
1251 01d6 | | Execute Vector,Field_Write
1252 00db | | Load_Top At_Offset_3
1253 e00e | | Load 0x0,0xe
1254 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1255 4802 |H | Short_Literal 0x2
1256 00da | | Load_Top At_Offset_2
1257 01d6 | | Execute Vector,Field_Write
1258 67c7 |g | Indirect_Literal Discrete,0x1220,{0x00000000, 0x00004020}
1259 e001 | | Load 0x0,0x1
125a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
125b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
125c e5fe | | Load 0x2,-0x2
125d e012 | | Load 0x0,0x12
125e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
125f 7002 |p | Jump_Nonzero 0x1262
1260 00cc | | Action Pop_Block
1261 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1262 e403 | | Load 0x2,0x3
1263 e010 | | Load 0x0,0x10
1264 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1265 e004 | | Load 0x0,0x4
1266 181e | | Execute Package,Field_Execute,Field_Number 0x1e
1267 00ea | | Load_Encached Null_String_Cache
1268 e603 | | Load 0x3,0x3
1269 4800 |H | Short_Literal 0x0
126a e002 | | Load 0x0,0x2
126b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
126c c403 | | Store 0x2,0x3
126d e5ff | | Load 0x2,-0x1
126e 0219 | | Execute Heap_Access,All_Read
126f e402 | | Load 0x2,0x2
1270 00d9 | | Load_Top At_Offset_1
1271 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1272 e407 | | Load 0x2,0x7
1273 8016 | | Call 0x0,0x16
1274 00da | | Load_Top At_Offset_2
1275 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1276 c402 | | Store 0x2,0x2
1277 00d1 | | Pop_Control Pop_Count_1
1278 4800 |H | Short_Literal 0x0
1279 e402 | | Load 0x2,0x2
127a e001 | | Load 0x0,0x1
127b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
127c 6805 |h | Jump_Zero 0x1282
127d 4801 |H | Short_Literal 0x1
127e e5ff | | Load 0x2,-0x1
127f 0217 | | Execute Heap_Access,All_Reference
1280 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1281 7806 |x | Jump 0x1288
1282 e402 | | Load 0x2,0x2
1283 e5fe | | Load 0x2,-0x2
1284 e012 | | Load 0x0,0x12
1285 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1286 00cc | | Action Pop_Block
1287 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1288 4800 |H | Short_Literal 0x0
1289 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
128b 00da | | Load_Top At_Offset_2
128c 840b | | Call 0x2,0xb
128d e403 | | Load 0x2,0x3
128e e002 | | Load 0x0,0x2
128f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1290 c403 | | Store 0x2,0x3
1291 e5ff | | Load 0x2,-0x1
1292 0219 | | Execute Heap_Access,All_Read
1293 00d8 | | Load_Top At_Offset_0
1294 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1295 4800 |H | Short_Literal 0x0
1296 e002 | | Load 0x0,0x2
1297 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1298 00d9 | | Load_Top At_Offset_1
1299 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
129a 00d1 | | Pop_Control Pop_Count_1
129b e5ff | | Load 0x2,-0x1
129c 0219 | | Execute Heap_Access,All_Read
129d 00d8 | | Load_Top At_Offset_0
129e 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
129f e5fe | | Load 0x2,-0x2
12a0 e017 | | Load 0x0,0x17
12a1 a018 | | Store_Unchecked 0x0,0x18
12a2 a019 | | Store_Unchecked 0x0,0x19
12a3 a01a | | Store_Unchecked 0x0,0x1a
12a4 a01b | | Store_Unchecked 0x0,0x1b
12a5 a01c | | Store_Unchecked 0x0,0x1c
12a6 e01d | | Load 0x0,0x1d
12a7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
12a8 00d9 | | Load_Top At_Offset_1
12a9 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
12aa 00d1 | | Pop_Control Pop_Count_1
12ab e5fe | | Load 0x2,-0x2
12ac e012 | | Load 0x0,0x12
12ad 1820 | | Execute Package,Field_Execute,Field_Number 0x20
12ae 6817 |h | Jump_Zero 0x12c6
12af e00d | | Load 0x0,0xd
12b0 180e | | Execute Package,Field_Execute,Field_Number 0xe
12b1 4801 |H | Short_Literal 0x1
12b2 4802 |H | Short_Literal 0x2
12b3 e00e | | Load 0x0,0xe
12b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
12b5 035b | [ | Declare_Type Array,Constrained
12b6 0337 | 7 | Declare_Variable Array
12b7 00da | | Load_Top At_Offset_2
12b8 e00e | | Load 0x0,0xe
12b9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12ba 4801 |H | Short_Literal 0x1
12bb 00da | | Load_Top At_Offset_2
12bc 01d6 | | Execute Vector,Field_Write
12bd 00db | | Load_Top At_Offset_3
12be e00e | | Load 0x0,0xe
12bf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12c0 4802 |H | Short_Literal 0x2
12c1 00da | | Load_Top At_Offset_2
12c2 01d6 | | Execute Vector,Field_Write
12c3 6754 |gT | Indirect_Literal Discrete,0x1218,{0x00000000, 0x0000401f}
12c4 e001 | | Load 0x0,0x1
12c5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
12c6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12c7 0000 | | .XXX[0x1]
12c8 ; --------------------------------------------------------------------------------------
12c8 ; SUBPROGRAM
12c8 ; --------------------------------------------------------------------------------------
12c8 12cf | | .CONST 0x12cf ; Address of begin
12c9 0004 | | .CONST 0x0004 ; Address of exception handler
12ca 0003 | | .CONST 0x0003 ; Number of locals
12cb INIT_12c8:
12cb e406 | | Load 0x2,0x6
12cc 8014 | | Call 0x0,0x14
12cd e405 | | Load 0x2,0x5
12ce 840c | | Call 0x2,0xc
12cf BODY_12c8:
12cf e5ff | | Load 0x2,-0x1
12d0 0219 | | Execute Heap_Access,All_Read
12d1 e402 | | Load 0x2,0x2
12d2 00d9 | | Load_Top At_Offset_1
12d3 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
12d4 e407 | | Load 0x2,0x7
12d5 8016 | | Call 0x0,0x16
12d6 00da | | Load_Top At_Offset_2
12d7 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
12d8 c402 | | Store 0x2,0x2
12d9 00d1 | | Pop_Control Pop_Count_1
12da 4800 |H | Short_Literal 0x0
12db e402 | | Load 0x2,0x2
12dc e001 | | Load 0x0,0x1
12dd 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
12de 6805 |h | Jump_Zero 0x12e4
12df 4801 |H | Short_Literal 0x1
12e0 e5ff | | Load 0x2,-0x1
12e1 0217 | | Execute Heap_Access,All_Reference
12e2 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
12e3 7806 |x | Jump 0x12ea
12e4 e402 | | Load 0x2,0x2
12e5 e5fe | | Load 0x2,-0x2
12e6 e012 | | Load 0x0,0x12
12e7 181f | | Execute Package,Field_Execute,Field_Number 0x1f
12e8 00cc | | Action Pop_Block
12e9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
12ea e5ff | | Load 0x2,-0x1
12eb 0219 | | Execute Heap_Access,All_Read
12ec 00d8 | | Load_Top At_Offset_0
12ed 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
12ee e5fe | | Load 0x2,-0x2
12ef e017 | | Load 0x0,0x17
12f0 a018 | | Store_Unchecked 0x0,0x18
12f1 a019 | | Store_Unchecked 0x0,0x19
12f2 a01a | | Store_Unchecked 0x0,0x1a
12f3 a01b | | Store_Unchecked 0x0,0x1b
12f4 a01c | | Store_Unchecked 0x0,0x1c
12f5 e01d | | Load 0x0,0x1d
12f6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
12f7 00d9 | | Load_Top At_Offset_1
12f8 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
12f9 00d1 | | Pop_Control Pop_Count_1
12fa e5ff | | Load 0x2,-0x1
12fb 0219 | | Execute Heap_Access,All_Read
12fc 00d8 | | Load_Top At_Offset_0
12fd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
12fe 4800 |H | Short_Literal 0x0
12ff e002 | | Load 0x0,0x2
1300 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1301 00d9 | | Load_Top At_Offset_1
1302 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1303 00d1 | | Pop_Control Pop_Count_1
1304 4800 |H | Short_Literal 0x0
1305 00d9 | | Load_Top At_Offset_1
1306 0092 17e5 | | Action Push_String_Extended,0x17e5 ; "<TEMP>"
1308 840b | | Call 0x2,0xb
1309 e5fe | | Load 0x2,-0x2
130a e012 | | Load 0x0,0x12
130b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
130c 682d |h- | Jump_Zero 0x133a
130d e5ff | | Load 0x2,-0x1
130e 0217 | | Execute Heap_Access,All_Reference
130f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1310 6818 |h | Jump_Zero 0x1329
1311 e00d | | Load 0x0,0xd
1312 180e | | Execute Package,Field_Execute,Field_Number 0xe
1313 4801 |H | Short_Literal 0x1
1314 4802 |H | Short_Literal 0x2
1315 e00e | | Load 0x0,0xe
1316 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1317 035b | [ | Declare_Type Array,Constrained
1318 0337 | 7 | Declare_Variable Array
1319 00db | | Load_Top At_Offset_3
131a e00e | | Load 0x0,0xe
131b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
131c 4801 |H | Short_Literal 0x1
131d 00da | | Load_Top At_Offset_2
131e 01d6 | | Execute Vector,Field_Write
131f 00da | | Load_Top At_Offset_2
1320 e00e | | Load 0x0,0xe
1321 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1322 4802 |H | Short_Literal 0x2
1323 00da | | Load_Top At_Offset_2
1324 01d6 | | Execute Vector,Field_Write
1325 6016 |` | Indirect_Literal Discrete,0x133c,{0x00000000, 0x0000401f}
1326 e001 | | Load 0x0,0x1
1327 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1328 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1329 e00d | | Load 0x0,0xd
132a 180e | | Execute Package,Field_Execute,Field_Number 0xe
132b 4801 |H | Short_Literal 0x1
132c 4801 |H | Short_Literal 0x1
132d e00e | | Load 0x0,0xe
132e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
132f 035b | [ | Declare_Type Array,Constrained
1330 0337 | 7 | Declare_Variable Array
1331 00db | | Load_Top At_Offset_3
1332 e00e | | Load 0x0,0xe
1333 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1334 4801 |H | Short_Literal 0x1
1335 00da | | Load_Top At_Offset_2
1336 01d6 | | Execute Vector,Field_Write
1337 6004 |` | Indirect_Literal Discrete,0x133c,{0x00000000, 0x0000401f}
1338 e001 | | Load 0x0,0x1
1339 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
133a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
133b 0000 | | .XXX[0x1]
133c 0000 0000 | | .LITERAL {0x00000000, 0x0000401f}
1340 ; --------------------------------------------------------------------------------------
1340 ; SUBPROGRAM
1340 ; --------------------------------------------------------------------------------------
1340 134e | N | .CONST 0x134e ; Address of begin
1341 0004 | | .CONST 0x0004 ; Address of exception handler
1342 0002 | | .CONST 0x0002 ; Number of locals
1343 INIT_1340:
1343 e5ff | | Load 0x2,-0x1
1344 0217 | | Execute Heap_Access,All_Reference
1345 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
1346 0219 | | Execute Heap_Access,All_Read
1347 e20f | | Load 0x1,0xf
1348 0119 | | Execute Any,Check_In_Formal_Type
1349 e5ff | | Load 0x2,-0x1
134a 0217 | | Execute Heap_Access,All_Reference
134b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
134c e5fe | | Load 0x2,-0x2
134d 8211 | | Call 0x1,0x11
134e BODY_1340:
134e e5ff | | Load 0x2,-0x1
134f 0217 | | Execute Heap_Access,All_Reference
1350 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1351 6825 |h% | Jump_Zero 0x1377
1352 00d8 | | Load_Top At_Offset_0
1353 e001 | | Load 0x0,0x1
1354 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
1355 01df | | Execute Vector,Equal
1356 6819 |h | Jump_Zero 0x1370
1357 e00d | | Load 0x0,0xd
1358 180e | | Execute Package,Field_Execute,Field_Number 0xe
1359 4801 |H | Short_Literal 0x1
135a 4801 |H | Short_Literal 0x1
135b e00e | | Load 0x0,0xe
135c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
135d 035b | [ | Declare_Type Array,Constrained
135e 0337 | 7 | Declare_Variable Array
135f e5fe | | Load 0x2,-0x2
1360 e012 | | Load 0x0,0x12
1361 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1362 4801 |H | Short_Literal 0x1
1363 00da | | Load_Top At_Offset_2
1364 01d6 | | Execute Vector,Field_Write
1365 6016 |` | Indirect_Literal Discrete,0x137c,{0x00000000, 0x00004027}
1366 e001 | | Load 0x0,0x1
1367 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1368 e00e | | Load 0x0,0xe
1369 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
136a 6011 |` | Indirect_Literal Discrete,0x137c,{0x00000000, 0x00004027}
136b e001 | | Load 0x0,0x1
136c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
136d e5fe | | Load 0x2,-0x2
136e e012 | | Load 0x0,0x12
136f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1370 482e |H. | Short_Literal 0x2e
1371 e40a | | Load 0x2,0xa
1372 01cb | | Execute Vector,Append
1373 00d9 | | Load_Top At_Offset_1
1374 01cc | | Execute Vector,Catenate
1375 00cb | | Action Pop_Block_With_Result
1376 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1377 00d8 | | Load_Top At_Offset_0
1378 00cb | | Action Pop_Block_With_Result
1379 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
137a 0000 0000 | | .XXX[0x2]
137c 0000 0000 | | .LITERAL {0x00000000, 0x00004027}
1380 ; --------------------------------------------------------------------------------------
1380 ; SUBPROGRAM
1380 ; --------------------------------------------------------------------------------------
1380 13df | | .CONST 0x13df ; Address of begin
1381 0004 | | .CONST 0x0004 ; Address of exception handler
1382 0027 | ' | .CONST 0x0027 ; Number of locals
1383 INIT_1380:
1383 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
1384 029a 13eb | | Declare_Subprogram INIT_13e8,For_Outer_Call,Visible,Unelaborated
1386 029a 147b | {| Declare_Subprogram INIT_1478,For_Outer_Call,Visible,Unelaborated
1388 029a 1483 | | Declare_Subprogram INIT_1480,For_Outer_Call,Visible,Unelaborated
138a 029a 15a3 | | Declare_Subprogram INIT_15a0,For_Outer_Call,Visible,Unelaborated
138c 029a 15b3 | | Declare_Subprogram INIT_15b0,For_Outer_Call,Visible,Unelaborated
138e 029a 15bb | | Declare_Subprogram INIT_15b8,For_Outer_Call,Visible,Unelaborated
1390 029a 15cb | | Declare_Subprogram INIT_15c8,For_Outer_Call,Visible,Unelaborated
1392 029a 15d3 | | Declare_Subprogram INIT_15d0,For_Outer_Call,Visible,Unelaborated
1394 029a 15db | | Declare_Subprogram INIT_15d8,For_Outer_Call,Visible,Unelaborated
1396 029a 15eb | | Declare_Subprogram INIT_15e8,For_Outer_Call,Visible,Unelaborated
1398 029a 15fb | | Declare_Subprogram INIT_15f8,For_Outer_Call,Visible,Unelaborated
139a 029a 160b | | Declare_Subprogram INIT_1608,For_Outer_Call,Visible,Unelaborated
139c 4807 |H | Short_Literal 0x7
139d 032a | * | Declare_Type Record,Incomplete
139e 00d8 | | Load_Top At_Offset_0
139f 02a0 | | Declare_Subprogram Null_Subprogram
13a0 e213 | | Load 0x1,0x13
13a1 03a3 | | Complete_Type Heap_Access,By_Defining
13a2 00bf | | Action Accept_Activation
13a3 e001 | | Load 0x0,0x1
13a4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
13a5 e002 | | Load 0x0,0x2
13a6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13a7 e003 | | Load 0x0,0x3
13a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13a9 e004 | | Load 0x0,0x4
13aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
13ab 00e1 | | Load_Encached Boolean_Cache
13ac e005 | | Load 0x0,0x5
13ad 1b14 | | Execute Package,Field_Read,Field_Number 0x14
13ae e210 | | Load 0x1,0x10
13af 029f 1613 | | Declare_Subprogram INIT_1610,For_Call
13b1 e220 | | Load 0x1,0x20
13b2 0326 | & | Complete_Type Record,By_Defining
13b3 1d14 | | Execute_Immediate Reference_Lex_1,0x14
13b4 00c7 | | Action Elaborate_Subprogram
13b5 1d15 | | Execute_Immediate Reference_Lex_1,0x15
13b6 00c7 | | Action Elaborate_Subprogram
13b7 029d 162b | +| Declare_Subprogram INIT_1628,For_Outer_Call
13b9 1d16 | | Execute_Immediate Reference_Lex_1,0x16
13ba 00c7 | | Action Elaborate_Subprogram
13bb 1d17 | | Execute_Immediate Reference_Lex_1,0x17
13bc 00c7 | | Action Elaborate_Subprogram
13bd 1d18 | | Execute_Immediate Reference_Lex_1,0x18
13be 00c7 | | Action Elaborate_Subprogram
13bf 1d19 | | Execute_Immediate Reference_Lex_1,0x19
13c0 00c7 | | Action Elaborate_Subprogram
13c1 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
13c2 00c7 | | Action Elaborate_Subprogram
13c3 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
13c4 00c7 | | Action Elaborate_Subprogram
13c5 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
13c6 00c7 | | Action Elaborate_Subprogram
13c7 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
13c8 00c7 | | Action Elaborate_Subprogram
13c9 e006 | | Load 0x0,0x6
13ca e007 | | Load 0x0,0x7
13cb 00db | | Load_Top At_Offset_3
13cc e213 | | Load 0x1,0x13
13cd e008 | | Load 0x0,0x8
13ce 1b18 | | Execute Package,Field_Read,Field_Number 0x18
13cf 0387 | | Declare_Variable Package
13d0 00d8 | | Load_Top At_Offset_0
13d1 020f | | Execute Module,Activate
13d2 e008 | | Load 0x0,0x8
13d3 1919 | | Execute Package,Field_Reference,Field_Number 0x19
13d4 00c6 | | Action Check_Subprogram_Elaborated
13d5 00da | | Load_Top At_Offset_2
13d6 e213 | | Load 0x1,0x13
13d7 e009 | | Load 0x0,0x9
13d8 e00a | | Load 0x0,0xa
13d9 4800 |H | Short_Literal 0x0
13da 0007 | | Action Break_Optional
13db 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
13dc 00c7 | | Action Elaborate_Subprogram
13dd 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
13de 00c7 | | Action Elaborate_Subprogram
13df BODY_1380:
13df 00bc | | Action Signal_Activated
13e0 00bb | | Action Signal_Completion
13e1 0000 0000 | | .BLANK 0000[0x7]
13e8 ; --------------------------------------------------------------------------------------
13e8 ; SUBPROGRAM
13e8 ; --------------------------------------------------------------------------------------
13e8 13f6 | | .CONST 0x13f6 ; Address of begin
13e9 145b | [ | .CONST 0x145b ; Address of exception handler
13ea 0004 | | .CONST 0x0004 ; Number of locals
13eb INIT_13e8:
13eb e213 | | Load 0x1,0x13
13ec e00b | | Load 0x0,0xb
13ed 180d | | Execute Package,Field_Execute,Field_Number 0xd
13ee 039c | | Declare_Variable Heap_Access,By_Allocation
13ef 00d8 | | Load_Top At_Offset_0
13f0 0217 | | Execute Heap_Access,All_Reference
13f1 1c00 | | Execute_Immediate Run_Utility,0x0
13f2 e00c | | Load 0x0,0xc
13f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13f4 e002 | | Load 0x0,0x2
13f5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
13f6 BODY_13e8:
13f6 e5ff | | Load 0x2,-0x1
13f7 e20f | | Load 0x1,0xf
13f8 0119 | | Execute Any,Check_In_Formal_Type
13f9 e210 | | Load 0x1,0x10
13fa e00b | | Load 0x0,0xb
13fb 180d | | Execute Package,Field_Execute,Field_Number 0xd
13fc 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
13fd 00db | | Load_Top At_Offset_3
13fe 0217 | | Execute Heap_Access,All_Reference
13ff 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1400 e00d | | Load 0x0,0xd
1401 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1402 e00e | | Load 0x0,0xe
1403 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
1404 702d |p- | Jump_Nonzero 0x1432
1405 e00c | | Load 0x0,0xc
1406 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1407 4800 |H | Short_Literal 0x0
1408 e00f | | Load 0x0,0xf
1409 180f | | Execute Package,Field_Execute,Field_Number 0xf
140a e010 | | Load 0x0,0x10
140b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
140c 4800 |H | Short_Literal 0x0
140d e00c | | Load 0x0,0xc
140e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
140f 0032 | 2 | Store_Top Heap_Access,At_Offset_2
1410 00da | | Load_Top At_Offset_2
1411 0219 | | Execute Heap_Access,All_Read
1412 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1413 e002 | | Load 0x0,0x2
1414 1b10 | | Execute Package,Field_Read,Field_Number 0x10
1415 00d9 | | Load_Top At_Offset_1
1416 0219 | | Execute Heap_Access,All_Read
1417 00d8 | | Load_Top At_Offset_0
1418 0120 | | Execute Any,Is_Value
1419 6803 |h | Jump_Zero 0x141d
141a e20f | | Load 0x1,0xf
141b 011e | | Execute Any,Convert
141c 7802 |x | Jump 0x141f
141d e20f | | Load 0x1,0xf
141e 0119 | | Execute Any,Check_In_Formal_Type
141f e403 | | Load 0x2,0x3
1420 8212 | | Call 0x1,0x12
1421 00da | | Load_Top At_Offset_2
1422 0218 | | Execute Heap_Access,All_Write
1423 005a | Z | Store_Top Discrete,At_Offset_2
1424 00d1 | | Pop_Control Pop_Count_1
1425 00d8 | | Load_Top At_Offset_0
1426 680b |h | Jump_Zero 0x1432
1427 e002 | | Load 0x0,0x2
1428 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1429 e010 | | Load 0x0,0x10
142a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
142b 6044 |`D | Indirect_Literal Discrete,0x1470,{0x00000000, 0x0000400e}
142c e002 | | Load 0x0,0x2
142d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
142e c5fc | | Store 0x2,-0x4
142f e213 | | Load 0x1,0x13
1430 a5fd | | Store_Unchecked 0x2,-0x3
1431 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1432 00da | | Load_Top At_Offset_2
1433 0219 | | Execute Heap_Access,All_Read
1434 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1435 00d8 | | Load_Top At_Offset_0
1436 e00d | | Load 0x0,0xd
1437 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1438 e001 | | Load 0x0,0x1
1439 1812 | | Execute Package,Field_Execute,Field_Number 0x12
143a 00d2 | | Pop_Control Pop_Count_2
143b e00d | | Load 0x0,0xd
143c 181d | | Execute Package,Field_Execute,Field_Number 0x1d
143d e00e | | Load 0x0,0xe
143e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
143f 00db | | Load_Top At_Offset_3
1440 0217 | | Execute Heap_Access,All_Reference
1441 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
1442 e002 | | Load 0x0,0x2
1443 180e | | Execute Package,Field_Execute,Field_Number 0xe
1444 00db | | Load_Top At_Offset_3
1445 0217 | | Execute Heap_Access,All_Reference
1446 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
1447 e5fe | | Load 0x2,-0x2
1448 00db | | Load_Top At_Offset_3
1449 0217 | | Execute Heap_Access,All_Reference
144a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
144b 4800 |H | Short_Literal 0x0
144c 00db | | Load_Top At_Offset_3
144d 0217 | | Execute Heap_Access,All_Reference
144e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
144f e005 | | Load 0x0,0x5
1450 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1451 00db | | Load_Top At_Offset_3
1452 0217 | | Execute Heap_Access,All_Reference
1453 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1454 00da | | Load_Top At_Offset_2
1455 a5fd | | Store_Unchecked 0x2,-0x3
1456 00da | | Load_Top At_Offset_2
1457 0217 | | Execute Heap_Access,All_Reference
1458 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1459 a5fc | | Store_Unchecked 0x2,-0x4
145a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
145b TRAP_13e8:
145b 010b | | Execute Exception,Is_Storage_Error
145c 680b |h | Jump_Zero 0x1468
145d e002 | | Load 0x0,0x2
145e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
145f e010 | | Load 0x0,0x10
1460 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1461 600a |` | Indirect_Literal Discrete,0x146c,{0x00000000, 0x00004006}
1462 e002 | | Load 0x0,0x2
1463 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1464 c5fc | | Store 0x2,-0x4
1465 e213 | | Load 0x1,0x13
1466 a5fd | | Store_Unchecked 0x2,-0x3
1467 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1468 0100 | | Execute Exception,Raise
1469 0000 0000 | | .XXX[0x3]
146b 0000 | |
146c 0000 0000 | | .LITERAL {0x00000000, 0x00004006}
1470 0000 0000 | | .LITERAL {0x00000000, 0x0000400e}
1474 0000 0000 | | .BLANK 0000[0x4]
1478 ; --------------------------------------------------------------------------------------
1478 ; SUBPROGRAM
1478 ; --------------------------------------------------------------------------------------
1478 147b | { | .CONST 0x147b ; Address of begin
1479 0004 | | .CONST 0x0004 ; Address of exception handler
147a 0001 | | .CONST 0x0001 ; Number of locals
147b BODY_1478:
147b INIT_1478:
147b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
147c 0000 0000 | | .BLANK 0000[0x4]
1480 ; --------------------------------------------------------------------------------------
1480 ; SUBPROGRAM
1480 ; --------------------------------------------------------------------------------------
1480 14a0 | | .CONST 0x14a0 ; Address of begin
1481 156a | j | .CONST 0x156a ; Address of exception handler
1482 000c | | .CONST 0x000c ; Number of locals
1483 INIT_1480:
1483 e002 | | Load 0x0,0x2
1484 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1485 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1486 e010 | | Load 0x0,0x10
1487 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1488 e010 | | Load 0x0,0x10
1489 1b0e | | Execute Package,Field_Read,Field_Number 0xe
148a e002 | | Load 0x0,0x2
148b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
148c e011 | | Load 0x0,0x11
148d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
148e 02c7 | | Declare_Variable Any
148f 00d8 | | Load_Top At_Offset_0
1490 1c00 | | Execute_Immediate Run_Utility,0x0
1491 00ea | | Load_Encached Null_String_Cache
1492 e5ff | | Load 0x2,-0x1
1493 0217 | | Execute Heap_Access,All_Reference
1494 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
1495 8012 | | Call 0x0,0x12
1496 029f 1663 | c| Declare_Subprogram INIT_1660,For_Call
1498 029f 167b | {| Declare_Subprogram INIT_1678,For_Call
149a 029f 1693 | | Declare_Subprogram INIT_1690,For_Call
149c 029f 16eb | | Declare_Subprogram INIT_16e8,For_Call
149e 029f 1763 | c| Declare_Subprogram INIT_1760,For_Call
14a0 BODY_1480:
14a0 e00d | | Load 0x0,0xd
14a1 181d | | Execute Package,Field_Execute,Field_Number 0x1d
14a2 e00e | | Load 0x0,0xe
14a3 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
14a4 7030 |p0 | Jump_Nonzero 0x14d5
14a5 e5ff | | Load 0x2,-0x1
14a6 0219 | | Execute Heap_Access,All_Read
14a7 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
14a8 e002 | | Load 0x0,0x2
14a9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
14aa 00d9 | | Load_Top At_Offset_1
14ab 0219 | | Execute Heap_Access,All_Read
14ac 00d8 | | Load_Top At_Offset_0
14ad 0120 | | Execute Any,Is_Value
14ae 6803 |h | Jump_Zero 0x14b2
14af e20f | | Load 0x1,0xf
14b0 011e | | Execute Any,Convert
14b1 7802 |x | Jump 0x14b4
14b2 e20f | | Load 0x1,0xf
14b3 0119 | | Execute Any,Check_In_Formal_Type
14b4 e5fe | | Load 0x2,-0x2
14b5 8212 | | Call 0x1,0x12
14b6 00da | | Load_Top At_Offset_2
14b7 0218 | | Execute Heap_Access,All_Write
14b8 c405 | | Store 0x2,0x5
14b9 00d1 | | Pop_Control Pop_Count_1
14ba e405 | | Load 0x2,0x5
14bb 6810 |h | Jump_Zero 0x14cc
14bc e013 | | Load 0x0,0x13
14bd 180e | | Execute Package,Field_Execute,Field_Number 0xe
14be e010 | | Load 0x0,0x10
14bf 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
14c0 60db |` | Indirect_Literal Discrete,0x159c,{0x00000000, 0x0000400f}
14c1 e002 | | Load 0x0,0x2
14c2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
14c3 e010 | | Load 0x0,0x10
14c4 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
14c5 e405 | | Load 0x2,0x5
14c6 e002 | | Load 0x0,0x2
14c7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
14c8 e5fe | | Load 0x2,-0x2
14c9 e00c | | Load 0x0,0xc
14ca 181f | | Execute Package,Field_Execute,Field_Number 0x1f
14cb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
14cc e5ff | | Load 0x2,-0x1
14cd 0219 | | Execute Heap_Access,All_Read
14ce 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
14cf 00d8 | | Load_Top At_Offset_0
14d0 e00d | | Load 0x0,0xd
14d1 181d | | Execute Package,Field_Execute,Field_Number 0x1d
14d2 e001 | | Load 0x0,0x1
14d3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
14d4 00d2 | | Pop_Control Pop_Count_2
14d5 e5fe | | Load 0x2,-0x2
14d6 e00c | | Load 0x0,0xc
14d7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
14d8 4612 |F | Jump_Case 0x13
14d9 7812 |x | Jump 0x14ec ; case 0x0
14da 7811 |x | Jump 0x14ec ; case 0x1
14db 7810 |x | Jump 0x14ec ; case 0x2
14dc 780f |x | Jump 0x14ec ; case 0x3
14dd 780e |x | Jump 0x14ec ; case 0x4
14de 780d |x | Jump 0x14ec ; case 0x5
14df 780c |x | Jump 0x14ec ; case 0x6
14e0 780b |x | Jump 0x14ec ; case 0x7
14e1 780a |x | Jump 0x14ec ; case 0x8
14e2 7809 |x | Jump 0x14ec ; case 0x9
14e3 7822 |x" | Jump 0x1506 ; case 0xa
14e4 7844 |xD | Jump 0x1529 ; case 0xb
14e5 7870 |xp | Jump 0x1556 ; case 0xc
14e6 7805 |x | Jump 0x14ec ; case 0xd
14e7 7804 |x | Jump 0x14ec ; case 0xe
14e8 7803 |x | Jump 0x14ec ; case 0xf
14e9 7802 |x | Jump 0x14ec ; case 0x10
14ea 7801 |x | Jump 0x14ec ; case 0x11
14eb 7800 |x | Jump 0x14ec ; case 0x12
14ec e013 | | Load 0x0,0x13
14ed 180e | | Execute Package,Field_Execute,Field_Number 0xe
14ee 4801 |H | Short_Literal 0x1
14ef 4801 |H | Short_Literal 0x1
14f0 e010 | | Load 0x0,0x10
14f1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
14f2 035b | [ | Declare_Type Array,Constrained
14f3 0337 | 7 | Declare_Variable Array
14f4 e5fe | | Load 0x2,-0x2
14f5 e00c | | Load 0x0,0xc
14f6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
14f7 4801 |H | Short_Literal 0x1
14f8 00da | | Load_Top At_Offset_2
14f9 01d6 | | Execute Vector,Field_Write
14fa 609d |` | Indirect_Literal Discrete,0x1598,{0x00000000, 0x00004017}
14fb e002 | | Load 0x0,0x2
14fc 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
14fd e010 | | Load 0x0,0x10
14fe 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
14ff 6098 |` | Indirect_Literal Discrete,0x1598,{0x00000000, 0x00004017}
1500 e002 | | Load 0x0,0x2
1501 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1502 e5fe | | Load 0x2,-0x2
1503 e00c | | Load 0x0,0xc
1504 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1505 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1506 4801 |H | Short_Literal 0x1
1507 e5fe | | Load 0x2,-0x2
1508 e00c | | Load 0x0,0xc
1509 1818 | | Execute Package,Field_Execute,Field_Number 0x18
150a a403 | | Store_Unchecked 0x2,0x3
150b 4802 |H | Short_Literal 0x2
150c e5fe | | Load 0x2,-0x2
150d e00c | | Load 0x0,0xc
150e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
150f a404 | | Store_Unchecked 0x2,0x4
1510 e5fe | | Load 0x2,-0x2
1511 8014 | | Call 0x0,0x14
1512 7007 |p | Jump_Nonzero 0x151a
1513 e404 | | Load 0x2,0x4
1514 8408 | | Call 0x2,0x8
1515 e403 | | Load 0x2,0x3
1516 8015 | | Call 0x0,0x15
1517 4800 |H | Short_Literal 0x0
1518 8409 | | Call 0x2,0x9
1519 7801 |x | Jump 0x151b
151a 840a | | Call 0x2,0xa
151b 4802 |H | Short_Literal 0x2
151c e406 | | Load 0x2,0x6
151d e011 | | Load 0x0,0x11
151e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
151f 6808 |h | Jump_Zero 0x1528
1520 e010 | | Load 0x0,0x10
1521 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1522 6071 |`q | Indirect_Literal Discrete,0x1594,{0x00000000, 0x00004011}
1523 e002 | | Load 0x0,0x2
1524 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1525 e5fe | | Load 0x2,-0x2
1526 e00c | | Load 0x0,0xc
1527 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1528 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1529 4801 |H | Short_Literal 0x1
152a e5fe | | Load 0x2,-0x2
152b e00c | | Load 0x0,0xc
152c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
152d a403 | | Store_Unchecked 0x2,0x3
152e 4802 |H | Short_Literal 0x2
152f e5fe | | Load 0x2,-0x2
1530 e00c | | Load 0x0,0xc
1531 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1532 a404 | | Store_Unchecked 0x2,0x4
1533 e5fe | | Load 0x2,-0x2
1534 8016 | | Call 0x0,0x16
1535 7011 |p | Jump_Nonzero 0x1547
1536 e403 | | Load 0x2,0x3
1537 e010 | | Load 0x0,0x10
1538 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1539 0f01 | | Execute_Immediate Equal,0x1
153a 680c |h | Jump_Zero 0x1547
153b e403 | | Load 0x2,0x3
153c e010 | | Load 0x0,0x10
153d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
153e 01db | | Execute Vector,Length
153f 6807 |h | Jump_Zero 0x1547
1540 e404 | | Load 0x2,0x4
1541 8408 | | Call 0x2,0x8
1542 e403 | | Load 0x2,0x3
1543 8015 | | Call 0x0,0x15
1544 4801 |H | Short_Literal 0x1
1545 8409 | | Call 0x2,0x9
1546 7801 |x | Jump 0x1548
1547 840b | | Call 0x2,0xb
1548 4802 |H | Short_Literal 0x2
1549 e406 | | Load 0x2,0x6
154a e011 | | Load 0x0,0x11
154b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
154c 6808 |h | Jump_Zero 0x1555
154d e010 | | Load 0x0,0x10
154e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
154f 6044 |`D | Indirect_Literal Discrete,0x1594,{0x00000000, 0x00004011}
1550 e002 | | Load 0x0,0x2
1551 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1552 e5fe | | Load 0x2,-0x2
1553 e00c | | Load 0x0,0xc
1554 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1555 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1556 4801 |H | Short_Literal 0x1
1557 e5fe | | Load 0x2,-0x2
1558 e00c | | Load 0x0,0xc
1559 1818 | | Execute Package,Field_Execute,Field_Number 0x18
155a a403 | | Store_Unchecked 0x2,0x3
155b 840c | | Call 0x2,0xc
155c 4802 |H | Short_Literal 0x2
155d e406 | | Load 0x2,0x6
155e e011 | | Load 0x0,0x11
155f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1560 6808 |h | Jump_Zero 0x1569
1561 e010 | | Load 0x0,0x10
1562 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1563 6030 |`0 | Indirect_Literal Discrete,0x1594,{0x00000000, 0x00004011}
1564 e002 | | Load 0x0,0x2
1565 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1566 e5fe | | Load 0x2,-0x2
1567 e00c | | Load 0x0,0xc
1568 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1569 4504 |E | Exit_Suprogram New_Top_Offset 0x4
156a TRAP_1480:
156a e017 | | Load 0x0,0x17
156b 010f | | Execute Exception,Equal
156c 681c |h | Jump_Zero 0x1589
156d e5ff | | Load 0x2,-0x1
156e 8221 | ! | Call 0x1,0x21
156f e013 | | Load 0x0,0x13
1570 180e | | Execute Package,Field_Execute,Field_Number 0xe
1571 4801 |H | Short_Literal 0x1
1572 4801 |H | Short_Literal 0x1
1573 e010 | | Load 0x0,0x10
1574 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1575 035b | [ | Declare_Type Array,Constrained
1576 0337 | 7 | Declare_Variable Array
1577 e5fe | | Load 0x2,-0x2
1578 e00c | | Load 0x0,0xc
1579 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
157a 4801 |H | Short_Literal 0x1
157b 00da | | Load_Top At_Offset_2
157c 01d6 | | Execute Vector,Field_Write
157d 6012 |` | Indirect_Literal Discrete,0x1590,{0x00000000, 0x00004019}
157e e002 | | Load 0x0,0x2
157f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1580 e010 | | Load 0x0,0x10
1581 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1582 600d |` | Indirect_Literal Discrete,0x1590,{0x00000000, 0x00004019}
1583 e002 | | Load 0x0,0x2
1584 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1585 e5fe | | Load 0x2,-0x2
1586 e00c | | Load 0x0,0xc
1587 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1588 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1589 e5ff | | Load 0x2,-0x1
158a 8221 | ! | Call 0x1,0x21
158b 00d8 | | Load_Top At_Offset_0
158c 0101 | | Execute Exception,Reraise
158d 0000 0000 | | .XXX[0x3]
158f 0000 | |
1590 0000 0000 | | .LITERAL {0x00000000, 0x00004019}
1594 0000 0000 | | .LITERAL {0x00000000, 0x00004011}
1598 0000 0000 | | .LITERAL {0x00000000, 0x00004017}
159c 0000 0000 | | .LITERAL {0x00000000, 0x0000400f}
15a0 ; --------------------------------------------------------------------------------------
15a0 ; SUBPROGRAM
15a0 ; --------------------------------------------------------------------------------------
15a0 15a3 | | .CONST 0x15a3 ; Address of begin
15a1 0004 | | .CONST 0x0004 ; Address of exception handler
15a2 0001 | | .CONST 0x0001 ; Number of locals
15a3 BODY_15a0:
15a3 INIT_15a0:
15a3 00da | | Load_Top At_Offset_2
15a4 0217 | | Execute Heap_Access,All_Reference
15a5 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
15a6 0219 | | Execute Heap_Access,All_Read
15a7 c5fe | | Store 0x2,-0x2
15a8 e210 | | Load 0x1,0x10
15a9 00db | | Load_Top At_Offset_3
15aa 0217 | | Execute Heap_Access,All_Reference
15ab 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
15ac 00da | | Load_Top At_Offset_2
15ad 8221 | ! | Call 0x1,0x21
15ae 4502 |E | Exit_Suprogram New_Top_Offset 0x2
15af 0000 | | .XXX[0x1]
15b0 ; --------------------------------------------------------------------------------------
15b0 ; SUBPROGRAM
15b0 ; --------------------------------------------------------------------------------------
15b0 15b3 | | .CONST 0x15b3 ; Address of begin
15b1 0004 | | .CONST 0x0004 ; Address of exception handler
15b2 0001 | | .CONST 0x0001 ; Number of locals
15b3 BODY_15b0:
15b3 INIT_15b0:
15b3 00da | | Load_Top At_Offset_2
15b4 0217 | | Execute Heap_Access,All_Reference
15b5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
15b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
15b7 0000 | | .XXX[0x1]
15b8 ; --------------------------------------------------------------------------------------
15b8 ; SUBPROGRAM
15b8 ; --------------------------------------------------------------------------------------
15b8 15bb | | .CONST 0x15bb ; Address of begin
15b9 0004 | | .CONST 0x0004 ; Address of exception handler
15ba 0001 | | .CONST 0x0001 ; Number of locals
15bb BODY_15b8:
15bb INIT_15b8:
15bb 00da | | Load_Top At_Offset_2
15bc 0217 | | Execute Heap_Access,All_Reference
15bd 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
15be e210 | | Load 0x1,0x10
15bf 0213 | | Execute Heap_Access,Check_In_Type
15c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
15c1 0000 0000 | | .BLANK 0000[0x7]
15c8 ; --------------------------------------------------------------------------------------
15c8 ; SUBPROGRAM
15c8 ; --------------------------------------------------------------------------------------
15c8 15cb | | .CONST 0x15cb ; Address of begin
15c9 0004 | | .CONST 0x0004 ; Address of exception handler
15ca 0001 | | .CONST 0x0001 ; Number of locals
15cb BODY_15c8:
15cb INIT_15c8:
15cb 00da | | Load_Top At_Offset_2
15cc 0217 | | Execute Heap_Access,All_Reference
15cd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
15ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
15cf 0000 | | .XXX[0x1]
15d0 ; --------------------------------------------------------------------------------------
15d0 ; SUBPROGRAM
15d0 ; --------------------------------------------------------------------------------------
15d0 15d3 | | .CONST 0x15d3 ; Address of begin
15d1 0004 | | .CONST 0x0004 ; Address of exception handler
15d2 0001 | | .CONST 0x0001 ; Number of locals
15d3 BODY_15d0:
15d3 INIT_15d0:
15d3 00db | | Load_Top At_Offset_3
15d4 00db | | Load_Top At_Offset_3
15d5 0217 | | Execute Heap_Access,All_Reference
15d6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
15d7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
15d8 ; --------------------------------------------------------------------------------------
15d8 ; SUBPROGRAM
15d8 ; --------------------------------------------------------------------------------------
15d8 15db | | .CONST 0x15db ; Address of begin
15d9 0004 | | .CONST 0x0004 ; Address of exception handler
15da 0001 | | .CONST 0x0001 ; Number of locals
15db BODY_15d8:
15db INIT_15d8:
15db 4800 |H | Short_Literal 0x0
15dc 00db | | Load_Top At_Offset_3
15dd 0217 | | Execute Heap_Access,All_Reference
15de 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
15df e002 | | Load 0x0,0x2
15e0 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
15e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
15e2 0000 0000 | | .BLANK 0000[0x6]
15e8 ; --------------------------------------------------------------------------------------
15e8 ; SUBPROGRAM
15e8 ; --------------------------------------------------------------------------------------
15e8 15eb | | .CONST 0x15eb ; Address of begin
15e9 0004 | | .CONST 0x0004 ; Address of exception handler
15ea 0001 | | .CONST 0x0001 ; Number of locals
15eb BODY_15e8:
15eb INIT_15e8:
15eb 00da | | Load_Top At_Offset_2
15ec 0217 | | Execute Heap_Access,All_Reference
15ed 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
15ee e002 | | Load 0x0,0x2
15ef 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
15f0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
15f1 0000 0000 | | .BLANK 0000[0x7]
15f8 ; --------------------------------------------------------------------------------------
15f8 ; SUBPROGRAM
15f8 ; --------------------------------------------------------------------------------------
15f8 15fb | | .CONST 0x15fb ; Address of begin
15f9 0004 | | .CONST 0x0004 ; Address of exception handler
15fa 0001 | | .CONST 0x0001 ; Number of locals
15fb BODY_15f8:
15fb INIT_15f8:
15fb 00da | | Load_Top At_Offset_2
15fc e00b | | Load 0x0,0xb
15fd 180d | | Execute Package,Field_Execute,Field_Number 0xd
15fe e223 | # | Load 0x1,0x23
15ff e224 | $ | Load 0x1,0x24
1600 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
1601 e008 | | Load 0x0,0x8
1602 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1603 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1604 0000 0000 | | .BLANK 0000[0x4]
1608 ; --------------------------------------------------------------------------------------
1608 ; SUBPROGRAM
1608 ; --------------------------------------------------------------------------------------
1608 160b | | .CONST 0x160b ; Address of begin
1609 0004 | | .CONST 0x0004 ; Address of exception handler
160a 0001 | | .CONST 0x0001 ; Number of locals
160b BODY_1608:
160b INIT_1608:
160b 00da | | Load_Top At_Offset_2
160c e222 | " | Load 0x1,0x22
160d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
160e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
160f 0000 | | .XXX[0x1]
1610 ; --------------------------------------------------------------------------------------
1610 ; SUBPROGRAM
1610 ; --------------------------------------------------------------------------------------
1610 1613 | | .CONST 0x1613 ; Address of begin
1611 0004 | | .CONST 0x0004 ; Address of exception handler
1612 0001 | | .CONST 0x0001 ; Number of locals
1613 BODY_1610:
1613 INIT_1610:
1613 4608 |F | Jump_Case 0x9
1614 7808 |x | Jump 0x161d ; case 0x0
1615 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
1616 780a |x | Jump 0x1621 ; case 0x2
1617 7809 |x | Jump 0x1621 ; case 0x3
1618 7808 |x | Jump 0x1621 ; case 0x4
1619 7807 |x | Jump 0x1621 ; case 0x5
161a 7806 |x | Jump 0x1621 ; case 0x6
161b 7805 |x | Jump 0x1621 ; case 0x7
161c 7804 |x | Jump 0x1621 ; case 0x8
161d 00da | | Load_Top At_Offset_2
161e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
161f 1c00 | | Execute_Immediate Run_Utility,0x0
1620 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
1621 0869 | i | Execute_Immediate Raise,0x69
1622 0000 0000 | | .BLANK 0000[0x6]
1628 ; --------------------------------------------------------------------------------------
1628 ; SUBPROGRAM
1628 ; --------------------------------------------------------------------------------------
1628 162b | + | .CONST 0x162b ; Address of begin
1629 0004 | | .CONST 0x0004 ; Address of exception handler
162a 0001 | | .CONST 0x0001 ; Number of locals
162b BODY_1628:
162b INIT_1628:
162b 00da | | Load_Top At_Offset_2
162c 0217 | | Execute Heap_Access,All_Reference
162d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
162e 682a |h* | Jump_Zero 0x1659
162f 00da | | Load_Top At_Offset_2
1630 0217 | | Execute Heap_Access,All_Reference
1631 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1632 0229 | ) | Execute Access,All_Read
1633 e018 | | Load 0x0,0x18
1634 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1635 7015 |p | Jump_Nonzero 0x164b
1636 00da | | Load_Top At_Offset_2
1637 0219 | | Execute Heap_Access,All_Read
1638 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1639 00d8 | | Load_Top At_Offset_0
163a 0229 | ) | Execute Access,All_Read
163b e019 | | Load 0x0,0x19
163c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
163d e01a | | Load 0x0,0x1a
163e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
163f 00ea | | Load_Encached Null_String_Cache
1640 00ea | | Load_Encached Null_String_Cache
1641 e5ff | | Load 0x2,-0x1
1642 0217 | | Execute Heap_Access,All_Reference
1643 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
1644 8012 | | Call 0x0,0x12
1645 4800 |H | Short_Literal 0x0
1646 e018 | | Load 0x0,0x18
1647 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1648 00d9 | | Load_Top At_Offset_1
1649 0228 | ( | Execute Access,All_Write
164a 00d1 | | Pop_Control Pop_Count_1
164b 00da | | Load_Top At_Offset_2
164c 0219 | | Execute Heap_Access,All_Read
164d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
164e 00d8 | | Load_Top At_Offset_0
164f 0229 | ) | Execute Access,All_Read
1650 e018 | | Load 0x0,0x18
1651 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1652 00d9 | | Load_Top At_Offset_1
1653 0228 | ( | Execute Access,All_Write
1654 00d1 | | Pop_Control Pop_Count_1
1655 4800 |H | Short_Literal 0x0
1656 00db | | Load_Top At_Offset_3
1657 0217 | | Execute Heap_Access,All_Reference
1658 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1659 4502 |E | Exit_Suprogram New_Top_Offset 0x2
165a 0000 0000 | | .BLANK 0000[0x6]
1660 ; --------------------------------------------------------------------------------------
1660 ; SUBPROGRAM
1660 ; --------------------------------------------------------------------------------------
1660 1665 | e | .CONST 0x1665 ; Address of begin
1661 0004 | | .CONST 0x0004 ; Address of exception handler
1662 0002 | | .CONST 0x0002 ; Number of locals
1663 INIT_1660:
1663 029f 17b3 | | Declare_Subprogram INIT_17b0,For_Call
1665 BODY_1660:
1665 00db | | Load_Top At_Offset_3
1666 e010 | | Load 0x0,0x10
1667 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1668 0b0f | | Execute_Immediate Case_Compare,0xf
1669 7004 |p | Jump_Nonzero 0x166e
166a 0f01 | | Execute_Immediate Equal,0x1
166b 7005 |p | Jump_Nonzero 0x1671
166c e017 | | Load 0x0,0x17
166d 0257 | W | Execute Discrete,Raise
166e 00d1 | | Pop_Control Pop_Count_1
166f 8602 | | Call 0x3,0x2
1670 7804 |x | Jump 0x1675
1671 00db | | Load_Top At_Offset_3
1672 e010 | | Load 0x0,0x10
1673 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1674 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1675 0831 | 1 | Execute_Immediate Raise,0x31
1676 0000 0000 | | .XXX[0x2]
1678 ; --------------------------------------------------------------------------------------
1678 ; SUBPROGRAM
1678 ; --------------------------------------------------------------------------------------
1678 167b | { | .CONST 0x167b ; Address of begin
1679 0004 | | .CONST 0x0004 ; Address of exception handler
167a 0001 | | .CONST 0x0001 ; Number of locals
167b BODY_1678:
167b INIT_1678:
167b e5ff | | Load 0x2,-0x1
167c 0219 | | Execute Heap_Access,All_Read
167d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
167e e406 | | Load 0x2,0x6
167f 00d9 | | Load_Top At_Offset_1
1680 e013 | | Load 0x0,0x13
1681 180e | | Execute Package,Field_Execute,Field_Number 0xe
1682 e5fd | | Load 0x2,-0x3
1683 e7fd | | Load 0x3,-0x3
1684 e7fe | | Load 0x3,-0x2
1685 e7ff | | Load 0x3,-0x1
1686 e001 | | Load 0x0,0x1
1687 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1688 00d1 | | Pop_Control Pop_Count_1
1689 c406 | | Store 0x2,0x6
168a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
168b 0000 0000 | | .BLANK 0000[0x5]
1690 ; --------------------------------------------------------------------------------------
1690 ; SUBPROGRAM
1690 ; --------------------------------------------------------------------------------------
1690 1695 | | .CONST 0x1695 ; Address of begin
1691 0004 | | .CONST 0x0004 ; Address of exception handler
1692 0002 | | .CONST 0x0002 ; Number of locals
1693 INIT_1690:
1693 e404 | | Load 0x2,0x4
1694 8408 | | Call 0x2,0x8
1695 BODY_1690:
1695 e5fe | | Load 0x2,-0x2
1696 e00c | | Load 0x0,0xc
1697 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1698 7002 |p | Jump_Nonzero 0x169b
1699 00cc | | Action Pop_Block
169a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
169b e5ff | | Load 0x2,-0x1
169c 0219 | | Execute Heap_Access,All_Read
169d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
169e e402 | | Load 0x2,0x2
169f 00d9 | | Load_Top At_Offset_1
16a0 0229 | ) | Execute Access,All_Read
16a1 e407 | | Load 0x2,0x7
16a2 801b | | Call 0x0,0x1b
16a3 00da | | Load_Top At_Offset_2
16a4 0228 | ( | Execute Access,All_Write
16a5 c402 | | Store 0x2,0x2
16a6 00d1 | | Pop_Control Pop_Count_1
16a7 4800 |H | Short_Literal 0x0
16a8 e402 | | Load 0x2,0x2
16a9 e002 | | Load 0x0,0x2
16aa 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
16ab 6805 |h | Jump_Zero 0x16b1
16ac 4801 |H | Short_Literal 0x1
16ad e5ff | | Load 0x2,-0x1
16ae 0217 | | Execute Heap_Access,All_Reference
16af 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
16b0 7806 |x | Jump 0x16b7
16b1 e402 | | Load 0x2,0x2
16b2 e5fe | | Load 0x2,-0x2
16b3 e00c | | Load 0x0,0xc
16b4 181f | | Execute Package,Field_Execute,Field_Number 0x1f
16b5 00cc | | Action Pop_Block
16b6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
16b7 e5ff | | Load 0x2,-0x1
16b8 0219 | | Execute Heap_Access,All_Read
16b9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
16ba 00d8 | | Load_Top At_Offset_0
16bb 0229 | ) | Execute Access,All_Read
16bc e5fe | | Load 0x2,-0x2
16bd e01c | | Load 0x0,0x1c
16be a01d | | Store_Unchecked 0x0,0x1d
16bf a01e | | Store_Unchecked 0x0,0x1e
16c0 a01f | | Store_Unchecked 0x0,0x1f
16c1 a020 | | Store_Unchecked 0x0,0x20
16c2 a021 | ! | Store_Unchecked 0x0,0x21
16c3 e022 | " | Load 0x0,0x22
16c4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
16c5 00d9 | | Load_Top At_Offset_1
16c6 0228 | ( | Execute Access,All_Write
16c7 00d1 | | Pop_Control Pop_Count_1
16c8 e5ff | | Load 0x2,-0x1
16c9 0219 | | Execute Heap_Access,All_Read
16ca 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
16cb 00d8 | | Load_Top At_Offset_0
16cc 0229 | ) | Execute Access,All_Read
16cd 4800 |H | Short_Literal 0x0
16ce e018 | | Load 0x0,0x18
16cf 181b | | Execute Package,Field_Execute,Field_Number 0x1b
16d0 00d9 | | Load_Top At_Offset_1
16d1 0228 | ( | Execute Access,All_Write
16d2 00d1 | | Pop_Control Pop_Count_1
16d3 00d8 | | Load_Top At_Offset_0
16d4 0092 17e7 | | Action Push_String_Extended,0x17e7 ; "<OPEN>"
16d6 4800 |H | Short_Literal 0x0
16d7 8409 | | Call 0x2,0x9
16d8 e5ff | | Load 0x2,-0x1
16d9 0219 | | Execute Heap_Access,All_Read
16da 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
16db 00d8 | | Load_Top At_Offset_0
16dc 0229 | ) | Execute Access,All_Read
16dd e018 | | Load 0x0,0x18
16de 1819 | | Execute Package,Field_Execute,Field_Number 0x19
16df 00d9 | | Load_Top At_Offset_1
16e0 0228 | ( | Execute Access,All_Write
16e1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
16e2 0000 0000 | | .BLANK 0000[0x6]
16e8 ; --------------------------------------------------------------------------------------
16e8 ; SUBPROGRAM
16e8 ; --------------------------------------------------------------------------------------
16e8 16ed | | .CONST 0x16ed ; Address of begin
16e9 0004 | | .CONST 0x0004 ; Address of exception handler
16ea 0002 | | .CONST 0x0002 ; Number of locals
16eb INIT_16e8:
16eb e404 | | Load 0x2,0x4
16ec 8408 | | Call 0x2,0x8
16ed BODY_16e8:
16ed e5fe | | Load 0x2,-0x2
16ee e00c | | Load 0x0,0xc
16ef 1820 | | Execute Package,Field_Execute,Field_Number 0x20
16f0 7002 |p | Jump_Nonzero 0x16f3
16f1 00cc | | Action Pop_Block
16f2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
16f3 e5ff | | Load 0x2,-0x1
16f4 0219 | | Execute Heap_Access,All_Read
16f5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
16f6 e402 | | Load 0x2,0x2
16f7 00d9 | | Load_Top At_Offset_1
16f8 0229 | ) | Execute Access,All_Read
16f9 e407 | | Load 0x2,0x7
16fa 801b | | Call 0x0,0x1b
16fb 00da | | Load_Top At_Offset_2
16fc 0228 | ( | Execute Access,All_Write
16fd c402 | | Store 0x2,0x2
16fe 00d1 | | Pop_Control Pop_Count_1
16ff 4800 |H | Short_Literal 0x0
1700 e402 | | Load 0x2,0x2
1701 e002 | | Load 0x0,0x2
1702 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1703 6805 |h | Jump_Zero 0x1709
1704 4801 |H | Short_Literal 0x1
1705 e5ff | | Load 0x2,-0x1
1706 0217 | | Execute Heap_Access,All_Reference
1707 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1708 7806 |x | Jump 0x170f
1709 e402 | | Load 0x2,0x2
170a e5fe | | Load 0x2,-0x2
170b e00c | | Load 0x0,0xc
170c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
170d 00cc | | Action Pop_Block
170e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
170f 00d8 | | Load_Top At_Offset_0
1710 0092 17e7 | | Action Push_String_Extended,0x17e7 ; "<OPEN>"
1712 4801 |H | Short_Literal 0x1
1713 8409 | | Call 0x2,0x9
1714 4802 |H | Short_Literal 0x2
1715 e406 | | Load 0x2,0x6
1716 e011 | | Load 0x0,0x11
1717 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1718 6814 |h | Jump_Zero 0x172d
1719 e5ff | | Load 0x2,-0x1
171a 0219 | | Execute Heap_Access,All_Read
171b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
171c 00d8 | | Load_Top At_Offset_0
171d 0229 | ) | Execute Access,All_Read
171e e018 | | Load 0x0,0x18
171f 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1720 00d9 | | Load_Top At_Offset_1
1721 0228 | ( | Execute Access,All_Write
1722 00d1 | | Pop_Control Pop_Count_1
1723 e010 | | Load 0x0,0x10
1724 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1725 6032 |`2 | Indirect_Literal Discrete,0x1758,{0x00000000, 0x00004011}
1726 e002 | | Load 0x0,0x2
1727 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1728 e5fe | | Load 0x2,-0x2
1729 e00c | | Load 0x0,0xc
172a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
172b 00cc | | Action Pop_Block
172c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
172d 4801 |H | Short_Literal 0x1
172e e5ff | | Load 0x2,-0x1
172f 0217 | | Execute Heap_Access,All_Reference
1730 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1731 e5ff | | Load 0x2,-0x1
1732 0219 | | Execute Heap_Access,All_Read
1733 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1734 00d8 | | Load_Top At_Offset_0
1735 0229 | ) | Execute Access,All_Read
1736 4800 |H | Short_Literal 0x0
1737 e018 | | Load 0x0,0x18
1738 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1739 00d9 | | Load_Top At_Offset_1
173a 0228 | ( | Execute Access,All_Write
173b 00d1 | | Pop_Control Pop_Count_1
173c e5ff | | Load 0x2,-0x1
173d 0219 | | Execute Heap_Access,All_Read
173e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
173f 00d8 | | Load_Top At_Offset_0
1740 0229 | ) | Execute Access,All_Read
1741 e5fe | | Load 0x2,-0x2
1742 e01c | | Load 0x0,0x1c
1743 a01d | | Store_Unchecked 0x0,0x1d
1744 a01e | | Store_Unchecked 0x0,0x1e
1745 a01f | | Store_Unchecked 0x0,0x1f
1746 a020 | | Store_Unchecked 0x0,0x20
1747 a021 | ! | Store_Unchecked 0x0,0x21
1748 e022 | " | Load 0x0,0x22
1749 1815 | | Execute Package,Field_Execute,Field_Number 0x15
174a 00d9 | | Load_Top At_Offset_1
174b 0228 | ( | Execute Access,All_Write
174c 00d1 | | Pop_Control Pop_Count_1
174d e5ff | | Load 0x2,-0x1
174e 0219 | | Execute Heap_Access,All_Read
174f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1750 00d8 | | Load_Top At_Offset_0
1751 0229 | ) | Execute Access,All_Read
1752 e018 | | Load 0x0,0x18
1753 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1754 00d9 | | Load_Top At_Offset_1
1755 0228 | ( | Execute Access,All_Write
1756 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1757 0000 | | .XXX[0x1]
1758 0000 0000 | | .LITERAL {0x00000000, 0x00004011}
175c 0000 0000 | | .BLANK 0000[0x4]
1760 ; --------------------------------------------------------------------------------------
1760 ; SUBPROGRAM
1760 ; --------------------------------------------------------------------------------------
1760 1765 | e | .CONST 0x1765 ; Address of begin
1761 0004 | | .CONST 0x0004 ; Address of exception handler
1762 0002 | | .CONST 0x0002 ; Number of locals
1763 INIT_1760:
1763 e403 | | Load 0x2,0x3
1764 8408 | | Call 0x2,0x8
1765 BODY_1760:
1765 e5ff | | Load 0x2,-0x1
1766 0219 | | Execute Heap_Access,All_Read
1767 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1768 e402 | | Load 0x2,0x2
1769 00d9 | | Load_Top At_Offset_1
176a 0229 | ) | Execute Access,All_Read
176b e407 | | Load 0x2,0x7
176c 801b | | Call 0x0,0x1b
176d 00da | | Load_Top At_Offset_2
176e 0228 | ( | Execute Access,All_Write
176f c402 | | Store 0x2,0x2
1770 00d1 | | Pop_Control Pop_Count_1
1771 4800 |H | Short_Literal 0x0
1772 e402 | | Load 0x2,0x2
1773 e002 | | Load 0x0,0x2
1774 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1775 6805 |h | Jump_Zero 0x177b
1776 4801 |H | Short_Literal 0x1
1777 e5ff | | Load 0x2,-0x1
1778 0217 | | Execute Heap_Access,All_Reference
1779 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
177a 7806 |x | Jump 0x1781
177b e402 | | Load 0x2,0x2
177c e5fe | | Load 0x2,-0x2
177d e00c | | Load 0x0,0xc
177e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
177f 00cc | | Action Pop_Block
1780 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1781 e5ff | | Load 0x2,-0x1
1782 0219 | | Execute Heap_Access,All_Read
1783 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1784 00d8 | | Load_Top At_Offset_0
1785 0229 | ) | Execute Access,All_Read
1786 e5fe | | Load 0x2,-0x2
1787 e01c | | Load 0x0,0x1c
1788 a01d | | Store_Unchecked 0x0,0x1d
1789 a01e | | Store_Unchecked 0x0,0x1e
178a a01f | | Store_Unchecked 0x0,0x1f
178b a020 | | Store_Unchecked 0x0,0x20
178c a021 | ! | Store_Unchecked 0x0,0x21
178d e022 | " | Load 0x0,0x22
178e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
178f 00d9 | | Load_Top At_Offset_1
1790 0228 | ( | Execute Access,All_Write
1791 00d1 | | Pop_Control Pop_Count_1
1792 e5ff | | Load 0x2,-0x1
1793 0219 | | Execute Heap_Access,All_Read
1794 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1795 00d8 | | Load_Top At_Offset_0
1796 0229 | ) | Execute Access,All_Read
1797 4800 |H | Short_Literal 0x0
1798 e018 | | Load 0x0,0x18
1799 181b | | Execute Package,Field_Execute,Field_Number 0x1b
179a 00d9 | | Load_Top At_Offset_1
179b 0228 | ( | Execute Access,All_Write
179c 00d1 | | Pop_Control Pop_Count_1
179d 00d8 | | Load_Top At_Offset_0
179e 0092 17e7 | | Action Push_String_Extended,0x17e7 ; "<OPEN>"
17a0 4800 |H | Short_Literal 0x0
17a1 8409 | | Call 0x2,0x9
17a2 e5ff | | Load 0x2,-0x1
17a3 0219 | | Execute Heap_Access,All_Read
17a4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
17a5 00d8 | | Load_Top At_Offset_0
17a6 0229 | ) | Execute Access,All_Read
17a7 e018 | | Load 0x0,0x18
17a8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
17a9 00d9 | | Load_Top At_Offset_1
17aa 0228 | ( | Execute Access,All_Write
17ab 4501 |E | Exit_Suprogram New_Top_Offset 0x1
17ac 0000 0000 | | .BLANK 0000[0x4]
17b0 ; --------------------------------------------------------------------------------------
17b0 ; SUBPROGRAM
17b0 ; --------------------------------------------------------------------------------------
17b0 17bb | | .CONST 0x17bb ; Address of begin
17b1 0004 | | .CONST 0x0004 ; Address of exception handler
17b2 0002 | | .CONST 0x0002 ; Number of locals
17b3 INIT_17b0:
17b3 e5ff | | Load 0x2,-0x1
17b4 0217 | | Execute Heap_Access,All_Reference
17b5 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
17b6 0219 | | Execute Heap_Access,All_Read
17b7 e20f | | Load 0x1,0xf
17b8 0119 | | Execute Any,Check_In_Formal_Type
17b9 e5fe | | Load 0x2,-0x2
17ba 8211 | | Call 0x1,0x11
17bb BODY_17b0:
17bb 00d8 | | Load_Top At_Offset_0
17bc e002 | | Load 0x0,0x2
17bd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
17be 01df | | Execute Vector,Equal
17bf 6819 |h | Jump_Zero 0x17d9
17c0 e013 | | Load 0x0,0x13
17c1 180e | | Execute Package,Field_Execute,Field_Number 0xe
17c2 4801 |H | Short_Literal 0x1
17c3 4801 |H | Short_Literal 0x1
17c4 e010 | | Load 0x0,0x10
17c5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
17c6 035b | [ | Declare_Type Array,Constrained
17c7 0337 | 7 | Declare_Variable Array
17c8 e5fe | | Load 0x2,-0x2
17c9 e00c | | Load 0x0,0xc
17ca 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
17cb 4801 |H | Short_Literal 0x1
17cc 00da | | Load_Top At_Offset_2
17cd 01d6 | | Execute Vector,Field_Write
17ce 600d |` | Indirect_Literal Discrete,0x17dc,{0x00000000, 0x0000401e}
17cf e002 | | Load 0x0,0x2
17d0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
17d1 e010 | | Load 0x0,0x10
17d2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
17d3 6008 |` | Indirect_Literal Discrete,0x17dc,{0x00000000, 0x0000401e}
17d4 e002 | | Load 0x0,0x2
17d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
17d6 e5fe | | Load 0x2,-0x2
17d7 e00c | | Load 0x0,0xc
17d8 181f | | Execute Package,Field_Execute,Field_Number 0x1f
17d9 00d8 | | Load_Top At_Offset_0
17da 00cb | | Action Pop_Block_With_Result
17db 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
17dc 0000 0000 | | .LITERAL {0x00000000, 0x0000401e}
17e0 ; --------------------------------------------------------------------------------------
17e0 ; STRING TABLE
17e0 ; --------------------------------------------------------------------------------------
17e0 0012 | | .STRTAB 0x0012->0x17e9 ; "--/"
17e1 0013 | | .STRTAB 0x0013->0x17ea ; "!Machine.Temporary.Downloader_Temp_D"
17e2 0035 | 5 | .STRTAB 0x0035->0x17fc ; "$"
17e3 0034 | 4 | .STRTAB 0x0034->0x17fd ; "--/<error> "
17e4 003d | = | .STRTAB 0x003d->0x1802 ; "pragma End_Of_Input;"
17e5 004f | O | .STRTAB 0x004f->0x180c ; "<TEMP>"
17e6 0053 | S | .STRTAB 0x0053->0x180f ; "<SCRIPT_FILE>"
17e7 005e | ^ | .STRTAB 0x005e->0x1816 ; "<OPEN>"
17e8 0062 | b | .STREND 0x0062->0x1819
17e9 2d2d 2f21 |--/!| .STRTAB_STRINGS
1819 0000 0000 | | .BLANK 0000[0x7]
1820 ; --------------------------------------------------------------------------------------
1820 ; Debug Table
1820 ; --------------------------------------------------------------------------------------
1820 0004 000d | | .DEBUG4 0x0004,0x000d,0xd937,0x0000,0x0001,0x0000
1826 0000 4333 | C3| .XXX[0xb6]
1828 09ac 5c04 | \ |
182a 0800 04b8 | |
182c 259f f50a |% |
182e 03a8 34cc | 4 |
1830 09cf 5004 | P |
1832 0000 407f | @ |
1834 0001 bc13 | |
1836 0000 2cd3 | , |
1838 09ac 5c04 | \ |
183a 0000 043f | ?|
183c 0008 0086 | |
183e 0100 23a4 | # |
1840 09ac 5c04 | \ |
1842 0800 04b8 | |
1844 259f f50a |% |
1846 03a8 364e | 6N|
1848 09ac 5c04 | \ |
184a 0000 0144 | D|
184c 259f f50a |% |
184e 03a8 364e | 6N|
1850 09ac 5c04 | \ |
1852 0800 04b8 | |
1854 259f f50a |% |
1856 03a8 370f | 7 |
1858 09cf 5004 | P |
185a 0000 407f | @ |
185c 0001 bc13 | |
185e 0000 4e93 | N |
1860 09ac 5c04 | \ |
1862 0000 007f | |
1864 0001 bc13 | |
1866 0000 12c2 | |
1868 09ac 5c04 | \ |
186a 0000 043f | ?|
186c 0008 3058 | 0X|
186e 0100 23a4 | # |
1870 0001 0404 | |
1872 0000 0700 | |
1874 30db 290b |0 ) |
1876 0001 c47f | |
1878 09ac 5c04 | \ |
187a 0800 04b8 | |
187c 259f f50a |% |
187e 03a8 2d82 | - |
1880 09cf 5004 | P |
1882 0000 4616 | F |
1884 0001 bc13 | |
1886 0000 4333 | C3|
1888 003d 9804 | = |
188a 0000 007f | |
188c 0045 9c0e | E |
188e 0000 74c2 | t |
1890 003d 9804 | = |
1892 0000 043f | ?|
1894 0008 70d3 | p |
1896 0100 254c | %L|
1898 003d 9804 | = |
189a 0800 0400 | |
189c 8000 0000 | |
189e 0000 0000 | |
18a0 09cf 5004 | P |
18a2 0000 477f | G |
18a4 0001 bc13 | |
18a6 0000 2cd3 | , |
18a8 09ac 5c04 | \ |
18aa 0000 043f | ?|
18ac 0008 e086 | |
18ae 0100 23a4 | # |
18b0 003d 9804 | = |
18b2 0800 1f38 | 8|
18b4 2fa7 6d0a |/ m |
18b6 0000 2426 | $&|
18b8 09ac 5c04 | \ |
18ba 0000 0144 | D|
18bc 259f f50a |% |
18be 03a8 0357 | W|
18c0 0011 5804 | X |
18c2 0800 a94c | L|
18c4 09cf 5004 | P |
18c6 0100 24ba | $ |
18c8 09cf 5004 | P |
18ca 0000 477f | G |
18cc 0001 bc13 | |
18ce 0000 4733 | G3|
18d0 09ac 5c04 | \ |
18d2 0000 043f | ?|
18d4 0009 4086 | @ |
18d6 0100 23a4 | # |
18d8 09ac 5c04 | \ |
18da 0800 04b8 | |
18dc 0000 0000 | | .BLANK 0000[0x4]
18e0 09ac 5c04 | \ | .XXX[0x34]
18e2 0000 0144 | D|
18e4 259f f50a |% |
18e6 03a8 089e | |
18e8 09ac 5c04 | \ |
18ea 0800 04b8 | |
18ec 259f f50a |% |
18ee 03a8 0a20 | |
18f0 09cf 5004 | P |
18f2 0000 477f | G |
18f4 0001 bc13 | |
18f6 0000 4733 | G3|
18f8 09ac 5c04 | \ |
18fa 0000 043f | ?|
18fc 0009 9086 | |
18fe 0100 23a4 | # |
1900 09cf 5004 | P |
1902 0000 4d7f | M |
1904 0001 bc13 | |
1906 0000 2cd3 | , |
1908 09ac 5c04 | \ |
190a 0000 043f | ?|
190c 0009 a086 | |
190e 0100 23a4 | # |
1910 09ac 5c04 | \ |
1912 0800 04b8 | |
1914 0000 0000 | | .BLANK 0000[0x4]
1918 09ac 5c04 | \ | .XXX[0x24]
191a 0000 0144 | D|
191c 259f f50a |% |
191e 03a8 0357 | W|
1920 09ac 5c04 | \ |
1922 0800 04b8 | |
1924 259f f50a |% |
1926 03a8 089e | |
1928 09cf 5004 | P |
192a 0000 4d7f | M |
192c 0001 bc13 | |
192e 0000 4733 | G3|
1930 09ac 5c04 | \ |
1932 0000 043f | ?|
1934 000a 0086 | |
1936 0100 23a4 | # |
1938 09ac 5c04 | \ |
193a 0800 04b8 | |
193c 0000 0000 | | .BLANK 0000[0x4]
1940 09ac 5c04 | \ | .XXX[0x20]
1942 0000 0144 | D|
1944 259f f50a |% |
1946 03a8 089e | |
1948 09ac 5c04 | \ |
194a 0800 04b8 | |
194c 259f f50a |% |
194e 03a8 0a20 | |
1950 09cf 5004 | P |
1952 0000 4d7f | M |
1954 0001 bc13 | |
1956 0000 4733 | G3|
1958 09ac 5c04 | \ |
195a 0000 043f | ?|
195c 000a 5086 | P |
195e 0100 23a4 | # |
1960 0000 0000 | | .BLANK 0000[0x10]
1970 09ac 5c04 | \ | .XXX[0x8]
1972 0800 04b8 | |
1974 259f f50a |% |
1976 03a8 0ba2 | |
1978 0000 0000 | | .BLANK 0000[0x88]