|
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: 7168 (0x1c00)
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 0c30 | 0 | .CONST 0x0c30 ; 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 8007 | | .CONST 0x8007 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0036 | 6 | .CONST 0x0036 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001f | | .CONST 0x001f ; Number of locals
000b INIT_0008:
000b 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated
000d 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 00e1 | | Load_Encached Boolean_Cache
0011 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0012 029d 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call
0014 029d 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call
0016 029d 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call
0018 029d 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call
001a 029d 048b | | Declare_Subprogram INIT_0488,For_Outer_Call
001c 029d 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call
001e 029d 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call
0020 029d 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call
0022 029d 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call
0024 029d 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call
0026 029d 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call
0028 029d 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call
002a 029d 0733 | 3| Declare_Subprogram INIT_0730,For_Outer_Call
002c 029d 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call
002e 029d 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call
0030 029d 095b | [| Declare_Subprogram INIT_0958,For_Outer_Call
0032 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0033 00c7 | | Action Elaborate_Subprogram
0034 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0035 00c7 | | Action Elaborate_Subprogram
0036 BODY_0008:
0036 00bc | | Action Signal_Activated
0037 00bb | | Action Signal_Completion
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 009e | | .CONST 0x009e ; Address of begin
0039 01f4 | | .CONST 0x01f4 ; Address of exception handler
003a 0019 | | .CONST 0x0019 ; Number of locals
003b INIT_0038:
003b e001 | | Load 0x0,0x1
003c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
003d 00e1 | | Load_Encached Boolean_Cache
003e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
003f 00e1 | | Load_Encached Boolean_Cache
0040 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0041 e001 | | Load 0x0,0x1
0042 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0043 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0044 02c7 | | Declare_Variable Any
0045 00d8 | | Load_Top At_Offset_0
0046 1c00 | | Execute_Immediate Run_Utility,0x0
0047 e001 | | Load 0x0,0x1
0048 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0049 02c7 | | Declare_Variable Any
004a 00d8 | | Load_Top At_Offset_0
004b 1c00 | | Execute_Immediate Run_Utility,0x0
004c e001 | | Load 0x0,0x1
004d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
004e 02c7 | | Declare_Variable Any
004f 00d8 | | Load_Top At_Offset_0
0050 1c00 | | Execute_Immediate Run_Utility,0x0
0051 e001 | | Load 0x0,0x1
0052 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0053 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0054 02c7 | | Declare_Variable Any
0055 00d8 | | Load_Top At_Offset_0
0056 1c00 | | Execute_Immediate Run_Utility,0x0
0057 e001 | | Load 0x0,0x1
0058 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0059 1b11 | | Execute Package,Field_Read,Field_Number 0x11
005a 02c7 | | Declare_Variable Any
005b 00d8 | | Load_Top At_Offset_0
005c 1c00 | | Execute_Immediate Run_Utility,0x0
005d e002 | | Load 0x0,0x2
005e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0060 e003 | | Load 0x0,0x3
0061 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0062 e001 | | Load 0x0,0x1
0063 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0064 02ff | | Declare_Variable Variant_Record
0065 00d8 | | Load_Top At_Offset_0
0066 1c00 | | Execute_Immediate Run_Utility,0x0
0067 00e1 | | Load_Encached Boolean_Cache
0068 00e1 | | Load_Encached Boolean_Cache
0069 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
006a 00e1 | | Load_Encached Boolean_Cache
006b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
006c 00e1 | | Load_Encached Boolean_Cache
006d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
006e e004 | | Load 0x0,0x4
006f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0070 02c7 | | Declare_Variable Any
0071 00d8 | | Load_Top At_Offset_0
0072 1c00 | | Execute_Immediate Run_Utility,0x0
0073 e004 | | Load 0x0,0x4
0074 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0075 02c7 | | Declare_Variable Any
0076 00d8 | | Load_Top At_Offset_0
0077 1c00 | | Execute_Immediate Run_Utility,0x0
0078 e001 | | Load 0x0,0x1
0079 1b0f | | Execute Package,Field_Read,Field_Number 0xf
007a 02c7 | | Declare_Variable Any
007b e5fd | | Load 0x2,-0x3
007c 4801 |H | Short_Literal 0x1
007d e5ff | | Load 0x2,-0x1
007e e005 | | Load 0x0,0x5
007f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0080 a413 | | Store_Unchecked 0x2,0x13
0081 e5fd | | Load 0x2,-0x3
0082 e5fe | | Load 0x2,-0x2
0083 e006 | | Load 0x0,0x6
0084 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0085 00da | | Load_Top At_Offset_2
0086 e007 | | Load 0x0,0x7
0087 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0088 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0089 0007 | | Action Break_Optional
008a e5fd | | Load 0x2,-0x3
008b e5ff | | Load 0x2,-0x1
008c e5fe | | Load 0x2,-0x2
008d e006 | | Load 0x0,0x6
008e 18ba | | Execute Package,Field_Execute,Field_Number 0xba
008f e5fd | | Load 0x2,-0x3
0090 e5ff | | Load 0x2,-0x1
0091 e5fe | | Load 0x2,-0x2
0092 e006 | | Load 0x0,0x6
0093 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
0094 e5fd | | Load 0x2,-0x3
0095 e5fe | | Load 0x2,-0x2
0096 e5ff | | Load 0x2,-0x1
0097 e008 | | Load 0x0,0x8
0098 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0099 180f | | Execute Package,Field_Execute,Field_Number 0xf
009a 029f 0973 | s| Declare_Subprogram INIT_0970,For_Call
009c 029f 0a1b | | Declare_Subprogram INIT_0a18,For_Call
009e BODY_0038:
009e 4800 |H | Short_Literal 0x0
009f a5fc | | Store_Unchecked 0x2,-0x4
00a0 e40a | | Load 0x2,0xa
00a1 e409 | | Load 0x2,0x9
00a2 e408 | | Load 0x2,0x8
00a3 e5fd | | Load 0x2,-0x3
00a4 e5ff | | Load 0x2,-0x1
00a5 8218 | | Call 0x1,0x18
00a6 c408 | | Store 0x2,0x8
00a7 c409 | | Store 0x2,0x9
00a8 c40a | | Store 0x2,0xa
00a9 4800 |H | Short_Literal 0x0
00aa e40a | | Load 0x2,0xa
00ab e002 | | Load 0x0,0x2
00ac 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
00ad 7003 |p | Jump_Nonzero 0xb1
00ae e009 | | Load 0x0,0x9
00af 1b18 | | Execute Package,Field_Read,Field_Number 0x18
00b0 0257 | W | Execute Discrete,Raise
00b1 e5fd | | Load 0x2,-0x3
00b2 e5ff | | Load 0x2,-0x1
00b3 821f | | Call 0x1,0x1f
00b4 e40c | | Load 0x2,0xc
00b5 016d | m | Execute Variant_Record,Structure_Write
00b6 4800 |H | Short_Literal 0x0
00b7 e40c | | Load 0x2,0xc
00b8 e009 | | Load 0x0,0x9
00b9 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
00ba e009 | | Load 0x0,0x9
00bb 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00bc a40d | | Store_Unchecked 0x2,0xd
00bd e002 | | Load 0x0,0x2
00be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00bf e5fd | | Load 0x2,-0x3
00c0 e40d | | Load 0x2,0xd
00c1 e416 | | Load 0x2,0x16
00c2 8213 | | Call 0x1,0x13
00c3 c40a | | Store 0x2,0xa
00c4 4800 |H | Short_Literal 0x0
00c5 e40a | | Load 0x2,0xa
00c6 e002 | | Load 0x0,0x2
00c7 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
00c8 7003 |p | Jump_Nonzero 0xcc
00c9 e009 | | Load 0x0,0x9
00ca 1b19 | | Execute Package,Field_Read,Field_Number 0x19
00cb 0257 | W | Execute Discrete,Raise
00cc 4800 |H | Short_Literal 0x0
00cd e40c | | Load 0x2,0xc
00ce e009 | | Load 0x0,0x9
00cf 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
00d0 e009 | | Load 0x0,0x9
00d1 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00d2 a40e | | Store_Unchecked 0x2,0xe
00d3 e40c | | Load 0x2,0xc
00d4 e5fe | | Load 0x2,-0x2
00d5 e00a | | Load 0x0,0xa
00d6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00d7 a40f | | Store_Unchecked 0x2,0xf
00d8 4800 |H | Short_Literal 0x0
00d9 e40c | | Load 0x2,0xc
00da e009 | | Load 0x0,0x9
00db 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
00dc e009 | | Load 0x0,0x9
00dd 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
00de a410 | | Store_Unchecked 0x2,0x10
00df e40d | | Load 0x2,0xd
00e0 6820 |h | Jump_Zero 0x101
00e1 e5fd | | Load 0x2,-0x3
00e2 4801 |H | Short_Literal 0x1
00e3 4802 |H | Short_Literal 0x2
00e4 e00b | | Load 0x0,0xb
00e5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00e6 035b | [ | Declare_Type Array,Constrained
00e7 0337 | 7 | Declare_Variable Array
00e8 e5ff | | Load 0x2,-0x1
00e9 e001 | | Load 0x0,0x1
00ea 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
00eb 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
00ec e00b | | Load 0x0,0xb
00ed 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00ee e00b | | Load 0x0,0xb
00ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f0 0119 | | Execute Any,Check_In_Formal_Type
00f1 4801 |H | Short_Literal 0x1
00f2 00da | | Load_Top At_Offset_2
00f3 01d6 | | Execute Vector,Field_Write
00f4 0092 0b29 | )| Action Push_String_Extended,0xb29 ; "Compile"
00f6 e00b | | Load 0x0,0xb
00f7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00f8 e00b | | Load 0x0,0xb
00f9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00fa 0119 | | Execute Any,Check_In_Formal_Type
00fb 4802 |H | Short_Literal 0x2
00fc 00da | | Load_Top At_Offset_2
00fd 01d6 | | Execute Vector,Field_Write
00fe 6189 |a | Indirect_Literal Discrete,0x288,{0x00000000, 0x0000817a}
00ff e002 | | Load 0x0,0x2
0100 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0101 4801 |H | Short_Literal 0x1
0102 0092 0b2a | *| Action Push_String_Extended,0xb2a ; "<error>"
0104 e414 | | Load 0x2,0x14
0105 e00c | | Load 0x0,0xc
0106 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0107 6829 |h) | Jump_Zero 0x131
0108 e5fd | | Load 0x2,-0x3
0109 4801 |H | Short_Literal 0x1
010a 4801 |H | Short_Literal 0x1
010b e00b | | Load 0x0,0xb
010c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
010d 035b | [ | Declare_Type Array,Constrained
010e 0337 | 7 | Declare_Variable Array
010f e5ff | | Load 0x2,-0x1
0110 e00b | | Load 0x0,0xb
0111 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0112 e00b | | Load 0x0,0xb
0113 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0114 0119 | | Execute Any,Check_In_Formal_Type
0115 4801 |H | Short_Literal 0x1
0116 00da | | Load_Top At_Offset_2
0117 01d6 | | Execute Vector,Field_Write
0118 616b |ak | Indirect_Literal Discrete,0x284,{0x00000000, 0x00008111}
0119 e002 | | Load 0x0,0x2
011a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
011b 4801 |H | Short_Literal 0x1
011c 4801 |H | Short_Literal 0x1
011d e00b | | Load 0x0,0xb
011e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
011f 035b | [ | Declare_Type Array,Constrained
0120 0337 | 7 | Declare_Variable Array
0121 e5ff | | Load 0x2,-0x1
0122 e00b | | Load 0x0,0xb
0123 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0124 e00b | | Load 0x0,0xb
0125 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0126 0119 | | Execute Any,Check_In_Formal_Type
0127 4801 |H | Short_Literal 0x1
0128 00da | | Load_Top At_Offset_2
0129 01d6 | | Execute Vector,Field_Write
012a 6155 |aU | Indirect_Literal Discrete,0x280,{0x00000000, 0x0000811a}
012b e002 | | Load 0x0,0x2
012c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
012d a5fc | | Store_Unchecked 0x2,-0x4
012e e009 | | Load 0x0,0x9
012f 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0130 0257 | W | Execute Discrete,Raise
0131 e5ff | | Load 0x2,-0x1
0132 c406 | | Store 0x2,0x6
0133 e002 | | Load 0x0,0x2
0134 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0135 00e1 | | Load_Encached Boolean_Cache
0136 e5fd | | Load 0x2,-0x3
0137 e406 | | Load 0x2,0x6
0138 e01b | | Load 0x0,0x1b
0139 1845 | E | Execute Package,Field_Execute,Field_Number 0x45
013a c404 | | Store 0x2,0x4
013b c40a | | Store 0x2,0xa
013c 4800 |H | Short_Literal 0x0
013d e40a | | Load 0x2,0xa
013e e002 | | Load 0x0,0x2
013f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0140 7003 |p | Jump_Nonzero 0x144
0141 e002 | | Load 0x0,0x2
0142 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0143 0257 | W | Execute Discrete,Raise
0144 e404 | | Load 0x2,0x4
0145 6867 |hg | Jump_Zero 0x1ad
0146 e5fd | | Load 0x2,-0x3
0147 e406 | | Load 0x2,0x6
0148 e01b | | Load 0x0,0x1b
0149 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
014a 6801 |h | Jump_Zero 0x14c
014b 8419 | | Call 0x2,0x19
014c e002 | | Load 0x0,0x2
014d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014e e405 | | Load 0x2,0x5
014f 0120 | | Execute Any,Is_Value
0150 6804 |h | Jump_Zero 0x155
0151 e001 | | Load 0x0,0x1
0152 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0153 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0154 7801 |x | Jump 0x156
0155 e405 | | Load 0x2,0x5
0156 e5fd | | Load 0x2,-0x3
0157 e406 | | Load 0x2,0x6
0158 e01b | | Load 0x0,0x1b
0159 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
015a c405 | | Store 0x2,0x5
015b c40a | | Store 0x2,0xa
015c 4800 |H | Short_Literal 0x0
015d e40a | | Load 0x2,0xa
015e e002 | | Load 0x0,0x2
015f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0160 7003 |p | Jump_Nonzero 0x164
0161 e002 | | Load 0x0,0x2
0162 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0163 0257 | W | Execute Discrete,Raise
0164 4801 |H | Short_Literal 0x1
0165 a403 | | Store_Unchecked 0x2,0x3
0166 00cf | | Action Mark_Auxiliary
0167 783e |x> | Jump 0x1a6
0168 e001 | | Load 0x0,0x1
0169 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016a e406 | | Load 0x2,0x6
016b 0120 | | Execute Any,Is_Value
016c 6803 |h | Jump_Zero 0x170
016d e001 | | Load 0x0,0x1
016e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016f 7801 |x | Jump 0x171
0170 e406 | | Load 0x2,0x6
0171 e405 | | Load 0x2,0x5
0172 e001 | | Load 0x0,0x1
0173 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0174 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0175 c406 | | Store 0x2,0x6
0176 c402 | | Store 0x2,0x2
0177 e402 | | Load 0x2,0x2
0178 6803 |h | Jump_Zero 0x17c
0179 e002 | | Load 0x0,0x2
017a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
017b 0257 | W | Execute Discrete,Raise
017c e002 | | Load 0x0,0x2
017d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017e e407 | | Load 0x2,0x7
017f 0120 | | Execute Any,Is_Value
0180 6803 |h | Jump_Zero 0x184
0181 e001 | | Load 0x0,0x1
0182 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0183 7801 |x | Jump 0x185
0184 e407 | | Load 0x2,0x7
0185 e5fd | | Load 0x2,-0x3
0186 e406 | | Load 0x2,0x6
0187 e01b | | Load 0x0,0x1b
0188 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0189 c407 | | Store 0x2,0x7
018a c40a | | Store 0x2,0xa
018b 4800 |H | Short_Literal 0x0
018c e40a | | Load 0x2,0xa
018d e002 | | Load 0x0,0x2
018e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
018f 7003 |p | Jump_Nonzero 0x193
0190 e002 | | Load 0x0,0x2
0191 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0192 0257 | W | Execute Discrete,Raise
0193 8419 | | Call 0x2,0x19
0194 e002 | | Load 0x0,0x2
0195 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0196 e5fd | | Load 0x2,-0x3
0197 e407 | | Load 0x2,0x7
0198 e005 | | Load 0x0,0x5
0199 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
019a c40a | | Store 0x2,0xa
019b e402 | | Load 0x2,0x2
019c 6803 |h | Jump_Zero 0x1a0
019d e009 | | Load 0x0,0x9
019e 1b19 | | Execute Package,Field_Read,Field_Number 0x19
019f 0257 | W | Execute Discrete,Raise
01a0 e405 | | Load 0x2,0x5
01a1 e001 | | Load 0x0,0x1
01a2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01a3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01a4 c405 | | Store 0x2,0x5
01a5 00c9 | | Action Pop_Auxiliary_Loop
01a6 e405 | | Load 0x2,0x5
01a7 e001 | | Load 0x0,0x1
01a8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01a9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01aa 6fbd |o | Jump_Zero 0x168
01ab 00ce | | Action Pop_Auxiliary
01ac 7801 |x | Jump 0x1ae
01ad 8419 | | Call 0x2,0x19
01ae 4800 |H | Short_Literal 0x0
01af e40a | | Load 0x2,0xa
01b0 e002 | | Load 0x0,0x2
01b1 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
01b2 6839 |h9 | Jump_Zero 0x1ec
01b3 e004 | | Load 0x0,0x4
01b4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01b5 c412 | | Store 0x2,0x12
01b6 e40d | | Load 0x2,0xd
01b7 6824 |h$ | Jump_Zero 0x1dc
01b8 e5fd | | Load 0x2,-0x3
01b9 4801 |H | Short_Literal 0x1
01ba 4802 |H | Short_Literal 0x2
01bb e00b | | Load 0x0,0xb
01bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01bd 035b | [ | Declare_Type Array,Constrained
01be 0337 | 7 | Declare_Variable Array
01bf e5ff | | Load 0x2,-0x1
01c0 e005 | | Load 0x0,0x5
01c1 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
01c2 e00b | | Load 0x0,0xb
01c3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c4 0119 | | Execute Any,Check_In_Formal_Type
01c5 4801 |H | Short_Literal 0x1
01c6 00da | | Load_Top At_Offset_2
01c7 01d6 | | Execute Vector,Field_Write
01c8 4800 |H | Short_Literal 0x0
01c9 4800 |H | Short_Literal 0x0
01ca 4800 |H | Short_Literal 0x0
01cb e412 | | Load 0x2,0x12
01cc e00e | | Load 0x0,0xe
01cd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01ce e00e | | Load 0x0,0xe
01cf 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01d0 e00b | | Load 0x0,0xb
01d1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01d2 e00b | | Load 0x0,0xb
01d3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d4 0119 | | Execute Any,Check_In_Formal_Type
01d5 4802 |H | Short_Literal 0x2
01d6 00da | | Load_Top At_Offset_2
01d7 01d6 | | Execute Vector,Field_Write
01d8 60a3 |` | Indirect_Literal Discrete,0x27c,{0x00000000, 0x000081f8}
01d9 e002 | | Load 0x0,0x2
01da 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
01db 7810 |x | Jump 0x1ec
01dc e002 | | Load 0x0,0x2
01dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01de e5fd | | Load 0x2,-0x3
01df e412 | | Load 0x2,0x12
01e0 e5ff | | Load 0x2,-0x1
01e1 e00a | | Load 0x0,0xa
01e2 180f | | Execute Package,Field_Execute,Field_Number 0xf
01e3 c40a | | Store 0x2,0xa
01e4 4800 |H | Short_Literal 0x0
01e5 e40a | | Load 0x2,0xa
01e6 e002 | | Load 0x0,0x2
01e7 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
01e8 7003 |p | Jump_Nonzero 0x1ec
01e9 e009 | | Load 0x0,0x9
01ea 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01eb 0257 | W | Execute Discrete,Raise
01ec e40a | | Load 0x2,0xa
01ed a5fc | | Store_Unchecked 0x2,-0x4
01ee e40a | | Load 0x2,0xa
01ef e5fd | | Load 0x2,-0x3
01f0 e409 | | Load 0x2,0x9
01f1 8219 | | Call 0x1,0x19
01f2 c40a | | Store 0x2,0xa
01f3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01f4 TRAP_0038:
01f4 e009 | | Load 0x0,0x9
01f5 1b19 | | Execute Package,Field_Read,Field_Number 0x19
01f6 010f | | Execute Exception,Equal
01f7 6808 |h | Jump_Zero 0x200
01f8 e40a | | Load 0x2,0xa
01f9 a5fc | | Store_Unchecked 0x2,-0x4
01fa e40a | | Load 0x2,0xa
01fb e5fd | | Load 0x2,-0x3
01fc e409 | | Load 0x2,0x9
01fd 8219 | | Call 0x1,0x19
01fe c40a | | Store 0x2,0xa
01ff 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0200 e009 | | Load 0x0,0x9
0201 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0202 010f | | Execute Exception,Equal
0203 6827 |h' | Jump_Zero 0x22b
0204 4801 |H | Short_Literal 0x1
0205 4801 |H | Short_Literal 0x1
0206 e00b | | Load 0x0,0xb
0207 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0208 035b | [ | Declare_Type Array,Constrained
0209 0337 | 7 | Declare_Variable Array
020a e5ff | | Load 0x2,-0x1
020b e005 | | Load 0x0,0x5
020c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
020d e00b | | Load 0x0,0xb
020e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
020f 0119 | | Execute Any,Check_In_Formal_Type
0210 4801 |H | Short_Literal 0x1
0211 00da | | Load_Top At_Offset_2
0212 01d6 | | Execute Vector,Field_Write
0213 606c |`l | Indirect_Literal Discrete,0x280,{0x00000000, 0x0000811a}
0214 e002 | | Load 0x0,0x2
0215 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0216 a5fc | | Store_Unchecked 0x2,-0x4
0217 e5fd | | Load 0x2,-0x3
0218 4801 |H | Short_Literal 0x1
0219 4801 |H | Short_Literal 0x1
021a e00b | | Load 0x0,0xb
021b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
021c 035b | [ | Declare_Type Array,Constrained
021d 0337 | 7 | Declare_Variable Array
021e e5ff | | Load 0x2,-0x1
021f e005 | | Load 0x0,0x5
0220 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0221 e00b | | Load 0x0,0xb
0222 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0223 0119 | | Execute Any,Check_In_Formal_Type
0224 4801 |H | Short_Literal 0x1
0225 00da | | Load_Top At_Offset_2
0226 01d6 | | Execute Vector,Field_Write
0227 6058 |`X | Indirect_Literal Discrete,0x280,{0x00000000, 0x0000811a}
0228 e002 | | Load 0x0,0x2
0229 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
022a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
022b e002 | | Load 0x0,0x2
022c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
022d 010f | | Execute Exception,Equal
022e 681c |h | Jump_Zero 0x24b
022f e002 | | Load 0x0,0x2
0230 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0231 a5fc | | Store_Unchecked 0x2,-0x4
0232 e40a | | Load 0x2,0xa
0233 e5fd | | Load 0x2,-0x3
0234 e409 | | Load 0x2,0x9
0235 8219 | | Call 0x1,0x19
0236 c40a | | Store 0x2,0xa
0237 e5fd | | Load 0x2,-0x3
0238 4801 |H | Short_Literal 0x1
0239 4801 |H | Short_Literal 0x1
023a e00b | | Load 0x0,0xb
023b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
023c 035b | [ | Declare_Type Array,Constrained
023d 0337 | 7 | Declare_Variable Array
023e e5ff | | Load 0x2,-0x1
023f e005 | | Load 0x0,0x5
0240 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0241 e00b | | Load 0x0,0xb
0242 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0243 0119 | | Execute Any,Check_In_Formal_Type
0244 4801 |H | Short_Literal 0x1
0245 00da | | Load_Top At_Offset_2
0246 01d6 | | Execute Vector,Field_Write
0247 6038 |`8 | Indirect_Literal Discrete,0x280,{0x00000000, 0x0000811a}
0248 e002 | | Load 0x0,0x2
0249 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
024a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
024b e40a | | Load 0x2,0xa
024c e5fd | | Load 0x2,-0x3
024d e409 | | Load 0x2,0x9
024e 8219 | | Call 0x1,0x19
024f c40a | | Store 0x2,0xa
0250 4801 |H | Short_Literal 0x1
0251 4801 |H | Short_Literal 0x1
0252 e00b | | Load 0x0,0xb
0253 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0254 035b | [ | Declare_Type Array,Constrained
0255 0337 | 7 | Declare_Variable Array
0256 e5ff | | Load 0x2,-0x1
0257 e005 | | Load 0x0,0x5
0258 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0259 e00b | | Load 0x0,0xb
025a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
025b 0119 | | Execute Any,Check_In_Formal_Type
025c 4801 |H | Short_Literal 0x1
025d 00da | | Load_Top At_Offset_2
025e 01d6 | | Execute Vector,Field_Write
025f 6020 |` | Indirect_Literal Discrete,0x280,{0x00000000, 0x0000811a}
0260 e002 | | Load 0x0,0x2
0261 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0262 a5fc | | Store_Unchecked 0x2,-0x4
0263 e5fd | | Load 0x2,-0x3
0264 4801 |H | Short_Literal 0x1
0265 4801 |H | Short_Literal 0x1
0266 e00b | | Load 0x0,0xb
0267 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0268 035b | [ | Declare_Type Array,Constrained
0269 0337 | 7 | Declare_Variable Array
026a e5ff | | Load 0x2,-0x1
026b e005 | | Load 0x0,0x5
026c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
026d e00b | | Load 0x0,0xb
026e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
026f 0119 | | Execute Any,Check_In_Formal_Type
0270 4801 |H | Short_Literal 0x1
0271 00da | | Load_Top At_Offset_2
0272 01d6 | | Execute Vector,Field_Write
0273 600c |` | Indirect_Literal Discrete,0x280,{0x00000000, 0x0000811a}
0274 e002 | | Load 0x0,0x2
0275 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0276 e5fd | | Load 0x2,-0x3
0277 0092 0b2b | +| Action Push_String_Extended,0xb2b ; "Rcf_Compilation.Compile_Operations.Promote"
0279 e00f | | Load 0x0,0xf
027a 180f | | Execute Package,Field_Execute,Field_Number 0xf
027b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
027c 0000 0000 | | .LITERAL {0x00000000, 0x000081f8}
0280 0000 0000 | | .LITERAL {0x00000000, 0x0000811a}
0284 0000 0000 | | .LITERAL {0x00000000, 0x00008111}
0288 0000 0000 | | .LITERAL {0x00000000, 0x0000817a}
028c 0000 0000 | | .BLANK 0000[0x4]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 02d1 | | .CONST 0x02d1 ; Address of begin
0291 035c | \ | .CONST 0x035c ; Address of exception handler
0292 000c | | .CONST 0x000c ; Number of locals
0293 INIT_0290:
0293 e002 | | Load 0x0,0x2
0294 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0295 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0296 e001 | | Load 0x0,0x1
0297 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0298 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0299 02c7 | | Declare_Variable Any
029a 00d8 | | Load_Top At_Offset_0
029b 1c00 | | Execute_Immediate Run_Utility,0x0
029c e001 | | Load 0x0,0x1
029d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
029e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
029f 02c7 | | Declare_Variable Any
02a0 00d8 | | Load_Top At_Offset_0
02a1 1c00 | | Execute_Immediate Run_Utility,0x0
02a2 e002 | | Load 0x0,0x2
02a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02a5 e003 | | Load 0x0,0x3
02a6 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02a7 e001 | | Load 0x0,0x1
02a8 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
02a9 0322 | " | Declare_Variable Record
02aa e5fe | | Load 0x2,-0x2
02ab e006 | | Load 0x0,0x6
02ac 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
02ad 00d9 | | Load_Top At_Offset_1
02ae 017d | } | Execute Record,Structure_Write
02af e5fd | | Load 0x2,-0x3
02b0 e5ff | | Load 0x2,-0x1
02b1 e5fe | | Load 0x2,-0x2
02b2 e006 | | Load 0x0,0x6
02b3 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
02b4 e001 | | Load 0x0,0x1
02b5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02b6 02c7 | | Declare_Variable Any
02b7 e5fd | | Load 0x2,-0x3
02b8 4801 |H | Short_Literal 0x1
02b9 e5ff | | Load 0x2,-0x1
02ba e005 | | Load 0x0,0x5
02bb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02bc a409 | | Store_Unchecked 0x2,0x9
02bd e5fd | | Load 0x2,-0x3
02be e5fe | | Load 0x2,-0x2
02bf e006 | | Load 0x0,0x6
02c0 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
02c1 00da | | Load_Top At_Offset_2
02c2 e007 | | Load 0x0,0x7
02c3 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02c4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02c5 0007 | | Action Break_Optional
02c6 e5fd | | Load 0x2,-0x3
02c7 e5ff | | Load 0x2,-0x1
02c8 e5fe | | Load 0x2,-0x2
02c9 e006 | | Load 0x0,0x6
02ca 18ba | | Execute Package,Field_Execute,Field_Number 0xba
02cb e5fd | | Load 0x2,-0x3
02cc e5fe | | Load 0x2,-0x2
02cd e5ff | | Load 0x2,-0x1
02ce e008 | | Load 0x0,0x8
02cf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d0 180f | | Execute Package,Field_Execute,Field_Number 0xf
02d1 BODY_0290:
02d1 e402 | | Load 0x2,0x2
02d2 e404 | | Load 0x2,0x4
02d3 e403 | | Load 0x2,0x3
02d4 e5fd | | Load 0x2,-0x3
02d5 e5ff | | Load 0x2,-0x1
02d6 8218 | | Call 0x1,0x18
02d7 c403 | | Store 0x2,0x3
02d8 c404 | | Store 0x2,0x4
02d9 c402 | | Store 0x2,0x2
02da 4800 |H | Short_Literal 0x0
02db e402 | | Load 0x2,0x2
02dc e002 | | Load 0x0,0x2
02dd 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
02de 7003 |p | Jump_Nonzero 0x2e2
02df e009 | | Load 0x0,0x9
02e0 1b18 | | Execute Package,Field_Read,Field_Number 0x18
02e1 0257 | W | Execute Discrete,Raise
02e2 e5fd | | Load 0x2,-0x3
02e3 0092 0b2c | ,| Action Push_String_Extended,0xb2c ; "Demoting => "
02e5 e5ff | | Load 0x2,-0x1
02e6 e001 | | Load 0x0,0x1
02e7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02e8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
02e9 01cc | | Execute Vector,Catenate
02ea e00f | | Load 0x0,0xf
02eb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02ec e407 | | Load 0x2,0x7
02ed e408 | | Load 0x2,0x8
02ee 00db | | Load_Top At_Offset_3
02ef e40a | | Load 0x2,0xa
02f0 e40c | | Load 0x2,0xc
02f1 e5ff | | Load 0x2,-0x1
02f2 e010 | | Load 0x0,0x10
02f3 180f | | Execute Package,Field_Execute,Field_Number 0xf
02f4 701a |p | Jump_Nonzero 0x30f
02f5 e5fd | | Load 0x2,-0x3
02f6 4801 |H | Short_Literal 0x1
02f7 4801 |H | Short_Literal 0x1
02f8 e00b | | Load 0x0,0xb
02f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02fa 035b | [ | Declare_Type Array,Constrained
02fb 0337 | 7 | Declare_Variable Array
02fc e5ff | | Load 0x2,-0x1
02fd e005 | | Load 0x0,0x5
02fe 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
02ff e00b | | Load 0x0,0xb
0300 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0301 0119 | | Execute Any,Check_In_Formal_Type
0302 4801 |H | Short_Literal 0x1
0303 00da | | Load_Top At_Offset_2
0304 01d6 | | Execute Vector,Field_Write
0305 60e6 |` | Indirect_Literal Discrete,0x3ec,{0x00000000, 0x000081c1}
0306 e002 | | Load 0x0,0x2
0307 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0308 e00b | | Load 0x0,0xb
0309 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
030a 60e1 |` | Indirect_Literal Discrete,0x3ec,{0x00000000, 0x000081c1}
030b e002 | | Load 0x0,0x2
030c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
030d a5fc | | Store_Unchecked 0x2,-0x4
030e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
030f e405 | | Load 0x2,0x5
0310 e406 | | Load 0x2,0x6
0311 e5fd | | Load 0x2,-0x3
0312 e001 | | Load 0x0,0x1
0313 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0314 00ea | | Load_Encached Null_String_Cache
0315 e40a | | Load 0x2,0xa
0316 e40b | | Load 0x2,0xb
0317 e408 | | Load 0x2,0x8
0318 e40c | | Load 0x2,0xc
0319 e5ff | | Load 0x2,-0x1
031a 0092 0b2d | -| Action Push_String_Extended,0xb2d ; "Demote"
031c e006 | | Load 0x0,0x6
031d 18c8 | | Execute Package,Field_Execute,Field_Number 0xc8
031e 4800 |H | Short_Literal 0x0
031f e5fe | | Load 0x2,-0x2
0320 e006 | | Load 0x0,0x6
0321 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0322 e011 | | Load 0x0,0x11
0323 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0324 c406 | | Store 0x2,0x6
0325 c405 | | Store 0x2,0x5
0326 4800 |H | Short_Literal 0x0
0327 e405 | | Load 0x2,0x5
0328 e002 | | Load 0x0,0x2
0329 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
032a 7006 |p | Jump_Nonzero 0x331
032b e012 | | Load 0x0,0x12
032c 180e | | Execute Package,Field_Execute,Field_Number 0xe
032d e405 | | Load 0x2,0x5
032e e002 | | Load 0x0,0x2
032f 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0330 7823 |x# | Jump 0x354
0331 e407 | | Load 0x2,0x7
0332 e408 | | Load 0x2,0x8
0333 00db | | Load_Top At_Offset_3
0334 e40a | | Load 0x2,0xa
0335 e40c | | Load 0x2,0xc
0336 e5ff | | Load 0x2,-0x1
0337 e010 | | Load 0x0,0x10
0338 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0339 701a |p | Jump_Nonzero 0x354
033a e5fd | | Load 0x2,-0x3
033b 4801 |H | Short_Literal 0x1
033c 4801 |H | Short_Literal 0x1
033d e00b | | Load 0x0,0xb
033e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
033f 035b | [ | Declare_Type Array,Constrained
0340 0337 | 7 | Declare_Variable Array
0341 e5ff | | Load 0x2,-0x1
0342 e005 | | Load 0x0,0x5
0343 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0344 e00b | | Load 0x0,0xb
0345 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0346 0119 | | Execute Any,Check_In_Formal_Type
0347 4801 |H | Short_Literal 0x1
0348 00da | | Load_Top At_Offset_2
0349 01d6 | | Execute Vector,Field_Write
034a 609d |` | Indirect_Literal Discrete,0x3e8,{0x00000000, 0x000081c2}
034b e002 | | Load 0x0,0x2
034c 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
034d e00b | | Load 0x0,0xb
034e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
034f 6098 |` | Indirect_Literal Discrete,0x3e8,{0x00000000, 0x000081c2}
0350 e002 | | Load 0x0,0x2
0351 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0352 a5fc | | Store_Unchecked 0x2,-0x4
0353 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0354 e402 | | Load 0x2,0x2
0355 a5fc | | Store_Unchecked 0x2,-0x4
0356 e402 | | Load 0x2,0x2
0357 e5fd | | Load 0x2,-0x3
0358 e404 | | Load 0x2,0x4
0359 8219 | | Call 0x1,0x19
035a c402 | | Store 0x2,0x2
035b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
035c TRAP_0290:
035c e009 | | Load 0x0,0x9
035d 1b19 | | Execute Package,Field_Read,Field_Number 0x19
035e 010f | | Execute Exception,Equal
035f 6808 |h | Jump_Zero 0x368
0360 e402 | | Load 0x2,0x2
0361 e5fd | | Load 0x2,-0x3
0362 e404 | | Load 0x2,0x4
0363 8219 | | Call 0x1,0x19
0364 c402 | | Store 0x2,0x2
0365 e402 | | Load 0x2,0x2
0366 a5fc | | Store_Unchecked 0x2,-0x4
0367 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0368 e009 | | Load 0x0,0x9
0369 1b18 | | Execute Package,Field_Read,Field_Number 0x18
036a 010f | | Execute Exception,Equal
036b 6827 |h' | Jump_Zero 0x393
036c 4801 |H | Short_Literal 0x1
036d 4801 |H | Short_Literal 0x1
036e e00b | | Load 0x0,0xb
036f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0370 035b | [ | Declare_Type Array,Constrained
0371 0337 | 7 | Declare_Variable Array
0372 e5ff | | Load 0x2,-0x1
0373 e005 | | Load 0x0,0x5
0374 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0375 e00b | | Load 0x0,0xb
0376 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0377 0119 | | Execute Any,Check_In_Formal_Type
0378 4801 |H | Short_Literal 0x1
0379 00da | | Load_Top At_Offset_2
037a 01d6 | | Execute Vector,Field_Write
037b 6068 |`h | Indirect_Literal Discrete,0x3e4,{0x00000000, 0x00008107}
037c e002 | | Load 0x0,0x2
037d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
037e a5fc | | Store_Unchecked 0x2,-0x4
037f e5fd | | Load 0x2,-0x3
0380 4801 |H | Short_Literal 0x1
0381 4801 |H | Short_Literal 0x1
0382 e00b | | Load 0x0,0xb
0383 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0384 035b | [ | Declare_Type Array,Constrained
0385 0337 | 7 | Declare_Variable Array
0386 e5ff | | Load 0x2,-0x1
0387 e005 | | Load 0x0,0x5
0388 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0389 e00b | | Load 0x0,0xb
038a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
038b 0119 | | Execute Any,Check_In_Formal_Type
038c 4801 |H | Short_Literal 0x1
038d 00da | | Load_Top At_Offset_2
038e 01d6 | | Execute Vector,Field_Write
038f 6054 |`T | Indirect_Literal Discrete,0x3e4,{0x00000000, 0x00008107}
0390 e002 | | Load 0x0,0x2
0391 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0392 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0393 e002 | | Load 0x0,0x2
0394 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0395 010f | | Execute Exception,Equal
0396 681c |h | Jump_Zero 0x3b3
0397 e002 | | Load 0x0,0x2
0398 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0399 a5fc | | Store_Unchecked 0x2,-0x4
039a e402 | | Load 0x2,0x2
039b e5fd | | Load 0x2,-0x3
039c e404 | | Load 0x2,0x4
039d 8219 | | Call 0x1,0x19
039e c402 | | Store 0x2,0x2
039f e5fd | | Load 0x2,-0x3
03a0 4801 |H | Short_Literal 0x1
03a1 4801 |H | Short_Literal 0x1
03a2 e00b | | Load 0x0,0xb
03a3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03a4 035b | [ | Declare_Type Array,Constrained
03a5 0337 | 7 | Declare_Variable Array
03a6 e5ff | | Load 0x2,-0x1
03a7 e005 | | Load 0x0,0x5
03a8 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03a9 e00b | | Load 0x0,0xb
03aa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ab 0119 | | Execute Any,Check_In_Formal_Type
03ac 4801 |H | Short_Literal 0x1
03ad 00da | | Load_Top At_Offset_2
03ae 01d6 | | Execute Vector,Field_Write
03af 6034 |`4 | Indirect_Literal Discrete,0x3e4,{0x00000000, 0x00008107}
03b0 e002 | | Load 0x0,0x2
03b1 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03b2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03b3 e402 | | Load 0x2,0x2
03b4 e5fd | | Load 0x2,-0x3
03b5 e404 | | Load 0x2,0x4
03b6 8219 | | Call 0x1,0x19
03b7 c402 | | Store 0x2,0x2
03b8 4801 |H | Short_Literal 0x1
03b9 4801 |H | Short_Literal 0x1
03ba e00b | | Load 0x0,0xb
03bb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03bc 035b | [ | Declare_Type Array,Constrained
03bd 0337 | 7 | Declare_Variable Array
03be e5ff | | Load 0x2,-0x1
03bf e005 | | Load 0x0,0x5
03c0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03c1 e00b | | Load 0x0,0xb
03c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03c3 0119 | | Execute Any,Check_In_Formal_Type
03c4 4801 |H | Short_Literal 0x1
03c5 00da | | Load_Top At_Offset_2
03c6 01d6 | | Execute Vector,Field_Write
03c7 601c |` | Indirect_Literal Discrete,0x3e4,{0x00000000, 0x00008107}
03c8 e002 | | Load 0x0,0x2
03c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03ca a5fc | | Store_Unchecked 0x2,-0x4
03cb e5fd | | Load 0x2,-0x3
03cc 4801 |H | Short_Literal 0x1
03cd 4801 |H | Short_Literal 0x1
03ce e00b | | Load 0x0,0xb
03cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03d0 035b | [ | Declare_Type Array,Constrained
03d1 0337 | 7 | Declare_Variable Array
03d2 e5ff | | Load 0x2,-0x1
03d3 e005 | | Load 0x0,0x5
03d4 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03d5 e00b | | Load 0x0,0xb
03d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03d7 0119 | | Execute Any,Check_In_Formal_Type
03d8 4801 |H | Short_Literal 0x1
03d9 00da | | Load_Top At_Offset_2
03da 01d6 | | Execute Vector,Field_Write
03db 6008 |` | Indirect_Literal Discrete,0x3e4,{0x00000000, 0x00008107}
03dc e002 | | Load 0x0,0x2
03dd 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03de e5fd | | Load 0x2,-0x3
03df 0092 0b2e | .| Action Push_String_Extended,0xb2e ; "Rcf_Compilation.Compile_Operations.Demote"
03e1 e00f | | Load 0x0,0xf
03e2 180f | | Execute Package,Field_Execute,Field_Number 0xf
03e3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03e4 0000 0000 | | .LITERAL {0x00000000, 0x00008107}
03e8 0000 0000 | | .LITERAL {0x00000000, 0x000081c2}
03ec 0000 0000 | | .LITERAL {0x00000000, 0x000081c1}
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 e20f | | Load 0x1,0xf
03f4 6807 |h | Jump_Zero 0x3fc
03f5 00db | | Load_Top At_Offset_3
03f6 0092 0b2f | /| Action Push_String_Extended,0xb2f ; "}?{ Check_Unit Rcf_Compilation.Compile_Operations."
03f8 e5ff | | Load 0x2,-0x1
03f9 01cc | | Execute Vector,Catenate
03fa e00f | | Load 0x0,0xf
03fb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03fc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03fd 0000 0000 | | .XXX[0x3]
03ff 0000 | |
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0415 | | .CONST 0x0415 ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0005 | | .CONST 0x0005 ; Number of locals
0403 INIT_0400:
0403 e004 | | Load 0x0,0x4
0404 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0405 02c7 | | Declare_Variable Any
0406 00d8 | | Load_Top At_Offset_0
0407 1c00 | | Execute_Immediate Run_Utility,0x0
0408 e004 | | Load 0x0,0x4
0409 1b0d | | Execute Package,Field_Read,Field_Number 0xd
040a 02c7 | | Declare_Variable Any
040b 00d8 | | Load_Top At_Offset_0
040c 1c00 | | Execute_Immediate Run_Utility,0x0
040d e002 | | Load 0x0,0x2
040e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
040f e012 | | Load 0x0,0x12
0410 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0411 02c7 | | Declare_Variable Any
0412 e012 | | Load 0x0,0x12
0413 180e | | Execute Package,Field_Execute,Field_Number 0xe
0414 a405 | | Store_Unchecked 0x2,0x5
0415 BODY_0400:
0415 e002 | | Load 0x0,0x2
0416 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0417 00db | | Load_Top At_Offset_3
0418 0120 | | Execute Any,Is_Value
0419 6803 |h | Jump_Zero 0x41d
041a e004 | | Load 0x0,0x4
041b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
041c 7801 |x | Jump 0x41e
041d 00db | | Load_Top At_Offset_3
041e e402 | | Load 0x2,0x2
041f 0120 | | Execute Any,Is_Value
0420 6803 |h | Jump_Zero 0x424
0421 e004 | | Load 0x0,0x4
0422 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0423 7801 |x | Jump 0x425
0424 e402 | | Load 0x2,0x2
0425 00db | | Load_Top At_Offset_3
0426 e5fe | | Load 0x2,-0x2
0427 e5ff | | Load 0x2,-0x1
0428 e008 | | Load 0x0,0x8
0429 1b0e | | Execute Package,Field_Read,Field_Number 0xe
042a 1817 | | Execute Package,Field_Execute,Field_Number 0x17
042b c402 | | Store 0x2,0x2
042c c403 | | Store 0x2,0x3
042d 005a | Z | Store_Top Discrete,At_Offset_2
042e 00da | | Load_Top At_Offset_2
042f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 043b | ; | .CONST 0x043b ; Address of begin
0431 0004 | | .CONST 0x0004 ; Address of exception handler
0432 0003 | | .CONST 0x0003 ; Number of locals
0433 INIT_0430:
0433 e001 | | Load 0x0,0x1
0434 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0435 e013 | | Load 0x0,0x13
0436 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0437 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0438 02c7 | | Declare_Variable Any
0439 00d8 | | Load_Top At_Offset_0
043a 1c00 | | Execute_Immediate Run_Utility,0x0
043b BODY_0430:
043b 4801 |H | Short_Literal 0x1
043c e013 | | Load 0x0,0x13
043d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
043e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
043f e5ff | | Load 0x2,-0x1
0440 e001 | | Load 0x0,0x1
0441 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0442 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0443 e013 | | Load 0x0,0x13
0444 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0445 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0446 c403 | | Store 0x2,0x3
0447 00d8 | | Load_Top At_Offset_0
0448 e013 | | Load 0x0,0x13
0449 1b0d | | Execute Package,Field_Read,Field_Number 0xd
044a 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
044b 6805 |h | Jump_Zero 0x451
044c 00d8 | | Load_Top At_Offset_0
044d e013 | | Load 0x0,0x13
044e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
044f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0450 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0451 e004 | | Load 0x0,0x4
0452 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0453 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0454 0000 0000 | | .BLANK 0000[0x4]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b | [ | .CONST 0x045b ; Address of begin
0459 0004 | | .CONST 0x0004 ; Address of exception handler
045a 0001 | | .CONST 0x0001 ; Number of locals
045b BODY_0458:
045b INIT_0458:
045b 00db | | Load_Top At_Offset_3
045c 701e |p | Jump_Nonzero 0x47b
045d 00da | | Load_Top At_Offset_2
045e 01db | | Execute Vector,Length
045f 701b |p | Jump_Nonzero 0x47b
0460 e012 | | Load 0x0,0x12
0461 180e | | Execute Package,Field_Execute,Field_Number 0xe
0462 4801 |H | Short_Literal 0x1
0463 4801 |H | Short_Literal 0x1
0464 e00b | | Load 0x0,0xb
0465 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0466 035b | [ | Declare_Type Array,Constrained
0467 0337 | 7 | Declare_Variable Array
0468 00ea | | Load_Encached Null_String_Cache
0469 e00b | | Load 0x0,0xb
046a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
046b e00b | | Load 0x0,0xb
046c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
046d 0119 | | Execute Any,Check_In_Formal_Type
046e 4801 |H | Short_Literal 0x1
046f 00da | | Load_Top At_Offset_2
0470 01d6 | | Execute Vector,Field_Write
0471 600e |` | Indirect_Literal Discrete,0x480,{0x00000000, 0x00008210}
0472 e002 | | Load 0x0,0x2
0473 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0474 e00b | | Load 0x0,0xb
0475 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0476 6009 |` | Indirect_Literal Discrete,0x480,{0x00000000, 0x00008210}
0477 e002 | | Load 0x0,0x2
0478 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0479 a5fc | | Store_Unchecked 0x2,-0x4
047a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
047b 4800 |H | Short_Literal 0x0
047c a5fc | | Store_Unchecked 0x2,-0x4
047d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
047e 0000 0000 | | .XXX[0x2]
0480 0000 0000 | | .LITERAL {0x00000000, 0x00008210}
0484 0000 0000 | | .BLANK 0000[0x4]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 049e | | .CONST 0x049e ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0002 | | .CONST 0x0002 ; Number of locals
048b INIT_0488:
048b e012 | | Load 0x0,0x12
048c 180e | | Execute Package,Field_Execute,Field_Number 0xe
048d e012 | | Load 0x0,0x12
048e 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
048f e012 | | Load 0x0,0x12
0490 180e | | Execute Package,Field_Execute,Field_Number 0xe
0491 e012 | | Load 0x0,0x12
0492 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0493 484d |HM | Short_Literal 0x4d
0494 e012 | | Load 0x0,0x12
0495 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
0496 e012 | | Load 0x0,0x12
0497 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0498 4800 |H | Short_Literal 0x0
0499 e012 | | Load 0x0,0x12
049a 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
049b 00db | | Load_Top At_Offset_3
049c e01b | | Load 0x0,0x1b
049d 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
049e BODY_0488:
049e 4800 |H | Short_Literal 0x0
049f 00d9 | | Load_Top At_Offset_1
04a0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04a1 e002 | | Load 0x0,0x2
04a2 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
04a3 7003 |p | Jump_Nonzero 0x4a7
04a4 e002 | | Load 0x0,0x2
04a5 1b17 | | Execute Package,Field_Read,Field_Number 0x17
04a6 0257 | W | Execute Discrete,Raise
04a7 00d8 | | Load_Top At_Offset_0
04a8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04aa 0000 0000 | | .BLANK 0000[0x6]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3 | | .CONST 0x04b3 ; Address of begin
04b1 0004 | | .CONST 0x0004 ; Address of exception handler
04b2 0001 | | .CONST 0x0001 ; Number of locals
04b3 BODY_04b0:
04b3 INIT_04b0:
04b3 e5fd | | Load 0x2,-0x3
04b4 6803 |h | Jump_Zero 0x4b8
04b5 00da | | Load_Top At_Offset_2
04b6 8214 | | Call 0x1,0x14
04b7 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
04b8 00db | | Load_Top At_Offset_3
04b9 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
04ba 0000 0000 | | .BLANK 0000[0x6]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04d4 | | .CONST 0x04d4 ; Address of begin
04c1 0535 | 5 | .CONST 0x0535 ; Address of exception handler
04c2 0005 | | .CONST 0x0005 ; Number of locals
04c3 INIT_04c0:
04c3 e002 | | Load 0x0,0x2
04c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04c5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
04c6 e004 | | Load 0x0,0x4
04c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04c8 02c7 | | Declare_Variable Any
04c9 00d8 | | Load_Top At_Offset_0
04ca 1c00 | | Execute_Immediate Run_Utility,0x0
04cb e5ff | | Load 0x2,-0x1
04cc e001 | | Load 0x0,0x1
04cd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04ce 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
04cf e5fe | | Load 0x2,-0x2
04d0 e5fd | | Load 0x2,-0x3
04d1 e5fb | | Load 0x2,-0x5
04d2 e006 | | Load 0x0,0x6
04d3 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
04d4 BODY_04c0:
04d4 e5f9 | | Load 0x2,-0x7
04d5 0092 0b30 | 0| Action Push_String_Extended,0xb30 ; "Target_Builder.Unit.Establish_Download_Time"
04d7 e00f | | Load 0x0,0xf
04d8 180e | | Execute Package,Field_Execute,Field_Number 0xe
04d9 4800 |H | Short_Literal 0x0
04da e402 | | Load 0x2,0x2
04db e002 | | Load 0x0,0x2
04dc 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
04dd 7003 |p | Jump_Nonzero 0x4e1
04de 00db | | Load_Top At_Offset_3
04df a5f8 | | Store_Unchecked 0x2,-0x8
04e0 4508 |E | Exit_Suprogram New_Top_Offset 0x8
04e1 00da | | Load_Top At_Offset_2
04e2 0120 | | Execute Any,Is_Value
04e3 6803 |h | Jump_Zero 0x4e7
04e4 e004 | | Load 0x0,0x4
04e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04e6 7801 |x | Jump 0x4e8
04e7 00da | | Load_Top At_Offset_2
04e8 e002 | | Load 0x0,0x2
04e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ea e5fa | | Load 0x2,-0x6
04eb e5fc | | Load 0x2,-0x4
04ec e405 | | Load 0x2,0x5
04ed e003 | | Load 0x0,0x3
04ee 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
04ef c402 | | Store 0x2,0x2
04f0 c403 | | Store 0x2,0x3
04f1 4800 |H | Short_Literal 0x0
04f2 e402 | | Load 0x2,0x2
04f3 e002 | | Load 0x0,0x2
04f4 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
04f5 701d |p | Jump_Nonzero 0x513
04f6 e5f9 | | Load 0x2,-0x7
04f7 4801 |H | Short_Literal 0x1
04f8 4802 |H | Short_Literal 0x2
04f9 e00b | | Load 0x0,0xb
04fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04fb 035b | [ | Declare_Type Array,Constrained
04fc 0337 | 7 | Declare_Variable Array
04fd 00db | | Load_Top At_Offset_3
04fe e00b | | Load 0x0,0xb
04ff 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0500 e00b | | Load 0x0,0xb
0501 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0502 0119 | | Execute Any,Check_In_Formal_Type
0503 4801 |H | Short_Literal 0x1
0504 00da | | Load_Top At_Offset_2
0505 01d6 | | Execute Vector,Field_Write
0506 e402 | | Load 0x2,0x2
0507 e002 | | Load 0x0,0x2
0508 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0509 e00b | | Load 0x0,0xb
050a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
050b 0119 | | Execute Any,Check_In_Formal_Type
050c 4802 |H | Short_Literal 0x2
050d 00da | | Load_Top At_Offset_2
050e 01d6 | | Execute Vector,Field_Write
050f 6060 |`` | Indirect_Literal Discrete,0x570,{0x00000000, 0x00008137}
0510 e002 | | Load 0x0,0x2
0511 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0512 781f |x | Jump 0x532
0513 e5f9 | | Load 0x2,-0x7
0514 0092 0b31 | 1| Action Push_String_Extended,0xb31 ; "Setting download time for => "
0516 00db | | Load_Top At_Offset_3
0517 01cc | | Execute Vector,Catenate
0518 0092 0b32 | 2| Action Push_String_Extended,0xb32 ; " to "
051a 01cc | | Execute Vector,Catenate
051b 4800 |H | Short_Literal 0x0
051c 4800 |H | Short_Literal 0x0
051d 4800 |H | Short_Literal 0x0
051e e403 | | Load 0x2,0x3
051f e00e | | Load 0x0,0xe
0520 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0521 e00e | | Load 0x0,0xe
0522 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0523 01cc | | Execute Vector,Catenate
0524 e00f | | Load 0x0,0xf
0525 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0526 e002 | | Load 0x0,0x2
0527 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0528 e5f9 | | Load 0x2,-0x7
0529 e5fb | | Load 0x2,-0x5
052a e5ff | | Load 0x2,-0x1
052b 8212 | | Call 0x1,0x12
052c e403 | | Load 0x2,0x3
052d e5ff | | Load 0x2,-0x1
052e e008 | | Load 0x0,0x8
052f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0530 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0531 c402 | | Store 0x2,0x2
0532 00db | | Load_Top At_Offset_3
0533 a5f8 | | Store_Unchecked 0x2,-0x8
0534 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0535 TRAP_04c0:
0535 e002 | | Load 0x0,0x2
0536 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0537 010f | | Execute Exception,Equal
0538 6817 |h | Jump_Zero 0x550
0539 e002 | | Load 0x0,0x2
053a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
053b a5f8 | | Store_Unchecked 0x2,-0x8
053c e5f9 | | Load 0x2,-0x7
053d 4801 |H | Short_Literal 0x1
053e 4801 |H | Short_Literal 0x1
053f e00b | | Load 0x0,0xb
0540 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0541 035b | [ | Declare_Type Array,Constrained
0542 0337 | 7 | Declare_Variable Array
0543 e404 | | Load 0x2,0x4
0544 e00b | | Load 0x0,0xb
0545 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0546 e00b | | Load 0x0,0xb
0547 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0548 0119 | | Execute Any,Check_In_Formal_Type
0549 4801 |H | Short_Literal 0x1
054a 00da | | Load_Top At_Offset_2
054b 01d6 | | Execute Vector,Field_Write
054c 601f |` | Indirect_Literal Discrete,0x56c,{0x00000000, 0x0000815e}
054d e002 | | Load 0x0,0x2
054e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
054f 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0550 e5f9 | | Load 0x2,-0x7
0551 0092 0b30 | 0| Action Push_String_Extended,0xb30 ; "Target_Builder.Unit.Establish_Download_Time"
0553 e00f | | Load 0x0,0xf
0554 180f | | Execute Package,Field_Execute,Field_Number 0xf
0555 4801 |H | Short_Literal 0x1
0556 4801 |H | Short_Literal 0x1
0557 e00b | | Load 0x0,0xb
0558 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0559 035b | [ | Declare_Type Array,Constrained
055a 0337 | 7 | Declare_Variable Array
055b 00db | | Load_Top At_Offset_3
055c e00b | | Load 0x0,0xb
055d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
055e e00b | | Load 0x0,0xb
055f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0560 0119 | | Execute Any,Check_In_Formal_Type
0561 4801 |H | Short_Literal 0x1
0562 00da | | Load_Top At_Offset_2
0563 01d6 | | Execute Vector,Field_Write
0564 6007 |` | Indirect_Literal Discrete,0x56c,{0x00000000, 0x0000815e}
0565 e002 | | Load 0x0,0x2
0566 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0567 a5f8 | | Store_Unchecked 0x2,-0x8
0568 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0569 0000 0000 | | .XXX[0x3]
056b 0000 | |
056c 0000 0000 | | .LITERAL {0x00000000, 0x0000815e}
0570 0000 0000 | | .LITERAL {0x00000000, 0x00008137}
0574 0000 0000 | | .BLANK 0000[0x4]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 0589 | | .CONST 0x0589 ; Address of begin
0579 05e6 | | .CONST 0x05e6 ; Address of exception handler
057a 0004 | | .CONST 0x0004 ; Number of locals
057b INIT_0578:
057b e002 | | Load 0x0,0x2
057c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
057e e004 | | Load 0x0,0x4
057f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0580 02c7 | | Declare_Variable Any
0581 00d8 | | Load_Top At_Offset_0
0582 1c00 | | Execute_Immediate Run_Utility,0x0
0583 e5ff | | Load 0x2,-0x1
0584 e5fe | | Load 0x2,-0x2
0585 8214 | | Call 0x1,0x14
0586 e5fc | | Load 0x2,-0x4
0587 e006 | | Load 0x0,0x6
0588 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
0589 BODY_0578:
0589 e5fa | | Load 0x2,-0x6
058a 0092 0b30 | 0| Action Push_String_Extended,0xb30 ; "Target_Builder.Unit.Establish_Download_Time"
058c e00f | | Load 0x0,0xf
058d 180e | | Execute Package,Field_Execute,Field_Number 0xe
058e 4800 |H | Short_Literal 0x0
058f 00db | | Load_Top At_Offset_3
0590 e002 | | Load 0x0,0x2
0591 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0592 7003 |p | Jump_Nonzero 0x596
0593 00da | | Load_Top At_Offset_2
0594 a5f9 | | Store_Unchecked 0x2,-0x7
0595 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0596 00d9 | | Load_Top At_Offset_1
0597 0120 | | Execute Any,Is_Value
0598 6803 |h | Jump_Zero 0x59c
0599 e004 | | Load 0x0,0x4
059a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
059b 7801 |x | Jump 0x59d
059c 00d9 | | Load_Top At_Offset_1
059d e002 | | Load 0x0,0x2
059e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
059f e5fb | | Load 0x2,-0x5
05a0 e5fd | | Load 0x2,-0x3
05a1 e404 | | Load 0x2,0x4
05a2 e003 | | Load 0x0,0x3
05a3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
05a4 c402 | | Store 0x2,0x2
05a5 c403 | | Store 0x2,0x3
05a6 4800 |H | Short_Literal 0x0
05a7 00db | | Load_Top At_Offset_3
05a8 e002 | | Load 0x0,0x2
05a9 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
05aa 701d |p | Jump_Nonzero 0x5c8
05ab e5fa | | Load 0x2,-0x6
05ac 4801 |H | Short_Literal 0x1
05ad 4802 |H | Short_Literal 0x2
05ae e00b | | Load 0x0,0xb
05af 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05b0 035b | [ | Declare_Type Array,Constrained
05b1 0337 | 7 | Declare_Variable Array
05b2 00da | | Load_Top At_Offset_2
05b3 e00b | | Load 0x0,0xb
05b4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05b5 e00b | | Load 0x0,0xb
05b6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b7 0119 | | Execute Any,Check_In_Formal_Type
05b8 4801 |H | Short_Literal 0x1
05b9 00da | | Load_Top At_Offset_2
05ba 01d6 | | Execute Vector,Field_Write
05bb e402 | | Load 0x2,0x2
05bc e002 | | Load 0x0,0x2
05bd 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
05be e00b | | Load 0x0,0xb
05bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05c0 0119 | | Execute Any,Check_In_Formal_Type
05c1 4802 |H | Short_Literal 0x2
05c2 00da | | Load_Top At_Offset_2
05c3 01d6 | | Execute Vector,Field_Write
05c4 67ab |g | Indirect_Literal Discrete,0x570,{0x00000000, 0x00008137}
05c5 e002 | | Load 0x0,0x2
05c6 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
05c7 781b |x | Jump 0x5e3
05c8 e5fa | | Load 0x2,-0x6
05c9 0092 0b31 | 1| Action Push_String_Extended,0xb31 ; "Setting download time for => "
05cb 00da | | Load_Top At_Offset_2
05cc 01cc | | Execute Vector,Catenate
05cd 0092 0b32 | 2| Action Push_String_Extended,0xb32 ; " to "
05cf 01cc | | Execute Vector,Catenate
05d0 4800 |H | Short_Literal 0x0
05d1 4800 |H | Short_Literal 0x0
05d2 4800 |H | Short_Literal 0x0
05d3 e403 | | Load 0x2,0x3
05d4 e00e | | Load 0x0,0xe
05d5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05d6 e00e | | Load 0x0,0xe
05d7 181f | | Execute Package,Field_Execute,Field_Number 0x1f
05d8 01cc | | Execute Vector,Catenate
05d9 e00f | | Load 0x0,0xf
05da 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05db e002 | | Load 0x0,0x2
05dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05dd e5fa | | Load 0x2,-0x6
05de 00db | | Load_Top At_Offset_3
05df e5fe | | Load 0x2,-0x2
05e0 e01b | | Load 0x0,0x1b
05e1 1877 | w | Execute Package,Field_Execute,Field_Number 0x77
05e2 005b | [ | Store_Top Discrete,At_Offset_3
05e3 00da | | Load_Top At_Offset_2
05e4 a5f9 | | Store_Unchecked 0x2,-0x7
05e5 4507 |E | Exit_Suprogram New_Top_Offset 0x7
05e6 TRAP_0578:
05e6 e002 | | Load 0x0,0x2
05e7 1b17 | | Execute Package,Field_Read,Field_Number 0x17
05e8 010f | | Execute Exception,Equal
05e9 6817 |h | Jump_Zero 0x601
05ea e002 | | Load 0x0,0x2
05eb 181b | | Execute Package,Field_Execute,Field_Number 0x1b
05ec a5f9 | | Store_Unchecked 0x2,-0x7
05ed e5fa | | Load 0x2,-0x6
05ee 4801 |H | Short_Literal 0x1
05ef 4801 |H | Short_Literal 0x1
05f0 e00b | | Load 0x0,0xb
05f1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05f2 035b | [ | Declare_Type Array,Constrained
05f3 0337 | 7 | Declare_Variable Array
05f4 00db | | Load_Top At_Offset_3
05f5 e00b | | Load 0x0,0xb
05f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05f7 e00b | | Load 0x0,0xb
05f8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05f9 0119 | | Execute Any,Check_In_Formal_Type
05fa 4801 |H | Short_Literal 0x1
05fb 00da | | Load_Top At_Offset_2
05fc 01d6 | | Execute Vector,Field_Write
05fd 676e |gn | Indirect_Literal Discrete,0x56c,{0x00000000, 0x0000815e}
05fe e002 | | Load 0x0,0x2
05ff 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0600 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0601 e5fa | | Load 0x2,-0x6
0602 0092 0b30 | 0| Action Push_String_Extended,0xb30 ; "Target_Builder.Unit.Establish_Download_Time"
0604 e00f | | Load 0x0,0xf
0605 180f | | Execute Package,Field_Execute,Field_Number 0xf
0606 4801 |H | Short_Literal 0x1
0607 4801 |H | Short_Literal 0x1
0608 e00b | | Load 0x0,0xb
0609 1b0f | | Execute Package,Field_Read,Field_Number 0xf
060a 035b | [ | Declare_Type Array,Constrained
060b 0337 | 7 | Declare_Variable Array
060c 00da | | Load_Top At_Offset_2
060d e00b | | Load 0x0,0xb
060e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
060f e00b | | Load 0x0,0xb
0610 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0611 0119 | | Execute Any,Check_In_Formal_Type
0612 4801 |H | Short_Literal 0x1
0613 00da | | Load_Top At_Offset_2
0614 01d6 | | Execute Vector,Field_Write
0615 6756 |gV | Indirect_Literal Discrete,0x56c,{0x00000000, 0x0000815e}
0616 e002 | | Load 0x0,0x2
0617 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0618 a5f9 | | Store_Unchecked 0x2,-0x7
0619 4507 |E | Exit_Suprogram New_Top_Offset 0x7
061a 0000 0000 | | .BLANK 0000[0x6]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0625 | % | .CONST 0x0625 ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0002 | | .CONST 0x0002 ; Number of locals
0623 INIT_0620:
0623 e001 | | Load 0x0,0x1
0624 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0625 BODY_0620:
0625 e001 | | Load 0x0,0x1
0626 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0627 e5fd | | Load 0x2,-0x3
0628 0120 | | Execute Any,Is_Value
0629 6804 |h | Jump_Zero 0x62e
062a e001 | | Load 0x0,0x1
062b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
062c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
062d 7801 |x | Jump 0x62f
062e e5fd | | Load 0x2,-0x3
062f 6068 |`h | Indirect_Literal Discrete,0x698,{0x00000000, 0x00004000}
0630 e014 | | Load 0x0,0x14
0631 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0632 4800 |H | Short_Literal 0x0
0633 e5ff | | Load 0x2,-0x1
0634 e001 | | Load 0x0,0x1
0635 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0636 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0637 c5fd | | Store 0x2,-0x3
0638 0059 | Y | Store_Top Discrete,At_Offset_1
0639 00d8 | | Load_Top At_Offset_0
063a 6821 |h! | Jump_Zero 0x65c
063b 4801 |H | Short_Literal 0x1
063c 4802 |H | Short_Literal 0x2
063d e00b | | Load 0x0,0xb
063e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
063f 035b | [ | Declare_Type Array,Constrained
0640 0337 | 7 | Declare_Variable Array
0641 e5ff | | Load 0x2,-0x1
0642 e00b | | Load 0x0,0xb
0643 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0644 e00b | | Load 0x0,0xb
0645 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0646 0119 | | Execute Any,Check_In_Formal_Type
0647 4801 |H | Short_Literal 0x1
0648 00da | | Load_Top At_Offset_2
0649 01d6 | | Execute Vector,Field_Write
064a 00d9 | | Load_Top At_Offset_1
064b e00b | | Load 0x0,0xb
064c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
064d e00b | | Load 0x0,0xb
064e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
064f 0119 | | Execute Any,Check_In_Formal_Type
0650 4802 |H | Short_Literal 0x2
0651 00da | | Load_Top At_Offset_2
0652 01d6 | | Execute Vector,Field_Write
0653 6040 |`@ | Indirect_Literal Discrete,0x694,{0x00000000, 0x0000813d}
0654 e002 | | Load 0x0,0x2
0655 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0656 a5fb | | Store_Unchecked 0x2,-0x5
0657 e5fe | | Load 0x2,-0x2
0658 e5fb | | Load 0x2,-0x5
0659 e002 | | Load 0x0,0x2
065a 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
065b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
065c e015 | | Load 0x0,0x15
065d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
065e e001 | | Load 0x0,0x1
065f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0660 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0661 c5fc | | Store 0x2,-0x4
0662 e001 | | Load 0x0,0x1
0663 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0664 e015 | | Load 0x0,0x15
0665 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0666 e5fd | | Load 0x2,-0x3
0667 e001 | | Load 0x0,0x1
0668 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0669 1814 | | Execute Package,Field_Execute,Field_Number 0x14
066a 0059 | Y | Store_Top Discrete,At_Offset_1
066b 00d8 | | Load_Top At_Offset_0
066c 6820 |h | Jump_Zero 0x68d
066d 4801 |H | Short_Literal 0x1
066e 4802 |H | Short_Literal 0x2
066f e00b | | Load 0x0,0xb
0670 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0671 035b | [ | Declare_Type Array,Constrained
0672 0337 | 7 | Declare_Variable Array
0673 e5ff | | Load 0x2,-0x1
0674 e00b | | Load 0x0,0xb
0675 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0676 e00b | | Load 0x0,0xb
0677 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0678 0119 | | Execute Any,Check_In_Formal_Type
0679 4801 |H | Short_Literal 0x1
067a 00da | | Load_Top At_Offset_2
067b 01d6 | | Execute Vector,Field_Write
067c 00d9 | | Load_Top At_Offset_1
067d e00b | | Load 0x0,0xb
067e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
067f e00b | | Load 0x0,0xb
0680 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0681 0119 | | Execute Any,Check_In_Formal_Type
0682 4802 |H | Short_Literal 0x2
0683 00da | | Load_Top At_Offset_2
0684 01d6 | | Execute Vector,Field_Write
0685 600a |` | Indirect_Literal Discrete,0x690,{0x00000000, 0x00008159}
0686 e002 | | Load 0x0,0x2
0687 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0688 a5fb | | Store_Unchecked 0x2,-0x5
0689 e5fe | | Load 0x2,-0x2
068a e5fb | | Load 0x2,-0x5
068b e002 | | Load 0x0,0x2
068c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
068d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
068e 0000 0000 | | .XXX[0x2]
0690 0000 0000 | | .LITERAL {0x00000000, 0x00008159}
0694 0000 0000 | | .LITERAL {0x00000000, 0x0000813d}
0698 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
069c 0000 0000 | | .BLANK 0000[0x4]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a5 | | .CONST 0x06a5 ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0002 | | .CONST 0x0002 ; Number of locals
06a3 INIT_06a0:
06a3 e001 | | Load 0x0,0x1
06a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06a5 BODY_06a0:
06a5 4800 |H | Short_Literal 0x0
06a6 a5fd | | Store_Unchecked 0x2,-0x3
06a7 e001 | | Load 0x0,0x1
06a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06a9 e015 | | Load 0x0,0x15
06aa 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06ab e5ff | | Load 0x2,-0x1
06ac e001 | | Load 0x0,0x1
06ad 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06ae 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06af 0059 | Y | Store_Top Discrete,At_Offset_1
06b0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
06b1 0000 0000 | | .BLANK 0000[0x7]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb | | .CONST 0x06bb ; Address of begin
06b9 0004 | | .CONST 0x0004 ; Address of exception handler
06ba 0001 | | .CONST 0x0001 ; Number of locals
06bb BODY_06b8:
06bb INIT_06b8:
06bb e5fc | | Load 0x2,-0x4
06bc 0092 0b33 | 3| Action Push_String_Extended,0xb33 ; "Acquiring Remote Connection => "
06be e5ff | | Load 0x2,-0x1
06bf 01cc | | Execute Vector,Catenate
06c0 e00f | | Load 0x0,0xf
06c1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06c2 e002 | | Load 0x0,0x2
06c3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06c4 e003 | | Load 0x0,0x3
06c5 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
06c6 e5fd | | Load 0x2,-0x3
06c7 e016 | | Load 0x0,0x16
06c8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06c9 e016 | | Load 0x0,0x16
06ca 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06cb e5ff | | Load 0x2,-0x1
06cc e5fe | | Load 0x2,-0x2
06cd e003 | | Load 0x0,0x3
06ce 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
06cf c5fb | | Store 0x2,-0x5
06d0 c5fa | | Store 0x2,-0x6
06d1 4800 |H | Short_Literal 0x0
06d2 e5fa | | Load 0x2,-0x6
06d3 e002 | | Load 0x0,0x2
06d4 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
06d5 7004 |p | Jump_Nonzero 0x6da
06d6 e5fc | | Load 0x2,-0x4
06d7 e5fa | | Load 0x2,-0x6
06d8 e002 | | Load 0x0,0x2
06d9 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
06da 4505 |E | Exit_Suprogram New_Top_Offset 0x5
06db 0000 0000 | | .BLANK 0000[0x5]
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e5 | | .CONST 0x06e5 ; Address of begin
06e1 0004 | | .CONST 0x0004 ; Address of exception handler
06e2 0002 | | .CONST 0x0002 ; Number of locals
06e3 INIT_06e0:
06e3 029f 0ac3 | | Declare_Subprogram INIT_0ac0,For_Call
06e5 BODY_06e0:
06e5 e5fe | | Load 0x2,-0x2
06e6 01db | | Execute Vector,Length
06e7 7008 |p | Jump_Nonzero 0x6f0
06e8 e00b | | Load 0x0,0xb
06e9 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
06ea 4806 |H | Short_Literal 0x6
06eb 6040 |`@ | Indirect_Literal Discrete,0x72c,{0x00000000, 0x0000818b}
06ec e002 | | Load 0x0,0x2
06ed 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06ee a5f9 | | Store_Unchecked 0x2,-0x7
06ef 782c |x, | Jump 0x71c
06f0 e5fb | | Load 0x2,-0x5
06f1 6814 |h | Jump_Zero 0x706
06f2 e5fa | | Load 0x2,-0x6
06f3 4801 |H | Short_Literal 0x1
06f4 4801 |H | Short_Literal 0x1
06f5 e00b | | Load 0x0,0xb
06f6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06f7 035b | [ | Declare_Type Array,Constrained
06f8 0337 | 7 | Declare_Variable Array
06f9 e5fe | | Load 0x2,-0x2
06fa e00b | | Load 0x0,0xb
06fb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06fc e00b | | Load 0x0,0xb
06fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06fe 0119 | | Execute Any,Check_In_Formal_Type
06ff 4801 |H | Short_Literal 0x1
0700 00da | | Load_Top At_Offset_2
0701 01d6 | | Execute Vector,Field_Write
0702 6025 |`% | Indirect_Literal Discrete,0x728,{0x00000000, 0x0000818e}
0703 e002 | | Load 0x0,0x2
0704 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0705 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0706 e002 | | Load 0x0,0x2
0707 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0708 4800 |H | Short_Literal 0x0
0709 e5fc | | Load 0x2,-0x4
070a e009 | | Load 0x0,0x9
070b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
070c e009 | | Load 0x0,0x9
070d 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
070e 4801 |H | Short_Literal 0x1
070f e5ff | | Load 0x2,-0x1
0710 e006 | | Load 0x0,0x6
0711 1868 | h | Execute Package,Field_Execute,Field_Number 0x68
0712 e5ff | | Load 0x2,-0x1
0713 e006 | | Load 0x0,0x6
0714 1869 | i | Execute Package,Field_Execute,Field_Number 0x69
0715 e5ff | | Load 0x2,-0x1
0716 8402 | | Call 0x2,0x2
0717 e5fd | | Load 0x2,-0x3
0718 e5fe | | Load 0x2,-0x2
0719 e003 | | Load 0x0,0x3
071a 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
071b c5f9 | | Store 0x2,-0x7
071c 4800 |H | Short_Literal 0x0
071d e5f9 | | Load 0x2,-0x7
071e e002 | | Load 0x0,0x2
071f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0720 7004 |p | Jump_Nonzero 0x725
0721 e5fa | | Load 0x2,-0x6
0722 e5f9 | | Load 0x2,-0x7
0723 e002 | | Load 0x0,0x2
0724 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0725 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0726 0000 0000 | | .XXX[0x2]
0728 0000 0000 | | .LITERAL {0x00000000, 0x0000818e}
072c 0000 0000 | | .LITERAL {0x00000000, 0x0000818b}
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 073b | ; | .CONST 0x073b ; Address of begin
0731 07ac | | .CONST 0x07ac ; Address of exception handler
0732 0002 | | .CONST 0x0002 ; Number of locals
0733 INIT_0730:
0733 e001 | | Load 0x0,0x1
0734 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0735 0322 | " | Declare_Variable Record
0736 00db | | Load_Top At_Offset_3
0737 e006 | | Load 0x0,0x6
0738 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0739 00d9 | | Load_Top At_Offset_1
073a 017d | } | Execute Record,Structure_Write
073b BODY_0730:
073b e5fa | | Load 0x2,-0x6
073c 702a |p* | Jump_Nonzero 0x767
073d 00d8 | | Load_Top At_Offset_0
073e e5fe | | Load 0x2,-0x2
073f e5fb | | Load 0x2,-0x5
0740 e5fc | | Load 0x2,-0x4
0741 e010 | | Load 0x0,0x10
0742 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0743 7023 |p# | Jump_Nonzero 0x767
0744 e5f9 | | Load 0x2,-0x7
0745 4801 |H | Short_Literal 0x1
0746 4802 |H | Short_Literal 0x2
0747 e00b | | Load 0x0,0xb
0748 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0749 035b | [ | Declare_Type Array,Constrained
074a 0337 | 7 | Declare_Variable Array
074b e5fc | | Load 0x2,-0x4
074c e00b | | Load 0x0,0xb
074d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
074e e00b | | Load 0x0,0xb
074f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0750 0119 | | Execute Any,Check_In_Formal_Type
0751 4801 |H | Short_Literal 0x1
0752 00da | | Load_Top At_Offset_2
0753 01d6 | | Execute Vector,Field_Write
0754 e5fb | | Load 0x2,-0x5
0755 e00b | | Load 0x0,0xb
0756 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0757 e00b | | Load 0x0,0xb
0758 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0759 0119 | | Execute Any,Check_In_Formal_Type
075a 4802 |H | Short_Literal 0x2
075b 00da | | Load_Top At_Offset_2
075c 01d6 | | Execute Vector,Field_Write
075d 6082 |` | Indirect_Literal Discrete,0x7e0,{0x00000000, 0x000081c5}
075e e002 | | Load 0x0,0x2
075f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0760 e00b | | Load 0x0,0xb
0761 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0762 607d |`} | Indirect_Literal Discrete,0x7e0,{0x00000000, 0x000081c5}
0763 e002 | | Load 0x0,0x2
0764 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0765 a5f8 | | Store_Unchecked 0x2,-0x8
0766 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0767 00db | | Load_Top At_Offset_3
0768 e006 | | Load 0x0,0x6
0769 188c | | Execute Package,Field_Execute,Field_Number 0x8c
076a 01db | | Execute Vector,Length
076b 7001 |p | Jump_Nonzero 0x76d
076c 4508 |E | Exit_Suprogram New_Top_Offset 0x8
076d e5f8 | | Load 0x2,-0x8
076e e5f9 | | Load 0x2,-0x7
076f e5fa | | Load 0x2,-0x6
0770 e5fd | | Load 0x2,-0x3
0771 e5fe | | Load 0x2,-0x2
0772 00ea | | Load_Encached Null_String_Cache
0773 e5fc | | Load 0x2,-0x4
0774 e5ff | | Load 0x2,-0x1
0775 e006 | | Load 0x0,0x6
0776 18b8 | | Execute Package,Field_Execute,Field_Number 0xb8
0777 e5ff | | Load 0x2,-0x1
0778 821b | | Call 0x1,0x1b
0779 c5f8 | | Store 0x2,-0x8
077a 4800 |H | Short_Literal 0x0
077b e5f8 | | Load 0x2,-0x8
077c e002 | | Load 0x0,0x2
077d 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
077e 682c |h, | Jump_Zero 0x7ab
077f e5fa | | Load 0x2,-0x6
0780 702a |p* | Jump_Nonzero 0x7ab
0781 00d8 | | Load_Top At_Offset_0
0782 e5fe | | Load 0x2,-0x2
0783 e5fb | | Load 0x2,-0x5
0784 e5fc | | Load 0x2,-0x4
0785 e010 | | Load 0x0,0x10
0786 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0787 7023 |p# | Jump_Nonzero 0x7ab
0788 e5f9 | | Load 0x2,-0x7
0789 4801 |H | Short_Literal 0x1
078a 4802 |H | Short_Literal 0x2
078b e00b | | Load 0x0,0xb
078c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
078d 035b | [ | Declare_Type Array,Constrained
078e 0337 | 7 | Declare_Variable Array
078f e5fc | | Load 0x2,-0x4
0790 e00b | | Load 0x0,0xb
0791 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0792 e00b | | Load 0x0,0xb
0793 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0794 0119 | | Execute Any,Check_In_Formal_Type
0795 4801 |H | Short_Literal 0x1
0796 00da | | Load_Top At_Offset_2
0797 01d6 | | Execute Vector,Field_Write
0798 e5fb | | Load 0x2,-0x5
0799 e00b | | Load 0x0,0xb
079a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
079b e00b | | Load 0x0,0xb
079c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
079d 0119 | | Execute Any,Check_In_Formal_Type
079e 4802 |H | Short_Literal 0x2
079f 00da | | Load_Top At_Offset_2
07a0 01d6 | | Execute Vector,Field_Write
07a1 603a |`: | Indirect_Literal Discrete,0x7dc,{0x00000000, 0x000081c6}
07a2 e002 | | Load 0x0,0x2
07a3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
07a4 e00b | | Load 0x0,0xb
07a5 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
07a6 6035 |`5 | Indirect_Literal Discrete,0x7dc,{0x00000000, 0x000081c6}
07a7 e002 | | Load 0x0,0x2
07a8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07a9 a5f8 | | Store_Unchecked 0x2,-0x8
07aa 4508 |E | Exit_Suprogram New_Top_Offset 0x8
07ab 4508 |E | Exit_Suprogram New_Top_Offset 0x8
07ac TRAP_0730:
07ac e006 | | Load 0x0,0x6
07ad 1bbc | | Execute Package,Field_Read,Field_Number 0xbc
07ae 010f | | Execute Exception,Equal
07af 6824 |h$ | Jump_Zero 0x7d4
07b0 4801 |H | Short_Literal 0x1
07b1 4802 |H | Short_Literal 0x2
07b2 e00b | | Load 0x0,0xb
07b3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07b4 035b | [ | Declare_Type Array,Constrained
07b5 0337 | 7 | Declare_Variable Array
07b6 0092 0b34 | 4| Action Push_String_Extended,0xb34 ; "Change Directory Context"
07b8 e00b | | Load 0x0,0xb
07b9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07ba e00b | | Load 0x0,0xb
07bb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07bc 0119 | | Execute Any,Check_In_Formal_Type
07bd 4801 |H | Short_Literal 0x1
07be 00da | | Load_Top At_Offset_2
07bf 01d6 | | Execute Vector,Field_Write
07c0 e5ff | | Load 0x2,-0x1
07c1 e006 | | Load 0x0,0x6
07c2 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
07c3 e005 | | Load 0x0,0x5
07c4 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
07c5 e00b | | Load 0x0,0xb
07c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07c7 0119 | | Execute Any,Check_In_Formal_Type
07c8 4802 |H | Short_Literal 0x2
07c9 00da | | Load_Top At_Offset_2
07ca 01d6 | | Execute Vector,Field_Write
07cb 600c |` | Indirect_Literal Discrete,0x7d8,{0x00000000, 0x0000818c}
07cc e002 | | Load 0x0,0x2
07cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07ce a5f8 | | Store_Unchecked 0x2,-0x8
07cf e5f9 | | Load 0x2,-0x7
07d0 e5f8 | | Load 0x2,-0x8
07d1 e002 | | Load 0x0,0x2
07d2 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
07d3 4508 |E | Exit_Suprogram New_Top_Offset 0x8
07d4 0100 | | Execute Exception,Raise
07d5 0000 0000 | | .XXX[0x3]
07d7 0000 | |
07d8 0000 0000 | | .LITERAL {0x00000000, 0x0000818c}
07dc 0000 0000 | | .LITERAL {0x00000000, 0x000081c6}
07e0 0000 0000 | | .LITERAL {0x00000000, 0x000081c5}
07e4 0000 0000 | | .BLANK 0000[0x4]
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07ee | | .CONST 0x07ee ; Address of begin
07e9 0801 | | .CONST 0x0801 ; Address of exception handler
07ea 0002 | | .CONST 0x0002 ; Number of locals
07eb INIT_07e8:
07eb 00da | | Load_Top At_Offset_2
07ec e006 | | Load 0x0,0x6
07ed 1890 | | Execute Package,Field_Execute,Field_Number 0x90
07ee BODY_07e8:
07ee 00d8 | | Load_Top At_Offset_0
07ef 01db | | Execute Vector,Length
07f0 7001 |p | Jump_Nonzero 0x7f2
07f1 4508 |E | Exit_Suprogram New_Top_Offset 0x8
07f2 e5f8 | | Load 0x2,-0x8
07f3 e5f9 | | Load 0x2,-0x7
07f4 e5fa | | Load 0x2,-0x6
07f5 e5fd | | Load 0x2,-0x3
07f6 e5fe | | Load 0x2,-0x2
07f7 00ea | | Load_Encached Null_String_Cache
07f8 e5fb | | Load 0x2,-0x5
07f9 e5fc | | Load 0x2,-0x4
07fa e5ff | | Load 0x2,-0x1
07fb e006 | | Load 0x0,0x6
07fc 18b9 | | Execute Package,Field_Execute,Field_Number 0xb9
07fd e5ff | | Load 0x2,-0x1
07fe 821b | | Call 0x1,0x1b
07ff c5f8 | | Store 0x2,-0x8
0800 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0801 TRAP_07e8:
0801 e006 | | Load 0x0,0x6
0802 1bbc | | Execute Package,Field_Read,Field_Number 0xbc
0803 010f | | Execute Exception,Equal
0804 6824 |h$ | Jump_Zero 0x829
0805 4801 |H | Short_Literal 0x1
0806 4802 |H | Short_Literal 0x2
0807 e00b | | Load 0x0,0xb
0808 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0809 035b | [ | Declare_Type Array,Constrained
080a 0337 | 7 | Declare_Variable Array
080b 0092 0b35 | 5| Action Push_String_Extended,0xb35 ; "Change Library Context"
080d e00b | | Load 0x0,0xb
080e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
080f e00b | | Load 0x0,0xb
0810 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0811 0119 | | Execute Any,Check_In_Formal_Type
0812 4801 |H | Short_Literal 0x1
0813 00da | | Load_Top At_Offset_2
0814 01d6 | | Execute Vector,Field_Write
0815 e5ff | | Load 0x2,-0x1
0816 e006 | | Load 0x0,0x6
0817 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0818 e005 | | Load 0x0,0x5
0819 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
081a e00b | | Load 0x0,0xb
081b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
081c 0119 | | Execute Any,Check_In_Formal_Type
081d 4802 |H | Short_Literal 0x2
081e 00da | | Load_Top At_Offset_2
081f 01d6 | | Execute Vector,Field_Write
0820 67b7 |g | Indirect_Literal Discrete,0x7d8,{0x00000000, 0x0000818c}
0821 e002 | | Load 0x0,0x2
0822 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0823 a5f8 | | Store_Unchecked 0x2,-0x8
0824 e5f9 | | Load 0x2,-0x7
0825 e5f8 | | Load 0x2,-0x8
0826 e002 | | Load 0x0,0x2
0827 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0828 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0829 0100 | | Execute Exception,Raise
082a 0000 0000 | | .BLANK 0000[0x6]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0883 | | .CONST 0x0883 ; Address of begin
0831 091e | | .CONST 0x091e ; Address of exception handler
0832 000c | | .CONST 0x000c ; Number of locals
0833 INIT_0830:
0833 e001 | | Load 0x0,0x1
0834 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0835 02c7 | | Declare_Variable Any
0836 e5f6 | | Load 0x2,-0xa
0837 4801 |H | Short_Literal 0x1
0838 e5fe | | Load 0x2,-0x2
0839 e005 | | Load 0x0,0x5
083a 181c | | Execute Package,Field_Execute,Field_Number 0x1c
083b a402 | | Store_Unchecked 0x2,0x2
083c e5f6 | | Load 0x2,-0xa
083d e5fe | | Load 0x2,-0x2
083e e5ff | | Load 0x2,-0x1
083f e006 | | Load 0x0,0x6
0840 18bb | | Execute Package,Field_Execute,Field_Number 0xbb
0841 e5f6 | | Load 0x2,-0xa
0842 e5ff | | Load 0x2,-0x1
0843 e006 | | Load 0x0,0x6
0844 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0845 00db | | Load_Top At_Offset_3
0846 e007 | | Load 0x0,0x7
0847 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0848 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0849 0007 | | Action Break_Optional
084a e5f6 | | Load 0x2,-0xa
084b e5fe | | Load 0x2,-0x2
084c e5ff | | Load 0x2,-0x1
084d e006 | | Load 0x0,0x6
084e 18ba | | Execute Package,Field_Execute,Field_Number 0xba
084f e001 | | Load 0x0,0x1
0850 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0851 0322 | " | Declare_Variable Record
0852 e5ff | | Load 0x2,-0x1
0853 e006 | | Load 0x0,0x6
0854 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0855 00d9 | | Load_Top At_Offset_1
0856 017d | } | Execute Record,Structure_Write
0857 e5f6 | | Load 0x2,-0xa
0858 e5fe | | Load 0x2,-0x2
0859 4800 |H | Short_Literal 0x0
085a e5fb | | Load 0x2,-0x5
085b e009 | | Load 0x0,0x9
085c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
085d e009 | | Load 0x0,0x9
085e 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
085f 4800 |H | Short_Literal 0x0
0860 4801 |H | Short_Literal 0x1
0861 e5ff | | Load 0x2,-0x1
0862 e006 | | Load 0x0,0x6
0863 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0864 e017 | | Load 0x0,0x17
0865 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0866 e5f6 | | Load 0x2,-0xa
0867 e5fe | | Load 0x2,-0x2
0868 4800 |H | Short_Literal 0x0
0869 e5fb | | Load 0x2,-0x5
086a e009 | | Load 0x0,0x9
086b 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
086c e009 | | Load 0x0,0x9
086d 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
086e 4801 |H | Short_Literal 0x1
086f 4801 |H | Short_Literal 0x1
0870 e5ff | | Load 0x2,-0x1
0871 e006 | | Load 0x0,0x6
0872 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0873 e017 | | Load 0x0,0x17
0874 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0875 00da | | Load_Top At_Offset_2
0876 e018 | | Load 0x0,0x18
0877 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0878 e019 | | Load 0x0,0x19
0879 1844 | D | Execute Package,Field_Execute,Field_Number 0x44
087a e001 | | Load 0x0,0x1
087b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
087c 02c7 | | Declare_Variable Any
087d 00d8 | | Load_Top At_Offset_0
087e 1c00 | | Execute_Immediate Run_Utility,0x0
087f 029f 0adb | | Declare_Subprogram INIT_0ad8,For_Call
0881 029f 0af3 | | Declare_Subprogram INIT_0af0,For_Call
0883 BODY_0830:
0883 e5f8 | | Load 0x2,-0x8
0884 6803 |h | Jump_Zero 0x888
0885 e5fd | | Load 0x2,-0x3
0886 c40a | | Store 0x2,0xa
0887 7802 |x | Jump 0x88a
0888 e5fe | | Load 0x2,-0x2
0889 c40a | | Store 0x2,0xa
088a e406 | | Load 0x2,0x6
088b e5f8 | | Load 0x2,-0x8
088c e5fc | | Load 0x2,-0x4
088d e409 | | Load 0x2,0x9
088e e408 | | Load 0x2,0x8
088f e407 | | Load 0x2,0x7
0890 e403 | | Load 0x2,0x3
0891 e405 | | Load 0x2,0x5
0892 e404 | | Load 0x2,0x4
0893 e5fa | | Load 0x2,-0x6
0894 e40a | | Load 0x2,0xa
0895 e010 | | Load 0x0,0x10
0896 180d | | Execute Package,Field_Execute,Field_Number 0xd
0897 701a |p | Jump_Nonzero 0x8b2
0898 e5f6 | | Load 0x2,-0xa
0899 4801 |H | Short_Literal 0x1
089a 4801 |H | Short_Literal 0x1
089b e00b | | Load 0x0,0xb
089c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
089d 035b | [ | Declare_Type Array,Constrained
089e 0337 | 7 | Declare_Variable Array
089f e5fe | | Load 0x2,-0x2
08a0 e005 | | Load 0x0,0x5
08a1 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
08a2 e00b | | Load 0x0,0xb
08a3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08a4 0119 | | Execute Any,Check_In_Formal_Type
08a5 4801 |H | Short_Literal 0x1
08a6 00da | | Load_Top At_Offset_2
08a7 01d6 | | Execute Vector,Field_Write
08a8 60a7 |` | Indirect_Literal Discrete,0x950,{0x00000000, 0x000081bf}
08a9 e002 | | Load 0x0,0x2
08aa 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
08ab e00b | | Load 0x0,0xb
08ac 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
08ad 60a2 |` | Indirect_Literal Discrete,0x950,{0x00000000, 0x000081bf}
08ae e002 | | Load 0x0,0x2
08af 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08b0 a5f5 | | Store_Unchecked 0x2,-0xb
08b1 450b |E | Exit_Suprogram New_Top_Offset 0xb
08b2 e5ff | | Load 0x2,-0x1
08b3 e006 | | Load 0x0,0x6
08b4 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
08b5 01db | | Execute Vector,Length
08b6 0c01 | | Execute_Immediate Greater_Equal,0x1
08b7 6838 |h8 | Jump_Zero 0x8f0
08b8 840b | | Call 0x2,0xb
08b9 e5f8 | | Load 0x2,-0x8
08ba 680a |h | Jump_Zero 0x8c5
08bb e5f5 | | Load 0x2,-0xb
08bc e5f6 | | Load 0x2,-0xa
08bd e5f7 | | Load 0x2,-0x9
08be e5fb | | Load 0x2,-0x5
08bf e5fc | | Load 0x2,-0x4
08c0 e5f9 | | Load 0x2,-0x7
08c1 e5ff | | Load 0x2,-0x1
08c2 821b | | Call 0x1,0x1b
08c3 c5f5 | | Store 0x2,-0xb
08c4 782a |x* | Jump 0x8ef
08c5 e5f5 | | Load 0x2,-0xb
08c6 e5f6 | | Load 0x2,-0xa
08c7 e5f7 | | Load 0x2,-0x9
08c8 e5fb | | Load 0x2,-0x5
08c9 e5fc | | Load 0x2,-0x4
08ca e5f6 | | Load 0x2,-0xa
08cb e5fe | | Load 0x2,-0x2
08cc 4800 |H | Short_Literal 0x0
08cd e5fb | | Load 0x2,-0x5
08ce e009 | | Load 0x0,0x9
08cf 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
08d0 e009 | | Load 0x0,0x9
08d1 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
08d2 4801 |H | Short_Literal 0x1
08d3 4801 |H | Short_Literal 0x1
08d4 e5ff | | Load 0x2,-0x1
08d5 e006 | | Load 0x0,0x6
08d6 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
08d7 e017 | | Load 0x0,0x17
08d8 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
08d9 e5f6 | | Load 0x2,-0xa
08da e5fe | | Load 0x2,-0x2
08db 4800 |H | Short_Literal 0x0
08dc e5fb | | Load 0x2,-0x5
08dd e009 | | Load 0x0,0x9
08de 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
08df e009 | | Load 0x0,0x9
08e0 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
08e1 4800 |H | Short_Literal 0x0
08e2 4801 |H | Short_Literal 0x1
08e3 e5ff | | Load 0x2,-0x1
08e4 e006 | | Load 0x0,0x6
08e5 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
08e6 e017 | | Load 0x0,0x17
08e7 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
08e8 e5fa | | Load 0x2,-0x6
08e9 e5ff | | Load 0x2,-0x1
08ea e006 | | Load 0x0,0x6
08eb 18d6 | | Execute Package,Field_Execute,Field_Number 0xd6
08ec e5ff | | Load 0x2,-0x1
08ed 821b | | Call 0x1,0x1b
08ee c5f5 | | Store 0x2,-0xb
08ef 840c | | Call 0x2,0xc
08f0 4800 |H | Short_Literal 0x0
08f1 e5f5 | | Load 0x2,-0xb
08f2 e002 | | Load 0x0,0x2
08f3 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
08f4 6828 |h( | Jump_Zero 0x91d
08f5 e406 | | Load 0x2,0x6
08f6 e5f8 | | Load 0x2,-0x8
08f7 e5fc | | Load 0x2,-0x4
08f8 e409 | | Load 0x2,0x9
08f9 e408 | | Load 0x2,0x8
08fa e407 | | Load 0x2,0x7
08fb e403 | | Load 0x2,0x3
08fc e405 | | Load 0x2,0x5
08fd e404 | | Load 0x2,0x4
08fe e5fa | | Load 0x2,-0x6
08ff e40a | | Load 0x2,0xa
0900 e010 | | Load 0x0,0x10
0901 180e | | Execute Package,Field_Execute,Field_Number 0xe
0902 701a |p | Jump_Nonzero 0x91d
0903 e5f6 | | Load 0x2,-0xa
0904 4801 |H | Short_Literal 0x1
0905 4801 |H | Short_Literal 0x1
0906 e00b | | Load 0x0,0xb
0907 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0908 035b | [ | Declare_Type Array,Constrained
0909 0337 | 7 | Declare_Variable Array
090a e5fe | | Load 0x2,-0x2
090b e005 | | Load 0x0,0x5
090c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
090d e00b | | Load 0x0,0xb
090e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
090f 0119 | | Execute Any,Check_In_Formal_Type
0910 4801 |H | Short_Literal 0x1
0911 00da | | Load_Top At_Offset_2
0912 01d6 | | Execute Vector,Field_Write
0913 6038 |`8 | Indirect_Literal Discrete,0x94c,{0x00000000, 0x000081c0}
0914 e002 | | Load 0x0,0x2
0915 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0916 e00b | | Load 0x0,0xb
0917 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0918 6033 |`3 | Indirect_Literal Discrete,0x94c,{0x00000000, 0x000081c0}
0919 e002 | | Load 0x0,0x2
091a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
091b a5f5 | | Store_Unchecked 0x2,-0xb
091c 450b |E | Exit_Suprogram New_Top_Offset 0xb
091d 450b |E | Exit_Suprogram New_Top_Offset 0xb
091e TRAP_0830:
091e e006 | | Load 0x0,0x6
091f 1bbc | | Execute Package,Field_Read,Field_Number 0xbc
0920 010f | | Execute Exception,Equal
0921 6824 |h$ | Jump_Zero 0x946
0922 4801 |H | Short_Literal 0x1
0923 4802 |H | Short_Literal 0x2
0924 e00b | | Load 0x0,0xb
0925 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0926 035b | [ | Declare_Type Array,Constrained
0927 0337 | 7 | Declare_Variable Array
0928 0092 0b29 | )| Action Push_String_Extended,0xb29 ; "Compile"
092a e00b | | Load 0x0,0xb
092b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
092c e00b | | Load 0x0,0xb
092d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
092e 0119 | | Execute Any,Check_In_Formal_Type
092f 4801 |H | Short_Literal 0x1
0930 00da | | Load_Top At_Offset_2
0931 01d6 | | Execute Vector,Field_Write
0932 e5ff | | Load 0x2,-0x1
0933 e006 | | Load 0x0,0x6
0934 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0935 e005 | | Load 0x0,0x5
0936 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0937 e00b | | Load 0x0,0xb
0938 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0939 0119 | | Execute Any,Check_In_Formal_Type
093a 4802 |H | Short_Literal 0x2
093b 00da | | Load_Top At_Offset_2
093c 01d6 | | Execute Vector,Field_Write
093d 600a |` | Indirect_Literal Discrete,0x948,{0x00000000, 0x0000818c}
093e e002 | | Load 0x0,0x2
093f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0940 a5f5 | | Store_Unchecked 0x2,-0xb
0941 e5f6 | | Load 0x2,-0xa
0942 e5f5 | | Load 0x2,-0xb
0943 e002 | | Load 0x0,0x2
0944 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0945 450b |E | Exit_Suprogram New_Top_Offset 0xb
0946 0100 | | Execute Exception,Raise
0947 0000 | | .XXX[0x1]
0948 0000 0000 | | .LITERAL {0x00000000, 0x0000818c}
094c 0000 0000 | | .LITERAL {0x00000000, 0x000081c0}
0950 0000 0000 | | .LITERAL {0x00000000, 0x000081bf}
0954 0000 0000 | | .BLANK 0000[0x4]
0958 ; --------------------------------------------------------------------------------------
0958 ; SUBPROGRAM
0958 ; --------------------------------------------------------------------------------------
0958 0960 | ` | .CONST 0x0960 ; Address of begin
0959 096c | l | .CONST 0x096c ; Address of exception handler
095a 0002 | | .CONST 0x0002 ; Number of locals
095b INIT_0958:
095b e001 | | Load 0x0,0x1
095c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
095d 02c7 | | Declare_Variable Any
095e 00d8 | | Load_Top At_Offset_0
095f 1c00 | | Execute_Immediate Run_Utility,0x0
0960 BODY_0958:
0960 e5fe | | Load 0x2,-0x2
0961 4800 |H | Short_Literal 0x0
0962 e5ff | | Load 0x2,-0x1
0963 e005 | | Load 0x0,0x5
0964 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0965 c402 | | Store 0x2,0x2
0966 e5fe | | Load 0x2,-0x2
0967 4800 |H | Short_Literal 0x0
0968 00da | | Load_Top At_Offset_2
0969 e005 | | Load 0x0,0x5
096a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
096b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
096c TRAP_0958:
096c 0007 | | Action Break_Optional
096d e001 | | Load 0x0,0x1
096e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
096f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0970 ; --------------------------------------------------------------------------------------
0970 ; SUBPROGRAM
0970 ; --------------------------------------------------------------------------------------
0970 0981 | | .CONST 0x0981 ; Address of begin
0971 0004 | | .CONST 0x0004 ; Address of exception handler
0972 0003 | | .CONST 0x0003 ; Number of locals
0973 INIT_0970:
0973 e001 | | Load 0x0,0x1
0974 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0975 02c7 | | Declare_Variable Any
0976 00d8 | | Load_Top At_Offset_0
0977 1c00 | | Execute_Immediate Run_Utility,0x0
0978 e416 | | Load 0x2,0x16
0979 e5fe | | Load 0x2,-0x2
097a e403 | | Load 0x2,0x3
097b e417 | | Load 0x2,0x17
097c e406 | | Load 0x2,0x6
097d 8215 | | Call 0x1,0x15
097e e5fe | | Load 0x2,-0x2
097f e006 | | Load 0x0,0x6
0980 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
0981 BODY_0970:
0981 e5fd | | Load 0x2,-0x3
0982 0092 0b36 | 6| Action Push_String_Extended,0xb36 ; "Transferring => "
0984 e406 | | Load 0x2,0x6
0985 e001 | | Load 0x0,0x1
0986 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0987 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0988 01cc | | Execute Vector,Catenate
0989 e00f | | Load 0x0,0xf
098a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
098b e403 | | Load 0x2,0x3
098c 6803 |h | Jump_Zero 0x990
098d e407 | | Load 0x2,0x7
098e c602 | | Store 0x3,0x2
098f 7814 |x | Jump 0x9a4
0990 e406 | | Load 0x2,0x6
0991 c602 | | Store 0x3,0x2
0992 e5fd | | Load 0x2,-0x3
0993 00d8 | | Load_Top At_Offset_0
0994 4800 |H | Short_Literal 0x0
0995 e602 | | Load 0x3,0x2
0996 e005 | | Load 0x0,0x5
0997 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0998 e005 | | Load 0x0,0x5
0999 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
099a 6809 |h | Jump_Zero 0x9a4
099b e5fe | | Load 0x2,-0x2
099c 00da | | Load_Top At_Offset_2
099d 8211 | | Call 0x1,0x11
099e 00da | | Load_Top At_Offset_2
099f 8212 | | Call 0x1,0x12
09a0 e004 | | Load 0x0,0x4
09a1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
09a2 6801 |h | Jump_Zero 0x9a4
09a3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
09a4 e002 | | Load 0x0,0x2
09a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09a6 4800 |H | Short_Literal 0x0
09a7 e40c | | Load 0x2,0xc
09a8 e009 | | Load 0x0,0x9
09a9 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
09aa e009 | | Load 0x0,0x9
09ab 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
09ac 4800 |H | Short_Literal 0x0
09ad e40b | | Load 0x2,0xb
09ae e603 | | Load 0x3,0x3
09af e602 | | Load 0x3,0x2
09b0 e001 | | Load 0x0,0x1
09b1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
09b2 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
09b3 e003 | | Load 0x0,0x3
09b4 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
09b5 c40a | | Store 0x2,0xa
09b6 4800 |H | Short_Literal 0x0
09b7 e40a | | Load 0x2,0xa
09b8 e002 | | Load 0x0,0x2
09b9 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
09ba 7009 |p | Jump_Nonzero 0x9c4
09bb e5fd | | Load 0x2,-0x3
09bc e40a | | Load 0x2,0xa
09bd e002 | | Load 0x0,0x2
09be 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
09bf e40a | | Load 0x2,0xa
09c0 a5fc | | Store_Unchecked 0x2,-0x4
09c1 e009 | | Load 0x0,0x9
09c2 1b19 | | Execute Package,Field_Read,Field_Number 0x19
09c3 0257 | W | Execute Discrete,Raise
09c4 e5fd | | Load 0x2,-0x3
09c5 0092 0b37 | 7| Action Push_String_Extended,0xb37 ; "Retrieving remote update time for host unit => "
09c7 e406 | | Load 0x2,0x6
09c8 e001 | | Load 0x0,0x1
09c9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
09ca 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
09cb 01cc | | Execute Vector,Catenate
09cc e00f | | Load 0x0,0xf
09cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09ce e004 | | Load 0x0,0x4
09cf 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09d0 c411 | | Store 0x2,0x11
09d1 e403 | | Load 0x2,0x3
09d2 680a |h | Jump_Zero 0x9dd
09d3 e40a | | Load 0x2,0xa
09d4 e5fd | | Load 0x2,-0x3
09d5 4800 |H | Short_Literal 0x0
09d6 e5fe | | Load 0x2,-0x2
09d7 e40b | | Load 0x2,0xb
09d8 e406 | | Load 0x2,0x6
09d9 e416 | | Load 0x2,0x16
09da 8217 | | Call 0x1,0x17
09db c40a | | Store 0x2,0xa
09dc 780a |x | Jump 0x9e7
09dd e40a | | Load 0x2,0xa
09de e5fd | | Load 0x2,-0x3
09df 4800 |H | Short_Literal 0x0
09e0 e5fe | | Load 0x2,-0x2
09e1 e40b | | Load 0x2,0xb
09e2 e417 | | Load 0x2,0x17
09e3 e416 | | Load 0x2,0x16
09e4 e406 | | Load 0x2,0x6
09e5 8216 | | Call 0x1,0x16
09e6 c40a | | Store 0x2,0xa
09e7 4800 |H | Short_Literal 0x0
09e8 e40a | | Load 0x2,0xa
09e9 e002 | | Load 0x0,0x2
09ea 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
09eb 7016 |p | Jump_Nonzero 0xa02
09ec e5fd | | Load 0x2,-0x3
09ed 4801 |H | Short_Literal 0x1
09ee 4801 |H | Short_Literal 0x1
09ef e00b | | Load 0x0,0xb
09f0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09f1 035b | [ | Declare_Type Array,Constrained
09f2 0337 | 7 | Declare_Variable Array
09f3 e406 | | Load 0x2,0x6
09f4 e005 | | Load 0x0,0x5
09f5 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
09f6 e00b | | Load 0x0,0xb
09f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
09f8 0119 | | Execute Any,Check_In_Formal_Type
09f9 4801 |H | Short_Literal 0x1
09fa 00da | | Load_Top At_Offset_2
09fb 01d6 | | Execute Vector,Field_Write
09fc 6017 |` | Indirect_Literal Discrete,0xa14,{0x00000000, 0x0000815e}
09fd e002 | | Load 0x0,0x2
09fe 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
09ff 4800 |H | Short_Literal 0x0
0a00 a40a | | Store_Unchecked 0x2,0xa
0a01 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a02 e5fd | | Load 0x2,-0x3
0a03 0092 0b38 | 8| Action Push_String_Extended,0xb38 ; "Elapsed time for setting download time => "
0a05 e411 | | Load 0x2,0x11
0a06 e004 | | Load 0x0,0x4
0a07 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0a08 e004 | | Load 0x0,0x4
0a09 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a0a e01a | | Load 0x0,0x1a
0a0b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0a0c 01cc | | Execute Vector,Catenate
0a0d 0092 0b39 | 9| Action Push_String_Extended,0xb39 ; " seconds."
0a0f 01cc | | Execute Vector,Catenate
0a10 e00f | | Load 0x0,0xf
0a11 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a12 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a13 0000 | | .XXX[0x1]
0a14 0000 0000 | | .LITERAL {0x00000000, 0x0000815e}
0a18 ; --------------------------------------------------------------------------------------
0a18 ; SUBPROGRAM
0a18 ; --------------------------------------------------------------------------------------
0a18 0a2b | + | .CONST 0x0a2b ; Address of begin
0a19 0004 | | .CONST 0x0004 ; Address of exception handler
0a1a 0005 | | .CONST 0x0005 ; Number of locals
0a1b INIT_0a18:
0a1b e002 | | Load 0x0,0x2
0a1c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a1d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a1e e001 | | Load 0x0,0x1
0a1f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a20 02c7 | | Declare_Variable Any
0a21 e5fd | | Load 0x2,-0x3
0a22 4800 |H | Short_Literal 0x0
0a23 e5ff | | Load 0x2,-0x1
0a24 e005 | | Load 0x0,0x5
0a25 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0a26 a603 | | Store_Unchecked 0x3,0x3
0a27 00e1 | | Load_Encached Boolean_Cache
0a28 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a29 029f 0b0b | | Declare_Subprogram INIT_0b08,For_Call
0a2b BODY_0a18:
0a2b e5fd | | Load 0x2,-0x3
0a2c 0092 0b3a | :| Action Push_String_Extended,0xb3a ; "Promoting => "
0a2e e406 | | Load 0x2,0x6
0a2f e001 | | Load 0x0,0x1
0a30 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a31 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0a32 01cc | | Execute Vector,Catenate
0a33 e00f | | Load 0x0,0xf
0a34 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a35 e40f | | Load 0x2,0xf
0a36 e410 | | Load 0x2,0x10
0a37 0279 | y | Execute Discrete,And
0a38 e40f | | Load 0x2,0xf
0a39 0f00 | | Execute_Immediate Equal,0x0
0a3a 0278 | x | Execute Discrete,Or
0a3b 6802 |h | Jump_Zero 0xa3e
0a3c 4801 |H | Short_Literal 0x1
0a3d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0a3e e40d | | Load 0x2,0xd
0a3f 0f00 | | Execute_Immediate Equal,0x0
0a40 00da | | Load_Top At_Offset_2
0a41 0279 | y | Execute Discrete,And
0a42 6812 |h | Jump_Zero 0xa55
0a43 e40a | | Load 0x2,0xa
0a44 e003 | | Load 0x0,0x3
0a45 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0a46 e5fd | | Load 0x2,-0x3
0a47 e40e | | Load 0x2,0xe
0a48 e5fe | | Load 0x2,-0x2
0a49 e415 | | Load 0x2,0x15
0a4a 821a | | Call 0x1,0x1a
0a4b c40b | | Store 0x2,0xb
0a4c c40a | | Store 0x2,0xa
0a4d 4800 |H | Short_Literal 0x0
0a4e e40a | | Load 0x2,0xa
0a4f e002 | | Load 0x0,0x2
0a50 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a51 7003 |p | Jump_Nonzero 0xa55
0a52 e009 | | Load 0x0,0x9
0a53 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0a54 0257 | W | Execute Discrete,Raise
0a55 e40f | | Load 0x2,0xf
0a56 7012 |p | Jump_Nonzero 0xa69
0a57 e40a | | Load 0x2,0xa
0a58 e5fd | | Load 0x2,-0x3
0a59 e40d | | Load 0x2,0xd
0a5a e414 | | Load 0x2,0x14
0a5b e416 | | Load 0x2,0x16
0a5c e40c | | Load 0x2,0xc
0a5d e40b | | Load 0x2,0xb
0a5e e5fe | | Load 0x2,-0x2
0a5f 821c | | Call 0x1,0x1c
0a60 c40a | | Store 0x2,0xa
0a61 4800 |H | Short_Literal 0x0
0a62 e40a | | Load 0x2,0xa
0a63 e002 | | Load 0x0,0x2
0a64 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a65 7003 |p | Jump_Nonzero 0xa69
0a66 e009 | | Load 0x0,0x9
0a67 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0a68 0257 | W | Execute Discrete,Raise
0a69 00d9 | | Load_Top At_Offset_1
0a6a e40d | | Load 0x2,0xd
0a6b 0f00 | | Execute_Immediate Equal,0x0
0a6c 0279 | y | Execute Discrete,And
0a6d 6801 |h | Jump_Zero 0xa6f
0a6e 8418 | | Call 0x2,0x18
0a6f e40f | | Load 0x2,0xf
0a70 7012 |p | Jump_Nonzero 0xa83
0a71 e40a | | Load 0x2,0xa
0a72 e5fd | | Load 0x2,-0x3
0a73 e40d | | Load 0x2,0xd
0a74 e414 | | Load 0x2,0x14
0a75 e416 | | Load 0x2,0x16
0a76 e40c | | Load 0x2,0xc
0a77 e40b | | Load 0x2,0xb
0a78 e5fe | | Load 0x2,-0x2
0a79 821d | | Call 0x1,0x1d
0a7a c40a | | Store 0x2,0xa
0a7b 4800 |H | Short_Literal 0x0
0a7c e40a | | Load 0x2,0xa
0a7d e002 | | Load 0x0,0x2
0a7e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0a7f 7004 |p | Jump_Nonzero 0xa84
0a80 e009 | | Load 0x0,0x9
0a81 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0a82 0257 | W | Execute Discrete,Raise
0a83 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a84 e403 | | Load 0x2,0x3
0a85 6802 |h | Jump_Zero 0xa88
0a86 8605 | | Call 0x3,0x5
0a87 7826 |x& | Jump 0xaae
0a88 e40a | | Load 0x2,0xa
0a89 e5fd | | Load 0x2,-0x3
0a8a e40d | | Load 0x2,0xd
0a8b 4800 |H | Short_Literal 0x0
0a8c 00ea | | Load_Encached Null_String_Cache
0a8d e417 | | Load 0x2,0x17
0a8e e40c | | Load 0x2,0xc
0a8f e40b | | Load 0x2,0xb
0a90 e001 | | Load 0x0,0x1
0a91 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a92 e5ff | | Load 0x2,-0x1
0a93 e5fe | | Load 0x2,-0x2
0a94 821e | | Call 0x1,0x1e
0a95 c40a | | Store 0x2,0xa
0a96 00db | | Load_Top At_Offset_3
0a97 e40b | | Load 0x2,0xb
0a98 e5fd | | Load 0x2,-0x3
0a99 e40c | | Load 0x2,0xc
0a9a 00ea | | Load_Encached Null_String_Cache
0a9b e414 | | Load 0x2,0x14
0a9c e415 | | Load 0x2,0x15
0a9d e416 | | Load 0x2,0x16
0a9e e417 | | Load 0x2,0x17
0a9f e5ff | | Load 0x2,-0x1
0aa0 0092 0b3b | ;| Action Push_String_Extended,0xb3b ; "Promote"
0aa2 e006 | | Load 0x0,0x6
0aa3 18c8 | | Execute Package,Field_Execute,Field_Number 0xc8
0aa4 e40a | | Load 0x2,0xa
0aa5 e006 | | Load 0x0,0x6
0aa6 18e1 | | Execute Package,Field_Execute,Field_Number 0xe1
0aa7 e5fe | | Load 0x2,-0x2
0aa8 e006 | | Load 0x0,0x6
0aa9 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0aaa e011 | | Load 0x0,0x11
0aab 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0aac c40b | | Store 0x2,0xb
0aad c602 | | Store 0x3,0x2
0aae e40d | | Load 0x2,0xd
0aaf 6801 |h | Jump_Zero 0xab1
0ab0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ab1 4800 |H | Short_Literal 0x0
0ab2 e602 | | Load 0x3,0x2
0ab3 e002 | | Load 0x0,0x2
0ab4 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0ab5 7005 |p | Jump_Nonzero 0xabb
0ab6 e012 | | Load 0x0,0x12
0ab7 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ab8 e602 | | Load 0x3,0x2
0ab9 e002 | | Load 0x0,0x2
0aba 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0abb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0abc 0000 0000 | | .BLANK 0000[0x4]
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; SUBPROGRAM
0ac0 ; --------------------------------------------------------------------------------------
0ac0 0ac5 | | .CONST 0x0ac5 ; Address of begin
0ac1 0004 | | .CONST 0x0004 ; Address of exception handler
0ac2 0002 | | .CONST 0x0002 ; Number of locals
0ac3 INIT_0ac0:
0ac3 e019 | | Load 0x0,0x19
0ac4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0ac5 BODY_0ac0:
0ac5 00db | | Load_Top At_Offset_3
0ac6 e006 | | Load 0x0,0x6
0ac7 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0ac8 e018 | | Load 0x0,0x18
0ac9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0aca e019 | | Load 0x0,0x19
0acb 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60
0acc 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0acd 00d8 | | Load_Top At_Offset_0
0ace 7003 |p | Jump_Nonzero 0xad2
0acf 0092 0b3c | <| Action Push_String_Extended,0xb3c ; "Unix"
0ad1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ad2 0092 0b3d | =| Action Push_String_Extended,0xb3d ; "Other"
0ad4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0ad5 0000 0000 | | .XXX[0x3]
0ad7 0000 | |
0ad8 ; --------------------------------------------------------------------------------------
0ad8 ; SUBPROGRAM
0ad8 ; --------------------------------------------------------------------------------------
0ad8 0ade | | .CONST 0x0ade ; Address of begin
0ad9 0004 | | .CONST 0x0004 ; Address of exception handler
0ada 0002 | | .CONST 0x0002 ; Number of locals
0adb INIT_0ad8:
0adb e5ff | | Load 0x2,-0x1
0adc e006 | | Load 0x0,0x6
0add 18cc | | Execute Package,Field_Execute,Field_Number 0xcc
0ade BODY_0ad8:
0ade 00d8 | | Load_Top At_Offset_0
0adf 01db | | Execute Vector,Length
0ae0 0c01 | | Execute_Immediate Greater_Equal,0x1
0ae1 6809 |h | Jump_Zero 0xaeb
0ae2 e5f5 | | Load 0x2,-0xb
0ae3 e5f6 | | Load 0x2,-0xa
0ae4 e5f7 | | Load 0x2,-0x9
0ae5 e5fb | | Load 0x2,-0x5
0ae6 e5fc | | Load 0x2,-0x4
0ae7 e602 | | Load 0x3,0x2
0ae8 e5ff | | Load 0x2,-0x1
0ae9 821b | | Call 0x1,0x1b
0aea c5f5 | | Store 0x2,-0xb
0aeb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0aec 0000 0000 | | .BLANK 0000[0x4]
0af0 ; --------------------------------------------------------------------------------------
0af0 ; SUBPROGRAM
0af0 ; --------------------------------------------------------------------------------------
0af0 0af8 | | .CONST 0x0af8 ; Address of begin
0af1 0004 | | .CONST 0x0004 ; Address of exception handler
0af2 0003 | | .CONST 0x0003 ; Number of locals
0af3 INIT_0af0:
0af3 e002 | | Load 0x0,0x2
0af4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0af5 e5ff | | Load 0x2,-0x1
0af6 e006 | | Load 0x0,0x6
0af7 18cd | | Execute Package,Field_Execute,Field_Number 0xcd
0af8 BODY_0af0:
0af8 00d8 | | Load_Top At_Offset_0
0af9 01db | | Execute Vector,Length
0afa 0c01 | | Execute_Immediate Greater_Equal,0x1
0afb 6809 |h | Jump_Zero 0xb05
0afc 00d9 | | Load_Top At_Offset_1
0afd e5f6 | | Load 0x2,-0xa
0afe e5f7 | | Load 0x2,-0x9
0aff e5fb | | Load 0x2,-0x5
0b00 e5fc | | Load 0x2,-0x4
0b01 e603 | | Load 0x3,0x3
0b02 e5ff | | Load 0x2,-0x1
0b03 821b | | Call 0x1,0x1b
0b04 005a | Z | Store_Top Discrete,At_Offset_2
0b05 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b06 0000 0000 | | .XXX[0x2]
0b08 ; --------------------------------------------------------------------------------------
0b08 ; SUBPROGRAM
0b08 ; --------------------------------------------------------------------------------------
0b08 0b11 | | .CONST 0x0b11 ; Address of begin
0b09 0004 | | .CONST 0x0004 ; Address of exception handler
0b0a 0003 | | .CONST 0x0003 ; Number of locals
0b0b INIT_0b08:
0b0b e5fd | | Load 0x2,-0x3
0b0c e406 | | Load 0x2,0x6
0b0d e01b | | Load 0x0,0x1b
0b0e 1870 | p | Execute Package,Field_Execute,Field_Number 0x70
0b0f e406 | | Load 0x2,0x6
0b10 8214 | | Call 0x1,0x14
0b11 BODY_0b08:
0b11 4800 |H | Short_Literal 0x0
0b12 00da | | Load_Top At_Offset_2
0b13 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0b14 e002 | | Load 0x0,0x2
0b15 1847 | G | Execute Package,Field_Execute,Field_Number 0x47
0b16 7003 |p | Jump_Nonzero 0xb1a
0b17 e002 | | Load 0x0,0x2
0b18 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0b19 0257 | W | Execute Discrete,Raise
0b1a e40a | | Load 0x2,0xa
0b1b e5fd | | Load 0x2,-0x3
0b1c e40d | | Load 0x2,0xd
0b1d 4801 |H | Short_Literal 0x1
0b1e e802 | | Load 0x4,0x2
0b1f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0b20 e803 | | Load 0x4,0x3
0b21 e40c | | Load 0x2,0xc
0b22 e40b | | Load 0x2,0xb
0b23 e406 | | Load 0x2,0x6
0b24 e5ff | | Load 0x2,-0x1
0b25 e5fe | | Load 0x2,-0x2
0b26 821e | | Call 0x1,0x1e
0b27 c40a | | Store 0x2,0xa
0b28 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b29 ; --------------------------------------------------------------------------------------
0b29 ; STRING TABLE
0b29 ; --------------------------------------------------------------------------------------
0b29 002c | , | .STRTAB 0x002c->0x0b3f ; "Compile"
0b2a 0031 | 1 | .STRTAB 0x0031->0x0b42 ; "<error>"
0b2b 0036 | 6 | .STRTAB 0x0036->0x0b46 ; "Rcf_Compilation.Compile_Operations.Promote"
0b2c 005e | ^ | .STRTAB 0x005e->0x0b5b ; "Demoting => "
0b2d 0069 | i | .STRTAB 0x0069->0x0b61 ; "Demote"
0b2e 006d | m | .STRTAB 0x006d->0x0b64 ; "Rcf_Compilation.Compile_Operations.Demote"
0b2f 0094 | | .STRTAB 0x0094->0x0b79 ; "}?{ Check_Unit Rcf_Compilation.Compile_Operations."
0b30 00c7 | | .STRTAB 0x00c7->0x0b93 ; "Target_Builder.Unit.Establish_Download_Time"
0b31 00f0 | | .STRTAB 0x00f0->0x0ba9 ; "Setting download time for => "
0b32 010c | | .STRTAB 0x010c->0x0bb8 ; " to "
0b33 010e | | .STRTAB 0x010e->0x0bba ; "Acquiring Remote Connection => "
0b34 012c | , | .STRTAB 0x012c->0x0bca ; "Change Directory Context"
0b35 0142 | B | .STRTAB 0x0142->0x0bd6 ; "Change Library Context"
0b36 0156 | V | .STRTAB 0x0156->0x0be1 ; "Transferring => "
0b37 0165 | e | .STRTAB 0x0165->0x0be9 ; "Retrieving remote update time for host unit => "
0b38 0193 | | .STRTAB 0x0193->0x0c01 ; "Elapsed time for setting download time => "
0b39 01bb | | .STRTAB 0x01bb->0x0c16 ; " seconds."
0b3a 01c2 | | .STRTAB 0x01c2->0x0c1b ; "Promoting => "
0b3b 01ce | | .STRTAB 0x01ce->0x0c22 ; "Promote"
0b3c 01d3 | | .STRTAB 0x01d3->0x0c25 ; "Unix"
0b3d 01d5 | | .STRTAB 0x01d5->0x0c27 ; "Other"
0b3e 01d8 | | .STREND 0x01d8->0x0c2a
0b3f 436f 6d70 |Comp| .STRTAB_STRINGS
0c2a 0000 0000 | | .BLANK 0000[0x6]
0c30 ; --------------------------------------------------------------------------------------
0c30 ; Debug Table
0c30 ; --------------------------------------------------------------------------------------
0c30 0004 000f | | .DEBUG4 0x0004,0x000f,0x2ee1,0x0000,0x0001,0x0000
0c36 0000 0000 | | .XXX[0x26]
0c38 09d2 5004 | P |
0c3a 0800 0138 | 8|
0c3c 313f 7d0b |1?} |
0c3e 0000 a2d2 | |
0c40 09d2 5004 | P |
0c42 0800 0138 | 8|
0c44 313f 7d0b |1?} |
0c46 0008 b8b2 | |
0c48 0000 0000 | |
0c4a 0000 003f | ?|
0c4c 0000 0000 | |
0c4e 0000 1fff | |
0c50 0000 0000 | |
0c52 0000 0049 | I|
0c54 0000 0000 | |
0c56 8098 000e | |
0c58 0000 0000 | |
0c5a 0000 0076 | v|
0c5c 0000 0000 | | .BLANK 0000[0x7]
0c63 0009 | | .XXX[0x1]
0c64 0000 0000 | | .BLANK 0000[0x6]
0c6a 8000 0000 | | .XXX[0xa]
0c6c 8015 b90b | |
0c6e 0016 0002 | |
0c70 000e 5ceb | \ |
0c72 8800 0110 | |
0c74 0000 0000 | | .BLANK 0000[0x4]
0c78 000c f0eb | | .XXX[0x4]
0c7a 8000 07c4 | |
0c7c 0000 0000 | | .BLANK 0000[0x4]
0c80 000d 28eb | ( | .XXX[0x4]
0c82 8800 0110 | |
0c84 0000 0000 | | .BLANK 0000[0x4]
0c88 000e c0eb | | .XXX[0x2c]
0c8a 0000 0036 | 6|
0c8c 0015 a90b | |
0c8e 0000 a9b2 | |
0c90 000e c0eb | |
0c92 0000 0036 | 6|
0c94 0015 a90b | |
0c96 0000 ae32 | 2|
0c98 000e c0eb | |
0c9a 0000 0036 | 6|
0c9c 0015 a90b | |
0c9e 0000 b1b2 | |
0ca0 000e c0eb | |
0ca2 0000 0036 | 6|
0ca4 0015 a90b | |
0ca6 0000 b4b2 | |
0ca8 000e c0eb | |
0caa 0000 0036 | 6|
0cac 0015 a90b | |
0cae 0000 b732 | 2|
0cb0 000d 28eb | ( |
0cb2 8800 0110 | |
0cb4 0000 0000 | | .BLANK 0000[0x4]
0cb8 000c f0eb | | .XXX[0x10]
0cba 0000 07c4 | |
0cbc 000e c0eb | |
0cbe 0000 0001 | |
0cc0 000d 28eb | ( |
0cc2 0000 1a44 | D|
0cc4 000e c0eb | |
0cc6 0000 0021 | !|
0cc8 0000 0000 | | .BLANK 0000[0x4]
0ccc bfff ffff | | .XXX[0x2c]
0cce 8000 0001 | |
0cd0 000d 28eb | ( |
0cd2 0000 1a44 | D|
0cd4 000e c0eb | |
0cd6 0000 0021 | !|
0cd8 000e c0eb | |
0cda 0000 0c16 | |
0cdc 0015 a90b | |
0cde 0000 40b3 | @ |
0ce0 000d 70eb | p |
0ce2 0800 1390 | |
0ce4 0000 0000 | |
0ce6 0000 0001 | |
0ce8 000d 70eb | p |
0cea 0000 007f | |
0cec 0015 a90b | |
0cee 0000 4042 | @B|
0cf0 000d 70eb | p |
0cf2 0000 003f | ?|
0cf4 0001 8025 | %|
0cf6 0000 0061 | a|
0cf8 0000 0000 | | .BLANK 0000[0x8]
0d00 000d 70eb | p | .XXX[0x6]
0d02 0000 1218 | |
0d04 000d 84eb | |
0d06 0000 0000 | | .BLANK 0000[0xfa]