|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 10240 (0x2800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 13f8 | | .CONST 0x13f8 ; 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 800c | | .CONST 0x800c ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00d4 | | .CONST 0x00d4 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0054 | T | .CONST 0x0054 ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
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 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated
0023 c20e | | Store 0x1,0xe
0024 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated
0026 c211 | | Store 0x1,0x11
0027 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated
0029 c20f | | Store 0x1,0xf
002a 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
002c c210 | | Store 0x1,0x10
002d 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated
002f c222 | " | Store 0x1,0x22
0030 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated
0032 c21f | | Store 0x1,0x1f
0033 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
0035 c214 | | Store 0x1,0x14
0036 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated
0038 c220 | | Store 0x1,0x20
0039 029a 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call,Visible,Unelaborated
003b c218 | | Store 0x1,0x18
003c 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated
003e c21a | | Store 0x1,0x1a
003f 029a 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call,Visible,Unelaborated
0041 c21b | | Store 0x1,0x1b
0042 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated
0044 c21d | | Store 0x1,0x1d
0045 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated
0047 c221 | ! | Store 0x1,0x21
0048 00bf | | Action Accept_Activation
0049 4800 |H | Short_Literal 0x0
004a 4801 |H | Short_Literal 0x1
004b 029f 03c3 | | Declare_Subprogram INIT_03c0,For_Call
004d 03fd | | Declare_Type Discrete,Defined
004e 4800 |H | Short_Literal 0x0
004f 4801 |H | Short_Literal 0x1
0050 029f 03eb | | Declare_Subprogram INIT_03e8,For_Call
0052 03fd | | Declare_Type Discrete,Defined
0053 4801 |H | Short_Literal 0x1
0054 4864 |Hd | Short_Literal 0x64
0055 00e9 | | Load_Encached String_Cache
0056 035b | [ | Declare_Type Array,Constrained
0057 00e2 | | Load_Encached Integer_Cache
0058 e001 | | Load 0x0,0x1
0059 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
005a e002 | | Load 0x0,0x2
005b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005c 029f 0413 | | Declare_Subprogram INIT_0410,For_Call
005e 4804 |H | Short_Literal 0x4
005f 032d | - | Declare_Type Record,Defined
0060 0092 1284 | | Action Push_String_Extended,0x1284 ; "RCI_BATCH_MOVE_FILE"
0062 029d 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call
0064 029d 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call
0066 029d 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call
0068 029d 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call
006a a003 | | Store_Unchecked 0x0,0x3
006b 00c6 | | Action Check_Subprogram_Elaborated
006c e004 | | Load 0x0,0x4
006d 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
006e 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
006f e005 | | Load 0x0,0x5
0070 e006 | | Load 0x0,0x6
0071 4800 |H | Short_Literal 0x0
0072 0007 | | Action Break_Optional
0073 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call
0075 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0076 00c7 | | Action Elaborate_Subprogram
0077 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0078 00c7 | | Action Elaborate_Subprogram
0079 029d 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call
007b 029d 06cb | | Declare_Subprogram INIT_06c8,For_Outer_Call
007d 029d 070b | | Declare_Subprogram INIT_0708,For_Outer_Call
007f 029d 071b | | Declare_Subprogram INIT_0718,For_Outer_Call
0081 029d 0733 | 3| Declare_Subprogram INIT_0730,For_Outer_Call
0083 029d 074b | K| Declare_Subprogram INIT_0748,For_Outer_Call
0085 029d 078b | | Declare_Subprogram INIT_0788,For_Outer_Call
0087 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0088 00c7 | | Action Elaborate_Subprogram
0089 1d0e | | Execute_Immediate Reference_Lex_1,0xe
008a 00c7 | | Action Elaborate_Subprogram
008b 1d18 | | Execute_Immediate Reference_Lex_1,0x18
008c 00c7 | | Action Elaborate_Subprogram
008d 029d 07ab | | Declare_Subprogram INIT_07a8,For_Outer_Call
008f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0090 00c7 | | Action Elaborate_Subprogram
0091 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0092 00c7 | | Action Elaborate_Subprogram
0093 029d 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call
0095 029d 07fb | | Declare_Subprogram INIT_07f8,For_Outer_Call
0097 029d 082b | +| Declare_Subprogram INIT_0828,For_Outer_Call
0099 029d 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call
009b 029d 08db | | Declare_Subprogram INIT_08d8,For_Outer_Call
009d 029d 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call
009f 029d 09e3 | | Declare_Subprogram INIT_09e0,For_Outer_Call
00a1 029d 0a2b | +| Declare_Subprogram INIT_0a28,For_Outer_Call
00a3 029d 0aab | | Declare_Subprogram INIT_0aa8,For_Outer_Call
00a5 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00a6 00c7 | | Action Elaborate_Subprogram
00a7 029d 0adb | | Declare_Subprogram INIT_0ad8,For_Outer_Call
00a9 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00aa 00c7 | | Action Elaborate_Subprogram
00ab 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00ac 00c7 | | Action Elaborate_Subprogram
00ad 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00ae 00c7 | | Action Elaborate_Subprogram
00af 029d 0b0b | | Declare_Subprogram INIT_0b08,For_Outer_Call
00b1 a003 | | Store_Unchecked 0x0,0x3
00b2 00c6 | | Action Check_Subprogram_Elaborated
00b3 e007 | | Load 0x0,0x7
00b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b5 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
00b6 e008 | | Load 0x0,0x8
00b7 e009 | | Load 0x0,0x9
00b8 4800 |H | Short_Literal 0x0
00b9 0007 | | Action Break_Optional
00ba 029d 0b43 | C| Declare_Subprogram INIT_0b40,For_Outer_Call
00bc a003 | | Store_Unchecked 0x0,0x3
00bd 00c6 | | Action Check_Subprogram_Elaborated
00be e225 | % | Load 0x1,0x25
00bf 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
00c0 e00a | | Load 0x0,0xa
00c1 e00b | | Load 0x0,0xb
00c2 4800 |H | Short_Literal 0x0
00c3 0007 | | Action Break_Optional
00c4 029d 0b7b | {| Declare_Subprogram INIT_0b78,For_Outer_Call
00c6 029d 0bf3 | | Declare_Subprogram INIT_0bf0,For_Outer_Call
00c8 029d 0c23 | #| Declare_Subprogram INIT_0c20,For_Outer_Call
00ca 029d 0c43 | C| Declare_Subprogram INIT_0c40,For_Outer_Call
00cc 029d 0cc3 | | Declare_Subprogram INIT_0cc0,For_Outer_Call
00ce 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00cf 00c7 | | Action Elaborate_Subprogram
00d0 029d 0ce3 | | Declare_Subprogram INIT_0ce0,For_Outer_Call
00d2 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00d3 00c7 | | Action Elaborate_Subprogram
00d4 BODY_0008:
00d4 00bc | | Action Signal_Activated
00d5 00bb | | Action Signal_Completion
00d6 0000 0000 | | .XXX[0x2]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0100 | | .CONST 0x0100 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db 4800 |H | Short_Literal 0x0
00dc a5f9 | | Store_Unchecked 0x2,-0x7
00dd e5fa | | Load 0x2,-0x6
00de e5fe | | Load 0x2,-0x2
00df 8231 | 1 | Call 0x1,0x31
00e0 6816 |h | Jump_Zero 0xf7
00e1 e5fa | | Load 0x2,-0x6
00e2 e5fe | | Load 0x2,-0x2
00e3 e00c | | Load 0x0,0xc
00e4 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
00e5 6808 |h | Jump_Zero 0xee
00e6 e00d | | Load 0x0,0xd
00e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e8 e5fa | | Load 0x2,-0x6
00e9 e5fb | | Load 0x2,-0x5
00ea e5fe | | Load 0x2,-0x2
00eb e5ff | | Load 0x2,-0x1
00ec 8237 | 7 | Call 0x1,0x37
00ed c5f9 | | Store 0x2,-0x7
00ee e00d | | Load 0x0,0xd
00ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f0 e5fa | | Load 0x2,-0x6
00f1 e5fb | | Load 0x2,-0x5
00f2 e5fe | | Load 0x2,-0x2
00f3 e5ff | | Load 0x2,-0x1
00f4 8211 | | Call 0x1,0x11
00f5 c5f9 | | Store 0x2,-0x7
00f6 4507 |E | Exit_Suprogram New_Top_Offset 0x7
00f7 e00d | | Load 0x0,0xd
00f8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f9 e5fa | | Load 0x2,-0x6
00fa e5fb | | Load 0x2,-0x5
00fb e5fe | | Load 0x2,-0x2
00fc e5ff | | Load 0x2,-0x1
00fd 8237 | 7 | Call 0x1,0x37
00fe c5f9 | | Store 0x2,-0x7
00ff 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0100 TRAP_00d8:
0100 0007 | | Action Break_Optional
0101 e5fa | | Load 0x2,-0x6
0102 0092 1285 | | Action Push_String_Extended,0x1285 ; "Generate_Compile_Commands"
0104 e00e | | Load 0x0,0xe
0105 180f | | Execute Package,Field_Execute,Field_Number 0xf
0106 0092 1285 | | Action Push_String_Extended,0x1285 ; "Generate_Compile_Commands"
0108 e00e | | Load 0x0,0xe
0109 1810 | | Execute Package,Field_Execute,Field_Number 0x10
010a a5f9 | | Store_Unchecked 0x2,-0x7
010b 4507 |E | Exit_Suprogram New_Top_Offset 0x7
010c 0000 0000 | | .BLANK 0000[0x4]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0129 | ) | .CONST 0x0129 ; Address of begin
0111 017b | { | .CONST 0x017b ; Address of exception handler
0112 0007 | | .CONST 0x0007 ; Number of locals
0113 INIT_0110:
0113 e001 | | Load 0x0,0x1
0114 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0115 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0116 02c7 | | Declare_Variable Any
0117 00d8 | | Load_Top At_Offset_0
0118 1c00 | | Execute_Immediate Run_Utility,0x0
0119 e00d | | Load 0x0,0xd
011a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011b e001 | | Load 0x0,0x1
011c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
011d 02c7 | | Declare_Variable Any
011e 00d8 | | Load_Top At_Offset_0
011f 1c00 | | Execute_Immediate Run_Utility,0x0
0120 e001 | | Load 0x0,0x1
0121 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0122 02c7 | | Declare_Variable Any
0123 00d8 | | Load_Top At_Offset_0
0124 1c00 | | Execute_Immediate Run_Utility,0x0
0125 e001 | | Load 0x0,0x1
0126 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0127 029f 0cf3 | | Declare_Subprogram INIT_0cf0,For_Call
0129 BODY_0110:
0129 4800 |H | Short_Literal 0x0
012a a5fb | | Store_Unchecked 0x2,-0x5
012b e00d | | Load 0x0,0xd
012c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012d e402 | | Load 0x2,0x2
012e 0120 | | Execute Any,Is_Value
012f 6804 |h | Jump_Zero 0x134
0130 e001 | | Load 0x0,0x1
0131 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0132 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0133 7801 |x | Jump 0x135
0134 e402 | | Load 0x2,0x2
0135 e5fc | | Load 0x2,-0x4
0136 e5fe | | Load 0x2,-0x2
0137 e00c | | Load 0x0,0xc
0138 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0139 c402 | | Store 0x2,0x2
013a c403 | | Store 0x2,0x3
013b 4800 |H | Short_Literal 0x0
013c e403 | | Load 0x2,0x3
013d e00d | | Load 0x0,0xd
013e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
013f 7003 |p | Jump_Nonzero 0x143
0140 e403 | | Load 0x2,0x3
0141 a5fb | | Store_Unchecked 0x2,-0x5
0142 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0143 00cf | | Action Mark_Auxiliary
0144 7830 |x0 | Jump 0x175
0145 e001 | | Load 0x0,0x1
0146 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0147 e404 | | Load 0x2,0x4
0148 0120 | | Execute Any,Is_Value
0149 6803 |h | Jump_Zero 0x14d
014a e001 | | Load 0x0,0x1
014b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014c 7801 |x | Jump 0x14e
014d e404 | | Load 0x2,0x4
014e e402 | | Load 0x2,0x2
014f e001 | | Load 0x0,0x1
0150 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0151 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0152 c404 | | Store 0x2,0x4
0153 005b | [ | Store_Top Discrete,At_Offset_3
0154 00da | | Load_Top At_Offset_2
0155 6801 |h | Jump_Zero 0x157
0156 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0157 e00d | | Load 0x0,0xd
0158 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0159 e405 | | Load 0x2,0x5
015a 0120 | | Execute Any,Is_Value
015b 6803 |h | Jump_Zero 0x15f
015c e001 | | Load 0x0,0x1
015d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
015e 7801 |x | Jump 0x160
015f e405 | | Load 0x2,0x5
0160 e5fc | | Load 0x2,-0x4
0161 e404 | | Load 0x2,0x4
0162 e00c | | Load 0x0,0xc
0163 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0164 c405 | | Store 0x2,0x5
0165 c403 | | Store 0x2,0x3
0166 4800 |H | Short_Literal 0x0
0167 e403 | | Load 0x2,0x3
0168 e00d | | Load 0x0,0xd
0169 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
016a 7003 |p | Jump_Nonzero 0x16e
016b e403 | | Load 0x2,0x3
016c a5fb | | Store_Unchecked 0x2,-0x5
016d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
016e 8407 | | Call 0x2,0x7
016f e402 | | Load 0x2,0x2
0170 e001 | | Load 0x0,0x1
0171 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0172 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0173 c402 | | Store 0x2,0x2
0174 00c9 | | Action Pop_Auxiliary_Loop
0175 e402 | | Load 0x2,0x2
0176 e001 | | Load 0x0,0x1
0177 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0178 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0179 6fcb |o | Jump_Zero 0x145
017a 4505 |E | Exit_Suprogram New_Top_Offset 0x5
017b TRAP_0110:
017b 0007 | | Action Break_Optional
017c e5fc | | Load 0x2,-0x4
017d 0092 1286 | | Action Push_String_Extended,0x1286 ; "Generate_Secondary_Commands"
017f e00e | | Load 0x0,0xe
0180 180f | | Execute Package,Field_Execute,Field_Number 0xf
0181 0092 1286 | | Action Push_String_Extended,0x1286 ; "Generate_Secondary_Commands"
0183 e00e | | Load 0x0,0xe
0184 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0185 a5fb | | Store_Unchecked 0x2,-0x5
0186 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0187 0000 | | .XXX[0x1]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 0192 | | .CONST 0x0192 ; Address of begin
0189 019b | | .CONST 0x019b ; Address of exception handler
018a 0002 | | .CONST 0x0002 ; Number of locals
018b INIT_0188:
018b 00ea | | Load_Encached Null_String_Cache
018c e5fd | | Load 0x2,-0x3
018d e5fb | | Load 0x2,-0x5
018e e00f | | Load 0x0,0xf
018f 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0190 e00f | | Load 0x0,0xf
0191 18b8 | | Execute Package,Field_Execute,Field_Number 0xb8
0192 BODY_0188:
0192 e00d | | Load 0x0,0xd
0193 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0194 e5fa | | Load 0x2,-0x6
0195 00da | | Load_Top At_Offset_2
0196 e5ff | | Load 0x2,-0x1
0197 e010 | | Load 0x0,0x10
0198 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0199 c5f9 | | Store 0x2,-0x7
019a 4507 |E | Exit_Suprogram New_Top_Offset 0x7
019b TRAP_0188:
019b 0007 | | Action Break_Optional
019c e5fa | | Load 0x2,-0x6
019d 0092 1287 | | Action Push_String_Extended,0x1287 ; "Generate_Context_Change_Command"
019f e00e | | Load 0x0,0xe
01a0 180f | | Execute Package,Field_Execute,Field_Number 0xf
01a1 0092 1287 | | Action Push_String_Extended,0x1287 ; "Generate_Context_Change_Command"
01a3 e00e | | Load 0x0,0xe
01a4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01a5 a5f9 | | Store_Unchecked 0x2,-0x7
01a6 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01a7 0000 | | .XXX[0x1]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b3 | | .CONST 0x01b3 ; Address of begin
01a9 01bc | | .CONST 0x01bc ; Address of exception handler
01aa 0002 | | .CONST 0x0002 ; Number of locals
01ab INIT_01a8:
01ab 00ea | | Load_Encached Null_String_Cache
01ac e5fc | | Load 0x2,-0x4
01ad e5fd | | Load 0x2,-0x3
01ae e5fb | | Load 0x2,-0x5
01af e00f | | Load 0x0,0xf
01b0 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
01b1 e00f | | Load 0x0,0xf
01b2 18b9 | | Execute Package,Field_Execute,Field_Number 0xb9
01b3 BODY_01a8:
01b3 e00d | | Load 0x0,0xd
01b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b5 e5fa | | Load 0x2,-0x6
01b6 00da | | Load_Top At_Offset_2
01b7 e5ff | | Load 0x2,-0x1
01b8 e010 | | Load 0x0,0x10
01b9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ba c5f9 | | Store 0x2,-0x7
01bb 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01bc TRAP_01a8:
01bc 0007 | | Action Break_Optional
01bd e5fa | | Load 0x2,-0x6
01be 0092 1288 | | Action Push_String_Extended,0x1288 ; "Generate_Library_Change_Command"
01c0 e00e | | Load 0x0,0xe
01c1 180f | | Execute Package,Field_Execute,Field_Number 0xf
01c2 0092 1288 | | Action Push_String_Extended,0x1288 ; "Generate_Library_Change_Command"
01c4 e00e | | Load 0x0,0xe
01c5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01c6 a5f9 | | Store_Unchecked 0x2,-0x7
01c7 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01f5 | | .CONST 0x01f5 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 000b | | .CONST 0x000b ; Number of locals
01cb INIT_01c8:
01cb e011 | | Load 0x0,0x11
01cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01cd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
01ce 02c7 | | Declare_Variable Any
01cf e011 | | Load 0x0,0x11
01d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d1 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01d2 a402 | | Store_Unchecked 0x2,0x2
01d3 e001 | | Load 0x0,0x1
01d4 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
01d5 0322 | " | Declare_Variable Record
01d6 00d8 | | Load_Top At_Offset_0
01d7 1c00 | | Execute_Immediate Run_Utility,0x0
01d8 e002 | | Load 0x0,0x2
01d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01da 02c7 | | Declare_Variable Any
01db 00d8 | | Load_Top At_Offset_0
01dc 1c00 | | Execute_Immediate Run_Utility,0x0
01dd e002 | | Load 0x0,0x2
01de 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01df 02c7 | | Declare_Variable Any
01e0 00d8 | | Load_Top At_Offset_0
01e1 1c00 | | Execute_Immediate Run_Utility,0x0
01e2 e001 | | Load 0x0,0x1
01e3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01e4 02c7 | | Declare_Variable Any
01e5 00d8 | | Load_Top At_Offset_0
01e6 1c00 | | Execute_Immediate Run_Utility,0x0
01e7 e001 | | Load 0x0,0x1
01e8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01e9 02c7 | | Declare_Variable Any
01ea 00d8 | | Load_Top At_Offset_0
01eb 1c00 | | Execute_Immediate Run_Utility,0x0
01ec e00d | | Load 0x0,0xd
01ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ee 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01ef 00e1 | | Load_Encached Boolean_Cache
01f0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01f1 00e1 | | Load_Encached Boolean_Cache
01f2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01f3 029f 0d2b | +| Declare_Subprogram INIT_0d28,For_Call
01f5 BODY_01c8:
01f5 4800 |H | Short_Literal 0x0
01f6 a5f4 | | Store_Unchecked 0x2,-0xc
01f7 e5f8 | | Load 0x2,-0x8
01f8 702c |p, | Jump_Nonzero 0x225
01f9 e00d | | Load 0x0,0xd
01fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01fb 00e1 | | Load_Encached Boolean_Cache
01fc e405 | | Load 0x2,0x5
01fd e5f5 | | Load 0x2,-0xb
01fe e5fa | | Load 0x2,-0x6
01ff e010 | | Load 0x0,0x10
0200 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0201 c405 | | Store 0x2,0x5
0202 005b | [ | Store_Top Discrete,At_Offset_3
0203 c408 | | Store 0x2,0x8
0204 4800 |H | Short_Literal 0x0
0205 e408 | | Load 0x2,0x8
0206 e00d | | Load 0x0,0xd
0207 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0208 7003 |p | Jump_Nonzero 0x20c
0209 00db | | Load_Top At_Offset_3
020a a5f4 | | Store_Unchecked 0x2,-0xc
020b 450c |E | Exit_Suprogram New_Top_Offset 0xc
020c 00d9 | | Load_Top At_Offset_1
020d 6817 |h | Jump_Zero 0x225
020e e012 | | Load 0x0,0x12
020f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0210 4801 |H | Short_Literal 0x1
0211 4801 |H | Short_Literal 0x1
0212 e013 | | Load 0x0,0x13
0213 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0214 035b | [ | Declare_Type Array,Constrained
0215 0337 | 7 | Declare_Variable Array
0216 e5fa | | Load 0x2,-0x6
0217 e013 | | Load 0x0,0x13
0218 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0219 e013 | | Load 0x0,0x13
021a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021b 0119 | | Execute Any,Check_In_Formal_Type
021c 4801 |H | Short_Literal 0x1
021d 00da | | Load_Top At_Offset_2
021e 01d6 | | Execute Vector,Field_Write
021f 6020 |` | Indirect_Literal Discrete,0x240,{0x00000000, 0x000081ef}
0220 e00d | | Load 0x0,0xd
0221 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0222 601d |` | Indirect_Literal Discrete,0x240,{0x00000000, 0x000081ef}
0223 a5f4 | | Store_Unchecked 0x2,-0xc
0224 450c |E | Exit_Suprogram New_Top_Offset 0xc
0225 e012 | | Load 0x0,0x12
0226 180e | | Execute Package,Field_Execute,Field_Number 0xe
0227 4802 |H | Short_Literal 0x2
0228 0092 1289 | | Action Push_String_Extended,0x1289 ; "Computing build closure"
022a e014 | | Load 0x0,0x14
022b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
022c e00d | | Load 0x0,0xd
022d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022e e402 | | Load 0x2,0x2
022f e5f5 | | Load 0x2,-0xb
0230 e5f6 | | Load 0x2,-0xa
0231 e5ff | | Load 0x2,-0x1
0232 e015 | | Load 0x0,0x15
0233 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0234 c402 | | Store 0x2,0x2
0235 c408 | | Store 0x2,0x8
0236 4800 |H | Short_Literal 0x0
0237 e408 | | Load 0x2,0x8
0238 e00d | | Load 0x0,0xd
0239 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
023a 7003 |p | Jump_Nonzero 0x23e
023b 00db | | Load_Top At_Offset_3
023c a5f4 | | Store_Unchecked 0x2,-0xc
023d 450c |E | Exit_Suprogram New_Top_Offset 0xc
023e 840b | | Call 0x2,0xb
023f 450c |E | Exit_Suprogram New_Top_Offset 0xc
0240 0000 0000 | | .LITERAL {0x00000000, 0x000081ef}
0244 0000 0000 | | .BLANK 0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0266 | f | .CONST 0x0266 ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0008 | | .CONST 0x0008 ; Number of locals
024b INIT_0248:
024b e00d | | Load 0x0,0xd
024c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
024e e001 | | Load 0x0,0x1
024f 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0250 0322 | " | Declare_Variable Record
0251 00d8 | | Load_Top At_Offset_0
0252 1c00 | | Execute_Immediate Run_Utility,0x0
0253 e004 | | Load 0x0,0x4
0254 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0255 02c7 | | Declare_Variable Any
0256 00d8 | | Load_Top At_Offset_0
0257 1c00 | | Execute_Immediate Run_Utility,0x0
0258 e001 | | Load 0x0,0x1
0259 1b0f | | Execute Package,Field_Read,Field_Number 0xf
025a 02c7 | | Declare_Variable Any
025b 00d8 | | Load_Top At_Offset_0
025c 1c00 | | Execute_Immediate Run_Utility,0x0
025d e001 | | Load 0x0,0x1
025e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
025f 02c7 | | Declare_Variable Any
0260 00d8 | | Load_Top At_Offset_0
0261 1c00 | | Execute_Immediate Run_Utility,0x0
0262 00e1 | | Load_Encached Boolean_Cache
0263 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0264 029f 0de3 | | Declare_Subprogram INIT_0de0,For_Call
0266 BODY_0248:
0266 4800 |H | Short_Literal 0x0
0267 a5fc | | Store_Unchecked 0x2,-0x4
0268 8408 | | Call 0x2,0x8
0269 4504 |E | Exit_Suprogram New_Top_Offset 0x4
026a 0000 0000 | | .BLANK 0000[0x6]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0280 | | .CONST 0x0280 ; Address of begin
0271 02c4 | | .CONST 0x02c4 ; Address of exception handler
0272 0004 | | .CONST 0x0004 ; Number of locals
0273 INIT_0270:
0273 e001 | | Load 0x0,0x1
0274 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0275 02c7 | | Declare_Variable Any
0276 00d8 | | Load_Top At_Offset_0
0277 1c00 | | Execute_Immediate Run_Utility,0x0
0278 e004 | | Load 0x0,0x4
0279 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
027a 02c7 | | Declare_Variable Any
027b 00d8 | | Load_Top At_Offset_0
027c 1c00 | | Execute_Immediate Run_Utility,0x0
027d e00d | | Load 0x0,0xd
027e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
027f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0280 BODY_0270:
0280 4800 |H | Short_Literal 0x0
0281 a5f5 | | Store_Unchecked 0x2,-0xb
0282 e5f6 | | Load 0x2,-0xa
0283 4800 |H | Short_Literal 0x0
0284 e5ff | | Load 0x2,-0x1
0285 e016 | | Load 0x0,0x16
0286 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0287 c402 | | Store 0x2,0x2
0288 00da | | Load_Top At_Offset_2
0289 e001 | | Load 0x0,0x1
028a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
028b 012f | / | Execute Any,Equal
028c 6801 |h | Jump_Zero 0x28e
028d 450b |E | Exit_Suprogram New_Top_Offset 0xb
028e e5f9 | | Load 0x2,-0x7
028f 7028 |p( | Jump_Nonzero 0x2b8
0290 e00d | | Load 0x0,0xd
0291 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0292 00da | | Load_Top At_Offset_2
0293 0120 | | Execute Any,Is_Value
0294 6803 |h | Jump_Zero 0x298
0295 e004 | | Load 0x0,0x4
0296 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0297 7801 |x | Jump 0x299
0298 00da | | Load_Top At_Offset_2
0299 e5f8 | | Load 0x2,-0x8
029a e5fb | | Load 0x2,-0x5
029b e5fc | | Load 0x2,-0x4
029c e5fd | | Load 0x2,-0x3
029d 00ea | | Load_Encached Null_String_Cache
029e 00ea | | Load_Encached Null_String_Cache
029f e5fa | | Load 0x2,-0x6
02a0 e5f7 | | Load 0x2,-0x9
02a1 e00f | | Load 0x0,0xf
02a2 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
02a3 e00f | | Load 0x0,0xf
02a4 18b8 | | Execute Package,Field_Execute,Field_Number 0xb8
02a5 e5f7 | | Load 0x2,-0x9
02a6 e00f | | Load 0x0,0xf
02a7 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
02a8 e004 | | Load 0x0,0x4
02a9 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
02aa c403 | | Store 0x2,0x3
02ab 0059 | Y | Store_Top Discrete,At_Offset_1
02ac 4800 |H | Short_Literal 0x0
02ad 00d9 | | Load_Top At_Offset_1
02ae e00d | | Load 0x0,0xd
02af 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
02b0 7007 |p | Jump_Nonzero 0x2b8
02b1 00d8 | | Load_Top At_Offset_0
02b2 a5f5 | | Store_Unchecked 0x2,-0xb
02b3 e5f6 | | Load 0x2,-0xa
02b4 00d9 | | Load_Top At_Offset_1
02b5 e00d | | Load 0x0,0xd
02b6 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
02b7 450b |E | Exit_Suprogram New_Top_Offset 0xb
02b8 e00d | | Load 0x0,0xd
02b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ba e5f6 | | Load 0x2,-0xa
02bb e5f8 | | Load 0x2,-0x8
02bc e403 | | Load 0x2,0x3
02bd e5fe | | Load 0x2,-0x2
02be e5f7 | | Load 0x2,-0x9
02bf e5f9 | | Load 0x2,-0x7
02c0 e402 | | Load 0x2,0x2
02c1 823e | > | Call 0x1,0x3e
02c2 c5f5 | | Store 0x2,-0xb
02c3 450b |E | Exit_Suprogram New_Top_Offset 0xb
02c4 TRAP_0270:
02c4 0007 | | Action Break_Optional
02c5 e5f6 | | Load 0x2,-0xa
02c6 0092 128a | | Action Push_String_Extended,0x128a ; "Execute_Script"
02c8 e00e | | Load 0x0,0xe
02c9 180f | | Execute Package,Field_Execute,Field_Number 0xf
02ca 0092 128a | | Action Push_String_Extended,0x128a ; "Execute_Script"
02cc e00e | | Load 0x0,0xe
02cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02ce a5f5 | | Store_Unchecked 0x2,-0xb
02cf 450b |E | Exit_Suprogram New_Top_Offset 0xb
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02e0 | | .CONST 0x02e0 ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0004 | | .CONST 0x0004 ; Number of locals
02d3 INIT_02d0:
02d3 e011 | | Load 0x0,0x11
02d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
02d6 02c7 | | Declare_Variable Any
02d7 e011 | | Load 0x0,0x11
02d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02d9 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
02da a402 | | Store_Unchecked 0x2,0x2
02db e00d | | Load 0x0,0xd
02dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02dd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02de 029f 0e2b | +| Declare_Subprogram INIT_0e28,For_Call
02e0 BODY_02d0:
02e0 4800 |H | Short_Literal 0x0
02e1 a5fb | | Store_Unchecked 0x2,-0x5
02e2 e5fe | | Load 0x2,-0x2
02e3 680b |h | Jump_Zero 0x2ef
02e4 e00d | | Load 0x0,0xd
02e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02e6 00db | | Load_Top At_Offset_3
02e7 e5fc | | Load 0x2,-0x4
02e8 e5fd | | Load 0x2,-0x3
02e9 e5ff | | Load 0x2,-0x1
02ea e015 | | Load 0x0,0x15
02eb 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
02ec c402 | | Store 0x2,0x2
02ed 005a | Z | Store_Top Discrete,At_Offset_2
02ee 7802 |x | Jump 0x2f1
02ef e5ff | | Load 0x2,-0x1
02f0 c402 | | Store 0x2,0x2
02f1 4800 |H | Short_Literal 0x0
02f2 00da | | Load_Top At_Offset_2
02f3 e00d | | Load 0x0,0xd
02f4 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
02f5 7003 |p | Jump_Nonzero 0x2f9
02f6 00d9 | | Load_Top At_Offset_1
02f7 a5fb | | Store_Unchecked 0x2,-0x5
02f8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
02f9 8404 | | Call 0x2,0x4
02fa 4505 |E | Exit_Suprogram New_Top_Offset 0x5
02fb 0000 0000 | | .BLANK 0000[0x5]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0305 | | .CONST 0x0305 ; Address of begin
0301 0311 | | .CONST 0x0311 ; Address of exception handler
0302 0002 | | .CONST 0x0002 ; Number of locals
0303 INIT_0300:
0303 029f 0e63 | c| Declare_Subprogram INIT_0e60,For_Call
0305 BODY_0300:
0305 4800 |H | Short_Literal 0x0
0306 a5fb | | Store_Unchecked 0x2,-0x5
0307 e5fd | | Load 0x2,-0x3
0308 e00f | | Load 0x0,0xf
0309 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
030a e00f | | Load 0x0,0xf
030b 1887 | | Execute Package,Field_Execute,Field_Number 0x87
030c 01db | | Execute Vector,Length
030d 0c01 | | Execute_Immediate Greater_Equal,0x1
030e 6801 |h | Jump_Zero 0x310
030f 8402 | | Call 0x2,0x2
0310 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0311 TRAP_0300:
0311 0007 | | Action Break_Optional
0312 e5fc | | Load 0x2,-0x4
0313 0092 128b | | Action Push_String_Extended,0x128b ; "Generate_Link_Commands"
0315 e00e | | Load 0x0,0xe
0316 180f | | Execute Package,Field_Execute,Field_Number 0xf
0317 0092 128b | | Action Push_String_Extended,0x128b ; "Generate_Link_Commands"
0319 e00e | | Load 0x0,0xe
031a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
031b a5fb | | Store_Unchecked 0x2,-0x5
031c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
031d 0000 0000 | | .XXX[0x3]
031f 0000 | |
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323 | # | .CONST 0x0323 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0001 | | .CONST 0x0001 ; Number of locals
0323 BODY_0320:
0323 INIT_0320:
0323 e00d | | Load 0x0,0xd
0324 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0325 e5fb | | Load 0x2,-0x5
0326 4800 |H | Short_Literal 0x0
0327 e5fc | | Load 0x2,-0x4
0328 e5fd | | Load 0x2,-0x3
0329 e5fe | | Load 0x2,-0x2
032a e5ff | | Load 0x2,-0x1
032b 8238 | 8 | Call 0x1,0x38
032c c5fa | | Store 0x2,-0x6
032d 4506 |E | Exit_Suprogram New_Top_Offset 0x6
032e 0000 0000 | | .XXX[0x2]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 e00d | | Load 0x0,0xd
0334 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0335 e5fb | | Load 0x2,-0x5
0336 4801 |H | Short_Literal 0x1
0337 e5fc | | Load 0x2,-0x4
0338 e5fd | | Load 0x2,-0x3
0339 e5fe | | Load 0x2,-0x2
033a e5ff | | Load 0x2,-0x1
033b 8238 | 8 | Call 0x1,0x38
033c c5fa | | Store 0x2,-0x6
033d 4506 |E | Exit_Suprogram New_Top_Offset 0x6
033e 0000 0000 | | .XXX[0x2]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 034b | K | .CONST 0x034b ; Address of begin
0341 0387 | | .CONST 0x0387 ; Address of exception handler
0342 0003 | | .CONST 0x0003 ; Number of locals
0343 INIT_0340:
0343 e007 | | Load 0x0,0x7
0344 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0345 02c7 | | Declare_Variable Any
0346 00d8 | | Load_Top At_Offset_0
0347 1c00 | | Execute_Immediate Run_Utility,0x0
0348 e00d | | Load 0x0,0xd
0349 1b0d | | Execute Package,Field_Read,Field_Number 0xd
034a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
034b BODY_0340:
034b 4800 |H | Short_Literal 0x0
034c a5f2 | | Store_Unchecked 0x2,-0xe
034d e5f6 | | Load 0x2,-0xa
034e 7033 |p3 | Jump_Nonzero 0x382
034f e00d | | Load 0x0,0xd
0350 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0351 e5f3 | | Load 0x2,-0xd
0352 e5f7 | | Load 0x2,-0x9
0353 e5fc | | Load 0x2,-0x4
0354 e5fb | | Load 0x2,-0x5
0355 e226 | & | Load 0x1,0x26
0356 824f | O | Call 0x1,0x4f
0357 0059 | Y | Store_Top Discrete,At_Offset_1
0358 4800 |H | Short_Literal 0x0
0359 00d9 | | Load_Top At_Offset_1
035a e00d | | Load 0x0,0xd
035b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
035c 7003 |p | Jump_Nonzero 0x360
035d 00d8 | | Load_Top At_Offset_0
035e a5f2 | | Store_Unchecked 0x2,-0xe
035f 450e |E | Exit_Suprogram New_Top_Offset 0xe
0360 00d9 | | Load_Top At_Offset_1
0361 e5f3 | | Load 0x2,-0xd
0362 e5fa | | Load 0x2,-0x6
0363 e5f9 | | Load 0x2,-0x7
0364 8251 | Q | Call 0x1,0x51
0365 c402 | | Store 0x2,0x2
0366 00d9 | | Load_Top At_Offset_1
0367 e226 | & | Load 0x1,0x26
0368 8250 | P | Call 0x1,0x50
0369 c402 | | Store 0x2,0x2
036a 00d9 | | Load_Top At_Offset_1
036b e5fd | | Load 0x2,-0x3
036c 8250 | P | Call 0x1,0x50
036d c402 | | Store 0x2,0x2
036e e00d | | Load 0x0,0xd
036f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0370 00da | | Load_Top At_Offset_2
0371 e5f3 | | Load 0x2,-0xd
0372 e5fb | | Load 0x2,-0x5
0373 8252 | R | Call 0x1,0x52
0374 c402 | | Store 0x2,0x2
0375 0059 | Y | Store_Top Discrete,At_Offset_1
0376 4800 |H | Short_Literal 0x0
0377 00d9 | | Load_Top At_Offset_1
0378 e00d | | Load 0x0,0xd
0379 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
037a 7003 |p | Jump_Nonzero 0x37e
037b 00d8 | | Load_Top At_Offset_0
037c a5f2 | | Store_Unchecked 0x2,-0xe
037d 450e |E | Exit_Suprogram New_Top_Offset 0xe
037e 00d9 | | Load_Top At_Offset_1
037f 8253 | S | Call 0x1,0x53
0380 c402 | | Store 0x2,0x2
0381 450e |E | Exit_Suprogram New_Top_Offset 0xe
0382 e5f3 | | Load 0x2,-0xd
0383 6010 |` | Indirect_Literal Discrete,0x394,{0x00000000, 0x00008208}
0384 e00d | | Load 0x0,0xd
0385 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0386 450e |E | Exit_Suprogram New_Top_Offset 0xe
0387 TRAP_0340:
0387 0007 | | Action Break_Optional
0388 e5f3 | | Load 0x2,-0xd
0389 0092 128c | | Action Push_String_Extended,0x128c ; "Build_Script_Via_Tape"
038b e00e | | Load 0x0,0xe
038c 180f | | Execute Package,Field_Execute,Field_Number 0xf
038d 0092 128c | | Action Push_String_Extended,0x128c ; "Build_Script_Via_Tape"
038f e00e | | Load 0x0,0xe
0390 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0391 a5f2 | | Store_Unchecked 0x2,-0xe
0392 450e |E | Exit_Suprogram New_Top_Offset 0xe
0393 0000 | | .XXX[0x1]
0394 0000 0000 | | .LITERAL {0x00000000, 0x00008208}
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03b6 | | .CONST 0x03b6 ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0008 | | .CONST 0x0008 ; Number of locals
039b INIT_0398:
039b e004 | | Load 0x0,0x4
039c 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
039d 02c7 | | Declare_Variable Any
039e 00d8 | | Load_Top At_Offset_0
039f 1c00 | | Execute_Immediate Run_Utility,0x0
03a0 e001 | | Load 0x0,0x1
03a1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03a2 02c7 | | Declare_Variable Any
03a3 00d8 | | Load_Top At_Offset_0
03a4 1c00 | | Execute_Immediate Run_Utility,0x0
03a5 e001 | | Load 0x0,0x1
03a6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03a7 02c7 | | Declare_Variable Any
03a8 00d8 | | Load_Top At_Offset_0
03a9 1c00 | | Execute_Immediate Run_Utility,0x0
03aa e00d | | Load 0x0,0xd
03ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ac 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
03ad e001 | | Load 0x0,0x1
03ae 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
03af 0322 | " | Declare_Variable Record
03b0 00d8 | | Load_Top At_Offset_0
03b1 1c00 | | Execute_Immediate Run_Utility,0x0
03b2 00e1 | | Load_Encached Boolean_Cache
03b3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
03b4 029f 0e93 | | Declare_Subprogram INIT_0e90,For_Call
03b6 BODY_0398:
03b6 4800 |H | Short_Literal 0x0
03b7 a5fb | | Store_Unchecked 0x2,-0x5
03b8 8408 | | Call 0x2,0x8
03b9 4505 |E | Exit_Suprogram New_Top_Offset 0x5
03ba 0000 0000 | | .BLANK 0000[0x6]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 4607 |F | Jump_Case 0x8
03c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
03c5 7806 |x | Jump 0x3cc ; case 0x1
03c6 7809 |x | Jump 0x3d0 ; case 0x2
03c7 780d |x | Jump 0x3d5 ; case 0x3
03c8 7810 |x | Jump 0x3d9 ; case 0x4
03c9 7811 |x | Jump 0x3db ; case 0x5
03ca 7812 |x | Jump 0x3dd ; case 0x6
03cb 7815 |x | Jump 0x3e1 ; case 0x7
03cc 00da | | Load_Top At_Offset_2
03cd 0091 1280 | | Action Push_String_Extended_Indexed,0x1280 ; "COMPILE"
03cf 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
03d0 00db | | Load_Top At_Offset_3
03d1 00db | | Load_Top At_Offset_3
03d2 00e0 | | Load_Encached Standard_Cache
03d3 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03d4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03d5 00da | | Load_Top At_Offset_2
03d6 00e0 | | Load_Encached Standard_Cache
03d7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03d8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
03d9 00db | | Load_Top At_Offset_3
03da 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03db 00db | | Load_Top At_Offset_3
03dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03dd e223 | # | Load 0x1,0x23
03de 00dc | | Load_Top At_Offset_4
03df 0267 | g | Execute Discrete,Predecessor
03e0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03e1 e223 | # | Load 0x1,0x23
03e2 00dc | | Load_Top At_Offset_4
03e3 0268 | h | Execute Discrete,Successor
03e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03e5 0000 0000 | | .XXX[0x3]
03e7 0000 | |
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb 4607 |F | Jump_Case 0x8
03ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
03ed 7806 |x | Jump 0x3f4 ; case 0x1
03ee 7809 |x | Jump 0x3f8 ; case 0x2
03ef 780d |x | Jump 0x3fd ; case 0x3
03f0 7810 |x | Jump 0x401 ; case 0x4
03f1 7811 |x | Jump 0x403 ; case 0x5
03f2 7812 |x | Jump 0x405 ; case 0x6
03f3 7815 |x | Jump 0x409 ; case 0x7
03f4 00da | | Load_Top At_Offset_2
03f5 0091 1282 | | Action Push_String_Extended_Indexed,0x1282 ; "PRE_OPTION"
03f7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
03f8 00db | | Load_Top At_Offset_3
03f9 00db | | Load_Top At_Offset_3
03fa 00e0 | | Load_Encached Standard_Cache
03fb 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03fc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
03fd 00da | | Load_Top At_Offset_2
03fe 00e0 | | Load_Encached Standard_Cache
03ff 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0400 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0401 00db | | Load_Top At_Offset_3
0402 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0403 00db | | Load_Top At_Offset_3
0404 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0405 e224 | $ | Load 0x1,0x24
0406 00dc | | Load_Top At_Offset_4
0407 0267 | g | Execute Discrete,Predecessor
0408 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0409 e224 | $ | Load 0x1,0x24
040a 00dc | | Load_Top At_Offset_4
040b 0268 | h | Execute Discrete,Successor
040c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
040d 0000 0000 | | .XXX[0x3]
040f 0000 | |
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413 | | .CONST 0x0413 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0001 | | .CONST 0x0001 ; Number of locals
0413 BODY_0410:
0413 INIT_0410:
0413 4608 |F | Jump_Case 0x9
0414 7808 |x | Jump 0x41d ; case 0x0
0415 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0416 7810 |x | Jump 0x427 ; case 0x2
0417 780f |x | Jump 0x427 ; case 0x3
0418 780e |x | Jump 0x427 ; case 0x4
0419 780d |x | Jump 0x427 ; case 0x5
041a 780c |x | Jump 0x427 ; case 0x6
041b 780b |x | Jump 0x427 ; case 0x7
041c 780a |x | Jump 0x427 ; case 0x8
041d 00da | | Load_Top At_Offset_2
041e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
041f 1c00 | | Execute_Immediate Run_Utility,0x0
0420 00da | | Load_Top At_Offset_2
0421 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0422 0125 | % | Execute Any,Set_Constraint
0423 00da | | Load_Top At_Offset_2
0424 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0425 1c00 | | Execute_Immediate Run_Utility,0x0
0426 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0427 0869 | i | Execute_Immediate Raise,0x69
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042d | - | .CONST 0x042d ; Address of begin
0429 0499 | | .CONST 0x0499 ; Address of exception handler
042a 0002 | | .CONST 0x0002 ; Number of locals
042b INIT_0428:
042b e001 | | Load 0x0,0x1
042c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042d BODY_0428:
042d 4800 |H | Short_Literal 0x0
042e a5fb | | Store_Unchecked 0x2,-0x5
042f e001 | | Load 0x0,0x1
0430 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0431 e5fd | | Load 0x2,-0x3
0432 0120 | | Execute Any,Is_Value
0433 6804 |h | Jump_Zero 0x438
0434 e001 | | Load 0x0,0x1
0435 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0436 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0437 7801 |x | Jump 0x439
0438 e5fd | | Load 0x2,-0x3
0439 6076 |`v | Indirect_Literal Discrete,0x4b0,{0x00000000, 0x00004000}
043a e017 | | Load 0x0,0x17
043b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
043c 4800 |H | Short_Literal 0x0
043d e5ff | | Load 0x2,-0x1
043e e001 | | Load 0x0,0x1
043f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0440 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0441 c5fd | | Store 0x2,-0x3
0442 0059 | Y | Store_Top Discrete,At_Offset_1
0443 00d8 | | Load_Top At_Offset_0
0444 6821 |h! | Jump_Zero 0x466
0445 4801 |H | Short_Literal 0x1
0446 4802 |H | Short_Literal 0x2
0447 e013 | | Load 0x0,0x13
0448 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0449 035b | [ | Declare_Type Array,Constrained
044a 0337 | 7 | Declare_Variable Array
044b e5ff | | Load 0x2,-0x1
044c e013 | | Load 0x0,0x13
044d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
044e e013 | | Load 0x0,0x13
044f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0450 0119 | | Execute Any,Check_In_Formal_Type
0451 4801 |H | Short_Literal 0x1
0452 00da | | Load_Top At_Offset_2
0453 01d6 | | Execute Vector,Field_Write
0454 00d9 | | Load_Top At_Offset_1
0455 e013 | | Load 0x0,0x13
0456 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0457 e013 | | Load 0x0,0x13
0458 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0459 0119 | | Execute Any,Check_In_Formal_Type
045a 4802 |H | Short_Literal 0x2
045b 00da | | Load_Top At_Offset_2
045c 01d6 | | Execute Vector,Field_Write
045d 604e |`N | Indirect_Literal Discrete,0x4ac,{0x00000000, 0x0000813d}
045e e00d | | Load 0x0,0xd
045f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0460 a5fb | | Store_Unchecked 0x2,-0x5
0461 e5fe | | Load 0x2,-0x2
0462 6049 |`I | Indirect_Literal Discrete,0x4ac,{0x00000000, 0x0000813d}
0463 e00d | | Load 0x0,0xd
0464 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0465 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0466 e018 | | Load 0x0,0x18
0467 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0468 e001 | | Load 0x0,0x1
0469 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
046a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
046b c5fc | | Store 0x2,-0x4
046c e001 | | Load 0x0,0x1
046d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046e e018 | | Load 0x0,0x18
046f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0470 e5fd | | Load 0x2,-0x3
0471 e001 | | Load 0x0,0x1
0472 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0473 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0474 0059 | Y | Store_Top Discrete,At_Offset_1
0475 00d8 | | Load_Top At_Offset_0
0476 6821 |h! | Jump_Zero 0x498
0477 4801 |H | Short_Literal 0x1
0478 4802 |H | Short_Literal 0x2
0479 e013 | | Load 0x0,0x13
047a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
047b 035b | [ | Declare_Type Array,Constrained
047c 0337 | 7 | Declare_Variable Array
047d e5ff | | Load 0x2,-0x1
047e e013 | | Load 0x0,0x13
047f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0480 e013 | | Load 0x0,0x13
0481 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0482 0119 | | Execute Any,Check_In_Formal_Type
0483 4801 |H | Short_Literal 0x1
0484 00da | | Load_Top At_Offset_2
0485 01d6 | | Execute Vector,Field_Write
0486 00d9 | | Load_Top At_Offset_1
0487 e013 | | Load 0x0,0x13
0488 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0489 e013 | | Load 0x0,0x13
048a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
048b 0119 | | Execute Any,Check_In_Formal_Type
048c 4802 |H | Short_Literal 0x2
048d 00da | | Load_Top At_Offset_2
048e 01d6 | | Execute Vector,Field_Write
048f 6018 |` | Indirect_Literal Discrete,0x4a8,{0x00000000, 0x00008159}
0490 e00d | | Load 0x0,0xd
0491 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0492 a5fb | | Store_Unchecked 0x2,-0x5
0493 e5fe | | Load 0x2,-0x2
0494 6013 |` | Indirect_Literal Discrete,0x4a8,{0x00000000, 0x00008159}
0495 e00d | | Load 0x0,0xd
0496 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0497 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0498 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0499 TRAP_0428:
0499 0007 | | Action Break_Optional
049a e5fe | | Load 0x2,-0x2
049b 0092 128d | | Action Push_String_Extended,0x128d ; "Set_Context"
049d e00e | | Load 0x0,0xe
049e 180f | | Execute Package,Field_Execute,Field_Number 0xf
049f 0092 128d | | Action Push_String_Extended,0x128d ; "Set_Context"
04a1 e00e | | Load 0x0,0xe
04a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04a3 a5fb | | Store_Unchecked 0x2,-0x5
04a4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04a5 0000 0000 | | .XXX[0x3]
04a7 0000 | |
04a8 0000 0000 | | .LITERAL {0x00000000, 0x00008159}
04ac 0000 0000 | | .LITERAL {0x00000000, 0x0000813d}
04b0 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
04b4 0000 0000 | | .BLANK 0000[0x4]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bd | | .CONST 0x04bd ; Address of begin
04b9 04e6 | | .CONST 0x04e6 ; Address of exception handler
04ba 0002 | | .CONST 0x0002 ; Number of locals
04bb INIT_04b8:
04bb e001 | | Load 0x0,0x1
04bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04bd BODY_04b8:
04bd 4800 |H | Short_Literal 0x0
04be a5fd | | Store_Unchecked 0x2,-0x3
04bf e001 | | Load 0x0,0x1
04c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04c1 e018 | | Load 0x0,0x18
04c2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04c3 e5ff | | Load 0x2,-0x1
04c4 e001 | | Load 0x0,0x1
04c5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04c6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
04c7 0059 | Y | Store_Top Discrete,At_Offset_1
04c8 00d8 | | Load_Top At_Offset_0
04c9 681b |h | Jump_Zero 0x4e5
04ca e012 | | Load 0x0,0x12
04cb 180e | | Execute Package,Field_Execute,Field_Number 0xe
04cc 4801 |H | Short_Literal 0x1
04cd 4801 |H | Short_Literal 0x1
04ce e013 | | Load 0x0,0x13
04cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04d0 035b | [ | Declare_Type Array,Constrained
04d1 0337 | 7 | Declare_Variable Array
04d2 00da | | Load_Top At_Offset_2
04d3 e013 | | Load 0x0,0x13
04d4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
04d5 e013 | | Load 0x0,0x13
04d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04d7 0119 | | Execute Any,Check_In_Formal_Type
04d8 4801 |H | Short_Literal 0x1
04d9 00da | | Load_Top At_Offset_2
04da 01d6 | | Execute Vector,Field_Write
04db 67cc |g | Indirect_Literal Discrete,0x4a8,{0x00000000, 0x00008159}
04dc e00d | | Load 0x0,0xd
04dd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
04de e013 | | Load 0x0,0x13
04df 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
04e0 67c7 |g | Indirect_Literal Discrete,0x4a8,{0x00000000, 0x00008159}
04e1 e00d | | Load 0x0,0xd
04e2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04e3 a5fd | | Store_Unchecked 0x2,-0x3
04e4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04e5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04e6 TRAP_04b8:
04e6 0007 | | Action Break_Optional
04e7 e5fe | | Load 0x2,-0x2
04e8 0092 128e | | Action Push_String_Extended,0x128e ; "Reset_Context"
04ea e00e | | Load 0x0,0xe
04eb 180f | | Execute Package,Field_Execute,Field_Number 0xf
04ec 0092 128e | | Action Push_String_Extended,0x128e ; "Reset_Context"
04ee e00e | | Load 0x0,0xe
04ef 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04f0 a5fd | | Store_Unchecked 0x2,-0x3
04f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04f2 0000 0000 | | .BLANK 0000[0x6]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 050a | | .CONST 0x050a ; Address of begin
04f9 054d | M | .CONST 0x054d ; Address of exception handler
04fa 0004 | | .CONST 0x0004 ; Number of locals
04fb INIT_04f8:
04fb e00d | | Load 0x0,0xd
04fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04fd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
04fe e001 | | Load 0x0,0x1
04ff 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0500 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0501 02c7 | | Declare_Variable Any
0502 00d8 | | Load_Top At_Offset_0
0503 1c00 | | Execute_Immediate Run_Utility,0x0
0504 e001 | | Load 0x0,0x1
0505 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0506 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0507 02c7 | | Declare_Variable Any
0508 00d8 | | Load_Top At_Offset_0
0509 1c00 | | Execute_Immediate Run_Utility,0x0
050a BODY_04f8:
050a 4800 |H | Short_Literal 0x0
050b a5f9 | | Store_Unchecked 0x2,-0x7
050c e00d | | Load 0x0,0xd
050d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050e 00da | | Load_Top At_Offset_2
050f 00da | | Load_Top At_Offset_2
0510 e5fb | | Load 0x2,-0x5
0511 e5fc | | Load 0x2,-0x4
0512 8227 | ' | Call 0x1,0x27
0513 c404 | | Store 0x2,0x4
0514 c403 | | Store 0x2,0x3
0515 005b | [ | Store_Top Discrete,At_Offset_3
0516 4800 |H | Short_Literal 0x0
0517 00db | | Load_Top At_Offset_3
0518 e00d | | Load 0x0,0xd
0519 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
051a 7003 |p | Jump_Nonzero 0x51e
051b 00da | | Load_Top At_Offset_2
051c a5f9 | | Store_Unchecked 0x2,-0x7
051d 4506 |E | Exit_Suprogram New_Top_Offset 0x6
051e e00d | | Load 0x0,0xd
051f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0520 e5fa | | Load 0x2,-0x6
0521 0120 | | Execute Any,Is_Value
0522 6803 |h | Jump_Zero 0x526
0523 e004 | | Load 0x0,0x4
0524 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0525 7801 |x | Jump 0x527
0526 e5fa | | Load 0x2,-0x6
0527 e5fe | | Load 0x2,-0x2
0528 e019 | | Load 0x0,0x19
0529 1813 | | Execute Package,Field_Execute,Field_Number 0x13
052a e019 | | Load 0x0,0x19
052b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
052c e5fd | | Load 0x2,-0x3
052d e5ff | | Load 0x2,-0x1
052e e00f | | Load 0x0,0xf
052f 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0530 e004 | | Load 0x0,0x4
0531 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0532 c5fa | | Store 0x2,-0x6
0533 005b | [ | Store_Top Discrete,At_Offset_3
0534 4800 |H | Short_Literal 0x0
0535 00db | | Load_Top At_Offset_3
0536 e00d | | Load 0x0,0xd
0537 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0538 700c |p | Jump_Nonzero 0x545
0539 e5fb | | Load 0x2,-0x5
053a 00db | | Load_Top At_Offset_3
053b e00d | | Load 0x0,0xd
053c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
053d 00da | | Load_Top At_Offset_2
053e a5f9 | | Store_Unchecked 0x2,-0x7
053f 00da | | Load_Top At_Offset_2
0540 e5fb | | Load 0x2,-0x5
0541 00db | | Load_Top At_Offset_3
0542 8228 | ( | Call 0x1,0x28
0543 005b | [ | Store_Top Discrete,At_Offset_3
0544 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0545 00da | | Load_Top At_Offset_2
0546 e5fb | | Load 0x2,-0x5
0547 00db | | Load_Top At_Offset_3
0548 8228 | ( | Call 0x1,0x28
0549 005b | [ | Store_Top Discrete,At_Offset_3
054a 00da | | Load_Top At_Offset_2
054b a5f9 | | Store_Unchecked 0x2,-0x7
054c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
054d TRAP_04f8:
054d 0007 | | Action Break_Optional
054e e5fb | | Load 0x2,-0x5
054f 0092 128f | | Action Push_String_Extended,0x128f ; "Acquire"
0551 e00e | | Load 0x0,0xe
0552 180f | | Execute Package,Field_Execute,Field_Number 0xf
0553 0092 128f | | Action Push_String_Extended,0x128f ; "Acquire"
0555 e00e | | Load 0x0,0xe
0556 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0557 a5f9 | | Store_Unchecked 0x2,-0x7
0558 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0559 0000 0000 | | .BLANK 0000[0x7]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 057d | } | .CONST 0x057d ; Address of begin
0561 0627 | ' | .CONST 0x0627 ; Address of exception handler
0562 0005 | | .CONST 0x0005 ; Number of locals
0563 INIT_0560:
0563 e00d | | Load 0x0,0xd
0564 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0565 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0566 e001 | | Load 0x0,0x1
0567 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0568 02c7 | | Declare_Variable Any
0569 e5f9 | | Load 0x2,-0x7
056a 4800 |H | Short_Literal 0x0
056b e5fe | | Load 0x2,-0x2
056c e016 | | Load 0x0,0x16
056d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
056e a403 | | Store_Unchecked 0x2,0x3
056f e001 | | Load 0x0,0x1
0570 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0571 0322 | " | Declare_Variable Record
0572 e5f9 | | Load 0x2,-0x7
0573 e5fe | | Load 0x2,-0x2
0574 e016 | | Load 0x0,0x16
0575 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0576 00d9 | | Load_Top At_Offset_1
0577 017d | } | Execute Record,Structure_Write
0578 e01a | | Load 0x0,0x1a
0579 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057a 02c7 | | Declare_Variable Any
057b 00d8 | | Load_Top At_Offset_0
057c 1c00 | | Execute_Immediate Run_Utility,0x0
057d BODY_0560:
057d 4800 |H | Short_Literal 0x0
057e a5f8 | | Store_Unchecked 0x2,-0x8
057f e5fc | | Load 0x2,-0x4
0580 7092 |p | Jump_Nonzero 0x613
0581 e5fe | | Load 0x2,-0x2
0582 e016 | | Load 0x0,0x16
0583 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0584 6810 |h | Jump_Zero 0x595
0585 e5f9 | | Load 0x2,-0x7
0586 00db | | Load_Top At_Offset_3
0587 e016 | | Load 0x0,0x16
0588 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0589 680b |h | Jump_Zero 0x595
058a 00d9 | | Load_Top At_Offset_1
058b e5fe | | Load 0x2,-0x2
058c e00c | | Load 0x0,0xc
058d 188e | | Execute Package,Field_Execute,Field_Number 0x8e
058e e5fe | | Load 0x2,-0x2
058f e00c | | Load 0x0,0xc
0590 188d | | Execute Package,Field_Execute,Field_Number 0x8d
0591 e01a | | Load 0x0,0x1a
0592 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0593 6801 |h | Jump_Zero 0x595
0594 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0595 e5f9 | | Load 0x2,-0x7
0596 4801 |H | Short_Literal 0x1
0597 4802 |H | Short_Literal 0x2
0598 e013 | | Load 0x0,0x13
0599 1b0f | | Execute Package,Field_Read,Field_Number 0xf
059a 035b | [ | Declare_Type Array,Constrained
059b 0337 | 7 | Declare_Variable Array
059c e5ff | | Load 0x2,-0x1
059d e013 | | Load 0x0,0x13
059e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
059f e013 | | Load 0x0,0x13
05a0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05a1 0119 | | Execute Any,Check_In_Formal_Type
05a2 4801 |H | Short_Literal 0x1
05a3 00da | | Load_Top At_Offset_2
05a4 01d6 | | Execute Vector,Field_Write
05a5 e5fd | | Load 0x2,-0x3
05a6 e013 | | Load 0x0,0x13
05a7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05a8 e013 | | Load 0x0,0x13
05a9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05aa 0119 | | Execute Any,Check_In_Formal_Type
05ab 4802 |H | Short_Literal 0x2
05ac 00da | | Load_Top At_Offset_2
05ad 01d6 | | Execute Vector,Field_Write
05ae 6091 |` | Indirect_Literal Discrete,0x640,{0x00000000, 0x000081fe}
05af e00d | | Load 0x0,0xd
05b0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
05b1 e00d | | Load 0x0,0xd
05b2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05b3 e5fa | | Load 0x2,-0x6
05b4 4800 |H | Short_Literal 0x0
05b5 e5fb | | Load 0x2,-0x5
05b6 e5fd | | Load 0x2,-0x3
05b7 e5ff | | Load 0x2,-0x1
05b8 e004 | | Load 0x0,0x4
05b9 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
05ba c402 | | Store 0x2,0x2
05bb 4800 |H | Short_Literal 0x0
05bc e402 | | Load 0x2,0x2
05bd e00d | | Load 0x0,0xd
05be 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
05bf 7017 |p | Jump_Nonzero 0x5d7
05c0 e012 | | Load 0x0,0x12
05c1 180e | | Execute Package,Field_Execute,Field_Number 0xe
05c2 4801 |H | Short_Literal 0x1
05c3 4801 |H | Short_Literal 0x1
05c4 e013 | | Load 0x0,0x13
05c5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05c6 035b | [ | Declare_Type Array,Constrained
05c7 0337 | 7 | Declare_Variable Array
05c8 e5ff | | Load 0x2,-0x1
05c9 e013 | | Load 0x0,0x13
05ca 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05cb e013 | | Load 0x0,0x13
05cc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05cd 0119 | | Execute Any,Check_In_Formal_Type
05ce 4801 |H | Short_Literal 0x1
05cf 00da | | Load_Top At_Offset_2
05d0 01d6 | | Execute Vector,Field_Write
05d1 606a |`j | Indirect_Literal Discrete,0x63c,{0x00000000, 0x000081e1}
05d2 e00d | | Load 0x0,0xd
05d3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
05d4 00db | | Load_Top At_Offset_3
05d5 a5f8 | | Store_Unchecked 0x2,-0x8
05d6 7816 |x | Jump 0x5ed
05d7 e012 | | Load 0x0,0x12
05d8 180e | | Execute Package,Field_Execute,Field_Number 0xe
05d9 4801 |H | Short_Literal 0x1
05da 4801 |H | Short_Literal 0x1
05db e013 | | Load 0x0,0x13
05dc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05dd 035b | [ | Declare_Type Array,Constrained
05de 0337 | 7 | Declare_Variable Array
05df e5ff | | Load 0x2,-0x1
05e0 e013 | | Load 0x0,0x13
05e1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05e2 e013 | | Load 0x0,0x13
05e3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05e4 0119 | | Execute Any,Check_In_Formal_Type
05e5 4801 |H | Short_Literal 0x1
05e6 00da | | Load_Top At_Offset_2
05e7 01d6 | | Execute Vector,Field_Write
05e8 604f |`O | Indirect_Literal Discrete,0x638,{0x00000000, 0x000081e2}
05e9 e00d | | Load 0x0,0xd
05ea 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
05eb 00db | | Load_Top At_Offset_3
05ec a5f8 | | Store_Unchecked 0x2,-0x8
05ed e00d | | Load 0x0,0xd
05ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ef 00d9 | | Load_Top At_Offset_1
05f0 0120 | | Execute Any,Is_Value
05f1 6803 |h | Jump_Zero 0x5f5
05f2 e01a | | Load 0x0,0x1a
05f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05f4 7801 |x | Jump 0x5f6
05f5 00d9 | | Load_Top At_Offset_1
05f6 e5f9 | | Load 0x2,-0x7
05f7 e404 | | Load 0x2,0x4
05f8 e5fe | | Load 0x2,-0x2
05f9 e403 | | Load 0x2,0x3
05fa e00c | | Load 0x0,0xc
05fb 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
05fc c405 | | Store 0x2,0x5
05fd c402 | | Store 0x2,0x2
05fe 4800 |H | Short_Literal 0x0
05ff e402 | | Load 0x2,0x2
0600 e00d | | Load 0x0,0xd
0601 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0602 7003 |p | Jump_Nonzero 0x606
0603 00db | | Load_Top At_Offset_3
0604 a5f8 | | Store_Unchecked 0x2,-0x8
0605 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0606 e00d | | Load 0x0,0xd
0607 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0608 e5f9 | | Load 0x2,-0x7
0609 00db | | Load_Top At_Offset_3
060a 00db | | Load_Top At_Offset_3
060b e5fe | | Load 0x2,-0x2
060c e403 | | Load 0x2,0x3
060d e00c | | Load 0x0,0xc
060e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
060f c402 | | Store 0x2,0x2
0610 00db | | Load_Top At_Offset_3
0611 a5f8 | | Store_Unchecked 0x2,-0x8
0612 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0613 e5f9 | | Load 0x2,-0x7
0614 4801 |H | Short_Literal 0x1
0615 4801 |H | Short_Literal 0x1
0616 e013 | | Load 0x0,0x13
0617 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0618 035b | [ | Declare_Type Array,Constrained
0619 0337 | 7 | Declare_Variable Array
061a e5ff | | Load 0x2,-0x1
061b e013 | | Load 0x0,0x13
061c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
061d e013 | | Load 0x0,0x13
061e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
061f 0119 | | Execute Any,Check_In_Formal_Type
0620 4801 |H | Short_Literal 0x1
0621 00da | | Load_Top At_Offset_2
0622 01d6 | | Execute Vector,Field_Write
0623 6010 |` | Indirect_Literal Discrete,0x634,{0x00000000, 0x000081f7}
0624 e00d | | Load 0x0,0xd
0625 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0626 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0627 TRAP_0560:
0627 0007 | | Action Break_Optional
0628 e5f9 | | Load 0x2,-0x7
0629 0092 1290 | | Action Push_String_Extended,0x1290 ; "Download_A_File"
062b e00e | | Load 0x0,0xe
062c 180f | | Execute Package,Field_Execute,Field_Number 0xf
062d 0092 1290 | | Action Push_String_Extended,0x1290 ; "Download_A_File"
062f e00e | | Load 0x0,0xe
0630 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0631 a5f8 | | Store_Unchecked 0x2,-0x8
0632 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0633 0000 | | .XXX[0x1]
0634 0000 0000 | | .LITERAL {0x00000000, 0x000081f7}
0638 0000 0000 | | .LITERAL {0x00000000, 0x000081e2}
063c 0000 0000 | | .LITERAL {0x00000000, 0x000081e1}
0640 0000 0000 | | .LITERAL {0x00000000, 0x000081fe}
0644 0000 0000 | | .BLANK 0000[0x4]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064e | N | .CONST 0x064e ; Address of begin
0649 0696 | | .CONST 0x0696 ; Address of exception handler
064a 0002 | | .CONST 0x0002 ; Number of locals
064b INIT_0648:
064b e00d | | Load 0x0,0xd
064c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
064d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
064e BODY_0648:
064e 4800 |H | Short_Literal 0x0
064f a5fb | | Store_Unchecked 0x2,-0x5
0650 00cf | | Action Mark_Auxiliary
0651 e5fe | | Load 0x2,-0x2
0652 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0653 01dc | | Execute Vector,Last
0654 4801 |H | Short_Literal 0x1
0655 0263 | c | Execute Discrete,Above_Bound
0656 7019 |p | Jump_Nonzero 0x670
0657 e00d | | Load 0x0,0xd
0658 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0659 e5fd | | Load 0x2,-0x3
065a 00da | | Load_Top At_Offset_2
065b e5fe | | Load 0x2,-0x2
065c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
065d 01d5 | | Execute Vector,Field_Reference
065e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
065f e001 | | Load 0x0,0x1
0660 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0661 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0662 e5fc | | Load 0x2,-0x4
0663 e010 | | Load 0x0,0x10
0664 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0665 c402 | | Store 0x2,0x2
0666 4800 |H | Short_Literal 0x0
0667 e402 | | Load 0x2,0x2
0668 e00d | | Load 0x0,0xd
0669 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
066a 7003 |p | Jump_Nonzero 0x66e
066b 00db | | Load_Top At_Offset_3
066c a5fb | | Store_Unchecked 0x2,-0x5
066d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
066e 00c8 | | Action Pop_Auxiliary_Range
066f 3fe7 |? | Loop_Increasing 0x657
0670 00ce | | Action Pop_Auxiliary
0671 e5fc | | Load 0x2,-0x4
0672 e5fd | | Load 0x2,-0x3
0673 e010 | | Load 0x0,0x10
0674 180e | | Execute Package,Field_Execute,Field_Number 0xe
0675 c5fc | | Store 0x2,-0x4
0676 e5fd | | Load 0x2,-0x3
0677 4801 |H | Short_Literal 0x1
0678 4802 |H | Short_Literal 0x2
0679 e013 | | Load 0x0,0x13
067a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
067b 035b | [ | Declare_Type Array,Constrained
067c 0337 | 7 | Declare_Variable Array
067d e5ff | | Load 0x2,-0x1
067e e013 | | Load 0x0,0x13
067f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0680 e013 | | Load 0x0,0x13
0681 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0682 0119 | | Execute Any,Check_In_Formal_Type
0683 4801 |H | Short_Literal 0x1
0684 00da | | Load_Top At_Offset_2
0685 01d6 | | Execute Vector,Field_Write
0686 e5fe | | Load 0x2,-0x2
0687 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0688 00e0 | | Load_Encached Standard_Cache
0689 1818 | | Execute Package,Field_Execute,Field_Number 0x18
068a e013 | | Load 0x0,0x13
068b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
068c e013 | | Load 0x0,0x13
068d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
068e 0119 | | Execute Any,Check_In_Formal_Type
068f 4802 |H | Short_Literal 0x2
0690 00da | | Load_Top At_Offset_2
0691 01d6 | | Execute Vector,Field_Write
0692 600d |` | Indirect_Literal Discrete,0x6a0,{0x00000000, 0x00008200}
0693 e00d | | Load 0x0,0xd
0694 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0695 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0696 TRAP_0648:
0696 0007 | | Action Break_Optional
0697 e5fc | | Load 0x2,-0x4
0698 e5fd | | Load 0x2,-0x3
0699 e010 | | Load 0x0,0x10
069a 180e | | Execute Package,Field_Execute,Field_Number 0xe
069b c5fc | | Store 0x2,-0x4
069c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
069d 0000 0000 | | .XXX[0x3]
069f 0000 | |
06a0 0000 0000 | | .LITERAL {0x00000000, 0x00008200}
06a4 0000 0000 | | .BLANK 0000[0x4]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06b0 | | .CONST 0x06b0 ; Address of begin
06a9 06bb | | .CONST 0x06bb ; Address of exception handler
06aa 0003 | | .CONST 0x0003 ; Number of locals
06ab INIT_06a8:
06ab 00e1 | | Load_Encached Boolean_Cache
06ac 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06ad e00d | | Load 0x0,0xd
06ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06af 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06b0 BODY_06a8:
06b0 e00d | | Load 0x0,0xd
06b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06b2 00e1 | | Load_Encached Boolean_Cache
06b3 e5fe | | Load 0x2,-0x2
06b4 e5ff | | Load 0x2,-0x1
06b5 e00c | | Load 0x0,0xc
06b6 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
06b7 005b | [ | Store_Top Discrete,At_Offset_3
06b8 0059 | Y | Store_Top Discrete,At_Offset_1
06b9 00d9 | | Load_Top At_Offset_1
06ba 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06bb TRAP_06a8:
06bb 0007 | | Action Break_Optional
06bc e5fe | | Load 0x2,-0x2
06bd 0092 1291 | | Action Push_String_Extended,0x1291 ; "Has_Secondaries"
06bf e00e | | Load 0x0,0xe
06c0 180f | | Execute Package,Field_Execute,Field_Number 0xf
06c1 4800 |H | Short_Literal 0x0
06c2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06c3 0000 0000 | | .BLANK 0000[0x5]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06e8 | | .CONST 0x06e8 ; Address of begin
06c9 06fa | | .CONST 0x06fa ; Address of exception handler
06ca 0005 | | .CONST 0x0005 ; Number of locals
06cb INIT_06c8:
06cb e5fd | | Load 0x2,-0x3
06cc e5fe | | Load 0x2,-0x2
06cd e5ff | | Load 0x2,-0x1
06ce e00f | | Load 0x0,0xf
06cf 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
06d0 e00f | | Load 0x0,0xf
06d1 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8
06d2 e5fd | | Load 0x2,-0x3
06d3 e5fe | | Load 0x2,-0x2
06d4 e5ff | | Load 0x2,-0x1
06d5 e00f | | Load 0x0,0xf
06d6 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
06d7 e00f | | Load 0x0,0xf
06d8 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
06d9 e001 | | Load 0x0,0x1
06da 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06db 02c7 | | Declare_Variable Any
06dc e5fd | | Load 0x2,-0x3
06dd 4800 |H | Short_Literal 0x0
06de e5fe | | Load 0x2,-0x2
06df e016 | | Load 0x0,0x16
06e0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06e1 a404 | | Store_Unchecked 0x2,0x4
06e2 e5fd | | Load 0x2,-0x3
06e3 e5ff | | Load 0x2,-0x1
06e4 e5fe | | Load 0x2,-0x2
06e5 00db | | Load_Top At_Offset_3
06e6 e00c | | Load 0x0,0xc
06e7 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
06e8 BODY_06c8:
06e8 4800 |H | Short_Literal 0x0
06e9 00d9 | | Load_Top At_Offset_1
06ea 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06eb e00d | | Load 0x0,0xd
06ec 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
06ed 680a |h | Jump_Zero 0x6f8
06ee 00da | | Load_Top At_Offset_2
06ef e402 | | Load 0x2,0x2
06f0 00da | | Load_Top At_Offset_2
06f1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06f2 e5ff | | Load 0x2,-0x1
06f3 e00f | | Load 0x0,0xf
06f4 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
06f5 e00f | | Load 0x0,0xf
06f6 18d6 | | Execute Package,Field_Execute,Field_Number 0xd6
06f7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
06f8 00ea | | Load_Encached Null_String_Cache
06f9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
06fa TRAP_06c8:
06fa 0007 | | Action Break_Optional
06fb e5fd | | Load 0x2,-0x3
06fc 0092 1292 | | Action Push_String_Extended,0x1292 ; "Build_Compile_Command"
06fe e00e | | Load 0x0,0xe
06ff 180f | | Execute Package,Field_Execute,Field_Number 0xf
0700 00ea | | Load_Encached Null_String_Cache
0701 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0702 0000 0000 | | .BLANK 0000[0x6]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070f | | .CONST 0x070f ; Address of begin
0709 0004 | | .CONST 0x0004 ; Address of exception handler
070a 0003 | | .CONST 0x0003 ; Number of locals
070b INIT_0708:
070b 029f 0f03 | | Declare_Subprogram INIT_0f00,For_Call
070d 029f 0f13 | | Declare_Subprogram INIT_0f10,For_Call
070f BODY_0708:
070f e5ff | | Load 0x2,-0x1
0710 7002 |p | Jump_Nonzero 0x713
0711 8402 | | Call 0x2,0x2
0712 7801 |x | Jump 0x714
0713 8403 | | Call 0x2,0x3
0714 0831 | 1 | Execute_Immediate Raise,0x31
0715 0000 0000 | | .XXX[0x3]
0717 0000 | |
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071b | | .CONST 0x071b ; Address of begin
0719 0004 | | .CONST 0x0004 ; Address of exception handler
071a 0001 | | .CONST 0x0001 ; Number of locals
071b BODY_0718:
071b INIT_0718:
071b 00db | | Load_Top At_Offset_3
071c e00f | | Load 0x0,0xf
071d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
071e e00f | | Load 0x0,0xf
071f 18d2 | | Execute Package,Field_Execute,Field_Number 0xd2
0720 6806 |h | Jump_Zero 0x727
0721 00da | | Load_Top At_Offset_2
0722 7002 |p | Jump_Nonzero 0x725
0723 4801 |H | Short_Literal 0x1
0724 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0725 4800 |H | Short_Literal 0x0
0726 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0727 00da | | Load_Top At_Offset_2
0728 7002 |p | Jump_Nonzero 0x72b
0729 4800 |H | Short_Literal 0x0
072a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
072b 4801 |H | Short_Literal 0x1
072c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
072d 0000 0000 | | .XXX[0x3]
072f 0000 | |
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 073a | : | .CONST 0x073a ; Address of begin
0731 0004 | | .CONST 0x0004 ; Address of exception handler
0732 0003 | | .CONST 0x0003 ; Number of locals
0733 INIT_0730:
0733 e5f9 | | Load 0x2,-0x7
0734 e5fe | | Load 0x2,-0x2
0735 e5ff | | Load 0x2,-0x1
0736 e5fd | | Load 0x2,-0x3
0737 8233 | 3 | Call 0x1,0x33
0738 029f 0f23 | #| Declare_Subprogram INIT_0f20,For_Call
073a BODY_0730:
073a e5ff | | Load 0x2,-0x1
073b e5fd | | Load 0x2,-0x3
073c 8234 | 4 | Call 0x1,0x34
073d 6802 |h | Jump_Zero 0x740
073e 8403 | | Call 0x2,0x3
073f 7802 |x | Jump 0x742
0740 00d9 | | Load_Top At_Offset_1
0741 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
0742 0831 | 1 | Execute_Immediate Raise,0x31
0743 0000 0000 | | .BLANK 0000[0x5]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 0771 | q | .CONST 0x0771 ; Address of begin
0749 077b | { | .CONST 0x077b ; Address of exception handler
074a 0007 | | .CONST 0x0007 ; Number of locals
074b INIT_0748:
074b e01b | | Load 0x0,0x1b
074c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
074d 02c7 | | Declare_Variable Any
074e 00db | | Load_Top At_Offset_3
074f e01c | | Load 0x0,0x1c
0750 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0751 a402 | | Store_Unchecked 0x2,0x2
0752 00d8 | | Load_Top At_Offset_0
0753 e01b | | Load 0x0,0x1b
0754 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
0755 00d9 | | Load_Top At_Offset_1
0756 e01b | | Load 0x0,0x1b
0757 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0758 e5fe | | Load 0x2,-0x2
0759 e001 | | Load 0x0,0x1
075a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
075b 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
075c e5ff | | Load 0x2,-0x1
075d e00f | | Load 0x0,0xf
075e 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
075f e00f | | Load 0x0,0xf
0760 18c2 | | Execute Package,Field_Execute,Field_Number 0xc2
0761 e5fd | | Load 0x2,-0x3
0762 00d9 | | Load_Top At_Offset_1
0763 00db | | Load_Top At_Offset_3
0764 e403 | | Load 0x2,0x3
0765 4800 |H | Short_Literal 0x0
0766 e5fe | | Load 0x2,-0x2
0767 e5ff | | Load 0x2,-0x1
0768 8235 | 5 | Call 0x1,0x35
0769 e5fd | | Load 0x2,-0x3
076a 00da | | Load_Top At_Offset_2
076b e404 | | Load 0x2,0x4
076c e403 | | Load 0x2,0x3
076d 4801 |H | Short_Literal 0x1
076e e5fe | | Load 0x2,-0x2
076f e5ff | | Load 0x2,-0x1
0770 8235 | 5 | Call 0x1,0x35
0771 BODY_0748:
0771 00ea | | Load_Encached Null_String_Cache
0772 00d9 | | Load_Top At_Offset_1
0773 00db | | Load_Top At_Offset_3
0774 e405 | | Load 0x2,0x5
0775 e5ff | | Load 0x2,-0x1
0776 e00f | | Load 0x0,0xf
0777 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0778 e00f | | Load 0x0,0xf
0779 18d7 | | Execute Package,Field_Execute,Field_Number 0xd7
077a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
077b TRAP_0748:
077b 0007 | | Action Break_Optional
077c e5fd | | Load 0x2,-0x3
077d 0092 1293 | | Action Push_String_Extended,0x1293 ; "Build_Link_Command"
077f e00e | | Load 0x0,0xe
0780 180f | | Execute Package,Field_Execute,Field_Number 0xf
0781 00ea | | Load_Encached Null_String_Cache
0782 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0783 0000 0000 | | .BLANK 0000[0x5]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078d | | .CONST 0x078d ; Address of begin
0789 0799 | | .CONST 0x0799 ; Address of exception handler
078a 0002 | | .CONST 0x0002 ; Number of locals
078b INIT_0788:
078b 029f 0f5b | [| Declare_Subprogram INIT_0f58,For_Call
078d BODY_0788:
078d 4800 |H | Short_Literal 0x0
078e a5fb | | Store_Unchecked 0x2,-0x5
078f e5fd | | Load 0x2,-0x3
0790 e00f | | Load 0x0,0xf
0791 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0792 e00f | | Load 0x0,0xf
0793 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
0794 01db | | Execute Vector,Length
0795 0c01 | | Execute_Immediate Greater_Equal,0x1
0796 6801 |h | Jump_Zero 0x798
0797 8402 | | Call 0x2,0x2
0798 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0799 TRAP_0788:
0799 0007 | | Action Break_Optional
079a e5fc | | Load 0x2,-0x4
079b 0092 1294 | | Action Push_String_Extended,0x1294 ; "Generate_Ada_Compile"
079d e00e | | Load 0x0,0xe
079e 180f | | Execute Package,Field_Execute,Field_Number 0xf
079f 0092 1294 | | Action Push_String_Extended,0x1294 ; "Generate_Ada_Compile"
07a1 e00e | | Load 0x0,0xe
07a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07a3 a5fb | | Store_Unchecked 0x2,-0x5
07a4 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07a5 0000 0000 | | .XXX[0x3]
07a7 0000 | |
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ba | | .CONST 0x07ba ; Address of begin
07a9 07dc | | .CONST 0x07dc ; Address of exception handler
07aa 0005 | | .CONST 0x0005 ; Number of locals
07ab INIT_07a8:
07ab e001 | | Load 0x0,0x1
07ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07ad 02c7 | | Declare_Variable Any
07ae 00d8 | | Load_Top At_Offset_0
07af 1c00 | | Execute_Immediate Run_Utility,0x0
07b0 e001 | | Load 0x0,0x1
07b1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07b2 02c7 | | Declare_Variable Any
07b3 00d8 | | Load_Top At_Offset_0
07b4 1c00 | | Execute_Immediate Run_Utility,0x0
07b5 e00d | | Load 0x0,0xd
07b6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07b7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
07b8 029f 0f8b | | Declare_Subprogram INIT_0f88,For_Call
07ba BODY_07a8:
07ba 4800 |H | Short_Literal 0x0
07bb a5f9 | | Store_Unchecked 0x2,-0x7
07bc 00cf | | Action Mark_Auxiliary
07bd e5fe | | Load 0x2,-0x2
07be 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07bf 01dc | | Execute Vector,Last
07c0 4801 |H | Short_Literal 0x1
07c1 0263 | c | Execute Discrete,Above_Bound
07c2 7018 |p | Jump_Nonzero 0x7db
07c3 00d8 | | Load_Top At_Offset_0
07c4 e5fe | | Load 0x2,-0x2
07c5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07c6 01d5 | | Execute Vector,Field_Reference
07c7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07c8 c402 | | Store 0x2,0x2
07c9 e5fa | | Load 0x2,-0x6
07ca 4800 |H | Short_Literal 0x0
07cb e402 | | Load 0x2,0x2
07cc e016 | | Load 0x0,0x16
07cd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
07ce c403 | | Store 0x2,0x3
07cf e5fb | | Load 0x2,-0x5
07d0 0f01 | | Execute_Immediate Equal,0x1
07d1 6806 |h | Jump_Zero 0x7d8
07d2 e5fa | | Load 0x2,-0x6
07d3 e402 | | Load 0x2,0x2
07d4 e015 | | Load 0x0,0x15
07d5 181d | | Execute Package,Field_Execute,Field_Number 0x1d
07d6 7001 |p | Jump_Nonzero 0x7d8
07d7 7801 |x | Jump 0x7d9
07d8 8405 | | Call 0x2,0x5
07d9 00c8 | | Action Pop_Auxiliary_Range
07da 3fe8 |? | Loop_Increasing 0x7c3
07db 4507 |E | Exit_Suprogram New_Top_Offset 0x7
07dc TRAP_07a8:
07dc 0007 | | Action Break_Optional
07dd e5fa | | Load 0x2,-0x6
07de 0092 1295 | | Action Push_String_Extended,0x1295 ; "Write_Batch_Commands"
07e0 e00e | | Load 0x0,0xe
07e1 180f | | Execute Package,Field_Execute,Field_Number 0xf
07e2 0092 1295 | | Action Push_String_Extended,0x1295 ; "Write_Batch_Commands"
07e4 e00e | | Load 0x0,0xe
07e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07e6 a5f9 | | Store_Unchecked 0x2,-0x7
07e7 4507 |E | Exit_Suprogram New_Top_Offset 0x7
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07eb | | .CONST 0x07eb ; Address of begin
07e9 0004 | | .CONST 0x0004 ; Address of exception handler
07ea 0001 | | .CONST 0x0001 ; Number of locals
07eb BODY_07e8:
07eb INIT_07e8:
07eb 00da | | Load_Top At_Offset_2
07ec e01c | | Load 0x0,0x1c
07ed 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07ee e01b | | Load 0x0,0x1b
07ef 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
07f0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
07f1 0000 0000 | | .BLANK 0000[0x7]
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 07fb | | .CONST 0x07fb ; Address of begin
07f9 0004 | | .CONST 0x0004 ; Address of exception handler
07fa 0001 | | .CONST 0x0001 ; Number of locals
07fb BODY_07f8:
07fb INIT_07f8:
07fb 00cf | | Action Mark_Auxiliary
07fc 00db | | Load_Top At_Offset_3
07fd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07fe 01dc | | Execute Vector,Last
07ff 4801 |H | Short_Literal 0x1
0800 0263 | c | Execute Discrete,Above_Bound
0801 701a |p | Jump_Nonzero 0x81c
0802 e012 | | Load 0x0,0x12
0803 180e | | Execute Package,Field_Execute,Field_Number 0xe
0804 4801 |H | Short_Literal 0x1
0805 4801 |H | Short_Literal 0x1
0806 e013 | | Load 0x0,0x13
0807 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0808 035b | [ | Declare_Type Array,Constrained
0809 0337 | 7 | Declare_Variable Array
080a 00da | | Load_Top At_Offset_2
080b e5ff | | Load 0x2,-0x1
080c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
080d 01d5 | | Execute Vector,Field_Reference
080e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
080f e016 | | Load 0x0,0x16
0810 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0811 e013 | | Load 0x0,0x13
0812 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0813 0119 | | Execute Any,Check_In_Formal_Type
0814 4801 |H | Short_Literal 0x1
0815 00da | | Load_Top At_Offset_2
0816 01d6 | | Execute Vector,Field_Write
0817 6008 |` | Indirect_Literal Discrete,0x820,{0x00000000, 0x00008205}
0818 e00d | | Load 0x0,0xd
0819 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
081a 00c8 | | Action Pop_Auxiliary_Range
081b 3fe6 |? | Loop_Increasing 0x802
081c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
081d 0000 0000 | | .XXX[0x3]
081f 0000 | |
0820 0000 0000 | | .LITERAL {0x00000000, 0x00008205}
0824 0000 0000 | | .BLANK 0000[0x4]
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 082e | . | .CONST 0x082e ; Address of begin
0829 08ab | | .CONST 0x08ab ; Address of exception handler
082a 0002 | | .CONST 0x0002 ; Number of locals
082b INIT_0828:
082b e00d | | Load 0x0,0xd
082c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
082d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
082e BODY_0828:
082e 4800 |H | Short_Literal 0x0
082f a5f4 | | Store_Unchecked 0x2,-0xc
0830 e5fa | | Load 0x2,-0x6
0831 6802 |h | Jump_Zero 0x834
0832 e5fd | | Load 0x2,-0x3
0833 823a | : | Call 0x1,0x3a
0834 e5fa | | Load 0x2,-0x6
0835 7026 |p& | Jump_Nonzero 0x85c
0836 e5f6 | | Load 0x2,-0xa
0837 e5f7 | | Load 0x2,-0x9
0838 e5f8 | | Load 0x2,-0x8
0839 e5fb | | Load 0x2,-0x5
083a e5fc | | Load 0x2,-0x4
083b 4800 |H | Short_Literal 0x0
083c e5ff | | Load 0x2,-0x1
083d 00d8 | | Load_Top At_Offset_0
083e e01d | | Load 0x0,0x1d
083f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0840 701b |p | Jump_Nonzero 0x85c
0841 e012 | | Load 0x0,0x12
0842 180e | | Execute Package,Field_Execute,Field_Number 0xe
0843 4801 |H | Short_Literal 0x1
0844 4801 |H | Short_Literal 0x1
0845 e013 | | Load 0x0,0x13
0846 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0847 035b | [ | Declare_Type Array,Constrained
0848 0337 | 7 | Declare_Variable Array
0849 e5fe | | Load 0x2,-0x2
084a e013 | | Load 0x0,0x13
084b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
084c e013 | | Load 0x0,0x13
084d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
084e 0119 | | Execute Any,Check_In_Formal_Type
084f 4801 |H | Short_Literal 0x1
0850 00da | | Load_Top At_Offset_2
0851 01d6 | | Execute Vector,Field_Write
0852 6069 |`i | Indirect_Literal Discrete,0x8bc,{0x00000000, 0x000081db}
0853 e00d | | Load 0x0,0xd
0854 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0855 e013 | | Load 0x0,0x13
0856 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0857 6064 |`d | Indirect_Literal Discrete,0x8bc,{0x00000000, 0x000081db}
0858 e00d | | Load 0x0,0xd
0859 1813 | | Execute Package,Field_Execute,Field_Number 0x13
085a a5f4 | | Store_Unchecked 0x2,-0xc
085b 450c |E | Exit_Suprogram New_Top_Offset 0xc
085c e5f6 | | Load 0x2,-0xa
085d 8239 | 9 | Call 0x1,0x39
085e 681c |h | Jump_Zero 0x87b
085f e00d | | Load 0x0,0xd
0860 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0861 e5f5 | | Load 0x2,-0xb
0862 e5f6 | | Load 0x2,-0xa
0863 e5fa | | Load 0x2,-0x6
0864 e5fd | | Load 0x2,-0x3
0865 e5ff | | Load 0x2,-0x1
0866 821a | | Call 0x1,0x1a
0867 0059 | Y | Store_Top Discrete,At_Offset_1
0868 4800 |H | Short_Literal 0x0
0869 00d9 | | Load_Top At_Offset_1
086a e00d | | Load 0x0,0xd
086b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
086c 7003 |p | Jump_Nonzero 0x870
086d 00d8 | | Load_Top At_Offset_0
086e a5f4 | | Store_Unchecked 0x2,-0xc
086f 450c |E | Exit_Suprogram New_Top_Offset 0xc
0870 e5fb | | Load 0x2,-0x5
0871 6809 |h | Jump_Zero 0x87b
0872 e00d | | Load 0x0,0xd
0873 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0874 e5f5 | | Load 0x2,-0xb
0875 e5f6 | | Load 0x2,-0xa
0876 e5fa | | Load 0x2,-0x6
0877 e5fd | | Load 0x2,-0x3
0878 e5ff | | Load 0x2,-0x1
0879 821b | | Call 0x1,0x1b
087a 0059 | Y | Store_Top Discrete,At_Offset_1
087b 4800 |H | Short_Literal 0x0
087c 00d9 | | Load_Top At_Offset_1
087d e00d | | Load 0x0,0xd
087e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
087f 7003 |p | Jump_Nonzero 0x883
0880 00d8 | | Load_Top At_Offset_0
0881 a5f4 | | Store_Unchecked 0x2,-0xc
0882 450c |E | Exit_Suprogram New_Top_Offset 0xc
0883 e5fa | | Load 0x2,-0x6
0884 7025 |p% | Jump_Nonzero 0x8aa
0885 e5f6 | | Load 0x2,-0xa
0886 e5f7 | | Load 0x2,-0x9
0887 e5f8 | | Load 0x2,-0x8
0888 e5fb | | Load 0x2,-0x5
0889 e5fc | | Load 0x2,-0x4
088a 4800 |H | Short_Literal 0x0
088b e5ff | | Load 0x2,-0x1
088c 00d8 | | Load_Top At_Offset_0
088d e01d | | Load 0x0,0x1d
088e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
088f 701a |p | Jump_Nonzero 0x8aa
0890 e012 | | Load 0x0,0x12
0891 180e | | Execute Package,Field_Execute,Field_Number 0xe
0892 4801 |H | Short_Literal 0x1
0893 4801 |H | Short_Literal 0x1
0894 e013 | | Load 0x0,0x13
0895 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0896 035b | [ | Declare_Type Array,Constrained
0897 0337 | 7 | Declare_Variable Array
0898 e5fe | | Load 0x2,-0x2
0899 e013 | | Load 0x0,0x13
089a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
089b e013 | | Load 0x0,0x13
089c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
089d 0119 | | Execute Any,Check_In_Formal_Type
089e 4801 |H | Short_Literal 0x1
089f 00da | | Load_Top At_Offset_2
08a0 01d6 | | Execute Vector,Field_Write
08a1 6016 |` | Indirect_Literal Discrete,0x8b8,{0x00000000, 0x000081dc}
08a2 e00d | | Load 0x0,0xd
08a3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
08a4 e013 | | Load 0x0,0x13
08a5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
08a6 6011 |` | Indirect_Literal Discrete,0x8b8,{0x00000000, 0x000081dc}
08a7 e00d | | Load 0x0,0xd
08a8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08a9 a5f4 | | Store_Unchecked 0x2,-0xc
08aa 450c |E | Exit_Suprogram New_Top_Offset 0xc
08ab TRAP_0828:
08ab 0007 | | Action Break_Optional
08ac e5f5 | | Load 0x2,-0xb
08ad 0092 1296 | | Action Push_String_Extended,0x1296 ; "Do_Build_Script"
08af e00e | | Load 0x0,0xe
08b0 180f | | Execute Package,Field_Execute,Field_Number 0xf
08b1 0092 1296 | | Action Push_String_Extended,0x1296 ; "Do_Build_Script"
08b3 e00e | | Load 0x0,0xe
08b4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08b5 a5f4 | | Store_Unchecked 0x2,-0xc
08b6 450c |E | Exit_Suprogram New_Top_Offset 0xc
08b7 0000 | | .XXX[0x1]
08b8 0000 0000 | | .LITERAL {0x00000000, 0x000081dc}
08bc 0000 0000 | | .LITERAL {0x00000000, 0x000081db}
08c0 ; --------------------------------------------------------------------------------------
08c0 ; SUBPROGRAM
08c0 ; --------------------------------------------------------------------------------------
08c0 08c3 | | .CONST 0x08c3 ; Address of begin
08c1 08c9 | | .CONST 0x08c9 ; Address of exception handler
08c2 0001 | | .CONST 0x0001 ; Number of locals
08c3 BODY_08c0:
08c3 INIT_08c0:
08c3 00da | | Load_Top At_Offset_2
08c4 e01c | | Load 0x0,0x1c
08c5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
08c6 e01b | | Load 0x0,0x1b
08c7 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
08c8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08c9 TRAP_08c0:
08c9 0007 | | Action Break_Optional
08ca e5fe | | Load 0x2,-0x2
08cb 0092 1297 | | Action Push_String_Extended,0x1297 ; "Get_Run_Command"
08cd e00e | | Load 0x0,0xe
08ce 180f | | Execute Package,Field_Execute,Field_Number 0xf
08cf 00ea | | Load_Encached Null_String_Cache
08d0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08d1 0000 0000 | | .BLANK 0000[0x7]
08d8 ; --------------------------------------------------------------------------------------
08d8 ; SUBPROGRAM
08d8 ; --------------------------------------------------------------------------------------
08d8 08de | | .CONST 0x08de ; Address of begin
08d9 0004 | | .CONST 0x0004 ; Address of exception handler
08da 0002 | | .CONST 0x0002 ; Number of locals
08db INIT_08d8:
08db e00d | | Load 0x0,0xd
08dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08dd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
08de BODY_08d8:
08de 4800 |H | Short_Literal 0x0
08df a5fa | | Store_Unchecked 0x2,-0x6
08e0 e5fe | | Load 0x2,-0x2
08e1 6815 |h | Jump_Zero 0x8f7
08e2 e012 | | Load 0x0,0x12
08e3 180e | | Execute Package,Field_Execute,Field_Number 0xe
08e4 4801 |H | Short_Literal 0x1
08e5 4801 |H | Short_Literal 0x1
08e6 e013 | | Load 0x0,0x13
08e7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08e8 035b | [ | Declare_Type Array,Constrained
08e9 0337 | 7 | Declare_Variable Array
08ea e5ff | | Load 0x2,-0x1
08eb e013 | | Load 0x0,0x13
08ec 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08ed e013 | | Load 0x0,0x13
08ee 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08ef 0119 | | Execute Any,Check_In_Formal_Type
08f0 4801 |H | Short_Literal 0x1
08f1 00da | | Load_Top At_Offset_2
08f2 01d6 | | Execute Vector,Field_Write
08f3 604c |`L | Indirect_Literal Discrete,0x940,{0x00000000, 0x000081f5}
08f4 e00d | | Load 0x0,0xd
08f5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
08f6 4506 |E | Exit_Suprogram New_Top_Offset 0x6
08f7 e5fb | | Load 0x2,-0x5
08f8 4801 |H | Short_Literal 0x1
08f9 4801 |H | Short_Literal 0x1
08fa e013 | | Load 0x0,0x13
08fb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
08fc 035b | [ | Declare_Type Array,Constrained
08fd 0337 | 7 | Declare_Variable Array
08fe e5ff | | Load 0x2,-0x1
08ff e013 | | Load 0x0,0x13
0900 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0901 e013 | | Load 0x0,0x13
0902 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0903 0119 | | Execute Any,Check_In_Formal_Type
0904 4801 |H | Short_Literal 0x1
0905 00da | | Load_Top At_Offset_2
0906 01d6 | | Execute Vector,Field_Write
0907 6034 |`4 | Indirect_Literal Discrete,0x93c,{0x00000000, 0x00008201}
0908 e00d | | Load 0x0,0xd
0909 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
090a e00d | | Load 0x0,0xd
090b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
090c e5fc | | Load 0x2,-0x4
090d 4801 |H | Short_Literal 0x1
090e 4800 |H | Short_Literal 0x0
090f 4800 |H | Short_Literal 0x0
0910 00ea | | Load_Encached Null_String_Cache
0911 e5fd | | Load 0x2,-0x3
0912 e5ff | | Load 0x2,-0x1
0913 e004 | | Load 0x0,0x4
0914 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0915 0059 | Y | Store_Top Discrete,At_Offset_1
0916 4800 |H | Short_Literal 0x0
0917 00d9 | | Load_Top At_Offset_1
0918 e00d | | Load 0x0,0xd
0919 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
091a 701a |p | Jump_Nonzero 0x935
091b e5fb | | Load 0x2,-0x5
091c 4801 |H | Short_Literal 0x1
091d 4801 |H | Short_Literal 0x1
091e e013 | | Load 0x0,0x13
091f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0920 035b | [ | Declare_Type Array,Constrained
0921 0337 | 7 | Declare_Variable Array
0922 e5ff | | Load 0x2,-0x1
0923 e013 | | Load 0x0,0x13
0924 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0925 e013 | | Load 0x0,0x13
0926 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0927 0119 | | Execute Any,Check_In_Formal_Type
0928 4801 |H | Short_Literal 0x1
0929 00da | | Load_Top At_Offset_2
092a 01d6 | | Execute Vector,Field_Write
092b 600c |` | Indirect_Literal Discrete,0x938,{0x00000000, 0x000081f1}
092c e00d | | Load 0x0,0xd
092d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
092e e013 | | Load 0x0,0x13
092f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0930 6007 |` | Indirect_Literal Discrete,0x938,{0x00000000, 0x000081f1}
0931 e00d | | Load 0x0,0xd
0932 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0933 a5fa | | Store_Unchecked 0x2,-0x6
0934 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0935 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0936 0000 0000 | | .XXX[0x2]
0938 0000 0000 | | .LITERAL {0x00000000, 0x000081f1}
093c 0000 0000 | | .LITERAL {0x00000000, 0x00008201}
0940 0000 0000 | | .LITERAL {0x00000000, 0x000081f5}
0944 0000 0000 | | .BLANK 0000[0x4]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 0957 | W | .CONST 0x0957 ; Address of begin
0949 09c9 | | .CONST 0x09c9 ; Address of exception handler
094a 0003 | | .CONST 0x0003 ; Number of locals
094b INIT_0948:
094b e00d | | Load 0x0,0xd
094c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
094d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
094e e5f9 | | Load 0x2,-0x7
094f e5fd | | Load 0x2,-0x3
0950 823c | < | Call 0x1,0x3c
0951 0092 1298 | | Action Push_String_Extended,0x1298 ; " "
0953 01cc | | Execute Vector,Catenate
0954 e5fc | | Load 0x2,-0x4
0955 01cc | | Execute Vector,Catenate
0956 0007 | | Action Break_Optional
0957 BODY_0948:
0957 4800 |H | Short_Literal 0x0
0958 a5f8 | | Store_Unchecked 0x2,-0x8
0959 e5fe | | Load 0x2,-0x2
095a 7022 |p" | Jump_Nonzero 0x97d
095b e5fd | | Load 0x2,-0x3
095c e5fb | | Load 0x2,-0x5
095d e5fc | | Load 0x2,-0x4
095e e5ff | | Load 0x2,-0x1
095f e01d | | Load 0x0,0x1d
0960 180f | | Execute Package,Field_Execute,Field_Number 0xf
0961 701b |p | Jump_Nonzero 0x97d
0962 e012 | | Load 0x0,0x12
0963 180e | | Execute Package,Field_Execute,Field_Number 0xe
0964 4801 |H | Short_Literal 0x1
0965 4801 |H | Short_Literal 0x1
0966 e013 | | Load 0x0,0x13
0967 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0968 035b | [ | Declare_Type Array,Constrained
0969 0337 | 7 | Declare_Variable Array
096a e5ff | | Load 0x2,-0x1
096b e013 | | Load 0x0,0x13
096c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
096d e013 | | Load 0x0,0x13
096e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
096f 0119 | | Execute Any,Check_In_Formal_Type
0970 4801 |H | Short_Literal 0x1
0971 00da | | Load_Top At_Offset_2
0972 01d6 | | Execute Vector,Field_Write
0973 6068 |`h | Indirect_Literal Discrete,0x9dc,{0x00000000, 0x000081dd}
0974 e00d | | Load 0x0,0xd
0975 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0976 e013 | | Load 0x0,0x13
0977 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0978 6063 |`c | Indirect_Literal Discrete,0x9dc,{0x00000000, 0x000081dd}
0979 e00d | | Load 0x0,0xd
097a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
097b a5f8 | | Store_Unchecked 0x2,-0x8
097c 4508 |E | Exit_Suprogram New_Top_Offset 0x8
097d e00d | | Load 0x0,0xd
097e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
097f e5f9 | | Load 0x2,-0x7
0980 e5fa | | Load 0x2,-0x6
0981 e5fb | | Load 0x2,-0x5
0982 e5fe | | Load 0x2,-0x2
0983 e5fc | | Load 0x2,-0x4
0984 e5ff | | Load 0x2,-0x1
0985 00d8 | | Load_Top At_Offset_0
0986 e001 | | Load 0x0,0x1
0987 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0988 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0989 822a | * | Call 0x1,0x2a
098a 005a | Z | Store_Top Discrete,At_Offset_2
098b 4800 |H | Short_Literal 0x0
098c 00da | | Load_Top At_Offset_2
098d e00d | | Load 0x0,0xd
098e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
098f 7003 |p | Jump_Nonzero 0x993
0990 00d9 | | Load_Top At_Offset_1
0991 a5f8 | | Store_Unchecked 0x2,-0x8
0992 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0993 e00d | | Load 0x0,0xd
0994 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0995 e5f9 | | Load 0x2,-0x7
0996 e5fa | | Load 0x2,-0x6
0997 e5fb | | Load 0x2,-0x5
0998 e5fe | | Load 0x2,-0x2
0999 e403 | | Load 0x2,0x3
099a 823d | = | Call 0x1,0x3d
099b 005a | Z | Store_Top Discrete,At_Offset_2
099c 4800 |H | Short_Literal 0x0
099d 00da | | Load_Top At_Offset_2
099e e00d | | Load 0x0,0xd
099f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
09a0 7003 |p | Jump_Nonzero 0x9a4
09a1 00d9 | | Load_Top At_Offset_1
09a2 a5f8 | | Store_Unchecked 0x2,-0x8
09a3 4508 |E | Exit_Suprogram New_Top_Offset 0x8
09a4 e5fe | | Load 0x2,-0x2
09a5 7022 |p" | Jump_Nonzero 0x9c8
09a6 e5fd | | Load 0x2,-0x3
09a7 e5fb | | Load 0x2,-0x5
09a8 e5fc | | Load 0x2,-0x4
09a9 e5ff | | Load 0x2,-0x1
09aa e01d | | Load 0x0,0x1d
09ab 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09ac 701b |p | Jump_Nonzero 0x9c8
09ad e012 | | Load 0x0,0x12
09ae 180e | | Execute Package,Field_Execute,Field_Number 0xe
09af 4801 |H | Short_Literal 0x1
09b0 4801 |H | Short_Literal 0x1
09b1 e013 | | Load 0x0,0x13
09b2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09b3 035b | [ | Declare_Type Array,Constrained
09b4 0337 | 7 | Declare_Variable Array
09b5 e5ff | | Load 0x2,-0x1
09b6 e013 | | Load 0x0,0x13
09b7 181a | | Execute Package,Field_Execute,Field_Number 0x1a
09b8 e013 | | Load 0x0,0x13
09b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09ba 0119 | | Execute Any,Check_In_Formal_Type
09bb 4801 |H | Short_Literal 0x1
09bc 00da | | Load_Top At_Offset_2
09bd 01d6 | | Execute Vector,Field_Write
09be 6019 |` | Indirect_Literal Discrete,0x9d8,{0x00000000, 0x000081de}
09bf e00d | | Load 0x0,0xd
09c0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
09c1 e013 | | Load 0x0,0x13
09c2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
09c3 6014 |` | Indirect_Literal Discrete,0x9d8,{0x00000000, 0x000081de}
09c4 e00d | | Load 0x0,0xd
09c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09c6 a5f8 | | Store_Unchecked 0x2,-0x8
09c7 4508 |E | Exit_Suprogram New_Top_Offset 0x8
09c8 4508 |E | Exit_Suprogram New_Top_Offset 0x8
09c9 TRAP_0948:
09c9 0007 | | Action Break_Optional
09ca e5f9 | | Load 0x2,-0x7
09cb 0092 1299 | | Action Push_String_Extended,0x1299 ; "Do_Execute_Script"
09cd e00e | | Load 0x0,0xe
09ce 180f | | Execute Package,Field_Execute,Field_Number 0xf
09cf 0092 1299 | | Action Push_String_Extended,0x1299 ; "Do_Execute_Script"
09d1 e00e | | Load 0x0,0xe
09d2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09d3 a5f8 | | Store_Unchecked 0x2,-0x8
09d4 4508 |E | Exit_Suprogram New_Top_Offset 0x8
09d5 0000 0000 | | .XXX[0x3]
09d7 0000 | |
09d8 0000 0000 | | .LITERAL {0x00000000, 0x000081de}
09dc 0000 0000 | | .LITERAL {0x00000000, 0x000081dd}
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e6 | | .CONST 0x09e6 ; Address of begin
09e1 0004 | | .CONST 0x0004 ; Address of exception handler
09e2 0002 | | .CONST 0x0002 ; Number of locals
09e3 INIT_09e0:
09e3 e00d | | Load 0x0,0xd
09e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09e5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
09e6 BODY_09e0:
09e6 4800 |H | Short_Literal 0x0
09e7 a5f5 | | Store_Unchecked 0x2,-0xb
09e8 e5f9 | | Load 0x2,-0x7
09e9 0f00 | | Execute_Immediate Equal,0x0
09ea e5f8 | | Load 0x2,-0x8
09eb 0f00 | | Execute_Immediate Equal,0x0
09ec 0279 | y | Execute Discrete,And
09ed 6801 |h | Jump_Zero 0x9ef
09ee 450a |E | Exit_Suprogram New_Top_Offset 0xa
09ef e5fe | | Load 0x2,-0x2
09f0 7019 |p | Jump_Nonzero 0xa0a
09f1 e00d | | Load 0x0,0xd
09f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09f3 e5f6 | | Load 0x2,-0xa
09f4 0120 | | Execute Any,Is_Value
09f5 6803 |h | Jump_Zero 0x9f9
09f6 e004 | | Load 0x0,0x4
09f7 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
09f8 7801 |x | Jump 0x9fa
09f9 e5f6 | | Load 0x2,-0xa
09fa e5f7 | | Load 0x2,-0x9
09fb e5fb | | Load 0x2,-0x5
09fc e5fd | | Load 0x2,-0x3
09fd e5fa | | Load 0x2,-0x6
09fe e5fc | | Load 0x2,-0x4
09ff 8229 | ) | Call 0x1,0x29
0a00 c5f6 | | Store 0x2,-0xa
0a01 0059 | Y | Store_Top Discrete,At_Offset_1
0a02 4800 |H | Short_Literal 0x0
0a03 00d9 | | Load_Top At_Offset_1
0a04 e00d | | Load 0x0,0xd
0a05 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a06 7003 |p | Jump_Nonzero 0xa0a
0a07 00d8 | | Load_Top At_Offset_0
0a08 a5f5 | | Store_Unchecked 0x2,-0xb
0a09 450a |E | Exit_Suprogram New_Top_Offset 0xa
0a0a e5f8 | | Load 0x2,-0x8
0a0b 6814 |h | Jump_Zero 0xa20
0a0c e00d | | Load 0x0,0xd
0a0d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a0e e5f7 | | Load 0x2,-0x9
0a0f e5fc | | Load 0x2,-0x4
0a10 e5f6 | | Load 0x2,-0xa
0a11 e5fe | | Load 0x2,-0x2
0a12 e5ff | | Load 0x2,-0x1
0a13 e22b | + | Load 0x1,0x2b
0a14 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0a15 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0a16 8003 | | Call 0x0,0x3
0a17 c5f5 | | Store 0x2,-0xb
0a18 4800 |H | Short_Literal 0x0
0a19 00d9 | | Load_Top At_Offset_1
0a1a e00d | | Load 0x0,0xd
0a1b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a1c 7003 |p | Jump_Nonzero 0xa20
0a1d 00d8 | | Load_Top At_Offset_0
0a1e a5f5 | | Store_Unchecked 0x2,-0xb
0a1f 450a |E | Exit_Suprogram New_Top_Offset 0xa
0a20 450a |E | Exit_Suprogram New_Top_Offset 0xa
0a21 0000 0000 | | .BLANK 0000[0x7]
0a28 ; --------------------------------------------------------------------------------------
0a28 ; SUBPROGRAM
0a28 ; --------------------------------------------------------------------------------------
0a28 0a38 | 8 | .CONST 0x0a38 ; Address of begin
0a29 0004 | | .CONST 0x0004 ; Address of exception handler
0a2a 0004 | | .CONST 0x0004 ; Number of locals
0a2b INIT_0a28:
0a2b e002 | | Load 0x0,0x2
0a2c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a2d 02c7 | | Declare_Variable Any
0a2e 00d8 | | Load_Top At_Offset_0
0a2f 1c00 | | Execute_Immediate Run_Utility,0x0
0a30 e00d | | Load 0x0,0xd
0a31 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a32 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a33 e004 | | Load 0x0,0x4
0a34 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0a35 02c7 | | Declare_Variable Any
0a36 00d8 | | Load_Top At_Offset_0
0a37 1c00 | | Execute_Immediate Run_Utility,0x0
0a38 BODY_0a28:
0a38 4800 |H | Short_Literal 0x0
0a39 a5f1 | | Store_Unchecked 0x2,-0xf
0a3a e5fa | | Load 0x2,-0x6
0a3b 7011 |p | Jump_Nonzero 0xa4d
0a3c e00d | | Load 0x0,0xd
0a3d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a3e 00db | | Load_Top At_Offset_3
0a3f e5f2 | | Load 0x2,-0xe
0a40 e5ff | | Load 0x2,-0x1
0a41 e010 | | Load 0x0,0x10
0a42 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a43 c402 | | Store 0x2,0x2
0a44 005a | Z | Store_Top Discrete,At_Offset_2
0a45 4800 |H | Short_Literal 0x0
0a46 00da | | Load_Top At_Offset_2
0a47 e00d | | Load 0x0,0xd
0a48 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a49 7003 |p | Jump_Nonzero 0xa4d
0a4a 00d9 | | Load_Top At_Offset_1
0a4b a5f1 | | Store_Unchecked 0x2,-0xf
0a4c 450f |E | Exit_Suprogram New_Top_Offset 0xf
0a4d e00d | | Load 0x0,0xd
0a4e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a4f 00d9 | | Load_Top At_Offset_1
0a50 e5f2 | | Load 0x2,-0xe
0a51 e5f7 | | Load 0x2,-0x9
0a52 e5f6 | | Load 0x2,-0xa
0a53 e5f3 | | Load 0x2,-0xd
0a54 e5f4 | | Load 0x2,-0xc
0a55 e5f5 | | Load 0x2,-0xb
0a56 e5f8 | | Load 0x2,-0x8
0a57 e5fa | | Load 0x2,-0x6
0a58 e5fd | | Load 0x2,-0x3
0a59 823f | ? | Call 0x1,0x3f
0a5a c404 | | Store 0x2,0x4
0a5b 005a | Z | Store_Top Discrete,At_Offset_2
0a5c 4800 |H | Short_Literal 0x0
0a5d 00da | | Load_Top At_Offset_2
0a5e e00d | | Load 0x0,0xd
0a5f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a60 7003 |p | Jump_Nonzero 0xa64
0a61 00d9 | | Load_Top At_Offset_1
0a62 a5f1 | | Store_Unchecked 0x2,-0xf
0a63 450f |E | Exit_Suprogram New_Top_Offset 0xf
0a64 e00d | | Load 0x0,0xd
0a65 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a66 e5f2 | | Load 0x2,-0xe
0a67 e5f5 | | Load 0x2,-0xb
0a68 00db | | Load_Top At_Offset_3
0a69 e5f8 | | Load 0x2,-0x8
0a6a e5f9 | | Load 0x2,-0x7
0a6b e5fa | | Load 0x2,-0x6
0a6c e5fb | | Load 0x2,-0x5
0a6d e5fc | | Load 0x2,-0x4
0a6e e5fd | | Load 0x2,-0x3
0a6f e5ff | | Load 0x2,-0x1
0a70 e402 | | Load 0x2,0x2
0a71 823b | ; | Call 0x1,0x3b
0a72 c5f1 | | Store 0x2,-0xf
0a73 4800 |H | Short_Literal 0x0
0a74 00da | | Load_Top At_Offset_2
0a75 e00d | | Load 0x0,0xd
0a76 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a77 7003 |p | Jump_Nonzero 0xa7b
0a78 00d9 | | Load_Top At_Offset_1
0a79 a5f1 | | Store_Unchecked 0x2,-0xf
0a7a 450f |E | Exit_Suprogram New_Top_Offset 0xf
0a7b e5fa | | Load 0x2,-0x6
0a7c 7016 |p | Jump_Nonzero 0xa93
0a7d 00da | | Load_Top At_Offset_2
0a7e e5f2 | | Load 0x2,-0xe
0a7f e010 | | Load 0x0,0x10
0a80 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a81 c402 | | Store 0x2,0x2
0a82 e00d | | Load 0x0,0xd
0a83 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a84 e5f2 | | Load 0x2,-0xe
0a85 e01a | | Load 0x0,0x1a
0a86 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a87 e5fd | | Load 0x2,-0x3
0a88 e015 | | Load 0x0,0x15
0a89 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a8a c5f1 | | Store 0x2,-0xf
0a8b 4800 |H | Short_Literal 0x0
0a8c 00da | | Load_Top At_Offset_2
0a8d e00d | | Load 0x0,0xd
0a8e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a8f 7003 |p | Jump_Nonzero 0xa93
0a90 00d9 | | Load_Top At_Offset_1
0a91 a5f1 | | Store_Unchecked 0x2,-0xf
0a92 450f |E | Exit_Suprogram New_Top_Offset 0xf
0a93 e5f6 | | Load 0x2,-0xa
0a94 680f |h | Jump_Zero 0xaa4
0a95 e00d | | Load 0x0,0xd
0a96 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a97 e5f2 | | Load 0x2,-0xe
0a98 e5f3 | | Load 0x2,-0xd
0a99 00db | | Load_Top At_Offset_3
0a9a e5fe | | Load 0x2,-0x2
0a9b e5f5 | | Load 0x2,-0xb
0a9c e5fa | | Load 0x2,-0x6
0a9d e5f2 | | Load 0x2,-0xe
0a9e 4800 |H | Short_Literal 0x0
0a9f e5ff | | Load 0x2,-0x1
0aa0 e016 | | Load 0x0,0x16
0aa1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0aa2 823e | > | Call 0x1,0x3e
0aa3 c5f1 | | Store 0x2,-0xf
0aa4 450f |E | Exit_Suprogram New_Top_Offset 0xf
0aa5 0000 0000 | | .XXX[0x3]
0aa7 0000 | |
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; SUBPROGRAM
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0ab2 | | .CONST 0x0ab2 ; Address of begin
0aa9 0004 | | .CONST 0x0004 ; Address of exception handler
0aaa 0003 | | .CONST 0x0003 ; Number of locals
0aab INIT_0aa8:
0aab e011 | | Load 0x0,0x11
0aac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0aad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0aae 02c7 | | Declare_Variable Any
0aaf 00d8 | | Load_Top At_Offset_0
0ab0 1c00 | | Execute_Immediate Run_Utility,0x0
0ab1 00e1 | | Load_Encached Boolean_Cache
0ab2 BODY_0aa8:
0ab2 00cf | | Action Mark_Auxiliary
0ab3 e5ff | | Load 0x2,-0x1
0ab4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ab5 01dc | | Execute Vector,Last
0ab6 4801 |H | Short_Literal 0x1
0ab7 0263 | c | Execute Discrete,Above_Bound
0ab8 701c |p | Jump_Nonzero 0xad5
0ab9 4801 |H | Short_Literal 0x1
0aba e011 | | Load 0x0,0x11
0abb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0abc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0abd 00da | | Load_Top At_Offset_2
0abe e5ff | | Load 0x2,-0x1
0abf 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ac0 01d5 | | Execute Vector,Field_Reference
0ac1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0ac2 e001 | | Load 0x0,0x1
0ac3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ac4 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0ac5 e011 | | Load 0x0,0x11
0ac6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ac7 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0ac8 c402 | | Store 0x2,0x2
0ac9 00e1 | | Load_Encached Boolean_Cache
0aca e011 | | Load 0x0,0x11
0acb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0acc 180e | | Execute Package,Field_Execute,Field_Number 0xe
0acd e402 | | Load 0x2,0x2
0ace e5fe | | Load 0x2,-0x2
0acf e011 | | Load 0x0,0x11
0ad0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ad1 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0ad2 c403 | | Store 0x2,0x3
0ad3 00c8 | | Action Pop_Auxiliary_Range
0ad4 3fe4 |? | Loop_Increasing 0xab9
0ad5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0ad6 0000 0000 | | .XXX[0x2]
0ad8 ; --------------------------------------------------------------------------------------
0ad8 ; SUBPROGRAM
0ad8 ; --------------------------------------------------------------------------------------
0ad8 0aea | | .CONST 0x0aea ; Address of begin
0ad9 0004 | | .CONST 0x0004 ; Address of exception handler
0ada 0005 | | .CONST 0x0005 ; Number of locals
0adb INIT_0ad8:
0adb e00d | | Load 0x0,0xd
0adc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0add 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0ade e001 | | Load 0x0,0x1
0adf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ae0 02c7 | | Declare_Variable Any
0ae1 00d8 | | Load_Top At_Offset_0
0ae2 1c00 | | Execute_Immediate Run_Utility,0x0
0ae3 e001 | | Load 0x0,0x1
0ae4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0ae5 02c7 | | Declare_Variable Any
0ae6 00d8 | | Load_Top At_Offset_0
0ae7 1c00 | | Execute_Immediate Run_Utility,0x0
0ae8 029f 104b | K| Declare_Subprogram INIT_1048,For_Call
0aea BODY_0ad8:
0aea 4800 |H | Short_Literal 0x0
0aeb a5f9 | | Store_Unchecked 0x2,-0x7
0aec 00cf | | Action Mark_Auxiliary
0aed e5ff | | Load 0x2,-0x1
0aee 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0aef 01dc | | Execute Vector,Last
0af0 4801 |H | Short_Literal 0x1
0af1 0263 | c | Execute Discrete,Above_Bound
0af2 700f |p | Jump_Nonzero 0xb02
0af3 00d8 | | Load_Top At_Offset_0
0af4 e5ff | | Load 0x2,-0x1
0af5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0af6 01d5 | | Execute Vector,Field_Reference
0af7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0af8 c403 | | Store 0x2,0x3
0af9 e5fb | | Load 0x2,-0x5
0afa 4800 |H | Short_Literal 0x0
0afb e403 | | Load 0x2,0x3
0afc e016 | | Load 0x0,0x16
0afd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0afe c404 | | Store 0x2,0x4
0aff 8405 | | Call 0x2,0x5
0b00 00c8 | | Action Pop_Auxiliary_Range
0b01 3ff1 |? | Loop_Increasing 0xaf3
0b02 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0b03 0000 0000 | | .BLANK 0000[0x5]
0b08 ; --------------------------------------------------------------------------------------
0b08 ; SUBPROGRAM
0b08 ; --------------------------------------------------------------------------------------
0b08 0b13 | | .CONST 0x0b13 ; Address of begin
0b09 0b30 | 0 | .CONST 0x0b30 ; Address of exception handler
0b0a 0003 | | .CONST 0x0003 ; Number of locals
0b0b INIT_0b08:
0b0b e007 | | Load 0x0,0x7
0b0c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b0d 02c7 | | Declare_Variable Any
0b0e e5fb | | Load 0x2,-0x5
0b0f a402 | | Store_Unchecked 0x2,0x2
0b10 e00d | | Load 0x0,0xd
0b11 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b12 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b13 BODY_0b08:
0b13 00d9 | | Load_Top At_Offset_1
0b14 00ea | | Load_Encached Null_String_Cache
0b15 e5ff | | Load 0x2,-0x1
0b16 e01e | | Load 0x0,0x1e
0b17 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b18 c402 | | Store 0x2,0x2
0b19 e012 | | Load 0x0,0x12
0b1a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b1b 4801 |H | Short_Literal 0x1
0b1c 4801 |H | Short_Literal 0x1
0b1d e013 | | Load 0x0,0x13
0b1e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b1f 035b | [ | Declare_Type Array,Constrained
0b20 0337 | 7 | Declare_Variable Array
0b21 e5ff | | Load 0x2,-0x1
0b22 e013 | | Load 0x0,0x13
0b23 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b24 e013 | | Load 0x0,0x13
0b25 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b26 0119 | | Execute Any,Check_In_Formal_Type
0b27 4801 |H | Short_Literal 0x1
0b28 00da | | Load_Top At_Offset_2
0b29 01d6 | | Execute Vector,Field_Write
0b2a 6011 |` | Indirect_Literal Discrete,0xb3c,{0x00000000, 0x00008209}
0b2b e00d | | Load 0x0,0xd
0b2c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0b2d 00d8 | | Load_Top At_Offset_0
0b2e a5f8 | | Store_Unchecked 0x2,-0x8
0b2f 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0b30 TRAP_0b08:
0b30 0007 | | Action Break_Optional
0b31 e5f9 | | Load 0x2,-0x7
0b32 0092 129a | | Action Push_String_Extended,0x129a ; "Copy_A_File"
0b34 e00e | | Load 0x0,0xe
0b35 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b36 0092 129a | | Action Push_String_Extended,0x129a ; "Copy_A_File"
0b38 e00e | | Load 0x0,0xe
0b39 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b3a a5f8 | | Store_Unchecked 0x2,-0x8
0b3b 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0b3c 0000 0000 | | .LITERAL {0x00000000, 0x00008209}
0b40 ; --------------------------------------------------------------------------------------
0b40 ; SUBPROGRAM
0b40 ; --------------------------------------------------------------------------------------
0b40 0b59 | Y | .CONST 0x0b59 ; Address of begin
0b41 0b65 | e | .CONST 0x0b65 ; Address of exception handler
0b42 0002 | | .CONST 0x0002 ; Number of locals
0b43 INIT_0b40:
0b43 e5fb | | Load 0x2,-0x5
0b44 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0b45 e01c | | Load 0x0,0x1c
0b46 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b47 e01b | | Load 0x0,0x1b
0b48 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0b49 0092 1298 | | Action Push_String_Extended,0x1298 ; " "
0b4b 01cc | | Execute Vector,Catenate
0b4c 4801 |H | Short_Literal 0x1
0b4d e5fb | | Load 0x2,-0x5
0b4e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b4f e5fb | | Load 0x2,-0x5
0b50 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0b51 01cf | | Execute Vector,Slice_Read
0b52 01cc | | Execute Vector,Catenate
0b53 0092 1298 | | Action Push_String_Extended,0x1298 ; " "
0b55 01cc | | Execute Vector,Catenate
0b56 e5fd | | Load 0x2,-0x3
0b57 01cc | | Execute Vector,Catenate
0b58 0007 | | Action Break_Optional
0b59 BODY_0b40:
0b59 4800 |H | Short_Literal 0x0
0b5a a5f8 | | Store_Unchecked 0x2,-0x8
0b5b e00d | | Load 0x0,0xd
0b5c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b5d e5f9 | | Load 0x2,-0x7
0b5e 00da | | Load_Top At_Offset_2
0b5f e5fb | | Load 0x2,-0x5
0b60 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b61 e010 | | Load 0x0,0x10
0b62 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b63 c5f8 | | Store 0x2,-0x8
0b64 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0b65 TRAP_0b40:
0b65 0007 | | Action Break_Optional
0b66 e5f9 | | Load 0x2,-0x7
0b67 0092 129b | | Action Push_String_Extended,0x129b ; "Move_A_File"
0b69 e00e | | Load 0x0,0xe
0b6a 180f | | Execute Package,Field_Execute,Field_Number 0xf
0b6b 0092 129b | | Action Push_String_Extended,0x129b ; "Move_A_File"
0b6d e00e | | Load 0x0,0xe
0b6e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b6f a5f8 | | Store_Unchecked 0x2,-0x8
0b70 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0b71 0000 0000 | | .BLANK 0000[0x7]
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b95 | | .CONST 0x0b95 ; Address of begin
0b79 0004 | | .CONST 0x0004 ; Address of exception handler
0b7a 0008 | | .CONST 0x0008 ; Number of locals
0b7b INIT_0b78:
0b7b e001 | | Load 0x0,0x1
0b7c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0b7d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0b7e 02c7 | | Declare_Variable Any
0b7f 00d8 | | Load_Top At_Offset_0
0b80 1c00 | | Execute_Immediate Run_Utility,0x0
0b81 e001 | | Load 0x0,0x1
0b82 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b83 02c7 | | Declare_Variable Any
0b84 00d8 | | Load_Top At_Offset_0
0b85 1c00 | | Execute_Immediate Run_Utility,0x0
0b86 e002 | | Load 0x0,0x2
0b87 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b88 02c7 | | Declare_Variable Any
0b89 00d8 | | Load_Top At_Offset_0
0b8a 1c00 | | Execute_Immediate Run_Utility,0x0
0b8b e00d | | Load 0x0,0xd
0b8c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b8d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b8e e001 | | Load 0x0,0x1
0b8f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b90 e001 | | Load 0x0,0x1
0b91 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0b92 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b93 029f 115b | [| Declare_Subprogram INIT_1158,For_Call
0b95 BODY_0b78:
0b95 4800 |H | Short_Literal 0x0
0b96 a5fa | | Store_Unchecked 0x2,-0x6
0b97 e001 | | Load 0x0,0x1
0b98 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0b99 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0b9a e402 | | Load 0x2,0x2
0b9b 6050 |`P | Indirect_Literal Discrete,0xbec,{0x00000000, 0x00004000}
0b9c e017 | | Load 0x0,0x17
0b9d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0b9e e018 | | Load 0x0,0x18
0b9f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0ba0 e01f | | Load 0x0,0x1f
0ba1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0ba2 4801 |H | Short_Literal 0x1
0ba3 4800 |H | Short_Literal 0x0
0ba4 e018 | | Load 0x0,0x18
0ba5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0ba6 e001 | | Load 0x0,0x1
0ba7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0ba8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0ba9 0092 129c | | Action Push_String_Extended,0x129c ; "_"
0bab e5fe | | Load 0x2,-0x2
0bac 01cc | | Execute Vector,Catenate
0bad e001 | | Load 0x0,0x1
0bae 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0baf 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0bb0 c402 | | Store 0x2,0x2
0bb1 005a | Z | Store_Top Discrete,At_Offset_2
0bb2 00d9 | | Load_Top At_Offset_1
0bb3 681e |h | Jump_Zero 0xbd2
0bb4 e012 | | Load 0x0,0x12
0bb5 180e | | Execute Package,Field_Execute,Field_Number 0xe
0bb6 4801 |H | Short_Literal 0x1
0bb7 4801 |H | Short_Literal 0x1
0bb8 e013 | | Load 0x0,0x13
0bb9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bba 035b | [ | Declare_Type Array,Constrained
0bbb 0337 | 7 | Declare_Variable Array
0bbc 0092 129c | | Action Push_String_Extended,0x129c ; "_"
0bbe e5fe | | Load 0x2,-0x2
0bbf 01cc | | Execute Vector,Catenate
0bc0 e013 | | Load 0x0,0x13
0bc1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bc2 e013 | | Load 0x0,0x13
0bc3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0bc4 0119 | | Execute Any,Check_In_Formal_Type
0bc5 4801 |H | Short_Literal 0x1
0bc6 00da | | Load_Top At_Offset_2
0bc7 01d6 | | Execute Vector,Field_Write
0bc8 601f |` | Indirect_Literal Discrete,0xbe8,{0x00000000, 0x00008197}
0bc9 e00d | | Load 0x0,0xd
0bca 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0bcb e013 | | Load 0x0,0x13
0bcc 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0bcd 601a |` | Indirect_Literal Discrete,0xbe8,{0x00000000, 0x00008197}
0bce e00d | | Load 0x0,0xd
0bcf 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0bd0 a5fa | | Store_Unchecked 0x2,-0x6
0bd1 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0bd2 e001 | | Load 0x0,0x1
0bd3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bd4 e403 | | Load 0x2,0x3
0bd5 0120 | | Execute Any,Is_Value
0bd6 6803 |h | Jump_Zero 0xbda
0bd7 e001 | | Load 0x0,0x1
0bd8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0bd9 7801 |x | Jump 0xbdb
0bda e403 | | Load 0x2,0x3
0bdb e402 | | Load 0x2,0x2
0bdc e001 | | Load 0x0,0x1
0bdd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0bde 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0bdf c403 | | Store 0x2,0x3
0be0 005b | [ | Store_Top Discrete,At_Offset_3
0be1 00da | | Load_Top At_Offset_2
0be2 6801 |h | Jump_Zero 0xbe4
0be3 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0be4 8408 | | Call 0x2,0x8
0be5 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0be6 0000 0000 | | .XXX[0x2]
0be8 0000 0000 | | .LITERAL {0x00000000, 0x00008197}
0bec 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; SUBPROGRAM
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0bf8 | | .CONST 0x0bf8 ; Address of begin
0bf1 0c13 | | .CONST 0x0c13 ; Address of exception handler
0bf2 0002 | | .CONST 0x0002 ; Number of locals
0bf3 INIT_0bf0:
0bf3 e012 | | Load 0x0,0x12
0bf4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bf5 02c7 | | Declare_Variable Any
0bf6 00d8 | | Load_Top At_Offset_0
0bf7 1c00 | | Execute_Immediate Run_Utility,0x0
0bf8 BODY_0bf0:
0bf8 e5fe | | Load 0x2,-0x2
0bf9 00ea | | Load_Encached Null_String_Cache
0bfa e5ff | | Load 0x2,-0x1
0bfb e01e | | Load 0x0,0x1e
0bfc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0bfd c5fe | | Store 0x2,-0x2
0bfe e012 | | Load 0x0,0x12
0bff 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c00 4801 |H | Short_Literal 0x1
0c01 4801 |H | Short_Literal 0x1
0c02 e013 | | Load 0x0,0x13
0c03 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c04 035b | [ | Declare_Type Array,Constrained
0c05 0337 | 7 | Declare_Variable Array
0c06 e5ff | | Load 0x2,-0x1
0c07 e013 | | Load 0x0,0x13
0c08 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c09 e013 | | Load 0x0,0x13
0c0a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c0b 0119 | | Execute Any,Check_In_Formal_Type
0c0c 4801 |H | Short_Literal 0x1
0c0d 00da | | Load_Top At_Offset_2
0c0e 01d6 | | Execute Vector,Field_Write
0c0f 600c |` | Indirect_Literal Discrete,0xc1c,{0x00000000, 0x00008209}
0c10 e00d | | Load 0x0,0xd
0c11 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c12 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c13 TRAP_0bf0:
0c13 0007 | | Action Break_Optional
0c14 00d9 | | Load_Top At_Offset_1
0c15 0092 129d | | Action Push_String_Extended,0x129d ; "Write_Script_To_Tape"
0c17 e00e | | Load 0x0,0xe
0c18 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c19 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0c1a 0000 0000 | | .XXX[0x2]
0c1c 0000 0000 | | .LITERAL {0x00000000, 0x00008209}
0c20 ; --------------------------------------------------------------------------------------
0c20 ; SUBPROGRAM
0c20 ; --------------------------------------------------------------------------------------
0c20 0c23 | # | .CONST 0x0c23 ; Address of begin
0c21 0c30 | 0 | .CONST 0x0c30 ; Address of exception handler
0c22 0001 | | .CONST 0x0001 ; Number of locals
0c23 BODY_0c20:
0c23 INIT_0c20:
0c23 e5fd | | Load 0x2,-0x3
0c24 6013 |` | Indirect_Literal Discrete,0xc38,{0x00000000, 0x0000820a}
0c25 e00d | | Load 0x0,0xd
0c26 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0c27 e5fc | | Load 0x2,-0x4
0c28 e5fd | | Load 0x2,-0x3
0c29 e5ff | | Load 0x2,-0x1
0c2a e5fe | | Load 0x2,-0x2
0c2b 4801 |H | Short_Literal 0x1
0c2c e01e | | Load 0x0,0x1e
0c2d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c2e c5fc | | Store 0x2,-0x4
0c2f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c30 TRAP_0c20:
0c30 0007 | | Action Break_Optional
0c31 e5fd | | Load 0x2,-0x3
0c32 0092 129e | | Action Push_String_Extended,0x129e ; "Open_Tape_For_Output"
0c34 e00e | | Load 0x0,0xe
0c35 180f | | Execute Package,Field_Execute,Field_Number 0xf
0c36 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c37 0000 | | .XXX[0x1]
0c38 0000 0000 | | .LITERAL {0x00000000, 0x0000820a}
0c3c 0000 0000 | | .BLANK 0000[0x4]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c55 | U | .CONST 0x0c55 ; Address of begin
0c41 0ca6 | | .CONST 0x0ca6 ; Address of exception handler
0c42 0006 | | .CONST 0x0006 ; Number of locals
0c43 INIT_0c40:
0c43 e001 | | Load 0x0,0x1
0c44 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c45 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0c46 02c7 | | Declare_Variable Any
0c47 00d8 | | Load_Top At_Offset_0
0c48 1c00 | | Execute_Immediate Run_Utility,0x0
0c49 e001 | | Load 0x0,0x1
0c4a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c4b 02c7 | | Declare_Variable Any
0c4c 00d8 | | Load_Top At_Offset_0
0c4d 1c00 | | Execute_Immediate Run_Utility,0x0
0c4e e001 | | Load 0x0,0x1
0c4f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c50 e001 | | Load 0x0,0x1
0c51 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c52 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c53 029f 11f3 | | Declare_Subprogram INIT_11f0,For_Call
0c55 BODY_0c40:
0c55 4800 |H | Short_Literal 0x0
0c56 a5fc | | Store_Unchecked 0x2,-0x4
0c57 e001 | | Load 0x0,0x1
0c58 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c59 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c5a e402 | | Load 0x2,0x2
0c5b 605c |`\ | Indirect_Literal Discrete,0xcb8,{0x00000000, 0x00004000}
0c5c e017 | | Load 0x0,0x17
0c5d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c5e e018 | | Load 0x0,0x18
0c5f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c60 e01f | | Load 0x0,0x1f
0c61 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c62 4801 |H | Short_Literal 0x1
0c63 4800 |H | Short_Literal 0x0
0c64 e018 | | Load 0x0,0x18
0c65 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0c66 e001 | | Load 0x0,0x1
0c67 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c68 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0c69 0092 129c | | Action Push_String_Extended,0x129c ; "_"
0c6b e5ff | | Load 0x2,-0x1
0c6c 01cc | | Execute Vector,Catenate
0c6d e001 | | Load 0x0,0x1
0c6e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c6f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0c70 c402 | | Store 0x2,0x2
0c71 005a | Z | Store_Top Discrete,At_Offset_2
0c72 00d9 | | Load_Top At_Offset_1
0c73 681e |h | Jump_Zero 0xc92
0c74 e012 | | Load 0x0,0x12
0c75 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c76 4801 |H | Short_Literal 0x1
0c77 4801 |H | Short_Literal 0x1
0c78 e013 | | Load 0x0,0x13
0c79 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c7a 035b | [ | Declare_Type Array,Constrained
0c7b 0337 | 7 | Declare_Variable Array
0c7c 0092 129c | | Action Push_String_Extended,0x129c ; "_"
0c7e e5ff | | Load 0x2,-0x1
0c7f 01cc | | Execute Vector,Catenate
0c80 e013 | | Load 0x0,0x13
0c81 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0c82 e013 | | Load 0x0,0x13
0c83 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0c84 0119 | | Execute Any,Check_In_Formal_Type
0c85 4801 |H | Short_Literal 0x1
0c86 00da | | Load_Top At_Offset_2
0c87 01d6 | | Execute Vector,Field_Write
0c88 602b |`+ | Indirect_Literal Discrete,0xcb4,{0x00000000, 0x00008197}
0c89 e00d | | Load 0x0,0xd
0c8a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0c8b e013 | | Load 0x0,0x13
0c8c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0c8d 6026 |`& | Indirect_Literal Discrete,0xcb4,{0x00000000, 0x00008197}
0c8e e00d | | Load 0x0,0xd
0c8f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c90 a5fc | | Store_Unchecked 0x2,-0x4
0c91 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0c92 e001 | | Load 0x0,0x1
0c93 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0c94 e403 | | Load 0x2,0x3
0c95 0120 | | Execute Any,Is_Value
0c96 6803 |h | Jump_Zero 0xc9a
0c97 e001 | | Load 0x0,0x1
0c98 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0c99 7801 |x | Jump 0xc9b
0c9a e403 | | Load 0x2,0x3
0c9b e402 | | Load 0x2,0x2
0c9c e001 | | Load 0x0,0x1
0c9d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0c9e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0c9f c403 | | Store 0x2,0x3
0ca0 005b | [ | Store_Top Discrete,At_Offset_3
0ca1 00da | | Load_Top At_Offset_2
0ca2 6801 |h | Jump_Zero 0xca4
0ca3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ca4 8406 | | Call 0x2,0x6
0ca5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ca6 TRAP_0c40:
0ca6 0007 | | Action Break_Optional
0ca7 e5fe | | Load 0x2,-0x2
0ca8 0092 129f | | Action Push_String_Extended,0x129f ; "Copy_Files_To_Tape"
0caa e00e | | Load 0x0,0xe
0cab 180f | | Execute Package,Field_Execute,Field_Number 0xf
0cac 0092 129f | | Action Push_String_Extended,0x129f ; "Copy_Files_To_Tape"
0cae e00e | | Load 0x0,0xe
0caf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0cb0 a5fc | | Store_Unchecked 0x2,-0x4
0cb1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0cb2 0000 0000 | | .XXX[0x2]
0cb4 0000 0000 | | .LITERAL {0x00000000, 0x00008197}
0cb8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0cbc 0000 0000 | | .BLANK 0000[0x4]
0cc0 ; --------------------------------------------------------------------------------------
0cc0 ; SUBPROGRAM
0cc0 ; --------------------------------------------------------------------------------------
0cc0 0cc8 | | .CONST 0x0cc8 ; Address of begin
0cc1 0cd1 | | .CONST 0x0cd1 ; Address of exception handler
0cc2 0002 | | .CONST 0x0002 ; Number of locals
0cc3 INIT_0cc0:
0cc3 e012 | | Load 0x0,0x12
0cc4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cc5 02c7 | | Declare_Variable Any
0cc6 00d8 | | Load_Top At_Offset_0
0cc7 1c00 | | Execute_Immediate Run_Utility,0x0
0cc8 BODY_0cc0:
0cc8 00d8 | | Load_Top At_Offset_0
0cc9 600e |` | Indirect_Literal Discrete,0xcd8,{0x00000000, 0x0000820b}
0cca e00d | | Load 0x0,0xd
0ccb 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0ccc 00db | | Load_Top At_Offset_3
0ccd e01e | | Load 0x0,0x1e
0cce 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ccf c5ff | | Store 0x2,-0x1
0cd0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cd1 TRAP_0cc0:
0cd1 0007 | | Action Break_Optional
0cd2 00d9 | | Load_Top At_Offset_1
0cd3 0092 12a0 | | Action Push_String_Extended,0x12a0 ; "Close_Tape_For_Output"
0cd5 e00e | | Load 0x0,0xe
0cd6 180f | | Execute Package,Field_Execute,Field_Number 0xf
0cd7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cd8 0000 0000 | | .LITERAL {0x00000000, 0x0000820b}
0cdc 0000 0000 | | .BLANK 0000[0x4]
0ce0 ; --------------------------------------------------------------------------------------
0ce0 ; SUBPROGRAM
0ce0 ; --------------------------------------------------------------------------------------
0ce0 0ce3 | | .CONST 0x0ce3 ; Address of begin
0ce1 0004 | | .CONST 0x0004 ; Address of exception handler
0ce2 0001 | | .CONST 0x0001 ; Number of locals
0ce3 BODY_0ce0:
0ce3 INIT_0ce0:
0ce3 00da | | Load_Top At_Offset_2
0ce4 01db | | Execute Vector,Length
0ce5 6802 |h | Jump_Zero 0xce8
0ce6 00da | | Load_Top At_Offset_2
0ce7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ce8 e5fd | | Load 0x2,-0x3
0ce9 e5fe | | Load 0x2,-0x2
0cea e015 | | Load 0x0,0x15
0ceb 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0cec 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0ced 0000 0000 | | .XXX[0x3]
0cef 0000 | |
0cf0 ; --------------------------------------------------------------------------------------
0cf0 ; SUBPROGRAM
0cf0 ; --------------------------------------------------------------------------------------
0cf0 0cf7 | | .CONST 0x0cf7 ; Address of begin
0cf1 0004 | | .CONST 0x0004 ; Address of exception handler
0cf2 0002 | | .CONST 0x0002 ; Number of locals
0cf3 INIT_0cf0:
0cf3 e5fc | | Load 0x2,-0x4
0cf4 e404 | | Load 0x2,0x4
0cf5 e00c | | Load 0x0,0xc
0cf6 1870 | p | Execute Package,Field_Execute,Field_Number 0x70
0cf7 BODY_0cf0:
0cf7 4800 |H | Short_Literal 0x0
0cf8 00d9 | | Load_Top At_Offset_1
0cf9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0cfa e00d | | Load 0x0,0xd
0cfb 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0cfc 680a |h | Jump_Zero 0xd07
0cfd e00d | | Load 0x0,0xd
0cfe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0cff e5fc | | Load 0x2,-0x4
0d00 00da | | Load_Top At_Offset_2
0d01 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d02 e5ff | | Load 0x2,-0x1
0d03 e010 | | Load 0x0,0x10
0d04 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d05 c5fb | | Store 0x2,-0x5
0d06 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d07 e012 | | Load 0x0,0x12
0d08 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d09 4801 |H | Short_Literal 0x1
0d0a 4801 |H | Short_Literal 0x1
0d0b e013 | | Load 0x0,0x13
0d0c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d0d 035b | [ | Declare_Type Array,Constrained
0d0e 0337 | 7 | Declare_Variable Array
0d0f e404 | | Load 0x2,0x4
0d10 e016 | | Load 0x0,0x16
0d11 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0d12 e013 | | Load 0x0,0x13
0d13 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d14 0119 | | Execute Any,Check_In_Formal_Type
0d15 4801 |H | Short_Literal 0x1
0d16 00da | | Load_Top At_Offset_2
0d17 01d6 | | Execute Vector,Field_Write
0d18 600b |` | Indirect_Literal Discrete,0xd24,{0x00000000, 0x000081e3}
0d19 e00d | | Load 0x0,0xd
0d1a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d1b e013 | | Load 0x0,0x13
0d1c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0d1d 6006 |` | Indirect_Literal Discrete,0xd24,{0x00000000, 0x000081e3}
0d1e e00d | | Load 0x0,0xd
0d1f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d20 a5fb | | Store_Unchecked 0x2,-0x5
0d21 00cc | | Action Pop_Block
0d22 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0d23 0000 | | .XXX[0x1]
0d24 0000 0000 | | .LITERAL {0x00000000, 0x000081e3}
0d28 ; --------------------------------------------------------------------------------------
0d28 ; SUBPROGRAM
0d28 ; --------------------------------------------------------------------------------------
0d28 0d3d | = | .CONST 0x0d3d ; Address of begin
0d29 0dca | | .CONST 0x0dca ; Address of exception handler
0d2a 0004 | | .CONST 0x0004 ; Number of locals
0d2b INIT_0d28:
0d2b e5f5 | | Load 0x2,-0xb
0d2c 00d8 | | Load_Top At_Offset_0
0d2d e5f6 | | Load 0x2,-0xa
0d2e e402 | | Load 0x2,0x2
0d2f e015 | | Load 0x0,0x15
0d30 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0d31 e015 | | Load 0x0,0x15
0d32 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0d33 e5f5 | | Load 0x2,-0xb
0d34 00d9 | | Load_Top At_Offset_1
0d35 e015 | | Load 0x0,0x15
0d36 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0d37 e011 | | Load 0x0,0x11
0d38 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d39 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0d3a 02c7 | | Declare_Variable Any
0d3b 00d8 | | Load_Top At_Offset_0
0d3c 1c00 | | Execute_Immediate Run_Utility,0x0
0d3d BODY_0d28:
0d3d 4800 |H | Short_Literal 0x0
0d3e 00db | | Load_Top At_Offset_3
0d3f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0d40 e00d | | Load 0x0,0xd
0d41 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0d42 7005 |p | Jump_Nonzero 0xd48
0d43 00da | | Load_Top At_Offset_2
0d44 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0d45 a5f4 | | Store_Unchecked 0x2,-0xc
0d46 00cc | | Action Pop_Block
0d47 450c |E | Exit_Suprogram New_Top_Offset 0xc
0d48 00da | | Load_Top At_Offset_2
0d49 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0d4a 7017 |p | Jump_Nonzero 0xd62
0d4b e5f5 | | Load 0x2,-0xb
0d4c 4801 |H | Short_Literal 0x1
0d4d 4801 |H | Short_Literal 0x1
0d4e e013 | | Load 0x0,0x13
0d4f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0d50 035b | [ | Declare_Type Array,Constrained
0d51 0337 | 7 | Declare_Variable Array
0d52 00ea | | Load_Encached Null_String_Cache
0d53 e013 | | Load 0x0,0x13
0d54 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0d55 e013 | | Load 0x0,0x13
0d56 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0d57 0119 | | Execute Any,Check_In_Formal_Type
0d58 4801 |H | Short_Literal 0x1
0d59 00da | | Load_Top At_Offset_2
0d5a 01d6 | | Execute Vector,Field_Write
0d5b 607c |`| | Indirect_Literal Discrete,0xdd8,{0x00000000, 0x000081df}
0d5c e00d | | Load 0x0,0xd
0d5d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0d5e 4800 |H | Short_Literal 0x0
0d5f a5f4 | | Store_Unchecked 0x2,-0xc
0d60 00cc | | Action Pop_Block
0d61 450c |E | Exit_Suprogram New_Top_Offset 0xc
0d62 e011 | | Load 0x0,0x11
0d63 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d64 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0d65 c604 | | Store 0x3,0x4
0d66 00d8 | | Load_Top At_Offset_0
0d67 00db | | Load_Top At_Offset_3
0d68 8241 | A | Call 0x1,0x41
0d69 c604 | | Store 0x3,0x4
0d6a 4801 |H | Short_Literal 0x1
0d6b 00db | | Load_Top At_Offset_3
0d6c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0d6d 01d5 | | Execute Vector,Field_Reference
0d6e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0d6f c406 | | Store 0x2,0x6
0d70 e5f5 | | Load 0x2,-0xb
0d71 e406 | | Load 0x2,0x6
0d72 e015 | | Load 0x0,0x15
0d73 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0d74 e403 | | Load 0x2,0x3
0d75 017d | } | Execute Record,Structure_Write
0d76 e5f5 | | Load 0x2,-0xb
0d77 4800 |H | Short_Literal 0x0
0d78 e406 | | Load 0x2,0x6
0d79 e016 | | Load 0x0,0x16
0d7a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0d7b c407 | | Store 0x2,0x7
0d7c e5f5 | | Load 0x2,-0xb
0d7d e407 | | Load 0x2,0x7
0d7e e016 | | Load 0x0,0x16
0d7f 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0d80 a409 | | Store_Unchecked 0x2,0x9
0d81 e5f8 | | Load 0x2,-0x8
0d82 702b |p+ | Jump_Nonzero 0xdae
0d83 e00d | | Load 0x0,0xd
0d84 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d85 e405 | | Load 0x2,0x5
0d86 e5f5 | | Load 0x2,-0xb
0d87 e5fa | | Load 0x2,-0x6
0d88 e010 | | Load 0x0,0x10
0d89 180d | | Execute Package,Field_Execute,Field_Number 0xd
0d8a c405 | | Store 0x2,0x5
0d8b c408 | | Store 0x2,0x8
0d8c 4800 |H | Short_Literal 0x0
0d8d e408 | | Load 0x2,0x8
0d8e e00d | | Load 0x0,0xd
0d8f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0d90 7004 |p | Jump_Nonzero 0xd95
0d91 e408 | | Load 0x2,0x8
0d92 a5f4 | | Store_Unchecked 0x2,-0xc
0d93 00cc | | Action Pop_Block
0d94 450c |E | Exit_Suprogram New_Top_Offset 0xc
0d95 e012 | | Load 0x0,0x12
0d96 180e | | Execute Package,Field_Execute,Field_Number 0xe
0d97 4802 |H | Short_Literal 0x2
0d98 0092 12a1 | | Action Push_String_Extended,0x12a1 ; "Writing units into the build list file"
0d9a e014 | | Load 0x0,0x14
0d9b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0d9c e00d | | Load 0x0,0xd
0d9d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d9e e405 | | Load 0x2,0x5
0d9f e5f5 | | Load 0x2,-0xb
0da0 e602 | | Load 0x3,0x2
0da1 e5fa | | Load 0x2,-0x6
0da2 8230 | 0 | Call 0x1,0x30
0da3 c405 | | Store 0x2,0x5
0da4 c408 | | Store 0x2,0x8
0da5 4800 |H | Short_Literal 0x0
0da6 e408 | | Load 0x2,0x8
0da7 e00d | | Load 0x0,0xd
0da8 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0da9 7004 |p | Jump_Nonzero 0xdae
0daa e408 | | Load 0x2,0x8
0dab a5f4 | | Store_Unchecked 0x2,-0xc
0dac 00cc | | Action Pop_Block
0dad 450c |E | Exit_Suprogram New_Top_Offset 0xc
0dae e00d | | Load 0x0,0xd
0daf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0db0 e5f5 | | Load 0x2,-0xb
0db1 e409 | | Load 0x2,0x9
0db2 e407 | | Load 0x2,0x7
0db3 e403 | | Load 0x2,0x3
0db4 e5f9 | | Load 0x2,-0x7
0db5 e5fd | | Load 0x2,-0x3
0db6 e603 | | Load 0x3,0x3
0db7 e5f7 | | Load 0x2,-0x9
0db8 e5f8 | | Load 0x2,-0x8
0db9 e5fe | | Load 0x2,-0x2
0dba e604 | | Load 0x3,0x4
0dbb e602 | | Load 0x3,0x2
0dbc e5fb | | Load 0x2,-0x5
0dbd e5fc | | Load 0x2,-0x4
0dbe 8240 | @ | Call 0x1,0x40
0dbf c5f4 | | Store 0x2,-0xc
0dc0 4800 |H | Short_Literal 0x0
0dc1 e408 | | Load 0x2,0x8
0dc2 e00d | | Load 0x0,0xd
0dc3 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0dc4 7004 |p | Jump_Nonzero 0xdc9
0dc5 e408 | | Load 0x2,0x8
0dc6 a5f4 | | Store_Unchecked 0x2,-0xc
0dc7 00cc | | Action Pop_Block
0dc8 450c |E | Exit_Suprogram New_Top_Offset 0xc
0dc9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0dca TRAP_0d28:
0dca 0007 | | Action Break_Optional
0dcb e5f5 | | Load 0x2,-0xb
0dcc 0092 12a2 | | Action Push_String_Extended,0x12a2 ; "Build_Script"
0dce e00e | | Load 0x0,0xe
0dcf 180f | | Execute Package,Field_Execute,Field_Number 0xf
0dd0 0092 12a2 | | Action Push_String_Extended,0x12a2 ; "Build_Script"
0dd2 e00e | | Load 0x0,0xe
0dd3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0dd4 a5f4 | | Store_Unchecked 0x2,-0xc
0dd5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0dd6 0000 0000 | | .XXX[0x2]
0dd8 0000 0000 | | .LITERAL {0x00000000, 0x000081df}
0ddc 0000 0000 | | .BLANK 0000[0x4]
0de0 ; --------------------------------------------------------------------------------------
0de0 ; SUBPROGRAM
0de0 ; --------------------------------------------------------------------------------------
0de0 0df0 | | .CONST 0x0df0 ; Address of begin
0de1 0e19 | | .CONST 0x0e19 ; Address of exception handler
0de2 0004 | | .CONST 0x0004 ; Number of locals
0de3 INIT_0de0:
0de3 e5fd | | Load 0x2,-0x3
0de4 4800 |H | Short_Literal 0x0
0de5 e5ff | | Load 0x2,-0x1
0de6 e015 | | Load 0x0,0x15
0de7 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0de8 e011 | | Load 0x0,0x11
0de9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0dea 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0deb 02c7 | | Declare_Variable Any
0dec 00d8 | | Load_Top At_Offset_0
0ded 1c00 | | Execute_Immediate Run_Utility,0x0
0dee 029f 1213 | | Declare_Subprogram INIT_1210,For_Call
0df0 BODY_0de0:
0df0 4800 |H | Short_Literal 0x0
0df1 00db | | Load_Top At_Offset_3
0df2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0df3 e00d | | Load 0x0,0xd
0df4 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0df5 7005 |p | Jump_Nonzero 0xdfb
0df6 00da | | Load_Top At_Offset_2
0df7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0df8 a5fc | | Store_Unchecked 0x2,-0x4
0df9 00cc | | Action Pop_Block
0dfa 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0dfb 00da | | Load_Top At_Offset_2
0dfc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0dfd 7002 |p | Jump_Nonzero 0xe00
0dfe 00cc | | Action Pop_Block
0dff 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0e00 4801 |H | Short_Literal 0x1
0e01 00db | | Load_Top At_Offset_3
0e02 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0e03 01d5 | | Execute Vector,Field_Reference
0e04 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0e05 c405 | | Store 0x2,0x5
0e06 e5fd | | Load 0x2,-0x3
0e07 e405 | | Load 0x2,0x5
0e08 e015 | | Load 0x0,0x15
0e09 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0e0a e403 | | Load 0x2,0x3
0e0b 017d | } | Execute Record,Structure_Write
0e0c e5fd | | Load 0x2,-0x3
0e0d 4800 |H | Short_Literal 0x0
0e0e e405 | | Load 0x2,0x5
0e0f e016 | | Load 0x0,0x16
0e10 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0e11 c406 | | Store 0x2,0x6
0e12 e5fd | | Load 0x2,-0x3
0e13 e406 | | Load 0x2,0x6
0e14 e016 | | Load 0x0,0x16
0e15 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0e16 a407 | | Store_Unchecked 0x2,0x7
0e17 8604 | | Call 0x3,0x4
0e18 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e19 TRAP_0de0:
0e19 0007 | | Action Break_Optional
0e1a e5fd | | Load 0x2,-0x3
0e1b 0092 12a3 | | Action Push_String_Extended,0x12a3 ; "Upload_Associated_Files"
0e1d e00e | | Load 0x0,0xe
0e1e 180f | | Execute Package,Field_Execute,Field_Number 0xf
0e1f 0092 12a3 | | Action Push_String_Extended,0x12a3 ; "Upload_Associated_Files"
0e21 e00e | | Load 0x0,0xe
0e22 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e23 a5fc | | Store_Unchecked 0x2,-0x4
0e24 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e25 0000 0000 | | .XXX[0x3]
0e27 0000 | |
0e28 ; --------------------------------------------------------------------------------------
0e28 ; SUBPROGRAM
0e28 ; --------------------------------------------------------------------------------------
0e28 0e33 | 3 | .CONST 0x0e33 ; Address of begin
0e29 0e4f | O | .CONST 0x0e4f ; Address of exception handler
0e2a 0002 | | .CONST 0x0002 ; Number of locals
0e2b INIT_0e28:
0e2b e5fc | | Load 0x2,-0x4
0e2c 00d8 | | Load_Top At_Offset_0
0e2d e5fd | | Load 0x2,-0x3
0e2e e402 | | Load 0x2,0x2
0e2f e015 | | Load 0x0,0x15
0e30 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0e31 e015 | | Load 0x0,0x15
0e32 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0e33 BODY_0e28:
0e33 4800 |H | Short_Literal 0x0
0e34 00d9 | | Load_Top At_Offset_1
0e35 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0e36 e00d | | Load 0x0,0xd
0e37 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0e38 7005 |p | Jump_Nonzero 0xe3e
0e39 00d8 | | Load_Top At_Offset_0
0e3a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0e3b a5fb | | Store_Unchecked 0x2,-0x5
0e3c 00cc | | Action Pop_Block
0e3d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e3e e00d | | Load 0x0,0xd
0e3f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e40 e5fc | | Load 0x2,-0x4
0e41 00da | | Load_Top At_Offset_2
0e42 e015 | | Load 0x0,0x15
0e43 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0e44 c403 | | Store 0x2,0x3
0e45 4800 |H | Short_Literal 0x0
0e46 e403 | | Load 0x2,0x3
0e47 e00d | | Load 0x0,0xd
0e48 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0e49 7004 |p | Jump_Nonzero 0xe4e
0e4a e403 | | Load 0x2,0x3
0e4b a5fb | | Store_Unchecked 0x2,-0x5
0e4c 00cc | | Action Pop_Block
0e4d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0e4e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e4f TRAP_0e28:
0e4f 0007 | | Action Break_Optional
0e50 e5fc | | Load 0x2,-0x4
0e51 0092 12a4 | | Action Push_String_Extended,0x12a4 ; "Show_Build_State"
0e53 e00e | | Load 0x0,0xe
0e54 180f | | Execute Package,Field_Execute,Field_Number 0xf
0e55 0092 12a4 | | Action Push_String_Extended,0x12a4 ; "Show_Build_State"
0e57 e00e | | Load 0x0,0xe
0e58 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e59 a5fb | | Store_Unchecked 0x2,-0x5
0e5a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e5b 0000 0000 | | .BLANK 0000[0x5]
0e60 ; --------------------------------------------------------------------------------------
0e60 ; SUBPROGRAM
0e60 ; --------------------------------------------------------------------------------------
0e60 0e71 | q | .CONST 0x0e71 ; Address of begin
0e61 0004 | | .CONST 0x0004 ; Address of exception handler
0e62 0004 | | .CONST 0x0004 ; Number of locals
0e63 INIT_0e60:
0e63 e5fd | | Load 0x2,-0x3
0e64 e00f | | Load 0x0,0xf
0e65 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0e66 e00f | | Load 0x0,0xf
0e67 18ce | | Execute Package,Field_Execute,Field_Number 0xce
0e68 e5fd | | Load 0x2,-0x3
0e69 e00f | | Load 0x0,0xf
0e6a 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0e6b e00f | | Load 0x0,0xf
0e6c 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
0e6d e5fc | | Load 0x2,-0x4
0e6e e5fe | | Load 0x2,-0x2
0e6f e5fd | | Load 0x2,-0x3
0e70 8236 | 6 | Call 0x1,0x36
0e71 BODY_0e60:
0e71 e00d | | Load 0x0,0xd
0e72 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e73 e5fc | | Load 0x2,-0x4
0e74 e602 | | Load 0x3,0x2
0e75 e5ff | | Load 0x2,-0x1
0e76 e010 | | Load 0x0,0x10
0e77 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e78 c5fb | | Store 0x2,-0x5
0e79 e00d | | Load 0x0,0xd
0e7a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e7b e5fc | | Load 0x2,-0x4
0e7c 00da | | Load_Top At_Offset_2
0e7d e5ff | | Load 0x2,-0x1
0e7e e010 | | Load 0x0,0x10
0e7f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e80 c5fb | | Store 0x2,-0x5
0e81 e00d | | Load 0x0,0xd
0e82 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0e83 e5fc | | Load 0x2,-0x4
0e84 00db | | Load_Top At_Offset_3
0e85 e5ff | | Load 0x2,-0x1
0e86 e010 | | Load 0x0,0x10
0e87 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0e88 c5fb | | Store 0x2,-0x5
0e89 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e8a 0000 0000 | | .BLANK 0000[0x6]
0e90 ; --------------------------------------------------------------------------------------
0e90 ; SUBPROGRAM
0e90 ; --------------------------------------------------------------------------------------
0e90 0e97 | | .CONST 0x0e97 ; Address of begin
0e91 0ef3 | | .CONST 0x0ef3 ; Address of exception handler
0e92 0002 | | .CONST 0x0002 ; Number of locals
0e93 INIT_0e90:
0e93 e5fc | | Load 0x2,-0x4
0e94 e5ff | | Load 0x2,-0x1
0e95 e015 | | Load 0x0,0x15
0e96 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0e97 BODY_0e90:
0e97 4800 |H | Short_Literal 0x0
0e98 00d9 | | Load_Top At_Offset_1
0e99 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0e9a e00d | | Load 0x0,0xd
0e9b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0e9c 7005 |p | Jump_Nonzero 0xea2
0e9d 00d8 | | Load_Top At_Offset_0
0e9e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0e9f a5fb | | Store_Unchecked 0x2,-0x5
0ea0 00cc | | Action Pop_Block
0ea1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0ea2 00d8 | | Load_Top At_Offset_0
0ea3 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0ea4 7002 |p | Jump_Nonzero 0xea7
0ea5 00cc | | Action Pop_Block
0ea6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0ea7 4801 |H | Short_Literal 0x1
0ea8 00d9 | | Load_Top At_Offset_1
0ea9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0eaa 01d5 | | Execute Vector,Field_Reference
0eab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0eac c403 | | Store 0x2,0x3
0ead e5fc | | Load 0x2,-0x4
0eae e403 | | Load 0x2,0x3
0eaf e015 | | Load 0x0,0x15
0eb0 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0eb1 e406 | | Load 0x2,0x6
0eb2 017d | } | Execute Record,Structure_Write
0eb3 e5fc | | Load 0x2,-0x4
0eb4 4800 |H | Short_Literal 0x0
0eb5 e403 | | Load 0x2,0x3
0eb6 e016 | | Load 0x0,0x16
0eb7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0eb8 c404 | | Store 0x2,0x4
0eb9 e5fc | | Load 0x2,-0x4
0eba e404 | | Load 0x2,0x4
0ebb e016 | | Load 0x0,0x16
0ebc 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0ebd a407 | | Store_Unchecked 0x2,0x7
0ebe e5fd | | Load 0x2,-0x3
0ebf 701d |p | Jump_Nonzero 0xedd
0ec0 e00d | | Load 0x0,0xd
0ec1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ec2 e402 | | Load 0x2,0x2
0ec3 0120 | | Execute Any,Is_Value
0ec4 6803 |h | Jump_Zero 0xec8
0ec5 e004 | | Load 0x0,0x4
0ec6 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0ec7 7801 |x | Jump 0xec9
0ec8 e402 | | Load 0x2,0x2
0ec9 e5fc | | Load 0x2,-0x4
0eca e404 | | Load 0x2,0x4
0ecb e5fc | | Load 0x2,-0x4
0ecc e602 | | Load 0x3,0x2
0ecd e5fe | | Load 0x2,-0x2
0ece 8254 | T | Call 0x1,0x54
0ecf e407 | | Load 0x2,0x7
0ed0 e406 | | Load 0x2,0x6
0ed1 8229 | ) | Call 0x1,0x29
0ed2 c402 | | Store 0x2,0x2
0ed3 c405 | | Store 0x2,0x5
0ed4 4800 |H | Short_Literal 0x0
0ed5 e405 | | Load 0x2,0x5
0ed6 e00d | | Load 0x0,0xd
0ed7 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0ed8 7004 |p | Jump_Nonzero 0xedd
0ed9 e405 | | Load 0x2,0x5
0eda a5fb | | Store_Unchecked 0x2,-0x5
0edb 00cc | | Action Pop_Block
0edc 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0edd e00d | | Load 0x0,0xd
0ede 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0edf e5fc | | Load 0x2,-0x4
0ee0 e406 | | Load 0x2,0x6
0ee1 e402 | | Load 0x2,0x2
0ee2 e5fd | | Load 0x2,-0x3
0ee3 e602 | | Load 0x3,0x2
0ee4 e22b | + | Load 0x1,0x2b
0ee5 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0ee6 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0ee7 8003 | | Call 0x0,0x3
0ee8 c405 | | Store 0x2,0x5
0ee9 4800 |H | Short_Literal 0x0
0eea e405 | | Load 0x2,0x5
0eeb e00d | | Load 0x0,0xd
0eec 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0eed 7004 |p | Jump_Nonzero 0xef2
0eee e405 | | Load 0x2,0x5
0eef a5fb | | Store_Unchecked 0x2,-0x5
0ef0 00cc | | Action Pop_Block
0ef1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0ef2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ef3 TRAP_0e90:
0ef3 0007 | | Action Break_Optional
0ef4 e5fc | | Load 0x2,-0x4
0ef5 0092 12a5 | | Action Push_String_Extended,0x12a5 ; "Transfer_Units"
0ef7 e00e | | Load 0x0,0xe
0ef8 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ef9 0092 12a5 | | Action Push_String_Extended,0x12a5 ; "Transfer_Units"
0efb e00e | | Load 0x0,0xe
0efc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0efd a5fb | | Store_Unchecked 0x2,-0x5
0efe 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0eff 0000 | | .XXX[0x1]
0f00 ; --------------------------------------------------------------------------------------
0f00 ; SUBPROGRAM
0f00 ; --------------------------------------------------------------------------------------
0f00 0f0b | | .CONST 0x0f0b ; Address of begin
0f01 0004 | | .CONST 0x0004 ; Address of exception handler
0f02 0002 | | .CONST 0x0002 ; Number of locals
0f03 INIT_0f00:
0f03 e5fc | | Load 0x2,-0x4
0f04 e5fd | | Load 0x2,-0x3
0f05 4803 |H | Short_Literal 0x3
0f06 e5fe | | Load 0x2,-0x2
0f07 e00f | | Load 0x0,0xf
0f08 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0f09 e00f | | Load 0x0,0xf
0f0a 18dc | | Execute Package,Field_Execute,Field_Number 0xdc
0f0b BODY_0f00:
0f0b 00d8 | | Load_Top At_Offset_0
0f0c 00cb | | Action Pop_Block_With_Result
0f0d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0f0e 0000 0000 | | .XXX[0x2]
0f10 ; --------------------------------------------------------------------------------------
0f10 ; SUBPROGRAM
0f10 ; --------------------------------------------------------------------------------------
0f10 0f1b | | .CONST 0x0f1b ; Address of begin
0f11 0004 | | .CONST 0x0004 ; Address of exception handler
0f12 0002 | | .CONST 0x0002 ; Number of locals
0f13 INIT_0f10:
0f13 e5fc | | Load 0x2,-0x4
0f14 e5fd | | Load 0x2,-0x3
0f15 4803 |H | Short_Literal 0x3
0f16 e5fe | | Load 0x2,-0x2
0f17 e00f | | Load 0x0,0xf
0f18 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0f19 e00f | | Load 0x0,0xf
0f1a 18dd | | Execute Package,Field_Execute,Field_Number 0xdd
0f1b BODY_0f10:
0f1b 00d8 | | Load_Top At_Offset_0
0f1c 00cb | | Action Pop_Block_With_Result
0f1d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0f1e 0000 0000 | | .XXX[0x2]
0f20 ; --------------------------------------------------------------------------------------
0f20 ; SUBPROGRAM
0f20 ; --------------------------------------------------------------------------------------
0f20 0f2a | * | .CONST 0x0f2a ; Address of begin
0f21 0004 | | .CONST 0x0004 ; Address of exception handler
0f22 0002 | | .CONST 0x0002 ; Number of locals
0f23 INIT_0f20:
0f23 e5ff | | Load 0x2,-0x1
0f24 e00f | | Load 0x0,0xf
0f25 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0f26 e5fa | | Load 0x2,-0x6
0f27 00ea | | Load_Encached Null_String_Cache
0f28 e00f | | Load 0x0,0xf
0f29 18df | | Execute Package,Field_Execute,Field_Number 0xdf
0f2a BODY_0f20:
0f2a e402 | | Load 0x2,0x2
0f2b 01db | | Execute Vector,Length
0f2c 7013 |p | Jump_Nonzero 0xf40
0f2d 00d8 | | Load_Top At_Offset_0
0f2e 01db | | Execute Vector,Length
0f2f 7003 |p | Jump_Nonzero 0xf33
0f30 00ea | | Load_Encached Null_String_Cache
0f31 00cb | | Action Pop_Block_With_Result
0f32 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
0f33 e5fc | | Load 0x2,-0x4
0f34 e5ff | | Load 0x2,-0x1
0f35 e00f | | Load 0x0,0xf
0f36 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0f37 e00f | | Load 0x0,0xf
0f38 18d1 | | Execute Package,Field_Execute,Field_Number 0xd1
0f39 01cc | | Execute Vector,Catenate
0f3a e5fb | | Load 0x2,-0x5
0f3b 01cc | | Execute Vector,Catenate
0f3c 00d9 | | Load_Top At_Offset_1
0f3d 01cc | | Execute Vector,Catenate
0f3e 00cb | | Action Pop_Block_With_Result
0f3f 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
0f40 00d8 | | Load_Top At_Offset_0
0f41 01db | | Execute Vector,Length
0f42 7003 |p | Jump_Nonzero 0xf46
0f43 e402 | | Load 0x2,0x2
0f44 00cb | | Action Pop_Block_With_Result
0f45 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
0f46 e402 | | Load 0x2,0x2
0f47 e5fb | | Load 0x2,-0x5
0f48 01cc | | Execute Vector,Catenate
0f49 e5fc | | Load 0x2,-0x4
0f4a 01cc | | Execute Vector,Catenate
0f4b e5ff | | Load 0x2,-0x1
0f4c e00f | | Load 0x0,0xf
0f4d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0f4e e00f | | Load 0x0,0xf
0f4f 18d1 | | Execute Package,Field_Execute,Field_Number 0xd1
0f50 01cc | | Execute Vector,Catenate
0f51 e5fb | | Load 0x2,-0x5
0f52 01cc | | Execute Vector,Catenate
0f53 00d9 | | Load_Top At_Offset_1
0f54 01cc | | Execute Vector,Catenate
0f55 00cb | | Action Pop_Block_With_Result
0f56 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
0f57 0000 | | .XXX[0x1]
0f58 ; --------------------------------------------------------------------------------------
0f58 ; SUBPROGRAM
0f58 ; --------------------------------------------------------------------------------------
0f58 0f69 | i | .CONST 0x0f69 ; Address of begin
0f59 0004 | | .CONST 0x0004 ; Address of exception handler
0f5a 0004 | | .CONST 0x0004 ; Number of locals
0f5b INIT_0f58:
0f5b e5fd | | Load 0x2,-0x3
0f5c e00f | | Load 0x0,0xf
0f5d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0f5e e00f | | Load 0x0,0xf
0f5f 18cc | | Execute Package,Field_Execute,Field_Number 0xcc
0f60 e5fd | | Load 0x2,-0x3
0f61 e00f | | Load 0x0,0xf
0f62 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0f63 e00f | | Load 0x0,0xf
0f64 18cd | | Execute Package,Field_Execute,Field_Number 0xcd
0f65 e5fc | | Load 0x2,-0x4
0f66 e5fe | | Load 0x2,-0x2
0f67 e5fd | | Load 0x2,-0x3
0f68 8232 | 2 | Call 0x1,0x32
0f69 BODY_0f58:
0f69 e00d | | Load 0x0,0xd
0f6a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f6b e5fc | | Load 0x2,-0x4
0f6c e602 | | Load 0x3,0x2
0f6d e5ff | | Load 0x2,-0x1
0f6e e010 | | Load 0x0,0x10
0f6f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f70 c5fb | | Store 0x2,-0x5
0f71 e00d | | Load 0x0,0xd
0f72 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f73 e5fc | | Load 0x2,-0x4
0f74 00da | | Load_Top At_Offset_2
0f75 e5ff | | Load 0x2,-0x1
0f76 e010 | | Load 0x0,0x10
0f77 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f78 c5fb | | Store 0x2,-0x5
0f79 e00d | | Load 0x0,0xd
0f7a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0f7b e5fc | | Load 0x2,-0x4
0f7c 00db | | Load_Top At_Offset_3
0f7d e5ff | | Load 0x2,-0x1
0f7e e010 | | Load 0x0,0x10
0f7f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0f80 c5fb | | Store 0x2,-0x5
0f81 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0f82 0000 0000 | | .BLANK 0000[0x6]
0f88 ; --------------------------------------------------------------------------------------
0f88 ; SUBPROGRAM
0f88 ; --------------------------------------------------------------------------------------
0f88 0f95 | | .CONST 0x0f95 ; Address of begin
0f89 0004 | | .CONST 0x0004 ; Address of exception handler
0f8a 0003 | | .CONST 0x0003 ; Number of locals
0f8b INIT_0f88:
0f8b e5fa | | Load 0x2,-0x6
0f8c e5fc | | Load 0x2,-0x4
0f8d e403 | | Load 0x2,0x3
0f8e e020 | | Load 0x0,0x20
0f8f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0f90 e5fa | | Load 0x2,-0x6
0f91 e5fc | | Load 0x2,-0x4
0f92 e403 | | Load 0x2,0x3
0f93 e020 | | Load 0x0,0x20
0f94 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0f95 BODY_0f88:
0f95 4800 |H | Short_Literal 0x0
0f96 00da | | Load_Top At_Offset_2
0f97 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0f98 e00d | | Load 0x0,0xd
0f99 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0f9a 701c |p | Jump_Nonzero 0xfb7
0f9b e012 | | Load 0x0,0x12
0f9c 180e | | Execute Package,Field_Execute,Field_Number 0xe
0f9d 4801 |H | Short_Literal 0x1
0f9e 4801 |H | Short_Literal 0x1
0f9f e013 | | Load 0x0,0x13
0fa0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0fa1 035b | [ | Declare_Type Array,Constrained
0fa2 0337 | 7 | Declare_Variable Array
0fa3 e402 | | Load 0x2,0x2
0fa4 e016 | | Load 0x0,0x16
0fa5 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0fa6 e013 | | Load 0x0,0x13
0fa7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fa8 0119 | | Execute Any,Check_In_Formal_Type
0fa9 4801 |H | Short_Literal 0x1
0faa 00da | | Load_Top At_Offset_2
0fab 01d6 | | Execute Vector,Field_Write
0fac 6097 |` | Indirect_Literal Discrete,0x1044,{0x00000000, 0x000081e4}
0fad e00d | | Load 0x0,0xd
0fae 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0faf e013 | | Load 0x0,0x13
0fb0 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0fb1 6092 |` | Indirect_Literal Discrete,0x1044,{0x00000000, 0x000081e4}
0fb2 e00d | | Load 0x0,0xd
0fb3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0fb4 a5f9 | | Store_Unchecked 0x2,-0x7
0fb5 00cc | | Action Pop_Block
0fb6 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0fb7 4800 |H | Short_Literal 0x0
0fb8 00d9 | | Load_Top At_Offset_1
0fb9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0fba e00d | | Load 0x0,0xd
0fbb 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0fbc 701c |p | Jump_Nonzero 0xfd9
0fbd e012 | | Load 0x0,0x12
0fbe 180e | | Execute Package,Field_Execute,Field_Number 0xe
0fbf 4801 |H | Short_Literal 0x1
0fc0 4801 |H | Short_Literal 0x1
0fc1 e013 | | Load 0x0,0x13
0fc2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0fc3 035b | [ | Declare_Type Array,Constrained
0fc4 0337 | 7 | Declare_Variable Array
0fc5 e402 | | Load 0x2,0x2
0fc6 e016 | | Load 0x0,0x16
0fc7 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0fc8 e013 | | Load 0x0,0x13
0fc9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fca 0119 | | Execute Any,Check_In_Formal_Type
0fcb 4801 |H | Short_Literal 0x1
0fcc 00da | | Load_Top At_Offset_2
0fcd 01d6 | | Execute Vector,Field_Write
0fce 6071 |`q | Indirect_Literal Discrete,0x1040,{0x00000000, 0x000081e5}
0fcf e00d | | Load 0x0,0xd
0fd0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0fd1 e013 | | Load 0x0,0x13
0fd2 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0fd3 6070 |`p | Indirect_Literal Discrete,0x1044,{0x00000000, 0x000081e4}
0fd4 e00d | | Load 0x0,0xd
0fd5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0fd6 a5f9 | | Store_Unchecked 0x2,-0x7
0fd7 00cc | | Action Pop_Block
0fd8 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0fd9 e5fd | | Load 0x2,-0x3
0fda 705d |p] | Jump_Nonzero 0x1038
0fdb e5fa | | Load 0x2,-0x6
0fdc 4801 |H | Short_Literal 0x1
0fdd 4801 |H | Short_Literal 0x1
0fde e013 | | Load 0x0,0x13
0fdf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0fe0 035b | [ | Declare_Type Array,Constrained
0fe1 0337 | 7 | Declare_Variable Array
0fe2 e402 | | Load 0x2,0x2
0fe3 e016 | | Load 0x0,0x16
0fe4 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0fe5 e013 | | Load 0x0,0x13
0fe6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0fe7 0119 | | Execute Any,Check_In_Formal_Type
0fe8 4801 |H | Short_Literal 0x1
0fe9 00da | | Load_Top At_Offset_2
0fea 01d6 | | Execute Vector,Field_Write
0feb 6050 |`P | Indirect_Literal Discrete,0x103c,{0x00000000, 0x000081fd}
0fec e00d | | Load 0x0,0xd
0fed 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0fee e00d | | Load 0x0,0xd
0fef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ff0 e5fa | | Load 0x2,-0x6
0ff1 e5fc | | Load 0x2,-0x4
0ff2 00db | | Load_Top At_Offset_3
0ff3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ff4 e602 | | Load 0x3,0x2
0ff5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0ff6 e402 | | Load 0x2,0x2
0ff7 e5ff | | Load 0x2,-0x1
0ff8 820f | | Call 0x1,0xf
0ff9 c404 | | Store 0x2,0x4
0ffa 4800 |H | Short_Literal 0x0
0ffb e404 | | Load 0x2,0x4
0ffc e00d | | Load 0x0,0xd
0ffd 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0ffe 7004 |p | Jump_Nonzero 0x1003
0fff e404 | | Load 0x2,0x4
1000 a5f9 | | Store_Unchecked 0x2,-0x7
1001 00cc | | Action Pop_Block
1002 4507 |E | Exit_Suprogram New_Top_Offset 0x7
1003 e00d | | Load 0x0,0xd
1004 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1005 e5fa | | Load 0x2,-0x6
1006 e5fc | | Load 0x2,-0x4
1007 00db | | Load_Top At_Offset_3
1008 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1009 e602 | | Load 0x3,0x2
100a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
100b e402 | | Load 0x2,0x2
100c e5ff | | Load 0x2,-0x1
100d 8210 | | Call 0x1,0x10
100e c5f9 | | Store 0x2,-0x7
100f 4800 |H | Short_Literal 0x0
1010 e404 | | Load 0x2,0x4
1011 e00d | | Load 0x0,0xd
1012 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1013 7004 |p | Jump_Nonzero 0x1018
1014 e404 | | Load 0x2,0x4
1015 a5f9 | | Store_Unchecked 0x2,-0x7
1016 00cc | | Action Pop_Block
1017 4507 |E | Exit_Suprogram New_Top_Offset 0x7
1018 e5fb | | Load 0x2,-0x5
1019 700d |p | Jump_Nonzero 0x1027
101a e00d | | Load 0x0,0xd
101b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
101c e5fa | | Load 0x2,-0x6
101d e5fc | | Load 0x2,-0x4
101e 00db | | Load_Top At_Offset_3
101f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1020 e602 | | Load 0x3,0x2
1021 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1022 e402 | | Load 0x2,0x2
1023 e5ff | | Load 0x2,-0x1
1024 820e | | Call 0x1,0xe
1025 c5f9 | | Store 0x2,-0x7
1026 7808 |x | Jump 0x102f
1027 e00d | | Load 0x0,0xd
1028 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1029 e5fa | | Load 0x2,-0x6
102a e5fc | | Load 0x2,-0x4
102b e402 | | Load 0x2,0x2
102c e5ff | | Load 0x2,-0x1
102d 8218 | | Call 0x1,0x18
102e c5f9 | | Store 0x2,-0x7
102f 4800 |H | Short_Literal 0x0
1030 e404 | | Load 0x2,0x4
1031 e00d | | Load 0x0,0xd
1032 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1033 7004 |p | Jump_Nonzero 0x1038
1034 e404 | | Load 0x2,0x4
1035 a5f9 | | Store_Unchecked 0x2,-0x7
1036 00cc | | Action Pop_Block
1037 4507 |E | Exit_Suprogram New_Top_Offset 0x7
1038 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1039 0000 0000 | | .XXX[0x3]
103b 0000 | |
103c 0000 0000 | | .LITERAL {0x00000000, 0x000081fd}
1040 0000 0000 | | .LITERAL {0x00000000, 0x000081e5}
1044 0000 0000 | | .LITERAL {0x00000000, 0x000081e4}
1048 ; --------------------------------------------------------------------------------------
1048 ; SUBPROGRAM
1048 ; --------------------------------------------------------------------------------------
1048 1055 | U | .CONST 0x1055 ; Address of begin
1049 0004 | | .CONST 0x0004 ; Address of exception handler
104a 0003 | | .CONST 0x0003 ; Number of locals
104b INIT_1048:
104b e5fb | | Load 0x2,-0x5
104c e5fe | | Load 0x2,-0x2
104d e404 | | Load 0x2,0x4
104e e020 | | Load 0x0,0x20
104f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1050 e5fb | | Load 0x2,-0x5
1051 e5fe | | Load 0x2,-0x2
1052 e404 | | Load 0x2,0x4
1053 e020 | | Load 0x0,0x20
1054 181e | | Execute Package,Field_Execute,Field_Number 0x1e
1055 BODY_1048:
1055 4800 |H | Short_Literal 0x0
1056 00da | | Load_Top At_Offset_2
1057 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
1058 e00d | | Load 0x0,0xd
1059 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
105a 701c |p | Jump_Nonzero 0x1077
105b e012 | | Load 0x0,0x12
105c 180e | | Execute Package,Field_Execute,Field_Number 0xe
105d 4801 |H | Short_Literal 0x1
105e 4801 |H | Short_Literal 0x1
105f e013 | | Load 0x0,0x13
1060 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1061 035b | [ | Declare_Type Array,Constrained
1062 0337 | 7 | Declare_Variable Array
1063 e403 | | Load 0x2,0x3
1064 e016 | | Load 0x0,0x16
1065 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1066 e013 | | Load 0x0,0x13
1067 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1068 0119 | | Execute Any,Check_In_Formal_Type
1069 4801 |H | Short_Literal 0x1
106a 00da | | Load_Top At_Offset_2
106b 01d6 | | Execute Vector,Field_Write
106c 67d7 |g | Indirect_Literal Discrete,0x1044,{0x00000000, 0x000081e4}
106d e00d | | Load 0x0,0xd
106e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
106f e013 | | Load 0x0,0x13
1070 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1071 67d2 |g | Indirect_Literal Discrete,0x1044,{0x00000000, 0x000081e4}
1072 e00d | | Load 0x0,0xd
1073 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1074 a5f9 | | Store_Unchecked 0x2,-0x7
1075 00cc | | Action Pop_Block
1076 4506 |E | Exit_Suprogram New_Top_Offset 0x6
1077 4800 |H | Short_Literal 0x0
1078 00d9 | | Load_Top At_Offset_1
1079 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
107a e00d | | Load 0x0,0xd
107b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
107c 701c |p | Jump_Nonzero 0x1099
107d e012 | | Load 0x0,0x12
107e 180e | | Execute Package,Field_Execute,Field_Number 0xe
107f 4801 |H | Short_Literal 0x1
1080 4801 |H | Short_Literal 0x1
1081 e013 | | Load 0x0,0x13
1082 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1083 035b | [ | Declare_Type Array,Constrained
1084 0337 | 7 | Declare_Variable Array
1085 e403 | | Load 0x2,0x3
1086 e016 | | Load 0x0,0x16
1087 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1088 e013 | | Load 0x0,0x13
1089 1b0e | | Execute Package,Field_Read,Field_Number 0xe
108a 0119 | | Execute Any,Check_In_Formal_Type
108b 4801 |H | Short_Literal 0x1
108c 00da | | Load_Top At_Offset_2
108d 01d6 | | Execute Vector,Field_Write
108e 67b1 |g | Indirect_Literal Discrete,0x1040,{0x00000000, 0x000081e5}
108f e00d | | Load 0x0,0xd
1090 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1091 e013 | | Load 0x0,0x13
1092 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1093 67b0 |g | Indirect_Literal Discrete,0x1044,{0x00000000, 0x000081e4}
1094 e00d | | Load 0x0,0xd
1095 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1096 a5f9 | | Store_Unchecked 0x2,-0x7
1097 00cc | | Action Pop_Block
1098 4506 |E | Exit_Suprogram New_Top_Offset 0x6
1099 e5fd | | Load 0x2,-0x3
109a 681e |h | Jump_Zero 0x10b9
109b e5fb | | Load 0x2,-0x5
109c 4801 |H | Short_Literal 0x1
109d 4802 |H | Short_Literal 0x2
109e e013 | | Load 0x0,0x13
109f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10a0 035b | [ | Declare_Type Array,Constrained
10a1 0337 | 7 | Declare_Variable Array
10a2 e403 | | Load 0x2,0x3
10a3 e016 | | Load 0x0,0x16
10a4 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
10a5 e013 | | Load 0x0,0x13
10a6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10a7 0119 | | Execute Any,Check_In_Formal_Type
10a8 4801 |H | Short_Literal 0x1
10a9 00da | | Load_Top At_Offset_2
10aa 01d6 | | Execute Vector,Field_Write
10ab 0092 12a6 | | Action Push_String_Extended,0x12a6 ; "promote"
10ad e013 | | Load 0x0,0x13
10ae 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10af e013 | | Load 0x0,0x13
10b0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10b1 0119 | | Execute Any,Check_In_Formal_Type
10b2 4802 |H | Short_Literal 0x2
10b3 00da | | Load_Top At_Offset_2
10b4 01d6 | | Execute Vector,Field_Write
10b5 609e |` | Indirect_Literal Discrete,0x1154,{0x00000000, 0x000081f6}
10b6 e00d | | Load 0x0,0xd
10b7 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
10b8 7833 |x3 | Jump 0x10ec
10b9 e5fb | | Load 0x2,-0x5
10ba 4801 |H | Short_Literal 0x1
10bb 4802 |H | Short_Literal 0x2
10bc e013 | | Load 0x0,0x13
10bd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10be 035b | [ | Declare_Type Array,Constrained
10bf 0337 | 7 | Declare_Variable Array
10c0 0092 12a7 | | Action Push_String_Extended,0x12a7 ; "compile"
10c2 e013 | | Load 0x0,0x13
10c3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
10c4 e013 | | Load 0x0,0x13
10c5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10c6 0119 | | Execute Any,Check_In_Formal_Type
10c7 4801 |H | Short_Literal 0x1
10c8 00da | | Load_Top At_Offset_2
10c9 01d6 | | Execute Vector,Field_Write
10ca e403 | | Load 0x2,0x3
10cb e016 | | Load 0x0,0x16
10cc 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
10cd e013 | | Load 0x0,0x13
10ce 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10cf 0119 | | Execute Any,Check_In_Formal_Type
10d0 4802 |H | Short_Literal 0x2
10d1 00da | | Load_Top At_Offset_2
10d2 01d6 | | Execute Vector,Field_Write
10d3 607c |`| | Indirect_Literal Discrete,0x1150,{0x00000000, 0x00008202}
10d4 e00d | | Load 0x0,0xd
10d5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
10d6 e00d | | Load 0x0,0xd
10d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
10d8 e5fa | | Load 0x2,-0x6
10d9 e5fb | | Load 0x2,-0x5
10da e5fc | | Load 0x2,-0x4
10db e603 | | Load 0x3,0x3
10dc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
10dd e602 | | Load 0x3,0x2
10de 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
10df 0092 12a6 | | Action Push_String_Extended,0x12a6 ; "promote"
10e1 e00f | | Load 0x0,0xf
10e2 18c8 | | Execute Package,Field_Execute,Field_Number 0xc8
10e3 4801 |H | Short_Literal 0x1
10e4 e00f | | Load 0x0,0xf
10e5 18c7 | | Execute Package,Field_Execute,Field_Number 0xc7
10e6 e5fe | | Load 0x2,-0x2
10e7 e403 | | Load 0x2,0x3
10e8 e021 | ! | Load 0x0,0x21
10e9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
10ea c5fa | | Store 0x2,-0x6
10eb c402 | | Store 0x2,0x2
10ec e5fb | | Load 0x2,-0x5
10ed e403 | | Load 0x2,0x3
10ee e015 | | Load 0x0,0x15
10ef 181d | | Execute Package,Field_Execute,Field_Number 0x1d
10f0 685c |h\ | Jump_Zero 0x114d
10f1 e5fd | | Load 0x2,-0x3
10f2 681e |h | Jump_Zero 0x1111
10f3 e5fb | | Load 0x2,-0x5
10f4 4801 |H | Short_Literal 0x1
10f5 4802 |H | Short_Literal 0x2
10f6 e013 | | Load 0x0,0x13
10f7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
10f8 035b | [ | Declare_Type Array,Constrained
10f9 0337 | 7 | Declare_Variable Array
10fa e403 | | Load 0x2,0x3
10fb e016 | | Load 0x0,0x16
10fc 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
10fd e013 | | Load 0x0,0x13
10fe 1b0e | | Execute Package,Field_Read,Field_Number 0xe
10ff 0119 | | Execute Any,Check_In_Formal_Type
1100 4801 |H | Short_Literal 0x1
1101 00da | | Load_Top At_Offset_2
1102 01d6 | | Execute Vector,Field_Write
1103 0092 12a8 | | Action Push_String_Extended,0x12a8 ; "link"
1105 e013 | | Load 0x0,0x13
1106 1810 | | Execute Package,Field_Execute,Field_Number 0x10
1107 e013 | | Load 0x0,0x13
1108 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1109 0119 | | Execute Any,Check_In_Formal_Type
110a 4802 |H | Short_Literal 0x2
110b 00da | | Load_Top At_Offset_2
110c 01d6 | | Execute Vector,Field_Write
110d 6046 |`F | Indirect_Literal Discrete,0x1154,{0x00000000, 0x000081f6}
110e e00d | | Load 0x0,0xd
110f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
1110 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1111 e5fb | | Load 0x2,-0x5
1112 4801 |H | Short_Literal 0x1
1113 4802 |H | Short_Literal 0x2
1114 e013 | | Load 0x0,0x13
1115 1b0f | | Execute Package,Field_Read,Field_Number 0xf
1116 035b | [ | Declare_Type Array,Constrained
1117 0337 | 7 | Declare_Variable Array
1118 0092 12a8 | | Action Push_String_Extended,0x12a8 ; "link"
111a e013 | | Load 0x0,0x13
111b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
111c e013 | | Load 0x0,0x13
111d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
111e 0119 | | Execute Any,Check_In_Formal_Type
111f 4801 |H | Short_Literal 0x1
1120 00da | | Load_Top At_Offset_2
1121 01d6 | | Execute Vector,Field_Write
1122 e403 | | Load 0x2,0x3
1123 e016 | | Load 0x0,0x16
1124 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
1125 e013 | | Load 0x0,0x13
1126 1b0e | | Execute Package,Field_Read,Field_Number 0xe
1127 0119 | | Execute Any,Check_In_Formal_Type
1128 4802 |H | Short_Literal 0x2
1129 00da | | Load_Top At_Offset_2
112a 01d6 | | Execute Vector,Field_Write
112b 6024 |`$ | Indirect_Literal Discrete,0x1150,{0x00000000, 0x00008202}
112c e00d | | Load 0x0,0xd
112d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
112e e00d | | Load 0x0,0xd
112f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1130 e5fa | | Load 0x2,-0x6
1131 e5fb | | Load 0x2,-0x5
1132 e5fc | | Load 0x2,-0x4
1133 e603 | | Load 0x3,0x3
1134 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1135 e602 | | Load 0x3,0x2
1136 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
1137 0092 12a8 | | Action Push_String_Extended,0x12a8 ; "link"
1139 e00f | | Load 0x0,0xf
113a 18c8 | | Execute Package,Field_Execute,Field_Number 0xc8
113b 4801 |H | Short_Literal 0x1
113c e00f | | Load 0x0,0xf
113d 18c7 | | Execute Package,Field_Execute,Field_Number 0xc7
113e e5fe | | Load 0x2,-0x2
113f e403 | | Load 0x2,0x3
1140 e021 | ! | Load 0x0,0x21
1141 1811 | | Execute Package,Field_Execute,Field_Number 0x11
1142 c5fa | | Store 0x2,-0x6
1143 c402 | | Store 0x2,0x2
1144 4800 |H | Short_Literal 0x0
1145 e402 | | Load 0x2,0x2
1146 e00d | | Load 0x0,0xd
1147 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
1148 7004 |p | Jump_Nonzero 0x114d
1149 e402 | | Load 0x2,0x2
114a a5f9 | | Store_Unchecked 0x2,-0x7
114b 00cc | | Action Pop_Block
114c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
114d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
114e 0000 0000 | | .XXX[0x2]
1150 0000 0000 | | .LITERAL {0x00000000, 0x00008202}
1154 0000 0000 | | .LITERAL {0x00000000, 0x000081f6}
1158 ; --------------------------------------------------------------------------------------
1158 ; SUBPROGRAM
1158 ; --------------------------------------------------------------------------------------
1158 118c | | .CONST 0x118c ; Address of begin
1159 0004 | | .CONST 0x0004 ; Address of exception handler
115a 0006 | | .CONST 0x0006 ; Number of locals
115b INIT_1158:
115b e5fb | | Load 0x2,-0x5
115c e402 | | Load 0x2,0x2
115d e015 | | Load 0x0,0x15
115e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
115f e001 | | Load 0x0,0x1
1160 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
1161 0322 | " | Declare_Variable Record
1162 e5fb | | Load 0x2,-0x5
1163 e403 | | Load 0x2,0x3
1164 e015 | | Load 0x0,0x15
1165 181b | | Execute Package,Field_Execute,Field_Number 0x1b
1166 00d9 | | Load_Top At_Offset_1
1167 017d | } | Execute Record,Structure_Write
1168 00d8 | | Load_Top At_Offset_0
1169 e01c | | Load 0x0,0x1c
116a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
116b e01b | | Load 0x0,0x1b
116c 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
116d 0092 1298 | | Action Push_String_Extended,0x1298 ; " "
116f 01cc | | Execute Vector,Catenate
1170 e5fc | | Load 0x2,-0x4
1171 01cc | | Execute Vector,Catenate
1172 0092 1298 | | Action Push_String_Extended,0x1298 ; " "
1174 01cc | | Execute Vector,Catenate
1175 e5fd | | Load 0x2,-0x3
1176 01cc | | Execute Vector,Catenate
1177 0007 | | Action Break_Optional
1178 00d9 | | Load_Top At_Offset_1
1179 e01c | | Load 0x0,0x1c
117a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
117b e01b | | Load 0x0,0x1b
117c 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
117d 0092 1298 | | Action Push_String_Extended,0x1298 ; " "
117f 01cc | | Execute Vector,Catenate
1180 e5fc | | Load 0x2,-0x4
1181 01cc | | Execute Vector,Catenate
1182 0092 1298 | | Action Push_String_Extended,0x1298 ; " "
1184 01cc | | Execute Vector,Catenate
1185 e5fd | | Load 0x2,-0x3
1186 01cc | | Execute Vector,Catenate
1187 0007 | | Action Break_Optional
1188 e225 | % | Load 0x1,0x25
1189 0322 | " | Declare_Variable Record
118a 00d8 | | Load_Top At_Offset_0
118b 1c00 | | Execute_Immediate Run_Utility,0x0
118c BODY_1158:
118c 00db | | Load_Top At_Offset_3
118d 8239 | 9 | Call 0x1,0x39
118e 6856 |hV | Jump_Zero 0x11e5
118f e00d | | Load 0x0,0xd
1190 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1191 e404 | | Load 0x2,0x4
1192 e5fb | | Load 0x2,-0x5
1193 e5ff | | Load 0x2,-0x1
1194 e010 | | Load 0x0,0x10
1195 180d | | Execute Package,Field_Execute,Field_Number 0xd
1196 c404 | | Store 0x2,0x4
1197 c405 | | Store 0x2,0x5
1198 4800 |H | Short_Literal 0x0
1199 e405 | | Load 0x2,0x5
119a e00d | | Load 0x0,0xd
119b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
119c 7004 |p | Jump_Nonzero 0x11a1
119d e405 | | Load 0x2,0x5
119e a5fa | | Store_Unchecked 0x2,-0x6
119f 00cc | | Action Pop_Block
11a0 4506 |E | Exit_Suprogram New_Top_Offset 0x6
11a1 e5fc | | Load 0x2,-0x4
11a2 4801 |H | Short_Literal 0x1
11a3 e5fc | | Load 0x2,-0x4
11a4 01db | | Execute Vector,Length
11a5 00d8 | | Load_Top At_Offset_0
11a6 00e2 | | Load_Encached Integer_Cache
11a7 0260 | ` | Execute Discrete,In_Type
11a8 7001 |p | Jump_Nonzero 0x11aa
11a9 0801 | | Execute_Immediate Raise,0x1
11aa 00db | | Load_Top At_Offset_3
11ab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
11ac 01ce | | Execute Vector,Slice_Write
11ad e5fc | | Load 0x2,-0x4
11ae 01db | | Execute Vector,Length
11af 00d9 | | Load_Top At_Offset_1
11b0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
11b1 00db | | Load_Top At_Offset_3
11b2 00d9 | | Load_Top At_Offset_1
11b3 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
11b4 e404 | | Load 0x2,0x4
11b5 00d9 | | Load_Top At_Offset_1
11b6 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
11b7 e00d | | Load 0x0,0xd
11b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11b9 e5fb | | Load 0x2,-0x5
11ba e604 | | Load 0x3,0x4
11bb e404 | | Load 0x2,0x4
11bc e010 | | Load 0x0,0x10
11bd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11be c5fa | | Store 0x2,-0x6
11bf e00d | | Load 0x0,0xd
11c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11c1 e5fb | | Load 0x2,-0x5
11c2 00db | | Load_Top At_Offset_3
11c3 e404 | | Load 0x2,0x4
11c4 e010 | | Load 0x0,0x10
11c5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
11c6 c5fa | | Store 0x2,-0x6
11c7 e00d | | Load 0x0,0xd
11c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
11c9 e5fb | | Load 0x2,-0x5
11ca e603 | | Load 0x3,0x3
11cb 00db | | Load_Top At_Offset_3
11cc 4800 |H | Short_Literal 0x0
11cd e602 | | Load 0x3,0x2
11ce e24a | J | Load 0x1,0x4a
11cf 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b
11d0 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c
11d1 8003 | | Call 0x0,0x3
11d2 c405 | | Store 0x2,0x5
11d3 4800 |H | Short_Literal 0x0
11d4 e405 | | Load 0x2,0x5
11d5 e00d | | Load 0x0,0xd
11d6 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
11d7 7008 |p | Jump_Nonzero 0x11e0
11d8 e5fb | | Load 0x2,-0x5
11d9 600e |` | Indirect_Literal Discrete,0x11e8,{0x00000000, 0x00008207}
11da e00d | | Load 0x0,0xd
11db 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
11dc e405 | | Load 0x2,0x5
11dd a5fa | | Store_Unchecked 0x2,-0x6
11de 00cc | | Action Pop_Block
11df 4506 |E | Exit_Suprogram New_Top_Offset 0x6
11e0 e404 | | Load 0x2,0x4
11e1 e5fb | | Load 0x2,-0x5
11e2 e010 | | Load 0x0,0x10
11e3 180e | | Execute Package,Field_Execute,Field_Number 0xe
11e4 c404 | | Store 0x2,0x4
11e5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
11e6 0000 0000 | | .XXX[0x2]
11e8 0000 0000 | | .LITERAL {0x00000000, 0x00008207}
11ec 0000 0000 | | .BLANK 0000[0x4]
11f0 ; --------------------------------------------------------------------------------------
11f0 ; SUBPROGRAM
11f0 ; --------------------------------------------------------------------------------------
11f0 1200 | | .CONST 0x1200 ; Address of begin
11f1 0004 | | .CONST 0x0004 ; Address of exception handler
11f2 0003 | | .CONST 0x0003 ; Number of locals
11f3 INIT_11f0:
11f3 e5fe | | Load 0x2,-0x2
11f4 e402 | | Load 0x2,0x2
11f5 e015 | | Load 0x0,0x15
11f6 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
11f7 e001 | | Load 0x0,0x1
11f8 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
11f9 0322 | " | Declare_Variable Record
11fa e5fe | | Load 0x2,-0x2
11fb e403 | | Load 0x2,0x3
11fc e015 | | Load 0x0,0x15
11fd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
11fe 00d9 | | Load_Top At_Offset_1
11ff 017d | } | Execute Record,Structure_Write
1200 BODY_11f0:
1200 e00d | | Load 0x0,0xd
1201 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1202 e5fe | | Load 0x2,-0x2
1203 00da | | Load_Top At_Offset_2
1204 e5fd | | Load 0x2,-0x3
1205 4800 |H | Short_Literal 0x0
1206 e602 | | Load 0x3,0x2
1207 e244 | D | Load 0x1,0x44
1208 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
1209 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
120a 8003 | | Call 0x0,0x3
120b c5fc | | Store 0x2,-0x4
120c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
120d 0000 0000 | | .XXX[0x3]
120f 0000 | |
1210 ; --------------------------------------------------------------------------------------
1210 ; SUBPROGRAM
1210 ; --------------------------------------------------------------------------------------
1210 1217 | | .CONST 0x1217 ; Address of begin
1211 0004 | | .CONST 0x0004 ; Address of exception handler
1212 0002 | | .CONST 0x0002 ; Number of locals
1213 INIT_1210:
1213 e5fd | | Load 0x2,-0x3
1214 e602 | | Load 0x3,0x2
1215 e015 | | Load 0x0,0x15
1216 181a | | Execute Package,Field_Execute,Field_Number 0x1a
1217 BODY_1210:
1217 e5fe | | Load 0x2,-0x2
1218 701b |p | Jump_Nonzero 0x1234
1219 e00d | | Load 0x0,0xd
121a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
121b e404 | | Load 0x2,0x4
121c 0120 | | Execute Any,Is_Value
121d 6803 |h | Jump_Zero 0x1221
121e e004 | | Load 0x0,0x4
121f 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
1220 7801 |x | Jump 0x1222
1221 e404 | | Load 0x2,0x4
1222 e5fd | | Load 0x2,-0x3
1223 e406 | | Load 0x2,0x6
1224 e802 | | Load 0x4,0x2
1225 e407 | | Load 0x2,0x7
1226 e403 | | Load 0x2,0x3
1227 8229 | ) | Call 0x1,0x29
1228 c404 | | Store 0x2,0x4
1229 c402 | | Store 0x2,0x2
122a 4800 |H | Short_Literal 0x0
122b e402 | | Load 0x2,0x2
122c e00d | | Load 0x0,0xd
122d 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
122e 7005 |p | Jump_Nonzero 0x1234
122f e402 | | Load 0x2,0x2
1230 a5fc | | Store_Unchecked 0x2,-0x4
1231 00cc | | Action Pop_Block
1232 00cc | | Action Pop_Block
1233 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1234 e011 | | Load 0x0,0x11
1235 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1236 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1237 c603 | | Store 0x3,0x3
1238 e603 | | Load 0x3,0x3
1239 e602 | | Load 0x3,0x2
123a 8241 | A | Call 0x1,0x41
123b c603 | | Store 0x3,0x3
123c e5fe | | Load 0x2,-0x2
123d 7011 |p | Jump_Nonzero 0x124f
123e e403 | | Load 0x2,0x3
123f e404 | | Load 0x2,0x4
1240 00da | | Load_Top At_Offset_2
1241 e603 | | Load 0x3,0x3
1242 e01d | | Load 0x0,0x1d
1243 181d | | Execute Package,Field_Execute,Field_Number 0x1d
1244 700a |p | Jump_Nonzero 0x124f
1245 e5fd | | Load 0x2,-0x3
1246 6035 |`5 | Indirect_Literal Discrete,0x127c,{0x00000000, 0x000081f3}
1247 e00d | | Load 0x0,0xd
1248 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1249 e013 | | Load 0x0,0x13
124a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
124b 6030 |`0 | Indirect_Literal Discrete,0x127c,{0x00000000, 0x000081f3}
124c e00d | | Load 0x0,0xd
124d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
124e a5fc | | Store_Unchecked 0x2,-0x4
124f e00d | | Load 0x0,0xd
1250 1b0d | | Execute Package,Field_Read,Field_Number 0xd
1251 e404 | | Load 0x2,0x4
1252 e5fd | | Load 0x2,-0x3
1253 00db | | Load_Top At_Offset_3
1254 e5fe | | Load 0x2,-0x2
1255 e403 | | Load 0x2,0x3
1256 e602 | | Load 0x3,0x2
1257 8242 | B | Call 0x1,0x42
1258 c404 | | Store 0x2,0x4
1259 c402 | | Store 0x2,0x2
125a 4800 |H | Short_Literal 0x0
125b e402 | | Load 0x2,0x2
125c e00d | | Load 0x0,0xd
125d 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
125e 7005 |p | Jump_Nonzero 0x1264
125f e402 | | Load 0x2,0x2
1260 a5fc | | Store_Unchecked 0x2,-0x4
1261 00cc | | Action Pop_Block
1262 00cc | | Action Pop_Block
1263 4504 |E | Exit_Suprogram New_Top_Offset 0x4
1264 e5fe | | Load 0x2,-0x2
1265 7011 |p | Jump_Nonzero 0x1277
1266 e403 | | Load 0x2,0x3
1267 e404 | | Load 0x2,0x4
1268 00da | | Load_Top At_Offset_2
1269 e603 | | Load 0x3,0x3
126a e01d | | Load 0x0,0x1d
126b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
126c 700a |p | Jump_Nonzero 0x1277
126d e5fd | | Load 0x2,-0x3
126e 6009 |` | Indirect_Literal Discrete,0x1278,{0x00000000, 0x000081f4}
126f e00d | | Load 0x0,0xd
1270 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
1271 e013 | | Load 0x0,0x13
1272 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
1273 6004 |` | Indirect_Literal Discrete,0x1278,{0x00000000, 0x000081f4}
1274 e00d | | Load 0x0,0xd
1275 1813 | | Execute Package,Field_Execute,Field_Number 0x13
1276 a5fc | | Store_Unchecked 0x2,-0x4
1277 4501 |E | Exit_Suprogram New_Top_Offset 0x1
1278 0000 0000 | | .LITERAL {0x00000000, 0x000081f4}
127c 0000 0000 | | .LITERAL {0x00000000, 0x000081f3}
1280 ; --------------------------------------------------------------------------------------
1280 ; STRING TABLE
1280 ; --------------------------------------------------------------------------------------
1280 0054 | T | .STRTAB 0x0054->0x12aa ; "COMPILE"
1281 0059 | Y | .STRTAB 0x0059->0x12ad ; "LINK"
1282 005b | [ | .STRTAB 0x005b->0x12af ; "PRE_OPTION"
1283 0063 | c | .STRTAB 0x0063->0x12b4 ; "POST_OPTION"
1284 006c | l | .STRTAB 0x006c->0x12ba ; "RCI_BATCH_MOVE_FILE"
1285 007d | } | .STRTAB 0x007d->0x12c3 ; "Generate_Compile_Commands"
1286 0094 | | .STRTAB 0x0094->0x12d0 ; "Generate_Secondary_Commands"
1287 00ad | | .STRTAB 0x00ad->0x12dd ; "Generate_Context_Change_Command"
1288 00ca | | .STRTAB 0x00ca->0x12ed ; "Generate_Library_Change_Command"
1289 00e7 | | .STRTAB 0x00e7->0x12fc ; "Computing build closure"
128a 00fc | | .STRTAB 0x00fc->0x1308 ; "Execute_Script"
128b 0108 | | .STRTAB 0x0108->0x130f ; "Generate_Link_Commands"
128c 011c | | .STRTAB 0x011c->0x131a ; "Build_Script_Via_Tape"
128d 012f | / | .STRTAB 0x012f->0x1324 ; "Set_Context"
128e 0138 | 8 | .STRTAB 0x0138->0x132a ; "Reset_Context"
128f 0143 | C | .STRTAB 0x0143->0x1330 ; "Acquire"
1290 0148 | H | .STRTAB 0x0148->0x1334 ; "Download_A_File"
1291 0155 | U | .STRTAB 0x0155->0x133b ; "Has_Secondaries"
1292 0162 | b | .STRTAB 0x0162->0x1343 ; "Build_Compile_Command"
1293 0175 | u | .STRTAB 0x0175->0x134d ; "Build_Link_Command"
1294 0185 | | .STRTAB 0x0185->0x1356 ; "Generate_Ada_Compile"
1295 0197 | | .STRTAB 0x0197->0x1360 ; "Write_Batch_Commands"
1296 01a9 | | .STRTAB 0x01a9->0x136a ; "Do_Build_Script"
1297 01b6 | | .STRTAB 0x01b6->0x1372 ; "Get_Run_Command"
1298 01c3 | | .STRTAB 0x01c3->0x1379 ; " "
1299 01c2 | | .STRTAB 0x01c2->0x137a ; "Do_Execute_Script"
129a 01d1 | | .STRTAB 0x01d1->0x1382 ; "Copy_A_File"
129b 01da | | .STRTAB 0x01da->0x1388 ; "Move_A_File"
129c 01e3 | | .STRTAB 0x01e3->0x138d ; "_"
129d 01e2 | | .STRTAB 0x01e2->0x138e ; "Write_Script_To_Tape"
129e 01f4 | | .STRTAB 0x01f4->0x1398 ; "Open_Tape_For_Output"
129f 0206 | | .STRTAB 0x0206->0x13a2 ; "Copy_Files_To_Tape"
12a0 0216 | | .STRTAB 0x0216->0x13ab ; "Close_Tape_For_Output"
12a1 0229 | ) | .STRTAB 0x0229->0x13b5 ; "Writing units into the build list file"
12a2 024d | M | .STRTAB 0x024d->0x13c8 ; "Build_Script"
12a3 0257 | W | .STRTAB 0x0257->0x13ce ; "Upload_Associated_Files"
12a4 026c | l | .STRTAB 0x026c->0x13da ; "Show_Build_State"
12a5 027a | z | .STRTAB 0x027a->0x13e2 ; "Transfer_Units"
12a6 0286 | | .STRTAB 0x0286->0x13e9 ; "promote"
12a7 028b | | .STRTAB 0x028b->0x13ec ; "compile"
12a8 0290 | | .STRTAB 0x0290->0x13f0 ; "link"
12a9 0292 | | .STREND 0x0292->0x13f2
12aa 434f 4d50 |COMP| .STRTAB_STRINGS
13f2 0000 0000 | | .BLANK 0000[0x6]
13f8 ; --------------------------------------------------------------------------------------
13f8 ; Debug Table
13f8 ; --------------------------------------------------------------------------------------
13f8 0004 000f | | .DEBUG4 0x0004,0x000f,0x2f66,0x0000,0x0001,0x0000
13fe 0001 212d | !-| .XXX[0x2]