|
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: 12288 (0x3000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 17c0 | | .CONST 0x17c0 ; 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 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
0017 c215 | | Store 0x1,0x15
0018 4806 |H | Short_Literal 0x6
0019 0093 133b | ;| push_full_address INIT_1338
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 0d4b | K| push_full_address INIT_0d48
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 088b | | push_full_address INIT_0888
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 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Unelaborated
0032 029b 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Unelaborated
0034 029b 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Unelaborated
0036 029b 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Unelaborated
0038 029d 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call
003a 029d 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call
003c 029d 032b | +| Declare_Subprogram INIT_0328,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 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call
0048 029d 03e3 | | Declare_Subprogram INIT_03e0,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 03fb | | Declare_Subprogram INIT_03f8,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 04a3 | | Declare_Subprogram INIT_04a0,For_Call
00ea 029f 04db | | Declare_Subprogram INIT_04d8,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 709f |p | Jump_Nonzero 0x190
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 682f |h/ | Jump_Zero 0x12e
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 7028 |p( | Jump_Nonzero 0x12e
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 e403 | | Load 0x2,0x3
0128 683b |h; | Jump_Zero 0x164
0129 e403 | | Load 0x2,0x3
012a e5f8 | | Load 0x2,-0x8
012b e001 | | Load 0x0,0x1
012c 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
012d 450a |E | Exit_Suprogram New_Top_Offset 0xa
012e e406 | | Load 0x2,0x6
012f 0f07 | | Execute_Immediate Equal,0x7
0130 6819 |h | Jump_Zero 0x14a
0131 4800 |H | Short_Literal 0x0
0132 a407 | | Store_Unchecked 0x2,0x7
0133 e403 | | Load 0x2,0x3
0134 00e1 | | Load_Encached Boolean_Cache
0135 e408 | | Load 0x2,0x8
0136 e5f9 | | Load 0x2,-0x7
0137 e5fa | | Load 0x2,-0x6
0138 0119 | | Execute Any,Check_In_Formal_Type
0139 85fb | | Call 0x2,-0x5
013a c405 | | Store 0x2,0x5
013b c403 | | Store 0x2,0x3
013c e405 | | Load 0x2,0x5
013d 6803 |h | Jump_Zero 0x141
013e 4801 |H | Short_Literal 0x1
013f a407 | | Store_Unchecked 0x2,0x7
0140 7823 |x# | Jump 0x164
0141 e403 | | Load 0x2,0x3
0142 6805 |h | Jump_Zero 0x148
0143 e403 | | Load 0x2,0x3
0144 e5f8 | | Load 0x2,-0x8
0145 e001 | | Load 0x0,0x1
0146 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0147 450a |E | Exit_Suprogram New_Top_Offset 0xa
0148 840a | | Call 0x2,0xa
0149 781a |x | Jump 0x164
014a e407 | | Load 0x2,0x7
014b 7018 |p | Jump_Nonzero 0x164
014c e406 | | Load 0x2,0x6
014d e216 | | Load 0x1,0x16
014e 0260 | ` | Execute Discrete,In_Type
014f 6814 |h | Jump_Zero 0x164
0150 e403 | | Load 0x2,0x3
0151 00e1 | | Load_Encached Boolean_Cache
0152 e408 | | Load 0x2,0x8
0153 e5f9 | | Load 0x2,-0x7
0154 e5fa | | Load 0x2,-0x6
0155 0119 | | Execute Any,Check_In_Formal_Type
0156 85fb | | Call 0x2,-0x5
0157 c405 | | Store 0x2,0x5
0158 c403 | | Store 0x2,0x3
0159 e405 | | Load 0x2,0x5
015a 6801 |h | Jump_Zero 0x15c
015b 7808 |x | Jump 0x164
015c e403 | | Load 0x2,0x3
015d 6805 |h | Jump_Zero 0x163
015e e403 | | Load 0x2,0x3
015f e5f8 | | Load 0x2,-0x8
0160 e001 | | Load 0x0,0x1
0161 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0162 450a |E | Exit_Suprogram New_Top_Offset 0xa
0163 840a | | Call 0x2,0xa
0164 e5f8 | | Load 0x2,-0x8
0165 e001 | | Load 0x0,0x1
0166 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0167 7001 |p | Jump_Nonzero 0x169
0168 450a |E | Exit_Suprogram New_Top_Offset 0xa
0169 e406 | | Load 0x2,0x6
016a 0f0a | | Execute_Immediate Equal,0xa
016b 681e |h | Jump_Zero 0x18a
016c 4801 |H | Short_Literal 0x1
016d e408 | | Load 0x2,0x8
016e e001 | | Load 0x0,0x1
016f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0170 e024 | $ | Load 0x0,0x24
0171 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0172 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0173 a404 | | Store_Unchecked 0x2,0x4
0174 e404 | | Load 0x2,0x4
0175 e024 | $ | Load 0x0,0x24
0176 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0177 180f | | Execute Package,Field_Execute,Field_Number 0xf
0178 7015 |p | Jump_Nonzero 0x18e
0179 e403 | | Load 0x2,0x3
017a e408 | | Load 0x2,0x8
017b e001 | | Load 0x0,0x1
017c 181c | | Execute Package,Field_Execute,Field_Number 0x1c
017d 4801 |H | Short_Literal 0x1
017e e404 | | Load 0x2,0x4
017f e024 | $ | Load 0x0,0x24
0180 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0181 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0182 c403 | | Store 0x2,0x3
0183 e403 | | Load 0x2,0x3
0184 6809 |h | Jump_Zero 0x18e
0185 e403 | | Load 0x2,0x3
0186 e5f8 | | Load 0x2,-0x8
0187 e001 | | Load 0x0,0x1
0188 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0189 450a |E | Exit_Suprogram New_Top_Offset 0xa
018a e406 | | Load 0x2,0x6
018b 0f0c | | Execute_Immediate Equal,0xc
018c 6801 |h | Jump_Zero 0x18e
018d 840b | | Call 0x2,0xb
018e 00c8 | | Action Pop_Auxiliary_Range
018f 3f61 |?a | Loop_Increasing 0xf1
0190 450a |E | Exit_Suprogram New_Top_Offset 0xa
0191 0000 0000 | | .BLANK 0000[0x7]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 020b | | .CONST 0x020b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0014 | | .CONST 0x0014 ; Number of locals
019b INIT_0198:
019b e5f9 | | Load 0x2,-0x7
019c e001 | | Load 0x0,0x1
019d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
019e e001 | | Load 0x0,0x1
019f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01a0 03f1 | | Declare_Variable Discrete,With_Value
01a1 e006 | | Load 0x0,0x6
01a2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01a4 e018 | | Load 0x0,0x18
01a5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01a6 02c7 | | Declare_Variable Any
01a7 00d8 | | Load_Top At_Offset_0
01a8 1c00 | | Execute_Immediate Run_Utility,0x0
01a9 e025 | % | Load 0x0,0x25
01aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ab 4801 |H | Short_Literal 0x1
01ac 4900 |I | Short_Literal 0x100
01ad 00e9 | | Load_Encached String_Cache
01ae 035b | [ | Declare_Type Array,Constrained
01af 0337 | 7 | Declare_Variable Array
01b0 e002 | | Load 0x0,0x2
01b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b2 02c7 | | Declare_Variable Any
01b3 00d8 | | Load_Top At_Offset_0
01b4 1c00 | | Execute_Immediate Run_Utility,0x0
01b5 00e3 | | Load_Encached Natural_Cache
01b6 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
01b7 00e3 | | Load_Encached Natural_Cache
01b8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01b9 029e 050b | | Declare_Subprogram INIT_0508,For_Call,Unelaborated
01bb 029e 051b | | Declare_Subprogram INIT_0518,For_Call,Unelaborated
01bd e026 | & | Load 0x0,0x26
01be e027 | ' | Load 0x0,0x27
01bf e5fa | | Load 0x2,-0x6
01c0 4ffb |O | Short_Literal -0x5
01c1 4802 |H | Short_Literal 0x2
01c2 0099 | | Action Reference_Dynamic
01c3 4ffc |O | Short_Literal -0x4
01c4 4802 |H | Short_Literal 0x2
01c5 0099 | | Action Reference_Dynamic
01c6 480a |H | Short_Literal 0xa
01c7 4802 |H | Short_Literal 0x2
01c8 0099 | | Action Reference_Dynamic
01c9 480b |H | Short_Literal 0xb
01ca 4802 |H | Short_Literal 0x2
01cb 0099 | | Action Reference_Dynamic
01cc 4ffe |O | Short_Literal -0x2
01cd 4802 |H | Short_Literal 0x2
01ce 0099 | | Action Reference_Dynamic
01cf 0092 1780 | | Action Push_String_Extended,0x1780 ; "--/"
01d1 e028 | ( | Load 0x0,0x28
01d2 0387 | | Declare_Variable Package
01d3 00d8 | | Load_Top At_Offset_0
01d4 020f | | Execute Module,Activate
01d5 00d8 | | Load_Top At_Offset_0
01d6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
01d7 02a0 | | Declare_Subprogram Null_Subprogram
01d8 4801 |H | Short_Literal 0x1
01d9 032d | - | Declare_Type Record,Defined
01da 029e 054b | K| Declare_Subprogram INIT_0548,For_Call,Unelaborated
01dc 029e 0553 | S| Declare_Subprogram INIT_0550,For_Call,Unelaborated
01de 029e 0563 | c| Declare_Subprogram INIT_0560,For_Call,Unelaborated
01e0 e029 | ) | Load 0x0,0x29
01e1 e02a | * | Load 0x0,0x2a
01e2 e40d | | Load 0x2,0xd
01e3 480e |H | Short_Literal 0xe
01e4 4802 |H | Short_Literal 0x2
01e5 0099 | | Action Reference_Dynamic
01e6 480f |H | Short_Literal 0xf
01e7 4802 |H | Short_Literal 0x2
01e8 0099 | | Action Reference_Dynamic
01e9 4810 |H | Short_Literal 0x10
01ea 4802 |H | Short_Literal 0x2
01eb 0099 | | Action Reference_Dynamic
01ec e025 | % | Load 0x0,0x25
01ed 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01ee 0387 | | Declare_Variable Package
01ef 00d8 | | Load_Top At_Offset_0
01f0 020f | | Execute Module,Activate
01f1 480a |H | Short_Literal 0xa
01f2 4802 |H | Short_Literal 0x2
01f3 0099 | | Action Reference_Dynamic
01f4 00c7 | | Action Elaborate_Subprogram
01f5 480b |H | Short_Literal 0xb
01f6 4802 |H | Short_Literal 0x2
01f7 0099 | | Action Reference_Dynamic
01f8 00c7 | | Action Elaborate_Subprogram
01f9 480e |H | Short_Literal 0xe
01fa 4802 |H | Short_Literal 0x2
01fb 0099 | | Action Reference_Dynamic
01fc 00c7 | | Action Elaborate_Subprogram
01fd 480f |H | Short_Literal 0xf
01fe 4802 |H | Short_Literal 0x2
01ff 0099 | | Action Reference_Dynamic
0200 00c7 | | Action Elaborate_Subprogram
0201 4810 |H | Short_Literal 0x10
0202 4802 |H | Short_Literal 0x2
0203 0099 | | Action Reference_Dynamic
0204 00c7 | | Action Elaborate_Subprogram
0205 029f 0573 | s| Declare_Subprogram INIT_0570,For_Call
0207 029f 05b3 | | Declare_Subprogram INIT_05b0,For_Call
0209 029f 06cb | | Declare_Subprogram INIT_06c8,For_Call
020b BODY_0198:
020b e402 | | Load 0x2,0x2
020c 0f0a | | Execute_Immediate Equal,0xa
020d 6815 |h | Jump_Zero 0x223
020e e407 | | Load 0x2,0x7
020f e017 | | Load 0x0,0x17
0210 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0211 e018 | | Load 0x0,0x18
0212 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0213 00ea | | Load_Encached Null_String_Cache
0214 4801 |H | Short_Literal 0x1
0215 e5f9 | | Load 0x2,-0x7
0216 e001 | | Load 0x0,0x1
0217 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0218 821c | | Call 0x1,0x1c
0219 4800 |H | Short_Literal 0x0
021a e002 | | Load 0x0,0x2
021b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
021c c407 | | Store 0x2,0x7
021d 8412 | | Call 0x2,0x12
021e e407 | | Load 0x2,0x7
021f e002 | | Load 0x0,0x2
0220 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0221 c407 | | Store 0x2,0x7
0222 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0223 e402 | | Load 0x2,0x2
0224 0f0b | | Execute_Immediate Equal,0xb
0225 6803 |h | Jump_Zero 0x229
0226 4801 |H | Short_Literal 0x1
0227 8413 | | Call 0x2,0x13
0228 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0229 e402 | | Load 0x2,0x2
022a 0f0c | | Execute_Immediate Equal,0xc
022b 6802 |h | Jump_Zero 0x22e
022c 8414 | | Call 0x2,0x14
022d 4508 |E | Exit_Suprogram New_Top_Offset 0x8
022e e402 | | Load 0x2,0x2
022f 0f0d | | Execute_Immediate Equal,0xd
0230 6802 |h | Jump_Zero 0x233
0231 4802 |H | Short_Literal 0x2
0232 8413 | | Call 0x2,0x13
0233 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0234 0000 0000 | | .BLANK 0000[0x4]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023e | > | .CONST 0x023e ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0002 | | .CONST 0x0002 ; Number of locals
023b INIT_0238:
023b 00da | | Load_Top At_Offset_2
023c e001 | | Load 0x0,0x1
023d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
023e BODY_0238:
023e 00db | | Load_Top At_Offset_3
023f e001 | | Load 0x0,0x1
0240 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0241 0f0a | | Execute_Immediate Equal,0xa
0242 680f |h | Jump_Zero 0x252
0243 00cf | | Action Mark_Auxiliary
0244 4802 |H | Short_Literal 0x2
0245 4801 |H | Short_Literal 0x1
0246 0007 | | Action Break_Optional
0247 00d8 | | Load_Top At_Offset_0
0248 e402 | | Load 0x2,0x2
0249 01d7 | | Execute Vector,Field_Read
024a 8219 | | Call 0x1,0x19
024b 6802 |h | Jump_Zero 0x24e
024c 00d8 | | Load_Top At_Offset_0
024d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
024e 00c8 | | Action Pop_Auxiliary_Range
024f 3ff7 |? | Loop_Increasing 0x247
0250 00ce | | Action Pop_Auxiliary
0251 7817 |x | Jump 0x269
0252 00cf | | Action Mark_Auxiliary
0253 00d9 | | Load_Top At_Offset_1
0254 01dc | | Execute Vector,Last
0255 4802 |H | Short_Literal 0x2
0256 0263 | c | Execute Discrete,Above_Bound
0257 7009 |p | Jump_Nonzero 0x261
0258 00d8 | | Load_Top At_Offset_0
0259 e402 | | Load 0x2,0x2
025a 01d7 | | Execute Vector,Field_Read
025b 8219 | | Call 0x1,0x19
025c 6802 |h | Jump_Zero 0x25f
025d 00d8 | | Load_Top At_Offset_0
025e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
025f 00c8 | | Action Pop_Auxiliary_Range
0260 3ff7 |? | Loop_Increasing 0x258
0261 00ce | | Action Pop_Auxiliary
0262 4801 |H | Short_Literal 0x1
0263 00d9 | | Load_Top At_Offset_1
0264 01d7 | | Execute Vector,Field_Read
0265 8219 | | Call 0x1,0x19
0266 6802 |h | Jump_Zero 0x269
0267 4801 |H | Short_Literal 0x1
0268 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0269 4800 |H | Short_Literal 0x0
026a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
026b 0000 0000 | | .BLANK 0000[0x5]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0276 | v | .CONST 0x0276 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0002 | | .CONST 0x0002 ; Number of locals
0273 INIT_0270:
0273 00da | | Load_Top At_Offset_2
0274 e001 | | Load 0x0,0x1
0275 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0276 BODY_0270:
0276 00db | | Load_Top At_Offset_3
0277 e001 | | Load 0x0,0x1
0278 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0279 0f0b | | Execute_Immediate Equal,0xb
027a 680f |h | Jump_Zero 0x28a
027b 00cf | | Action Mark_Auxiliary
027c 4801 |H | Short_Literal 0x1
027d 4802 |H | Short_Literal 0x2
027e 0007 | | Action Break_Optional
027f 00d8 | | Load_Top At_Offset_0
0280 e402 | | Load 0x2,0x2
0281 01d7 | | Execute Vector,Field_Read
0282 8219 | | Call 0x1,0x19
0283 6802 |h | Jump_Zero 0x286
0284 00d8 | | Load_Top At_Offset_0
0285 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0286 00c8 | | Action Pop_Auxiliary_Range
0287 37f7 |7 | Loop_Decreasing 0x27f
0288 00ce | | Action Pop_Auxiliary
0289 7817 |x | Jump 0x2a1
028a 4801 |H | Short_Literal 0x1
028b 00d9 | | Load_Top At_Offset_1
028c 01d7 | | Execute Vector,Field_Read
028d 8219 | | Call 0x1,0x19
028e 6802 |h | Jump_Zero 0x291
028f 4801 |H | Short_Literal 0x1
0290 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0291 00cf | | Action Mark_Auxiliary
0292 00d9 | | Load_Top At_Offset_1
0293 01dc | | Execute Vector,Last
0294 4802 |H | Short_Literal 0x2
0295 0263 | c | Execute Discrete,Above_Bound
0296 7009 |p | Jump_Nonzero 0x2a0
0297 00d8 | | Load_Top At_Offset_0
0298 e402 | | Load 0x2,0x2
0299 01d7 | | Execute Vector,Field_Read
029a 8219 | | Call 0x1,0x19
029b 6802 |h | Jump_Zero 0x29e
029c 00d8 | | Load_Top At_Offset_0
029d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
029e 00c8 | | Action Pop_Auxiliary_Range
029f 3ff7 |? | Loop_Increasing 0x297
02a0 00ce | | Action Pop_Auxiliary
02a1 4800 |H | Short_Literal 0x0
02a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02a3 0000 0000 | | .BLANK 0000[0x5]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab | | .CONST 0x02ab ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0001 | | .CONST 0x0001 ; Number of locals
02ab BODY_02a8:
02ab INIT_02a8:
02ab 00da | | Load_Top At_Offset_2
02ac e013 | | Load 0x0,0x13
02ad 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
02ae 0f0f | | Execute_Immediate Equal,0xf
02af 6808 |h | Jump_Zero 0x2b8
02b0 00da | | Load_Top At_Offset_2
02b1 e024 | $ | Load 0x0,0x24
02b2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02b3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02b4 e024 | $ | Load 0x0,0x24
02b5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02b6 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
02b7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02b8 4800 |H | Short_Literal 0x0
02b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02ba 0000 0000 | | .BLANK 0000[0x6]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3 | | .CONST 0x02c3 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0001 | | .CONST 0x0001 ; Number of locals
02c3 BODY_02c0:
02c3 INIT_02c0:
02c3 00da | | Load_Top At_Offset_2
02c4 e024 | $ | Load 0x0,0x24
02c5 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02c6 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02c7 e024 | $ | Load 0x0,0x24
02c8 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02c9 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
02ca 00db | | Load_Top At_Offset_3
02cb e024 | $ | Load 0x0,0x24
02cc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02cd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02ce 01cc | | Execute Vector,Catenate
02cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d7 | | .CONST 0x02d7 ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0003 | | .CONST 0x0003 ; Number of locals
02d3 INIT_02d0:
02d3 e024 | $ | Load 0x0,0x24
02d4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d6 00e3 | | Load_Encached Natural_Cache
02d7 BODY_02d0:
02d7 e5ff | | Load 0x2,-0x1
02d8 8217 | | Call 0x1,0x17
02d9 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02da 00d8 | | Load_Top At_Offset_0
02db 681d |h | Jump_Zero 0x2f9
02dc 00d8 | | Load_Top At_Offset_0
02dd e5ff | | Load 0x2,-0x1
02de e001 | | Load 0x0,0x1
02df 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02e0 e024 | $ | Load 0x0,0x24
02e1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02e2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02e3 0032 | 2 | Store_Top Heap_Access,At_Offset_2
02e4 00d9 | | Load_Top At_Offset_1
02e5 e024 | $ | Load 0x0,0x24
02e6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02e7 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02e8 e024 | $ | Load 0x0,0x24
02e9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02ea 187f | | Execute Package,Field_Execute,Field_Number 0x7f
02eb 6805 |h | Jump_Zero 0x2f1
02ec 00d9 | | Load_Top At_Offset_1
02ed e024 | $ | Load 0x0,0x24
02ee 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02ef 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
02f0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02f1 00d9 | | Load_Top At_Offset_1
02f2 e024 | $ | Load 0x0,0x24
02f3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02f4 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
02f5 e024 | $ | Load 0x0,0x24
02f6 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02f7 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
02f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02f9 00ea | | Load_Encached Null_String_Cache
02fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02fb 0000 0000 | | .BLANK 0000[0x5]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0306 | | .CONST 0x0306 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0002 | | .CONST 0x0002 ; Number of locals
0303 INIT_0300:
0303 e024 | $ | Load 0x0,0x24
0304 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0305 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0306 BODY_0300:
0306 00db | | Load_Top At_Offset_3
0307 e013 | | Load 0x0,0x13
0308 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0309 0b0f | | Execute_Immediate Case_Compare,0xf
030a 7004 |p | Jump_Nonzero 0x30f
030b 0f01 | | Execute_Immediate Equal,0x1
030c 7015 |p | Jump_Nonzero 0x322
030d e016 | | Load 0x0,0x16
030e 0257 | W | Execute Discrete,Raise
030f 00d1 | | Pop_Control Pop_Count_1
0310 00db | | Load_Top At_Offset_3
0311 e024 | $ | Load 0x0,0x24
0312 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0313 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0314 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0315 00d8 | | Load_Top At_Offset_0
0316 e024 | $ | Load 0x0,0x24
0317 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0318 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0319 6805 |h | Jump_Zero 0x31f
031a 00d8 | | Load_Top At_Offset_0
031b e024 | $ | Load 0x0,0x24
031c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
031d 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
031e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
031f 00d8 | | Load_Top At_Offset_0
0320 821a | | Call 0x1,0x1a
0321 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0322 00db | | Load_Top At_Offset_3
0323 e013 | | Load 0x0,0x13
0324 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0325 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0326 0000 0000 | | .XXX[0x2]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0335 | 5 | .CONST 0x0335 ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0004 | | .CONST 0x0004 ; Number of locals
032b INIT_0328:
032b e024 | $ | Load 0x0,0x24
032c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
032d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032e 00db | | Load_Top At_Offset_3
032f e001 | | Load 0x0,0x1
0330 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0331 e007 | | Load 0x0,0x7
0332 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0333 03f1 | | Declare_Variable Discrete,With_Value
0334 00e3 | | Load_Encached Natural_Cache
0335 BODY_0328:
0335 e5ff | | Load 0x2,-0x1
0336 8218 | | Call 0x1,0x18
0337 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0338 00d8 | | Load_Top At_Offset_0
0339 6820 |h | Jump_Zero 0x35a
033a 00d8 | | Load_Top At_Offset_0
033b e5ff | | Load 0x2,-0x1
033c e001 | | Load 0x0,0x1
033d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
033e e024 | $ | Load 0x0,0x24
033f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0340 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0341 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0342 00d9 | | Load_Top At_Offset_1
0343 00db | | Load_Top At_Offset_3
0344 e024 | $ | Load 0x0,0x24
0345 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0346 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0347 e024 | $ | Load 0x0,0x24
0348 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0349 1881 | | Execute Package,Field_Execute,Field_Number 0x81
034a 6806 |h | Jump_Zero 0x351
034b 00d9 | | Load_Top At_Offset_1
034c 00db | | Load_Top At_Offset_3
034d e024 | $ | Load 0x0,0x24
034e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
034f 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0350 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0351 00d9 | | Load_Top At_Offset_1
0352 00db | | Load_Top At_Offset_3
0353 e024 | $ | Load 0x0,0x24
0354 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0355 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0356 e024 | $ | Load 0x0,0x24
0357 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0358 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
0359 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
035a 00ea | | Load_Encached Null_String_Cache
035b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
035c 0000 0000 | | .BLANK 0000[0x4]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 036b | k | .CONST 0x036b ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0003 | | .CONST 0x0003 ; Number of locals
0363 INIT_0360:
0363 e018 | | Load 0x0,0x18
0364 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0365 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0366 e018 | | Load 0x0,0x18
0367 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0368 02c7 | | Declare_Variable Any
0369 00d8 | | Load_Top At_Offset_0
036a 1c00 | | Execute_Immediate Run_Utility,0x0
036b BODY_0360:
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 00d9 | | Load_Top At_Offset_1
036f 0120 | | Execute Any,Is_Value
0370 6803 |h | Jump_Zero 0x374
0371 e018 | | Load 0x0,0x18
0372 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0373 7801 |x | Jump 0x375
0374 00d9 | | Load_Top At_Offset_1
0375 6062 |`b | Indirect_Literal Discrete,0x3d8,{0x00000000, 0x00004000}
0376 e017 | | Load 0x0,0x17
0377 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0378 e02b | + | Load 0x0,0x2b
0379 1811 | | Execute Package,Field_Execute,Field_Number 0x11
037a e018 | | Load 0x0,0x18
037b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
037c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
037d e5ff | | Load 0x2,-0x1
037e e018 | | Load 0x0,0x18
037f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0380 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0381 c403 | | Store 0x2,0x3
0382 005a | Z | Store_Top Discrete,At_Offset_2
0383 00d9 | | Load_Top At_Offset_1
0384 460e |F | Jump_Case 0xf
0385 7827 |x' | Jump 0x3ad ; case 0x0
0386 780d |x | Jump 0x394 ; case 0x1
0387 780c |x | Jump 0x394 ; case 0x2
0388 783a |x: | Jump 0x3c3 ; case 0x3
0389 780a |x | Jump 0x394 ; case 0x4
038a 7809 |x | Jump 0x394 ; case 0x5
038b 7808 |x | Jump 0x394 ; case 0x6
038c 7807 |x | Jump 0x394 ; case 0x7
038d 7806 |x | Jump 0x394 ; case 0x8
038e 7805 |x | Jump 0x394 ; case 0x9
038f 7804 |x | Jump 0x394 ; case 0xa
0390 7803 |x | Jump 0x394 ; case 0xb
0391 7802 |x | Jump 0x394 ; case 0xc
0392 7801 |x | Jump 0x394 ; case 0xd
0393 7800 |x | Jump 0x394 ; case 0xe
0394 e006 | | Load 0x0,0x6
0395 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0396 4801 |H | Short_Literal 0x1
0397 4802 |H | Short_Literal 0x2
0398 e013 | | Load 0x0,0x13
0399 1b0f | | Execute Package,Field_Read,Field_Number 0xf
039a 0334 | 4 | Declare_Variable Array,With_Constraint
039b e5ff | | Load 0x2,-0x1
039c e013 | | Load 0x0,0x13
039d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
039e 4801 |H | Short_Literal 0x1
039f 00da | | Load_Top At_Offset_2
03a0 01d6 | | Execute Vector,Field_Write
03a1 e5ff | | Load 0x2,-0x1
03a2 e402 | | Load 0x2,0x2
03a3 e013 | | Load 0x0,0x13
03a4 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
03a5 4802 |H | Short_Literal 0x2
03a6 00da | | Load_Top At_Offset_2
03a7 01d6 | | Execute Vector,Field_Write
03a8 602b |`+ | Indirect_Literal Discrete,0x3d4,{0x00000000, 0x0000401a}
03a9 e006 | | Load 0x0,0x6
03aa 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
03ab c5fd | | Store 0x2,-0x3
03ac 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03ad e5fe | | Load 0x2,-0x2
03ae e002 | | Load 0x0,0x2
03af 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03b0 6806 |h | Jump_Zero 0x3b7
03b1 e5fe | | Load 0x2,-0x2
03b2 4801 |H | Short_Literal 0x1
03b3 e002 | | Load 0x0,0x2
03b4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03b5 c5fe | | Store 0x2,-0x2
03b6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03b7 e5fe | | Load 0x2,-0x2
03b8 e017 | | Load 0x0,0x17
03b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ba e018 | | Load 0x0,0x18
03bb 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03bc 00ea | | Load_Encached Null_String_Cache
03bd e5ff | | Load 0x2,-0x1
03be 4801 |H | Short_Literal 0x1
03bf e002 | | Load 0x0,0x2
03c0 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03c1 c5fe | | Store 0x2,-0x2
03c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03c3 e5fe | | Load 0x2,-0x2
03c4 e017 | | Load 0x0,0x17
03c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03c6 e018 | | Load 0x0,0x18
03c7 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
03c8 e018 | | Load 0x0,0x18
03c9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03ca 00ea | | Load_Encached Null_String_Cache
03cb e5ff | | Load 0x2,-0x1
03cc 4801 |H | Short_Literal 0x1
03cd e002 | | Load 0x0,0x2
03ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03cf c5fe | | Store 0x2,-0x2
03d0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03d1 0000 0000 | | .XXX[0x3]
03d3 0000 | |
03d4 0000 0000 | | .LITERAL {0x00000000, 0x0000401a}
03d8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
03dc 0000 0000 | | .BLANK 0000[0x4]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03eb | | .CONST 0x03eb ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0003 | | .CONST 0x0003 ; Number of locals
03e3 INIT_03e0:
03e3 0092 1781 | | Action Push_String_Extended,0x1781 ; "!Machine.Temporary.Downloader_Temp_D"
03e5 4800 |H | Short_Literal 0x0
03e6 4803 |H | Short_Literal 0x3
03e7 4804 |H | Short_Literal 0x4
03e8 e5ff | | Load 0x2,-0x1
03e9 e009 | | Load 0x0,0x9
03ea 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03eb BODY_03e0:
03eb 00d9 | | Load_Top At_Offset_1
03ec 00d9 | | Load_Top At_Offset_1
03ed 01cc | | Execute Vector,Catenate
03ee e5fe | | Load 0x2,-0x2
03ef 01cc | | Execute Vector,Catenate
03f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03f1 0000 0000 | | .BLANK 0000[0x7]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 040d | | .CONST 0x040d ; Address of begin
03f9 0488 | | .CONST 0x0488 ; Address of exception handler
03fa 0006 | | .CONST 0x0006 ; Number of locals
03fb INIT_03f8:
03fb e018 | | Load 0x0,0x18
03fc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03fd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03fe e018 | | Load 0x0,0x18
03ff 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0400 02c7 | | Declare_Variable Any
0401 00d8 | | Load_Top At_Offset_0
0402 1c00 | | Execute_Immediate Run_Utility,0x0
0403 e5ff | | Load 0x2,-0x1
0404 e018 | | Load 0x0,0x18
0405 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0406 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0407 e5ff | | Load 0x2,-0x1
0408 e018 | | Load 0x0,0x18
0409 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
040a 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
040b 029f 06f3 | | Declare_Subprogram INIT_06f0,For_Call
040d BODY_03f8:
040d 00da | | Load_Top At_Offset_2
040e 01db | | Execute Vector,Length
040f 702b |p+ | Jump_Nonzero 0x43b
0410 e018 | | Load 0x0,0x18
0411 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0412 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0413 e403 | | Load 0x2,0x3
0414 0120 | | Execute Any,Is_Value
0415 6803 |h | Jump_Zero 0x419
0416 e018 | | Load 0x0,0x18
0417 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0418 7801 |x | Jump 0x41a
0419 e403 | | Load 0x2,0x3
041a 6081 |` | Indirect_Literal Discrete,0x49c,{0x00000000, 0x00004000}
041b e017 | | Load 0x0,0x17
041c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
041d e02b | + | Load 0x0,0x2b
041e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
041f e018 | | Load 0x0,0x18
0420 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0421 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0422 0092 1782 | | Action Push_String_Extended,0x1782 ; "$"
0424 e018 | | Load 0x0,0x18
0425 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0426 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0427 c403 | | Store 0x2,0x3
0428 c402 | | Store 0x2,0x2
0429 4801 |H | Short_Literal 0x1
042a 4801 |H | Short_Literal 0x1
042b e013 | | Load 0x0,0x13
042c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
042d 0334 | 4 | Declare_Variable Array,With_Constraint
042e e5ff | | Load 0x2,-0x1
042f e013 | | Load 0x0,0x13
0430 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0431 4801 |H | Short_Literal 0x1
0432 00da | | Load_Top At_Offset_2
0433 01d6 | | Execute Vector,Field_Write
0434 0092 1782 | | Action Push_String_Extended,0x1782 ; "$"
0436 6061 |`a | Indirect_Literal Discrete,0x498,{0x00000000, 0x00004009}
0437 e402 | | Load 0x2,0x2
0438 e006 | | Load 0x0,0x6
0439 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
043a 7828 |x( | Jump 0x463
043b e018 | | Load 0x0,0x18
043c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
043d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
043e e403 | | Load 0x2,0x3
043f 0120 | | Execute Any,Is_Value
0440 6803 |h | Jump_Zero 0x444
0441 e018 | | Load 0x0,0x18
0442 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0443 7801 |x | Jump 0x445
0444 e403 | | Load 0x2,0x3
0445 6056 |`V | Indirect_Literal Discrete,0x49c,{0x00000000, 0x00004000}
0446 e017 | | Load 0x0,0x17
0447 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0448 e02b | + | Load 0x0,0x2b
0449 1811 | | Execute Package,Field_Execute,Field_Number 0x11
044a e018 | | Load 0x0,0x18
044b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
044c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
044d e404 | | Load 0x2,0x4
044e e018 | | Load 0x0,0x18
044f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0450 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0451 c403 | | Store 0x2,0x3
0452 c402 | | Store 0x2,0x2
0453 4801 |H | Short_Literal 0x1
0454 4801 |H | Short_Literal 0x1
0455 e013 | | Load 0x0,0x13
0456 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0457 0334 | 4 | Declare_Variable Array,With_Constraint
0458 e5ff | | Load 0x2,-0x1
0459 e013 | | Load 0x0,0x13
045a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
045b 4801 |H | Short_Literal 0x1
045c 00da | | Load_Top At_Offset_2
045d 01d6 | | Execute Vector,Field_Write
045e 00db | | Load_Top At_Offset_3
045f 6038 |`8 | Indirect_Literal Discrete,0x498,{0x00000000, 0x00004009}
0460 e402 | | Load 0x2,0x2
0461 e006 | | Load 0x0,0x6
0462 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
0463 e5fe | | Load 0x2,-0x2
0464 e018 | | Load 0x0,0x18
0465 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0466 027f | | Execute Discrete,Equal
0467 701e |p | Jump_Nonzero 0x486
0468 00db | | Load_Top At_Offset_3
0469 e018 | | Load 0x0,0x18
046a 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
046b e5fe | | Load 0x2,-0x2
046c 027f | | Execute Discrete,Equal
046d 7018 |p | Jump_Nonzero 0x486
046e e015 | | Load 0x0,0x15
046f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0470 4801 |H | Short_Literal 0x1
0471 4802 |H | Short_Literal 0x2
0472 e013 | | Load 0x0,0x13
0473 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0474 0334 | 4 | Declare_Variable Array,With_Constraint
0475 e5ff | | Load 0x2,-0x1
0476 e013 | | Load 0x0,0x13
0477 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0478 4801 |H | Short_Literal 0x1
0479 00da | | Load_Top At_Offset_2
047a 01d6 | | Execute Vector,Field_Write
047b e5fe | | Load 0x2,-0x2
047c e013 | | Load 0x0,0x13
047d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
047e 4802 |H | Short_Literal 0x2
047f 00da | | Load_Top At_Offset_2
0480 01d6 | | Execute Vector,Field_Write
0481 6012 |` | Indirect_Literal Discrete,0x494,{0x00000000, 0x00004004}
0482 e006 | | Load 0x0,0x6
0483 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0484 e01d | | Load 0x0,0x1d
0485 0257 | W | Execute Discrete,Raise
0486 8406 | | Call 0x2,0x6
0487 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0488 TRAP_03f8:
0488 e006 | | Load 0x0,0x6
0489 1b17 | | Execute Package,Field_Read,Field_Number 0x17
048a 010f | | Execute Exception,Equal
048b 6804 |h | Jump_Zero 0x490
048c e006 | | Load 0x0,0x6
048d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
048e a5fc | | Store_Unchecked 0x2,-0x4
048f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0490 0100 | | Execute Exception,Raise
0491 0000 0000 | | .XXX[0x3]
0493 0000 | |
0494 0000 0000 | | .LITERAL {0x00000000, 0x00004004}
0498 0000 0000 | | .LITERAL {0x00000000, 0x00004009}
049c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3 | | .CONST 0x04a3 ; Address of begin
04a1 0004 | | .CONST 0x0004 ; Address of exception handler
04a2 0001 | | .CONST 0x0001 ; Number of locals
04a3 BODY_04a0:
04a3 INIT_04a0:
04a3 e408 | | Load 0x2,0x8
04a4 e001 | | Load 0x0,0x1
04a5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04a6 a406 | | Store_Unchecked 0x2,0x6
04a7 e406 | | Load 0x2,0x6
04a8 e216 | | Load 0x1,0x16
04a9 0260 | ` | Execute Discrete,In_Type
04aa 7003 |p | Jump_Nonzero 0x4ae
04ab e406 | | Load 0x2,0x6
04ac 0f07 | | Execute_Immediate Equal,0x7
04ad 6822 |h" | Jump_Zero 0x4d0
04ae e406 | | Load 0x2,0x6
04af 0f07 | | Execute_Immediate Equal,0x7
04b0 6806 |h | Jump_Zero 0x4b7
04b1 e408 | | Load 0x2,0x8
04b2 e5f9 | | Load 0x2,-0x7
04b3 e5fa | | Load 0x2,-0x6
04b4 0119 | | Execute Any,Check_In_Formal_Type
04b5 85fc | | Call 0x2,-0x4
04b6 7806 |x | Jump 0x4bd
04b7 e5f7 | | Load 0x2,-0x9
04b8 e408 | | Load 0x2,0x8
04b9 e5f9 | | Load 0x2,-0x7
04ba e5fa | | Load 0x2,-0x6
04bb 0119 | | Execute Any,Check_In_Formal_Type
04bc 85fd | | Call 0x2,-0x3
04bd e408 | | Load 0x2,0x8
04be e001 | | Load 0x0,0x1
04bf 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04c0 a403 | | Store_Unchecked 0x2,0x3
04c1 e403 | | Load 0x2,0x3
04c2 7007 |p | Jump_Nonzero 0x4ca
04c3 e403 | | Load 0x2,0x3
04c4 e408 | | Load 0x2,0x8
04c5 e5f9 | | Load 0x2,-0x7
04c6 e5fa | | Load 0x2,-0x6
04c7 0119 | | Execute Any,Check_In_Formal_Type
04c8 85fe | | Call 0x2,-0x2
04c9 c403 | | Store 0x2,0x3
04ca e403 | | Load 0x2,0x3
04cb 6804 |h | Jump_Zero 0x4d0
04cc e403 | | Load 0x2,0x3
04cd e5f8 | | Load 0x2,-0x8
04ce e001 | | Load 0x0,0x1
04cf 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
04d0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04d1 0000 0000 | | .BLANK 0000[0x7]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04de | | .CONST 0x04de ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0002 | | .CONST 0x0002 ; Number of locals
04db INIT_04d8:
04db e408 | | Load 0x2,0x8
04dc e001 | | Load 0x0,0x1
04dd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04de BODY_04d8:
04de 00cf | | Action Mark_Auxiliary
04df 00d9 | | Load_Top At_Offset_1
04e0 01dc | | Execute Vector,Last
04e1 4802 |H | Short_Literal 0x2
04e2 0263 | c | Execute Discrete,Above_Bound
04e3 7020 |p | Jump_Nonzero 0x504
04e4 00d8 | | Load_Top At_Offset_0
04e5 e602 | | Load 0x3,0x2
04e6 01d7 | | Execute Vector,Field_Read
04e7 e024 | $ | Load 0x0,0x24
04e8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04e9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04ea a404 | | Store_Unchecked 0x2,0x4
04eb e404 | | Load 0x2,0x4
04ec e024 | $ | Load 0x0,0x24
04ed 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04ee 180f | | Execute Package,Field_Execute,Field_Number 0xf
04ef 7012 |p | Jump_Nonzero 0x502
04f0 e403 | | Load 0x2,0x3
04f1 e408 | | Load 0x2,0x8
04f2 e001 | | Load 0x0,0x1
04f3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04f4 4801 |H | Short_Literal 0x1
04f5 e404 | | Load 0x2,0x4
04f6 e024 | $ | Load 0x0,0x24
04f7 1b14 | | Execute Package,Field_Read,Field_Number 0x14
04f8 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
04f9 c403 | | Store 0x2,0x3
04fa e403 | | Load 0x2,0x3
04fb 6806 |h | Jump_Zero 0x502
04fc e403 | | Load 0x2,0x3
04fd e5f8 | | Load 0x2,-0x8
04fe e001 | | Load 0x0,0x1
04ff 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0500 00cc | | Action Pop_Block
0501 450a |E | Exit_Suprogram New_Top_Offset 0xa
0502 00c8 | | Action Pop_Auxiliary_Range
0503 3fe0 |? | Loop_Increasing 0x4e4
0504 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0505 0000 0000 | | .XXX[0x3]
0507 0000 | |
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b | | .CONST 0x050b ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0001 | | .CONST 0x0001 ; Number of locals
050b BODY_0508:
050b INIT_0508:
050b e408 | | Load 0x2,0x8
050c e409 | | Load 0x2,0x9
050d 027d | } | Execute Discrete,Greater
050e 6805 |h | Jump_Zero 0x514
050f 00da | | Load_Top At_Offset_2
0510 e5fa | | Load 0x2,-0x6
0511 0119 | | Execute Any,Check_In_Formal_Type
0512 85fd | | Call 0x2,-0x3
0513 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0514 4800 |H | Short_Literal 0x0
0515 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0516 0000 0000 | | .XXX[0x2]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b | | .CONST 0x051b ; Address of begin
0519 0004 | | .CONST 0x0004 ; Address of exception handler
051a 0001 | | .CONST 0x0001 ; Number of locals
051b BODY_0518:
051b INIT_0518:
051b e402 | | Load 0x2,0x2
051c 0f0a | | Execute_Immediate Equal,0xa
051d 7003 |p | Jump_Nonzero 0x521
051e e402 | | Load 0x2,0x2
051f 0f0c | | Execute_Immediate Equal,0xc
0520 6808 |h | Jump_Zero 0x529
0521 0092 1783 | | Action Push_String_Extended,0x1783 ; "--/<error> "
0523 e7fe | | Load 0x3,-0x2
0524 01cc | | Execute Vector,Catenate
0525 00db | | Load_Top At_Offset_3
0526 e5fa | | Load 0x2,-0x6
0527 0119 | | Execute Any,Check_In_Formal_Type
0528 85fc | | Call 0x2,-0x4
0529 e006 | | Load 0x0,0x6
052a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
052b 4801 |H | Short_Literal 0x1
052c 4802 |H | Short_Literal 0x2
052d e013 | | Load 0x0,0x13
052e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
052f 0334 | 4 | Declare_Variable Array,With_Constraint
0530 e7fe | | Load 0x3,-0x2
0531 e013 | | Load 0x0,0x13
0532 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0533 4801 |H | Short_Literal 0x1
0534 00da | | Load_Top At_Offset_2
0535 01d6 | | Execute Vector,Field_Write
0536 e7fd | | Load 0x3,-0x3
0537 e013 | | Load 0x0,0x13
0538 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0539 4802 |H | Short_Literal 0x2
053a 00da | | Load_Top At_Offset_2
053b 01d6 | | Execute Vector,Field_Write
053c 6007 |` | Indirect_Literal Discrete,0x544,{0x00000000, 0x00004010}
053d e006 | | Load 0x0,0x6
053e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
053f c403 | | Store 0x2,0x3
0540 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0541 0000 0000 | | .XXX[0x3]
0543 0000 | |
0544 0000 0000 | | .LITERAL {0x00000000, 0x00004010}
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b | K | .CONST 0x054b ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0001 | | .CONST 0x0001 ; Number of locals
054b BODY_0548:
054b INIT_0548:
054b 00da | | Load_Top At_Offset_2
054c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
054d e40c | | Load 0x2,0xc
054e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
054f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 00e1 | | Load_Encached Boolean_Cache
0554 00e2 | | Load_Encached Integer_Cache
0555 e7fe | | Load 0x3,-0x2
0556 e7ff | | Load 0x3,-0x1
0557 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0558 e40c | | Load 0x2,0xc
0559 181a | | Execute Package,Field_Execute,Field_Number 0x1a
055a 00d1 | | Pop_Control Pop_Count_1
055b c7fd | | Store 0x3,-0x3
055c c7fc | | Store 0x3,-0x4
055d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
055e 0000 0000 | | .XXX[0x2]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563 | c | .CONST 0x0563 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0001 | | .CONST 0x0001 ; Number of locals
0563 BODY_0560:
0563 INIT_0560:
0563 00da | | Load_Top At_Offset_2
0564 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0565 4800 |H | Short_Literal 0x0
0566 e40c | | Load 0x2,0xc
0567 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0568 00db | | Load_Top At_Offset_3
0569 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
056a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
056b 0000 0000 | | .BLANK 0000[0x5]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0579 | y | .CONST 0x0579 ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0004 | | .CONST 0x0004 ; Number of locals
0573 INIT_0570:
0573 e40c | | Load 0x2,0xc
0574 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0575 029f 0793 | | Declare_Subprogram INIT_0790,For_Call
0577 029f 07a3 | | Declare_Subprogram INIT_07a0,For_Call
0579 BODY_0570:
0579 e40c | | Load 0x2,0xc
057a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
057b e5f9 | | Load 0x2,-0x7
057c 821d | | Call 0x1,0x1d
057d e5f8 | | Load 0x2,-0x8
057e e5fa | | Load 0x2,-0x6
057f 0119 | | Execute Any,Check_In_Formal_Type
0580 e40c | | Load 0x2,0xc
0581 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0582 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0583 00cf | | Action Mark_Auxiliary
0584 780d |x | Jump 0x592
0585 e407 | | Load 0x2,0x7
0586 8604 | | Call 0x3,0x4
0587 e602 | | Load 0x3,0x2
0588 e40c | | Load 0x2,0xc
0589 181b | | Execute Package,Field_Execute,Field_Number 0x1b
058a e403 | | Load 0x2,0x3
058b 6805 |h | Jump_Zero 0x591
058c e403 | | Load 0x2,0x3
058d e5f9 | | Load 0x2,-0x7
058e e001 | | Load 0x0,0x1
058f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0590 7804 |x | Jump 0x595
0591 00c9 | | Action Pop_Auxiliary_Loop
0592 e407 | | Load 0x2,0x7
0593 8603 | | Call 0x3,0x3
0594 6ff0 |o | Jump_Zero 0x585
0595 00ce | | Action Pop_Auxiliary
0596 0092 1784 | | Action Push_String_Extended,0x1784 ; "pragma End_Of_Input;"
0598 00db | | Load_Top At_Offset_3
0599 e40c | | Load 0x2,0xc
059a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
059b e5f8 | | Load 0x2,-0x8
059c 0120 | | Execute Any,Is_Value
059d 6803 |h | Jump_Zero 0x5a1
059e e40c | | Load 0x2,0xc
059f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05a0 7803 |x | Jump 0x5a4
05a1 e5f8 | | Load 0x2,-0x8
05a2 e5fa | | Load 0x2,-0x6
05a3 0119 | | Execute Any,Check_In_Formal_Type
05a4 00db | | Load_Top At_Offset_3
05a5 e40c | | Load 0x2,0xc
05a6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05a7 c602 | | Store 0x3,0x2
05a8 c5f8 | | Store 0x2,-0x8
05a9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05aa 0000 0000 | | .BLANK 0000[0x6]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05cf | | .CONST 0x05cf ; Address of begin
05b1 0004 | | .CONST 0x0004 ; Address of exception handler
05b2 000a | | .CONST 0x000a ; Number of locals
05b3 INIT_05b0:
05b3 e013 | | Load 0x0,0x13
05b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b5 00db | | Load_Top At_Offset_3
05b6 e5f9 | | Load 0x2,-0x7
05b7 e001 | | Load 0x0,0x1
05b8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05b9 0031 | 1 | Store_Top Heap_Access,At_Offset_1
05ba 00d8 | | Load_Top At_Offset_0
05bb 821c | | Call 0x1,0x1c
05bc e024 | $ | Load 0x0,0x24
05bd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05bf e40d | | Load 0x2,0xd
05c0 0322 | " | Declare_Variable Record
05c1 00e1 | | Load_Encached Boolean_Cache
05c2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
05c3 e018 | | Load 0x0,0x18
05c4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05c5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05c6 e018 | | Load 0x0,0x18
05c7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05c8 02c7 | | Declare_Variable Any
05c9 00d8 | | Load_Top At_Offset_0
05ca 1c00 | | Execute_Immediate Run_Utility,0x0
05cb 029f 07eb | | Declare_Subprogram INIT_07e8,For_Call
05cd 029f 0863 | c| Declare_Subprogram INIT_0860,For_Call
05cf BODY_05b0:
05cf e603 | | Load 0x3,0x3
05d0 01db | | Execute Vector,Length
05d1 686b |hk | Jump_Zero 0x63d
05d2 e018 | | Load 0x0,0x18
05d3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05d5 00db | | Load_Top At_Offset_3
05d6 0120 | | Execute Any,Is_Value
05d7 6803 |h | Jump_Zero 0x5db
05d8 e018 | | Load 0x0,0x18
05d9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05da 7801 |x | Jump 0x5dc
05db 00db | | Load_Top At_Offset_3
05dc 60e3 |` | Indirect_Literal Discrete,0x6c0,{0x00000000, 0x00004000}
05dd e017 | | Load 0x0,0x17
05de 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05df e02b | + | Load 0x0,0x2b
05e0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05e1 e018 | | Load 0x0,0x18
05e2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05e3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05e4 e603 | | Load 0x3,0x3
05e5 e018 | | Load 0x0,0x18
05e6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05e7 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
05e8 c608 | | Store 0x3,0x8
05e9 c607 | | Store 0x3,0x7
05ea 00db | | Load_Top At_Offset_3
05eb 460e |F | Jump_Case 0xf
05ec 7827 |x' | Jump 0x614 ; case 0x0
05ed 780d |x | Jump 0x5fb ; case 0x1
05ee 780c |x | Jump 0x5fb ; case 0x2
05ef 7840 |x@ | Jump 0x630 ; case 0x3
05f0 780a |x | Jump 0x5fb ; case 0x4
05f1 7809 |x | Jump 0x5fb ; case 0x5
05f2 7808 |x | Jump 0x5fb ; case 0x6
05f3 7807 |x | Jump 0x5fb ; case 0x7
05f4 7806 |x | Jump 0x5fb ; case 0x8
05f5 7805 |x | Jump 0x5fb ; case 0x9
05f6 7804 |x | Jump 0x5fb ; case 0xa
05f7 7803 |x | Jump 0x5fb ; case 0xb
05f8 7802 |x | Jump 0x5fb ; case 0xc
05f9 7801 |x | Jump 0x5fb ; case 0xd
05fa 7800 |x | Jump 0x5fb ; case 0xe
05fb e006 | | Load 0x0,0x6
05fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05fd 4801 |H | Short_Literal 0x1
05fe 4802 |H | Short_Literal 0x2
05ff e013 | | Load 0x0,0x13
0600 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0601 0334 | 4 | Declare_Variable Array,With_Constraint
0602 e603 | | Load 0x3,0x3
0603 e013 | | Load 0x0,0x13
0604 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0605 4801 |H | Short_Literal 0x1
0606 00da | | Load_Top At_Offset_2
0607 01d6 | | Execute Vector,Field_Write
0608 e603 | | Load 0x3,0x3
0609 e607 | | Load 0x3,0x7
060a e013 | | Load 0x0,0x13
060b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
060c 4802 |H | Short_Literal 0x2
060d 00da | | Load_Top At_Offset_2
060e 01d6 | | Execute Vector,Field_Write
060f 60ac |` | Indirect_Literal Discrete,0x6bc,{0x00000000, 0x0000401a}
0610 e006 | | Load 0x0,0x6
0611 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0612 c403 | | Store 0x2,0x3
0613 7829 |x) | Jump 0x63d
0614 00da | | Load_Top At_Offset_2
0615 e018 | | Load 0x0,0x18
0616 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0617 e018 | | Load 0x0,0x18
0618 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0619 1814 | | Execute Package,Field_Execute,Field_Number 0x14
061a 012f | / | Execute Any,Equal
061b a606 | | Store_Unchecked 0x3,0x6
061c e606 | | Load 0x3,0x6
061d 701f |p | Jump_Nonzero 0x63d
061e e006 | | Load 0x0,0x6
061f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0620 4801 |H | Short_Literal 0x1
0621 4801 |H | Short_Literal 0x1
0622 e013 | | Load 0x0,0x13
0623 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0624 0334 | 4 | Declare_Variable Array,With_Constraint
0625 e603 | | Load 0x3,0x3
0626 e013 | | Load 0x0,0x13
0627 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0628 4801 |H | Short_Literal 0x1
0629 00da | | Load_Top At_Offset_2
062a 01d6 | | Execute Vector,Field_Write
062b 608c |` | Indirect_Literal Discrete,0x6b8,{0x00000000, 0x0000401d}
062c e006 | | Load 0x0,0x6
062d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
062e c403 | | Store 0x2,0x3
062f 780d |x | Jump 0x63d
0630 e407 | | Load 0x2,0x7
0631 e017 | | Load 0x0,0x17
0632 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0633 e018 | | Load 0x0,0x18
0634 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0635 e018 | | Load 0x0,0x18
0636 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0637 00ea | | Load_Encached Null_String_Cache
0638 e603 | | Load 0x3,0x3
0639 4801 |H | Short_Literal 0x1
063a e002 | | Load 0x0,0x2
063b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
063c c407 | | Store 0x2,0x7
063d e40c | | Load 0x2,0xc
063e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
063f e5f9 | | Load 0x2,-0x7
0640 821b | | Call 0x1,0x1b
0641 e5f8 | | Load 0x2,-0x8
0642 e5fa | | Load 0x2,-0x6
0643 0119 | | Execute Any,Check_In_Formal_Type
0644 e40c | | Load 0x2,0xc
0645 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0646 e605 | | Load 0x3,0x5
0647 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0648 e606 | | Load 0x3,0x6
0649 7003 |p | Jump_Nonzero 0x64d
064a e603 | | Load 0x3,0x3
064b 01db | | Execute Vector,Length
064c 7028 |p( | Jump_Nonzero 0x675
064d e606 | | Load 0x3,0x6
064e 7015 |p | Jump_Nonzero 0x664
064f e7ff | | Load 0x3,-0x1
0650 0f01 | | Execute_Immediate Equal,0x1
0651 6809 |h | Jump_Zero 0x65b
0652 4802 |H | Short_Literal 0x2
0653 e5f9 | | Load 0x2,-0x7
0654 e001 | | Load 0x0,0x1
0655 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0656 e024 | $ | Load 0x0,0x24
0657 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0658 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0659 a604 | | Store_Unchecked 0x3,0x4
065a 780e |x | Jump 0x669
065b 4801 |H | Short_Literal 0x1
065c e5f9 | | Load 0x2,-0x7
065d e001 | | Load 0x0,0x1
065e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
065f e024 | $ | Load 0x0,0x24
0660 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0661 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0662 a604 | | Store_Unchecked 0x3,0x4
0663 7805 |x | Jump 0x669
0664 e602 | | Load 0x3,0x2
0665 e024 | $ | Load 0x0,0x24
0666 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0667 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0668 a604 | | Store_Unchecked 0x3,0x4
0669 e604 | | Load 0x3,0x4
066a e024 | $ | Load 0x0,0x24
066b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
066c 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
066d 6805 |h | Jump_Zero 0x673
066e e604 | | Load 0x3,0x4
066f e024 | $ | Load 0x0,0x24
0670 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0671 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0672 a604 | | Store_Unchecked 0x3,0x4
0673 8609 | | Call 0x3,0x9
0674 782b |x+ | Jump 0x6a0
0675 e402 | | Load 0x2,0x2
0676 0f0b | | Execute_Immediate Equal,0xb
0677 6817 |h | Jump_Zero 0x68f
0678 e605 | | Load 0x3,0x5
0679 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
067a e40c | | Load 0x2,0xc
067b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
067c 7007 |p | Jump_Nonzero 0x684
067d e403 | | Load 0x2,0x3
067e 7005 |p | Jump_Nonzero 0x684
067f 00cf | | Action Mark_Auxiliary
0680 860a | | Call 0x3,0xa
0681 00c9 | | Action Pop_Auxiliary_Loop
0682 7ffd | | Jump 0x680
0683 00ce | | Action Pop_Auxiliary
0684 e403 | | Load 0x2,0x3
0685 6804 |h | Jump_Zero 0x68a
0686 e403 | | Load 0x2,0x3
0687 e5f9 | | Load 0x2,-0x7
0688 e001 | | Load 0x0,0x1
0689 181f | | Execute Package,Field_Execute,Field_Number 0x1f
068a e407 | | Load 0x2,0x7
068b e002 | | Load 0x0,0x2
068c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
068d c407 | | Store 0x2,0x7
068e 7811 |x | Jump 0x6a0
068f e006 | | Load 0x0,0x6
0690 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0691 4801 |H | Short_Literal 0x1
0692 4801 |H | Short_Literal 0x1
0693 e013 | | Load 0x0,0x13
0694 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0695 0334 | 4 | Declare_Variable Array,With_Constraint
0696 e5f9 | | Load 0x2,-0x7
0697 e001 | | Load 0x0,0x1
0698 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0699 4801 |H | Short_Literal 0x1
069a 00da | | Load_Top At_Offset_2
069b 01d6 | | Execute Vector,Field_Write
069c 6017 |` | Indirect_Literal Discrete,0x6b4,{0x00000000, 0x0000401b}
069d e006 | | Load 0x0,0x6
069e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
069f c403 | | Store 0x2,0x3
06a0 e5f8 | | Load 0x2,-0x8
06a1 0120 | | Execute Any,Is_Value
06a2 6803 |h | Jump_Zero 0x6a6
06a3 e40c | | Load 0x2,0xc
06a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06a5 7803 |x | Jump 0x6a9
06a6 e5f8 | | Load 0x2,-0x8
06a7 e5fa | | Load 0x2,-0x6
06a8 0119 | | Execute Any,Check_In_Formal_Type
06a9 e605 | | Load 0x3,0x5
06aa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06ab e40c | | Load 0x2,0xc
06ac 1818 | | Execute Package,Field_Execute,Field_Number 0x18
06ad e605 | | Load 0x3,0x5
06ae 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
06af c5f8 | | Store 0x2,-0x8
06b0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06b1 0000 0000 | | .XXX[0x3]
06b3 0000 | |
06b4 0000 0000 | | .LITERAL {0x00000000, 0x0000401b}
06b8 0000 0000 | | .LITERAL {0x00000000, 0x0000401d}
06bc 0000 0000 | | .LITERAL {0x00000000, 0x0000401a}
06c0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
06c4 0000 0000 | | .BLANK 0000[0x4]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06ce | | .CONST 0x06ce ; Address of begin
06c9 0004 | | .CONST 0x0004 ; Address of exception handler
06ca 0002 | | .CONST 0x0002 ; Number of locals
06cb INIT_06c8:
06cb e5f9 | | Load 0x2,-0x7
06cc e001 | | Load 0x0,0x1
06cd 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06ce BODY_06c8:
06ce 00cf | | Action Mark_Auxiliary
06cf 00d9 | | Load_Top At_Offset_1
06d0 01dc | | Execute Vector,Last
06d1 4802 |H | Short_Literal 0x2
06d2 0263 | c | Execute Discrete,Above_Bound
06d3 7015 |p | Jump_Nonzero 0x6e9
06d4 e407 | | Load 0x2,0x7
06d5 e017 | | Load 0x0,0x17
06d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06d7 e018 | | Load 0x0,0x18
06d8 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06d9 00ea | | Load_Encached Null_String_Cache
06da e605 | | Load 0x3,0x5
06db e602 | | Load 0x3,0x2
06dc 01d7 | | Execute Vector,Field_Read
06dd 821c | | Call 0x1,0x1c
06de 4800 |H | Short_Literal 0x0
06df e002 | | Load 0x0,0x2
06e0 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06e1 c407 | | Store 0x2,0x7
06e2 8412 | | Call 0x2,0x12
06e3 e407 | | Load 0x2,0x7
06e4 e002 | | Load 0x0,0x2
06e5 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06e6 c407 | | Store 0x2,0x7
06e7 00c8 | | Action Pop_Auxiliary_Range
06e8 3feb |? | Loop_Increasing 0x6d4
06e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06ea 0000 0000 | | .BLANK 0000[0x6]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 070f | | .CONST 0x070f ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0007 | | .CONST 0x0007 ; Number of locals
06f3 INIT_06f0:
06f3 e018 | | Load 0x0,0x18
06f4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
06f5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
06f6 02c7 | | Declare_Variable Any
06f7 00d8 | | Load_Top At_Offset_0
06f8 1c00 | | Execute_Immediate Run_Utility,0x0
06f9 e02c | , | Load 0x0,0x2c
06fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06fb 02c7 | | Declare_Variable Any
06fc 00d8 | | Load_Top At_Offset_0
06fd 1c00 | | Execute_Immediate Run_Utility,0x0
06fe 00f1 | | Load_Encached Diana_Temp_Seq
06ff 02c7 | | Declare_Variable Any
0700 00d8 | | Load_Top At_Offset_0
0701 1c00 | | Execute_Immediate Run_Utility,0x0
0702 e018 | | Load 0x0,0x18
0703 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0704 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0705 02c7 | | Declare_Variable Any
0706 00d8 | | Load_Top At_Offset_0
0707 1c00 | | Execute_Immediate Run_Utility,0x0
0708 e018 | | Load 0x0,0x18
0709 1b14 | | Execute Package,Field_Read,Field_Number 0x14
070a 02ff | | Declare_Variable Variant_Record
070b 00d8 | | Load_Top At_Offset_0
070c 1c00 | | Execute_Immediate Run_Utility,0x0
070d e018 | | Load 0x0,0x18
070e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
070f BODY_06f0:
070f e018 | | Load 0x0,0x18
0710 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0711 00db | | Load_Top At_Offset_3
0712 0120 | | Execute Any,Is_Value
0713 6804 |h | Jump_Zero 0x718
0714 e018 | | Load 0x0,0x18
0715 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0716 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0717 7801 |x | Jump 0x719
0718 00db | | Load_Top At_Offset_3
0719 6072 |`r | Indirect_Literal Discrete,0x78c,{0x00000000, 0x00004000}
071a e017 | | Load 0x0,0x17
071b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
071c e018 | | Load 0x0,0x18
071d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
071e 4802 |H | Short_Literal 0x2
071f 6068 |`h | Indirect_Literal Discrete,0x788,{0x00000000, 0x7fffffff}
0720 6067 |`g | Indirect_Literal Discrete,0x788,{0x00000000, 0x7fffffff}
0721 e018 | | Load 0x0,0x18
0722 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
0723 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0724 e5fe | | Load 0x2,-0x2
0725 e403 | | Load 0x2,0x3
0726 e018 | | Load 0x0,0x18
0727 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0728 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0729 4801 |H | Short_Literal 0x1
072a e405 | | Load 0x2,0x5
072b e018 | | Load 0x0,0x18
072c 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
072d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
072e c605 | | Store 0x3,0x5
072f 0059 | Y | Store_Top Discrete,At_Offset_1
0730 4801 |H | Short_Literal 0x1
0731 4801 |H | Short_Literal 0x1
0732 e013 | | Load 0x0,0x13
0733 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0734 0334 | 4 | Declare_Variable Array,With_Constraint
0735 e5ff | | Load 0x2,-0x1
0736 e013 | | Load 0x0,0x13
0737 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0738 4801 |H | Short_Literal 0x1
0739 00da | | Load_Top At_Offset_2
073a 01d6 | | Execute Vector,Field_Write
073b 6048 |`H | Indirect_Literal Discrete,0x784,{0x00000000, 0x00004002}
073c 00da | | Load_Top At_Offset_2
073d e006 | | Load 0x0,0x6
073e 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
073f 00da | | Load_Top At_Offset_2
0740 e018 | | Load 0x0,0x18
0741 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0742 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0743 c5fd | | Store 0x2,-0x3
0744 e018 | | Load 0x0,0x18
0745 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0746 e604 | | Load 0x3,0x4
0747 0120 | | Execute Any,Is_Value
0748 6802 |h | Jump_Zero 0x74b
0749 00f1 | | Load_Encached Diana_Temp_Seq
074a 7801 |x | Jump 0x74c
074b e604 | | Load 0x3,0x4
074c e602 | | Load 0x3,0x2
074d 0120 | | Execute Any,Is_Value
074e 6804 |h | Jump_Zero 0x753
074f e018 | | Load 0x0,0x18
0750 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0751 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0752 7801 |x | Jump 0x754
0753 e602 | | Load 0x3,0x2
0754 e603 | | Load 0x3,0x3
0755 0120 | | Execute Any,Is_Value
0756 6803 |h | Jump_Zero 0x75a
0757 e02c | , | Load 0x0,0x2c
0758 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0759 7801 |x | Jump 0x75b
075a e603 | | Load 0x3,0x3
075b e606 | | Load 0x3,0x6
075c 602f |`/ | Indirect_Literal Discrete,0x78c,{0x00000000, 0x00004000}
075d e017 | | Load 0x0,0x17
075e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
075f 4800 |H | Short_Literal 0x0
0760 e018 | | Load 0x0,0x18
0761 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0762 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0763 e018 | | Load 0x0,0x18
0764 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0765 4ffc |O | Short_Literal -0x4
0766 4ffd |O | Short_Literal -0x3
0767 e5fd | | Load 0x2,-0x3
0768 e018 | | Load 0x0,0x18
0769 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
076a 180d | | Execute Package,Field_Execute,Field_Number 0xd
076b 00d1 | | Pop_Control Pop_Count_1
076c c603 | | Store 0x3,0x3
076d c602 | | Store 0x3,0x2
076e c604 | | Store 0x3,0x4
076f 0059 | Y | Store_Top Discrete,At_Offset_1
0770 4801 |H | Short_Literal 0x1
0771 4801 |H | Short_Literal 0x1
0772 e013 | | Load 0x0,0x13
0773 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0774 0334 | 4 | Declare_Variable Array,With_Constraint
0775 e5ff | | Load 0x2,-0x1
0776 e013 | | Load 0x0,0x13
0777 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0778 4801 |H | Short_Literal 0x1
0779 00da | | Load_Top At_Offset_2
077a 01d6 | | Execute Vector,Field_Write
077b 6004 |` | Indirect_Literal Discrete,0x780,{0x00000000, 0x00004005}
077c 00da | | Load_Top At_Offset_2
077d e006 | | Load 0x0,0x6
077e 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
077f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0780 0000 0000 | | .LITERAL {0x00000000, 0x00004005}
0784 0000 0000 | | .LITERAL {0x00000000, 0x00004002}
0788 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
078c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0793 | | .CONST 0x0793 ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0001 | | .CONST 0x0001 ; Number of locals
0793 BODY_0790:
0793 INIT_0790:
0793 e408 | | Load 0x2,0x8
0794 e409 | | Load 0x2,0x9
0795 027d | } | Execute Discrete,Greater
0796 6804 |h | Jump_Zero 0x79b
0797 00da | | Load_Top At_Offset_2
0798 e002 | | Load 0x0,0x2
0799 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
079a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
079b 4800 |H | Short_Literal 0x0
079c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
079d 0000 0000 | | .XXX[0x3]
079f 0000 | |
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a5 | | .CONST 0x07a5 ; Address of begin
07a1 0004 | | .CONST 0x0004 ; Address of exception handler
07a2 0003 | | .CONST 0x0003 ; Number of locals
07a3 INIT_07a0:
07a3 00e3 | | Load_Encached Natural_Cache
07a4 00e3 | | Load_Encached Natural_Cache
07a5 BODY_07a0:
07a5 e408 | | Load 0x2,0x8
07a6 e409 | | Load 0x2,0x9
07a7 027d | } | Execute Discrete,Greater
07a8 680f |h | Jump_Zero 0x7b8
07a9 e9ff | | Load 0x4,-0x1
07aa e002 | | Load 0x0,0x2
07ab 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
07ac 6802 |h | Jump_Zero 0x7af
07ad 00ea | | Load_Encached Null_String_Cache
07ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07af 00e3 | | Load_Encached Natural_Cache
07b0 e406 | | Load 0x2,0x6
07b1 e9ff | | Load 0x4,-0x1
07b2 e002 | | Load 0x0,0x2
07b3 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
07b4 00d1 | | Pop_Control Pop_Count_1
07b5 c409 | | Store 0x2,0x9
07b6 4801 |H | Short_Literal 0x1
07b7 a408 | | Store_Unchecked 0x2,0x8
07b8 e408 | | Load 0x2,0x8
07b9 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
07ba 4800 |H | Short_Literal 0x0
07bb 00d9 | | Load_Top At_Offset_1
07bc e409 | | Load 0x2,0x9
07bd e406 | | Load 0x2,0x6
07be 01cf | | Execute Vector,Slice_Read
07bf 480a |H | Short_Literal 0xa
07c0 e02d | - | Load 0x0,0x2d
07c1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
07c2 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
07c3 00d9 | | Load_Top At_Offset_1
07c4 680b |h | Jump_Zero 0x7d0
07c5 00d9 | | Load_Top At_Offset_1
07c6 0a01 | | Execute_Immediate Plus,0x1
07c7 c408 | | Store 0x2,0x8
07c8 00d8 | | Load_Top At_Offset_0
07c9 00da | | Load_Top At_Offset_2
07ca 0aff | | Execute_Immediate Plus,-0x1
07cb e406 | | Load 0x2,0x6
07cc 01cf | | Execute Vector,Slice_Read
07cd 0335 | 5 | Declare_Variable Array,Duplicate
07ce 00cd | | Action Spare6_Action
07cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07d0 e409 | | Load 0x2,0x9
07d1 0a01 | | Execute_Immediate Plus,0x1
07d2 c408 | | Store 0x2,0x8
07d3 e9ff | | Load 0x4,-0x1
07d4 e002 | | Load 0x0,0x2
07d5 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
07d6 6807 |h | Jump_Zero 0x7de
07d7 00d8 | | Load_Top At_Offset_0
07d8 e409 | | Load 0x2,0x9
07d9 e406 | | Load 0x2,0x6
07da 01cf | | Execute Vector,Slice_Read
07db 0335 | 5 | Declare_Variable Array,Duplicate
07dc 00cd | | Action Spare6_Action
07dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07de 00d8 | | Load_Top At_Offset_0
07df e409 | | Load 0x2,0x9
07e0 e406 | | Load 0x2,0x6
07e1 01cf | | Execute Vector,Slice_Read
07e2 e9ff | | Load 0x4,-0x1
07e3 8604 | | Call 0x3,0x4
07e4 01cc | | Execute Vector,Catenate
07e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07e6 0000 0000 | | .XXX[0x2]
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 0817 | | .CONST 0x0817 ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0008 | | .CONST 0x0008 ; Number of locals
07eb INIT_07e8:
07eb e604 | | Load 0x3,0x4
07ec 821a | | Call 0x1,0x1a
07ed e604 | | Load 0x3,0x4
07ee e024 | $ | Load 0x0,0x24
07ef 1b14 | | Execute Package,Field_Read,Field_Number 0x14
07f0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
07f1 00d9 | | Load_Top At_Offset_1
07f2 01dd | | Execute Vector,First
07f3 00da | | Load_Top At_Offset_2
07f4 01dc | | Execute Vector,Last
07f5 00da | | Load_Top At_Offset_2
07f6 01db | | Execute Vector,Length
07f7 0272 | r | Execute Discrete,Minus
07f8 0aff | | Execute_Immediate Plus,-0x1
07f9 00d8 | | Load_Top At_Offset_0
07fa 00e2 | | Load_Encached Integer_Cache
07fb 0260 | ` | Execute Discrete,In_Type
07fc 7001 |p | Jump_Nonzero 0x7fe
07fd 0801 | | Execute_Immediate Raise,0x1
07fe 00db | | Load_Top At_Offset_3
07ff 01cf | | Execute Vector,Slice_Read
0800 0007 | | Action Break_Optional
0801 e02e | . | Load 0x0,0x2e
0802 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0803 0604 | | Execute_Immediate Set_Value_Unchecked,0x4
0804 e02e | . | Load 0x0,0x2e
0805 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0806 0605 | | Execute_Immediate Set_Value_Unchecked,0x5
0807 00d8 | | Load_Top At_Offset_0
0808 0007 | | Action Break_Optional
0809 e012 | | Load 0x0,0x12
080a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
080b 0337 | 7 | Declare_Variable Array
080c e604 | | Load 0x3,0x4
080d e024 | $ | Load 0x0,0x24
080e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
080f 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0810 e024 | $ | Load 0x0,0x24
0811 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0812 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0813 e007 | | Load 0x0,0x7
0814 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0815 00d9 | | Load_Top At_Offset_1
0816 01d4 | | Execute Vector,Structure_Write
0817 BODY_07e8:
0817 4808 |H | Short_Literal 0x8
0818 00d9 | | Load_Top At_Offset_1
0819 01d7 | | Execute Vector,Field_Read
081a 6802 |h | Jump_Zero 0x81d
081b 00db | | Load_Top At_Offset_3
081c 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
081d e025 | % | Load 0x0,0x25
081e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
081f e404 | | Load 0x2,0x4
0820 0120 | | Execute Any,Is_Value
0821 6803 |h | Jump_Zero 0x825
0822 e018 | | Load 0x0,0x18
0823 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0824 7801 |x | Jump 0x826
0825 e404 | | Load 0x2,0x4
0826 e605 | | Load 0x3,0x5
0827 e015 | | Load 0x0,0x15
0828 180e | | Execute Package,Field_Execute,Field_Number 0xe
0829 e017 | | Load 0x0,0x17
082a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
082b 00ea | | Load_Encached Null_String_Cache
082c 4802 |H | Short_Literal 0x2
082d e018 | | Load 0x0,0x18
082e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
082f 00ea | | Load_Encached Null_String_Cache
0830 4801 |H | Short_Literal 0x1
0831 e807 | | Load 0x4,0x7
0832 e804 | | Load 0x4,0x4
0833 e411 | | Load 0x2,0x11
0834 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0835 00d1 | | Pop_Control Pop_Count_1
0836 c404 | | Store 0x2,0x4
0837 c405 | | Store 0x2,0x5
0838 e405 | | Load 0x2,0x5
0839 681c |h | Jump_Zero 0x856
083a e006 | | Load 0x0,0x6
083b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
083c 4801 |H | Short_Literal 0x1
083d 4802 |H | Short_Literal 0x2
083e e013 | | Load 0x0,0x13
083f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0840 0334 | 4 | Declare_Variable Array,With_Constraint
0841 e604 | | Load 0x3,0x4
0842 e024 | $ | Load 0x0,0x24
0843 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0844 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0845 4801 |H | Short_Literal 0x1
0846 00da | | Load_Top At_Offset_2
0847 01d6 | | Execute Vector,Field_Write
0848 e405 | | Load 0x2,0x5
0849 e025 | % | Load 0x0,0x25
084a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
084b 011c | | Execute Any,Convert_Unchecked
084c 1c01 | | Execute_Immediate Run_Utility,0x1
084d e013 | | Load 0x0,0x13
084e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
084f 4802 |H | Short_Literal 0x2
0850 00da | | Load_Top At_Offset_2
0851 01d6 | | Execute Vector,Field_Write
0852 6005 |` | Indirect_Literal Discrete,0x858,{0x00000000, 0x0000402b}
0853 e006 | | Load 0x0,0x6
0854 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0855 c403 | | Store 0x2,0x3
0856 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0857 0000 | | .XXX[0x1]
0858 0000 0000 | | .LITERAL {0x00000000, 0x0000402b}
085c 0000 0000 | | .BLANK 0000[0x4]
0860 ; --------------------------------------------------------------------------------------
0860 ; SUBPROGRAM
0860 ; --------------------------------------------------------------------------------------
0860 0867 | g | .CONST 0x0867 ; Address of begin
0861 0004 | | .CONST 0x0004 ; Address of exception handler
0862 0002 | | .CONST 0x0002 ; Number of locals
0863 INIT_0860:
0863 e605 | | Load 0x3,0x5
0864 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0865 e40c | | Load 0x2,0xc
0866 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0867 BODY_0860:
0867 e403 | | Load 0x2,0x3
0868 6806 |h | Jump_Zero 0x86f
0869 e403 | | Load 0x2,0x3
086a e5f9 | | Load 0x2,-0x7
086b e001 | | Load 0x0,0x1
086c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
086d 00cc | | Action Pop_Block
086e 7e14 |~ | Jump 0x683
086f e605 | | Load 0x3,0x5
0870 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0871 e40c | | Load 0x2,0xc
0872 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0873 6806 |h | Jump_Zero 0x87a
0874 00d8 | | Load_Top At_Offset_0
0875 e407 | | Load 0x2,0x7
0876 e002 | | Load 0x0,0x2
0877 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0878 00cc | | Action Pop_Block
0879 7e09 |~ | Jump 0x683
087a 480a |H | Short_Literal 0xa
087b 00d9 | | Load_Top At_Offset_1
087c 01cb | | Execute Vector,Append
087d e407 | | Load 0x2,0x7
087e e002 | | Load 0x0,0x2
087f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0880 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0881 0000 0000 | | .BLANK 0000[0x7]
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 08e5 | | .CONST 0x08e5 ; Address of begin
0889 0004 | | .CONST 0x0004 ; Address of exception handler
088a 0026 | & | .CONST 0x0026 ; Number of locals
088b INIT_0888:
088b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
088c 029a 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call,Visible,Unelaborated
088e 029a 092b | +| Declare_Subprogram INIT_0928,For_Outer_Call,Visible,Unelaborated
0890 029a 0933 | 3| Declare_Subprogram INIT_0930,For_Outer_Call,Visible,Unelaborated
0892 029a 09e3 | | Declare_Subprogram INIT_09e0,For_Outer_Call,Visible,Unelaborated
0894 029a 09f3 | | Declare_Subprogram INIT_09f0,For_Outer_Call,Visible,Unelaborated
0896 029a 0a03 | | Declare_Subprogram INIT_0a00,For_Outer_Call,Visible,Unelaborated
0898 029a 0a13 | | Declare_Subprogram INIT_0a10,For_Outer_Call,Visible,Unelaborated
089a 029a 0a1b | | Declare_Subprogram INIT_0a18,For_Outer_Call,Visible,Unelaborated
089c 029a 0a23 | #| Declare_Subprogram INIT_0a20,For_Outer_Call,Visible,Unelaborated
089e 029a 0a2b | +| Declare_Subprogram INIT_0a28,For_Outer_Call,Visible,Unelaborated
08a0 029a 0a3b | ;| Declare_Subprogram INIT_0a38,For_Outer_Call,Visible,Unelaborated
08a2 029a 0a4b | K| Declare_Subprogram INIT_0a48,For_Outer_Call,Visible,Unelaborated
08a4 4806 |H | Short_Literal 0x6
08a5 032a | * | Declare_Type Record,Incomplete
08a6 00d8 | | Load_Top At_Offset_0
08a7 02a0 | | Declare_Subprogram Null_Subprogram
08a8 e212 | | Load 0x1,0x12
08a9 03a3 | | Complete_Type Heap_Access,By_Defining
08aa 00bf | | Action Accept_Activation
08ab e001 | | Load 0x0,0x1
08ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ad e002 | | Load 0x0,0x2
08ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08af e003 | | Load 0x0,0x3
08b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08b1 00e1 | | Load_Encached Boolean_Cache
08b2 e004 | | Load 0x0,0x4
08b3 1b14 | | Execute Package,Field_Read,Field_Number 0x14
08b4 e210 | | Load 0x1,0x10
08b5 029f 0a53 | S| Declare_Subprogram INIT_0a50,For_Call
08b7 e21f | | Load 0x1,0x1f
08b8 0326 | & | Complete_Type Record,By_Defining
08b9 1d13 | | Execute_Immediate Reference_Lex_1,0x13
08ba 00c7 | | Action Elaborate_Subprogram
08bb 1d14 | | Execute_Immediate Reference_Lex_1,0x14
08bc 00c7 | | Action Elaborate_Subprogram
08bd 029d 0a73 | s| Declare_Subprogram INIT_0a70,For_Outer_Call
08bf 1d15 | | Execute_Immediate Reference_Lex_1,0x15
08c0 00c7 | | Action Elaborate_Subprogram
08c1 1d16 | | Execute_Immediate Reference_Lex_1,0x16
08c2 00c7 | | Action Elaborate_Subprogram
08c3 1d17 | | Execute_Immediate Reference_Lex_1,0x17
08c4 00c7 | | Action Elaborate_Subprogram
08c5 1d18 | | Execute_Immediate Reference_Lex_1,0x18
08c6 00c7 | | Action Elaborate_Subprogram
08c7 1d19 | | Execute_Immediate Reference_Lex_1,0x19
08c8 00c7 | | Action Elaborate_Subprogram
08c9 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
08ca 00c7 | | Action Elaborate_Subprogram
08cb 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
08cc 00c7 | | Action Elaborate_Subprogram
08cd 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
08ce 00c7 | | Action Elaborate_Subprogram
08cf e005 | | Load 0x0,0x5
08d0 e006 | | Load 0x0,0x6
08d1 00db | | Load_Top At_Offset_3
08d2 e212 | | Load 0x1,0x12
08d3 e007 | | Load 0x0,0x7
08d4 1b18 | | Execute Package,Field_Read,Field_Number 0x18
08d5 0387 | | Declare_Variable Package
08d6 00d8 | | Load_Top At_Offset_0
08d7 020f | | Execute Module,Activate
08d8 e007 | | Load 0x0,0x7
08d9 1919 | | Execute Package,Field_Reference,Field_Number 0x19
08da 00c6 | | Action Check_Subprogram_Elaborated
08db 00da | | Load_Top At_Offset_2
08dc e212 | | Load 0x1,0x12
08dd e008 | | Load 0x0,0x8
08de e009 | | Load 0x0,0x9
08df 4800 |H | Short_Literal 0x0
08e0 0007 | | Action Break_Optional
08e1 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
08e2 00c7 | | Action Elaborate_Subprogram
08e3 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
08e4 00c7 | | Action Elaborate_Subprogram
08e5 BODY_0888:
08e5 00bc | | Action Signal_Activated
08e6 00bb | | Action Signal_Completion
08e7 0000 | | .XXX[0x1]
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08f2 | | .CONST 0x08f2 ; Address of begin
08e9 0915 | | .CONST 0x0915 ; Address of exception handler
08ea 0002 | | .CONST 0x0002 ; Number of locals
08eb INIT_08e8:
08eb e212 | | Load 0x1,0x12
08ec e00a | | Load 0x0,0xa
08ed 180d | | Execute Package,Field_Execute,Field_Number 0xd
08ee 039c | | Declare_Variable Heap_Access,By_Allocation
08ef 00d8 | | Load_Top At_Offset_0
08f0 0217 | | Execute Heap_Access,All_Reference
08f1 1c00 | | Execute_Immediate Run_Utility,0x0
08f2 BODY_08e8:
08f2 00db | | Load_Top At_Offset_3
08f3 e20f | | Load 0x1,0xf
08f4 0119 | | Execute Any,Check_In_Formal_Type
08f5 e210 | | Load 0x1,0x10
08f6 e00a | | Load 0x0,0xa
08f7 180d | | Execute Package,Field_Execute,Field_Number 0xd
08f8 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
08f9 00d9 | | Load_Top At_Offset_1
08fa 0217 | | Execute Heap_Access,All_Reference
08fb 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
08fc e5fe | | Load 0x2,-0x2
08fd 00d9 | | Load_Top At_Offset_1
08fe 0217 | | Execute Heap_Access,All_Reference
08ff 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0900 e001 | | Load 0x0,0x1
0901 180e | | Execute Package,Field_Execute,Field_Number 0xe
0902 00d9 | | Load_Top At_Offset_1
0903 0217 | | Execute Heap_Access,All_Reference
0904 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0905 4800 |H | Short_Literal 0x0
0906 00d9 | | Load_Top At_Offset_1
0907 0217 | | Execute Heap_Access,All_Reference
0908 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0909 e004 | | Load 0x0,0x4
090a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
090b 00d9 | | Load_Top At_Offset_1
090c 0217 | | Execute Heap_Access,All_Reference
090d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
090e 00d8 | | Load_Top At_Offset_0
090f a5fd | | Store_Unchecked 0x2,-0x3
0910 00d8 | | Load_Top At_Offset_0
0911 0217 | | Execute Heap_Access,All_Reference
0912 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0913 a5fc | | Store_Unchecked 0x2,-0x4
0914 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0915 TRAP_08e8:
0915 010b | | Execute Exception,Is_Storage_Error
0916 680b |h | Jump_Zero 0x922
0917 e001 | | Load 0x0,0x1
0918 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0919 e00b | | Load 0x0,0xb
091a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
091b 6008 |` | Indirect_Literal Discrete,0x924,{0x00000000, 0x00004008}
091c e001 | | Load 0x0,0x1
091d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
091e c5fc | | Store 0x2,-0x4
091f e212 | | Load 0x1,0x12
0920 a5fd | | Store_Unchecked 0x2,-0x3
0921 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0922 0100 | | Execute Exception,Raise
0923 0000 | | .XXX[0x1]
0924 0000 0000 | | .LITERAL {0x00000000, 0x00004008}
0928 ; --------------------------------------------------------------------------------------
0928 ; SUBPROGRAM
0928 ; --------------------------------------------------------------------------------------
0928 092b | + | .CONST 0x092b ; Address of begin
0929 0004 | | .CONST 0x0004 ; Address of exception handler
092a 0001 | | .CONST 0x0001 ; Number of locals
092b BODY_0928:
092b INIT_0928:
092b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
092c 0000 0000 | | .BLANK 0000[0x4]
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 094b | K | .CONST 0x094b ; Address of begin
0931 099a | | .CONST 0x099a ; Address of exception handler
0932 000b | | .CONST 0x000b ; Number of locals
0933 INIT_0930:
0933 e001 | | Load 0x0,0x1
0934 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0935 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0936 e00b | | Load 0x0,0xb
0937 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0938 e00b | | Load 0x0,0xb
0939 1b0e | | Execute Package,Field_Read,Field_Number 0xe
093a 00ea | | Load_Encached Null_String_Cache
093b e5ff | | Load 0x2,-0x1
093c 0217 | | Execute Heap_Access,All_Reference
093d 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
093e 800c | | Call 0x0,0xc
093f 029f 0aa3 | | Declare_Subprogram INIT_0aa0,For_Call
0941 029f 0ac3 | | Declare_Subprogram INIT_0ac0,For_Call
0943 029f 0ae3 | | Declare_Subprogram INIT_0ae0,For_Call
0945 029f 0b53 | S| Declare_Subprogram INIT_0b50,For_Call
0947 029f 0beb | | Declare_Subprogram INIT_0be8,For_Call
0949 029f 0c7b | {| Declare_Subprogram INIT_0c78,For_Call
094b BODY_0930:
094b e5fe | | Load 0x2,-0x2
094c e00d | | Load 0x0,0xd
094d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
094e 4612 |F | Jump_Case 0x13
094f 7812 |x | Jump 0x962 ; case 0x0
0950 7811 |x | Jump 0x962 ; case 0x1
0951 7810 |x | Jump 0x962 ; case 0x2
0952 780f |x | Jump 0x962 ; case 0x3
0953 780e |x | Jump 0x962 ; case 0x4
0954 780d |x | Jump 0x962 ; case 0x5
0955 780c |x | Jump 0x962 ; case 0x6
0956 780b |x | Jump 0x962 ; case 0x7
0957 780a |x | Jump 0x962 ; case 0x8
0958 7809 |x | Jump 0x962 ; case 0x9
0959 7821 |x! | Jump 0x97b ; case 0xa
095a 782c |x, | Jump 0x987 ; case 0xb
095b 7832 |x2 | Jump 0x98e ; case 0xc
095c 7805 |x | Jump 0x962 ; case 0xd
095d 7804 |x | Jump 0x962 ; case 0xe
095e 7803 |x | Jump 0x962 ; case 0xf
095f 7802 |x | Jump 0x962 ; case 0x10
0960 7801 |x | Jump 0x962 ; case 0x11
0961 7800 |x | Jump 0x962 ; case 0x12
0962 e00e | | Load 0x0,0xe
0963 180e | | Execute Package,Field_Execute,Field_Number 0xe
0964 4801 |H | Short_Literal 0x1
0965 4801 |H | Short_Literal 0x1
0966 e00b | | Load 0x0,0xb
0967 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0968 0334 | 4 | Declare_Variable Array,With_Constraint
0969 e5fe | | Load 0x2,-0x2
096a e00d | | Load 0x0,0xd
096b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
096c 4801 |H | Short_Literal 0x1
096d 00da | | Load_Top At_Offset_2
096e 01d6 | | Execute Vector,Field_Write
096f 606c |`l | Indirect_Literal Discrete,0x9dc,{0x00000000, 0x00004018}
0970 e001 | | Load 0x0,0x1
0971 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0972 e00b | | Load 0x0,0xb
0973 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0974 6067 |`g | Indirect_Literal Discrete,0x9dc,{0x00000000, 0x00004018}
0975 e001 | | Load 0x0,0x1
0976 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0977 e5fe | | Load 0x2,-0x2
0978 e00d | | Load 0x0,0xd
0979 181f | | Execute Package,Field_Execute,Field_Number 0x1f
097a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
097b 4801 |H | Short_Literal 0x1
097c e5fe | | Load 0x2,-0x2
097d e00d | | Load 0x0,0xd
097e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
097f a403 | | Store_Unchecked 0x2,0x3
0980 4802 |H | Short_Literal 0x2
0981 e5fe | | Load 0x2,-0x2
0982 e00d | | Load 0x0,0xd
0983 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0984 a404 | | Store_Unchecked 0x2,0x4
0985 8409 | | Call 0x2,0x9
0986 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0987 4801 |H | Short_Literal 0x1
0988 e5fe | | Load 0x2,-0x2
0989 e00d | | Load 0x0,0xd
098a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
098b a403 | | Store_Unchecked 0x2,0x3
098c 840a | | Call 0x2,0xa
098d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
098e 4801 |H | Short_Literal 0x1
098f e5fe | | Load 0x2,-0x2
0990 e00d | | Load 0x0,0xd
0991 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0992 a403 | | Store_Unchecked 0x2,0x3
0993 4802 |H | Short_Literal 0x2
0994 e5fe | | Load 0x2,-0x2
0995 e00d | | Load 0x0,0xd
0996 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0997 a404 | | Store_Unchecked 0x2,0x4
0998 840b | | Call 0x2,0xb
0999 4504 |E | Exit_Suprogram New_Top_Offset 0x4
099a TRAP_0930:
099a e00f | | Load 0x0,0xf
099b 010f | | Execute Exception,Equal
099c 6815 |h | Jump_Zero 0x9b2
099d e5ff | | Load 0x2,-0x1
099e 0219 | | Execute Heap_Access,All_Read
099f e001 | | Load 0x0,0x1
09a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09a1 4801 |H | Short_Literal 0x1
09a2 4801 |H | Short_Literal 0x1
09a3 e00b | | Load 0x0,0xb
09a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09a5 0334 | 4 | Declare_Variable Array,With_Constraint
09a6 e5fe | | Load 0x2,-0x2
09a7 e00d | | Load 0x0,0xd
09a8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
09a9 4801 |H | Short_Literal 0x1
09aa 00da | | Load_Top At_Offset_2
09ab 01d6 | | Execute Vector,Field_Write
09ac 602b |`+ | Indirect_Literal Discrete,0x9d8,{0x00000000, 0x00004007}
09ad e001 | | Load 0x0,0x1
09ae 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
09af 00d9 | | Load_Top At_Offset_1
09b0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
09b1 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09b2 e010 | | Load 0x0,0x10
09b3 010f | | Execute Exception,Equal
09b4 681b |h | Jump_Zero 0x9d0
09b5 e5ff | | Load 0x2,-0x1
09b6 8220 | | Call 0x1,0x20
09b7 e00e | | Load 0x0,0xe
09b8 180e | | Execute Package,Field_Execute,Field_Number 0xe
09b9 4801 |H | Short_Literal 0x1
09ba 4801 |H | Short_Literal 0x1
09bb e00b | | Load 0x0,0xb
09bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09bd 0334 | 4 | Declare_Variable Array,With_Constraint
09be e5fe | | Load 0x2,-0x2
09bf e00d | | Load 0x0,0xd
09c0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
09c1 4801 |H | Short_Literal 0x1
09c2 00da | | Load_Top At_Offset_2
09c3 01d6 | | Execute Vector,Field_Write
09c4 600f |` | Indirect_Literal Discrete,0x9d4,{0x00000000, 0x00004019}
09c5 e001 | | Load 0x0,0x1
09c6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
09c7 e00b | | Load 0x0,0xb
09c8 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
09c9 600a |` | Indirect_Literal Discrete,0x9d4,{0x00000000, 0x00004019}
09ca e001 | | Load 0x0,0x1
09cb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09cc e5fe | | Load 0x2,-0x2
09cd e00d | | Load 0x0,0xd
09ce 181f | | Execute Package,Field_Execute,Field_Number 0x1f
09cf 4504 |E | Exit_Suprogram New_Top_Offset 0x4
09d0 e5ff | | Load 0x2,-0x1
09d1 8220 | | Call 0x1,0x20
09d2 00d8 | | Load_Top At_Offset_0
09d3 0101 | | Execute Exception,Reraise
09d4 0000 0000 | | .LITERAL {0x00000000, 0x00004019}
09d8 0000 0000 | | .LITERAL {0x00000000, 0x00004007}
09dc 0000 0000 | | .LITERAL {0x00000000, 0x00004018}
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3 | | .CONST 0x09e3 ; Address of begin
09e1 0004 | | .CONST 0x0004 ; Address of exception handler
09e2 0001 | | .CONST 0x0001 ; Number of locals
09e3 BODY_09e0:
09e3 INIT_09e0:
09e3 00da | | Load_Top At_Offset_2
09e4 0217 | | Execute Heap_Access,All_Reference
09e5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
09e6 0219 | | Execute Heap_Access,All_Read
09e7 c5fe | | Store 0x2,-0x2
09e8 e210 | | Load 0x1,0x10
09e9 00db | | Load_Top At_Offset_3
09ea 0217 | | Execute Heap_Access,All_Reference
09eb 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
09ec 00da | | Load_Top At_Offset_2
09ed 8220 | | Call 0x1,0x20
09ee 4502 |E | Exit_Suprogram New_Top_Offset 0x2
09ef 0000 | | .XXX[0x1]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f3 | | .CONST 0x09f3 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0001 | | .CONST 0x0001 ; Number of locals
09f3 BODY_09f0:
09f3 INIT_09f0:
09f3 00da | | Load_Top At_Offset_2
09f4 0217 | | Execute Heap_Access,All_Reference
09f5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
09f6 00d8 | | Load_Top At_Offset_0
09f7 0120 | | Execute Any,Is_Value
09f8 7002 |p | Jump_Nonzero 0x9fb
09f9 00d8 | | Load_Top At_Offset_0
09fa 011e | | Execute Any,Convert
09fb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
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 e210 | | Load 0x1,0x10
0a07 0213 | | Execute Heap_Access,Check_In_Type
0a08 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a09 0000 0000 | | .BLANK 0000[0x7]
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 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a16 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a17 0000 | | .XXX[0x1]
0a18 ; --------------------------------------------------------------------------------------
0a18 ; SUBPROGRAM
0a18 ; --------------------------------------------------------------------------------------
0a18 0a1b | | .CONST 0x0a1b ; Address of begin
0a19 0004 | | .CONST 0x0004 ; Address of exception handler
0a1a 0001 | | .CONST 0x0001 ; Number of locals
0a1b BODY_0a18:
0a1b INIT_0a18:
0a1b 00db | | Load_Top At_Offset_3
0a1c 00db | | Load_Top At_Offset_3
0a1d 0217 | | Execute Heap_Access,All_Reference
0a1e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0a1f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
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 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a26 0f00 | | Execute_Immediate Equal,0x0
0a27 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a28 ; --------------------------------------------------------------------------------------
0a28 ; SUBPROGRAM
0a28 ; --------------------------------------------------------------------------------------
0a28 0a2b | + | .CONST 0x0a2b ; Address of begin
0a29 0004 | | .CONST 0x0004 ; Address of exception handler
0a2a 0001 | | .CONST 0x0001 ; Number of locals
0a2b BODY_0a28:
0a2b INIT_0a28:
0a2b 00da | | Load_Top At_Offset_2
0a2c 0217 | | Execute Heap_Access,All_Reference
0a2d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a2e e001 | | Load 0x0,0x1
0a2f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0a30 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a31 0000 0000 | | .BLANK 0000[0x7]
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 00da | | Load_Top At_Offset_2
0a3c e00a | | Load 0x0,0xa
0a3d 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a3e e222 | " | Load 0x1,0x22
0a3f e223 | # | Load 0x1,0x23
0a40 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0a41 e007 | | Load 0x0,0x7
0a42 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0a43 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a44 0000 0000 | | .BLANK 0000[0x4]
0a48 ; --------------------------------------------------------------------------------------
0a48 ; SUBPROGRAM
0a48 ; --------------------------------------------------------------------------------------
0a48 0a4b | K | .CONST 0x0a4b ; Address of begin
0a49 0004 | | .CONST 0x0004 ; Address of exception handler
0a4a 0001 | | .CONST 0x0001 ; Number of locals
0a4b BODY_0a48:
0a4b INIT_0a48:
0a4b 00da | | Load_Top At_Offset_2
0a4c e221 | ! | Load 0x1,0x21
0a4d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a4e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a4f 0000 | | .XXX[0x1]
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 4608 |F | Jump_Case 0x9
0a54 7808 |x | Jump 0xa5d ; case 0x0
0a55 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0a56 7813 |x | Jump 0xa6a ; case 0x2
0a57 7812 |x | Jump 0xa6a ; case 0x3
0a58 7811 |x | Jump 0xa6a ; case 0x4
0a59 7810 |x | Jump 0xa6a ; case 0x5
0a5a 780f |x | Jump 0xa6a ; case 0x6
0a5b 780e |x | Jump 0xa6a ; case 0x7
0a5c 780d |x | Jump 0xa6a ; case 0x8
0a5d 00da | | Load_Top At_Offset_2
0a5e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0a5f 0125 | % | Execute Any,Set_Constraint
0a60 00da | | Load_Top At_Offset_2
0a61 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0a62 1c00 | | Execute_Immediate Run_Utility,0x0
0a63 00da | | Load_Top At_Offset_2
0a64 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0a65 0125 | % | Execute Any,Set_Constraint
0a66 00da | | Load_Top At_Offset_2
0a67 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0a68 1c00 | | Execute_Immediate Run_Utility,0x0
0a69 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0a6a 0869 | i | Execute_Immediate Raise,0x69
0a6b 0000 0000 | | .BLANK 0000[0x5]
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 0217 | | Execute Heap_Access,All_Reference
0a75 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0a76 6827 |h' | Jump_Zero 0xa9e
0a77 00da | | Load_Top At_Offset_2
0a78 0217 | | Execute Heap_Access,All_Reference
0a79 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a7a e003 | | Load 0x0,0x3
0a7b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0a7c 7014 |p | Jump_Nonzero 0xa91
0a7d 00da | | Load_Top At_Offset_2
0a7e 0219 | | Execute Heap_Access,All_Read
0a7f 00d8 | | Load_Top At_Offset_0
0a80 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a81 e011 | | Load 0x0,0x11
0a82 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a83 e012 | | Load 0x0,0x12
0a84 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0a85 00ea | | Load_Encached Null_String_Cache
0a86 00ea | | Load_Encached Null_String_Cache
0a87 e5ff | | Load 0x2,-0x1
0a88 0217 | | Execute Heap_Access,All_Reference
0a89 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0a8a 800c | | Call 0x0,0xc
0a8b 4800 |H | Short_Literal 0x0
0a8c e003 | | Load 0x0,0x3
0a8d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a8e 00d9 | | Load_Top At_Offset_1
0a8f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a90 00d1 | | Pop_Control Pop_Count_1
0a91 00da | | Load_Top At_Offset_2
0a92 0219 | | Execute Heap_Access,All_Read
0a93 00d8 | | Load_Top At_Offset_0
0a94 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a95 e003 | | Load 0x0,0x3
0a96 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0a97 00d9 | | Load_Top At_Offset_1
0a98 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0a99 00d1 | | Pop_Control Pop_Count_1
0a9a 4800 |H | Short_Literal 0x0
0a9b 00db | | Load_Top At_Offset_3
0a9c 0217 | | Execute Heap_Access,All_Reference
0a9d 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0a9e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a9f 0000 | | .XXX[0x1]
0aa0 ; --------------------------------------------------------------------------------------
0aa0 ; SUBPROGRAM
0aa0 ; --------------------------------------------------------------------------------------
0aa0 0aa3 | | .CONST 0x0aa3 ; Address of begin
0aa1 0004 | | .CONST 0x0004 ; Address of exception handler
0aa2 0001 | | .CONST 0x0001 ; Number of locals
0aa3 BODY_0aa0:
0aa3 INIT_0aa0:
0aa3 00da | | Load_Top At_Offset_2
0aa4 e00b | | Load 0x0,0xb
0aa5 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0aa6 0b0f | | Execute_Immediate Case_Compare,0xf
0aa7 7004 |p | Jump_Nonzero 0xaac
0aa8 0f01 | | Execute_Immediate Equal,0x1
0aa9 700c |p | Jump_Nonzero 0xab6
0aaa e010 | | Load 0x0,0x10
0aab 0257 | W | Execute Discrete,Raise
0aac 00d1 | | Pop_Control Pop_Count_1
0aad e5ff | | Load 0x2,-0x1
0aae 0217 | | Execute Heap_Access,All_Reference
0aaf 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0ab0 0219 | | Execute Heap_Access,All_Read
0ab1 e20f | | Load 0x1,0xf
0ab2 0119 | | Execute Any,Check_In_Formal_Type
0ab3 e5fe | | Load 0x2,-0x2
0ab4 8211 | | Call 0x1,0x11
0ab5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ab6 00da | | Load_Top At_Offset_2
0ab7 e00b | | Load 0x0,0xb
0ab8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0ab9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0aba 0000 0000 | | .BLANK 0000[0x6]
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; SUBPROGRAM
0ac0 ; --------------------------------------------------------------------------------------
0ac0 0ac5 | | .CONST 0x0ac5 ; Address of begin
0ac1 0acb | | .CONST 0x0acb ; Address of exception handler
0ac2 0002 | | .CONST 0x0002 ; Number of locals
0ac3 INIT_0ac0:
0ac3 029f 0ce3 | | Declare_Subprogram INIT_0ce0,For_Call
0ac5 BODY_0ac0:
0ac5 e7fe | | Load 0x3,-0x2
0ac6 e002 | | Load 0x0,0x2
0ac7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0ac8 c7fe | | Store 0x3,-0x2
0ac9 8602 | | Call 0x3,0x2
0aca 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0acb TRAP_0ac0:
0acb 0007 | | Action Break_Optional
0acc e00e | | Load 0x0,0xe
0acd 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ace e00b | | Load 0x0,0xb
0acf 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0ad0 6007 |` | Indirect_Literal Discrete,0xad8,{0x00000000, 0x00004026}
0ad1 e001 | | Load 0x0,0x1
0ad2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0ad3 e00f | | Load 0x0,0xf
0ad4 0257 | W | Execute Discrete,Raise
0ad5 0000 0000 | | .XXX[0x3]
0ad7 0000 | |
0ad8 0000 0000 | | .LITERAL {0x00000000, 0x00004026}
0adc 0000 0000 | | .BLANK 0000[0x4]
0ae0 ; --------------------------------------------------------------------------------------
0ae0 ; SUBPROGRAM
0ae0 ; --------------------------------------------------------------------------------------
0ae0 0aef | | .CONST 0x0aef ; Address of begin
0ae1 0b2d | - | .CONST 0x0b2d ; Address of exception handler
0ae2 0004 | | .CONST 0x0004 ; Number of locals
0ae3 INIT_0ae0:
0ae3 4801 |H | Short_Literal 0x1
0ae4 4a00 |J | Short_Literal 0x200
0ae5 e003 | | Load 0x0,0x3
0ae6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0ae7 035b | [ | Declare_Type Array,Constrained
0ae8 0337 | 7 | Declare_Variable Array
0ae9 00e3 | | Load_Encached Natural_Cache
0aea e003 | | Load 0x0,0x3
0aeb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0aec 02c7 | | Declare_Variable Any
0aed 00d8 | | Load_Top At_Offset_0
0aee 1c00 | | Execute_Immediate Run_Utility,0x0
0aef BODY_0ae0:
0aef e7ff | | Load 0x3,-0x1
0af0 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
0af2 01df | | Execute Vector,Equal
0af3 6805 |h | Jump_Zero 0xaf9
0af4 e5ff | | Load 0x2,-0x1
0af5 0217 | | Execute Heap_Access,All_Reference
0af6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0af7 c604 | | Store 0x3,0x4
0af8 780b |x | Jump 0xb04
0af9 00d8 | | Load_Top At_Offset_0
0afa e011 | | Load 0x0,0x11
0afb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0afc e012 | | Load 0x0,0x12
0afd 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0afe 00ea | | Load_Encached Null_String_Cache
0aff e7ff | | Load 0x3,-0x1
0b00 4800 |H | Short_Literal 0x0
0b01 e003 | | Load 0x0,0x3
0b02 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0b03 c604 | | Store 0x3,0x4
0b04 e7fd | | Load 0x3,-0x3
0b05 00ea | | Load_Encached Null_String_Cache
0b06 e7fe | | Load 0x3,-0x2
0b07 e002 | | Load 0x0,0x2
0b08 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b09 c7fd | | Store 0x3,-0x3
0b0a 00cf | | Action Mark_Auxiliary
0b0b 780f |x | Jump 0xb1b
0b0c 00e3 | | Load_Encached Natural_Cache
0b0d e602 | | Load 0x3,0x2
0b0e 00db | | Load_Top At_Offset_3
0b0f e003 | | Load 0x0,0x3
0b10 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0b11 00d1 | | Pop_Control Pop_Count_1
0b12 005b | [ | Store_Top Discrete,At_Offset_3
0b13 4801 |H | Short_Literal 0x1
0b14 00db | | Load_Top At_Offset_3
0b15 e602 | | Load 0x3,0x2
0b16 01cf | | Execute Vector,Slice_Read
0b17 e7fd | | Load 0x3,-0x3
0b18 e002 | | Load 0x0,0x2
0b19 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0b1a 00c9 | | Action Pop_Auxiliary_Loop
0b1b 00d9 | | Load_Top At_Offset_1
0b1c e003 | | Load 0x0,0x3
0b1d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0b1e 6fed |o | Jump_Zero 0xb0c
0b1f 00ce | | Action Pop_Auxiliary
0b20 e7ff | | Load 0x3,-0x1
0b21 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
0b23 01de | | Execute Vector,Not_Equal
0b24 6804 |h | Jump_Zero 0xb29
0b25 00d8 | | Load_Top At_Offset_0
0b26 e003 | | Load 0x0,0x3
0b27 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0b28 c604 | | Store 0x3,0x4
0b29 e7fd | | Load 0x3,-0x3
0b2a e002 | | Load 0x0,0x2
0b2b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0b2c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0b2d TRAP_0ae0:
0b2d 0007 | | Action Break_Optional
0b2e e00e | | Load 0x0,0xe
0b2f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b30 4801 |H | Short_Literal 0x1
0b31 4802 |H | Short_Literal 0x2
0b32 e00b | | Load 0x0,0xb
0b33 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b34 0334 | 4 | Declare_Variable Array,With_Constraint
0b35 e7ff | | Load 0x3,-0x1
0b36 e00b | | Load 0x0,0xb
0b37 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b38 4801 |H | Short_Literal 0x1
0b39 00da | | Load_Top At_Offset_2
0b3a 01d6 | | Execute Vector,Field_Write
0b3b e7fe | | Load 0x3,-0x2
0b3c e00b | | Load 0x0,0xb
0b3d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b3e 4802 |H | Short_Literal 0x2
0b3f 00da | | Load_Top At_Offset_2
0b40 01d6 | | Execute Vector,Field_Write
0b41 6006 |` | Indirect_Literal Discrete,0xb48,{0x00000000, 0x00004025}
0b42 e001 | | Load 0x0,0x1
0b43 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0b44 e00f | | Load 0x0,0xf
0b45 0257 | W | Execute Discrete,Raise
0b46 0000 0000 | | .XXX[0x2]
0b48 0000 0000 | | .LITERAL {0x00000000, 0x00004025}
0b4c 0000 0000 | | .BLANK 0000[0x4]
0b50 ; --------------------------------------------------------------------------------------
0b50 ; SUBPROGRAM
0b50 ; --------------------------------------------------------------------------------------
0b50 0b57 | W | .CONST 0x0b57 ; Address of begin
0b51 0004 | | .CONST 0x0004 ; Address of exception handler
0b52 0003 | | .CONST 0x0003 ; Number of locals
0b53 INIT_0b50:
0b53 e403 | | Load 0x2,0x3
0b54 8013 | | Call 0x0,0x13
0b55 e404 | | Load 0x2,0x4
0b56 8406 | | Call 0x2,0x6
0b57 BODY_0b50:
0b57 e5fe | | Load 0x2,-0x2
0b58 8014 | | Call 0x0,0x14
0b59 7025 |p% | Jump_Nonzero 0xb7f
0b5a e5ff | | Load 0x2,-0x1
0b5b 0219 | | Execute Heap_Access,All_Read
0b5c 00d8 | | Load_Top At_Offset_0
0b5d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b5e 00da | | Load_Top At_Offset_2
0b5f e602 | | Load 0x3,0x2
0b60 8408 | | Call 0x2,0x8
0b61 00d9 | | Load_Top At_Offset_1
0b62 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0b63 00d1 | | Pop_Control Pop_Count_1
0b64 e5fe | | Load 0x2,-0x2
0b65 e00d | | Load 0x0,0xd
0b66 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b67 6816 |h | Jump_Zero 0xb7e
0b68 e00e | | Load 0x0,0xe
0b69 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b6a 4801 |H | Short_Literal 0x1
0b6b 4802 |H | Short_Literal 0x2
0b6c e00b | | Load 0x0,0xb
0b6d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b6e 0334 | 4 | Declare_Variable Array,With_Constraint
0b6f 00db | | Load_Top At_Offset_3
0b70 e00b | | Load 0x0,0xb
0b71 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b72 4801 |H | Short_Literal 0x1
0b73 00da | | Load_Top At_Offset_2
0b74 01d6 | | Execute Vector,Field_Write
0b75 00da | | Load_Top At_Offset_2
0b76 e00b | | Load 0x0,0xb
0b77 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b78 4802 |H | Short_Literal 0x2
0b79 00da | | Load_Top At_Offset_2
0b7a 01d6 | | Execute Vector,Field_Write
0b7b 6068 |`h | Indirect_Literal Discrete,0xbe4,{0x00000000, 0x00004022}
0b7c e001 | | Load 0x0,0x1
0b7d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0b7e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b7f e5fe | | Load 0x2,-0x2
0b80 e00d | | Load 0x0,0xd
0b81 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b82 7002 |p | Jump_Nonzero 0xb85
0b83 00cc | | Action Pop_Block
0b84 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0b85 e5ff | | Load 0x2,-0x1
0b86 0219 | | Execute Heap_Access,All_Read
0b87 e402 | | Load 0x2,0x2
0b88 00d9 | | Load_Top At_Offset_1
0b89 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b8a e405 | | Load 0x2,0x5
0b8b 8015 | | Call 0x0,0x15
0b8c 00da | | Load_Top At_Offset_2
0b8d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0b8e c402 | | Store 0x2,0x2
0b8f 00d1 | | Pop_Control Pop_Count_1
0b90 e402 | | Load 0x2,0x2
0b91 7005 |p | Jump_Nonzero 0xb97
0b92 4801 |H | Short_Literal 0x1
0b93 e5ff | | Load 0x2,-0x1
0b94 0217 | | Execute Heap_Access,All_Reference
0b95 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0b96 7806 |x | Jump 0xb9d
0b97 e402 | | Load 0x2,0x2
0b98 e5fe | | Load 0x2,-0x2
0b99 e00d | | Load 0x0,0xd
0b9a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0b9b 00cc | | Action Pop_Block
0b9c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0b9d e5ff | | Load 0x2,-0x1
0b9e 0219 | | Execute Heap_Access,All_Read
0b9f 00d8 | | Load_Top At_Offset_0
0ba0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0ba1 e5fe | | Load 0x2,-0x2
0ba2 e016 | | Load 0x0,0x16
0ba3 a017 | | Store_Unchecked 0x0,0x17
0ba4 a018 | | Store_Unchecked 0x0,0x18
0ba5 a019 | | Store_Unchecked 0x0,0x19
0ba6 a01a | | Store_Unchecked 0x0,0x1a
0ba7 a01b | | Store_Unchecked 0x0,0x1b
0ba8 e01c | | Load 0x0,0x1c
0ba9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0baa 00d9 | | Load_Top At_Offset_1
0bab 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0bac 00d1 | | Pop_Control Pop_Count_1
0bad e5ff | | Load 0x2,-0x1
0bae 0219 | | Execute Heap_Access,All_Read
0baf 00d8 | | Load_Top At_Offset_0
0bb0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0bb1 4800 |H | Short_Literal 0x0
0bb2 e003 | | Load 0x0,0x3
0bb3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0bb4 00d9 | | Load_Top At_Offset_1
0bb5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0bb6 00d1 | | Pop_Control Pop_Count_1
0bb7 e5ff | | Load 0x2,-0x1
0bb8 0219 | | Execute Heap_Access,All_Read
0bb9 00d8 | | Load_Top At_Offset_0
0bba 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0bbb 00da | | Load_Top At_Offset_2
0bbc 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
0bbe 8408 | | Call 0x2,0x8
0bbf 00d9 | | Load_Top At_Offset_1
0bc0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0bc1 00d1 | | Pop_Control Pop_Count_1
0bc2 e5fe | | Load 0x2,-0x2
0bc3 e00d | | Load 0x0,0xd
0bc4 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0bc5 6816 |h | Jump_Zero 0xbdc
0bc6 e00e | | Load 0x0,0xe
0bc7 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bc8 4801 |H | Short_Literal 0x1
0bc9 4802 |H | Short_Literal 0x2
0bca e00b | | Load 0x0,0xb
0bcb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bcc 0334 | 4 | Declare_Variable Array,With_Constraint
0bcd 00db | | Load_Top At_Offset_3
0bce e00b | | Load 0x0,0xb
0bcf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bd0 4801 |H | Short_Literal 0x1
0bd1 00da | | Load_Top At_Offset_2
0bd2 01d6 | | Execute Vector,Field_Write
0bd3 00da | | Load_Top At_Offset_2
0bd4 e00b | | Load 0x0,0xb
0bd5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bd6 4802 |H | Short_Literal 0x2
0bd7 00da | | Load_Top At_Offset_2
0bd8 01d6 | | Execute Vector,Field_Write
0bd9 6006 |` | Indirect_Literal Discrete,0xbe0,{0x00000000, 0x00004021}
0bda e001 | | Load 0x0,0x1
0bdb 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0bdc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0bdd 0000 0000 | | .XXX[0x3]
0bdf 0000 | |
0be0 0000 0000 | | .LITERAL {0x00000000, 0x00004021}
0be4 0000 0000 | | .LITERAL {0x00000000, 0x00004022}
0be8 ; --------------------------------------------------------------------------------------
0be8 ; SUBPROGRAM
0be8 ; --------------------------------------------------------------------------------------
0be8 0bed | | .CONST 0x0bed ; Address of begin
0be9 0004 | | .CONST 0x0004 ; Address of exception handler
0bea 0002 | | .CONST 0x0002 ; Number of locals
0beb INIT_0be8:
0beb e403 | | Load 0x2,0x3
0bec 8013 | | Call 0x0,0x13
0bed BODY_0be8:
0bed e5fe | | Load 0x2,-0x2
0bee 801d | | Call 0x0,0x1d
0bef 7028 |p( | Jump_Nonzero 0xc18
0bf0 e403 | | Load 0x2,0x3
0bf1 e00b | | Load 0x0,0xb
0bf2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0bf3 0f01 | | Execute_Immediate Equal,0x1
0bf4 6823 |h# | Jump_Zero 0xc18
0bf5 e403 | | Load 0x2,0x3
0bf6 e00b | | Load 0x0,0xb
0bf7 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0bf8 01db | | Execute Vector,Length
0bf9 681e |h | Jump_Zero 0xc18
0bfa e5ff | | Load 0x2,-0x1
0bfb 0219 | | Execute Heap_Access,All_Read
0bfc 00d8 | | Load_Top At_Offset_0
0bfd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0bfe 00da | | Load_Top At_Offset_2
0bff 8407 | | Call 0x2,0x7
0c00 00d9 | | Load_Top At_Offset_1
0c01 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0c02 00d1 | | Pop_Control Pop_Count_1
0c03 e5fe | | Load 0x2,-0x2
0c04 e00d | | Load 0x0,0xd
0c05 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c06 6810 |h | Jump_Zero 0xc17
0c07 e00e | | Load 0x0,0xe
0c08 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c09 4801 |H | Short_Literal 0x1
0c0a 4801 |H | Short_Literal 0x1
0c0b e00b | | Load 0x0,0xb
0c0c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c0d 0334 | 4 | Declare_Variable Array,With_Constraint
0c0e 00da | | Load_Top At_Offset_2
0c0f e00b | | Load 0x0,0xb
0c10 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c11 4801 |H | Short_Literal 0x1
0c12 00da | | Load_Top At_Offset_2
0c13 01d6 | | Execute Vector,Field_Write
0c14 605b |`[ | Indirect_Literal Discrete,0xc70,{0x00000000, 0x00004024}
0c15 e001 | | Load 0x0,0x1
0c16 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c17 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c18 e5ff | | Load 0x2,-0x1
0c19 0219 | | Execute Heap_Access,All_Read
0c1a e402 | | Load 0x2,0x2
0c1b 00d9 | | Load_Top At_Offset_1
0c1c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c1d e405 | | Load 0x2,0x5
0c1e 8015 | | Call 0x0,0x15
0c1f 00da | | Load_Top At_Offset_2
0c20 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0c21 c402 | | Store 0x2,0x2
0c22 00d1 | | Pop_Control Pop_Count_1
0c23 e402 | | Load 0x2,0x2
0c24 7005 |p | Jump_Nonzero 0xc2a
0c25 4801 |H | Short_Literal 0x1
0c26 e5ff | | Load 0x2,-0x1
0c27 0217 | | Execute Heap_Access,All_Reference
0c28 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0c29 7806 |x | Jump 0xc30
0c2a e402 | | Load 0x2,0x2
0c2b e5fe | | Load 0x2,-0x2
0c2c e00d | | Load 0x0,0xd
0c2d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0c2e 00cc | | Action Pop_Block
0c2f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c30 e5ff | | Load 0x2,-0x1
0c31 0219 | | Execute Heap_Access,All_Read
0c32 00d8 | | Load_Top At_Offset_0
0c33 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0c34 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
0c36 8407 | | Call 0x2,0x7
0c37 00d9 | | Load_Top At_Offset_1
0c38 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0c39 00d1 | | Pop_Control Pop_Count_1
0c3a e5ff | | Load 0x2,-0x1
0c3b 0219 | | Execute Heap_Access,All_Read
0c3c 00d8 | | Load_Top At_Offset_0
0c3d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c3e 4800 |H | Short_Literal 0x0
0c3f e003 | | Load 0x0,0x3
0c40 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0c41 00d9 | | Load_Top At_Offset_1
0c42 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0c43 00d1 | | Pop_Control Pop_Count_1
0c44 e5ff | | Load 0x2,-0x1
0c45 0219 | | Execute Heap_Access,All_Read
0c46 00d8 | | Load_Top At_Offset_0
0c47 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c48 e5fe | | Load 0x2,-0x2
0c49 e016 | | Load 0x0,0x16
0c4a a017 | | Store_Unchecked 0x0,0x17
0c4b a018 | | Store_Unchecked 0x0,0x18
0c4c a019 | | Store_Unchecked 0x0,0x19
0c4d a01a | | Store_Unchecked 0x0,0x1a
0c4e a01b | | Store_Unchecked 0x0,0x1b
0c4f e01c | | Load 0x0,0x1c
0c50 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0c51 00d9 | | Load_Top At_Offset_1
0c52 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0c53 00d1 | | Pop_Control Pop_Count_1
0c54 e5fe | | Load 0x2,-0x2
0c55 e00d | | Load 0x0,0xd
0c56 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0c57 6810 |h | Jump_Zero 0xc68
0c58 e00e | | Load 0x0,0xe
0c59 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c5a 4801 |H | Short_Literal 0x1
0c5b 4801 |H | Short_Literal 0x1
0c5c e00b | | Load 0x0,0xb
0c5d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c5e 0334 | 4 | Declare_Variable Array,With_Constraint
0c5f 00da | | Load_Top At_Offset_2
0c60 e00b | | Load 0x0,0xb
0c61 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c62 4801 |H | Short_Literal 0x1
0c63 00da | | Load_Top At_Offset_2
0c64 01d6 | | Execute Vector,Field_Write
0c65 6006 |` | Indirect_Literal Discrete,0xc6c,{0x00000000, 0x00004023}
0c66 e001 | | Load 0x0,0x1
0c67 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c68 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c69 0000 0000 | | .XXX[0x3]
0c6b 0000 | |
0c6c 0000 0000 | | .LITERAL {0x00000000, 0x00004023}
0c70 0000 0000 | | .LITERAL {0x00000000, 0x00004024}
0c74 0000 0000 | | .BLANK 0000[0x4]
0c78 ; --------------------------------------------------------------------------------------
0c78 ; SUBPROGRAM
0c78 ; --------------------------------------------------------------------------------------
0c78 0c7f | | .CONST 0x0c7f ; Address of begin
0c79 0004 | | .CONST 0x0004 ; Address of exception handler
0c7a 0003 | | .CONST 0x0003 ; Number of locals
0c7b INIT_0c78:
0c7b e404 | | Load 0x2,0x4
0c7c 8013 | | Call 0x0,0x13
0c7d e403 | | Load 0x2,0x3
0c7e 8406 | | Call 0x2,0x6
0c7f BODY_0c78:
0c7f e5ff | | Load 0x2,-0x1
0c80 0219 | | Execute Heap_Access,All_Read
0c81 e402 | | Load 0x2,0x2
0c82 00d9 | | Load_Top At_Offset_1
0c83 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c84 e405 | | Load 0x2,0x5
0c85 8015 | | Call 0x0,0x15
0c86 00da | | Load_Top At_Offset_2
0c87 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0c88 c402 | | Store 0x2,0x2
0c89 00d1 | | Pop_Control Pop_Count_1
0c8a e402 | | Load 0x2,0x2
0c8b 7005 |p | Jump_Nonzero 0xc91
0c8c 4801 |H | Short_Literal 0x1
0c8d e5ff | | Load 0x2,-0x1
0c8e 0217 | | Execute Heap_Access,All_Reference
0c8f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0c90 7806 |x | Jump 0xc97
0c91 e402 | | Load 0x2,0x2
0c92 e5fe | | Load 0x2,-0x2
0c93 e00d | | Load 0x0,0xd
0c94 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0c95 00cc | | Action Pop_Block
0c96 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c97 e5ff | | Load 0x2,-0x1
0c98 0219 | | Execute Heap_Access,All_Read
0c99 00d8 | | Load_Top At_Offset_0
0c9a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0c9b e5fe | | Load 0x2,-0x2
0c9c e016 | | Load 0x0,0x16
0c9d a017 | | Store_Unchecked 0x0,0x17
0c9e a018 | | Store_Unchecked 0x0,0x18
0c9f a019 | | Store_Unchecked 0x0,0x19
0ca0 a01a | | Store_Unchecked 0x0,0x1a
0ca1 a01b | | Store_Unchecked 0x0,0x1b
0ca2 e01c | | Load 0x0,0x1c
0ca3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0ca4 00d9 | | Load_Top At_Offset_1
0ca5 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0ca6 00d1 | | Pop_Control Pop_Count_1
0ca7 e5ff | | Load 0x2,-0x1
0ca8 0219 | | Execute Heap_Access,All_Read
0ca9 00d8 | | Load_Top At_Offset_0
0caa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0cab 4800 |H | Short_Literal 0x0
0cac e003 | | Load 0x0,0x3
0cad 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0cae 00d9 | | Load_Top At_Offset_1
0caf 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0cb0 00d1 | | Pop_Control Pop_Count_1
0cb1 e5ff | | Load 0x2,-0x1
0cb2 0219 | | Execute Heap_Access,All_Read
0cb3 00d8 | | Load_Top At_Offset_0
0cb4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0cb5 00da | | Load_Top At_Offset_2
0cb6 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
0cb8 8408 | | Call 0x2,0x8
0cb9 00d9 | | Load_Top At_Offset_1
0cba 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0cbb 00d1 | | Pop_Control Pop_Count_1
0cbc e5fe | | Load 0x2,-0x2
0cbd e00d | | Load 0x0,0xd
0cbe 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0cbf 6816 |h | Jump_Zero 0xcd6
0cc0 e00e | | Load 0x0,0xe
0cc1 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cc2 4801 |H | Short_Literal 0x1
0cc3 4802 |H | Short_Literal 0x2
0cc4 e00b | | Load 0x0,0xb
0cc5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0cc6 0334 | 4 | Declare_Variable Array,With_Constraint
0cc7 00db | | Load_Top At_Offset_3
0cc8 e00b | | Load 0x0,0xb
0cc9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0cca 4801 |H | Short_Literal 0x1
0ccb 00da | | Load_Top At_Offset_2
0ccc 01d6 | | Execute Vector,Field_Write
0ccd 00da | | Load_Top At_Offset_2
0cce e00b | | Load 0x0,0xb
0ccf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0cd0 4802 |H | Short_Literal 0x2
0cd1 00da | | Load_Top At_Offset_2
0cd2 01d6 | | Execute Vector,Field_Write
0cd3 6004 |` | Indirect_Literal Discrete,0xcd8,{0x00000000, 0x00004021}
0cd4 e001 | | Load 0x0,0x1
0cd5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0cd6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cd7 0000 | | .XXX[0x1]
0cd8 0000 0000 | | .LITERAL {0x00000000, 0x00004021}
0cdc 0000 0000 | | .BLANK 0000[0x4]
0ce0 ; --------------------------------------------------------------------------------------
0ce0 ; SUBPROGRAM
0ce0 ; --------------------------------------------------------------------------------------
0ce0 0cf7 | | .CONST 0x0cf7 ; Address of begin
0ce1 0004 | | .CONST 0x0004 ; Address of exception handler
0ce2 0007 | | .CONST 0x0007 ; Number of locals
0ce3 INIT_0ce0:
0ce3 e003 | | Load 0x0,0x3
0ce4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ce5 02c7 | | Declare_Variable Any
0ce6 00d8 | | Load_Top At_Offset_0
0ce7 1c00 | | Execute_Immediate Run_Utility,0x0
0ce8 e7fe | | Load 0x3,-0x2
0ce9 e002 | | Load 0x0,0x2
0cea 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0ceb e7fe | | Load 0x3,-0x2
0cec e002 | | Load 0x0,0x2
0ced 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0cee 4801 |H | Short_Literal 0x1
0cef 00d9 | | Load_Top At_Offset_1
0cf0 e003 | | Load 0x0,0x3
0cf1 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0cf2 035b | [ | Declare_Type Array,Constrained
0cf3 0337 | 7 | Declare_Variable Array
0cf4 00e3 | | Load_Encached Natural_Cache
0cf5 029f 0d3b | ;| Declare_Subprogram INIT_0d38,For_Call
0cf7 BODY_0ce0:
0cf7 e7ff | | Load 0x3,-0x1
0cf8 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
0cfa 01df | | Execute Vector,Equal
0cfb 6805 |h | Jump_Zero 0xd01
0cfc e5ff | | Load 0x2,-0x1
0cfd 0217 | | Execute Heap_Access,All_Reference
0cfe 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0cff c802 | | Store 0x4,0x2
0d00 780d |x | Jump 0xd0e
0d01 e802 | | Load 0x4,0x2
0d02 e011 | | Load 0x0,0x11
0d03 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d04 e012 | | Load 0x0,0x12
0d05 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0d06 e012 | | Load 0x0,0x12
0d07 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0d08 00ea | | Load_Encached Null_String_Cache
0d09 8807 | | Call 0x4,0x7
0d0a 4801 |H | Short_Literal 0x1
0d0b e003 | | Load 0x0,0x3
0d0c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0d0d c802 | | Store 0x4,0x2
0d0e 00cf | | Action Mark_Auxiliary
0d0f 780f |x | Jump 0xd1f
0d10 00e3 | | Load_Encached Natural_Cache
0d11 e805 | | Load 0x4,0x5
0d12 e7fe | | Load 0x3,-0x2
0d13 e002 | | Load 0x0,0x2
0d14 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d15 00d1 | | Pop_Control Pop_Count_1
0d16 005b | [ | Store_Top Discrete,At_Offset_3
0d17 4801 |H | Short_Literal 0x1
0d18 00db | | Load_Top At_Offset_3
0d19 e805 | | Load 0x4,0x5
0d1a 01cf | | Execute Vector,Slice_Read
0d1b e802 | | Load 0x4,0x2
0d1c e003 | | Load 0x0,0x3
0d1d 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0d1e 00c9 | | Action Pop_Auxiliary_Loop
0d1f e7fe | | Load 0x3,-0x2
0d20 e002 | | Load 0x0,0x2
0d21 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0d22 6fed |o | Jump_Zero 0xd10
0d23 00ce | | Action Pop_Auxiliary
0d24 e7ff | | Load 0x3,-0x1
0d25 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
0d27 01de | | Execute Vector,Not_Equal
0d28 6804 |h | Jump_Zero 0xd2d
0d29 e802 | | Load 0x4,0x2
0d2a e003 | | Load 0x0,0x3
0d2b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0d2c c802 | | Store 0x4,0x2
0d2d e7fe | | Load 0x3,-0x2
0d2e e002 | | Load 0x0,0x2
0d2f 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0d30 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d31 0000 0000 | | .BLANK 0000[0x7]
0d38 ; --------------------------------------------------------------------------------------
0d38 ; SUBPROGRAM
0d38 ; --------------------------------------------------------------------------------------
0d38 0d3b | ; | .CONST 0x0d3b ; Address of begin
0d39 0004 | | .CONST 0x0004 ; Address of exception handler
0d3a 0001 | | .CONST 0x0001 ; Number of locals
0d3b BODY_0d38:
0d3b INIT_0d38:
0d3b e7ff | | Load 0x3,-0x1
0d3c 01db | | Execute Vector,Length
0d3d 7002 |p | Jump_Nonzero 0xd40
0d3e e803 | | Load 0x4,0x3
0d3f 00ca | | Action Exit_Nullary_Function
0d40 e7ff | | Load 0x3,-0x1
0d41 0335 | 5 | Declare_Variable Array,Duplicate
0d42 00cd | | Action Spare6_Action
0d43 00ca | | Action Exit_Nullary_Function
0d44 0000 0000 | | .BLANK 0000[0x4]
0d48 ; --------------------------------------------------------------------------------------
0d48 ; SUBPROGRAM
0d48 ; --------------------------------------------------------------------------------------
0d48 0db2 | | .CONST 0x0db2 ; Address of begin
0d49 0004 | | .CONST 0x0004 ; Address of exception handler
0d4a 0028 | ( | .CONST 0x0028 ; Number of locals
0d4b INIT_0d48:
0d4b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0d4c 029a 0dbb | | Declare_Subprogram INIT_0db8,For_Outer_Call,Visible,Unelaborated
0d4e 029a 0e53 | S| Declare_Subprogram INIT_0e50,For_Outer_Call,Visible,Unelaborated
0d50 029a 0ed3 | | Declare_Subprogram INIT_0ed0,For_Outer_Call,Visible,Unelaborated
0d52 029a 0edb | | Declare_Subprogram INIT_0ed8,For_Outer_Call,Visible,Unelaborated
0d54 029a 0f8b | | Declare_Subprogram INIT_0f88,For_Outer_Call,Visible,Unelaborated
0d56 029a 0fab | | Declare_Subprogram INIT_0fa8,For_Outer_Call,Visible,Unelaborated
0d58 029a 0fb3 | | Declare_Subprogram INIT_0fb0,For_Outer_Call,Visible,Unelaborated
0d5a 029a 0fc3 | | Declare_Subprogram INIT_0fc0,For_Outer_Call,Visible,Unelaborated
0d5c 029a 0fd3 | | Declare_Subprogram INIT_0fd0,For_Outer_Call,Visible,Unelaborated
0d5e 029a 0fdb | | Declare_Subprogram INIT_0fd8,For_Outer_Call,Visible,Unelaborated
0d60 029a 0fe3 | | Declare_Subprogram INIT_0fe0,For_Outer_Call,Visible,Unelaborated
0d62 029a 0feb | | Declare_Subprogram INIT_0fe8,For_Outer_Call,Visible,Unelaborated
0d64 029a 0ffb | | Declare_Subprogram INIT_0ff8,For_Outer_Call,Visible,Unelaborated
0d66 029a 100b | | Declare_Subprogram INIT_1008,For_Outer_Call,Visible,Unelaborated
0d68 4809 |H | Short_Literal 0x9
0d69 032a | * | Declare_Type Record,Incomplete
0d6a 00d8 | | Load_Top At_Offset_0
0d6b 02a0 | | Declare_Subprogram Null_Subprogram
0d6c e212 | | Load 0x1,0x12
0d6d 03a3 | | Complete_Type Heap_Access,By_Defining
0d6e 00bf | | Action Accept_Activation
0d6f e001 | | Load 0x0,0x1
0d70 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d71 e002 | | Load 0x0,0x2
0d72 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d73 e003 | | Load 0x0,0x3
0d74 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d75 e004 | | Load 0x0,0x4
0d76 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d77 00e1 | | Load_Encached Boolean_Cache
0d78 e002 | | Load 0x0,0x2
0d79 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d7a 00e1 | | Load_Encached Boolean_Cache
0d7b e005 | | Load 0x0,0x5
0d7c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0d7d e210 | | Load 0x1,0x10
0d7e 029f 1013 | | Declare_Subprogram INIT_1010,For_Call
0d80 e221 | ! | Load 0x1,0x21
0d81 0326 | & | Complete_Type Record,By_Defining
0d82 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0d83 00c7 | | Action Elaborate_Subprogram
0d84 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0d85 00c7 | | Action Elaborate_Subprogram
0d86 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0d87 00c7 | | Action Elaborate_Subprogram
0d88 029d 103b | ;| Declare_Subprogram INIT_1038,For_Outer_Call
0d8a 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0d8b 00c7 | | Action Elaborate_Subprogram
0d8c 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0d8d 00c7 | | Action Elaborate_Subprogram
0d8e 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0d8f 00c7 | | Action Elaborate_Subprogram
0d90 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0d91 00c7 | | Action Elaborate_Subprogram
0d92 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0d93 00c7 | | Action Elaborate_Subprogram
0d94 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0d95 00c7 | | Action Elaborate_Subprogram
0d96 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0d97 00c7 | | Action Elaborate_Subprogram
0d98 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0d99 00c7 | | Action Elaborate_Subprogram
0d9a 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0d9b 00c7 | | Action Elaborate_Subprogram
0d9c e006 | | Load 0x0,0x6
0d9d e007 | | Load 0x0,0x7
0d9e 00db | | Load_Top At_Offset_3
0d9f e212 | | Load 0x1,0x12
0da0 e008 | | Load 0x0,0x8
0da1 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0da2 0387 | | Declare_Variable Package
0da3 00d8 | | Load_Top At_Offset_0
0da4 020f | | Execute Module,Activate
0da5 e008 | | Load 0x0,0x8
0da6 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0da7 00c6 | | Action Check_Subprogram_Elaborated
0da8 00da | | Load_Top At_Offset_2
0da9 e212 | | Load 0x1,0x12
0daa e009 | | Load 0x0,0x9
0dab e00a | | Load 0x0,0xa
0dac 4800 |H | Short_Literal 0x0
0dad 0007 | | Action Break_Optional
0dae 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0daf 00c7 | | Action Elaborate_Subprogram
0db0 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0db1 00c7 | | Action Elaborate_Subprogram
0db2 BODY_0d48:
0db2 00bc | | Action Signal_Activated
0db3 00bb | | Action Signal_Completion
0db4 0000 0000 | | .BLANK 0000[0x4]
0db8 ; --------------------------------------------------------------------------------------
0db8 ; SUBPROGRAM
0db8 ; --------------------------------------------------------------------------------------
0db8 0dc7 | | .CONST 0x0dc7 ; Address of begin
0db9 0e0a | | .CONST 0x0e0a ; Address of exception handler
0dba 0003 | | .CONST 0x0003 ; Number of locals
0dbb INIT_0db8:
0dbb e004 | | Load 0x0,0x4
0dbc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0dbd 02c7 | | Declare_Variable Any
0dbe 00d8 | | Load_Top At_Offset_0
0dbf 1c00 | | Execute_Immediate Run_Utility,0x0
0dc0 e212 | | Load 0x1,0x12
0dc1 e00b | | Load 0x0,0xb
0dc2 180d | | Execute Package,Field_Execute,Field_Number 0xd
0dc3 039c | | Declare_Variable Heap_Access,By_Allocation
0dc4 00d8 | | Load_Top At_Offset_0
0dc5 0217 | | Execute Heap_Access,All_Reference
0dc6 1c00 | | Execute_Immediate Run_Utility,0x0
0dc7 BODY_0db8:
0dc7 e5ff | | Load 0x2,-0x1
0dc8 e20f | | Load 0x1,0xf
0dc9 0119 | | Execute Any,Check_In_Formal_Type
0dca e210 | | Load 0x1,0x10
0dcb e00b | | Load 0x0,0xb
0dcc 180d | | Execute Package,Field_Execute,Field_Number 0xd
0dcd 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0dce 00d9 | | Load_Top At_Offset_1
0dcf 0217 | | Execute Heap_Access,All_Reference
0dd0 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0dd1 e5fa | | Load 0x2,-0x6
0dd2 00da | | Load_Top At_Offset_2
0dd3 e5fd | | Load 0x2,-0x3
0dd4 e5fe | | Load 0x2,-0x2
0dd5 800c | | Call 0x0,0xc
0dd6 c402 | | Store 0x2,0x2
0dd7 c5fa | | Store 0x2,-0x6
0dd8 e5fa | | Load 0x2,-0x6
0dd9 7010 |p | Jump_Nonzero 0xdea
0dda e00d | | Load 0x0,0xd
0ddb 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ddc 4801 |H | Short_Literal 0x1
0ddd 4801 |H | Short_Literal 0x1
0dde e00e | | Load 0x0,0xe
0ddf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0de0 0334 | 4 | Declare_Variable Array,With_Constraint
0de1 e5fe | | Load 0x2,-0x2
0de2 e00e | | Load 0x0,0xe
0de3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0de4 4801 |H | Short_Literal 0x1
0de5 00da | | Load_Top At_Offset_2
0de6 01d6 | | Execute Vector,Field_Write
0de7 6064 |`d | Indirect_Literal Discrete,0xe4c,{0x00000000, 0x00004029}
0de8 e001 | | Load 0x0,0x1
0de9 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0dea e5fa | | Load 0x2,-0x6
0deb 00d9 | | Load_Top At_Offset_1
0dec 0217 | | Execute Heap_Access,All_Reference
0ded 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0dee e5fc | | Load 0x2,-0x4
0def 00d9 | | Load_Top At_Offset_1
0df0 0217 | | Execute Heap_Access,All_Reference
0df1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0df2 00d9 | | Load_Top At_Offset_1
0df3 00d9 | | Load_Top At_Offset_1
0df4 0217 | | Execute Heap_Access,All_Reference
0df5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0df6 4801 |H | Short_Literal 0x1
0df7 00d9 | | Load_Top At_Offset_1
0df8 0217 | | Execute Heap_Access,All_Reference
0df9 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0dfa 4800 |H | Short_Literal 0x0
0dfb 00d9 | | Load_Top At_Offset_1
0dfc 0217 | | Execute Heap_Access,All_Reference
0dfd 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0dfe e005 | | Load 0x0,0x5
0dff 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0e00 00d9 | | Load_Top At_Offset_1
0e01 0217 | | Execute Heap_Access,All_Reference
0e02 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0e03 00d8 | | Load_Top At_Offset_0
0e04 a5fb | | Store_Unchecked 0x2,-0x5
0e05 00d8 | | Load_Top At_Offset_0
0e06 0217 | | Execute Heap_Access,All_Reference
0e07 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0e08 a5fa | | Store_Unchecked 0x2,-0x6
0e09 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e0a TRAP_0db8:
0e0a e00f | | Load 0x0,0xf
0e0b 010f | | Execute Exception,Equal
0e0c 681a |h | Jump_Zero 0xe27
0e0d e001 | | Load 0x0,0x1
0e0e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e0f 4801 |H | Short_Literal 0x1
0e10 4802 |H | Short_Literal 0x2
0e11 e00e | | Load 0x0,0xe
0e12 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e13 0334 | 4 | Declare_Variable Array,With_Constraint
0e14 e5fe | | Load 0x2,-0x2
0e15 e00e | | Load 0x0,0xe
0e16 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e17 4801 |H | Short_Literal 0x1
0e18 00da | | Load_Top At_Offset_2
0e19 01d6 | | Execute Vector,Field_Write
0e1a e5fd | | Load 0x2,-0x3
0e1b e00e | | Load 0x0,0xe
0e1c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0e1d 4802 |H | Short_Literal 0x2
0e1e 00da | | Load_Top At_Offset_2
0e1f 01d6 | | Execute Vector,Field_Write
0e20 6027 |`' | Indirect_Literal Discrete,0xe48,{0x00000000, 0x0000400a}
0e21 e001 | | Load 0x0,0x1
0e22 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0e23 c5fa | | Store 0x2,-0x6
0e24 e212 | | Load 0x1,0x12
0e25 a5fb | | Store_Unchecked 0x2,-0x5
0e26 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e27 010b | | Execute Exception,Is_Storage_Error
0e28 681a |h | Jump_Zero 0xe43
0e29 e001 | | Load 0x0,0x1
0e2a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e2b 4801 |H | Short_Literal 0x1
0e2c 4802 |H | Short_Literal 0x2
0e2d e00e | | Load 0x0,0xe
0e2e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e2f 0334 | 4 | Declare_Variable Array,With_Constraint
0e30 e5fe | | Load 0x2,-0x2
0e31 e00e | | Load 0x0,0xe
0e32 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e33 4801 |H | Short_Literal 0x1
0e34 00da | | Load_Top At_Offset_2
0e35 01d6 | | Execute Vector,Field_Write
0e36 e5fd | | Load 0x2,-0x3
0e37 e00e | | Load 0x0,0xe
0e38 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0e39 4802 |H | Short_Literal 0x2
0e3a 00da | | Load_Top At_Offset_2
0e3b 01d6 | | Execute Vector,Field_Write
0e3c 6007 |` | Indirect_Literal Discrete,0xe44,{0x00000000, 0x00004003}
0e3d e001 | | Load 0x0,0x1
0e3e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0e3f c5fa | | Store 0x2,-0x6
0e40 e212 | | Load 0x1,0x12
0e41 a5fb | | Store_Unchecked 0x2,-0x5
0e42 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e43 0100 | | Execute Exception,Raise
0e44 0000 0000 | | .LITERAL {0x00000000, 0x00004003}
0e48 0000 0000 | | .LITERAL {0x00000000, 0x0000400a}
0e4c 0000 0000 | | .LITERAL {0x00000000, 0x00004029}
0e50 ; --------------------------------------------------------------------------------------
0e50 ; SUBPROGRAM
0e50 ; --------------------------------------------------------------------------------------
0e50 0e5f | _ | .CONST 0x0e5f ; Address of begin
0e51 0eae | | .CONST 0x0eae ; Address of exception handler
0e52 0003 | | .CONST 0x0003 ; Number of locals
0e53 INIT_0e50:
0e53 e002 | | Load 0x0,0x2
0e54 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e55 02c7 | | Declare_Variable Any
0e56 00d8 | | Load_Top At_Offset_0
0e57 1c00 | | Execute_Immediate Run_Utility,0x0
0e58 e212 | | Load 0x1,0x12
0e59 e00b | | Load 0x0,0xb
0e5a 180d | | Execute Package,Field_Execute,Field_Number 0xd
0e5b 039c | | Declare_Variable Heap_Access,By_Allocation
0e5c 00d8 | | Load_Top At_Offset_0
0e5d 0217 | | Execute Heap_Access,All_Reference
0e5e 1c00 | | Execute_Immediate Run_Utility,0x0
0e5f BODY_0e50:
0e5f e5ff | | Load 0x2,-0x1
0e60 e20f | | Load 0x1,0xf
0e61 0119 | | Execute Any,Check_In_Formal_Type
0e62 e210 | | Load 0x1,0x10
0e63 e00b | | Load 0x0,0xb
0e64 180d | | Execute Package,Field_Execute,Field_Number 0xd
0e65 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0e66 00d9 | | Load_Top At_Offset_1
0e67 0217 | | Execute Heap_Access,All_Reference
0e68 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0e69 e001 | | Load 0x0,0x1
0e6a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e6b 00d9 | | Load_Top At_Offset_1
0e6c 0217 | | Execute Heap_Access,All_Reference
0e6d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0e6e e5fd | | Load 0x2,-0x3
0e6f 00d9 | | Load_Top At_Offset_1
0e70 0217 | | Execute Heap_Access,All_Reference
0e71 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0e72 e5fe | | Load 0x2,-0x2
0e73 00d9 | | Load_Top At_Offset_1
0e74 0217 | | Execute Heap_Access,All_Reference
0e75 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0e76 00d9 | | Load_Top At_Offset_1
0e77 e010 | | Load 0x0,0x10
0e78 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0e79 e004 | | Load 0x0,0x4
0e7a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0e7b e004 | | Load 0x0,0x4
0e7c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0e7d 00ea | | Load_Encached Null_String_Cache
0e7e e5fe | | Load 0x2,-0x2
0e7f e004 | | Load 0x0,0x4
0e80 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0e81 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0e82 4801 |H | Short_Literal 0x1
0e83 e002 | | Load 0x0,0x2
0e84 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0e85 c402 | | Store 0x2,0x2
0e86 e00d | | Load 0x0,0xd
0e87 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e88 4801 |H | Short_Literal 0x1
0e89 4801 |H | Short_Literal 0x1
0e8a e00e | | Load 0x0,0xe
0e8b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0e8c 0334 | 4 | Declare_Variable Array,With_Constraint
0e8d e5fe | | Load 0x2,-0x2
0e8e e00e | | Load 0x0,0xe
0e8f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e90 4801 |H | Short_Literal 0x1
0e91 00da | | Load_Top At_Offset_2
0e92 01d6 | | Execute Vector,Field_Write
0e93 6034 |`4 | Indirect_Literal Discrete,0xec8,{0x00000000, 0x0000402a}
0e94 e001 | | Load 0x0,0x1
0e95 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0e96 00d9 | | Load_Top At_Offset_1
0e97 00d9 | | Load_Top At_Offset_1
0e98 0217 | | Execute Heap_Access,All_Reference
0e99 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0e9a 4800 |H | Short_Literal 0x0
0e9b 00d9 | | Load_Top At_Offset_1
0e9c 0217 | | Execute Heap_Access,All_Reference
0e9d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0e9e 4800 |H | Short_Literal 0x0
0e9f 00d9 | | Load_Top At_Offset_1
0ea0 0217 | | Execute Heap_Access,All_Reference
0ea1 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0ea2 e005 | | Load 0x0,0x5
0ea3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0ea4 00d9 | | Load_Top At_Offset_1
0ea5 0217 | | Execute Heap_Access,All_Reference
0ea6 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0ea7 00d8 | | Load_Top At_Offset_0
0ea8 a5fc | | Store_Unchecked 0x2,-0x4
0ea9 00d8 | | Load_Top At_Offset_0
0eaa 0217 | | Execute Heap_Access,All_Reference
0eab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0eac a5fb | | Store_Unchecked 0x2,-0x5
0ead 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0eae TRAP_0e50:
0eae 010b | | Execute Exception,Is_Storage_Error
0eaf 6814 |h | Jump_Zero 0xec4
0eb0 e001 | | Load 0x0,0x1
0eb1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0eb2 4801 |H | Short_Literal 0x1
0eb3 4801 |H | Short_Literal 0x1
0eb4 e00e | | Load 0x0,0xe
0eb5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0eb6 0334 | 4 | Declare_Variable Array,With_Constraint
0eb7 e5fe | | Load 0x2,-0x2
0eb8 e00e | | Load 0x0,0xe
0eb9 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0eba 4801 |H | Short_Literal 0x1
0ebb 00da | | Load_Top At_Offset_2
0ebc 01d6 | | Execute Vector,Field_Write
0ebd 6786 |g | Indirect_Literal Discrete,0xe44,{0x00000000, 0x00004003}
0ebe e001 | | Load 0x0,0x1
0ebf 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0ec0 c5fb | | Store 0x2,-0x5
0ec1 e212 | | Load 0x1,0x12
0ec2 a5fc | | Store_Unchecked 0x2,-0x4
0ec3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0ec4 0100 | | Execute Exception,Raise
0ec5 0000 0000 | | .XXX[0x3]
0ec7 0000 | |
0ec8 0000 0000 | | .LITERAL {0x00000000, 0x0000402a}
0ecc 0000 0000 | | .BLANK 0000[0x4]
0ed0 ; --------------------------------------------------------------------------------------
0ed0 ; SUBPROGRAM
0ed0 ; --------------------------------------------------------------------------------------
0ed0 0ed3 | | .CONST 0x0ed3 ; Address of begin
0ed1 0004 | | .CONST 0x0004 ; Address of exception handler
0ed2 0001 | | .CONST 0x0001 ; Number of locals
0ed3 BODY_0ed0:
0ed3 INIT_0ed0:
0ed3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ed4 0000 0000 | | .BLANK 0000[0x4]
0ed8 ; --------------------------------------------------------------------------------------
0ed8 ; SUBPROGRAM
0ed8 ; --------------------------------------------------------------------------------------
0ed8 0f07 | | .CONST 0x0f07 ; Address of begin
0ed9 0f5b | [ | .CONST 0x0f5b ; Address of exception handler
0eda 000f | | .CONST 0x000f ; Number of locals
0edb INIT_0ed8:
0edb e001 | | Load 0x0,0x1
0edc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0edd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0ede e002 | | Load 0x0,0x2
0edf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ee0 02c7 | | Declare_Variable Any
0ee1 00d8 | | Load_Top At_Offset_0
0ee2 1c00 | | Execute_Immediate Run_Utility,0x0
0ee3 e002 | | Load 0x0,0x2
0ee4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ee5 02c7 | | Declare_Variable Any
0ee6 00d8 | | Load_Top At_Offset_0
0ee7 1c00 | | Execute_Immediate Run_Utility,0x0
0ee8 e00e | | Load 0x0,0xe
0ee9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0eea e00e | | Load 0x0,0xe
0eeb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0eec 00ea | | Load_Encached Null_String_Cache
0eed e5ff | | Load 0x2,-0x1
0eee 0217 | | Execute Heap_Access,All_Reference
0eef 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0ef0 8011 | | Call 0x0,0x11
0ef1 4801 |H | Short_Literal 0x1
0ef2 4900 |I | Short_Literal 0x100
0ef3 00e9 | | Load_Encached String_Cache
0ef4 035b | [ | Declare_Type Array,Constrained
0ef5 0337 | 7 | Declare_Variable Array
0ef6 00e3 | | Load_Encached Natural_Cache
0ef7 e5ff | | Load 0x2,-0x1
0ef8 0217 | | Execute Heap_Access,All_Reference
0ef9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0efa e004 | | Load 0x0,0x4
0efb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0efc 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0efd 029f 106b | k| Declare_Subprogram INIT_1068,For_Call
0eff 029f 10f3 | | Declare_Subprogram INIT_10f0,For_Call
0f01 029f 110b | | Declare_Subprogram INIT_1108,For_Call
0f03 029f 11e3 | | Declare_Subprogram INIT_11e0,For_Call
0f05 029f 1283 | | Declare_Subprogram INIT_1280,For_Call
0f07 BODY_0ed8:
0f07 e5fe | | Load 0x2,-0x2
0f08 e012 | | Load 0x0,0x12
0f09 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0f0a 4612 |F | Jump_Case 0x13
0f0b 7812 |x | Jump 0xf1e ; case 0x0
0f0c 7811 |x | Jump 0xf1e ; case 0x1
0f0d 7810 |x | Jump 0xf1e ; case 0x2
0f0e 780f |x | Jump 0xf1e ; case 0x3
0f0f 780e |x | Jump 0xf1e ; case 0x4
0f10 780d |x | Jump 0xf1e ; case 0x5
0f11 780c |x | Jump 0xf1e ; case 0x6
0f12 780b |x | Jump 0xf1e ; case 0x7
0f13 780a |x | Jump 0xf1e ; case 0x8
0f14 7809 |x | Jump 0xf1e ; case 0x9
0f15 7821 |x! | Jump 0xf37 ; case 0xa
0f16 782c |x, | Jump 0xf43 ; case 0xb
0f17 7837 |x7 | Jump 0xf4f ; case 0xc
0f18 7805 |x | Jump 0xf1e ; case 0xd
0f19 7804 |x | Jump 0xf1e ; case 0xe
0f1a 7803 |x | Jump 0xf1e ; case 0xf
0f1b 7802 |x | Jump 0xf1e ; case 0x10
0f1c 7801 |x | Jump 0xf1e ; case 0x11
0f1d 7800 |x | Jump 0xf1e ; case 0x12
0f1e e00d | | Load 0x0,0xd
0f1f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0f20 4801 |H | Short_Literal 0x1
0f21 4801 |H | Short_Literal 0x1
0f22 e00e | | Load 0x0,0xe
0f23 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f24 0334 | 4 | Declare_Variable Array,With_Constraint
0f25 e5fe | | Load 0x2,-0x2
0f26 e012 | | Load 0x0,0x12
0f27 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0f28 4801 |H | Short_Literal 0x1
0f29 00da | | Load_Top At_Offset_2
0f2a 01d6 | | Execute Vector,Field_Write
0f2b 6058 |`X | Indirect_Literal Discrete,0xf84,{0x00000000, 0x00004016}
0f2c e001 | | Load 0x0,0x1
0f2d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0f2e e00e | | Load 0x0,0xe
0f2f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0f30 6053 |`S | Indirect_Literal Discrete,0xf84,{0x00000000, 0x00004016}
0f31 e001 | | Load 0x0,0x1
0f32 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f33 e5fe | | Load 0x2,-0x2
0f34 e012 | | Load 0x0,0x12
0f35 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0f36 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f37 4801 |H | Short_Literal 0x1
0f38 e5fe | | Load 0x2,-0x2
0f39 e012 | | Load 0x0,0x12
0f3a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f3b a405 | | Store_Unchecked 0x2,0x5
0f3c 4802 |H | Short_Literal 0x2
0f3d e5fe | | Load 0x2,-0x2
0f3e e012 | | Load 0x0,0x12
0f3f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f40 a406 | | Store_Unchecked 0x2,0x6
0f41 840d | | Call 0x2,0xd
0f42 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f43 4801 |H | Short_Literal 0x1
0f44 e5fe | | Load 0x2,-0x2
0f45 e012 | | Load 0x0,0x12
0f46 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f47 a405 | | Store_Unchecked 0x2,0x5
0f48 4802 |H | Short_Literal 0x2
0f49 e5fe | | Load 0x2,-0x2
0f4a e012 | | Load 0x0,0x12
0f4b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f4c a406 | | Store_Unchecked 0x2,0x6
0f4d 840e | | Call 0x2,0xe
0f4e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f4f 4801 |H | Short_Literal 0x1
0f50 e5fe | | Load 0x2,-0x2
0f51 e012 | | Load 0x0,0x12
0f52 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f53 a405 | | Store_Unchecked 0x2,0x5
0f54 4802 |H | Short_Literal 0x2
0f55 e5fe | | Load 0x2,-0x2
0f56 e012 | | Load 0x0,0x12
0f57 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0f58 a406 | | Store_Unchecked 0x2,0x6
0f59 840f | | Call 0x2,0xf
0f5a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f5b TRAP_0ed8:
0f5b e013 | | Load 0x0,0x13
0f5c 010f | | Execute Exception,Equal
0f5d 681b |h | Jump_Zero 0xf79
0f5e e5ff | | Load 0x2,-0x1
0f5f 8222 | " | Call 0x1,0x22
0f60 e00d | | Load 0x0,0xd
0f61 180e | | Execute Package,Field_Execute,Field_Number 0xe
0f62 4801 |H | Short_Literal 0x1
0f63 4801 |H | Short_Literal 0x1
0f64 e00e | | Load 0x0,0xe
0f65 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0f66 0334 | 4 | Declare_Variable Array,With_Constraint
0f67 e5fe | | Load 0x2,-0x2
0f68 e012 | | Load 0x0,0x12
0f69 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0f6a 4801 |H | Short_Literal 0x1
0f6b 00da | | Load_Top At_Offset_2
0f6c 01d6 | | Execute Vector,Field_Write
0f6d 6012 |` | Indirect_Literal Discrete,0xf80,{0x00000000, 0x00004019}
0f6e e001 | | Load 0x0,0x1
0f6f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0f70 e00e | | Load 0x0,0xe
0f71 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0f72 600d |` | Indirect_Literal Discrete,0xf80,{0x00000000, 0x00004019}
0f73 e001 | | Load 0x0,0x1
0f74 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0f75 e5fe | | Load 0x2,-0x2
0f76 e012 | | Load 0x0,0x12
0f77 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0f78 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0f79 e5ff | | Load 0x2,-0x1
0f7a 8222 | " | Call 0x1,0x22
0f7b 00d8 | | Load_Top At_Offset_0
0f7c 0101 | | Execute Exception,Reraise
0f7d 0000 0000 | | .XXX[0x3]
0f7f 0000 | |
0f80 0000 0000 | | .LITERAL {0x00000000, 0x00004019}
0f84 0000 0000 | | .LITERAL {0x00000000, 0x00004016}
0f88 ; --------------------------------------------------------------------------------------
0f88 ; SUBPROGRAM
0f88 ; --------------------------------------------------------------------------------------
0f88 0f8b | | .CONST 0x0f8b ; Address of begin
0f89 0004 | | .CONST 0x0004 ; Address of exception handler
0f8a 0001 | | .CONST 0x0001 ; Number of locals
0f8b BODY_0f88:
0f8b INIT_0f88:
0f8b 00da | | Load_Top At_Offset_2
0f8c 0217 | | Execute Heap_Access,All_Reference
0f8d 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0f8e 0219 | | Execute Heap_Access,All_Read
0f8f c5fe | | Store 0x2,-0x2
0f90 00da | | Load_Top At_Offset_2
0f91 0217 | | Execute Heap_Access,All_Reference
0f92 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0f93 7009 |p | Jump_Nonzero 0xf9d
0f94 00da | | Load_Top At_Offset_2
0f95 0219 | | Execute Heap_Access,All_Read
0f96 00d8 | | Load_Top At_Offset_0
0f97 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0f98 e002 | | Load 0x0,0x2
0f99 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0f9a 00d9 | | Load_Top At_Offset_1
0f9b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0f9c 00d1 | | Pop_Control Pop_Count_1
0f9d e210 | | Load 0x1,0x10
0f9e 00db | | Load_Top At_Offset_3
0f9f 0217 | | Execute Heap_Access,All_Reference
0fa0 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0fa1 00da | | Load_Top At_Offset_2
0fa2 8222 | " | Call 0x1,0x22
0fa3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0fa4 0000 0000 | | .BLANK 0000[0x4]
0fa8 ; --------------------------------------------------------------------------------------
0fa8 ; SUBPROGRAM
0fa8 ; --------------------------------------------------------------------------------------
0fa8 0fab | | .CONST 0x0fab ; Address of begin
0fa9 0004 | | .CONST 0x0004 ; Address of exception handler
0faa 0001 | | .CONST 0x0001 ; Number of locals
0fab BODY_0fa8:
0fab INIT_0fa8:
0fab 00da | | Load_Top At_Offset_2
0fac 0217 | | Execute Heap_Access,All_Reference
0fad 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0fae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0faf 0000 | | .XXX[0x1]
0fb0 ; --------------------------------------------------------------------------------------
0fb0 ; SUBPROGRAM
0fb0 ; --------------------------------------------------------------------------------------
0fb0 0fb3 | | .CONST 0x0fb3 ; Address of begin
0fb1 0004 | | .CONST 0x0004 ; Address of exception handler
0fb2 0001 | | .CONST 0x0001 ; Number of locals
0fb3 BODY_0fb0:
0fb3 INIT_0fb0:
0fb3 00da | | Load_Top At_Offset_2
0fb4 0217 | | Execute Heap_Access,All_Reference
0fb5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0fb6 00d8 | | Load_Top At_Offset_0
0fb7 0120 | | Execute Any,Is_Value
0fb8 7002 |p | Jump_Nonzero 0xfbb
0fb9 00d8 | | Load_Top At_Offset_0
0fba 011e | | Execute Any,Convert
0fbb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0fbc 0000 0000 | | .BLANK 0000[0x4]
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 e210 | | Load 0x1,0x10
0fc7 0213 | | Execute Heap_Access,Check_In_Type
0fc8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0fc9 0000 0000 | | .BLANK 0000[0x7]
0fd0 ; --------------------------------------------------------------------------------------
0fd0 ; SUBPROGRAM
0fd0 ; --------------------------------------------------------------------------------------
0fd0 0fd3 | | .CONST 0x0fd3 ; Address of begin
0fd1 0004 | | .CONST 0x0004 ; Address of exception handler
0fd2 0001 | | .CONST 0x0001 ; Number of locals
0fd3 BODY_0fd0:
0fd3 INIT_0fd0:
0fd3 00da | | Load_Top At_Offset_2
0fd4 0217 | | Execute Heap_Access,All_Reference
0fd5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0fd6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0fd7 0000 | | .XXX[0x1]
0fd8 ; --------------------------------------------------------------------------------------
0fd8 ; SUBPROGRAM
0fd8 ; --------------------------------------------------------------------------------------
0fd8 0fdb | | .CONST 0x0fdb ; Address of begin
0fd9 0004 | | .CONST 0x0004 ; Address of exception handler
0fda 0001 | | .CONST 0x0001 ; Number of locals
0fdb BODY_0fd8:
0fdb INIT_0fd8:
0fdb 00db | | Load_Top At_Offset_3
0fdc 00db | | Load_Top At_Offset_3
0fdd 0217 | | Execute Heap_Access,All_Reference
0fde 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0fdf 4503 |E | Exit_Suprogram New_Top_Offset 0x3
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 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0fe6 0f00 | | Execute_Immediate Equal,0x0
0fe7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 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 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0fee e001 | | Load 0x0,0x1
0fef 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0ff0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ff1 0000 0000 | | .BLANK 0000[0x7]
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 e00b | | Load 0x0,0xb
0ffd 180d | | Execute Package,Field_Execute,Field_Number 0xd
0ffe e224 | $ | Load 0x1,0x24
0fff e225 | % | Load 0x1,0x25
1000 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
1001 e008 | | Load 0x0,0x8
1002 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1003 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1004 0000 0000 | | .BLANK 0000[0x4]
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 e223 | # | Load 0x1,0x23
100d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
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 4608 |F | Jump_Case 0x9
1014 7808 |x | Jump 0x101d ; case 0x0
1015 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
1016 7819 |x | Jump 0x1030 ; case 0x2
1017 7818 |x | Jump 0x1030 ; case 0x3
1018 7817 |x | Jump 0x1030 ; case 0x4
1019 7816 |x | Jump 0x1030 ; case 0x5
101a 7815 |x | Jump 0x1030 ; case 0x6
101b 7814 |x | Jump 0x1030 ; case 0x7
101c 7813 |x | Jump 0x1030 ; case 0x8
101d 00da | | Load_Top At_Offset_2
101e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
101f 0125 | % | Execute Any,Set_Constraint
1020 00da | | Load_Top At_Offset_2
1021 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
1022 1c00 | | Execute_Immediate Run_Utility,0x0
1023 00da | | Load_Top At_Offset_2
1024 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
1025 0125 | % | Execute Any,Set_Constraint
1026 00da | | Load_Top At_Offset_2
1027 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
1028 1c00 | | Execute_Immediate Run_Utility,0x0
1029 00da | | Load_Top At_Offset_2
102a 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
102b 0125 | % | Execute Any,Set_Constraint
102c 00da | | Load_Top At_Offset_2
102d 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
102e 1c00 | | Execute_Immediate Run_Utility,0x0
102f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
1030 0869 | i | Execute_Immediate Raise,0x69
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 0217 | | Execute Heap_Access,All_Reference
103d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
103e 6827 |h' | Jump_Zero 0x1066
103f 00da | | Load_Top At_Offset_2
1040 0217 | | Execute Heap_Access,All_Reference
1041 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1042 e002 | | Load 0x0,0x2
1043 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
1044 7014 |p | Jump_Nonzero 0x1059
1045 00da | | Load_Top At_Offset_2
1046 0219 | | Execute Heap_Access,All_Read
1047 00d8 | | Load_Top At_Offset_0
1048 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1049 e010 | | Load 0x0,0x10
104a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
104b e004 | | Load 0x0,0x4
104c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
104d 00ea | | Load_Encached Null_String_Cache
104e 00ea | | Load_Encached Null_String_Cache
104f e5ff | | Load 0x2,-0x1
1050 0217 | | Execute Heap_Access,All_Reference
1051 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
1052 8011 | | Call 0x0,0x11
1053 4800 |H | Short_Literal 0x0
1054 e002 | | Load 0x0,0x2
1055 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1056 00d9 | | Load_Top At_Offset_1
1057 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1058 00d1 | | Pop_Control Pop_Count_1
1059 00da | | Load_Top At_Offset_2
105a 0219 | | Execute Heap_Access,All_Read
105b 00d8 | | Load_Top At_Offset_0
105c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
105d e002 | | Load 0x0,0x2
105e 181a | | Execute Package,Field_Execute,Field_Number 0x1a
105f 00d9 | | Load_Top At_Offset_1
1060 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1061 00d1 | | Pop_Control Pop_Count_1
1062 4800 |H | Short_Literal 0x0
1063 00db | | Load_Top At_Offset_3
1064 0217 | | Execute Heap_Access,All_Reference
1065 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1066 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1067 0000 | | .XXX[0x1]
1068 ; --------------------------------------------------------------------------------------
1068 ; SUBPROGRAM
1068 ; --------------------------------------------------------------------------------------
1068 106b | k | .CONST 0x106b ; Address of begin
1069 0004 | | .CONST 0x0004 ; Address of exception handler
106a 0001 | | .CONST 0x0001 ; Number of locals
106b BODY_1068:
106b INIT_1068:
106b 00da | | Load_Top At_Offset_2
106c 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
106e 01df | | Execute Vector,Equal
106f 680a |h | Jump_Zero 0x107a
1070 e5ff | | Load 0x2,-0x1
1071 0217 | | Execute Heap_Access,All_Reference
1072 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1073 c404 | | Store 0x2,0x4
1074 e404 | | Load 0x2,0x4
1075 4800 |H | Short_Literal 0x0
1076 e002 | | Load 0x0,0x2
1077 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1078 c404 | | Store 0x2,0x4
1079 780b |x | Jump 0x1085
107a e404 | | Load 0x2,0x4
107b e010 | | Load 0x0,0x10
107c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
107d e004 | | Load 0x0,0x4
107e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
107f 00ea | | Load_Encached Null_String_Cache
1080 e7ff | | Load 0x3,-0x1
1081 4800 |H | Short_Literal 0x0
1082 e002 | | Load 0x0,0x2
1083 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1084 c404 | | Store 0x2,0x4
1085 e5ff | | Load 0x2,-0x1
1086 0217 | | Execute Heap_Access,All_Reference
1087 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1088 681d |h | Jump_Zero 0x10a6
1089 00db | | Load_Top At_Offset_3
108a 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
108c 01df | | Execute Vector,Equal
108d 680a |h | Jump_Zero 0x1098
108e e5ff | | Load 0x2,-0x1
108f 0217 | | Execute Heap_Access,All_Reference
1090 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1091 c403 | | Store 0x2,0x3
1092 e403 | | Load 0x2,0x3
1093 4801 |H | Short_Literal 0x1
1094 e002 | | Load 0x0,0x2
1095 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1096 c403 | | Store 0x2,0x3
1097 7826 |x& | Jump 0x10be
1098 e403 | | Load 0x2,0x3
1099 e010 | | Load 0x0,0x10
109a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
109b e004 | | Load 0x0,0x4
109c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
109d e004 | | Load 0x0,0x4
109e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
109f 00ea | | Load_Encached Null_String_Cache
10a0 e7fe | | Load 0x3,-0x2
10a1 4801 |H | Short_Literal 0x1
10a2 e002 | | Load 0x0,0x2
10a3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
10a4 c403 | | Store 0x2,0x3
10a5 7818 |x | Jump 0x10be
10a6 e7fd | | Load 0x3,-0x3
10a7 680e |h | Jump_Zero 0x10b6
10a8 e403 | | Load 0x2,0x3
10a9 e010 | | Load 0x0,0x10
10aa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10ab e004 | | Load 0x0,0x4
10ac 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
10ad e004 | | Load 0x0,0x4
10ae 181e | | Execute Package,Field_Execute,Field_Number 0x1e
10af 00ea | | Load_Encached Null_String_Cache
10b0 e7fe | | Load 0x3,-0x2
10b1 4801 |H | Short_Literal 0x1
10b2 e002 | | Load 0x0,0x2
10b3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
10b4 c403 | | Store 0x2,0x3
10b5 7808 |x | Jump 0x10be
10b6 e5ff | | Load 0x2,-0x1
10b7 0217 | | Execute Heap_Access,All_Reference
10b8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
10b9 c403 | | Store 0x2,0x3
10ba 00db | | Load_Top At_Offset_3
10bb e403 | | Load 0x2,0x3
10bc e002 | | Load 0x0,0x2
10bd 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
10be 00cf | | Action Mark_Auxiliary
10bf 780f |x | Jump 0x10cf
10c0 00e3 | | Load_Encached Natural_Cache
10c1 e408 | | Load 0x2,0x8
10c2 e404 | | Load 0x2,0x4
10c3 e002 | | Load 0x0,0x2
10c4 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
10c5 00d1 | | Pop_Control Pop_Count_1
10c6 c409 | | Store 0x2,0x9
10c7 4801 |H | Short_Literal 0x1
10c8 e409 | | Load 0x2,0x9
10c9 e408 | | Load 0x2,0x8
10ca 01cf | | Execute Vector,Slice_Read
10cb e403 | | Load 0x2,0x3
10cc e002 | | Load 0x0,0x2
10cd 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
10ce 00c9 | | Action Pop_Auxiliary_Loop
10cf e404 | | Load 0x2,0x4
10d0 e002 | | Load 0x0,0x2
10d1 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
10d2 6fed |o | Jump_Zero 0x10c0
10d3 00ce | | Action Pop_Auxiliary
10d4 00da | | Load_Top At_Offset_2
10d5 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
10d7 01de | | Execute Vector,Not_Equal
10d8 6804 |h | Jump_Zero 0x10dd
10d9 e404 | | Load 0x2,0x4
10da e002 | | Load 0x0,0x2
10db 1819 | | Execute Package,Field_Execute,Field_Number 0x19
10dc c404 | | Store 0x2,0x4
10dd e7fd | | Load 0x3,-0x3
10de 7009 |p | Jump_Nonzero 0x10e8
10df e5ff | | Load 0x2,-0x1
10e0 0217 | | Execute Heap_Access,All_Reference
10e1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
10e2 6809 |h | Jump_Zero 0x10ec
10e3 00db | | Load_Top At_Offset_3
10e4 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
10e6 01de | | Execute Vector,Not_Equal
10e7 6804 |h | Jump_Zero 0x10ec
10e8 e403 | | Load 0x2,0x3
10e9 e002 | | Load 0x0,0x2
10ea 1819 | | Execute Package,Field_Execute,Field_Number 0x19
10eb c403 | | Store 0x2,0x3
10ec 4504 |E | Exit_Suprogram New_Top_Offset 0x4
10ed 0000 0000 | | .XXX[0x3]
10ef 0000 | |
10f0 ; --------------------------------------------------------------------------------------
10f0 ; SUBPROGRAM
10f0 ; --------------------------------------------------------------------------------------
10f0 10f5 | | .CONST 0x10f5 ; Address of begin
10f1 0004 | | .CONST 0x0004 ; Address of exception handler
10f2 0002 | | .CONST 0x0002 ; Number of locals
10f3 INIT_10f0:
10f3 029f 12fb | | Declare_Subprogram INIT_12f8,For_Call
10f5 BODY_10f0:
10f5 00db | | Load_Top At_Offset_3
10f6 e00e | | Load 0x0,0xe
10f7 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
10f8 0b0f | | Execute_Immediate Case_Compare,0xf
10f9 7004 |p | Jump_Nonzero 0x10fe
10fa 0f01 | | Execute_Immediate Equal,0x1
10fb 7005 |p | Jump_Nonzero 0x1101
10fc e013 | | Load 0x0,0x13
10fd 0257 | W | Execute Discrete,Raise
10fe 00d1 | | Pop_Control Pop_Count_1
10ff 8602 | | Call 0x3,0x2
1100 7804 |x | Jump 0x1105
1101 00db | | Load_Top At_Offset_3
1102 e00e | | Load 0x0,0xe
1103 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1104 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1105 0831 | 1 | Execute_Immediate Raise,0x31
1106 0000 0000 | | .XXX[0x2]
1108 ; --------------------------------------------------------------------------------------
1108 ; SUBPROGRAM
1108 ; --------------------------------------------------------------------------------------
1108 1118 | | .CONST 0x1118 ; Address of begin
1109 0004 | | .CONST 0x0004 ; Address of exception handler
110a 0005 | | .CONST 0x0005 ; Number of locals
110b INIT_1108:
110b e405 | | Load 0x2,0x5
110c 8014 | | Call 0x0,0x14
110d e406 | | Load 0x2,0x6
110e 840c | | Call 0x2,0xc
110f 00e1 | | Load_Encached Boolean_Cache
1110 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
1111 e00e | | Load 0x0,0xe
1112 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1113 4803 |H | Short_Literal 0x3
1114 e5fe | | Load 0x2,-0x2
1115 e012 | | Load 0x0,0x12
1116 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1117 0031 | 1 | Store_Top Heap_Access,At_Offset_1
1118 BODY_1108:
1118 e5fe | | Load 0x2,-0x2
1119 8015 | | Call 0x0,0x15
111a 7048 |pH | Jump_Nonzero 0x1163
111b 00d8 | | Load_Top At_Offset_0
111c e00e | | Load 0x0,0xe
111d 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
111e 700e |p | Jump_Nonzero 0x112d
111f 00d8 | | Load_Top At_Offset_0
1120 e00e | | Load 0x0,0xe
1121 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1122 0f01 | | Execute_Immediate Equal,0x1
1123 6809 |h | Jump_Zero 0x112d
1124 00d8 | | Load_Top At_Offset_0
1125 e00e | | Load 0x0,0xe
1126 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1127 0092 1786 | | Action Push_String_Extended,0x1786 ; "<SCRIPT_FILE>"
1129 01df | | Execute Vector,Equal
112a 6802 |h | Jump_Zero 0x112d
112b 4801 |H | Short_Literal 0x1
112c 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
112d 00d9 | | Load_Top At_Offset_1
112e 00db | | Load_Top At_Offset_3
112f e602 | | Load 0x3,0x2
1130 840b | | Call 0x2,0xb
1131 e5fe | | Load 0x2,-0x2
1132 e012 | | Load 0x0,0x12
1133 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1134 682d |h- | Jump_Zero 0x1162
1135 e5ff | | Load 0x2,-0x1
1136 0217 | | Execute Heap_Access,All_Reference
1137 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1138 7002 |p | Jump_Nonzero 0x113b
1139 00d9 | | Load_Top At_Offset_1
113a 6817 |h | Jump_Zero 0x1152
113b e00d | | Load 0x0,0xd
113c 180e | | Execute Package,Field_Execute,Field_Number 0xe
113d 4801 |H | Short_Literal 0x1
113e 4802 |H | Short_Literal 0x2
113f e00e | | Load 0x0,0xe
1140 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1141 0334 | 4 | Declare_Variable Array,With_Constraint
1142 e602 | | Load 0x3,0x2
1143 e00e | | Load 0x0,0xe
1144 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1145 4801 |H | Short_Literal 0x1
1146 00da | | Load_Top At_Offset_2
1147 01d6 | | Execute Vector,Field_Write
1148 e603 | | Load 0x3,0x3
1149 e00e | | Load 0x0,0xe
114a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
114b 4802 |H | Short_Literal 0x2
114c 00da | | Load_Top At_Offset_2
114d 01d6 | | Execute Vector,Field_Write
114e 6089 |` | Indirect_Literal Discrete,0x11d8,{0x00000000, 0x00004020}
114f e001 | | Load 0x0,0x1
1150 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1151 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1152 e00d | | Load 0x0,0xd
1153 180e | | Execute Package,Field_Execute,Field_Number 0xe
1154 4801 |H | Short_Literal 0x1
1155 4801 |H | Short_Literal 0x1
1156 e00e | | Load 0x0,0xe
1157 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1158 0334 | 4 | Declare_Variable Array,With_Constraint
1159 e602 | | Load 0x3,0x2
115a e00e | | Load 0x0,0xe
115b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
115c 4801 |H | Short_Literal 0x1
115d 00da | | Load_Top At_Offset_2
115e 01d6 | | Execute Vector,Field_Write
115f 6074 |`t | Indirect_Literal Discrete,0x11d4,{0x00000000, 0x00004028}
1160 e001 | | Load 0x0,0x1
1161 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1162 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1163 e5fe | | Load 0x2,-0x2
1164 e012 | | Load 0x0,0x12
1165 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1166 7002 |p | Jump_Nonzero 0x1169
1167 00cc | | Action Pop_Block
1168 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1169 e5ff | | Load 0x2,-0x1
116a 0219 | | Execute Heap_Access,All_Read
116b e402 | | Load 0x2,0x2
116c 00d9 | | Load_Top At_Offset_1
116d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
116e e407 | | Load 0x2,0x7
116f 8016 | | Call 0x0,0x16
1170 00da | | Load_Top At_Offset_2
1171 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1172 c402 | | Store 0x2,0x2
1173 00d1 | | Pop_Control Pop_Count_1
1174 e402 | | Load 0x2,0x2
1175 7005 |p | Jump_Nonzero 0x117b
1176 4801 |H | Short_Literal 0x1
1177 e5ff | | Load 0x2,-0x1
1178 0217 | | Execute Heap_Access,All_Reference
1179 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
117a 7806 |x | Jump 0x1181
117b e402 | | Load 0x2,0x2
117c e5fe | | Load 0x2,-0x2
117d e012 | | Load 0x0,0x12
117e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
117f 00cc | | Action Pop_Block
1180 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1181 e5ff | | Load 0x2,-0x1
1182 0219 | | Execute Heap_Access,All_Read
1183 00d8 | | Load_Top At_Offset_0
1184 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1185 e5fe | | Load 0x2,-0x2
1186 e017 | | Load 0x0,0x17
1187 a018 | | Store_Unchecked 0x0,0x18
1188 a019 | | Store_Unchecked 0x0,0x19
1189 a01a | | Store_Unchecked 0x0,0x1a
118a a01b | | Store_Unchecked 0x0,0x1b
118b a01c | | Store_Unchecked 0x0,0x1c
118c e01d | | Load 0x0,0x1d
118d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
118e 00d9 | | Load_Top At_Offset_1
118f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1190 00d1 | | Pop_Control Pop_Count_1
1191 e5ff | | Load 0x2,-0x1
1192 0219 | | Execute Heap_Access,All_Read
1193 00d8 | | Load_Top At_Offset_0
1194 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1195 4800 |H | Short_Literal 0x0
1196 e002 | | Load 0x0,0x2
1197 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1198 00d9 | | Load_Top At_Offset_1
1199 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
119a 00d1 | | Pop_Control Pop_Count_1
119b 4800 |H | Short_Literal 0x0
119c 00db | | Load_Top At_Offset_3
119d 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
119f 840b | | Call 0x2,0xb
11a0 e5fe | | Load 0x2,-0x2
11a1 e012 | | Load 0x0,0x12
11a2 1820 | | Execute Package,Field_Execute,Field_Number 0x20
11a3 682b |h+ | Jump_Zero 0x11cf
11a4 e5ff | | Load 0x2,-0x1
11a5 0217 | | Execute Heap_Access,All_Reference
11a6 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
11a7 6817 |h | Jump_Zero 0x11bf
11a8 e00d | | Load 0x0,0xd
11a9 180e | | Execute Package,Field_Execute,Field_Number 0xe
11aa 4801 |H | Short_Literal 0x1
11ab 4802 |H | Short_Literal 0x2
11ac e00e | | Load 0x0,0xe
11ad 1b0f | | Execute Package,Field_Read,Field_Number 0xf
11ae 0334 | 4 | Declare_Variable Array,With_Constraint
11af e602 | | Load 0x3,0x2
11b0 e00e | | Load 0x0,0xe
11b1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11b2 4801 |H | Short_Literal 0x1
11b3 00da | | Load_Top At_Offset_2
11b4 01d6 | | Execute Vector,Field_Write
11b5 e603 | | Load 0x3,0x3
11b6 e00e | | Load 0x0,0xe
11b7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11b8 4802 |H | Short_Literal 0x2
11b9 00da | | Load_Top At_Offset_2
11ba 01d6 | | Execute Vector,Field_Write
11bb 6014 |` | Indirect_Literal Discrete,0x11d0,{0x00000000, 0x0000401f}
11bc e001 | | Load 0x0,0x1
11bd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
11be 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11bf e00d | | Load 0x0,0xd
11c0 180e | | Execute Package,Field_Execute,Field_Number 0xe
11c1 4801 |H | Short_Literal 0x1
11c2 4801 |H | Short_Literal 0x1
11c3 e00e | | Load 0x0,0xe
11c4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
11c5 0334 | 4 | Declare_Variable Array,With_Constraint
11c6 e602 | | Load 0x3,0x2
11c7 e00e | | Load 0x0,0xe
11c8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11c9 4801 |H | Short_Literal 0x1
11ca 00da | | Load_Top At_Offset_2
11cb 01d6 | | Execute Vector,Field_Write
11cc 6003 |` | Indirect_Literal Discrete,0x11d0,{0x00000000, 0x0000401f}
11cd e001 | | Load 0x0,0x1
11ce 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
11cf 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11d0 0000 0000 | | .LITERAL {0x00000000, 0x0000401f}
11d4 0000 0000 | | .LITERAL {0x00000000, 0x00004028}
11d8 0000 0000 | | .LITERAL {0x00000000, 0x00004020}
11dc 0000 0000 | | .BLANK 0000[0x4]
11e0 ; --------------------------------------------------------------------------------------
11e0 ; SUBPROGRAM
11e0 ; --------------------------------------------------------------------------------------
11e0 11e7 | | .CONST 0x11e7 ; Address of begin
11e1 0004 | | .CONST 0x0004 ; Address of exception handler
11e2 0003 | | .CONST 0x0003 ; Number of locals
11e3 INIT_11e0:
11e3 e405 | | Load 0x2,0x5
11e4 8014 | | Call 0x0,0x14
11e5 e406 | | Load 0x2,0x6
11e6 840c | | Call 0x2,0xc
11e7 BODY_11e0:
11e7 e5fe | | Load 0x2,-0x2
11e8 801e | | Call 0x0,0x1e
11e9 7029 |p) | Jump_Nonzero 0x1213
11ea e405 | | Load 0x2,0x5
11eb e00e | | Load 0x0,0xe
11ec 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
11ed 0f01 | | Execute_Immediate Equal,0x1
11ee 6824 |h$ | Jump_Zero 0x1213
11ef e405 | | Load 0x2,0x5
11f0 e00e | | Load 0x0,0xe
11f1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
11f2 01db | | Execute Vector,Length
11f3 681f |h | Jump_Zero 0x1213
11f4 4800 |H | Short_Literal 0x0
11f5 00da | | Load_Top At_Offset_2
11f6 00da | | Load_Top At_Offset_2
11f7 840b | | Call 0x2,0xb
11f8 e5fe | | Load 0x2,-0x2
11f9 e012 | | Load 0x0,0x12
11fa 1820 | | Execute Package,Field_Execute,Field_Number 0x20
11fb 6816 |h | Jump_Zero 0x1212
11fc e00d | | Load 0x0,0xd
11fd 180e | | Execute Package,Field_Execute,Field_Number 0xe
11fe 4801 |H | Short_Literal 0x1
11ff 4802 |H | Short_Literal 0x2
1200 e00e | | Load 0x0,0xe
1201 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1202 0334 | 4 | Declare_Variable Array,With_Constraint
1203 00da | | Load_Top At_Offset_2
1204 e00e | | Load 0x0,0xe
1205 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1206 4801 |H | Short_Literal 0x1
1207 00da | | Load_Top At_Offset_2
1208 01d6 | | Execute Vector,Field_Write
1209 00db | | Load_Top At_Offset_3
120a e00e | | Load 0x0,0xe
120b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
120c 4802 |H | Short_Literal 0x2
120d 00da | | Load_Top At_Offset_2
120e 01d6 | | Execute Vector,Field_Write
120f 67c8 |g | Indirect_Literal Discrete,0x11d8,{0x00000000, 0x00004020}
1210 e001 | | Load 0x0,0x1
1211 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1212 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1213 e5fe | | Load 0x2,-0x2
1214 e012 | | Load 0x0,0x12
1215 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1216 7002 |p | Jump_Nonzero 0x1219
1217 00cc | | Action Pop_Block
1218 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1219 e403 | | Load 0x2,0x3
121a e010 | | Load 0x0,0x10
121b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
121c e004 | | Load 0x0,0x4
121d 181e | | Execute Package,Field_Execute,Field_Number 0x1e
121e 00ea | | Load_Encached Null_String_Cache
121f e603 | | Load 0x3,0x3
1220 4800 |H | Short_Literal 0x0
1221 e002 | | Load 0x0,0x2
1222 1814 | | Execute Package,Field_Execute,Field_Number 0x14
1223 c403 | | Store 0x2,0x3
1224 e5ff | | Load 0x2,-0x1
1225 0219 | | Execute Heap_Access,All_Read
1226 e402 | | Load 0x2,0x2
1227 00d9 | | Load_Top At_Offset_1
1228 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1229 e407 | | Load 0x2,0x7
122a 8016 | | Call 0x0,0x16
122b 00da | | Load_Top At_Offset_2
122c 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
122d c402 | | Store 0x2,0x2
122e 00d1 | | Pop_Control Pop_Count_1
122f e402 | | Load 0x2,0x2
1230 7005 |p | Jump_Nonzero 0x1236
1231 4801 |H | Short_Literal 0x1
1232 e5ff | | Load 0x2,-0x1
1233 0217 | | Execute Heap_Access,All_Reference
1234 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1235 7806 |x | Jump 0x123c
1236 e402 | | Load 0x2,0x2
1237 e5fe | | Load 0x2,-0x2
1238 e012 | | Load 0x0,0x12
1239 181f | | Execute Package,Field_Execute,Field_Number 0x1f
123a 00cc | | Action Pop_Block
123b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
123c 4800 |H | Short_Literal 0x0
123d 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
123f 00da | | Load_Top At_Offset_2
1240 840b | | Call 0x2,0xb
1241 e403 | | Load 0x2,0x3
1242 e002 | | Load 0x0,0x2
1243 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1244 c403 | | Store 0x2,0x3
1245 e5ff | | Load 0x2,-0x1
1246 0219 | | Execute Heap_Access,All_Read
1247 00d8 | | Load_Top At_Offset_0
1248 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1249 4800 |H | Short_Literal 0x0
124a e002 | | Load 0x0,0x2
124b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
124c 00d9 | | Load_Top At_Offset_1
124d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
124e 00d1 | | Pop_Control Pop_Count_1
124f e5ff | | Load 0x2,-0x1
1250 0219 | | Execute Heap_Access,All_Read
1251 00d8 | | Load_Top At_Offset_0
1252 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
1253 e5fe | | Load 0x2,-0x2
1254 e017 | | Load 0x0,0x17
1255 a018 | | Store_Unchecked 0x0,0x18
1256 a019 | | Store_Unchecked 0x0,0x19
1257 a01a | | Store_Unchecked 0x0,0x1a
1258 a01b | | Store_Unchecked 0x0,0x1b
1259 a01c | | Store_Unchecked 0x0,0x1c
125a e01d | | Load 0x0,0x1d
125b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
125c 00d9 | | Load_Top At_Offset_1
125d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
125e 00d1 | | Pop_Control Pop_Count_1
125f e5fe | | Load 0x2,-0x2
1260 e012 | | Load 0x0,0x12
1261 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1262 6816 |h | Jump_Zero 0x1279
1263 e00d | | Load 0x0,0xd
1264 180e | | Execute Package,Field_Execute,Field_Number 0xe
1265 4801 |H | Short_Literal 0x1
1266 4802 |H | Short_Literal 0x2
1267 e00e | | Load 0x0,0xe
1268 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1269 0334 | 4 | Declare_Variable Array,With_Constraint
126a 00da | | Load_Top At_Offset_2
126b e00e | | Load 0x0,0xe
126c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
126d 4801 |H | Short_Literal 0x1
126e 00da | | Load_Top At_Offset_2
126f 01d6 | | Execute Vector,Field_Write
1270 00db | | Load_Top At_Offset_3
1271 e00e | | Load 0x0,0xe
1272 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1273 4802 |H | Short_Literal 0x2
1274 00da | | Load_Top At_Offset_2
1275 01d6 | | Execute Vector,Field_Write
1276 6759 |gY | Indirect_Literal Discrete,0x11d0,{0x00000000, 0x0000401f}
1277 e001 | | Load 0x0,0x1
1278 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1279 4501 |E | Exit_Suprogram New_Top_Offset 0x1
127a 0000 0000 | | .BLANK 0000[0x6]
1280 ; --------------------------------------------------------------------------------------
1280 ; SUBPROGRAM
1280 ; --------------------------------------------------------------------------------------
1280 1287 | | .CONST 0x1287 ; Address of begin
1281 0004 | | .CONST 0x0004 ; Address of exception handler
1282 0003 | | .CONST 0x0003 ; Number of locals
1283 INIT_1280:
1283 e406 | | Load 0x2,0x6
1284 8014 | | Call 0x0,0x14
1285 e405 | | Load 0x2,0x5
1286 840c | | Call 0x2,0xc
1287 BODY_1280:
1287 e5ff | | Load 0x2,-0x1
1288 0219 | | Execute Heap_Access,All_Read
1289 e402 | | Load 0x2,0x2
128a 00d9 | | Load_Top At_Offset_1
128b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
128c e407 | | Load 0x2,0x7
128d 8016 | | Call 0x0,0x16
128e 00da | | Load_Top At_Offset_2
128f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
1290 c402 | | Store 0x2,0x2
1291 00d1 | | Pop_Control Pop_Count_1
1292 e402 | | Load 0x2,0x2
1293 7005 |p | Jump_Nonzero 0x1299
1294 4801 |H | Short_Literal 0x1
1295 e5ff | | Load 0x2,-0x1
1296 0217 | | Execute Heap_Access,All_Reference
1297 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1298 7806 |x | Jump 0x129f
1299 e402 | | Load 0x2,0x2
129a e5fe | | Load 0x2,-0x2
129b e012 | | Load 0x0,0x12
129c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
129d 00cc | | Action Pop_Block
129e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
129f e5ff | | Load 0x2,-0x1
12a0 0219 | | Execute Heap_Access,All_Read
12a1 00d8 | | Load_Top At_Offset_0
12a2 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
12a3 e5fe | | Load 0x2,-0x2
12a4 e017 | | Load 0x0,0x17
12a5 a018 | | Store_Unchecked 0x0,0x18
12a6 a019 | | Store_Unchecked 0x0,0x19
12a7 a01a | | Store_Unchecked 0x0,0x1a
12a8 a01b | | Store_Unchecked 0x0,0x1b
12a9 a01c | | Store_Unchecked 0x0,0x1c
12aa e01d | | Load 0x0,0x1d
12ab 1815 | | Execute Package,Field_Execute,Field_Number 0x15
12ac 00d9 | | Load_Top At_Offset_1
12ad 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
12ae 00d1 | | Pop_Control Pop_Count_1
12af e5ff | | Load 0x2,-0x1
12b0 0219 | | Execute Heap_Access,All_Read
12b1 00d8 | | Load_Top At_Offset_0
12b2 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
12b3 4800 |H | Short_Literal 0x0
12b4 e002 | | Load 0x0,0x2
12b5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
12b6 00d9 | | Load_Top At_Offset_1
12b7 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
12b8 00d1 | | Pop_Control Pop_Count_1
12b9 4800 |H | Short_Literal 0x0
12ba 00d9 | | Load_Top At_Offset_1
12bb 0092 1785 | | Action Push_String_Extended,0x1785 ; "<TEMP>"
12bd 840b | | Call 0x2,0xb
12be e5fe | | Load 0x2,-0x2
12bf e012 | | Load 0x0,0x12
12c0 1820 | | Execute Package,Field_Execute,Field_Number 0x20
12c1 682b |h+ | Jump_Zero 0x12ed
12c2 e5ff | | Load 0x2,-0x1
12c3 0217 | | Execute Heap_Access,All_Reference
12c4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
12c5 6817 |h | Jump_Zero 0x12dd
12c6 e00d | | Load 0x0,0xd
12c7 180e | | Execute Package,Field_Execute,Field_Number 0xe
12c8 4801 |H | Short_Literal 0x1
12c9 4802 |H | Short_Literal 0x2
12ca e00e | | Load 0x0,0xe
12cb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
12cc 0334 | 4 | Declare_Variable Array,With_Constraint
12cd 00db | | Load_Top At_Offset_3
12ce e00e | | Load 0x0,0xe
12cf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12d0 4801 |H | Short_Literal 0x1
12d1 00da | | Load_Top At_Offset_2
12d2 01d6 | | Execute Vector,Field_Write
12d3 00da | | Load_Top At_Offset_2
12d4 e00e | | Load 0x0,0xe
12d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12d6 4802 |H | Short_Literal 0x2
12d7 00da | | Load_Top At_Offset_2
12d8 01d6 | | Execute Vector,Field_Write
12d9 6016 |` | Indirect_Literal Discrete,0x12f0,{0x00000000, 0x0000401f}
12da e001 | | Load 0x0,0x1
12db 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
12dc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12dd e00d | | Load 0x0,0xd
12de 180e | | Execute Package,Field_Execute,Field_Number 0xe
12df 4801 |H | Short_Literal 0x1
12e0 4801 |H | Short_Literal 0x1
12e1 e00e | | Load 0x0,0xe
12e2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
12e3 0334 | 4 | Declare_Variable Array,With_Constraint
12e4 00db | | Load_Top At_Offset_3
12e5 e00e | | Load 0x0,0xe
12e6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
12e7 4801 |H | Short_Literal 0x1
12e8 00da | | Load_Top At_Offset_2
12e9 01d6 | | Execute Vector,Field_Write
12ea 6005 |` | Indirect_Literal Discrete,0x12f0,{0x00000000, 0x0000401f}
12eb e001 | | Load 0x0,0x1
12ec 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
12ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1
12ee 0000 0000 | | .XXX[0x2]
12f0 0000 0000 | | .LITERAL {0x00000000, 0x0000401f}
12f4 0000 0000 | | .BLANK 0000[0x4]
12f8 ; --------------------------------------------------------------------------------------
12f8 ; SUBPROGRAM
12f8 ; --------------------------------------------------------------------------------------
12f8 1306 | | .CONST 0x1306 ; Address of begin
12f9 0004 | | .CONST 0x0004 ; Address of exception handler
12fa 0002 | | .CONST 0x0002 ; Number of locals
12fb INIT_12f8:
12fb e5ff | | Load 0x2,-0x1
12fc 0217 | | Execute Heap_Access,All_Reference
12fd 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
12fe 0219 | | Execute Heap_Access,All_Read
12ff e20f | | Load 0x1,0xf
1300 0119 | | Execute Any,Check_In_Formal_Type
1301 e5ff | | Load 0x2,-0x1
1302 0217 | | Execute Heap_Access,All_Reference
1303 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1304 e5fe | | Load 0x2,-0x2
1305 8211 | | Call 0x1,0x11
1306 BODY_12f8:
1306 e5ff | | Load 0x2,-0x1
1307 0217 | | Execute Heap_Access,All_Reference
1308 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
1309 6824 |h$ | Jump_Zero 0x132e
130a 00d8 | | Load_Top At_Offset_0
130b e001 | | Load 0x0,0x1
130c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
130d 01df | | Execute Vector,Equal
130e 6818 |h | Jump_Zero 0x1327
130f e00d | | Load 0x0,0xd
1310 180e | | Execute Package,Field_Execute,Field_Number 0xe
1311 4801 |H | Short_Literal 0x1
1312 4801 |H | Short_Literal 0x1
1313 e00e | | Load 0x0,0xe
1314 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1315 0334 | 4 | Declare_Variable Array,With_Constraint
1316 e5fe | | Load 0x2,-0x2
1317 e012 | | Load 0x0,0x12
1318 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1319 4801 |H | Short_Literal 0x1
131a 00da | | Load_Top At_Offset_2
131b 01d6 | | Execute Vector,Field_Write
131c 6017 |` | Indirect_Literal Discrete,0x1334,{0x00000000, 0x00004027}
131d e001 | | Load 0x0,0x1
131e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
131f e00e | | Load 0x0,0xe
1320 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1321 6012 |` | Indirect_Literal Discrete,0x1334,{0x00000000, 0x00004027}
1322 e001 | | Load 0x0,0x1
1323 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1324 e5fe | | Load 0x2,-0x2
1325 e012 | | Load 0x0,0x12
1326 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1327 482e |H. | Short_Literal 0x2e
1328 e40a | | Load 0x2,0xa
1329 01cb | | Execute Vector,Append
132a 00d9 | | Load_Top At_Offset_1
132b 01cc | | Execute Vector,Catenate
132c 00cb | | Action Pop_Block_With_Result
132d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
132e 00d8 | | Load_Top At_Offset_0
132f 00cb | | Action Pop_Block_With_Result
1330 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1331 0000 0000 | | .XXX[0x3]
1333 0000 | |
1334 0000 0000 | | .LITERAL {0x00000000, 0x00004027}
1338 ; --------------------------------------------------------------------------------------
1338 ; SUBPROGRAM
1338 ; --------------------------------------------------------------------------------------
1338 1397 | | .CONST 0x1397 ; Address of begin
1339 0004 | | .CONST 0x0004 ; Address of exception handler
133a 0027 | ' | .CONST 0x0027 ; Number of locals
133b INIT_1338:
133b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
133c 029a 13a3 | | Declare_Subprogram INIT_13a0,For_Outer_Call,Visible,Unelaborated
133e 029a 1433 | 3| Declare_Subprogram INIT_1430,For_Outer_Call,Visible,Unelaborated
1340 029a 143b | ;| Declare_Subprogram INIT_1438,For_Outer_Call,Visible,Unelaborated
1342 029a 155b | [| Declare_Subprogram INIT_1558,For_Outer_Call,Visible,Unelaborated
1344 029a 156b | k| Declare_Subprogram INIT_1568,For_Outer_Call,Visible,Unelaborated
1346 029a 1573 | s| Declare_Subprogram INIT_1570,For_Outer_Call,Visible,Unelaborated
1348 029a 1583 | | Declare_Subprogram INIT_1580,For_Outer_Call,Visible,Unelaborated
134a 029a 158b | | Declare_Subprogram INIT_1588,For_Outer_Call,Visible,Unelaborated
134c 029a 1593 | | Declare_Subprogram INIT_1590,For_Outer_Call,Visible,Unelaborated
134e 029a 159b | | Declare_Subprogram INIT_1598,For_Outer_Call,Visible,Unelaborated
1350 029a 15ab | | Declare_Subprogram INIT_15a8,For_Outer_Call,Visible,Unelaborated
1352 029a 15bb | | Declare_Subprogram INIT_15b8,For_Outer_Call,Visible,Unelaborated
1354 4807 |H | Short_Literal 0x7
1355 032a | * | Declare_Type Record,Incomplete
1356 00d8 | | Load_Top At_Offset_0
1357 02a0 | | Declare_Subprogram Null_Subprogram
1358 e213 | | Load 0x1,0x13
1359 03a3 | | Complete_Type Heap_Access,By_Defining
135a 00bf | | Action Accept_Activation
135b e001 | | Load 0x0,0x1
135c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
135d e002 | | Load 0x0,0x2
135e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
135f e003 | | Load 0x0,0x3
1360 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1361 e004 | | Load 0x0,0x4
1362 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1363 00e1 | | Load_Encached Boolean_Cache
1364 e005 | | Load 0x0,0x5
1365 1b14 | | Execute Package,Field_Read,Field_Number 0x14
1366 e210 | | Load 0x1,0x10
1367 029f 15c3 | | Declare_Subprogram INIT_15c0,For_Call
1369 e220 | | Load 0x1,0x20
136a 0326 | & | Complete_Type Record,By_Defining
136b 1d14 | | Execute_Immediate Reference_Lex_1,0x14
136c 00c7 | | Action Elaborate_Subprogram
136d 1d15 | | Execute_Immediate Reference_Lex_1,0x15
136e 00c7 | | Action Elaborate_Subprogram
136f 029d 15db | | Declare_Subprogram INIT_15d8,For_Outer_Call
1371 1d16 | | Execute_Immediate Reference_Lex_1,0x16
1372 00c7 | | Action Elaborate_Subprogram
1373 1d17 | | Execute_Immediate Reference_Lex_1,0x17
1374 00c7 | | Action Elaborate_Subprogram
1375 1d18 | | Execute_Immediate Reference_Lex_1,0x18
1376 00c7 | | Action Elaborate_Subprogram
1377 1d19 | | Execute_Immediate Reference_Lex_1,0x19
1378 00c7 | | Action Elaborate_Subprogram
1379 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
137a 00c7 | | Action Elaborate_Subprogram
137b 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
137c 00c7 | | Action Elaborate_Subprogram
137d 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
137e 00c7 | | Action Elaborate_Subprogram
137f 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
1380 00c7 | | Action Elaborate_Subprogram
1381 e006 | | Load 0x0,0x6
1382 e007 | | Load 0x0,0x7
1383 00db | | Load_Top At_Offset_3
1384 e213 | | Load 0x1,0x13
1385 e008 | | Load 0x0,0x8
1386 1b18 | | Execute Package,Field_Read,Field_Number 0x18
1387 0387 | | Declare_Variable Package
1388 00d8 | | Load_Top At_Offset_0
1389 020f | | Execute Module,Activate
138a e008 | | Load 0x0,0x8
138b 1919 | | Execute Package,Field_Reference,Field_Number 0x19
138c 00c6 | | Action Check_Subprogram_Elaborated
138d 00da | | Load_Top At_Offset_2
138e e213 | | Load 0x1,0x13
138f e009 | | Load 0x0,0x9
1390 e00a | | Load 0x0,0xa
1391 4800 |H | Short_Literal 0x0
1392 0007 | | Action Break_Optional
1393 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
1394 00c7 | | Action Elaborate_Subprogram
1395 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
1396 00c7 | | Action Elaborate_Subprogram
1397 BODY_1338:
1397 00bc | | Action Signal_Activated
1398 00bb | | Action Signal_Completion
1399 0000 0000 | | .BLANK 0000[0x7]
13a0 ; --------------------------------------------------------------------------------------
13a0 ; SUBPROGRAM
13a0 ; --------------------------------------------------------------------------------------
13a0 13ae | | .CONST 0x13ae ; Address of begin
13a1 1413 | | .CONST 0x1413 ; Address of exception handler
13a2 0004 | | .CONST 0x0004 ; Number of locals
13a3 INIT_13a0:
13a3 e213 | | Load 0x1,0x13
13a4 e00b | | Load 0x0,0xb
13a5 180d | | Execute Package,Field_Execute,Field_Number 0xd
13a6 039c | | Declare_Variable Heap_Access,By_Allocation
13a7 00d8 | | Load_Top At_Offset_0
13a8 0217 | | Execute Heap_Access,All_Reference
13a9 1c00 | | Execute_Immediate Run_Utility,0x0
13aa e00c | | Load 0x0,0xc
13ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13ac e002 | | Load 0x0,0x2
13ad 1b10 | | Execute Package,Field_Read,Field_Number 0x10
13ae BODY_13a0:
13ae e5ff | | Load 0x2,-0x1
13af e20f | | Load 0x1,0xf
13b0 0119 | | Execute Any,Check_In_Formal_Type
13b1 e210 | | Load 0x1,0x10
13b2 e00b | | Load 0x0,0xb
13b3 180d | | Execute Package,Field_Execute,Field_Number 0xd
13b4 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
13b5 00db | | Load_Top At_Offset_3
13b6 0217 | | Execute Heap_Access,All_Reference
13b7 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
13b8 e00d | | Load 0x0,0xd
13b9 181d | | Execute Package,Field_Execute,Field_Number 0x1d
13ba e00e | | Load 0x0,0xe
13bb 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
13bc 702d |p- | Jump_Nonzero 0x13ea
13bd e00c | | Load 0x0,0xc
13be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13bf 4800 |H | Short_Literal 0x0
13c0 e00f | | Load 0x0,0xf
13c1 180f | | Execute Package,Field_Execute,Field_Number 0xf
13c2 e010 | | Load 0x0,0x10
13c3 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
13c4 4800 |H | Short_Literal 0x0
13c5 e00c | | Load 0x0,0xc
13c6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
13c7 0032 | 2 | Store_Top Heap_Access,At_Offset_2
13c8 00da | | Load_Top At_Offset_2
13c9 0219 | | Execute Heap_Access,All_Read
13ca 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
13cb e002 | | Load 0x0,0x2
13cc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
13cd 00d9 | | Load_Top At_Offset_1
13ce 0219 | | Execute Heap_Access,All_Read
13cf 00d8 | | Load_Top At_Offset_0
13d0 0120 | | Execute Any,Is_Value
13d1 6803 |h | Jump_Zero 0x13d5
13d2 e20f | | Load 0x1,0xf
13d3 011e | | Execute Any,Convert
13d4 7802 |x | Jump 0x13d7
13d5 e20f | | Load 0x1,0xf
13d6 0119 | | Execute Any,Check_In_Formal_Type
13d7 e403 | | Load 0x2,0x3
13d8 8212 | | Call 0x1,0x12
13d9 00da | | Load_Top At_Offset_2
13da 0218 | | Execute Heap_Access,All_Write
13db 005a | Z | Store_Top Discrete,At_Offset_2
13dc 00d1 | | Pop_Control Pop_Count_1
13dd 00d8 | | Load_Top At_Offset_0
13de 680b |h | Jump_Zero 0x13ea
13df e002 | | Load 0x0,0x2
13e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
13e1 e010 | | Load 0x0,0x10
13e2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
13e3 6044 |`D | Indirect_Literal Discrete,0x1428,{0x00000000, 0x0000400e}
13e4 e002 | | Load 0x0,0x2
13e5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
13e6 c5fc | | Store 0x2,-0x4
13e7 e213 | | Load 0x1,0x13
13e8 a5fd | | Store_Unchecked 0x2,-0x3
13e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
13ea 00da | | Load_Top At_Offset_2
13eb 0219 | | Execute Heap_Access,All_Read
13ec 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
13ed 00d8 | | Load_Top At_Offset_0
13ee e00d | | Load 0x0,0xd
13ef 181d | | Execute Package,Field_Execute,Field_Number 0x1d
13f0 e001 | | Load 0x0,0x1
13f1 1812 | | Execute Package,Field_Execute,Field_Number 0x12
13f2 00d2 | | Pop_Control Pop_Count_2
13f3 e00d | | Load 0x0,0xd
13f4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
13f5 e00e | | Load 0x0,0xe
13f6 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
13f7 00db | | Load_Top At_Offset_3
13f8 0217 | | Execute Heap_Access,All_Reference
13f9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
13fa e002 | | Load 0x0,0x2
13fb 180e | | Execute Package,Field_Execute,Field_Number 0xe
13fc 00db | | Load_Top At_Offset_3
13fd 0217 | | Execute Heap_Access,All_Reference
13fe 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
13ff e5fe | | Load 0x2,-0x2
1400 00db | | Load_Top At_Offset_3
1401 0217 | | Execute Heap_Access,All_Reference
1402 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
1403 4800 |H | Short_Literal 0x0
1404 00db | | Load_Top At_Offset_3
1405 0217 | | Execute Heap_Access,All_Reference
1406 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1407 e005 | | Load 0x0,0x5
1408 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1409 00db | | Load_Top At_Offset_3
140a 0217 | | Execute Heap_Access,All_Reference
140b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
140c 00da | | Load_Top At_Offset_2
140d a5fd | | Store_Unchecked 0x2,-0x3
140e 00da | | Load_Top At_Offset_2
140f 0217 | | Execute Heap_Access,All_Reference
1410 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1411 a5fc | | Store_Unchecked 0x2,-0x4
1412 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1413 TRAP_13a0:
1413 010b | | Execute Exception,Is_Storage_Error
1414 680b |h | Jump_Zero 0x1420
1415 e002 | | Load 0x0,0x2
1416 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1417 e010 | | Load 0x0,0x10
1418 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1419 600a |` | Indirect_Literal Discrete,0x1424,{0x00000000, 0x00004006}
141a e002 | | Load 0x0,0x2
141b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
141c c5fc | | Store 0x2,-0x4
141d e213 | | Load 0x1,0x13
141e a5fd | | Store_Unchecked 0x2,-0x3
141f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1420 0100 | | Execute Exception,Raise
1421 0000 0000 | | .XXX[0x3]
1423 0000 | |
1424 0000 0000 | | .LITERAL {0x00000000, 0x00004006}
1428 0000 0000 | | .LITERAL {0x00000000, 0x0000400e}
142c 0000 0000 | | .BLANK 0000[0x4]
1430 ; --------------------------------------------------------------------------------------
1430 ; SUBPROGRAM
1430 ; --------------------------------------------------------------------------------------
1430 1433 | 3 | .CONST 0x1433 ; Address of begin
1431 0004 | | .CONST 0x0004 ; Address of exception handler
1432 0001 | | .CONST 0x0001 ; Number of locals
1433 BODY_1430:
1433 INIT_1430:
1433 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1434 0000 0000 | | .BLANK 0000[0x4]
1438 ; --------------------------------------------------------------------------------------
1438 ; SUBPROGRAM
1438 ; --------------------------------------------------------------------------------------
1438 1458 | X | .CONST 0x1458 ; Address of begin
1439 1521 | ! | .CONST 0x1521 ; Address of exception handler
143a 000c | | .CONST 0x000c ; Number of locals
143b INIT_1438:
143b e002 | | Load 0x0,0x2
143c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
143d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
143e e010 | | Load 0x0,0x10
143f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1440 e010 | | Load 0x0,0x10
1441 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1442 e002 | | Load 0x0,0x2
1443 1b10 | | Execute Package,Field_Read,Field_Number 0x10
1444 e011 | | Load 0x0,0x11
1445 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1446 02c7 | | Declare_Variable Any
1447 00d8 | | Load_Top At_Offset_0
1448 1c00 | | Execute_Immediate Run_Utility,0x0
1449 00ea | | Load_Encached Null_String_Cache
144a e5ff | | Load 0x2,-0x1
144b 0217 | | Execute Heap_Access,All_Reference
144c 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
144d 8012 | | Call 0x0,0x12
144e 029f 1613 | | Declare_Subprogram INIT_1610,For_Call
1450 029f 162b | +| Declare_Subprogram INIT_1628,For_Call
1452 029f 1643 | C| Declare_Subprogram INIT_1640,For_Call
1454 029f 1693 | | Declare_Subprogram INIT_1690,For_Call
1456 029f 1703 | | Declare_Subprogram INIT_1700,For_Call
1458 BODY_1438:
1458 e00d | | Load 0x0,0xd
1459 181d | | Execute Package,Field_Execute,Field_Number 0x1d
145a e00e | | Load 0x0,0xe
145b 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
145c 7030 |p0 | Jump_Nonzero 0x148d
145d e5ff | | Load 0x2,-0x1
145e 0219 | | Execute Heap_Access,All_Read
145f 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1460 e002 | | Load 0x0,0x2
1461 1b10 | | Execute Package,Field_Read,Field_Number 0x10
1462 00d9 | | Load_Top At_Offset_1
1463 0219 | | Execute Heap_Access,All_Read
1464 00d8 | | Load_Top At_Offset_0
1465 0120 | | Execute Any,Is_Value
1466 6803 |h | Jump_Zero 0x146a
1467 e20f | | Load 0x1,0xf
1468 011e | | Execute Any,Convert
1469 7802 |x | Jump 0x146c
146a e20f | | Load 0x1,0xf
146b 0119 | | Execute Any,Check_In_Formal_Type
146c e5fe | | Load 0x2,-0x2
146d 8212 | | Call 0x1,0x12
146e 00da | | Load_Top At_Offset_2
146f 0218 | | Execute Heap_Access,All_Write
1470 c405 | | Store 0x2,0x5
1471 00d1 | | Pop_Control Pop_Count_1
1472 e405 | | Load 0x2,0x5
1473 6810 |h | Jump_Zero 0x1484
1474 e013 | | Load 0x0,0x13
1475 180e | | Execute Package,Field_Execute,Field_Number 0xe
1476 e010 | | Load 0x0,0x10
1477 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1478 60d7 |` | Indirect_Literal Discrete,0x1550,{0x00000000, 0x0000400f}
1479 e002 | | Load 0x0,0x2
147a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
147b e010 | | Load 0x0,0x10
147c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
147d e405 | | Load 0x2,0x5
147e e002 | | Load 0x0,0x2
147f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1480 e5fe | | Load 0x2,-0x2
1481 e00c | | Load 0x0,0xc
1482 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1483 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1484 e5ff | | Load 0x2,-0x1
1485 0219 | | Execute Heap_Access,All_Read
1486 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
1487 00d8 | | Load_Top At_Offset_0
1488 e00d | | Load 0x0,0xd
1489 181d | | Execute Package,Field_Execute,Field_Number 0x1d
148a e001 | | Load 0x0,0x1
148b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
148c 00d2 | | Pop_Control Pop_Count_2
148d e5fe | | Load 0x2,-0x2
148e e00c | | Load 0x0,0xc
148f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
1490 4612 |F | Jump_Case 0x13
1491 7812 |x | Jump 0x14a4 ; case 0x0
1492 7811 |x | Jump 0x14a4 ; case 0x1
1493 7810 |x | Jump 0x14a4 ; case 0x2
1494 780f |x | Jump 0x14a4 ; case 0x3
1495 780e |x | Jump 0x14a4 ; case 0x4
1496 780d |x | Jump 0x14a4 ; case 0x5
1497 780c |x | Jump 0x14a4 ; case 0x6
1498 780b |x | Jump 0x14a4 ; case 0x7
1499 780a |x | Jump 0x14a4 ; case 0x8
149a 7809 |x | Jump 0x14a4 ; case 0x9
149b 7821 |x! | Jump 0x14bd ; case 0xa
149c 7843 |xC | Jump 0x14e0 ; case 0xb
149d 786f |xo | Jump 0x150d ; case 0xc
149e 7805 |x | Jump 0x14a4 ; case 0xd
149f 7804 |x | Jump 0x14a4 ; case 0xe
14a0 7803 |x | Jump 0x14a4 ; case 0xf
14a1 7802 |x | Jump 0x14a4 ; case 0x10
14a2 7801 |x | Jump 0x14a4 ; case 0x11
14a3 7800 |x | Jump 0x14a4 ; case 0x12
14a4 e013 | | Load 0x0,0x13
14a5 180e | | Execute Package,Field_Execute,Field_Number 0xe
14a6 4801 |H | Short_Literal 0x1
14a7 4801 |H | Short_Literal 0x1
14a8 e010 | | Load 0x0,0x10
14a9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
14aa 0334 | 4 | Declare_Variable Array,With_Constraint
14ab e5fe | | Load 0x2,-0x2
14ac e00c | | Load 0x0,0xc
14ad 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
14ae 4801 |H | Short_Literal 0x1
14af 00da | | Load_Top At_Offset_2
14b0 01d6 | | Execute Vector,Field_Write
14b1 609a |` | Indirect_Literal Discrete,0x154c,{0x00000000, 0x00004017}
14b2 e002 | | Load 0x0,0x2
14b3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
14b4 e010 | | Load 0x0,0x10
14b5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
14b6 6095 |` | Indirect_Literal Discrete,0x154c,{0x00000000, 0x00004017}
14b7 e002 | | Load 0x0,0x2
14b8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
14b9 e5fe | | Load 0x2,-0x2
14ba e00c | | Load 0x0,0xc
14bb 181f | | Execute Package,Field_Execute,Field_Number 0x1f
14bc 4504 |E | Exit_Suprogram New_Top_Offset 0x4
14bd 4801 |H | Short_Literal 0x1
14be e5fe | | Load 0x2,-0x2
14bf e00c | | Load 0x0,0xc
14c0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
14c1 a403 | | Store_Unchecked 0x2,0x3
14c2 4802 |H | Short_Literal 0x2
14c3 e5fe | | Load 0x2,-0x2
14c4 e00c | | Load 0x0,0xc
14c5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
14c6 a404 | | Store_Unchecked 0x2,0x4
14c7 e5fe | | Load 0x2,-0x2
14c8 8014 | | Call 0x0,0x14
14c9 7007 |p | Jump_Nonzero 0x14d1
14ca e404 | | Load 0x2,0x4
14cb 8408 | | Call 0x2,0x8
14cc e403 | | Load 0x2,0x3
14cd 8015 | | Call 0x0,0x15
14ce 4800 |H | Short_Literal 0x0
14cf 8409 | | Call 0x2,0x9
14d0 7801 |x | Jump 0x14d2
14d1 840a | | Call 0x2,0xa
14d2 4802 |H | Short_Literal 0x2
14d3 e406 | | Load 0x2,0x6
14d4 e011 | | Load 0x0,0x11
14d5 1817 | | Execute Package,Field_Execute,Field_Number 0x17
14d6 6808 |h | Jump_Zero 0x14df
14d7 e010 | | Load 0x0,0x10
14d8 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
14d9 606e |`n | Indirect_Literal Discrete,0x1548,{0x00000000, 0x00004011}
14da e002 | | Load 0x0,0x2
14db 1813 | | Execute Package,Field_Execute,Field_Number 0x13
14dc e5fe | | Load 0x2,-0x2
14dd e00c | | Load 0x0,0xc
14de 181f | | Execute Package,Field_Execute,Field_Number 0x1f
14df 4504 |E | Exit_Suprogram New_Top_Offset 0x4
14e0 4801 |H | Short_Literal 0x1
14e1 e5fe | | Load 0x2,-0x2
14e2 e00c | | Load 0x0,0xc
14e3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
14e4 a403 | | Store_Unchecked 0x2,0x3
14e5 4802 |H | Short_Literal 0x2
14e6 e5fe | | Load 0x2,-0x2
14e7 e00c | | Load 0x0,0xc
14e8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
14e9 a404 | | Store_Unchecked 0x2,0x4
14ea e5fe | | Load 0x2,-0x2
14eb 8016 | | Call 0x0,0x16
14ec 7011 |p | Jump_Nonzero 0x14fe
14ed e403 | | Load 0x2,0x3
14ee e010 | | Load 0x0,0x10
14ef 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
14f0 0f01 | | Execute_Immediate Equal,0x1
14f1 680c |h | Jump_Zero 0x14fe
14f2 e403 | | Load 0x2,0x3
14f3 e010 | | Load 0x0,0x10
14f4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
14f5 01db | | Execute Vector,Length
14f6 6807 |h | Jump_Zero 0x14fe
14f7 e404 | | Load 0x2,0x4
14f8 8408 | | Call 0x2,0x8
14f9 e403 | | Load 0x2,0x3
14fa 8015 | | Call 0x0,0x15
14fb 4801 |H | Short_Literal 0x1
14fc 8409 | | Call 0x2,0x9
14fd 7801 |x | Jump 0x14ff
14fe 840b | | Call 0x2,0xb
14ff 4802 |H | Short_Literal 0x2
1500 e406 | | Load 0x2,0x6
1501 e011 | | Load 0x0,0x11
1502 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1503 6808 |h | Jump_Zero 0x150c
1504 e010 | | Load 0x0,0x10
1505 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1506 6041 |`A | Indirect_Literal Discrete,0x1548,{0x00000000, 0x00004011}
1507 e002 | | Load 0x0,0x2
1508 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1509 e5fe | | Load 0x2,-0x2
150a e00c | | Load 0x0,0xc
150b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
150c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
150d 4801 |H | Short_Literal 0x1
150e e5fe | | Load 0x2,-0x2
150f e00c | | Load 0x0,0xc
1510 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1511 a403 | | Store_Unchecked 0x2,0x3
1512 840c | | Call 0x2,0xc
1513 4802 |H | Short_Literal 0x2
1514 e406 | | Load 0x2,0x6
1515 e011 | | Load 0x0,0x11
1516 1817 | | Execute Package,Field_Execute,Field_Number 0x17
1517 6808 |h | Jump_Zero 0x1520
1518 e010 | | Load 0x0,0x10
1519 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
151a 602d |`- | Indirect_Literal Discrete,0x1548,{0x00000000, 0x00004011}
151b e002 | | Load 0x0,0x2
151c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
151d e5fe | | Load 0x2,-0x2
151e e00c | | Load 0x0,0xc
151f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1520 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1521 TRAP_1438:
1521 e017 | | Load 0x0,0x17
1522 010f | | Execute Exception,Equal
1523 681b |h | Jump_Zero 0x153f
1524 e5ff | | Load 0x2,-0x1
1525 8221 | ! | Call 0x1,0x21
1526 e013 | | Load 0x0,0x13
1527 180e | | Execute Package,Field_Execute,Field_Number 0xe
1528 4801 |H | Short_Literal 0x1
1529 4801 |H | Short_Literal 0x1
152a e010 | | Load 0x0,0x10
152b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
152c 0334 | 4 | Declare_Variable Array,With_Constraint
152d e5fe | | Load 0x2,-0x2
152e e00c | | Load 0x0,0xc
152f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
1530 4801 |H | Short_Literal 0x1
1531 00da | | Load_Top At_Offset_2
1532 01d6 | | Execute Vector,Field_Write
1533 6010 |` | Indirect_Literal Discrete,0x1544,{0x00000000, 0x00004019}
1534 e002 | | Load 0x0,0x2
1535 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1536 e010 | | Load 0x0,0x10
1537 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1538 600b |` | Indirect_Literal Discrete,0x1544,{0x00000000, 0x00004019}
1539 e002 | | Load 0x0,0x2
153a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
153b e5fe | | Load 0x2,-0x2
153c e00c | | Load 0x0,0xc
153d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
153e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
153f e5ff | | Load 0x2,-0x1
1540 8221 | ! | Call 0x1,0x21
1541 00d8 | | Load_Top At_Offset_0
1542 0101 | | Execute Exception,Reraise
1543 0000 | | .XXX[0x1]
1544 0000 0000 | | .LITERAL {0x00000000, 0x00004019}
1548 0000 0000 | | .LITERAL {0x00000000, 0x00004011}
154c 0000 0000 | | .LITERAL {0x00000000, 0x00004017}
1550 0000 0000 | | .LITERAL {0x00000000, 0x0000400f}
1554 0000 0000 | | .BLANK 0000[0x4]
1558 ; --------------------------------------------------------------------------------------
1558 ; SUBPROGRAM
1558 ; --------------------------------------------------------------------------------------
1558 155b | [ | .CONST 0x155b ; Address of begin
1559 0004 | | .CONST 0x0004 ; Address of exception handler
155a 0001 | | .CONST 0x0001 ; Number of locals
155b BODY_1558:
155b INIT_1558:
155b 00da | | Load_Top At_Offset_2
155c 0217 | | Execute Heap_Access,All_Reference
155d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
155e 0219 | | Execute Heap_Access,All_Read
155f c5fe | | Store 0x2,-0x2
1560 e210 | | Load 0x1,0x10
1561 00db | | Load_Top At_Offset_3
1562 0217 | | Execute Heap_Access,All_Reference
1563 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
1564 00da | | Load_Top At_Offset_2
1565 8221 | ! | Call 0x1,0x21
1566 4502 |E | Exit_Suprogram New_Top_Offset 0x2
1567 0000 | | .XXX[0x1]
1568 ; --------------------------------------------------------------------------------------
1568 ; SUBPROGRAM
1568 ; --------------------------------------------------------------------------------------
1568 156b | k | .CONST 0x156b ; Address of begin
1569 0004 | | .CONST 0x0004 ; Address of exception handler
156a 0001 | | .CONST 0x0001 ; Number of locals
156b BODY_1568:
156b INIT_1568:
156b 00da | | Load_Top At_Offset_2
156c 0217 | | Execute Heap_Access,All_Reference
156d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
156e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
156f 0000 | | .XXX[0x1]
1570 ; --------------------------------------------------------------------------------------
1570 ; SUBPROGRAM
1570 ; --------------------------------------------------------------------------------------
1570 1573 | s | .CONST 0x1573 ; Address of begin
1571 0004 | | .CONST 0x0004 ; Address of exception handler
1572 0001 | | .CONST 0x0001 ; Number of locals
1573 BODY_1570:
1573 INIT_1570:
1573 00da | | Load_Top At_Offset_2
1574 0217 | | Execute Heap_Access,All_Reference
1575 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1576 e210 | | Load 0x1,0x10
1577 0213 | | Execute Heap_Access,Check_In_Type
1578 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1579 0000 0000 | | .BLANK 0000[0x7]
1580 ; --------------------------------------------------------------------------------------
1580 ; SUBPROGRAM
1580 ; --------------------------------------------------------------------------------------
1580 1583 | | .CONST 0x1583 ; Address of begin
1581 0004 | | .CONST 0x0004 ; Address of exception handler
1582 0001 | | .CONST 0x0001 ; Number of locals
1583 BODY_1580:
1583 INIT_1580:
1583 00da | | Load_Top At_Offset_2
1584 0217 | | Execute Heap_Access,All_Reference
1585 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1586 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1587 0000 | | .XXX[0x1]
1588 ; --------------------------------------------------------------------------------------
1588 ; SUBPROGRAM
1588 ; --------------------------------------------------------------------------------------
1588 158b | | .CONST 0x158b ; Address of begin
1589 0004 | | .CONST 0x0004 ; Address of exception handler
158a 0001 | | .CONST 0x0001 ; Number of locals
158b BODY_1588:
158b INIT_1588:
158b 00db | | Load_Top At_Offset_3
158c 00db | | Load_Top At_Offset_3
158d 0217 | | Execute Heap_Access,All_Reference
158e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
158f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
1590 ; --------------------------------------------------------------------------------------
1590 ; SUBPROGRAM
1590 ; --------------------------------------------------------------------------------------
1590 1593 | | .CONST 0x1593 ; Address of begin
1591 0004 | | .CONST 0x0004 ; Address of exception handler
1592 0001 | | .CONST 0x0001 ; Number of locals
1593 BODY_1590:
1593 INIT_1590:
1593 00da | | Load_Top At_Offset_2
1594 0217 | | Execute Heap_Access,All_Reference
1595 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
1596 0f00 | | Execute_Immediate Equal,0x0
1597 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1598 ; --------------------------------------------------------------------------------------
1598 ; SUBPROGRAM
1598 ; --------------------------------------------------------------------------------------
1598 159b | | .CONST 0x159b ; Address of begin
1599 0004 | | .CONST 0x0004 ; Address of exception handler
159a 0001 | | .CONST 0x0001 ; Number of locals
159b BODY_1598:
159b INIT_1598:
159b 00da | | Load_Top At_Offset_2
159c 0217 | | Execute Heap_Access,All_Reference
159d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
159e e002 | | Load 0x0,0x2
159f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
15a0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
15a1 0000 0000 | | .BLANK 0000[0x7]
15a8 ; --------------------------------------------------------------------------------------
15a8 ; SUBPROGRAM
15a8 ; --------------------------------------------------------------------------------------
15a8 15ab | | .CONST 0x15ab ; Address of begin
15a9 0004 | | .CONST 0x0004 ; Address of exception handler
15aa 0001 | | .CONST 0x0001 ; Number of locals
15ab BODY_15a8:
15ab INIT_15a8:
15ab 00da | | Load_Top At_Offset_2
15ac e00b | | Load 0x0,0xb
15ad 180d | | Execute Package,Field_Execute,Field_Number 0xd
15ae e223 | # | Load 0x1,0x23
15af e224 | $ | Load 0x1,0x24
15b0 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
15b1 e008 | | Load 0x0,0x8
15b2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
15b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
15b4 0000 0000 | | .BLANK 0000[0x4]
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 e222 | " | Load 0x1,0x22
15bd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
15be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
15bf 0000 | | .XXX[0x1]
15c0 ; --------------------------------------------------------------------------------------
15c0 ; SUBPROGRAM
15c0 ; --------------------------------------------------------------------------------------
15c0 15c3 | | .CONST 0x15c3 ; Address of begin
15c1 0004 | | .CONST 0x0004 ; Address of exception handler
15c2 0001 | | .CONST 0x0001 ; Number of locals
15c3 BODY_15c0:
15c3 INIT_15c0:
15c3 4608 |F | Jump_Case 0x9
15c4 7808 |x | Jump 0x15cd ; case 0x0
15c5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
15c6 780a |x | Jump 0x15d1 ; case 0x2
15c7 7809 |x | Jump 0x15d1 ; case 0x3
15c8 7808 |x | Jump 0x15d1 ; case 0x4
15c9 7807 |x | Jump 0x15d1 ; case 0x5
15ca 7806 |x | Jump 0x15d1 ; case 0x6
15cb 7805 |x | Jump 0x15d1 ; case 0x7
15cc 7804 |x | Jump 0x15d1 ; case 0x8
15cd 00da | | Load_Top At_Offset_2
15ce 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
15cf 1c00 | | Execute_Immediate Run_Utility,0x0
15d0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
15d1 0869 | i | Execute_Immediate Raise,0x69
15d2 0000 0000 | | .BLANK 0000[0x6]
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 00da | | Load_Top At_Offset_2
15dc 0217 | | Execute Heap_Access,All_Reference
15dd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
15de 682a |h* | Jump_Zero 0x1609
15df 00da | | Load_Top At_Offset_2
15e0 0217 | | Execute Heap_Access,All_Reference
15e1 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
15e2 0229 | ) | Execute Access,All_Read
15e3 e018 | | Load 0x0,0x18
15e4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
15e5 7015 |p | Jump_Nonzero 0x15fb
15e6 00da | | Load_Top At_Offset_2
15e7 0219 | | Execute Heap_Access,All_Read
15e8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
15e9 00d8 | | Load_Top At_Offset_0
15ea 0229 | ) | Execute Access,All_Read
15eb e019 | | Load 0x0,0x19
15ec 1b0e | | Execute Package,Field_Read,Field_Number 0xe
15ed e01a | | Load 0x0,0x1a
15ee 181e | | Execute Package,Field_Execute,Field_Number 0x1e
15ef 00ea | | Load_Encached Null_String_Cache
15f0 00ea | | Load_Encached Null_String_Cache
15f1 e5ff | | Load 0x2,-0x1
15f2 0217 | | Execute Heap_Access,All_Reference
15f3 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
15f4 8012 | | Call 0x0,0x12
15f5 4800 |H | Short_Literal 0x0
15f6 e018 | | Load 0x0,0x18
15f7 1814 | | Execute Package,Field_Execute,Field_Number 0x14
15f8 00d9 | | Load_Top At_Offset_1
15f9 0228 | ( | Execute Access,All_Write
15fa 00d1 | | Pop_Control Pop_Count_1
15fb 00da | | Load_Top At_Offset_2
15fc 0219 | | Execute Heap_Access,All_Read
15fd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
15fe 00d8 | | Load_Top At_Offset_0
15ff 0229 | ) | Execute Access,All_Read
1600 e018 | | Load 0x0,0x18
1601 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1602 00d9 | | Load_Top At_Offset_1
1603 0228 | ( | Execute Access,All_Write
1604 00d1 | | Pop_Control Pop_Count_1
1605 4800 |H | Short_Literal 0x0
1606 00db | | Load_Top At_Offset_3
1607 0217 | | Execute Heap_Access,All_Reference
1608 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1609 4502 |E | Exit_Suprogram New_Top_Offset 0x2
160a 0000 0000 | | .BLANK 0000[0x6]
1610 ; --------------------------------------------------------------------------------------
1610 ; SUBPROGRAM
1610 ; --------------------------------------------------------------------------------------
1610 1615 | | .CONST 0x1615 ; Address of begin
1611 0004 | | .CONST 0x0004 ; Address of exception handler
1612 0002 | | .CONST 0x0002 ; Number of locals
1613 INIT_1610:
1613 029f 1753 | S| Declare_Subprogram INIT_1750,For_Call
1615 BODY_1610:
1615 00db | | Load_Top At_Offset_3
1616 e010 | | Load 0x0,0x10
1617 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
1618 0b0f | | Execute_Immediate Case_Compare,0xf
1619 7004 |p | Jump_Nonzero 0x161e
161a 0f01 | | Execute_Immediate Equal,0x1
161b 7005 |p | Jump_Nonzero 0x1621
161c e017 | | Load 0x0,0x17
161d 0257 | W | Execute Discrete,Raise
161e 00d1 | | Pop_Control Pop_Count_1
161f 8602 | | Call 0x3,0x2
1620 7804 |x | Jump 0x1625
1621 00db | | Load_Top At_Offset_3
1622 e010 | | Load 0x0,0x10
1623 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1624 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
1625 0831 | 1 | Execute_Immediate Raise,0x31
1626 0000 0000 | | .XXX[0x2]
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 e5ff | | Load 0x2,-0x1
162c 0219 | | Execute Heap_Access,All_Read
162d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
162e e406 | | Load 0x2,0x6
162f 00d9 | | Load_Top At_Offset_1
1630 e013 | | Load 0x0,0x13
1631 180e | | Execute Package,Field_Execute,Field_Number 0xe
1632 e5fd | | Load 0x2,-0x3
1633 e7fd | | Load 0x3,-0x3
1634 e7fe | | Load 0x3,-0x2
1635 e7ff | | Load 0x3,-0x1
1636 e001 | | Load 0x0,0x1
1637 1818 | | Execute Package,Field_Execute,Field_Number 0x18
1638 00d1 | | Pop_Control Pop_Count_1
1639 c406 | | Store 0x2,0x6
163a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
163b 0000 0000 | | .BLANK 0000[0x5]
1640 ; --------------------------------------------------------------------------------------
1640 ; SUBPROGRAM
1640 ; --------------------------------------------------------------------------------------
1640 1645 | E | .CONST 0x1645 ; Address of begin
1641 0004 | | .CONST 0x0004 ; Address of exception handler
1642 0002 | | .CONST 0x0002 ; Number of locals
1643 INIT_1640:
1643 e404 | | Load 0x2,0x4
1644 8408 | | Call 0x2,0x8
1645 BODY_1640:
1645 e5fe | | Load 0x2,-0x2
1646 e00c | | Load 0x0,0xc
1647 1820 | | Execute Package,Field_Execute,Field_Number 0x20
1648 7002 |p | Jump_Nonzero 0x164b
1649 00cc | | Action Pop_Block
164a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
164b e5ff | | Load 0x2,-0x1
164c 0219 | | Execute Heap_Access,All_Read
164d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
164e e402 | | Load 0x2,0x2
164f 00d9 | | Load_Top At_Offset_1
1650 0229 | ) | Execute Access,All_Read
1651 e407 | | Load 0x2,0x7
1652 801b | | Call 0x0,0x1b
1653 00da | | Load_Top At_Offset_2
1654 0228 | ( | Execute Access,All_Write
1655 c402 | | Store 0x2,0x2
1656 00d1 | | Pop_Control Pop_Count_1
1657 e402 | | Load 0x2,0x2
1658 7005 |p | Jump_Nonzero 0x165e
1659 4801 |H | Short_Literal 0x1
165a e5ff | | Load 0x2,-0x1
165b 0217 | | Execute Heap_Access,All_Reference
165c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
165d 7806 |x | Jump 0x1664
165e e402 | | Load 0x2,0x2
165f e5fe | | Load 0x2,-0x2
1660 e00c | | Load 0x0,0xc
1661 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1662 00cc | | Action Pop_Block
1663 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1664 e5ff | | Load 0x2,-0x1
1665 0219 | | Execute Heap_Access,All_Read
1666 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1667 00d8 | | Load_Top At_Offset_0
1668 0229 | ) | Execute Access,All_Read
1669 e5fe | | Load 0x2,-0x2
166a e01c | | Load 0x0,0x1c
166b a01d | | Store_Unchecked 0x0,0x1d
166c a01e | | Store_Unchecked 0x0,0x1e
166d a01f | | Store_Unchecked 0x0,0x1f
166e a020 | | Store_Unchecked 0x0,0x20
166f a021 | ! | Store_Unchecked 0x0,0x21
1670 e022 | " | Load 0x0,0x22
1671 1815 | | Execute Package,Field_Execute,Field_Number 0x15
1672 00d9 | | Load_Top At_Offset_1
1673 0228 | ( | Execute Access,All_Write
1674 00d1 | | Pop_Control Pop_Count_1
1675 e5ff | | Load 0x2,-0x1
1676 0219 | | Execute Heap_Access,All_Read
1677 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1678 00d8 | | Load_Top At_Offset_0
1679 0229 | ) | Execute Access,All_Read
167a 4800 |H | Short_Literal 0x0
167b e018 | | Load 0x0,0x18
167c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
167d 00d9 | | Load_Top At_Offset_1
167e 0228 | ( | Execute Access,All_Write
167f 00d1 | | Pop_Control Pop_Count_1
1680 00d8 | | Load_Top At_Offset_0
1681 0092 1787 | | Action Push_String_Extended,0x1787 ; "<OPEN>"
1683 4800 |H | Short_Literal 0x0
1684 8409 | | Call 0x2,0x9
1685 e5ff | | Load 0x2,-0x1
1686 0219 | | Execute Heap_Access,All_Read
1687 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1688 00d8 | | Load_Top At_Offset_0
1689 0229 | ) | Execute Access,All_Read
168a e018 | | Load 0x0,0x18
168b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
168c 00d9 | | Load_Top At_Offset_1
168d 0228 | ( | Execute Access,All_Write
168e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
168f 0000 | | .XXX[0x1]
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 e402 | | Load 0x2,0x2
16a8 7005 |p | Jump_Nonzero 0x16ae
16a9 4801 |H | Short_Literal 0x1
16aa e5ff | | Load 0x2,-0x1
16ab 0217 | | Execute Heap_Access,All_Reference
16ac 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
16ad 7806 |x | Jump 0x16b4
16ae e402 | | Load 0x2,0x2
16af e5fe | | Load 0x2,-0x2
16b0 e00c | | Load 0x0,0xc
16b1 181f | | Execute Package,Field_Execute,Field_Number 0x1f
16b2 00cc | | Action Pop_Block
16b3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
16b4 00d8 | | Load_Top At_Offset_0
16b5 0092 1787 | | Action Push_String_Extended,0x1787 ; "<OPEN>"
16b7 4801 |H | Short_Literal 0x1
16b8 8409 | | Call 0x2,0x9
16b9 4802 |H | Short_Literal 0x2
16ba e406 | | Load 0x2,0x6
16bb e011 | | Load 0x0,0x11
16bc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
16bd 6814 |h | Jump_Zero 0x16d2
16be e5ff | | Load 0x2,-0x1
16bf 0219 | | Execute Heap_Access,All_Read
16c0 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
16c1 00d8 | | Load_Top At_Offset_0
16c2 0229 | ) | Execute Access,All_Read
16c3 e018 | | Load 0x0,0x18
16c4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
16c5 00d9 | | Load_Top At_Offset_1
16c6 0228 | ( | Execute Access,All_Write
16c7 00d1 | | Pop_Control Pop_Count_1
16c8 e010 | | Load 0x0,0x10
16c9 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
16ca 6031 |`1 | Indirect_Literal Discrete,0x16fc,{0x00000000, 0x00004011}
16cb e002 | | Load 0x0,0x2
16cc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
16cd e5fe | | Load 0x2,-0x2
16ce e00c | | Load 0x0,0xc
16cf 181f | | Execute Package,Field_Execute,Field_Number 0x1f
16d0 00cc | | Action Pop_Block
16d1 4504 |E | Exit_Suprogram New_Top_Offset 0x4
16d2 4801 |H | Short_Literal 0x1
16d3 e5ff | | Load 0x2,-0x1
16d4 0217 | | Execute Heap_Access,All_Reference
16d5 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
16d6 e5ff | | Load 0x2,-0x1
16d7 0219 | | Execute Heap_Access,All_Read
16d8 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
16d9 00d8 | | Load_Top At_Offset_0
16da 0229 | ) | Execute Access,All_Read
16db 4800 |H | Short_Literal 0x0
16dc e018 | | Load 0x0,0x18
16dd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
16de 00d9 | | Load_Top At_Offset_1
16df 0228 | ( | Execute Access,All_Write
16e0 00d1 | | Pop_Control Pop_Count_1
16e1 e5ff | | Load 0x2,-0x1
16e2 0219 | | Execute Heap_Access,All_Read
16e3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
16e4 00d8 | | Load_Top At_Offset_0
16e5 0229 | ) | Execute Access,All_Read
16e6 e5fe | | Load 0x2,-0x2
16e7 e01c | | Load 0x0,0x1c
16e8 a01d | | Store_Unchecked 0x0,0x1d
16e9 a01e | | Store_Unchecked 0x0,0x1e
16ea a01f | | Store_Unchecked 0x0,0x1f
16eb a020 | | Store_Unchecked 0x0,0x20
16ec a021 | ! | Store_Unchecked 0x0,0x21
16ed e022 | " | Load 0x0,0x22
16ee 1815 | | Execute Package,Field_Execute,Field_Number 0x15
16ef 00d9 | | Load_Top At_Offset_1
16f0 0228 | ( | Execute Access,All_Write
16f1 00d1 | | Pop_Control Pop_Count_1
16f2 e5ff | | Load 0x2,-0x1
16f3 0219 | | Execute Heap_Access,All_Read
16f4 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
16f5 00d8 | | Load_Top At_Offset_0
16f6 0229 | ) | Execute Access,All_Read
16f7 e018 | | Load 0x0,0x18
16f8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
16f9 00d9 | | Load_Top At_Offset_1
16fa 0228 | ( | Execute Access,All_Write
16fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
16fc 0000 0000 | | .LITERAL {0x00000000, 0x00004011}
1700 ; --------------------------------------------------------------------------------------
1700 ; SUBPROGRAM
1700 ; --------------------------------------------------------------------------------------
1700 1705 | | .CONST 0x1705 ; Address of begin
1701 0004 | | .CONST 0x0004 ; Address of exception handler
1702 0002 | | .CONST 0x0002 ; Number of locals
1703 INIT_1700:
1703 e403 | | Load 0x2,0x3
1704 8408 | | Call 0x2,0x8
1705 BODY_1700:
1705 e5ff | | Load 0x2,-0x1
1706 0219 | | Execute Heap_Access,All_Read
1707 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1708 e402 | | Load 0x2,0x2
1709 00d9 | | Load_Top At_Offset_1
170a 0229 | ) | Execute Access,All_Read
170b e407 | | Load 0x2,0x7
170c 801b | | Call 0x0,0x1b
170d 00da | | Load_Top At_Offset_2
170e 0228 | ( | Execute Access,All_Write
170f c402 | | Store 0x2,0x2
1710 00d1 | | Pop_Control Pop_Count_1
1711 e402 | | Load 0x2,0x2
1712 7005 |p | Jump_Nonzero 0x1718
1713 4801 |H | Short_Literal 0x1
1714 e5ff | | Load 0x2,-0x1
1715 0217 | | Execute Heap_Access,All_Reference
1716 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
1717 7806 |x | Jump 0x171e
1718 e402 | | Load 0x2,0x2
1719 e5fe | | Load 0x2,-0x2
171a e00c | | Load 0x0,0xc
171b 181f | | Execute Package,Field_Execute,Field_Number 0x1f
171c 00cc | | Action Pop_Block
171d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
171e e5ff | | Load 0x2,-0x1
171f 0219 | | Execute Heap_Access,All_Read
1720 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1721 00d8 | | Load_Top At_Offset_0
1722 0229 | ) | Execute Access,All_Read
1723 e5fe | | Load 0x2,-0x2
1724 e01c | | Load 0x0,0x1c
1725 a01d | | Store_Unchecked 0x0,0x1d
1726 a01e | | Store_Unchecked 0x0,0x1e
1727 a01f | | Store_Unchecked 0x0,0x1f
1728 a020 | | Store_Unchecked 0x0,0x20
1729 a021 | ! | Store_Unchecked 0x0,0x21
172a e022 | " | Load 0x0,0x22
172b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
172c 00d9 | | Load_Top At_Offset_1
172d 0228 | ( | Execute Access,All_Write
172e 00d1 | | Pop_Control Pop_Count_1
172f e5ff | | Load 0x2,-0x1
1730 0219 | | Execute Heap_Access,All_Read
1731 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1732 00d8 | | Load_Top At_Offset_0
1733 0229 | ) | Execute Access,All_Read
1734 4800 |H | Short_Literal 0x0
1735 e018 | | Load 0x0,0x18
1736 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1737 00d9 | | Load_Top At_Offset_1
1738 0228 | ( | Execute Access,All_Write
1739 00d1 | | Pop_Control Pop_Count_1
173a 00d8 | | Load_Top At_Offset_0
173b 0092 1787 | | Action Push_String_Extended,0x1787 ; "<OPEN>"
173d 4800 |H | Short_Literal 0x0
173e 8409 | | Call 0x2,0x9
173f e5ff | | Load 0x2,-0x1
1740 0219 | | Execute Heap_Access,All_Read
1741 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
1742 00d8 | | Load_Top At_Offset_0
1743 0229 | ) | Execute Access,All_Read
1744 e018 | | Load 0x0,0x18
1745 1819 | | Execute Package,Field_Execute,Field_Number 0x19
1746 00d9 | | Load_Top At_Offset_1
1747 0228 | ( | Execute Access,All_Write
1748 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1749 0000 0000 | | .BLANK 0000[0x7]
1750 ; --------------------------------------------------------------------------------------
1750 ; SUBPROGRAM
1750 ; --------------------------------------------------------------------------------------
1750 175b | [ | .CONST 0x175b ; Address of begin
1751 0004 | | .CONST 0x0004 ; Address of exception handler
1752 0002 | | .CONST 0x0002 ; Number of locals
1753 INIT_1750:
1753 e5ff | | Load 0x2,-0x1
1754 0217 | | Execute Heap_Access,All_Reference
1755 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
1756 0219 | | Execute Heap_Access,All_Read
1757 e20f | | Load 0x1,0xf
1758 0119 | | Execute Any,Check_In_Formal_Type
1759 e5fe | | Load 0x2,-0x2
175a 8211 | | Call 0x1,0x11
175b BODY_1750:
175b 00d8 | | Load_Top At_Offset_0
175c e002 | | Load 0x0,0x2
175d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
175e 01df | | Execute Vector,Equal
175f 6818 |h | Jump_Zero 0x1778
1760 e013 | | Load 0x0,0x13
1761 180e | | Execute Package,Field_Execute,Field_Number 0xe
1762 4801 |H | Short_Literal 0x1
1763 4801 |H | Short_Literal 0x1
1764 e010 | | Load 0x0,0x10
1765 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1766 0334 | 4 | Declare_Variable Array,With_Constraint
1767 e5fe | | Load 0x2,-0x2
1768 e00c | | Load 0x0,0xc
1769 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
176a 4801 |H | Short_Literal 0x1
176b 00da | | Load_Top At_Offset_2
176c 01d6 | | Execute Vector,Field_Write
176d 600e |` | Indirect_Literal Discrete,0x177c,{0x00000000, 0x0000401e}
176e e002 | | Load 0x0,0x2
176f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1770 e010 | | Load 0x0,0x10
1771 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1772 6009 |` | Indirect_Literal Discrete,0x177c,{0x00000000, 0x0000401e}
1773 e002 | | Load 0x0,0x2
1774 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1775 e5fe | | Load 0x2,-0x2
1776 e00c | | Load 0x0,0xc
1777 181f | | Execute Package,Field_Execute,Field_Number 0x1f
1778 00d8 | | Load_Top At_Offset_0
1779 00cb | | Action Pop_Block_With_Result
177a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
177b 0000 | | .XXX[0x1]
177c 0000 0000 | | .LITERAL {0x00000000, 0x0000401e}
1780 ; --------------------------------------------------------------------------------------
1780 ; STRING TABLE
1780 ; --------------------------------------------------------------------------------------
1780 0012 | | .STRTAB 0x0012->0x1789 ; "--/"
1781 0013 | | .STRTAB 0x0013->0x178a ; "!Machine.Temporary.Downloader_Temp_D"
1782 0035 | 5 | .STRTAB 0x0035->0x179c ; "$"
1783 0034 | 4 | .STRTAB 0x0034->0x179d ; "--/<error> "
1784 003d | = | .STRTAB 0x003d->0x17a2 ; "pragma End_Of_Input;"
1785 004f | O | .STRTAB 0x004f->0x17ac ; "<TEMP>"
1786 0053 | S | .STRTAB 0x0053->0x17af ; "<SCRIPT_FILE>"
1787 005e | ^ | .STRTAB 0x005e->0x17b6 ; "<OPEN>"
1788 0062 | b | .STREND 0x0062->0x17b9
1789 2d2d 2f21 |--/!| .STRTAB_STRINGS
17b9 0000 0000 | | .BLANK 0000[0x7]
17c0 ; --------------------------------------------------------------------------------------
17c0 ; Debug Table
17c0 ; --------------------------------------------------------------------------------------
17c0 0004 0009 | | .DEBUG4 0x0004,0x0009,0xeb3e,0x0000,0x0001,0x0000
17c6 0000 0000 | | .BLANK 0000[0x3a]