|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 04a8 | | .CONST 0x04a8 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0031 | 1 | .CONST 0x0031 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001a | | .CONST 0x001a ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 4800 |H | Short_Literal 0x0
0018 4805 |H | Short_Literal 0x5
0019 029f 003b | ;| Declare_Subprogram INIT_0038,For_Call
001b 03fe | | Declare_Type Discrete,Defined,Visible
001c c212 | | Store 0x1,0x12
001d 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
001f c217 | | Store 0x1,0x17
0020 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated
0022 c218 | | Store 0x1,0x18
0023 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
0025 c215 | | Store 0x1,0x15
0026 00bf | | Action Accept_Activation
0027 029d 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call
0029 029d 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call
002b 1d17 | | Execute_Immediate Reference_Lex_1,0x17
002c 00c7 | | Action Elaborate_Subprogram
002d 1d18 | | Execute_Immediate Reference_Lex_1,0x18
002e 00c7 | | Action Elaborate_Subprogram
002f 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0030 00c7 | | Action Elaborate_Subprogram
0031 BODY_0008:
0031 00bc | | Action Signal_Activated
0032 00bb | | Action Signal_Completion
0033 0000 0000 | | .BLANK 0000[0x5]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b | ; | .CONST 0x003b ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0001 | | .CONST 0x0001 ; Number of locals
003b BODY_0038:
003b INIT_0038:
003b 4607 |F | Jump_Case 0x8
003c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
003d 7806 |x | Jump 0x44 ; case 0x1
003e 7809 |x | Jump 0x48 ; case 0x2
003f 780d |x | Jump 0x4d ; case 0x3
0040 7810 |x | Jump 0x51 ; case 0x4
0041 7811 |x | Jump 0x53 ; case 0x5
0042 7812 |x | Jump 0x55 ; case 0x6
0043 7815 |x | Jump 0x59 ; case 0x7
0044 00da | | Load_Top At_Offset_2
0045 0091 0432 | 2| Action Push_String_Extended_Indexed,0x432 ; "IS_CONSISTENT"
0047 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0048 00db | | Load_Top At_Offset_3
0049 00db | | Load_Top At_Offset_3
004a 00e0 | | Load_Encached Standard_Cache
004b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
004c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
004d 00da | | Load_Top At_Offset_2
004e 00e0 | | Load_Encached Standard_Cache
004f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0050 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0051 00db | | Load_Top At_Offset_3
0052 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0053 00db | | Load_Top At_Offset_3
0054 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0055 e212 | | Load 0x1,0x12
0056 00dc | | Load_Top At_Offset_4
0057 0267 | g | Execute Discrete,Predecessor
0058 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0059 e212 | | Load 0x1,0x12
005a 00dc | | Load_Top At_Offset_4
005b 0268 | h | Execute Discrete,Successor
005c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
005d 0000 0000 | | .XXX[0x3]
005f 0000 | |
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0090 | | .CONST 0x0090 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 000a | | .CONST 0x000a ; Number of locals
0063 INIT_0060:
0063 00e1 | | Load_Encached Boolean_Cache
0064 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0065 e001 | | Load 0x0,0x1
0066 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0067 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0068 e002 | | Load 0x0,0x2
0069 1b0f | | Execute Package,Field_Read,Field_Number 0xf
006a 02c7 | | Declare_Variable Any
006b 00d8 | | Load_Top At_Offset_0
006c 1c00 | | Execute_Immediate Run_Utility,0x0
006d e002 | | Load 0x0,0x2
006e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
006f 02c7 | | Declare_Variable Any
0070 e5f8 | | Load 0x2,-0x8
0071 4801 |H | Short_Literal 0x1
0072 e5ff | | Load 0x2,-0x1
0073 e003 | | Load 0x0,0x3
0074 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0075 a405 | | Store_Unchecked 0x2,0x5
0076 e5f8 | | Load 0x2,-0x8
0077 e5fb | | Load 0x2,-0x5
0078 e5fd | | Load 0x2,-0x3
0079 e5fe | | Load 0x2,-0x2
007a e004 | | Load 0x0,0x4
007b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
007c e5fd | | Load 0x2,-0x3
007d e005 | | Load 0x0,0x5
007e 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
007f e005 | | Load 0x0,0x5
0080 18ca | | Execute Package,Field_Execute,Field_Number 0xca
0081 e005 | | Load 0x0,0x5
0082 1bc9 | | Execute Package,Field_Read,Field_Number 0xc9
0083 03f1 | | Declare_Variable Discrete,With_Value
0084 e006 | | Load 0x0,0x6
0085 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0086 02c7 | | Declare_Variable Any
0087 00d8 | | Load_Top At_Offset_0
0088 1c00 | | Execute_Immediate Run_Utility,0x0
0089 e006 | | Load 0x0,0x6
008a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
008b 02c7 | | Declare_Variable Any
008c 00d8 | | Load_Top At_Offset_0
008d 1c00 | | Execute_Immediate Run_Utility,0x0
008e 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call
0090 BODY_0060:
0090 e5f8 | | Load 0x2,-0x8
0091 e5fe | | Load 0x2,-0x2
0092 e003 | | Load 0x0,0x3
0093 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0094 682a |h* | Jump_Zero 0xbf
0095 e5f8 | | Load 0x2,-0x8
0096 4801 |H | Short_Literal 0x1
0097 4803 |H | Short_Literal 0x3
0098 e007 | | Load 0x0,0x7
0099 1b0f | | Execute Package,Field_Read,Field_Number 0xf
009a 0334 | 4 | Declare_Variable Array,With_Constraint
009b e5ff | | Load 0x2,-0x1
009c e003 | | Load 0x0,0x3
009d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
009e e007 | | Load 0x0,0x7
009f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00a0 e007 | | Load 0x0,0x7
00a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a2 0119 | | Execute Any,Check_In_Formal_Type
00a3 4801 |H | Short_Literal 0x1
00a4 00da | | Load_Top At_Offset_2
00a5 01d6 | | Execute Vector,Field_Write
00a6 e5fb | | Load 0x2,-0x5
00a7 e007 | | Load 0x0,0x7
00a8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00a9 e007 | | Load 0x0,0x7
00aa 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00ab 0119 | | Execute Any,Check_In_Formal_Type
00ac 4802 |H | Short_Literal 0x2
00ad 00da | | Load_Top At_Offset_2
00ae 01d6 | | Execute Vector,Field_Write
00af 0092 0438 | 8| Action Push_String_Extended,0x438 ; "Remote unit is inaccessible when Host_Only = True"
00b1 e007 | | Load 0x0,0x7
00b2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00b3 e007 | | Load 0x0,0x7
00b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00b5 0119 | | Execute Any,Check_In_Formal_Type
00b6 4803 |H | Short_Literal 0x3
00b7 00da | | Load_Top At_Offset_2
00b8 01d6 | | Execute Vector,Field_Write
00b9 4806 |H | Short_Literal 0x6
00ba 60a5 |` | Indirect_Literal Discrete,0x160,{0x00000000, 0x00008815}
00bb e001 | | Load 0x0,0x1
00bc 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
00bd 4804 |H | Short_Literal 0x4
00be 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
00bf 00db | | Load_Top At_Offset_3
00c0 0f00 | | Execute_Immediate Equal,0x0
00c1 e5fa | | Load 0x2,-0x6
00c2 0278 | x | Execute Discrete,Or
00c3 6818 |h | Jump_Zero 0xdc
00c4 e5f9 | | Load 0x2,-0x7
00c5 6814 |h | Jump_Zero 0xda
00c6 e001 | | Load 0x0,0x1
00c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c8 e404 | | Load 0x2,0x4
00c9 0120 | | Execute Any,Is_Value
00ca 6803 |h | Jump_Zero 0xce
00cb e002 | | Load 0x0,0x2
00cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00cd 7801 |x | Jump 0xcf
00ce e404 | | Load 0x2,0x4
00cf e5f8 | | Load 0x2,-0x8
00d0 e5ff | | Load 0x2,-0x1
00d1 e004 | | Load 0x0,0x4
00d2 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
00d3 c404 | | Store 0x2,0x4
00d4 c403 | | Store 0x2,0x3
00d5 e403 | | Load 0x2,0x3
00d6 6803 |h | Jump_Zero 0xda
00d7 e001 | | Load 0x0,0x1
00d8 1b17 | | Execute Package,Field_Read,Field_Number 0x17
00d9 0257 | W | Execute Discrete,Raise
00da 840a | | Call 0x2,0xa
00db 787f |x | Jump 0x15b
00dc e5f9 | | Load 0x2,-0x7
00dd 6810 |h | Jump_Zero 0xee
00de e001 | | Load 0x0,0x1
00df 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e0 00db | | Load_Top At_Offset_3
00e1 0120 | | Execute Any,Is_Value
00e2 6803 |h | Jump_Zero 0xe6
00e3 e006 | | Load 0x0,0x6
00e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e5 7801 |x | Jump 0xe7
00e6 00db | | Load_Top At_Offset_3
00e7 e5f8 | | Load 0x2,-0x8
00e8 e5ff | | Load 0x2,-0x1
00e9 e004 | | Load 0x0,0x4
00ea 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
00eb c408 | | Store 0x2,0x8
00ec c403 | | Store 0x2,0x3
00ed 7811 |x | Jump 0xff
00ee e001 | | Load 0x0,0x1
00ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f0 00db | | Load_Top At_Offset_3
00f1 0120 | | Execute Any,Is_Value
00f2 6803 |h | Jump_Zero 0xf6
00f3 e006 | | Load 0x0,0x6
00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f5 7801 |x | Jump 0xf7
00f6 00db | | Load_Top At_Offset_3
00f7 e5f8 | | Load 0x2,-0x8
00f8 e5fd | | Load 0x2,-0x3
00f9 e5ff | | Load 0x2,-0x1
00fa e5fe | | Load 0x2,-0x2
00fb e004 | | Load 0x0,0x4
00fc 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
00fd c408 | | Store 0x2,0x8
00fe c403 | | Store 0x2,0x3
00ff e403 | | Load 0x2,0x3
0100 6817 |h | Jump_Zero 0x118
0101 e5f8 | | Load 0x2,-0x8
0102 4801 |H | Short_Literal 0x1
0103 4801 |H | Short_Literal 0x1
0104 e007 | | Load 0x0,0x7
0105 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0106 0334 | 4 | Declare_Variable Array,With_Constraint
0107 e5ff | | Load 0x2,-0x1
0108 e003 | | Load 0x0,0x3
0109 1818 | | Execute Package,Field_Execute,Field_Number 0x18
010a e007 | | Load 0x0,0x7
010b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
010c e007 | | Load 0x0,0x7
010d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
010e 0119 | | Execute Any,Check_In_Formal_Type
010f 4801 |H | Short_Literal 0x1
0110 00da | | Load_Top At_Offset_2
0111 01d6 | | Execute Vector,Field_Write
0112 6049 |`I | Indirect_Literal Discrete,0x15c,{0x00000000, 0x0000880e}
0113 e001 | | Load 0x0,0x1
0114 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0115 e001 | | Load 0x0,0x1
0116 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0117 0257 | W | Execute Discrete,Raise
0118 00d9 | | Load_Top At_Offset_1
0119 0120 | | Execute Any,Is_Value
011a 6803 |h | Jump_Zero 0x11e
011b e006 | | Load 0x0,0x6
011c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011d 7801 |x | Jump 0x11f
011e 00d9 | | Load_Top At_Offset_1
011f e001 | | Load 0x0,0x1
0120 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0121 4800 |H | Short_Literal 0x0
0122 e5fc | | Load 0x2,-0x4
0123 e406 | | Load 0x2,0x6
0124 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0125 e008 | | Load 0x0,0x8
0126 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0127 c403 | | Store 0x2,0x3
0128 c409 | | Store 0x2,0x9
0129 e403 | | Load 0x2,0x3
012a 6828 |h( | Jump_Zero 0x153
012b e5f8 | | Load 0x2,-0x8
012c 4801 |H | Short_Literal 0x1
012d 4803 |H | Short_Literal 0x3
012e e007 | | Load 0x0,0x7
012f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0130 0334 | 4 | Declare_Variable Array,With_Constraint
0131 e5ff | | Load 0x2,-0x1
0132 e003 | | Load 0x0,0x3
0133 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0134 e007 | | Load 0x0,0x7
0135 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0136 e007 | | Load 0x0,0x7
0137 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0138 0119 | | Execute Any,Check_In_Formal_Type
0139 4801 |H | Short_Literal 0x1
013a 00da | | Load_Top At_Offset_2
013b 01d6 | | Execute Vector,Field_Write
013c e5fb | | Load 0x2,-0x5
013d e007 | | Load 0x0,0x7
013e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
013f e007 | | Load 0x0,0x7
0140 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0141 0119 | | Execute Any,Check_In_Formal_Type
0142 4802 |H | Short_Literal 0x2
0143 00da | | Load_Top At_Offset_2
0144 01d6 | | Execute Vector,Field_Write
0145 e403 | | Load 0x2,0x3
0146 e001 | | Load 0x0,0x1
0147 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0148 e007 | | Load 0x0,0x7
0149 1b0e | | Execute Package,Field_Read,Field_Number 0xe
014a 0119 | | Execute Any,Check_In_Formal_Type
014b 4803 |H | Short_Literal 0x3
014c 00da | | Load_Top At_Offset_2
014d 01d6 | | Execute Vector,Field_Write
014e 6011 |` | Indirect_Literal Discrete,0x160,{0x00000000, 0x00008815}
014f e001 | | Load 0x0,0x1
0150 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0151 4804 |H | Short_Literal 0x4
0152 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
0153 00da | | Load_Top At_Offset_2
0154 00da | | Load_Top At_Offset_2
0155 012f | / | Execute Any,Equal
0156 6802 |h | Jump_Zero 0x159
0157 4800 |H | Short_Literal 0x0
0158 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
0159 4801 |H | Short_Literal 0x1
015a 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
015b 0831 | 1 | Execute_Immediate Raise,0x31
015c 0000 0000 | | .LITERAL {0x00000000, 0x0000880e}
0160 0000 0000 | | .LITERAL {0x00000000, 0x00008815}
0164 0000 0000 | | .BLANK 0000[0x4]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0177 | w | .CONST 0x0177 ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0004 | | .CONST 0x0004 ; Number of locals
016b INIT_0168:
016b e002 | | Load 0x0,0x2
016c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016d 02c7 | | Declare_Variable Any
016e 00d8 | | Load_Top At_Offset_0
016f 1c00 | | Execute_Immediate Run_Utility,0x0
0170 00e1 | | Load_Encached Boolean_Cache
0171 e5f6 | | Load 0x2,-0xa
0172 e5fe | | Load 0x2,-0x2
0173 e5f9 | | Load 0x2,-0x7
0174 e5fc | | Load 0x2,-0x4
0175 e004 | | Load 0x0,0x4
0176 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0177 BODY_0168:
0177 e5fd | | Load 0x2,-0x3
0178 7003 |p | Jump_Nonzero 0x17c
0179 e5fa | | Load 0x2,-0x6
017a 01db | | Execute Vector,Length
017b 7068 |ph | Jump_Nonzero 0x1e4
017c 4800 |H | Short_Literal 0x0
017d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
017e e001 | | Load 0x0,0x1
017f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0180 00db | | Load_Top At_Offset_3
0181 0120 | | Execute Any,Is_Value
0182 6803 |h | Jump_Zero 0x186
0183 e002 | | Load 0x0,0x2
0184 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0185 7801 |x | Jump 0x187
0186 00db | | Load_Top At_Offset_3
0187 e5f6 | | Load 0x2,-0xa
0188 e5f8 | | Load 0x2,-0x8
0189 e5fe | | Load 0x2,-0x2
018a e5f9 | | Load 0x2,-0x7
018b e5fb | | Load 0x2,-0x5
018c e5fc | | Load 0x2,-0x4
018d e004 | | Load 0x0,0x4
018e 1888 | | Execute Package,Field_Execute,Field_Number 0x88
018f c402 | | Store 0x2,0x2
0190 c5f5 | | Store 0x2,-0xb
0191 e5f5 | | Load 0x2,-0xb
0192 6803 |h | Jump_Zero 0x196
0193 e001 | | Load 0x0,0x1
0194 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0195 0257 | W | Execute Discrete,Raise
0196 e5ff | | Load 0x2,-0x1
0197 e002 | | Load 0x0,0x2
0198 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0199 6801 |h | Jump_Zero 0x19b
019a 787d |x} | Jump 0x218
019b e5ff | | Load 0x2,-0x1
019c 00db | | Load_Top At_Offset_3
019d 012f | / | Execute Any,Equal
019e 7024 |p$ | Jump_Nonzero 0x1c3
019f e5f6 | | Load 0x2,-0xa
01a0 4801 |H | Short_Literal 0x1
01a1 4802 |H | Short_Literal 0x2
01a2 e007 | | Load 0x0,0x7
01a3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01a4 0334 | 4 | Declare_Variable Array,With_Constraint
01a5 e402 | | Load 0x2,0x2
01a6 e007 | | Load 0x0,0x7
01a7 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01a8 e007 | | Load 0x0,0x7
01a9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01aa 0119 | | Execute Any,Check_In_Formal_Type
01ab 4801 |H | Short_Literal 0x1
01ac 00da | | Load_Top At_Offset_2
01ad 01d6 | | Execute Vector,Field_Write
01ae e5ff | | Load 0x2,-0x1
01af e003 | | Load 0x0,0x3
01b0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01b1 e007 | | Load 0x0,0x7
01b2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b3 e007 | | Load 0x0,0x7
01b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b5 0119 | | Execute Any,Check_In_Formal_Type
01b6 4802 |H | Short_Literal 0x2
01b7 00da | | Load_Top At_Offset_2
01b8 01d6 | | Execute Vector,Field_Write
01b9 607a |`z | Indirect_Literal Discrete,0x234,{0x00000000, 0x00008873}
01ba e001 | | Load 0x0,0x1
01bb 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
01bc e007 | | Load 0x0,0x7
01bd 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
01be 6075 |`u | Indirect_Literal Discrete,0x234,{0x00000000, 0x00008873}
01bf e001 | | Load 0x0,0x1
01c0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01c1 a5f5 | | Store_Unchecked 0x2,-0xb
01c2 450b |E | Exit_Suprogram New_Top_Offset 0xb
01c3 e5f6 | | Load 0x2,-0xa
01c4 e5fc | | Load 0x2,-0x4
01c5 e003 | | Load 0x0,0x3
01c6 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
01c7 7050 |pP | Jump_Nonzero 0x218
01c8 e5f6 | | Load 0x2,-0xa
01c9 4801 |H | Short_Literal 0x1
01ca 4802 |H | Short_Literal 0x2
01cb e007 | | Load 0x0,0x7
01cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01cd 0334 | 4 | Declare_Variable Array,With_Constraint
01ce e5fe | | Load 0x2,-0x2
01cf e007 | | Load 0x0,0x7
01d0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01d1 e007 | | Load 0x0,0x7
01d2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01d3 0119 | | Execute Any,Check_In_Formal_Type
01d4 4801 |H | Short_Literal 0x1
01d5 00da | | Load_Top At_Offset_2
01d6 01d6 | | Execute Vector,Field_Write
01d7 e402 | | Load 0x2,0x2
01d8 e007 | | Load 0x0,0x7
01d9 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01da e007 | | Load 0x0,0x7
01db 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01dc 0119 | | Execute Any,Check_In_Formal_Type
01dd 4802 |H | Short_Literal 0x2
01de 00da | | Load_Top At_Offset_2
01df 01d6 | | Execute Vector,Field_Write
01e0 604f |`O | Indirect_Literal Discrete,0x230,{0x00000000, 0x00008855}
01e1 e001 | | Load 0x0,0x1
01e2 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
01e3 7834 |x4 | Jump 0x218
01e4 4801 |H | Short_Literal 0x1
01e5 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
01e6 e001 | | Load 0x0,0x1
01e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e8 e5f6 | | Load 0x2,-0xa
01e9 4801 |H | Short_Literal 0x1
01ea e5f8 | | Load 0x2,-0x8
01eb e5fa | | Load 0x2,-0x6
01ec e5fe | | Load 0x2,-0x2
01ed e5f9 | | Load 0x2,-0x7
01ee e5fb | | Load 0x2,-0x5
01ef e5fc | | Load 0x2,-0x4
01f0 e004 | | Load 0x0,0x4
01f1 188a | | Execute Package,Field_Execute,Field_Number 0x8a
01f2 c5f5 | | Store 0x2,-0xb
01f3 e5f5 | | Load 0x2,-0xb
01f4 6803 |h | Jump_Zero 0x1f8
01f5 e001 | | Load 0x0,0x1
01f6 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01f7 0257 | W | Execute Discrete,Raise
01f8 e5f6 | | Load 0x2,-0xa
01f9 e5fc | | Load 0x2,-0x4
01fa e003 | | Load 0x0,0x3
01fb 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
01fc 701b |p | Jump_Nonzero 0x218
01fd e5f6 | | Load 0x2,-0xa
01fe 4801 |H | Short_Literal 0x1
01ff 4802 |H | Short_Literal 0x2
0200 e007 | | Load 0x0,0x7
0201 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0202 0334 | 4 | Declare_Variable Array,With_Constraint
0203 e5fe | | Load 0x2,-0x2
0204 e007 | | Load 0x0,0x7
0205 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0206 e007 | | Load 0x0,0x7
0207 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0208 0119 | | Execute Any,Check_In_Formal_Type
0209 4801 |H | Short_Literal 0x1
020a 00da | | Load_Top At_Offset_2
020b 01d6 | | Execute Vector,Field_Write
020c e5fa | | Load 0x2,-0x6
020d e007 | | Load 0x0,0x7
020e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
020f e007 | | Load 0x0,0x7
0210 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0211 0119 | | Execute Any,Check_In_Formal_Type
0212 4802 |H | Short_Literal 0x2
0213 00da | | Load_Top At_Offset_2
0214 01d6 | | Execute Vector,Field_Write
0215 6016 |` | Indirect_Literal Discrete,0x22c,{0x00000000, 0x00008838}
0216 e001 | | Load 0x0,0x1
0217 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0218 e5f7 | | Load 0x2,-0x9
0219 6810 |h | Jump_Zero 0x22a
021a e001 | | Load 0x0,0x1
021b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021c 00da | | Load_Top At_Offset_2
021d e5f8 | | Load 0x2,-0x8
021e e5f9 | | Load 0x2,-0x7
021f e404 | | Load 0x2,0x4
0220 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0221 e5fc | | Load 0x2,-0x4
0222 e5ff | | Load 0x2,-0x1
0223 821a | | Call 0x1,0x1a
0224 c5f5 | | Store 0x2,-0xb
0225 e5f5 | | Load 0x2,-0xb
0226 6803 |h | Jump_Zero 0x22a
0227 e001 | | Load 0x0,0x1
0228 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0229 0257 | W | Execute Discrete,Raise
022a 450b |E | Exit_Suprogram New_Top_Offset 0xb
022b 0000 | | .XXX[0x1]
022c 0000 0000 | | .LITERAL {0x00000000, 0x00008838}
0230 0000 0000 | | .LITERAL {0x00000000, 0x00008855}
0234 0000 0000 | | .LITERAL {0x00000000, 0x00008873}
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0247 | G | .CONST 0x0247 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0003 | | .CONST 0x0003 ; Number of locals
023b INIT_0238:
023b e5fa | | Load 0x2,-0x6
023c 00db | | Load_Top At_Offset_3
023d e5fd | | Load 0x2,-0x3
023e e5fe | | Load 0x2,-0x2
023f e004 | | Load 0x0,0x4
0240 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0241 e5fa | | Load 0x2,-0x6
0242 e5fd | | Load 0x2,-0x3
0243 e5ff | | Load 0x2,-0x1
0244 e5fe | | Load 0x2,-0x2
0245 e004 | | Load 0x0,0x4
0246 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0247 BODY_0238:
0247 00d9 | | Load_Top At_Offset_1
0248 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0249 6818 |h | Jump_Zero 0x262
024a e5fa | | Load 0x2,-0x6
024b 4801 |H | Short_Literal 0x1
024c 4801 |H | Short_Literal 0x1
024d e007 | | Load 0x0,0x7
024e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
024f 0334 | 4 | Declare_Variable Array,With_Constraint
0250 e5ff | | Load 0x2,-0x1
0251 e003 | | Load 0x0,0x3
0252 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0253 e007 | | Load 0x0,0x7
0254 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0255 e007 | | Load 0x0,0x7
0256 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0257 0119 | | Execute Any,Check_In_Formal_Type
0258 4801 |H | Short_Literal 0x1
0259 00da | | Load_Top At_Offset_2
025a 01d6 | | Execute Vector,Field_Write
025b 60c8 |` | Indirect_Literal Discrete,0x324,{0x00000000, 0x0000880a}
025c e001 | | Load 0x0,0x1
025d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
025e 00d9 | | Load_Top At_Offset_1
025f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0260 a5f9 | | Store_Unchecked 0x2,-0x7
0261 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0262 00d8 | | Load_Top At_Offset_0
0263 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0264 6818 |h | Jump_Zero 0x27d
0265 e5fa | | Load 0x2,-0x6
0266 4801 |H | Short_Literal 0x1
0267 4801 |H | Short_Literal 0x1
0268 e007 | | Load 0x0,0x7
0269 1b0f | | Execute Package,Field_Read,Field_Number 0xf
026a 0334 | 4 | Declare_Variable Array,With_Constraint
026b e5ff | | Load 0x2,-0x1
026c e003 | | Load 0x0,0x3
026d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
026e e007 | | Load 0x0,0x7
026f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0270 e007 | | Load 0x0,0x7
0271 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0272 0119 | | Execute Any,Check_In_Formal_Type
0273 4801 |H | Short_Literal 0x1
0274 00da | | Load_Top At_Offset_2
0275 01d6 | | Execute Vector,Field_Write
0276 60ad |` | Indirect_Literal Discrete,0x324,{0x00000000, 0x0000880a}
0277 e001 | | Load 0x0,0x1
0278 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0279 00d8 | | Load_Top At_Offset_0
027a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
027b a5f9 | | Store_Unchecked 0x2,-0x7
027c 4507 |E | Exit_Suprogram New_Top_Offset 0x7
027d e5fa | | Load 0x2,-0x6
027e e5fe | | Load 0x2,-0x2
027f e003 | | Load 0x0,0x3
0280 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0281 682d |h- | Jump_Zero 0x2af
0282 e5fa | | Load 0x2,-0x6
0283 4801 |H | Short_Literal 0x1
0284 4803 |H | Short_Literal 0x3
0285 e007 | | Load 0x0,0x7
0286 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0287 0334 | 4 | Declare_Variable Array,With_Constraint
0288 e5ff | | Load 0x2,-0x1
0289 e003 | | Load 0x0,0x3
028a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
028b e007 | | Load 0x0,0x7
028c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
028d e007 | | Load 0x0,0x7
028e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
028f 0119 | | Execute Any,Check_In_Formal_Type
0290 4801 |H | Short_Literal 0x1
0291 00da | | Load_Top At_Offset_2
0292 01d6 | | Execute Vector,Field_Write
0293 00da | | Load_Top At_Offset_2
0294 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0295 e007 | | Load 0x0,0x7
0296 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0297 e007 | | Load 0x0,0x7
0298 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0299 0119 | | Execute Any,Check_In_Formal_Type
029a 4802 |H | Short_Literal 0x2
029b 00da | | Load_Top At_Offset_2
029c 01d6 | | Execute Vector,Field_Write
029d 0092 0439 | 9| Action Push_String_Extended,0x439 ; "Remote machine is inaccessible when Host_Only = True"
029f e007 | | Load 0x0,0x7
02a0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02a1 e007 | | Load 0x0,0x7
02a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02a3 0119 | | Execute Any,Check_In_Formal_Type
02a4 4803 |H | Short_Literal 0x3
02a5 00da | | Load_Top At_Offset_2
02a6 01d6 | | Execute Vector,Field_Write
02a7 4806 |H | Short_Literal 0x6
02a8 6077 |`w | Indirect_Literal Discrete,0x320,{0x00000000, 0x00008854}
02a9 e001 | | Load 0x0,0x1
02aa 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
02ab 00d8 | | Load_Top At_Offset_0
02ac 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02ad a5f9 | | Store_Unchecked 0x2,-0x7
02ae 4507 |E | Exit_Suprogram New_Top_Offset 0x7
02af e001 | | Load 0x0,0x1
02b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b1 e009 | | Load 0x0,0x9
02b2 180e | | Execute Package,Field_Execute,Field_Number 0xe
02b3 e009 | | Load 0x0,0x9
02b4 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
02b5 e009 | | Load 0x0,0x9
02b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
02b7 e009 | | Load 0x0,0x9
02b8 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
02b9 484d |HM | Short_Literal 0x4d
02ba e009 | | Load 0x0,0x9
02bb 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
02bc e009 | | Load 0x0,0x9
02bd 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
02be 4800 |H | Short_Literal 0x0
02bf e009 | | Load 0x0,0x9
02c0 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
02c1 e5fe | | Load 0x2,-0x2
02c2 e003 | | Load 0x0,0x3
02c3 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
02c4 4800 |H | Short_Literal 0x0
02c5 e5fc | | Load 0x2,-0x4
02c6 e402 | | Load 0x2,0x2
02c7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02c8 e5ff | | Load 0x2,-0x1
02c9 e003 | | Load 0x0,0x3
02ca 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02cb e008 | | Load 0x0,0x8
02cc 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
02cd c5f9 | | Store 0x2,-0x7
02ce e5f9 | | Load 0x2,-0x7
02cf 682a |h* | Jump_Zero 0x2fa
02d0 e5fa | | Load 0x2,-0x6
02d1 4801 |H | Short_Literal 0x1
02d2 4803 |H | Short_Literal 0x3
02d3 e007 | | Load 0x0,0x7
02d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02d5 0334 | 4 | Declare_Variable Array,With_Constraint
02d6 e5ff | | Load 0x2,-0x1
02d7 e003 | | Load 0x0,0x3
02d8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02d9 e007 | | Load 0x0,0x7
02da 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02db e007 | | Load 0x0,0x7
02dc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02dd 0119 | | Execute Any,Check_In_Formal_Type
02de 4801 |H | Short_Literal 0x1
02df 00da | | Load_Top At_Offset_2
02e0 01d6 | | Execute Vector,Field_Write
02e1 00da | | Load_Top At_Offset_2
02e2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02e3 e007 | | Load 0x0,0x7
02e4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02e5 e007 | | Load 0x0,0x7
02e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e7 0119 | | Execute Any,Check_In_Formal_Type
02e8 4802 |H | Short_Literal 0x2
02e9 00da | | Load_Top At_Offset_2
02ea 01d6 | | Execute Vector,Field_Write
02eb e5f9 | | Load 0x2,-0x7
02ec e001 | | Load 0x0,0x1
02ed 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02ee e007 | | Load 0x0,0x7
02ef 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02f0 e007 | | Load 0x0,0x7
02f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02f2 0119 | | Execute Any,Check_In_Formal_Type
02f3 4803 |H | Short_Literal 0x3
02f4 00da | | Load_Top At_Offset_2
02f5 01d6 | | Execute Vector,Field_Write
02f6 6029 |`) | Indirect_Literal Discrete,0x320,{0x00000000, 0x00008854}
02f7 e001 | | Load 0x0,0x1
02f8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
02f9 4507 |E | Exit_Suprogram New_Top_Offset 0x7
02fa e5fb | | Load 0x2,-0x5
02fb 681e |h | Jump_Zero 0x31a
02fc e001 | | Load 0x0,0x1
02fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02fe e5fa | | Load 0x2,-0x6
02ff e5fc | | Load 0x2,-0x4
0300 e5fd | | Load 0x2,-0x3
0301 e5ff | | Load 0x2,-0x1
0302 e5fe | | Load 0x2,-0x2
0303 e004 | | Load 0x0,0x4
0304 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0305 c5f9 | | Store 0x2,-0x7
0306 e5f9 | | Load 0x2,-0x7
0307 6812 |h | Jump_Zero 0x31a
0308 e5fa | | Load 0x2,-0x6
0309 4801 |H | Short_Literal 0x1
030a 4801 |H | Short_Literal 0x1
030b e007 | | Load 0x0,0x7
030c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
030d 0334 | 4 | Declare_Variable Array,With_Constraint
030e e5ff | | Load 0x2,-0x1
030f e007 | | Load 0x0,0x7
0310 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0311 e007 | | Load 0x0,0x7
0312 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0313 0119 | | Execute Any,Check_In_Formal_Type
0314 4801 |H | Short_Literal 0x1
0315 00da | | Load_Top At_Offset_2
0316 01d6 | | Execute Vector,Field_Write
0317 6004 |` | Indirect_Literal Discrete,0x31c,{0x00000000, 0x00008892}
0318 e001 | | Load 0x0,0x1
0319 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
031a 4507 |E | Exit_Suprogram New_Top_Offset 0x7
031b 0000 | | .XXX[0x1]
031c 0000 0000 | | .LITERAL {0x00000000, 0x00008892}
0320 0000 0000 | | .LITERAL {0x00000000, 0x00008854}
0324 0000 0000 | | .LITERAL {0x00000000, 0x0000880a}
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b | + | .CONST 0x032b ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0001 | | .CONST 0x0001 ; Number of locals
032b BODY_0328:
032b INIT_0328:
032b e5fc | | Load 0x2,-0x4
032c 700e |p | Jump_Nonzero 0x33b
032d 00da | | Load_Top At_Offset_2
032e e003 | | Load 0x0,0x3
032f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0330 0092 043a | :| Action Push_String_Extended,0x43a ; ".units."
0332 01cc | | Execute Vector,Catenate
0333 e5fe | | Load 0x2,-0x2
0334 e003 | | Load 0x0,0x3
0335 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0336 01cc | | Execute Vector,Catenate
0337 0092 043b | ;| Action Push_String_Extended,0x43b ; "_tmp"
0339 01cc | | Execute Vector,Catenate
033a 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
033b e5fd | | Load 0x2,-0x3
033c e003 | | Load 0x0,0x3
033d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
033e 0092 043b | ;| Action Push_String_Extended,0x43b ; "_tmp"
0340 01cc | | Execute Vector,Catenate
0341 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0342 0000 0000 | | .BLANK 0000[0x6]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0353 | S | .CONST 0x0353 ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0003 | | .CONST 0x0003 ; Number of locals
034b INIT_0348:
034b e006 | | Load 0x0,0x6
034c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
034d 02c7 | | Declare_Variable Any
034e 00d8 | | Load_Top At_Offset_0
034f 1c00 | | Execute_Immediate Run_Utility,0x0
0350 e001 | | Load 0x0,0x1
0351 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0352 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0353 BODY_0348:
0353 00d9 | | Load_Top At_Offset_1
0354 0120 | | Execute Any,Is_Value
0355 6803 |h | Jump_Zero 0x359
0356 e006 | | Load 0x0,0x6
0357 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0358 7801 |x | Jump 0x35a
0359 00d9 | | Load_Top At_Offset_1
035a e001 | | Load 0x0,0x1
035b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
035c e009 | | Load 0x0,0x9
035d 180e | | Execute Package,Field_Execute,Field_Number 0xe
035e e009 | | Load 0x0,0x9
035f 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0360 e009 | | Load 0x0,0x9
0361 180e | | Execute Package,Field_Execute,Field_Number 0xe
0362 e009 | | Load 0x0,0x9
0363 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0364 484d |HM | Short_Literal 0x4d
0365 e009 | | Load 0x0,0x9
0366 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
0367 e009 | | Load 0x0,0x9
0368 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0369 4800 |H | Short_Literal 0x0
036a e009 | | Load 0x0,0x9
036b 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
036c e5fe | | Load 0x2,-0x2
036d e003 | | Load 0x0,0x3
036e 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
036f e5fb | | Load 0x2,-0x5
0370 e5fd | | Load 0x2,-0x3
0371 e008 | | Load 0x0,0x8
0372 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0373 005a | Z | Store_Top Discrete,At_Offset_2
0374 c402 | | Store 0x2,0x2
0375 00d8 | | Load_Top At_Offset_0
0376 6803 |h | Jump_Zero 0x37a
0377 e001 | | Load 0x0,0x1
0378 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0379 0257 | W | Execute Discrete,Raise
037a e5fa | | Load 0x2,-0x6
037b 6818 |h | Jump_Zero 0x394
037c e001 | | Load 0x0,0x1
037d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
037e e009 | | Load 0x0,0x9
037f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0380 e009 | | Load 0x0,0x9
0381 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0382 e009 | | Load 0x0,0x9
0383 180e | | Execute Package,Field_Execute,Field_Number 0xe
0384 e009 | | Load 0x0,0x9
0385 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0386 484d |HM | Short_Literal 0x4d
0387 e009 | | Load 0x0,0x9
0388 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
0389 e009 | | Load 0x0,0x9
038a 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
038b 4800 |H | Short_Literal 0x0
038c e009 | | Load 0x0,0x9
038d 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
038e 00db | | Load_Top At_Offset_3
038f e5ff | | Load 0x2,-0x1
0390 e004 | | Load 0x0,0x4
0391 1877 | w | Execute Package,Field_Execute,Field_Number 0x77
0392 0059 | Y | Store_Top Discrete,At_Offset_1
0393 7819 |x | Jump 0x3ad
0394 e001 | | Load 0x0,0x1
0395 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0396 e009 | | Load 0x0,0x9
0397 180e | | Execute Package,Field_Execute,Field_Number 0xe
0398 e009 | | Load 0x0,0x9
0399 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
039a e009 | | Load 0x0,0x9
039b 180e | | Execute Package,Field_Execute,Field_Number 0xe
039c e009 | | Load 0x0,0x9
039d 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
039e 484d |HM | Short_Literal 0x4d
039f e009 | | Load 0x0,0x9
03a0 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
03a1 e009 | | Load 0x0,0x9
03a2 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
03a3 4800 |H | Short_Literal 0x0
03a4 e009 | | Load 0x0,0x9
03a5 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
03a6 e5fc | | Load 0x2,-0x4
03a7 e402 | | Load 0x2,0x2
03a8 e5ff | | Load 0x2,-0x1
03a9 e5fe | | Load 0x2,-0x2
03aa e004 | | Load 0x0,0x4
03ab 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
03ac 0059 | Y | Store_Top Discrete,At_Offset_1
03ad 00d8 | | Load_Top At_Offset_0
03ae 6824 |h$ | Jump_Zero 0x3d3
03af e009 | | Load 0x0,0x9
03b0 180e | | Execute Package,Field_Execute,Field_Number 0xe
03b1 e009 | | Load 0x0,0x9
03b2 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
03b3 e009 | | Load 0x0,0x9
03b4 180e | | Execute Package,Field_Execute,Field_Number 0xe
03b5 e009 | | Load 0x0,0x9
03b6 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
03b7 484d |HM | Short_Literal 0x4d
03b8 e009 | | Load 0x0,0x9
03b9 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
03ba e009 | | Load 0x0,0x9
03bb 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
03bc 4800 |H | Short_Literal 0x0
03bd e009 | | Load 0x0,0x9
03be 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
03bf 4801 |H | Short_Literal 0x1
03c0 4801 |H | Short_Literal 0x1
03c1 e007 | | Load 0x0,0x7
03c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03c3 0334 | 4 | Declare_Variable Array,With_Constraint
03c4 e5ff | | Load 0x2,-0x1
03c5 e007 | | Load 0x0,0x7
03c6 181a | | Execute Package,Field_Execute,Field_Number 0x1a
03c7 e007 | | Load 0x0,0x7
03c8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03c9 0119 | | Execute Any,Check_In_Formal_Type
03ca 4801 |H | Short_Literal 0x1
03cb 00da | | Load_Top At_Offset_2
03cc 01d6 | | Execute Vector,Field_Write
03cd 600a |` | Indirect_Literal Discrete,0x3d8,{0x00000000, 0x00008892}
03ce e001 | | Load 0x0,0x1
03cf 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
03d0 e001 | | Load 0x0,0x1
03d1 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03d2 0257 | W | Execute Discrete,Raise
03d3 00d8 | | Load_Top At_Offset_0
03d4 a5f9 | | Store_Unchecked 0x2,-0x7
03d5 4507 |E | Exit_Suprogram New_Top_Offset 0x7
03d6 0000 0000 | | .XXX[0x2]
03d8 0000 0000 | | .LITERAL {0x00000000, 0x00008892}
03dc 0000 0000 | | .BLANK 0000[0x4]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03f6 | | .CONST 0x03f6 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0005 | | .CONST 0x0005 ; Number of locals
03e3 INIT_03e0:
03e3 0092 043b | ;| Action Push_String_Extended,0x43b ; "_tmp"
03e5 e5f9 | | Load 0x2,-0x7
03e6 e404 | | Load 0x2,0x4
03e7 e5ff | | Load 0x2,-0x1
03e8 e5fe | | Load 0x2,-0x2
03e9 8219 | | Call 0x1,0x19
03ea e212 | | Load 0x1,0x12
03eb 0007 | | Action Break_Optional
03ec e00a | | Load 0x0,0xa
03ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ee 02c7 | | Declare_Variable Any
03ef 00d8 | | Load_Top At_Offset_0
03f0 1c00 | | Execute_Immediate Run_Utility,0x0
03f1 e002 | | Load 0x0,0x2
03f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03f3 02c7 | | Declare_Variable Any
03f4 00d8 | | Load_Top At_Offset_0
03f5 1c00 | | Execute_Immediate Run_Utility,0x0
03f6 BODY_03e0:
03f6 e001 | | Load 0x0,0x1
03f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03f8 e5f8 | | Load 0x2,-0x8
03f9 4800 |H | Short_Literal 0x0
03fa e5fc | | Load 0x2,-0x4
03fb e602 | | Load 0x3,0x2
03fc e5fb | | Load 0x2,-0x5
03fd e5fd | | Load 0x2,-0x3
03fe e405 | | Load 0x2,0x5
03ff e5fe | | Load 0x2,-0x2
0400 e004 | | Load 0x0,0x4
0401 188a | | Execute Package,Field_Execute,Field_Number 0x8a
0402 c403 | | Store 0x2,0x3
0403 e403 | | Load 0x2,0x3
0404 6803 |h | Jump_Zero 0x408
0405 e001 | | Load 0x0,0x1
0406 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0407 0257 | W | Execute Discrete,Raise
0408 e5f9 | | Load 0x2,-0x7
0409 6803 |h | Jump_Zero 0x40d
040a e404 | | Load 0x2,0x4
040b c605 | | Store 0x3,0x5
040c 7802 |x | Jump 0x40f
040d e5ff | | Load 0x2,-0x1
040e c605 | | Store 0x3,0x5
040f 00ea | | Load_Encached Null_String_Cache
0410 4800 |H | Short_Literal 0x0
0411 4800 |H | Short_Literal 0x0
0412 00db | | Load_Top At_Offset_3
0413 e003 | | Load 0x0,0x3
0414 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0415 e602 | | Load 0x3,0x2
0416 e00b | | Load 0x0,0xb
0417 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0418 6803 |h | Jump_Zero 0x41c
0419 4800 |H | Short_Literal 0x0
041a 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
041b 780b |x | Jump 0x427
041c 4801 |H | Short_Literal 0x1
041d 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
041e 4800 |H | Short_Literal 0x0
041f 4801 |H | Short_Literal 0x1
0420 00ea | | Load_Encached Null_String_Cache
0421 00db | | Load_Top At_Offset_3
0422 e003 | | Load 0x0,0x3
0423 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0424 e602 | | Load 0x3,0x2
0425 e00b | | Load 0x0,0xb
0426 180f | | Execute Package,Field_Execute,Field_Number 0xf
0427 0092 043c | <| Action Push_String_Extended,0x43c ; "<QUIET>"
0429 e00c | | Load 0x0,0xc
042a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
042b 4801 |H | Short_Literal 0x1
042c e602 | | Load 0x3,0x2
042d e00c | | Load 0x0,0xc
042e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
042f 00da | | Load_Top At_Offset_2
0430 00cb | | Action Pop_Block_With_Result
0431 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
0432 ; --------------------------------------------------------------------------------------
0432 ; STRING TABLE
0432 ; --------------------------------------------------------------------------------------
0432 0018 | | .STRTAB 0x0018->0x043e ; "IS_CONSISTENT"
0433 0023 | # | .STRTAB 0x0023->0x0444 ; "CHANGED_ON_REMOTE"
0434 0032 | 2 | .STRTAB 0x0032->0x044d ; "CHANGED_ON_HOST"
0435 003f | ? | .STRTAB 0x003f->0x0454 ; "CHANGED_ON_BOTH"
0436 004c | L | .STRTAB 0x004c->0x045c ; "NOT_ON_REMOTE"
0437 0057 | W | .STRTAB 0x0057->0x0462 ; "ERROR_OCCURRED"
0438 0063 | c | .STRTAB 0x0063->0x0469 ; "Remote unit is inaccessible when Host_Only = True"
0439 0092 | | .STRTAB 0x0092->0x0482 ; "Remote machine is inaccessible when Host_Only = True"
043a 00c4 | | .STRTAB 0x00c4->0x049c ; ".units."
043b 00c9 | | .STRTAB 0x00c9->0x049f ; "_tmp"
043c 00cb | | .STRTAB 0x00cb->0x04a1 ; "<QUIET>"
043d 00d0 | | .STREND 0x00d0->0x04a5
043e 4953 5f43 |IS_C| .STRTAB_STRINGS
04a5 0000 0000 | | .XXX[0x3]
04a7 0000 | |
04a8 ; --------------------------------------------------------------------------------------
04a8 ; Debug Table
04a8 ; --------------------------------------------------------------------------------------
04a8 0004 000c | | .DEBUG4 0x0004,0x000c,0x16a3,0x0000,0x0001,0x0000
04ae 1010 1010 | | .BLANK 1010[0x21]
04cf 1000 | | .XXX[0x1]
04d0 0808 0808 | | .BLANK 0808[0x47]
0517 042a aa68 | * h| .XXX[0x7b]
0519 aa4a 65cb | Je |
051b 4929 c88b |I) |
051d 3000 0001 |0 |
051f 2000 0000 | |
0521 4000 0000 |@ |
0523 4000 0000 |@ |
0525 4000 0001 |@ |
0527 5692 5391 |V S |
0529 1640 0001 | @ |
052b fd40 0000 | @ |
052d 0308 5554 | UT|
052f d154 94cb | T |
0531 9692 5391 | S |
0533 1640 0000 | @ |
0535 0040 0000 | @ |
0537 0088 0800 | |
0539 0000 0040 | @|
053b 0000 01d3 | |
053d 1a58 9c98 | X |
053f 5c9e 4000 |\ @ |
0541 0000 4000 | @ |
0543 0000 880a | |
0545 0000 0000 | |
0547 4000 0002 |@ |
0549 531a 589c |S X |
054b 985c 9e48 | \ H|
054d 0a00 0000 | |
054f 0040 0000 | @ |
0551 0155 d3d4 | U |
0553 9311 0000 | |
0555 0000 4000 | @ |
0557 0003 931a | |
0559 589c 985c |X \|
055b 9e48 0a15 | H |
055d d3d4 9311 | |
055f 0000 0000 | |
0561 4000 0003 |@ |
0563 d31a 589c | X |
0565 985c 9e48 | \ H|
0567 0a15 d3d4 | |
0569 9311 0a40 | @|
056b 0000 0040 | @|
056d 0000 0448 | H|
056f 0813 1a58 | X|
0571 9c98 5c9e | \ |
0573 480a 15d3 |H |
0575 d493 110a | |
0577 4000 0000 |@ |
0579 4000 0001 |@ |
057b d31a 589c | X |
057d 985c 9e40 | \ @|
057f 0000 0040 | @|
0581 0000 00d5 | |
0583 9bdb 2000 | |
0585 0014 0000 | |
0587 0001 0000 | |
0589 0020 0000 | |
058b 0160 0000 | ` |
058d 0000 8000 | |
058f 0028 1018 | ( |
0591 8000 | |
0592 0000 0000 | | .BLANK 0000[0x4]
0596 8000 0028 | (| .XXX[0x2]
0598 0404 0404 | | .BLANK 0404[0x13]
05ab 0410 0000 | | .XXX[0x55]
05ad 0120 0000 | |
05af 0040 0000 | @ |
05b1 0040 0000 | @ |
05b3 0080 4804 | H |
05b5 0000 0048 | H|
05b7 0000 0000 | |
05b9 0000 8000 | |
05bb 0001 1018 | |
05bd 8000 0000 | |
05bf 8000 0001 | |
05c1 1018 8000 | |
05c3 0000 8000 | |
05c5 0002 ab37 | 7|
05c7 b610 1880 | |
05c9 0000 0080 | |
05cb 0000 0090 | |
05cd 0000 0000 | |
05cf 8000 0003 | |
05d1 2b37 b610 |+7 |
05d3 1890 0000 | |
05d5 0000 8000 | |
05d7 0003 2b37 | +7|
05d9 b610 1890 | |
05db 4000 0028 |@ (|
05dd 0000 0002 | |
05df 0000 0040 | @|
05e1 0000 02c0 | |
05e3 0000 0001 | |
05e5 0000 0050 | P|
05e7 2030 9000 | 0 |
05e9 0000 2000 | |
05eb 0000 2000 | |
05ed 0000 4024 | @$|
05ef 0200 0000 | |
05f1 2400 0000 |$ |
05f3 0800 0000 | |
05f5 0800 0800 | |
05f7 0001 e000 | |
05f9 0000 2000 | |
05fb 0000 2000 | |
05fd 0001 c000 | |
05ff 0000 | |