|
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: 8192 (0x2000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0d2ce3
└─⟦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 0fb0 | | .CONST 0x0fb0 ; 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 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 004f | O | .CONST 0x004f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b 0092 0c6c | l| Action Push_String_Extended,0xc6c ; "!Machine.Dfs_Write"
000d 0129 | ) | Execute Any,Make_Visible
000e 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated
0010 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
0012 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
0014 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated
0016 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated
0018 029a 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call,Visible,Unelaborated
001a 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated
001c 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated
001e 029a 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call,Visible,Unelaborated
0020 00bf | | Action Accept_Activation
0021 e001 | | Load 0x0,0x1
0022 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0023 02c7 | | Declare_Variable Any
0024 00d8 | | Load_Top At_Offset_0
0025 1c00 | | Execute_Immediate Run_Utility,0x0
0026 e002 | | Load 0x0,0x2
0027 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0028 02c7 | | Declare_Variable Any
0029 00d8 | | Load_Top At_Offset_0
002a 1c00 | | Execute_Immediate Run_Utility,0x0
002b 029d 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call
002d 029d 092b | +| Declare_Subprogram INIT_0928,For_Outer_Call
002f 029d 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call
0031 029d 095b | [| Declare_Subprogram INIT_0958,For_Outer_Call
0033 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0034 00c7 | | Action Elaborate_Subprogram
0035 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0036 00c7 | | Action Elaborate_Subprogram
0037 029d 0983 | | Declare_Subprogram INIT_0980,For_Outer_Call
0039 029d 099b | | Declare_Subprogram INIT_0998,For_Outer_Call
003b 029d 09b3 | | Declare_Subprogram INIT_09b0,For_Outer_Call
003d 029d 0a43 | C| Declare_Subprogram INIT_0a40,For_Outer_Call
003f 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0040 00c7 | | Action Elaborate_Subprogram
0041 029d 0a4b | K| Declare_Subprogram INIT_0a48,For_Outer_Call
0043 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0044 00c7 | | Action Elaborate_Subprogram
0045 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0046 00c7 | | Action Elaborate_Subprogram
0047 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0048 00c7 | | Action Elaborate_Subprogram
0049 1d14 | | Execute_Immediate Reference_Lex_1,0x14
004a 00c7 | | Action Elaborate_Subprogram
004b 1d16 | | Execute_Immediate Reference_Lex_1,0x16
004c 00c7 | | Action Elaborate_Subprogram
004d 1d15 | | Execute_Immediate Reference_Lex_1,0x15
004e 00c7 | | Action Elaborate_Subprogram
004f BODY_0008:
004f 00bc | | Action Signal_Activated
0050 00bb | | Action Signal_Completion
0051 0000 0000 | | .BLANK 0000[0x7]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 0081 | | .CONST 0x0081 ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 000e | | .CONST 0x000e ; Number of locals
005b INIT_0058:
005b 0092 0c6d | m| Action Push_String_Extended,0xc6d ; "M200_DFS_BOOTSTRAP.M200"
005d 0092 0c6e | n| Action Push_String_Extended,0xc6e ; "DFS_BOOTSTRAP.M200"
005f 0092 0c6f | o| Action Push_String_Extended,0xc6f ; "M200_KERNEL_0.M200"
0061 0092 0c70 | p| Action Push_String_Extended,0xc70 ; "KERNEL_0.M200"
0063 0092 0c71 | q| Action Push_String_Extended,0xc71 ; "FS_0.M200"
0065 0092 0c72 | r| Action Push_String_Extended,0xc72 ; "RECOVERY.M200"
0067 481e |H | Short_Literal 0x1e
0068 e003 | | Load 0x0,0x3
0069 1b0e | | Execute Package,Field_Read,Field_Number 0xe
006a 1c08 | | Execute_Immediate Run_Utility,0x8
006b 00d8 | | Load_Top At_Offset_0
006c 1c00 | | Execute_Immediate Run_Utility,0x0
006d e001 | | Load 0x0,0x1
006e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006f 02c7 | | Declare_Variable Any
0070 00d8 | | Load_Top At_Offset_0
0071 1c00 | | Execute_Immediate Run_Utility,0x0
0072 e004 | | Load 0x0,0x4
0073 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0074 0322 | " | Declare_Variable Record
0075 00d8 | | Load_Top At_Offset_0
0076 1c00 | | Execute_Immediate Run_Utility,0x0
0077 00e1 | | Load_Encached Boolean_Cache
0078 e005 | | Load 0x0,0x5
0079 1b0f | | Execute Package,Field_Read,Field_Number 0xf
007a 02c7 | | Declare_Variable Any
007b 00d8 | | Load_Top At_Offset_0
007c 1c00 | | Execute_Immediate Run_Utility,0x0
007d 0092 0c73 | s| Action Push_String_Extended,0xc73 ; "!Machine.Temporary.Backup_Image"
007f e006 | | Load 0x0,0x6
0080 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0081 BODY_0058:
0081 e5fd | | Load 0x2,-0x3
0082 0092 0c74 | t| Action Push_String_Extended,0xc74 ; "<QUIET>"
0084 01de | | Execute Vector,Not_Equal
0085 680b |h | Jump_Zero 0x91
0086 00da | | Load_Top At_Offset_2
0087 e5fd | | Load 0x2,-0x3
0088 e007 | | Load 0x0,0x7
0089 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
008a c40c | | Store 0x2,0xc
008b e007 | | Load 0x0,0x7
008c 180e | | Execute Package,Field_Execute,Field_Number 0xe
008d 00db | | Load_Top At_Offset_3
008e e008 | | Load 0x0,0x8
008f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0090 7804 |x | Jump 0x95
0091 e007 | | Load 0x0,0x7
0092 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0093 e007 | | Load 0x0,0x7
0094 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0095 8219 | | Call 0x1,0x19
0096 6918 |i | Jump_Zero 0x1af
0097 4801 |H | Short_Literal 0x1
0098 a40b | | Store_Unchecked 0x2,0xb
0099 e006 | | Load 0x0,0x6
009a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
009b 4801 |H | Short_Literal 0x1
009c 00db | | Load_Top At_Offset_3
009d e006 | | Load 0x0,0x6
009e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
009f 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00a0 00db | | Load_Top At_Offset_3
00a1 e403 | | Load 0x2,0x3
00a2 00da | | Load_Top At_Offset_2
00a3 e402 | | Load 0x2,0x2
00a4 e009 | | Load 0x0,0x9
00a5 180d | | Execute Package,Field_Execute,Field_Number 0xd
00a6 c40b | | Store 0x2,0xb
00a7 00db | | Load_Top At_Offset_3
00a8 7014 |p | Jump_Nonzero 0xbd
00a9 e007 | | Load 0x0,0x7
00aa 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ab 4807 |H | Short_Literal 0x7
00ac 0092 0c75 | u| Action Push_String_Extended,0xc75 ; "Error copying required file DFS_BOOTSTRAP.M200. Backup Aborted."
00ae e008 | | Load 0x0,0x8
00af 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b0 e409 | | Load 0x2,0x9
00b1 00ea | | Load_Encached Null_String_Cache
00b2 00db | | Load_Top At_Offset_3
00b3 4801 |H | Short_Literal 0x1
00b4 e001 | | Load 0x0,0x1
00b5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00b6 c409 | | Store 0x2,0x9
00b7 e409 | | Load 0x2,0x9
00b8 e001 | | Load 0x0,0x1
00b9 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00ba c409 | | Store 0x2,0x9
00bb 821b | | Call 0x1,0x1b
00bc 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00bd 00db | | Load_Top At_Offset_3
00be e405 | | Load 0x2,0x5
00bf 00da | | Load_Top At_Offset_2
00c0 e404 | | Load 0x2,0x4
00c1 e009 | | Load 0x0,0x9
00c2 180d | | Execute Package,Field_Execute,Field_Number 0xd
00c3 c40b | | Store 0x2,0xb
00c4 00db | | Load_Top At_Offset_3
00c5 7014 |p | Jump_Nonzero 0xda
00c6 e007 | | Load 0x0,0x7
00c7 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c8 4807 |H | Short_Literal 0x7
00c9 0092 0c76 | v| Action Push_String_Extended,0xc76 ; "Error copying required file KERNEL_0.M200. Backup Aborted."
00cb e008 | | Load 0x0,0x8
00cc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00cd e409 | | Load 0x2,0x9
00ce 00ea | | Load_Encached Null_String_Cache
00cf 00db | | Load_Top At_Offset_3
00d0 4801 |H | Short_Literal 0x1
00d1 e001 | | Load 0x0,0x1
00d2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00d3 c409 | | Store 0x2,0x9
00d4 e409 | | Load 0x2,0x9
00d5 e001 | | Load 0x0,0x1
00d6 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00d7 c409 | | Store 0x2,0x9
00d8 821b | | Call 0x1,0x1b
00d9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00da 00db | | Load_Top At_Offset_3
00db 00ea | | Load_Encached Null_String_Cache
00dc 00da | | Load_Top At_Offset_2
00dd e406 | | Load 0x2,0x6
00de e009 | | Load 0x0,0x9
00df 180d | | Execute Package,Field_Execute,Field_Number 0xd
00e0 c40b | | Store 0x2,0xb
00e1 00db | | Load_Top At_Offset_3
00e2 7014 |p | Jump_Nonzero 0xf7
00e3 e007 | | Load 0x0,0x7
00e4 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e5 4807 |H | Short_Literal 0x7
00e6 0092 0c77 | w| Action Push_String_Extended,0xc77 ; "Error copying required file FS_0.M200. Backup Aborted"
00e8 e008 | | Load 0x0,0x8
00e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00ea e409 | | Load 0x2,0x9
00eb 00ea | | Load_Encached Null_String_Cache
00ec 00db | | Load_Top At_Offset_3
00ed 4801 |H | Short_Literal 0x1
00ee e001 | | Load 0x0,0x1
00ef 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00f0 c409 | | Store 0x2,0x9
00f1 e409 | | Load 0x2,0x9
00f2 e001 | | Load 0x0,0x1
00f3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00f4 c409 | | Store 0x2,0x9
00f5 821b | | Call 0x1,0x1b
00f6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00f7 00db | | Load_Top At_Offset_3
00f8 00ea | | Load_Encached Null_String_Cache
00f9 00da | | Load_Top At_Offset_2
00fa e407 | | Load 0x2,0x7
00fb e009 | | Load 0x0,0x9
00fc 180d | | Execute Package,Field_Execute,Field_Number 0xd
00fd c40b | | Store 0x2,0xb
00fe 00db | | Load_Top At_Offset_3
00ff 7014 |p | Jump_Nonzero 0x114
0100 e007 | | Load 0x0,0x7
0101 180e | | Execute Package,Field_Execute,Field_Number 0xe
0102 4807 |H | Short_Literal 0x7
0103 0092 0c78 | x| Action Push_String_Extended,0xc78 ; "Error copying required file RECOVERY.M200. Backup Aborted"
0105 e008 | | Load 0x0,0x8
0106 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0107 e409 | | Load 0x2,0x9
0108 00ea | | Load_Encached Null_String_Cache
0109 00db | | Load_Top At_Offset_3
010a 4801 |H | Short_Literal 0x1
010b e001 | | Load 0x0,0x1
010c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
010d c409 | | Store 0x2,0x9
010e e409 | | Load 0x2,0x9
010f e001 | | Load 0x0,0x1
0110 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0111 c409 | | Store 0x2,0x9
0112 821b | | Call 0x1,0x1b
0113 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0114 e40a | | Load 0x2,0xa
0115 0092 0c79 | y| Action Push_String_Extended,0xc79 ; "@.M200"
0117 e004 | | Load 0x0,0x4
0118 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0119 00d1 | | Pop_Control Pop_Count_1
011a e408 | | Load 0x2,0x8
011b e40a | | Load 0x2,0xa
011c e004 | | Load 0x0,0x4
011d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
011e 00d2 | | Pop_Control Pop_Count_2
011f 00cf | | Action Mark_Auxiliary
0120 782f |x/ | Jump 0x150
0121 e408 | | Load 0x2,0x8
0122 821a | | Call 0x1,0x1a
0123 7026 |p& | Jump_Nonzero 0x14a
0124 e40b | | Load 0x2,0xb
0125 00ea | | Load_Encached Null_String_Cache
0126 00db | | Load_Top At_Offset_3
0127 e408 | | Load 0x2,0x8
0128 e003 | | Load 0x0,0x3
0129 1813 | | Execute Package,Field_Execute,Field_Number 0x13
012a e009 | | Load 0x0,0x9
012b 180d | | Execute Package,Field_Execute,Field_Number 0xd
012c c40b | | Store 0x2,0xb
012d e40b | | Load 0x2,0xb
012e 701b |p | Jump_Nonzero 0x14a
012f e007 | | Load 0x0,0x7
0130 180e | | Execute Package,Field_Execute,Field_Number 0xe
0131 4807 |H | Short_Literal 0x7
0132 0092 0c7a | z| Action Push_String_Extended,0xc7a ; "Error copying file "
0134 e408 | | Load 0x2,0x8
0135 e003 | | Load 0x0,0x3
0136 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0137 01cc | | Execute Vector,Catenate
0138 0092 0c7b | {| Action Push_String_Extended,0xc7b ; ". Aborting backup."
013a 01cc | | Execute Vector,Catenate
013b e008 | | Load 0x0,0x8
013c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
013d e409 | | Load 0x2,0x9
013e 00ea | | Load_Encached Null_String_Cache
013f e40d | | Load 0x2,0xd
0140 4801 |H | Short_Literal 0x1
0141 e001 | | Load 0x0,0x1
0142 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0143 c409 | | Store 0x2,0x9
0144 e409 | | Load 0x2,0x9
0145 e001 | | Load 0x0,0x1
0146 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0147 c409 | | Store 0x2,0x9
0148 821b | | Call 0x1,0x1b
0149 4504 |E | Exit_Suprogram New_Top_Offset 0x4
014a e408 | | Load 0x2,0x8
014b e40a | | Load 0x2,0xa
014c e004 | | Load 0x0,0x4
014d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
014e 00d2 | | Pop_Control Pop_Count_2
014f 00c9 | | Action Pop_Auxiliary_Loop
0150 e40a | | Load 0x2,0xa
0151 e004 | | Load 0x0,0x4
0152 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0153 6fcd |o | Jump_Zero 0x121
0154 00ce | | Action Pop_Auxiliary
0155 e40a | | Load 0x2,0xa
0156 0092 0c7c | || Action Push_String_Extended,0xc7c ; "@"
0158 e004 | | Load 0x0,0x4
0159 181e | | Execute Package,Field_Execute,Field_Number 0x1e
015a 00d1 | | Pop_Control Pop_Count_1
015b e408 | | Load 0x2,0x8
015c e40a | | Load 0x2,0xa
015d e004 | | Load 0x0,0x4
015e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
015f 00d2 | | Pop_Control Pop_Count_2
0160 00cf | | Action Mark_Auxiliary
0161 782f |x/ | Jump 0x191
0162 e408 | | Load 0x2,0x8
0163 821a | | Call 0x1,0x1a
0164 7026 |p& | Jump_Nonzero 0x18b
0165 e40b | | Load 0x2,0xb
0166 00ea | | Load_Encached Null_String_Cache
0167 00db | | Load_Top At_Offset_3
0168 e408 | | Load 0x2,0x8
0169 e003 | | Load 0x0,0x3
016a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
016b e009 | | Load 0x0,0x9
016c 180d | | Execute Package,Field_Execute,Field_Number 0xd
016d c40b | | Store 0x2,0xb
016e e40b | | Load 0x2,0xb
016f 701b |p | Jump_Nonzero 0x18b
0170 e007 | | Load 0x0,0x7
0171 180e | | Execute Package,Field_Execute,Field_Number 0xe
0172 4807 |H | Short_Literal 0x7
0173 0092 0c7a | z| Action Push_String_Extended,0xc7a ; "Error copying file "
0175 e408 | | Load 0x2,0x8
0176 e003 | | Load 0x0,0x3
0177 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0178 01cc | | Execute Vector,Catenate
0179 0092 0c7b | {| Action Push_String_Extended,0xc7b ; ". Aborting backup."
017b 01cc | | Execute Vector,Catenate
017c e008 | | Load 0x0,0x8
017d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
017e e409 | | Load 0x2,0x9
017f 00ea | | Load_Encached Null_String_Cache
0180 e40d | | Load 0x2,0xd
0181 4801 |H | Short_Literal 0x1
0182 e001 | | Load 0x0,0x1
0183 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0184 c409 | | Store 0x2,0x9
0185 e409 | | Load 0x2,0x9
0186 e001 | | Load 0x0,0x1
0187 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0188 c409 | | Store 0x2,0x9
0189 821b | | Call 0x1,0x1b
018a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
018b e408 | | Load 0x2,0x8
018c e40a | | Load 0x2,0xa
018d e004 | | Load 0x0,0x4
018e 181f | | Execute Package,Field_Execute,Field_Number 0x1f
018f 00d2 | | Pop_Control Pop_Count_2
0190 00c9 | | Action Pop_Auxiliary_Loop
0191 e40a | | Load 0x2,0xa
0192 e004 | | Load 0x0,0x4
0193 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0194 6fcd |o | Jump_Zero 0x162
0195 00ce | | Action Pop_Auxiliary
0196 00d8 | | Load_Top At_Offset_0
0197 4801 |H | Short_Literal 0x1
0198 e006 | | Load 0x0,0x6
0199 1812 | | Execute Package,Field_Execute,Field_Number 0x12
019a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
019b 4800 |H | Short_Literal 0x0
019c e5fe | | Load 0x2,-0x2
019d 4800 |H | Short_Literal 0x0
019e 00ea | | Load_Encached Null_String_Cache
019f e5ff | | Load 0x2,-0x1
01a0 e40d | | Load 0x2,0xd
01a1 e00a | | Load 0x0,0xa
01a2 180e | | Execute Package,Field_Execute,Field_Number 0xe
01a3 e409 | | Load 0x2,0x9
01a4 00ea | | Load_Encached Null_String_Cache
01a5 00db | | Load_Top At_Offset_3
01a6 4801 |H | Short_Literal 0x1
01a7 e001 | | Load 0x0,0x1
01a8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01a9 c409 | | Store 0x2,0x9
01aa e409 | | Load 0x2,0x9
01ab e001 | | Load 0x0,0x1
01ac 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01ad c409 | | Store 0x2,0x9
01ae 821b | | Call 0x1,0x1b
01af 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01f3 | | .CONST 0x01f3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0015 | | .CONST 0x0015 ; Number of locals
01b3 INIT_01b0:
01b3 0092 0c7d | }| Action Push_String_Extended,0xc7d ; "!Machine.Temporary."
01b5 4850 |HP | Short_Literal 0x50
01b6 e00b | | Load 0x0,0xb
01b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b8 1c08 | | Execute_Immediate Run_Utility,0x8
01b9 00d8 | | Load_Top At_Offset_0
01ba 1c00 | | Execute_Immediate Run_Utility,0x0
01bb 00ea | | Load_Encached Null_String_Cache
01bc 4850 |HP | Short_Literal 0x50
01bd e003 | | Load 0x0,0x3
01be 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01bf 1c08 | | Execute_Immediate Run_Utility,0x8
01c0 00d8 | | Load_Top At_Offset_0
01c1 1c00 | | Execute_Immediate Run_Utility,0x0
01c2 4850 |HP | Short_Literal 0x50
01c3 e003 | | Load 0x0,0x3
01c4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c5 1c08 | | Execute_Immediate Run_Utility,0x8
01c6 00d8 | | Load_Top At_Offset_0
01c7 1c00 | | Execute_Immediate Run_Utility,0x0
01c8 481e |H | Short_Literal 0x1e
01c9 e003 | | Load 0x0,0x3
01ca 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01cb 1c08 | | Execute_Immediate Run_Utility,0x8
01cc 00d8 | | Load_Top At_Offset_0
01cd 1c00 | | Execute_Immediate Run_Utility,0x0
01ce e004 | | Load 0x0,0x4
01cf 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
01d0 0322 | " | Declare_Variable Record
01d1 00d8 | | Load_Top At_Offset_0
01d2 1c00 | | Execute_Immediate Run_Utility,0x0
01d3 00e1 | | Load_Encached Boolean_Cache
01d4 03e9 | | Declare_Variable Discrete,Duplicate
01d5 03e9 | | Declare_Variable Discrete,Duplicate
01d6 03e9 | | Declare_Variable Discrete,Duplicate
01d7 e00c | | Load 0x0,0xc
01d8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01d9 0337 | 7 | Declare_Variable Array
01da e00c | | Load 0x0,0xc
01db 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01dc e00c | | Load 0x0,0xc
01dd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01de e00d | | Load 0x0,0xd
01df 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01e0 0322 | " | Declare_Variable Record
01e1 00d8 | | Load_Top At_Offset_0
01e2 1c00 | | Execute_Immediate Run_Utility,0x0
01e3 e001 | | Load 0x0,0x1
01e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e5 02c7 | | Declare_Variable Any
01e6 00d8 | | Load_Top At_Offset_0
01e7 1c00 | | Execute_Immediate Run_Utility,0x0
01e8 e005 | | Load 0x0,0x5
01e9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01ea 02c7 | | Declare_Variable Any
01eb 00d8 | | Load_Top At_Offset_0
01ec 1c00 | | Execute_Immediate Run_Utility,0x0
01ed e00d | | Load 0x0,0xd
01ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ef e006 | | Load 0x0,0x6
01f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f1 029f 0a7b | {| Declare_Subprogram INIT_0a78,For_Call
01f3 BODY_01b0:
01f3 e5fc | | Load 0x2,-0x4
01f4 0092 0c74 | t| Action Push_String_Extended,0xc74 ; "<QUIET>"
01f6 01de | | Execute Vector,Not_Equal
01f7 680b |h | Jump_Zero 0x203
01f8 00db | | Load_Top At_Offset_3
01f9 e5fc | | Load 0x2,-0x4
01fa e007 | | Load 0x0,0x7
01fb 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
01fc c412 | | Store 0x2,0x12
01fd e007 | | Load 0x0,0x7
01fe 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ff e412 | | Load 0x2,0x12
0200 e008 | | Load 0x0,0x8
0201 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0202 7804 |x | Jump 0x207
0203 e007 | | Load 0x0,0x7
0204 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0205 e007 | | Load 0x0,0x7
0206 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0207 8219 | | Call 0x1,0x19
0208 6835 |h5 | Jump_Zero 0x23e
0209 e411 | | Load 0x2,0x11
020a 00ea | | Load_Encached Null_String_Cache
020b e5ff | | Load 0x2,-0x1
020c e009 | | Load 0x0,0x9
020d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
020e 4800 |H | Short_Literal 0x0
020f e001 | | Load 0x0,0x1
0210 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0211 c411 | | Store 0x2,0x11
0212 4801 |H | Short_Literal 0x1
0213 a409 | | Store_Unchecked 0x2,0x9
0214 00cf | | Action Mark_Auxiliary
0215 7802 |x | Jump 0x218
0216 8415 | | Call 0x2,0x15
0217 00c9 | | Action Pop_Auxiliary_Loop
0218 e411 | | Load 0x2,0x11
0219 e001 | | Load 0x0,0x1
021a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
021b 6ffa |o | Jump_Zero 0x216
021c 00ce | | Action Pop_Auxiliary
021d e40a | | Load 0x2,0xa
021e 6811 |h | Jump_Zero 0x230
021f e403 | | Load 0x2,0x3
0220 e402 | | Load 0x2,0x2
0221 e00b | | Load 0x0,0xb
0222 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0223 00d1 | | Pop_Control Pop_Count_1
0224 e403 | | Load 0x2,0x3
0225 e406 | | Load 0x2,0x6
0226 e003 | | Load 0x0,0x3
0227 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0228 e00b | | Load 0x0,0xb
0229 1818 | | Execute Package,Field_Execute,Field_Number 0x18
022a 00d1 | | Pop_Control Pop_Count_1
022b e5fb | | Load 0x2,-0x5
022c e404 | | Load 0x2,0x4
022d e403 | | Load 0x2,0x3
022e e009 | | Load 0x0,0x9
022f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0230 e5fb | | Load 0x2,-0x5
0231 700b |p | Jump_Nonzero 0x23d
0232 00d9 | | Load_Top At_Offset_1
0233 4801 |H | Short_Literal 0x1
0234 e006 | | Load 0x0,0x6
0235 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0236 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0237 e5fb | | Load 0x2,-0x5
0238 e5fd | | Load 0x2,-0x3
0239 e5fe | | Load 0x2,-0x2
023a e5ff | | Load 0x2,-0x1
023b e00a | | Load 0x0,0xa
023c 180f | | Execute Package,Field_Execute,Field_Number 0xf
023d 821b | | Call 0x1,0x1b
023e 4506 |E | Exit_Suprogram New_Top_Offset 0x6
023f 0000 | | .XXX[0x1]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 025b | [ | .CONST 0x025b ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0009 | | .CONST 0x0009 ; Number of locals
0243 INIT_0240:
0243 e005 | | Load 0x0,0x5
0244 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0245 02c7 | | Declare_Variable Any
0246 00d8 | | Load_Top At_Offset_0
0247 1c00 | | Execute_Immediate Run_Utility,0x0
0248 00db | | Load_Top At_Offset_3
0249 e009 | | Load 0x0,0x9
024a 180f | | Execute Package,Field_Execute,Field_Number 0xf
024b e00d | | Load 0x0,0xd
024c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024d e006 | | Load 0x0,0x6
024e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024f e00d | | Load 0x0,0xd
0250 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0251 0322 | " | Declare_Variable Record
0252 00d8 | | Load_Top At_Offset_0
0253 1c00 | | Execute_Immediate Run_Utility,0x0
0254 00e2 | | Load_Encached Integer_Cache
0255 03e9 | | Declare_Variable Discrete,Duplicate
0256 e002 | | Load 0x0,0x2
0257 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0258 02c7 | | Declare_Variable Any
0259 00d8 | | Load_Top At_Offset_0
025a 1c00 | | Execute_Immediate Run_Utility,0x0
025b BODY_0240:
025b e5fa | | Load 0x2,-0x6
025c 0092 0c74 | t| Action Push_String_Extended,0xc74 ; "<QUIET>"
025e 01de | | Execute Vector,Not_Equal
025f 680b |h | Jump_Zero 0x26b
0260 e402 | | Load 0x2,0x2
0261 e5fa | | Load 0x2,-0x6
0262 e007 | | Load 0x0,0x7
0263 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0264 c402 | | Store 0x2,0x2
0265 e007 | | Load 0x0,0x7
0266 180e | | Execute Package,Field_Execute,Field_Number 0xe
0267 e402 | | Load 0x2,0x2
0268 e008 | | Load 0x0,0x8
0269 1812 | | Execute Package,Field_Execute,Field_Number 0x12
026a 7804 |x | Jump 0x26f
026b e007 | | Load 0x0,0x7
026c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
026d e007 | | Load 0x0,0x7
026e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
026f 8219 | | Call 0x1,0x19
0270 687f |h | Jump_Zero 0x2f0
0271 4801 |H | Short_Literal 0x1
0272 e5ff | | Load 0x2,-0x1
0273 0092 0c7e | ~| Action Push_String_Extended,0xc7e ; "!!"
0275 e00e | | Load 0x0,0xe
0276 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0277 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0278 00d9 | | Load_Top At_Offset_1
0279 6808 |h | Jump_Zero 0x282
027a e007 | | Load 0x0,0x7
027b 180e | | Execute Package,Field_Execute,Field_Number 0xe
027c 4802 |H | Short_Literal 0x2
027d 0092 0c7f | | Action Push_String_Extended,0xc7f ; "Remote access is not currently supported"
027f e008 | | Load 0x0,0x8
0280 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0281 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0282 e5fb | | Load 0x2,-0x5
0283 680a |h | Jump_Zero 0x28e
0284 e006 | | Load 0x0,0x6
0285 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0286 4802 |H | Short_Literal 0x2
0287 e5ff | | Load 0x2,-0x1
0288 e009 | | Load 0x0,0x9
0289 1810 | | Execute Package,Field_Execute,Field_Number 0x10
028a e006 | | Load 0x0,0x6
028b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
028c c405 | | Store 0x2,0x5
028d 7809 |x | Jump 0x297
028e e006 | | Load 0x0,0x6
028f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0290 4801 |H | Short_Literal 0x1
0291 e5ff | | Load 0x2,-0x1
0292 e009 | | Load 0x0,0x9
0293 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0294 e006 | | Load 0x0,0x6
0295 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0296 c405 | | Store 0x2,0x5
0297 e405 | | Load 0x2,0x5
0298 e006 | | Load 0x0,0x6
0299 1813 | | Execute Package,Field_Execute,Field_Number 0x13
029a 6854 |hT | Jump_Zero 0x2ef
029b e00d | | Load 0x0,0xd
029c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
029d 4800 |H | Short_Literal 0x0
029e e5fe | | Load 0x2,-0x2
029f e00d | | Load 0x0,0xd
02a0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02a1 c404 | | Store 0x2,0x4
02a2 e404 | | Load 0x2,0x4
02a3 e00d | | Load 0x0,0xd
02a4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02a5 6844 |hD | Jump_Zero 0x2ea
02a6 00cf | | Action Mark_Auxiliary
02a7 7838 |x8 | Jump 0x2e0
02a8 e406 | | Load 0x2,0x6
02a9 e404 | | Load 0x2,0x4
02aa e00d | | Load 0x0,0xd
02ab 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02ac 00d1 | | Pop_Control Pop_Count_1
02ad e404 | | Load 0x2,0x4
02ae e00d | | Load 0x0,0xd
02af 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02b0 7033 |p3 | Jump_Nonzero 0x2e4
02b1 e404 | | Load 0x2,0x4
02b2 e00d | | Load 0x0,0xd
02b3 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02b4 682a |h* | Jump_Zero 0x2df
02b5 e218 | | Load 0x1,0x18
02b6 e5fd | | Load 0x2,-0x3
02b7 e403 | | Load 0x2,0x3
02b8 e406 | | Load 0x2,0x6
02b9 821e | | Call 0x1,0x1e
02ba 6815 |h | Jump_Zero 0x2d0
02bb e406 | | Load 0x2,0x6
02bc 4800 |H | Short_Literal 0x0
02bd e405 | | Load 0x2,0x5
02be e006 | | Load 0x0,0x6
02bf 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02c0 00d1 | | Pop_Control Pop_Count_1
02c1 e406 | | Load 0x2,0x6
02c2 e405 | | Load 0x2,0x5
02c3 8220 | | Call 0x1,0x20
02c4 00d1 | | Pop_Control Pop_Count_1
02c5 00e3 | | Load_Encached Natural_Cache
02c6 602d |`- | Indirect_Literal Discrete,0x2f4,{0x00000000, 0x7fffffff}
02c7 e404 | | Load 0x2,0x4
02c8 e405 | | Load 0x2,0x5
02c9 e006 | | Load 0x0,0x6
02ca 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
02cb c407 | | Store 0x2,0x7
02cc e405 | | Load 0x2,0x5
02cd e006 | | Load 0x0,0x6
02ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02cf 780c |x | Jump 0x2dc
02d0 e007 | | Load 0x0,0x7
02d1 180e | | Execute Package,Field_Execute,Field_Number 0xe
02d2 4802 |H | Short_Literal 0x2
02d3 e406 | | Load 0x2,0x6
02d4 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02d5 e00b | | Load 0x0,0xb
02d6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d7 0092 0c80 | | Action Push_String_Extended,0xc80 ; " not copied"
02d9 01cc | | Execute Vector,Catenate
02da e008 | | Load 0x0,0x8
02db 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02dc e404 | | Load 0x2,0x4
02dd e00d | | Load 0x0,0xd
02de 181f | | Execute Package,Field_Execute,Field_Number 0x1f
02df 00c9 | | Action Pop_Auxiliary_Loop
02e0 e404 | | Load 0x2,0x4
02e1 e00d | | Load 0x0,0xd
02e2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02e3 6fc4 |o | Jump_Zero 0x2a8
02e4 00ce | | Action Pop_Auxiliary
02e5 e404 | | Load 0x2,0x4
02e6 4800 |H | Short_Literal 0x0
02e7 e00d | | Load 0x0,0xd
02e8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02e9 c404 | | Store 0x2,0x4
02ea e405 | | Load 0x2,0x5
02eb 4801 |H | Short_Literal 0x1
02ec e006 | | Load 0x0,0x6
02ed 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02ee c405 | | Store 0x2,0x5
02ef 821b | | Call 0x1,0x1b
02f0 4507 |E | Exit_Suprogram New_Top_Offset 0x7
02f1 0000 0000 | | .XXX[0x3]
02f3 0000 | |
02f4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 0303 | | .CONST 0x0303 ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0004 | | .CONST 0x0004 ; Number of locals
02fb INIT_02f8:
02fb 00e2 | | Load_Encached Integer_Cache
02fc e00c | | Load 0x0,0xc
02fd 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02fe e005 | | Load 0x0,0x5
02ff 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0300 02c7 | | Declare_Variable Any
0301 00d8 | | Load_Top At_Offset_0
0302 1c00 | | Execute_Immediate Run_Utility,0x0
0303 BODY_02f8:
0303 e5fb | | Load 0x2,-0x5
0304 0092 0c74 | t| Action Push_String_Extended,0xc74 ; "<QUIET>"
0306 01de | | Execute Vector,Not_Equal
0307 680b |h | Jump_Zero 0x313
0308 00d8 | | Load_Top At_Offset_0
0309 e5fb | | Load 0x2,-0x5
030a e007 | | Load 0x0,0x7
030b 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
030c c404 | | Store 0x2,0x4
030d e007 | | Load 0x0,0x7
030e 180e | | Execute Package,Field_Execute,Field_Number 0xe
030f 00d9 | | Load_Top At_Offset_1
0310 e008 | | Load 0x0,0x8
0311 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0312 7804 |x | Jump 0x317
0313 e007 | | Load 0x0,0x7
0314 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0315 e007 | | Load 0x0,0x7
0316 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0317 8219 | | Call 0x1,0x19
0318 682b |h+ | Jump_Zero 0x344
0319 4801 |H | Short_Literal 0x1
031a e5fd | | Load 0x2,-0x3
031b 0092 0c7e | ~| Action Push_String_Extended,0xc7e ; "!!"
031d e00e | | Load 0x0,0xe
031e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
031f 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0320 00da | | Load_Top At_Offset_2
0321 6808 |h | Jump_Zero 0x32a
0322 e007 | | Load 0x0,0x7
0323 180e | | Execute Package,Field_Execute,Field_Number 0xe
0324 4802 |H | Short_Literal 0x2
0325 0092 0c7f | | Action Push_String_Extended,0xc7f ; "Remote access is not currently supported"
0327 e008 | | Load 0x0,0x8
0328 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0329 4507 |E | Exit_Suprogram New_Top_Offset 0x7
032a e5fa | | Load 0x2,-0x6
032b 680f |h | Jump_Zero 0x33b
032c e007 | | Load 0x0,0x7
032d 180e | | Execute Package,Field_Execute,Field_Number 0xe
032e 4802 |H | Short_Literal 0x2
032f 0092 0c81 | | Action Push_String_Extended,0xc81 ; "Environment file "
0331 e5ff | | Load 0x2,-0x1
0332 01cc | | Execute Vector,Catenate
0333 0092 0c82 | | Action Push_String_Extended,0xc82 ; "would have been written to the Dfs as "
0335 01cc | | Execute Vector,Catenate
0336 e5fe | | Load 0x2,-0x2
0337 01cc | | Execute Vector,Catenate
0338 e008 | | Load 0x0,0x8
0339 1813 | | Execute Package,Field_Execute,Field_Number 0x13
033a 7808 |x | Jump 0x343
033b 00d9 | | Load_Top At_Offset_1
033c e5fe | | Load 0x2,-0x2
033d e5fd | | Load 0x2,-0x3
033e e5ff | | Load 0x2,-0x1
033f 01cc | | Execute Vector,Catenate
0340 e00c | | Load 0x0,0xc
0341 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0342 005a | Z | Store_Top Discrete,At_Offset_2
0343 821b | | Call 0x1,0x1b
0344 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0345 0000 0000 | | .XXX[0x3]
0347 0000 | |
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0387 | | .CONST 0x0387 ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 0015 | | .CONST 0x0015 ; Number of locals
034b INIT_0348:
034b 00e3 | | Load_Encached Natural_Cache
034c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
034d 00e2 | | Load_Encached Integer_Cache
034e 03e9 | | Declare_Variable Discrete,Duplicate
034f 03e9 | | Declare_Variable Discrete,Duplicate
0350 e00c | | Load 0x0,0xc
0351 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0352 0337 | 7 | Declare_Variable Array
0353 481e |H | Short_Literal 0x1e
0354 e003 | | Load 0x0,0x3
0355 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0356 1c08 | | Execute_Immediate Run_Utility,0x8
0357 00d8 | | Load_Top At_Offset_0
0358 1c00 | | Execute_Immediate Run_Utility,0x0
0359 0092 0c70 | p| Action Push_String_Extended,0xc70 ; "KERNEL_0.M200"
035b e003 | | Load 0x0,0x3
035c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
035d 0092 0c83 | | Action Push_String_Extended,0xc83 ; "KERNEL_1.M200"
035f e003 | | Load 0x0,0x3
0360 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0361 0092 0c84 | | Action Push_String_Extended,0xc84 ; "KERNEL_2.M200"
0363 e003 | | Load 0x0,0x3
0364 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0365 e00d | | Load 0x0,0xd
0366 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0367 0322 | " | Declare_Variable Record
0368 00d8 | | Load_Top At_Offset_0
0369 1c00 | | Execute_Immediate Run_Utility,0x0
036a e00f | | Load 0x0,0xf
036b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
036c 1b18 | | Execute Package,Field_Read,Field_Number 0x18
036d 02c7 | | Declare_Variable Any
036e 00d8 | | Load_Top At_Offset_0
036f 1c00 | | Execute_Immediate Run_Utility,0x0
0370 00e1 | | Load_Encached Boolean_Cache
0371 e00f | | Load 0x0,0xf
0372 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0373 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0374 e010 | | Load 0x0,0x10
0375 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0376 e010 | | Load 0x0,0x10
0377 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0378 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0379 e00c | | Load 0x0,0xc
037a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
037b e5ff | | Load 0x2,-0x1
037c e009 | | Load 0x0,0x9
037d 180f | | Execute Package,Field_Execute,Field_Number 0xf
037e e005 | | Load 0x0,0x5
037f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0380 02c7 | | Declare_Variable Any
0381 00d8 | | Load_Top At_Offset_0
0382 1c00 | | Execute_Immediate Run_Utility,0x0
0383 e006 | | Load 0x0,0x6
0384 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0385 029f 0b3b | ;| Declare_Subprogram INIT_0b38,For_Call
0387 BODY_0348:
0387 e5fc | | Load 0x2,-0x4
0388 0092 0c74 | t| Action Push_String_Extended,0xc74 ; "<QUIET>"
038a 01de | | Execute Vector,Not_Equal
038b 680b |h | Jump_Zero 0x397
038c 00da | | Load_Top At_Offset_2
038d e5fc | | Load 0x2,-0x4
038e e007 | | Load 0x0,0x7
038f 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0390 c413 | | Store 0x2,0x13
0391 e007 | | Load 0x0,0x7
0392 180e | | Execute Package,Field_Execute,Field_Number 0xe
0393 00db | | Load_Top At_Offset_3
0394 e008 | | Load 0x0,0x8
0395 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0396 7804 |x | Jump 0x39b
0397 e007 | | Load 0x0,0x7
0398 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0399 e007 | | Load 0x0,0x7
039a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
039b 8219 | | Call 0x1,0x19
039c 7001 |p | Jump_Nonzero 0x39e
039d 4506 |E | Exit_Suprogram New_Top_Offset 0x6
039e 4801 |H | Short_Literal 0x1
039f e5fe | | Load 0x2,-0x2
03a0 0092 0c7e | ~| Action Push_String_Extended,0xc7e ; "!!"
03a2 e00e | | Load 0x0,0xe
03a3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03a4 a405 | | Store_Unchecked 0x2,0x5
03a5 e405 | | Load 0x2,0x5
03a6 6808 |h | Jump_Zero 0x3af
03a7 e007 | | Load 0x0,0x7
03a8 180e | | Execute Package,Field_Execute,Field_Number 0xe
03a9 4802 |H | Short_Literal 0x2
03aa 0092 0c7f | | Action Push_String_Extended,0xc7f ; "Remote access is not currently supported"
03ac e008 | | Load 0x0,0x8
03ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03ae 4506 |E | Exit_Suprogram New_Top_Offset 0x6
03af 4800 |H | Short_Literal 0x0
03b0 a403 | | Store_Unchecked 0x2,0x3
03b1 e00f | | Load 0x0,0xf
03b2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03b3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03b4 e40c | | Load 0x2,0xc
03b5 6296 |b | Indirect_Literal Discrete,0x64c,{0x00000000, 0x00004000}
03b6 e011 | | Load 0x0,0x11
03b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03b8 e012 | | Load 0x0,0x12
03b9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03ba e013 | | Load 0x0,0x13
03bb 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03bc 4801 |H | Short_Literal 0x1
03bd 4800 |H | Short_Literal 0x0
03be e012 | | Load 0x0,0x12
03bf 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03c0 e00f | | Load 0x0,0xf
03c1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03c2 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03c3 e5fe | | Load 0x2,-0x2
03c4 0092 0c85 | | Action Push_String_Extended,0xc85 ; "."
03c6 01cc | | Execute Vector,Catenate
03c7 e5ff | | Load 0x2,-0x1
03c8 e009 | | Load 0x0,0x9
03c9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03ca 01cc | | Execute Vector,Catenate
03cb e00f | | Load 0x0,0xf
03cc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03cd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03ce c40c | | Store 0x2,0xc
03cf c40e | | Store 0x2,0xe
03d0 e40e | | Load 0x2,0xe
03d1 6808 |h | Jump_Zero 0x3da
03d2 e007 | | Load 0x0,0x7
03d3 180e | | Execute Package,Field_Execute,Field_Number 0xe
03d4 4802 |H | Short_Literal 0x2
03d5 0092 0c86 | | Action Push_String_Extended,0xc86 ; "No matching files found"
03d7 e008 | | Load 0x0,0x8
03d8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03d9 4506 |E | Exit_Suprogram New_Top_Offset 0x6
03da 00cf | | Action Mark_Auxiliary
03db 7a3f |z? | Jump 0x61b
03dc e006 | | Load 0x0,0x6
03dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03de 4800 |H | Short_Literal 0x0
03df e40c | | Load 0x2,0xc
03e0 e00f | | Load 0x0,0xf
03e1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03e2 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
03e3 e006 | | Load 0x0,0x6
03e4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03e5 0033 | 3 | Store_Top Heap_Access,At_Offset_3
03e6 00da | | Load_Top At_Offset_2
03e7 e006 | | Load 0x0,0x6
03e8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03e9 69ca |i | Jump_Zero 0x5b4
03ea e014 | | Load 0x0,0x14
03eb 180f | | Execute Package,Field_Execute,Field_Number 0xf
03ec 4605 |F | Jump_Case 0x6
03ed 79bd |y | Jump 0x5ab ; case 0x0
03ee 7964 |yd | Jump 0x553 ; case 0x1
03ef 790b |y | Jump 0x4fb ; case 0x2
03f0 78b2 |x | Jump 0x4a3 ; case 0x3
03f1 7859 |xY | Jump 0x44b ; case 0x4
03f2 7800 |x | Jump 0x3f3 ; case 0x5
03f3 e40b | | Load 0x2,0xb
03f4 4800 |H | Short_Literal 0x0
03f5 0092 0c87 | | Action Push_String_Extended,0xc87 ; "M400C_KERNEL_0.M200"
03f7 e414 | | Load 0x2,0x14
03f8 e006 | | Load 0x0,0x6
03f9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03fa 00d1 | | Pop_Control Pop_Count_1
03fb 00da | | Load_Top At_Offset_2
03fc e006 | | Load 0x0,0x6
03fd 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03fe 6807 |h | Jump_Zero 0x406
03ff e5fb | | Load 0x2,-0x5
0400 e5fd | | Load 0x2,-0x3
0401 e408 | | Load 0x2,0x8
0402 8415 | | Call 0x2,0x15
0403 00da | | Load_Top At_Offset_2
0404 e006 | | Load 0x0,0x6
0405 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0406 00da | | Load_Top At_Offset_2
0407 4801 |H | Short_Literal 0x1
0408 e006 | | Load 0x0,0x6
0409 1812 | | Execute Package,Field_Execute,Field_Number 0x12
040a 0033 | 3 | Store_Top Heap_Access,At_Offset_3
040b e006 | | Load 0x0,0x6
040c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
040d 4800 |H | Short_Literal 0x0
040e e40c | | Load 0x2,0xc
040f e00f | | Load 0x0,0xf
0410 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0411 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0412 e006 | | Load 0x0,0x6
0413 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0414 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0415 e40b | | Load 0x2,0xb
0416 4800 |H | Short_Literal 0x0
0417 0092 0c88 | | Action Push_String_Extended,0xc88 ; "M400C_KERNEL_1.M200"
0419 e414 | | Load 0x2,0x14
041a e006 | | Load 0x0,0x6
041b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
041c 00d1 | | Pop_Control Pop_Count_1
041d 00da | | Load_Top At_Offset_2
041e e006 | | Load 0x0,0x6
041f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0420 6807 |h | Jump_Zero 0x428
0421 e5fb | | Load 0x2,-0x5
0422 e5fd | | Load 0x2,-0x3
0423 e409 | | Load 0x2,0x9
0424 8415 | | Call 0x2,0x15
0425 00da | | Load_Top At_Offset_2
0426 e006 | | Load 0x0,0x6
0427 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0428 00da | | Load_Top At_Offset_2
0429 4801 |H | Short_Literal 0x1
042a e006 | | Load 0x0,0x6
042b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
042c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
042d e006 | | Load 0x0,0x6
042e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042f 4800 |H | Short_Literal 0x0
0430 e40c | | Load 0x2,0xc
0431 e00f | | Load 0x0,0xf
0432 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0433 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0434 e006 | | Load 0x0,0x6
0435 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0436 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0437 e40b | | Load 0x2,0xb
0438 4800 |H | Short_Literal 0x0
0439 0092 0c89 | | Action Push_String_Extended,0xc89 ; "M400C_KERNEL_2.M200"
043b e414 | | Load 0x2,0x14
043c e006 | | Load 0x0,0x6
043d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
043e 00d1 | | Pop_Control Pop_Count_1
043f 00da | | Load_Top At_Offset_2
0440 e006 | | Load 0x0,0x6
0441 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0442 6971 |iq | Jump_Zero 0x5b4
0443 e5fb | | Load 0x2,-0x5
0444 e5fd | | Load 0x2,-0x3
0445 e40a | | Load 0x2,0xa
0446 8415 | | Call 0x2,0x15
0447 00da | | Load_Top At_Offset_2
0448 e006 | | Load 0x0,0x6
0449 1818 | | Execute Package,Field_Execute,Field_Number 0x18
044a 7969 |yi | Jump 0x5b4
044b e40b | | Load 0x2,0xb
044c 4800 |H | Short_Literal 0x0
044d 0092 0c8a | | Action Push_String_Extended,0xc8a ; "M400S_KERNEL_0.M200"
044f e414 | | Load 0x2,0x14
0450 e006 | | Load 0x0,0x6
0451 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0452 00d1 | | Pop_Control Pop_Count_1
0453 00da | | Load_Top At_Offset_2
0454 e006 | | Load 0x0,0x6
0455 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0456 6807 |h | Jump_Zero 0x45e
0457 e5fb | | Load 0x2,-0x5
0458 e5fd | | Load 0x2,-0x3
0459 e408 | | Load 0x2,0x8
045a 8415 | | Call 0x2,0x15
045b 00da | | Load_Top At_Offset_2
045c e006 | | Load 0x0,0x6
045d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
045e 00da | | Load_Top At_Offset_2
045f 4801 |H | Short_Literal 0x1
0460 e006 | | Load 0x0,0x6
0461 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0462 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0463 e006 | | Load 0x0,0x6
0464 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0465 4800 |H | Short_Literal 0x0
0466 e40c | | Load 0x2,0xc
0467 e00f | | Load 0x0,0xf
0468 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0469 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
046a e006 | | Load 0x0,0x6
046b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
046c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
046d e40b | | Load 0x2,0xb
046e 4800 |H | Short_Literal 0x0
046f 0092 0c8b | | Action Push_String_Extended,0xc8b ; "M400S_KERNEL_1.M200"
0471 e414 | | Load 0x2,0x14
0472 e006 | | Load 0x0,0x6
0473 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0474 00d1 | | Pop_Control Pop_Count_1
0475 00da | | Load_Top At_Offset_2
0476 e006 | | Load 0x0,0x6
0477 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0478 6807 |h | Jump_Zero 0x480
0479 e5fb | | Load 0x2,-0x5
047a e5fd | | Load 0x2,-0x3
047b e409 | | Load 0x2,0x9
047c 8415 | | Call 0x2,0x15
047d 00da | | Load_Top At_Offset_2
047e e006 | | Load 0x0,0x6
047f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0480 00da | | Load_Top At_Offset_2
0481 4801 |H | Short_Literal 0x1
0482 e006 | | Load 0x0,0x6
0483 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0484 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0485 e006 | | Load 0x0,0x6
0486 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0487 4800 |H | Short_Literal 0x0
0488 e40c | | Load 0x2,0xc
0489 e00f | | Load 0x0,0xf
048a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
048b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
048c e006 | | Load 0x0,0x6
048d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
048e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
048f e40b | | Load 0x2,0xb
0490 4800 |H | Short_Literal 0x0
0491 0092 0c8c | | Action Push_String_Extended,0xc8c ; "M400S_KERNEL_2.M200"
0493 e414 | | Load 0x2,0x14
0494 e006 | | Load 0x0,0x6
0495 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0496 00d1 | | Pop_Control Pop_Count_1
0497 00da | | Load_Top At_Offset_2
0498 e006 | | Load 0x0,0x6
0499 181c | | Execute Package,Field_Execute,Field_Number 0x1c
049a 6919 |i | Jump_Zero 0x5b4
049b e5fb | | Load 0x2,-0x5
049c e5fd | | Load 0x2,-0x3
049d e40a | | Load 0x2,0xa
049e 8415 | | Call 0x2,0x15
049f 00da | | Load_Top At_Offset_2
04a0 e006 | | Load 0x0,0x6
04a1 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04a2 7911 |y | Jump 0x5b4
04a3 e40b | | Load 0x2,0xb
04a4 4800 |H | Short_Literal 0x0
04a5 0092 0c8d | | Action Push_String_Extended,0xc8d ; "M300C_KERNEL_0.M200"
04a7 e414 | | Load 0x2,0x14
04a8 e006 | | Load 0x0,0x6
04a9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04aa 00d1 | | Pop_Control Pop_Count_1
04ab 00da | | Load_Top At_Offset_2
04ac e006 | | Load 0x0,0x6
04ad 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04ae 6807 |h | Jump_Zero 0x4b6
04af e5fb | | Load 0x2,-0x5
04b0 e5fd | | Load 0x2,-0x3
04b1 e408 | | Load 0x2,0x8
04b2 8415 | | Call 0x2,0x15
04b3 00da | | Load_Top At_Offset_2
04b4 e006 | | Load 0x0,0x6
04b5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04b6 00da | | Load_Top At_Offset_2
04b7 4801 |H | Short_Literal 0x1
04b8 e006 | | Load 0x0,0x6
04b9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04ba 0033 | 3 | Store_Top Heap_Access,At_Offset_3
04bb e006 | | Load 0x0,0x6
04bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04bd 4800 |H | Short_Literal 0x0
04be e40c | | Load 0x2,0xc
04bf e00f | | Load 0x0,0xf
04c0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04c1 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
04c2 e006 | | Load 0x0,0x6
04c3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04c4 0033 | 3 | Store_Top Heap_Access,At_Offset_3
04c5 e40b | | Load 0x2,0xb
04c6 4800 |H | Short_Literal 0x0
04c7 0092 0c8e | | Action Push_String_Extended,0xc8e ; "M300C_KERNEL_1.M200"
04c9 e414 | | Load 0x2,0x14
04ca e006 | | Load 0x0,0x6
04cb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04cc 00d1 | | Pop_Control Pop_Count_1
04cd 00da | | Load_Top At_Offset_2
04ce e006 | | Load 0x0,0x6
04cf 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04d0 6807 |h | Jump_Zero 0x4d8
04d1 e5fb | | Load 0x2,-0x5
04d2 e5fd | | Load 0x2,-0x3
04d3 e409 | | Load 0x2,0x9
04d4 8415 | | Call 0x2,0x15
04d5 00da | | Load_Top At_Offset_2
04d6 e006 | | Load 0x0,0x6
04d7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04d8 00da | | Load_Top At_Offset_2
04d9 4801 |H | Short_Literal 0x1
04da e006 | | Load 0x0,0x6
04db 1812 | | Execute Package,Field_Execute,Field_Number 0x12
04dc 0033 | 3 | Store_Top Heap_Access,At_Offset_3
04dd e006 | | Load 0x0,0x6
04de 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04df 4800 |H | Short_Literal 0x0
04e0 e40c | | Load 0x2,0xc
04e1 e00f | | Load 0x0,0xf
04e2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04e3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
04e4 e006 | | Load 0x0,0x6
04e5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04e6 0033 | 3 | Store_Top Heap_Access,At_Offset_3
04e7 e40b | | Load 0x2,0xb
04e8 4800 |H | Short_Literal 0x0
04e9 0092 0c8f | | Action Push_String_Extended,0xc8f ; "M300C_KERNEL_2.M200"
04eb e414 | | Load 0x2,0x14
04ec e006 | | Load 0x0,0x6
04ed 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04ee 00d1 | | Pop_Control Pop_Count_1
04ef 00da | | Load_Top At_Offset_2
04f0 e006 | | Load 0x0,0x6
04f1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04f2 68c1 |h | Jump_Zero 0x5b4
04f3 e5fb | | Load 0x2,-0x5
04f4 e5fd | | Load 0x2,-0x3
04f5 e40a | | Load 0x2,0xa
04f6 8415 | | Call 0x2,0x15
04f7 00da | | Load_Top At_Offset_2
04f8 e006 | | Load 0x0,0x6
04f9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04fa 78b9 |x | Jump 0x5b4
04fb e40b | | Load 0x2,0xb
04fc 4800 |H | Short_Literal 0x0
04fd 0092 0c90 | | Action Push_String_Extended,0xc90 ; "M300S_KERNEL_0.M200"
04ff e414 | | Load 0x2,0x14
0500 e006 | | Load 0x0,0x6
0501 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0502 00d1 | | Pop_Control Pop_Count_1
0503 00da | | Load_Top At_Offset_2
0504 e006 | | Load 0x0,0x6
0505 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0506 6807 |h | Jump_Zero 0x50e
0507 e5fb | | Load 0x2,-0x5
0508 e5fd | | Load 0x2,-0x3
0509 e408 | | Load 0x2,0x8
050a 8415 | | Call 0x2,0x15
050b 00da | | Load_Top At_Offset_2
050c e006 | | Load 0x0,0x6
050d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
050e 00da | | Load_Top At_Offset_2
050f 4801 |H | Short_Literal 0x1
0510 e006 | | Load 0x0,0x6
0511 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0512 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0513 e006 | | Load 0x0,0x6
0514 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0515 4800 |H | Short_Literal 0x0
0516 e40c | | Load 0x2,0xc
0517 e00f | | Load 0x0,0xf
0518 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0519 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
051a e006 | | Load 0x0,0x6
051b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
051c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
051d e40b | | Load 0x2,0xb
051e 4800 |H | Short_Literal 0x0
051f 0092 0c91 | | Action Push_String_Extended,0xc91 ; "M300S_KERNEL_1.M200"
0521 e414 | | Load 0x2,0x14
0522 e006 | | Load 0x0,0x6
0523 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0524 00d1 | | Pop_Control Pop_Count_1
0525 00da | | Load_Top At_Offset_2
0526 e006 | | Load 0x0,0x6
0527 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0528 6807 |h | Jump_Zero 0x530
0529 e5fb | | Load 0x2,-0x5
052a e5fd | | Load 0x2,-0x3
052b e409 | | Load 0x2,0x9
052c 8415 | | Call 0x2,0x15
052d 00da | | Load_Top At_Offset_2
052e e006 | | Load 0x0,0x6
052f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0530 00da | | Load_Top At_Offset_2
0531 4801 |H | Short_Literal 0x1
0532 e006 | | Load 0x0,0x6
0533 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0534 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0535 e006 | | Load 0x0,0x6
0536 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0537 4800 |H | Short_Literal 0x0
0538 e40c | | Load 0x2,0xc
0539 e00f | | Load 0x0,0xf
053a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
053b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
053c e006 | | Load 0x0,0x6
053d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
053e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
053f e40b | | Load 0x2,0xb
0540 4800 |H | Short_Literal 0x0
0541 0092 0c92 | | Action Push_String_Extended,0xc92 ; "M300S_KERNEL_2.M200"
0543 e414 | | Load 0x2,0x14
0544 e006 | | Load 0x0,0x6
0545 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0546 00d1 | | Pop_Control Pop_Count_1
0547 00da | | Load_Top At_Offset_2
0548 e006 | | Load 0x0,0x6
0549 181c | | Execute Package,Field_Execute,Field_Number 0x1c
054a 6869 |hi | Jump_Zero 0x5b4
054b e5fb | | Load 0x2,-0x5
054c e5fd | | Load 0x2,-0x3
054d e40a | | Load 0x2,0xa
054e 8415 | | Call 0x2,0x15
054f 00da | | Load_Top At_Offset_2
0550 e006 | | Load 0x0,0x6
0551 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0552 7861 |xa | Jump 0x5b4
0553 e40b | | Load 0x2,0xb
0554 4800 |H | Short_Literal 0x0
0555 0092 0c6f | o| Action Push_String_Extended,0xc6f ; "M200_KERNEL_0.M200"
0557 e414 | | Load 0x2,0x14
0558 e006 | | Load 0x0,0x6
0559 1817 | | Execute Package,Field_Execute,Field_Number 0x17
055a 00d1 | | Pop_Control Pop_Count_1
055b 00da | | Load_Top At_Offset_2
055c e006 | | Load 0x0,0x6
055d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
055e 6807 |h | Jump_Zero 0x566
055f e5fb | | Load 0x2,-0x5
0560 e5fd | | Load 0x2,-0x3
0561 e408 | | Load 0x2,0x8
0562 8415 | | Call 0x2,0x15
0563 00da | | Load_Top At_Offset_2
0564 e006 | | Load 0x0,0x6
0565 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0566 00da | | Load_Top At_Offset_2
0567 4801 |H | Short_Literal 0x1
0568 e006 | | Load 0x0,0x6
0569 1812 | | Execute Package,Field_Execute,Field_Number 0x12
056a 0033 | 3 | Store_Top Heap_Access,At_Offset_3
056b e006 | | Load 0x0,0x6
056c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
056d 4800 |H | Short_Literal 0x0
056e e40c | | Load 0x2,0xc
056f e00f | | Load 0x0,0xf
0570 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0571 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0572 e006 | | Load 0x0,0x6
0573 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0574 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0575 e40b | | Load 0x2,0xb
0576 4800 |H | Short_Literal 0x0
0577 0092 0c93 | | Action Push_String_Extended,0xc93 ; "M200_KERNEL_1.M200"
0579 e414 | | Load 0x2,0x14
057a e006 | | Load 0x0,0x6
057b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
057c 00d1 | | Pop_Control Pop_Count_1
057d 00da | | Load_Top At_Offset_2
057e e006 | | Load 0x0,0x6
057f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0580 6807 |h | Jump_Zero 0x588
0581 e5fb | | Load 0x2,-0x5
0582 e5fd | | Load 0x2,-0x3
0583 e409 | | Load 0x2,0x9
0584 8415 | | Call 0x2,0x15
0585 00da | | Load_Top At_Offset_2
0586 e006 | | Load 0x0,0x6
0587 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0588 00da | | Load_Top At_Offset_2
0589 4801 |H | Short_Literal 0x1
058a e006 | | Load 0x0,0x6
058b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
058c 0033 | 3 | Store_Top Heap_Access,At_Offset_3
058d e006 | | Load 0x0,0x6
058e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058f 4800 |H | Short_Literal 0x0
0590 e40c | | Load 0x2,0xc
0591 e00f | | Load 0x0,0xf
0592 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0593 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0594 e006 | | Load 0x0,0x6
0595 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0596 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0597 e40b | | Load 0x2,0xb
0598 4800 |H | Short_Literal 0x0
0599 0092 0c94 | | Action Push_String_Extended,0xc94 ; "M200_KERNEL_2.M200"
059b e414 | | Load 0x2,0x14
059c e006 | | Load 0x0,0x6
059d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
059e 00d1 | | Pop_Control Pop_Count_1
059f 00da | | Load_Top At_Offset_2
05a0 e006 | | Load 0x0,0x6
05a1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05a2 6811 |h | Jump_Zero 0x5b4
05a3 e5fb | | Load 0x2,-0x5
05a4 e5fd | | Load 0x2,-0x3
05a5 e40a | | Load 0x2,0xa
05a6 8415 | | Call 0x2,0x15
05a7 00da | | Load_Top At_Offset_2
05a8 e006 | | Load 0x0,0x6
05a9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05aa 7809 |x | Jump 0x5b4
05ab e007 | | Load 0x0,0x7
05ac 180e | | Execute Package,Field_Execute,Field_Number 0xe
05ad 4802 |H | Short_Literal 0x2
05ae 0092 0c95 | | Action Push_String_Extended,0xc95 ; "This Dfs cannot be used on an R1000 model 100"
05b0 e008 | | Load 0x0,0x8
05b1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05b2 821b | | Call 0x1,0x1b
05b3 4506 |E | Exit_Suprogram New_Top_Offset 0x6
05b4 00da | | Load_Top At_Offset_2
05b5 4801 |H | Short_Literal 0x1
05b6 e006 | | Load 0x0,0x6
05b7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05b8 0033 | 3 | Store_Top Heap_Access,At_Offset_3
05b9 e006 | | Load 0x0,0x6
05ba 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05bb 4800 |H | Short_Literal 0x0
05bc e40c | | Load 0x2,0xc
05bd e00f | | Load 0x0,0xf
05be 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05bf 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
05c0 e006 | | Load 0x0,0x6
05c1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05c2 0033 | 3 | Store_Top Heap_Access,At_Offset_3
05c3 00da | | Load_Top At_Offset_2
05c4 e006 | | Load 0x0,0x6
05c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05c6 684e |hN | Jump_Zero 0x615
05c7 00cf | | Action Mark_Auxiliary
05c8 7842 |xB | Jump 0x60b
05c9 e40b | | Load 0x2,0xb
05ca 4800 |H | Short_Literal 0x0
05cb e414 | | Load 0x2,0x14
05cc e006 | | Load 0x0,0x6
05cd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05ce 00d1 | | Pop_Control Pop_Count_1
05cf 00db | | Load_Top At_Offset_3
05d0 e006 | | Load 0x0,0x6
05d1 181c | | Execute Package,Field_Execute,Field_Number 0x1c
05d2 6837 |h7 | Jump_Zero 0x60a
05d3 e218 | | Load 0x1,0x18
05d4 00ea | | Load_Encached Null_String_Cache
05d5 e412 | | Load 0x2,0x12
05d6 e40b | | Load 0x2,0xb
05d7 821e | | Call 0x1,0x1e
05d8 682e |h. | Jump_Zero 0x607
05d9 e407 | | Load 0x2,0x7
05da e40b | | Load 0x2,0xb
05db 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
05dc e00b | | Load 0x0,0xb
05dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05de e003 | | Load 0x0,0x3
05df 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05e0 00d1 | | Pop_Control Pop_Count_1
05e1 e407 | | Load 0x2,0x7
05e2 e003 | | Load 0x0,0x3
05e3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05e4 e00e | | Load 0x0,0xe
05e5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05e6 0092 0c96 | | Action Push_String_Extended,0xc96 ; "KERNEL_@.M200"
05e8 e015 | | Load 0x0,0x15
05e9 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05ea 701c |p | Jump_Nonzero 0x607
05eb e407 | | Load 0x2,0x7
05ec e003 | | Load 0x0,0x3
05ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05ee e00e | | Load 0x0,0xe
05ef 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05f0 0092 0c97 | | Action Push_String_Extended,0xc97 ; "TCP_IP_HOST_ID"
05f2 e015 | | Load 0x0,0x15
05f3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05f4 7012 |p | Jump_Nonzero 0x607
05f5 e407 | | Load 0x2,0x7
05f6 e003 | | Load 0x0,0x3
05f7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05f8 e00e | | Load 0x0,0xe
05f9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05fa 0092 0c98 | | Action Push_String_Extended,0xc98 ; "HARDWARE.M200_CONFIG"
05fc e015 | | Load 0x0,0x15
05fd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
05fe 7008 |p | Jump_Nonzero 0x607
05ff e407 | | Load 0x2,0x7
0600 821a | | Call 0x1,0x1a
0601 6801 |h | Jump_Zero 0x603
0602 7804 |x | Jump 0x607
0603 e5fb | | Load 0x2,-0x5
0604 e5fd | | Load 0x2,-0x3
0605 e407 | | Load 0x2,0x7
0606 8415 | | Call 0x2,0x15
0607 00db | | Load_Top At_Offset_3
0608 e006 | | Load 0x0,0x6
0609 1818 | | Execute Package,Field_Execute,Field_Number 0x18
060a 00c9 | | Action Pop_Auxiliary_Loop
060b 00db | | Load_Top At_Offset_3
060c e006 | | Load 0x0,0x6
060d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
060e 6fba |o | Jump_Zero 0x5c9
060f 00ce | | Action Pop_Auxiliary
0610 00da | | Load_Top At_Offset_2
0611 4801 |H | Short_Literal 0x1
0612 e006 | | Load 0x0,0x6
0613 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0614 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0615 e40c | | Load 0x2,0xc
0616 e00f | | Load 0x0,0xf
0617 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0618 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0619 c40c | | Store 0x2,0xc
061a 00c9 | | Action Pop_Auxiliary_Loop
061b e40c | | Load 0x2,0xc
061c e00f | | Load 0x0,0xf
061d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
061e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
061f 6dbc |m | Jump_Zero 0x3dc
0620 00ce | | Action Pop_Auxiliary
0621 e403 | | Load 0x2,0x3
0622 7008 |p | Jump_Nonzero 0x62b
0623 e007 | | Load 0x0,0x7
0624 180e | | Execute Package,Field_Execute,Field_Number 0xe
0625 4802 |H | Short_Literal 0x2
0626 0092 0c86 | | Action Push_String_Extended,0xc86 ; "No matching files found"
0628 e008 | | Load 0x0,0x8
0629 1813 | | Execute Package,Field_Execute,Field_Number 0x13
062a 781c |x | Jump 0x647
062b e403 | | Load 0x2,0x3
062c 0c02 | | Execute_Immediate Greater_Equal,0x2
062d 6819 |h | Jump_Zero 0x647
062e e5fb | | Load 0x2,-0x5
062f 700c |p | Jump_Nonzero 0x63c
0630 e007 | | Load 0x0,0x7
0631 180e | | Execute Package,Field_Execute,Field_Number 0xe
0632 4802 |H | Short_Literal 0x2
0633 e403 | | Load 0x2,0x3
0634 00e0 | | Load_Encached Standard_Cache
0635 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0636 0092 0c99 | | Action Push_String_Extended,0xc99 ; " files have been downloaded"
0638 01cc | | Execute Vector,Catenate
0639 e008 | | Load 0x0,0x8
063a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
063b 780b |x | Jump 0x647
063c e007 | | Load 0x0,0x7
063d 180e | | Execute Package,Field_Execute,Field_Number 0xe
063e 4802 |H | Short_Literal 0x2
063f e403 | | Load 0x2,0x3
0640 00e0 | | Load_Encached Standard_Cache
0641 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0642 0092 0c9a | | Action Push_String_Extended,0xc9a ; " files would have been downloaded"
0644 01cc | | Execute Vector,Catenate
0645 e008 | | Load 0x0,0x8
0646 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0647 821b | | Call 0x1,0x1b
0648 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0649 0000 0000 | | .XXX[0x3]
064b 0000 | |
064c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0660 | ` | .CONST 0x0660 ; Address of begin
0651 0004 | | .CONST 0x0004 ; Address of exception handler
0652 0004 | | .CONST 0x0004 ; Number of locals
0653 INIT_0650:
0653 00e2 | | Load_Encached Integer_Cache
0654 e005 | | Load 0x0,0x5
0655 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0656 02c7 | | Declare_Variable Any
0657 00d8 | | Load_Top At_Offset_0
0658 1c00 | | Execute_Immediate Run_Utility,0x0
0659 e5fd | | Load 0x2,-0x3
065a 0092 0c85 | | Action Push_String_Extended,0xc85 ; "."
065c 01cc | | Execute Vector,Catenate
065d e5ff | | Load 0x2,-0x1
065e 01cc | | Execute Vector,Catenate
065f 0007 | | Action Break_Optional
0660 BODY_0650:
0660 e5fb | | Load 0x2,-0x5
0661 0092 0c74 | t| Action Push_String_Extended,0xc74 ; "<QUIET>"
0663 01de | | Execute Vector,Not_Equal
0664 680b |h | Jump_Zero 0x670
0665 00d9 | | Load_Top At_Offset_1
0666 e5fb | | Load 0x2,-0x5
0667 e007 | | Load 0x0,0x7
0668 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0669 c403 | | Store 0x2,0x3
066a e007 | | Load 0x0,0x7
066b 180e | | Execute Package,Field_Execute,Field_Number 0xe
066c 00da | | Load_Top At_Offset_2
066d e008 | | Load 0x0,0x8
066e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
066f 7804 |x | Jump 0x674
0670 e007 | | Load 0x0,0x7
0671 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0672 e007 | | Load 0x0,0x7
0673 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0674 8219 | | Call 0x1,0x19
0675 681f |h | Jump_Zero 0x695
0676 4801 |H | Short_Literal 0x1
0677 e5fd | | Load 0x2,-0x3
0678 0092 0c7e | ~| Action Push_String_Extended,0xc7e ; "!!"
067a e00e | | Load 0x0,0xe
067b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
067c 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
067d 00da | | Load_Top At_Offset_2
067e 6808 |h | Jump_Zero 0x687
067f e007 | | Load 0x0,0x7
0680 180e | | Execute Package,Field_Execute,Field_Number 0xe
0681 4802 |H | Short_Literal 0x2
0682 0092 0c7f | | Action Push_String_Extended,0xc7f ; "Remote access is not currently supported"
0684 e008 | | Load 0x0,0x8
0685 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0686 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0687 4800 |H | Short_Literal 0x0
0688 4800 |H | Short_Literal 0x0
0689 00ea | | Load_Encached Null_String_Cache
068a e5fe | | Load 0x2,-0x2
068b e404 | | Load 0x2,0x4
068c e00a | | Load 0x0,0xa
068d 180d | | Execute Package,Field_Execute,Field_Number 0xd
068e 821b | | Call 0x1,0x1b
068f e5fa | | Load 0x2,-0x6
0690 e5fb | | Load 0x2,-0x5
0691 e5fc | | Load 0x2,-0x4
0692 e5fd | | Load 0x2,-0x3
0693 e5ff | | Load 0x2,-0x1
0694 8212 | | Call 0x1,0x12
0695 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0696 0000 0000 | | .XXX[0x2]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 06c7 | | .CONST 0x06c7 ; Address of begin
0699 0004 | | .CONST 0x0004 ; Address of exception handler
069a 0010 | | .CONST 0x0010 ; Number of locals
069b INIT_0698:
069b e00c | | Load 0x0,0xc
069c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
069d 0337 | 7 | Declare_Variable Array
069e 4801 |H | Short_Literal 0x1
069f e003 | | Load 0x0,0x3
06a0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06a1 1c08 | | Execute_Immediate Run_Utility,0x8
06a2 00d8 | | Load_Top At_Offset_0
06a3 1c00 | | Execute_Immediate Run_Utility,0x0
06a4 e00c | | Load 0x0,0xc
06a5 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06a6 481e |H | Short_Literal 0x1e
06a7 e003 | | Load 0x0,0x3
06a8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06a9 1c08 | | Execute_Immediate Run_Utility,0x8
06aa 00d8 | | Load_Top At_Offset_0
06ab 1c00 | | Execute_Immediate Run_Utility,0x0
06ac 00e2 | | Load_Encached Integer_Cache
06ad e010 | | Load 0x0,0x10
06ae 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
06af 481e |H | Short_Literal 0x1e
06b0 e003 | | Load 0x0,0x3
06b1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06b2 1c08 | | Execute_Immediate Run_Utility,0x8
06b3 00d8 | | Load_Top At_Offset_0
06b4 1c00 | | Execute_Immediate Run_Utility,0x0
06b5 e00c | | Load 0x0,0xc
06b6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
06b7 e005 | | Load 0x0,0x5
06b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06b9 02c7 | | Declare_Variable Any
06ba 00d8 | | Load_Top At_Offset_0
06bb 1c00 | | Execute_Immediate Run_Utility,0x0
06bc 00e1 | | Load_Encached Boolean_Cache
06bd 03e9 | | Declare_Variable Discrete,Duplicate
06be 03e9 | | Declare_Variable Discrete,Duplicate
06bf e010 | | Load 0x0,0x10
06c0 1b17 | | Execute Package,Field_Read,Field_Number 0x17
06c1 0322 | " | Declare_Variable Record
06c2 e010 | | Load 0x0,0x10
06c3 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
06c4 e010 | | Load 0x0,0x10
06c5 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
06c6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06c7 BODY_0698:
06c7 e5fc | | Load 0x2,-0x4
06c8 0092 0c9b | | Action Push_String_Extended,0xc9b ; "<quiet>"
06ca 01de | | Execute Vector,Not_Equal
06cb 680b |h | Jump_Zero 0x6d7
06cc e40a | | Load 0x2,0xa
06cd e5fc | | Load 0x2,-0x4
06ce e007 | | Load 0x0,0x7
06cf 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
06d0 c40a | | Store 0x2,0xa
06d1 e007 | | Load 0x0,0x7
06d2 180e | | Execute Package,Field_Execute,Field_Number 0xe
06d3 e40a | | Load 0x2,0xa
06d4 e008 | | Load 0x0,0x8
06d5 1812 | | Execute Package,Field_Execute,Field_Number 0x12
06d6 7804 |x | Jump 0x6db
06d7 e007 | | Load 0x0,0x7
06d8 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
06d9 e007 | | Load 0x0,0x7
06da 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
06db 8219 | | Call 0x1,0x19
06dc 68b0 |h | Jump_Zero 0x78d
06dd e5ff | | Load 0x2,-0x1
06de e003 | | Load 0x0,0x3
06df 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06e0 821a | | Call 0x1,0x1a
06e1 70aa |p | Jump_Nonzero 0x78c
06e2 e5fb | | Load 0x2,-0x5
06e3 709a |p | Jump_Nonzero 0x77e
06e4 e408 | | Load 0x2,0x8
06e5 e5fe | | Load 0x2,-0x2
06e6 e003 | | Load 0x0,0x3
06e7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06e8 00d1 | | Pop_Control Pop_Count_1
06e9 e409 | | Load 0x2,0x9
06ea e404 | | Load 0x2,0x4
06eb 4801 |H | Short_Literal 0x1
06ec 4800 |H | Short_Literal 0x0
06ed 4800 |H | Short_Literal 0x0
06ee e5ff | | Load 0x2,-0x1
06ef e00c | | Load 0x0,0xc
06f0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06f1 c404 | | Store 0x2,0x4
06f2 c409 | | Store 0x2,0x9
06f3 e409 | | Load 0x2,0x9
06f4 6802 |h | Jump_Zero 0x6f7
06f5 e016 | | Load 0x0,0x16
06f6 0257 | W | Execute Discrete,Raise
06f7 00da | | Load_Top At_Offset_2
06f8 00e1 | | Load_Encached Boolean_Cache
06f9 00e1 | | Load_Encached Boolean_Cache
06fa 00e1 | | Load_Encached Boolean_Cache
06fb 00e2 | | Load_Encached Integer_Cache
06fc e404 | | Load 0x2,0x4
06fd e00c | | Load 0x0,0xc
06fe 181b | | Execute Package,Field_Execute,Field_Number 0x1b
06ff c406 | | Store 0x2,0x6
0700 c40c | | Store 0x2,0xc
0701 c40d | | Store 0x2,0xd
0702 c40b | | Store 0x2,0xb
0703 00d1 | | Pop_Control Pop_Count_1
0704 e5fd | | Load 0x2,-0x3
0705 680b |h | Jump_Zero 0x711
0706 e407 | | Load 0x2,0x7
0707 e409 | | Load 0x2,0x9
0708 e406 | | Load 0x2,0x6
0709 4801 |H | Short_Literal 0x1
070a 4801 |H | Short_Literal 0x1
070b e408 | | Load 0x2,0x8
070c e017 | | Load 0x0,0x17
070d 180d | | Execute Package,Field_Execute,Field_Number 0xd
070e c409 | | Store 0x2,0x9
070f c407 | | Store 0x2,0x7
0710 780a |x | Jump 0x71b
0711 e407 | | Load 0x2,0x7
0712 e409 | | Load 0x2,0x9
0713 e406 | | Load 0x2,0x6
0714 4801 |H | Short_Literal 0x1
0715 4802 |H | Short_Literal 0x2
0716 e408 | | Load 0x2,0x8
0717 e017 | | Load 0x0,0x17
0718 180d | | Execute Package,Field_Execute,Field_Number 0xd
0719 c409 | | Store 0x2,0x9
071a c407 | | Store 0x2,0x7
071b e409 | | Load 0x2,0x9
071c 6802 |h | Jump_Zero 0x71f
071d e016 | | Load 0x0,0x16
071e 0257 | W | Execute Discrete,Raise
071f e40c | | Load 0x2,0xc
0720 e407 | | Load 0x2,0x7
0721 0227 | ' | Execute Access,All_Reference
0722 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0723 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0724 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0725 00db | | Load_Top At_Offset_3
0726 e407 | | Load 0x2,0x7
0727 0227 | ' | Execute Access,All_Reference
0728 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0729 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
072a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
072b e40b | | Load 0x2,0xb
072c e407 | | Load 0x2,0x7
072d 0227 | ' | Execute Access,All_Reference
072e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
072f 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0730 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0731 00da | | Load_Top At_Offset_2
0732 e407 | | Load 0x2,0x7
0733 0227 | ' | Execute Access,All_Reference
0734 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0735 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0736 4801 |H | Short_Literal 0x1
0737 e407 | | Load 0x2,0x7
0738 0227 | ' | Execute Access,All_Reference
0739 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
073a e407 | | Load 0x2,0x7
073b e017 | | Load 0x0,0x17
073c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
073d 00cf | | Action Mark_Auxiliary
073e 782e |x. | Jump 0x76d
073f e409 | | Load 0x2,0x9
0740 e402 | | Load 0x2,0x2
0741 e404 | | Load 0x2,0x4
0742 4801 |H | Short_Literal 0x1
0743 e00c | | Load 0x0,0xc
0744 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0745 c404 | | Store 0x2,0x4
0746 00d1 | | Pop_Control Pop_Count_1
0747 c409 | | Store 0x2,0x9
0748 e409 | | Load 0x2,0x9
0749 6802 |h | Jump_Zero 0x74c
074a e016 | | Load 0x0,0x16
074b 0257 | W | Execute Discrete,Raise
074c e409 | | Load 0x2,0x9
074d e402 | | Load 0x2,0x2
074e 4801 |H | Short_Literal 0x1
074f 4801 |H | Short_Literal 0x1
0750 e410 | | Load 0x2,0x10
0751 e407 | | Load 0x2,0x7
0752 0227 | ' | Execute Access,All_Reference
0753 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0754 e407 | | Load 0x2,0x7
0755 e017 | | Load 0x0,0x17
0756 180f | | Execute Package,Field_Execute,Field_Number 0xf
0757 c409 | | Store 0x2,0x9
0758 e409 | | Load 0x2,0x9
0759 6802 |h | Jump_Zero 0x75c
075a e016 | | Load 0x0,0x16
075b 0257 | W | Execute Discrete,Raise
075c e406 | | Load 0x2,0x6
075d 0aff | | Execute_Immediate Plus,-0x1
075e c406 | | Store 0x2,0x6
075f e407 | | Load 0x2,0x7
0760 0227 | ' | Execute Access,All_Reference
0761 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0762 0a01 | | Execute_Immediate Plus,0x1
0763 00d8 | | Load_Top At_Offset_0
0764 e010 | | Load 0x0,0x10
0765 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0766 0260 | ` | Execute Discrete,In_Type
0767 7001 |p | Jump_Nonzero 0x769
0768 0801 | | Execute_Immediate Raise,0x1
0769 e407 | | Load 0x2,0x7
076a 0227 | ' | Execute Access,All_Reference
076b 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
076c 00c9 | | Action Pop_Auxiliary_Loop
076d e406 | | Load 0x2,0x6
076e 0c01 | | Execute_Immediate Greater_Equal,0x1
076f 77cf |w | Jump_Nonzero 0x73f
0770 00ce | | Action Pop_Auxiliary
0771 e407 | | Load 0x2,0x7
0772 e409 | | Load 0x2,0x9
0773 e403 | | Load 0x2,0x3
0774 4801 |H | Short_Literal 0x1
0775 4800 |H | Short_Literal 0x0
0776 e017 | | Load 0x0,0x17
0777 180e | | Execute Package,Field_Execute,Field_Number 0xe
0778 c409 | | Store 0x2,0x9
0779 c407 | | Store 0x2,0x7
077a e409 | | Load 0x2,0x9
077b 6810 |h | Jump_Zero 0x78c
077c e016 | | Load 0x0,0x16
077d 0257 | W | Execute Discrete,Raise
077e e007 | | Load 0x0,0x7
077f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0780 4802 |H | Short_Literal 0x2
0781 0092 0c9c | | Action Push_String_Extended,0xc9c ; "Dfs file "
0783 e5ff | | Load 0x2,-0x1
0784 01cc | | Execute Vector,Catenate
0785 0092 0c9d | | Action Push_String_Extended,0xc9d ; " would have been copied to "
0787 01cc | | Execute Vector,Catenate
0788 e5fe | | Load 0x2,-0x2
0789 01cc | | Execute Vector,Catenate
078a e008 | | Load 0x0,0x8
078b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
078c 821b | | Call 0x1,0x1b
078d 4506 |E | Exit_Suprogram New_Top_Offset 0x6
078e 0000 0000 | | .XXX[0x2]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 07ae | | .CONST 0x07ae ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0007 | | .CONST 0x0007 ; Number of locals
0793 INIT_0790:
0793 e00c | | Load 0x0,0xc
0794 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0795 4801 |H | Short_Literal 0x1
0796 e003 | | Load 0x0,0x3
0797 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0798 1c08 | | Execute_Immediate Run_Utility,0x8
0799 00d8 | | Load_Top At_Offset_0
079a 1c00 | | Execute_Immediate Run_Utility,0x0
079b e010 | | Load 0x0,0x10
079c 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
079d 481e |H | Short_Literal 0x1e
079e e003 | | Load 0x0,0x3
079f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07a0 1c08 | | Execute_Immediate Run_Utility,0x8
07a1 00d8 | | Load_Top At_Offset_0
07a2 1c00 | | Execute_Immediate Run_Utility,0x0
07a3 481e |H | Short_Literal 0x1e
07a4 e003 | | Load 0x0,0x3
07a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07a6 1c08 | | Execute_Immediate Run_Utility,0x8
07a7 00d8 | | Load_Top At_Offset_0
07a8 1c00 | | Execute_Immediate Run_Utility,0x0
07a9 e005 | | Load 0x0,0x5
07aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07ab 02c7 | | Declare_Variable Any
07ac 00d8 | | Load_Top At_Offset_0
07ad 1c00 | | Execute_Immediate Run_Utility,0x0
07ae BODY_0790:
07ae e5fd | | Load 0x2,-0x3
07af 0092 0c9b | | Action Push_String_Extended,0xc9b ; "<quiet>"
07b1 01de | | Execute Vector,Not_Equal
07b2 680b |h | Jump_Zero 0x7be
07b3 00d8 | | Load_Top At_Offset_0
07b4 e5fd | | Load 0x2,-0x3
07b5 e007 | | Load 0x0,0x7
07b6 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
07b7 c407 | | Store 0x2,0x7
07b8 e007 | | Load 0x0,0x7
07b9 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ba 00d9 | | Load_Top At_Offset_1
07bb e008 | | Load 0x0,0x8
07bc 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07bd 7804 |x | Jump 0x7c2
07be e007 | | Load 0x0,0x7
07bf 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
07c0 e007 | | Load 0x0,0x7
07c1 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
07c2 8219 | | Call 0x1,0x19
07c3 6845 |hE | Jump_Zero 0x809
07c4 e5fc | | Load 0x2,-0x4
07c5 7034 |p4 | Jump_Nonzero 0x7fa
07c6 00da | | Load_Top At_Offset_2
07c7 e5ff | | Load 0x2,-0x1
07c8 e003 | | Load 0x0,0x3
07c9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07ca 00d1 | | Pop_Control Pop_Count_1
07cb 00d9 | | Load_Top At_Offset_1
07cc e5fe | | Load 0x2,-0x2
07cd e003 | | Load 0x0,0x3
07ce 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07cf 00d1 | | Pop_Control Pop_Count_1
07d0 00db | | Load_Top At_Offset_3
07d1 e402 | | Load 0x2,0x2
07d2 4800 |H | Short_Literal 0x0
07d3 4801 |H | Short_Literal 0x1
07d4 4800 |H | Short_Literal 0x0
07d5 e405 | | Load 0x2,0x5
07d6 e017 | | Load 0x0,0x17
07d7 180d | | Execute Package,Field_Execute,Field_Number 0xd
07d8 c402 | | Store 0x2,0x2
07d9 c404 | | Store 0x2,0x4
07da e402 | | Load 0x2,0x2
07db 6802 |h | Jump_Zero 0x7de
07dc e018 | | Load 0x0,0x18
07dd 0257 | W | Execute Discrete,Raise
07de 00db | | Load_Top At_Offset_3
07df e402 | | Load 0x2,0x2
07e0 00db | | Load_Top At_Offset_3
07e1 4801 |H | Short_Literal 0x1
07e2 4801 |H | Short_Literal 0x1
07e3 e017 | | Load 0x0,0x17
07e4 180e | | Execute Package,Field_Execute,Field_Number 0xe
07e5 c402 | | Store 0x2,0x2
07e6 c404 | | Store 0x2,0x4
07e7 e402 | | Load 0x2,0x2
07e8 6802 |h | Jump_Zero 0x7eb
07e9 e018 | | Load 0x0,0x18
07ea 0257 | W | Execute Discrete,Raise
07eb e007 | | Load 0x0,0x7
07ec 180e | | Execute Package,Field_Execute,Field_Number 0xe
07ed 4802 |H | Short_Literal 0x2
07ee 0092 0c9c | | Action Push_String_Extended,0xc9c ; "Dfs file "
07f0 e5ff | | Load 0x2,-0x1
07f1 01cc | | Execute Vector,Catenate
07f2 0092 0c9e | | Action Push_String_Extended,0xc9e ; " has been renamed "
07f4 01cc | | Execute Vector,Catenate
07f5 e5fe | | Load 0x2,-0x2
07f6 01cc | | Execute Vector,Catenate
07f7 e008 | | Load 0x0,0x8
07f8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07f9 780e |x | Jump 0x808
07fa e007 | | Load 0x0,0x7
07fb 180e | | Execute Package,Field_Execute,Field_Number 0xe
07fc 4802 |H | Short_Literal 0x2
07fd 0092 0c9c | | Action Push_String_Extended,0xc9c ; "Dfs file "
07ff e5ff | | Load 0x2,-0x1
0800 01cc | | Execute Vector,Catenate
0801 0092 0c9f | | Action Push_String_Extended,0xc9f ; " would have been renamed "
0803 01cc | | Execute Vector,Catenate
0804 e5fe | | Load 0x2,-0x2
0805 01cc | | Execute Vector,Catenate
0806 e008 | | Load 0x0,0x8
0807 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0808 821b | | Call 0x1,0x1b
0809 4505 |E | Exit_Suprogram New_Top_Offset 0x5
080a 0000 0000 | | .BLANK 0000[0x6]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0835 | 5 | .CONST 0x0835 ; Address of begin
0811 08d4 | | .CONST 0x08d4 ; Address of exception handler
0812 0009 | | .CONST 0x0009 ; Number of locals
0813 INIT_0810:
0813 00e2 | | Load_Encached Integer_Cache
0814 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0815 e00c | | Load 0x0,0xc
0816 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0817 4801 |H | Short_Literal 0x1
0818 e003 | | Load 0x0,0x3
0819 1b0e | | Execute Package,Field_Read,Field_Number 0xe
081a 1c08 | | Execute_Immediate Run_Utility,0x8
081b 00d8 | | Load_Top At_Offset_0
081c 1c00 | | Execute_Immediate Run_Utility,0x0
081d 481e |H | Short_Literal 0x1e
081e e003 | | Load 0x0,0x3
081f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0820 1c08 | | Execute_Immediate Run_Utility,0x8
0821 00d8 | | Load_Top At_Offset_0
0822 1c00 | | Execute_Immediate Run_Utility,0x0
0823 481e |H | Short_Literal 0x1e
0824 e003 | | Load 0x0,0x3
0825 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0826 1c08 | | Execute_Immediate Run_Utility,0x8
0827 00d8 | | Load_Top At_Offset_0
0828 1c00 | | Execute_Immediate Run_Utility,0x0
0829 e010 | | Load 0x0,0x10
082a 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
082b e004 | | Load 0x0,0x4
082c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
082d 0322 | " | Declare_Variable Record
082e 00d8 | | Load_Top At_Offset_0
082f 1c00 | | Execute_Immediate Run_Utility,0x0
0830 e005 | | Load 0x0,0x5
0831 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0832 02c7 | | Declare_Variable Any
0833 00d8 | | Load_Top At_Offset_0
0834 1c00 | | Execute_Immediate Run_Utility,0x0
0835 BODY_0810:
0835 e5fe | | Load 0x2,-0x2
0836 0092 0c9b | | Action Push_String_Extended,0xc9b ; "<quiet>"
0838 01de | | Execute Vector,Not_Equal
0839 680b |h | Jump_Zero 0x845
083a 00d8 | | Load_Top At_Offset_0
083b e5fe | | Load 0x2,-0x2
083c e007 | | Load 0x0,0x7
083d 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
083e c409 | | Store 0x2,0x9
083f e007 | | Load 0x0,0x7
0840 180e | | Execute Package,Field_Execute,Field_Number 0xe
0841 00d9 | | Load_Top At_Offset_1
0842 e008 | | Load 0x0,0x8
0843 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0844 7804 |x | Jump 0x849
0845 e007 | | Load 0x0,0x7
0846 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0847 e007 | | Load 0x0,0x7
0848 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0849 8219 | | Call 0x1,0x19
084a 6888 |h | Jump_Zero 0x8d3
084b e405 | | Load 0x2,0x5
084c e5ff | | Load 0x2,-0x1
084d e003 | | Load 0x0,0x3
084e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
084f 00d1 | | Pop_Control Pop_Count_1
0850 00d9 | | Load_Top At_Offset_1
0851 e405 | | Load 0x2,0x5
0852 e003 | | Load 0x0,0x3
0853 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0854 e004 | | Load 0x0,0x4
0855 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0856 00d1 | | Pop_Control Pop_Count_1
0857 00db | | Load_Top At_Offset_3
0858 00da | | Load_Top At_Offset_2
0859 e004 | | Load 0x0,0x4
085a 181f | | Execute Package,Field_Execute,Field_Number 0x1f
085b 00d2 | | Pop_Control Pop_Count_2
085c 00cf | | Action Mark_Auxiliary
085d 7849 |xI | Jump 0x8a7
085e e406 | | Load 0x2,0x6
085f 821a | | Call 0x1,0x1a
0860 7040 |p@ | Jump_Nonzero 0x8a1
0861 e5fd | | Load 0x2,-0x3
0862 702d |p- | Jump_Nonzero 0x890
0863 00db | | Load_Top At_Offset_3
0864 e403 | | Load 0x2,0x3
0865 4800 |H | Short_Literal 0x0
0866 4801 |H | Short_Literal 0x1
0867 4800 |H | Short_Literal 0x0
0868 e406 | | Load 0x2,0x6
0869 e017 | | Load 0x0,0x17
086a 180d | | Execute Package,Field_Execute,Field_Number 0xd
086b c403 | | Store 0x2,0x3
086c c407 | | Store 0x2,0x7
086d e403 | | Load 0x2,0x3
086e 6802 |h | Jump_Zero 0x871
086f e019 | | Load 0x0,0x19
0870 0257 | W | Execute Discrete,Raise
0871 00db | | Load_Top At_Offset_3
0872 e403 | | Load 0x2,0x3
0873 e404 | | Load 0x2,0x4
0874 4801 |H | Short_Literal 0x1
0875 4802 |H | Short_Literal 0x2
0876 e017 | | Load 0x0,0x17
0877 180e | | Execute Package,Field_Execute,Field_Number 0xe
0878 c403 | | Store 0x2,0x3
0879 c407 | | Store 0x2,0x7
087a e403 | | Load 0x2,0x3
087b 6802 |h | Jump_Zero 0x87e
087c e019 | | Load 0x0,0x19
087d 0257 | W | Execute Discrete,Raise
087e e007 | | Load 0x0,0x7
087f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0880 4802 |H | Short_Literal 0x2
0881 0092 0c9c | | Action Push_String_Extended,0xc9c ; "Dfs file "
0883 e406 | | Load 0x2,0x6
0884 e003 | | Load 0x0,0x3
0885 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0886 01cc | | Execute Vector,Catenate
0887 0092 0ca0 | | Action Push_String_Extended,0xca0 ; " has been deleted"
0889 01cc | | Execute Vector,Catenate
088a e008 | | Load 0x0,0x8
088b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
088c e402 | | Load 0x2,0x2
088d 0a01 | | Execute_Immediate Plus,0x1
088e c402 | | Store 0x2,0x2
088f 7811 |x | Jump 0x8a1
0890 e007 | | Load 0x0,0x7
0891 180e | | Execute Package,Field_Execute,Field_Number 0xe
0892 4802 |H | Short_Literal 0x2
0893 0092 0c9c | | Action Push_String_Extended,0xc9c ; "Dfs file "
0895 e406 | | Load 0x2,0x6
0896 e003 | | Load 0x0,0x3
0897 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0898 01cc | | Execute Vector,Catenate
0899 0092 0ca1 | | Action Push_String_Extended,0xca1 ; " would have been deleted"
089b 01cc | | Execute Vector,Catenate
089c e008 | | Load 0x0,0x8
089d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
089e e402 | | Load 0x2,0x2
089f 0a01 | | Execute_Immediate Plus,0x1
08a0 c402 | | Store 0x2,0x2
08a1 e406 | | Load 0x2,0x6
08a2 00db | | Load_Top At_Offset_3
08a3 e004 | | Load 0x0,0x4
08a4 181f | | Execute Package,Field_Execute,Field_Number 0x1f
08a5 00d2 | | Pop_Control Pop_Count_2
08a6 00c9 | | Action Pop_Auxiliary_Loop
08a7 00da | | Load_Top At_Offset_2
08a8 e004 | | Load 0x0,0x4
08a9 1820 | | Execute Package,Field_Execute,Field_Number 0x20
08aa 6fb3 |o | Jump_Zero 0x85e
08ab 00ce | | Action Pop_Auxiliary
08ac e402 | | Load 0x2,0x2
08ad 7008 |p | Jump_Nonzero 0x8b6
08ae e007 | | Load 0x0,0x7
08af 180e | | Execute Package,Field_Execute,Field_Number 0xe
08b0 4802 |H | Short_Literal 0x2
08b1 0092 0c86 | | Action Push_String_Extended,0xc86 ; "No matching files found"
08b3 e008 | | Load 0x0,0x8
08b4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08b5 781c |x | Jump 0x8d2
08b6 e402 | | Load 0x2,0x2
08b7 0c02 | | Execute_Immediate Greater_Equal,0x2
08b8 6819 |h | Jump_Zero 0x8d2
08b9 e5fd | | Load 0x2,-0x3
08ba 700c |p | Jump_Nonzero 0x8c7
08bb e007 | | Load 0x0,0x7
08bc 180e | | Execute Package,Field_Execute,Field_Number 0xe
08bd 4802 |H | Short_Literal 0x2
08be e402 | | Load 0x2,0x2
08bf 00e0 | | Load_Encached Standard_Cache
08c0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08c1 0092 0ca2 | | Action Push_String_Extended,0xca2 ; " files have been deleted"
08c3 01cc | | Execute Vector,Catenate
08c4 e008 | | Load 0x0,0x8
08c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08c6 780b |x | Jump 0x8d2
08c7 e007 | | Load 0x0,0x7
08c8 180e | | Execute Package,Field_Execute,Field_Number 0xe
08c9 4802 |H | Short_Literal 0x2
08ca e402 | | Load 0x2,0x2
08cb 00e0 | | Load_Encached Standard_Cache
08cc 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08cd 0092 0ca3 | | Action Push_String_Extended,0xca3 ; " files would have been deleted"
08cf 01cc | | Execute Vector,Catenate
08d0 e008 | | Load 0x0,0x8
08d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08d2 821b | | Call 0x1,0x1b
08d3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
08d4 TRAP_0810:
08d4 e019 | | Load 0x0,0x19
08d5 010f | | Execute Exception,Equal
08d6 680c |h | Jump_Zero 0x8e3
08d7 e007 | | Load 0x0,0x7
08d8 180e | | Execute Package,Field_Execute,Field_Number 0xe
08d9 4802 |H | Short_Literal 0x2
08da 0092 0ca4 | | Action Push_String_Extended,0xca4 ; "Unknown error deleting Dfs file "
08dc e406 | | Load 0x2,0x6
08dd e003 | | Load 0x0,0x3
08de 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08df 01cc | | Execute Vector,Catenate
08e0 e008 | | Load 0x0,0x8
08e1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08e2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
08e3 4504 |E | Exit_Suprogram New_Top_Offset 0x4
08e4 0000 0000 | | .BLANK 0000[0x4]
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08eb | | .CONST 0x08eb ; Address of begin
08e9 0900 | | .CONST 0x0900 ; Address of exception handler
08ea 0001 | | .CONST 0x0001 ; Number of locals
08eb BODY_08e8:
08eb INIT_08e8:
08eb e01a | | Load 0x0,0x1a
08ec 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08ed 6809 |h | Jump_Zero 0x8f7
08ee e217 | | Load 0x1,0x17
08ef 00ea | | Load_Encached Null_String_Cache
08f0 e20d | | Load 0x1,0xd
08f1 4801 |H | Short_Literal 0x1
08f2 e001 | | Load 0x0,0x1
08f3 1815 | | Execute Package,Field_Execute,Field_Number 0x15
08f4 c217 | | Store 0x1,0x17
08f5 4801 |H | Short_Literal 0x1
08f6 00ca | | Action Exit_Nullary_Function
08f7 e007 | | Load 0x0,0x7
08f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
08f9 4807 |H | Short_Literal 0x7
08fa 0092 0ca5 | | Action Push_String_Extended,0xca5 ; "Operator privilege required for attempted operation or another install job already exists"
08fc e008 | | Load 0x0,0x8
08fd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08fe 4800 |H | Short_Literal 0x0
08ff 00ca | | Action Exit_Nullary_Function
0900 TRAP_08e8:
0900 00d8 | | Load_Top At_Offset_0
0901 0107 | | Execute Exception,Get_Name
0902 4920 |I | Short_Literal 0x120
0903 492f |I/ | Short_Literal 0x12f
0904 0262 | b | Execute Discrete,In_Range
0905 6816 |h | Jump_Zero 0x91c
0906 e217 | | Load 0x1,0x17
0907 00ea | | Load_Encached Null_String_Cache
0908 e20d | | Load 0x1,0xd
0909 4801 |H | Short_Literal 0x1
090a e001 | | Load 0x0,0x1
090b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
090c c217 | | Store 0x1,0x17
090d e217 | | Load 0x1,0x17
090e e001 | | Load 0x0,0x1
090f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0910 6802 |h | Jump_Zero 0x913
0911 4801 |H | Short_Literal 0x1
0912 00ca | | Action Exit_Nullary_Function
0913 e007 | | Load 0x0,0x7
0914 180e | | Execute Package,Field_Execute,Field_Number 0xe
0915 4807 |H | Short_Literal 0x7
0916 0092 0ca5 | | Action Push_String_Extended,0xca5 ; "Operator privilege required for attempted operation or another install job already exists"
0918 e008 | | Load 0x0,0x8
0919 1813 | | Execute Package,Field_Execute,Field_Number 0x13
091a 4800 |H | Short_Literal 0x0
091b 00ca | | Action Exit_Nullary_Function
091c e007 | | Load 0x0,0x7
091d 180e | | Execute Package,Field_Execute,Field_Number 0xe
091e 4807 |H | Short_Literal 0x7
091f 0092 0ca5 | | Action Push_String_Extended,0xca5 ; "Operator privilege required for attempted operation or another install job already exists"
0921 e008 | | Load 0x0,0x8
0922 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0923 4800 |H | Short_Literal 0x0
0924 00ca | | Action Exit_Nullary_Function
0925 0000 0000 | | .XXX[0x3]
0927 0000 | |
0928 ; --------------------------------------------------------------------------------------
0928 ; SUBPROGRAM
0928 ; --------------------------------------------------------------------------------------
0928 092f | / | .CONST 0x092f ; Address of begin
0929 0004 | | .CONST 0x0004 ; Address of exception handler
092a 0003 | | .CONST 0x0003 ; Number of locals
092b INIT_0928:
092b 0092 0c6e | n| Action Push_String_Extended,0xc6e ; "DFS_BOOTSTRAP.M200"
092d 00e1 | | Load_Encached Boolean_Cache
092e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
092f BODY_0928:
092f e5ff | | Load 0x2,-0x1
0930 e003 | | Load 0x0,0x3
0931 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0932 0f12 | | Execute_Immediate Equal,0x12
0933 6817 |h | Jump_Zero 0x94b
0934 4801 |H | Short_Literal 0x1
0935 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0936 00cf | | Action Mark_Auxiliary
0937 e5ff | | Load 0x2,-0x1
0938 e003 | | Load 0x0,0x3
0939 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
093a 4801 |H | Short_Literal 0x1
093b 0263 | c | Execute Discrete,Above_Bound
093c 700d |p | Jump_Nonzero 0x94a
093d 00db | | Load_Top At_Offset_3
093e 00d9 | | Load_Top At_Offset_1
093f e402 | | Load 0x2,0x2
0940 01d7 | | Execute Vector,Field_Read
0941 00da | | Load_Top At_Offset_2
0942 e5ff | | Load 0x2,-0x1
0943 e003 | | Load 0x0,0x3
0944 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0945 027f | | Execute Discrete,Equal
0946 0279 | y | Execute Discrete,And
0947 a403 | | Store_Unchecked 0x2,0x3
0948 00c8 | | Action Pop_Auxiliary_Range
0949 3ff3 |? | Loop_Increasing 0x93d
094a 00ce | | Action Pop_Auxiliary
094b 00d8 | | Load_Top At_Offset_0
094c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
094d 0000 0000 | | .XXX[0x3]
094f 0000 | |
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953 | S | .CONST 0x0953 ; Address of begin
0951 0004 | | .CONST 0x0004 ; Address of exception handler
0952 0001 | | .CONST 0x0001 ; Number of locals
0953 BODY_0950:
0953 INIT_0950:
0953 e217 | | Load 0x1,0x17
0954 e001 | | Load 0x0,0x1
0955 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0956 c217 | | Store 0x1,0x17
0957 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0958 ; --------------------------------------------------------------------------------------
0958 ; SUBPROGRAM
0958 ; --------------------------------------------------------------------------------------
0958 0963 | c | .CONST 0x0963 ; Address of begin
0959 0004 | | .CONST 0x0004 ; Address of exception handler
095a 0002 | | .CONST 0x0002 ; Number of locals
095b INIT_0958:
095b 4801 |H | Short_Literal 0x1
095c 00db | | Load_Top At_Offset_3
095d 0092 0ca6 | | Action Push_String_Extended,0xca6 ; "--"
095f e00e | | Load 0x0,0xe
0960 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0961 00e2 | | Load_Encached Integer_Cache
0962 03f1 | | Declare_Variable Discrete,With_Value
0963 BODY_0958:
0963 00d8 | | Load_Top At_Offset_0
0964 0c01 | | Execute_Immediate Greater_Equal,0x1
0965 680f |h | Jump_Zero 0x975
0966 4820 |H | Short_Literal 0x20
0967 e5ff | | Load 0x2,-0x1
0968 01dd | | Execute Vector,First
0969 00da | | Load_Top At_Offset_2
096a 0aff | | Execute_Immediate Plus,-0x1
096b 00d8 | | Load_Top At_Offset_0
096c 00e2 | | Load_Encached Integer_Cache
096d 0260 | ` | Execute Discrete,In_Type
096e 7001 |p | Jump_Nonzero 0x970
096f 0801 | | Execute_Immediate Raise,0x1
0970 e5ff | | Load 0x2,-0x1
0971 01cf | | Execute Vector,Slice_Read
0972 e00e | | Load 0x0,0xe
0973 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0974 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0975 4820 |H | Short_Literal 0x20
0976 e5ff | | Load 0x2,-0x1
0977 e00e | | Load 0x0,0xe
0978 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0979 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
097a 0000 0000 | | .BLANK 0000[0x6]
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0983 | | .CONST 0x0983 ; Address of begin
0981 0004 | | .CONST 0x0004 ; Address of exception handler
0982 0001 | | .CONST 0x0001 ; Number of locals
0983 BODY_0980:
0983 INIT_0980:
0983 00db | | Load_Top At_Offset_3
0984 e218 | | Load 0x1,0x18
0985 012f | / | Execute Any,Equal
0986 7009 |p | Jump_Nonzero 0x990
0987 4801 |H | Short_Literal 0x1
0988 e5fe | | Load 0x2,-0x2
0989 e5ff | | Load 0x2,-0x1
098a e002 | | Load 0x0,0x2
098b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
098c e002 | | Load 0x0,0x2
098d 181a | | Execute Package,Field_Execute,Field_Number 0x1a
098e 0f00 | | Execute_Immediate Equal,0x0
098f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0990 4800 |H | Short_Literal 0x0
0991 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0992 0000 0000 | | .BLANK 0000[0x6]
0998 ; --------------------------------------------------------------------------------------
0998 ; SUBPROGRAM
0998 ; --------------------------------------------------------------------------------------
0998 099f | | .CONST 0x099f ; Address of begin
0999 0004 | | .CONST 0x0004 ; Address of exception handler
099a 0002 | | .CONST 0x0002 ; Number of locals
099b INIT_0998:
099b 00da | | Load_Top At_Offset_2
099c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
099d e00b | | Load 0x0,0xb
099e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
099f BODY_0998:
099f 00d8 | | Load_Top At_Offset_0
09a0 e5fe | | Load 0x2,-0x2
09a1 e015 | | Load 0x0,0x15
09a2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09a3 6805 |h | Jump_Zero 0x9a9
09a4 00d8 | | Load_Top At_Offset_0
09a5 e5fd | | Load 0x2,-0x3
09a6 e015 | | Load 0x0,0x15
09a7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
09a8 6804 |h | Jump_Zero 0x9ad
09a9 e5fc | | Load 0x2,-0x4
09aa 00d9 | | Load_Top At_Offset_1
09ab 821d | | Call 0x1,0x1d
09ac 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
09ad 4801 |H | Short_Literal 0x1
09ae 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
09af 0000 | | .XXX[0x1]
09b0 ; --------------------------------------------------------------------------------------
09b0 ; SUBPROGRAM
09b0 ; --------------------------------------------------------------------------------------
09b0 09f0 | | .CONST 0x09f0 ; Address of begin
09b1 0004 | | .CONST 0x0004 ; Address of exception handler
09b2 0007 | | .CONST 0x0007 ; Number of locals
09b3 INIT_09b0:
09b3 4801 |H | Short_Literal 0x1
09b4 4820 |H | Short_Literal 0x20
09b5 00e9 | | Load_Encached String_Cache
09b6 035b | [ | Declare_Type Array,Constrained
09b7 0337 | 7 | Declare_Variable Array
09b8 00d8 | | Load_Top At_Offset_0
09b9 0335 | 5 | Declare_Variable Array,Duplicate
09ba 00cd | | Action Spare6_Action
09bb 4820 |H | Short_Literal 0x20
09bc 4801 |H | Short_Literal 0x1
09bd 4820 |H | Short_Literal 0x20
09be 00d9 | | Load_Top At_Offset_1
09bf e403 | | Load 0x2,0x3
09c0 01d6 | | Execute Vector,Field_Write
09c1 3ffb |? | Loop_Increasing 0x9bd
09c2 00d9 | | Load_Top At_Offset_1
09c3 01d4 | | Execute Vector,Structure_Write
09c4 00e1 | | Load_Encached Boolean_Cache
09c5 0266 | f | Execute Discrete,Bounds
09c6 00e8 | | Load_Encached Character_Cache
09c7 02a0 | | Declare_Subprogram Null_Subprogram
09c8 4801 |H | Short_Literal 0x1
09c9 035d | ] | Declare_Type Array,Defined
09ca 00d8 | | Load_Top At_Offset_0
09cb 0337 | 7 | Declare_Variable Array
09cc 00d8 | | Load_Top At_Offset_0
09cd 0335 | 5 | Declare_Variable Array,Duplicate
09ce 00cd | | Action Spare6_Action
09cf 482d |H- | Short_Literal 0x2d
09d0 4800 |H | Short_Literal 0x0
09d1 00da | | Load_Top At_Offset_2
09d2 01d6 | | Execute Vector,Field_Write
09d3 484b |HK | Short_Literal 0x4b
09d4 4801 |H | Short_Literal 0x1
09d5 00da | | Load_Top At_Offset_2
09d6 01d6 | | Execute Vector,Field_Write
09d7 00d9 | | Load_Top At_Offset_1
09d8 01d4 | | Execute Vector,Structure_Write
09d9 00e1 | | Load_Encached Boolean_Cache
09da 0266 | f | Execute Discrete,Bounds
09db 00e8 | | Load_Encached Character_Cache
09dc 02a0 | | Declare_Subprogram Null_Subprogram
09dd 4801 |H | Short_Literal 0x1
09de 035d | ] | Declare_Type Array,Defined
09df 00d8 | | Load_Top At_Offset_0
09e0 0337 | 7 | Declare_Variable Array
09e1 00d8 | | Load_Top At_Offset_0
09e2 0335 | 5 | Declare_Variable Array,Duplicate
09e3 00cd | | Action Spare6_Action
09e4 482d |H- | Short_Literal 0x2d
09e5 4800 |H | Short_Literal 0x0
09e6 00da | | Load_Top At_Offset_2
09e7 01d6 | | Execute Vector,Field_Write
09e8 4850 |HP | Short_Literal 0x50
09e9 4801 |H | Short_Literal 0x1
09ea 00da | | Load_Top At_Offset_2
09eb 01d6 | | Execute Vector,Field_Write
09ec 00d9 | | Load_Top At_Offset_1
09ed 01d4 | | Execute Vector,Structure_Write
09ee 029f 0c63 | c| Declare_Subprogram INIT_0c60,For_Call
09f0 BODY_09b0:
09f0 e5fe | | Load 0x2,-0x2
09f1 01db | | Execute Vector,Length
09f2 6803 |h | Jump_Zero 0x9f6
09f3 e5fe | | Load 0x2,-0x2
09f4 e001 | | Load 0x0,0x1
09f5 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
09f6 e5ff | | Load 0x2,-0x1
09f7 e006 | | Load 0x0,0x6
09f8 1820 | | Execute Package,Field_Execute,Field_Number 0x20
09f9 6804 |h | Jump_Zero 0x9fe
09fa 482a |H* | Short_Literal 0x2a
09fb e001 | | Load 0x0,0x1
09fc 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
09fd 7803 |x | Jump 0xa01
09fe 4820 |H | Short_Literal 0x20
09ff e001 | | Load 0x0,0x1
0a00 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0a01 480a |H | Short_Literal 0xa
0a02 4805 |H | Short_Literal 0x5
0a03 e5ff | | Load 0x2,-0x1
0a04 e006 | | Load 0x0,0x6
0a05 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0a06 e001 | | Load 0x0,0x1
0a07 186c | l | Execute Package,Field_Execute,Field_Number 0x6c
0a08 0092 0ca7 | | Action Push_String_Extended,0xca7 ; ": "
0a0a e001 | | Load 0x0,0x1
0a0b 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0a0c e5fd | | Load 0x2,-0x3
0a0d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a0e e00b | | Load 0x0,0xb
0a0f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a10 4801 |H | Short_Literal 0x1
0a11 e5fd | | Load 0x2,-0x3
0a12 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a13 e00b | | Load 0x0,0xb
0a14 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0a15 e402 | | Load 0x2,0x2
0a16 01ce | | Execute Vector,Slice_Write
0a17 e402 | | Load 0x2,0x2
0a18 e001 | | Load 0x0,0x1
0a19 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0a1a 480a |H | Short_Literal 0xa
0a1b 4808 |H | Short_Literal 0x8
0a1c e5fd | | Load 0x2,-0x3
0a1d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0a1e e001 | | Load 0x0,0x1
0a1f 186c | l | Execute Package,Field_Execute,Field_Number 0x6c
0a20 4820 |H | Short_Literal 0x20
0a21 e001 | | Load 0x0,0x1
0a22 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0a23 e5fd | | Load 0x2,-0x3
0a24 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0a25 8407 | | Call 0x2,0x7
0a26 e001 | | Load 0x0,0x1
0a27 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0a28 4820 |H | Short_Literal 0x20
0a29 e001 | | Load 0x0,0x1
0a2a 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0a2b e5fd | | Load 0x2,-0x3
0a2c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0a2d e404 | | Load 0x2,0x4
0a2e 01d7 | | Execute Vector,Field_Read
0a2f e001 | | Load 0x0,0x1
0a30 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0a31 e5fd | | Load 0x2,-0x3
0a32 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0a33 00da | | Load_Top At_Offset_2
0a34 01d7 | | Execute Vector,Field_Read
0a35 e001 | | Load 0x0,0x1
0a36 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0a37 4801 |H | Short_Literal 0x1
0a38 e001 | | Load 0x0,0x1
0a39 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0a3a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a3b 0000 0000 | | .BLANK 0000[0x5]
0a40 ; --------------------------------------------------------------------------------------
0a40 ; SUBPROGRAM
0a40 ; --------------------------------------------------------------------------------------
0a40 0a43 | C | .CONST 0x0a43 ; Address of begin
0a41 0004 | | .CONST 0x0004 ; Address of exception handler
0a42 0001 | | .CONST 0x0001 ; Number of locals
0a43 BODY_0a40:
0a43 INIT_0a40:
0a43 00db | | Load_Top At_Offset_3
0a44 00ea | | Load_Encached Null_String_Cache
0a45 e5ff | | Load 0x2,-0x1
0a46 821f | | Call 0x1,0x1f
0a47 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a48 ; --------------------------------------------------------------------------------------
0a48 ; SUBPROGRAM
0a48 ; --------------------------------------------------------------------------------------
0a48 0a53 | S | .CONST 0x0a53 ; Address of begin
0a49 0004 | | .CONST 0x0004 ; Address of exception handler
0a4a 0002 | | .CONST 0x0002 ; Number of locals
0a4b INIT_0a48:
0a4b 4801 |H | Short_Literal 0x1
0a4c 00db | | Load_Top At_Offset_3
0a4d 0092 0c85 | | Action Push_String_Extended,0xc85 ; "."
0a4f e00e | | Load 0x0,0xe
0a50 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0a51 00e2 | | Load_Encached Integer_Cache
0a52 03f1 | | Declare_Variable Discrete,With_Value
0a53 BODY_0a48:
0a53 00d8 | | Load_Top At_Offset_0
0a54 0c01 | | Execute_Immediate Greater_Equal,0x1
0a55 681c |h | Jump_Zero 0xa72
0a56 00db | | Load_Top At_Offset_3
0a57 01dd | | Execute Vector,First
0a58 00d9 | | Load_Top At_Offset_1
0a59 0aff | | Execute_Immediate Plus,-0x1
0a5a 00d8 | | Load_Top At_Offset_0
0a5b 00e2 | | Load_Encached Integer_Cache
0a5c 0260 | ` | Execute Discrete,In_Type
0a5d 7001 |p | Jump_Nonzero 0xa5f
0a5e 0801 | | Execute_Immediate Raise,0x1
0a5f e5ff | | Load 0x2,-0x1
0a60 01cf | | Execute Vector,Slice_Read
0a61 0092 0ca8 | | Action Push_String_Extended,0xca8 ; "_"
0a63 01cc | | Execute Vector,Catenate
0a64 00d9 | | Load_Top At_Offset_1
0a65 0a01 | | Execute_Immediate Plus,0x1
0a66 00d8 | | Load_Top At_Offset_0
0a67 00e2 | | Load_Encached Integer_Cache
0a68 0260 | ` | Execute Discrete,In_Type
0a69 7001 |p | Jump_Nonzero 0xa6b
0a6a 0801 | | Execute_Immediate Raise,0x1
0a6b e5ff | | Load 0x2,-0x1
0a6c 01dc | | Execute Vector,Last
0a6d e5ff | | Load 0x2,-0x1
0a6e 01cf | | Execute Vector,Slice_Read
0a6f 8221 | ! | Call 0x1,0x21
0a70 01cc | | Execute Vector,Catenate
0a71 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a72 00db | | Load_Top At_Offset_3
0a73 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0a74 0000 0000 | | .BLANK 0000[0x4]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a91 | | .CONST 0x0a91 ; Address of begin
0a79 0004 | | .CONST 0x0004 ; Address of exception handler
0a7a 0005 | | .CONST 0x0005 ; Number of locals
0a7b INIT_0a78:
0a7b e411 | | Load 0x2,0x11
0a7c e001 | | Load 0x0,0x1
0a7d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0a7e 821c | | Call 0x1,0x1c
0a7f 00d8 | | Load_Top At_Offset_0
0a80 01dd | | Execute Vector,First
0a81 00e2 | | Load_Encached Integer_Cache
0a82 03f1 | | Declare_Variable Discrete,With_Value
0a83 4801 |H | Short_Literal 0x1
0a84 00da | | Load_Top At_Offset_2
0a85 483a |H: | Short_Literal 0x3a
0a86 e00e | | Load 0x0,0xe
0a87 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0a88 00e2 | | Load_Encached Integer_Cache
0a89 03f1 | | Declare_Variable Discrete,With_Value
0a8a 4801 |H | Short_Literal 0x1
0a8b 00db | | Load_Top At_Offset_3
0a8c 482f |H/ | Short_Literal 0x2f
0a8d e00e | | Load 0x0,0xe
0a8e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0a8f 00e2 | | Load_Encached Integer_Cache
0a90 03f1 | | Declare_Variable Discrete,With_Value
0a91 BODY_0a78:
0a91 00db | | Load_Top At_Offset_3
0a92 0092 0ca9 | | Action Push_String_Extended,0xca9 ; "//"
0a94 01df | | Execute Vector,Equal
0a95 680a |h | Jump_Zero 0xaa0
0a96 e414 | | Load 0x2,0x14
0a97 e006 | | Load 0x0,0x6
0a98 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a99 6805 |h | Jump_Zero 0xa9f
0a9a e414 | | Load 0x2,0x14
0a9b e006 | | Load 0x0,0x6
0a9c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a9d 4801 |H | Short_Literal 0x1
0a9e a409 | | Store_Unchecked 0x2,0x9
0a9f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0aa0 00db | | Load_Top At_Offset_3
0aa1 01db | | Execute Vector,Length
0aa2 6891 |h | Jump_Zero 0xb34
0aa3 00da | | Load_Top At_Offset_2
0aa4 e602 | | Load 0x3,0x2
0aa5 01d7 | | Execute Vector,Field_Read
0aa6 0f2a | * | Execute_Immediate Equal,0x2a
0aa7 a40a | | Store_Unchecked 0x2,0xa
0aa8 e40a | | Load 0x2,0xa
0aa9 6803 |h | Jump_Zero 0xaad
0aaa 00da | | Load_Top At_Offset_2
0aab 0a01 | | Execute_Immediate Plus,0x1
0aac 005b | [ | Store_Top Discrete,At_Offset_3
0aad 00d8 | | Load_Top At_Offset_0
0aae 7004 |p | Jump_Nonzero 0xab3
0aaf 00db | | Load_Top At_Offset_3
0ab0 01dc | | Execute Vector,Last
0ab1 0a01 | | Execute_Immediate Plus,0x1
0ab2 0059 | Y | Store_Top Discrete,At_Offset_1
0ab3 e406 | | Load 0x2,0x6
0ab4 00db | | Load_Top At_Offset_3
0ab5 e602 | | Load 0x3,0x2
0ab6 01dc | | Execute Vector,Last
0ab7 e602 | | Load 0x3,0x2
0ab8 01cf | | Execute Vector,Slice_Read
0ab9 e009 | | Load 0x0,0x9
0aba 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0abb e003 | | Load 0x0,0x3
0abc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0abd 00d1 | | Pop_Control Pop_Count_1
0abe e405 | | Load 0x2,0x5
0abf 00db | | Load_Top At_Offset_3
0ac0 e602 | | Load 0x3,0x2
0ac1 01dc | | Execute Vector,Last
0ac2 e602 | | Load 0x3,0x2
0ac3 01cf | | Execute Vector,Slice_Read
0ac4 e009 | | Load 0x0,0x9
0ac5 180f | | Execute Package,Field_Execute,Field_Number 0xf
0ac6 e003 | | Load 0x0,0x3
0ac7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ac8 00d1 | | Pop_Control Pop_Count_1
0ac9 4801 |H | Short_Literal 0x1
0aca 4801 |H | Short_Literal 0x1
0acb e405 | | Load 0x2,0x5
0acc e003 | | Load 0x0,0x3
0acd 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0ace 0092 0caa | | Action Push_String_Extended,0xcaa ; "?"
0ad0 01df | | Execute Vector,Equal
0ad1 6806 |h | Jump_Zero 0xad8
0ad2 e405 | | Load 0x2,0x5
0ad3 0092 0cab | | Action Push_String_Extended,0xcab ; "*"
0ad5 e003 | | Load 0x0,0x3
0ad6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0ad7 00d1 | | Pop_Control Pop_Count_1
0ad8 e5fb | | Load 0x2,-0x5
0ad9 700f |p | Jump_Nonzero 0xae9
0ada e409 | | Load 0x2,0x9
0adb 680d |h | Jump_Zero 0xae9
0adc e006 | | Load 0x0,0x6
0add 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ade 4801 |H | Short_Literal 0x1
0adf e402 | | Load 0x2,0x2
0ae0 e406 | | Load 0x2,0x6
0ae1 e003 | | Load 0x0,0x3
0ae2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ae3 01cc | | Execute Vector,Catenate
0ae4 e006 | | Load 0x0,0x6
0ae5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0ae6 c414 | | Store 0x2,0x14
0ae7 4800 |H | Short_Literal 0x0
0ae8 a409 | | Store_Unchecked 0x2,0x9
0ae9 e408 | | Load 0x2,0x8
0aea e405 | | Load 0x2,0x5
0aeb e003 | | Load 0x0,0x3
0aec 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0aed e004 | | Load 0x0,0x4
0aee 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0aef 00d1 | | Pop_Control Pop_Count_1
0af0 e407 | | Load 0x2,0x7
0af1 e408 | | Load 0x2,0x8
0af2 e004 | | Load 0x0,0x4
0af3 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0af4 00d2 | | Pop_Control Pop_Count_2
0af5 00cf | | Action Mark_Auxiliary
0af6 7838 |x8 | Jump 0xb2f
0af7 e407 | | Load 0x2,0x7
0af8 821a | | Call 0x1,0x1a
0af9 7021 |p! | Jump_Nonzero 0xb1b
0afa e5fb | | Load 0x2,-0x5
0afb 700a |p | Jump_Nonzero 0xb06
0afc e40c | | Load 0x2,0xc
0afd 00ea | | Load_Encached Null_String_Cache
0afe e414 | | Load 0x2,0x14
0aff e407 | | Load 0x2,0x7
0b00 e003 | | Load 0x0,0x3
0b01 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b02 e009 | | Load 0x0,0x9
0b03 180d | | Execute Package,Field_Execute,Field_Number 0xd
0b04 c40c | | Store 0x2,0xc
0b05 7823 |x# | Jump 0xb29
0b06 e007 | | Load 0x0,0x7
0b07 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b08 4802 |H | Short_Literal 0x2
0b09 0092 0c9c | | Action Push_String_Extended,0xc9c ; "Dfs file "
0b0b e407 | | Load 0x2,0x7
0b0c e003 | | Load 0x0,0x3
0b0d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b0e 01cc | | Execute Vector,Catenate
0b0f 0092 0cac | | Action Push_String_Extended,0xcac ; " would be copied to Environment Image Object "
0b11 01cc | | Execute Vector,Catenate
0b12 e402 | | Load 0x2,0x2
0b13 01cc | | Execute Vector,Catenate
0b14 e406 | | Load 0x2,0x6
0b15 e003 | | Load 0x0,0x3
0b16 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b17 01cc | | Execute Vector,Catenate
0b18 e008 | | Load 0x0,0x8
0b19 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b1a 780e |x | Jump 0xb29
0b1b e007 | | Load 0x0,0x7
0b1c 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b1d 4807 |H | Short_Literal 0x7
0b1e 0092 0cad | | Action Push_String_Extended,0xcad ; "Cannot access "
0b20 e407 | | Load 0x2,0x7
0b21 e003 | | Load 0x0,0x3
0b22 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b23 01cc | | Execute Vector,Catenate
0b24 0092 0cae | | Action Push_String_Extended,0xcae ; " from the environment. File not written"
0b26 01cc | | Execute Vector,Catenate
0b27 e008 | | Load 0x0,0x8
0b28 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b29 e407 | | Load 0x2,0x7
0b2a e408 | | Load 0x2,0x8
0b2b e004 | | Load 0x0,0x4
0b2c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0b2d 00d2 | | Pop_Control Pop_Count_2
0b2e 00c9 | | Action Pop_Auxiliary_Loop
0b2f e408 | | Load 0x2,0x8
0b30 e004 | | Load 0x0,0x4
0b31 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0b32 6fc4 |o | Jump_Zero 0xaf7
0b33 00ce | | Action Pop_Auxiliary
0b34 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b35 0000 0000 | | .XXX[0x3]
0b37 0000 | |
0b38 ; --------------------------------------------------------------------------------------
0b38 ; SUBPROGRAM
0b38 ; --------------------------------------------------------------------------------------
0b38 0b3b | ; | .CONST 0x0b3b ; Address of begin
0b39 0004 | | .CONST 0x0004 ; Address of exception handler
0b3a 0001 | | .CONST 0x0001 ; Number of locals
0b3b BODY_0b38:
0b3b INIT_0b38:
0b3b e7fd | | Load 0x3,-0x3
0b3c 7108 |q | Jump_Nonzero 0xc45
0b3d e40b | | Load 0x2,0xb
0b3e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b3f 09f6 | | Execute_Immediate Binary_Scale,-0xa
0b40 a404 | | Store_Unchecked 0x2,0x4
0b41 e40b | | Load 0x2,0xb
0b42 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0b43 6114 |a | Indirect_Literal Discrete,0xc58,{0x00000000, 0x00000400}
0b44 026f | o | Execute Discrete,Remainder
0b45 6803 |h | Jump_Zero 0xb49
0b46 e404 | | Load 0x2,0x4
0b47 0a01 | | Execute_Immediate Plus,0x1
0b48 c404 | | Store 0x2,0x4
0b49 e40f | | Load 0x2,0xf
0b4a e411 | | Load 0x2,0x11
0b4b e404 | | Load 0x2,0x4
0b4c 4801 |H | Short_Literal 0x1
0b4d 4802 |H | Short_Literal 0x2
0b4e e7ff | | Load 0x3,-0x1
0b4f e017 | | Load 0x0,0x17
0b50 180d | | Execute Package,Field_Execute,Field_Number 0xd
0b51 c411 | | Store 0x2,0x11
0b52 c40f | | Store 0x2,0xf
0b53 e411 | | Load 0x2,0x11
0b54 0f06 | | Execute_Immediate Equal,0x6
0b55 6814 |h | Jump_Zero 0xb6a
0b56 00db | | Load_Top At_Offset_3
0b57 e7fe | | Load 0x3,-0x2
0b58 7004 |p | Jump_Nonzero 0xb5d
0b59 e40b | | Load 0x2,0xb
0b5a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b5b 0f00 | | Execute_Immediate Equal,0x0
0b5c 7801 |x | Jump 0xb5e
0b5d 4800 |H | Short_Literal 0x0
0b5e 0278 | x | Execute Discrete,Or
0b5f 680a |h | Jump_Zero 0xb6a
0b60 e40f | | Load 0x2,0xf
0b61 e411 | | Load 0x2,0x11
0b62 e404 | | Load 0x2,0x4
0b63 4801 |H | Short_Literal 0x1
0b64 4801 |H | Short_Literal 0x1
0b65 e7ff | | Load 0x3,-0x1
0b66 e017 | | Load 0x0,0x17
0b67 180d | | Execute Package,Field_Execute,Field_Number 0xd
0b68 c411 | | Store 0x2,0x11
0b69 c40f | | Store 0x2,0xf
0b6a e411 | | Load 0x2,0x11
0b6b 70b2 |p | Jump_Nonzero 0xc1e
0b6c e403 | | Load 0x2,0x3
0b6d 0a01 | | Execute_Immediate Plus,0x1
0b6e c403 | | Store 0x2,0x3
0b6f e007 | | Load 0x0,0x7
0b70 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b71 4802 |H | Short_Literal 0x2
0b72 0092 0caf | | Action Push_String_Extended,0xcaf ; "File "
0b74 e7ff | | Load 0x3,-0x1
0b75 e003 | | Load 0x0,0x3
0b76 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b77 01cc | | Execute Vector,Catenate
0b78 0092 0cb0 | | Action Push_String_Extended,0xcb0 ; " being written"
0b7a 01cc | | Execute Vector,Catenate
0b7b e008 | | Load 0x0,0x8
0b7c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b7d e40b | | Load 0x2,0xb
0b7e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b7f e40f | | Load 0x2,0xf
0b80 0227 | ' | Execute Access,All_Reference
0b81 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0b82 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0b83 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0b84 e40b | | Load 0x2,0xb
0b85 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0b86 e40f | | Load 0x2,0xf
0b87 0227 | ' | Execute Access,All_Reference
0b88 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0b89 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0b8a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0b8b e40f | | Load 0x2,0xf
0b8c 0229 | ) | Execute Access,All_Read
0b8d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b8e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0b8f 00d8 | | Load_Top At_Offset_0
0b90 e40b | | Load 0x2,0xb
0b91 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0b92 e01b | | Load 0x0,0x1b
0b93 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0b94 00d2 | | Pop_Control Pop_Count_2
0b95 4801 |H | Short_Literal 0x1
0b96 e40f | | Load 0x2,0xf
0b97 0227 | ' | Execute Access,All_Reference
0b98 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0b99 e40f | | Load 0x2,0xf
0b9a e017 | | Load 0x0,0x17
0b9b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0b9c e411 | | Load 0x2,0x11
0b9d 6802 |h | Jump_Zero 0xba0
0b9e e016 | | Load 0x0,0x16
0b9f 0257 | W | Execute Discrete,Raise
0ba0 00cf | | Action Mark_Auxiliary
0ba1 786c |xl | Jump 0xc0e
0ba2 00e3 | | Load_Encached Natural_Cache
0ba3 e406 | | Load 0x2,0x6
0ba4 00d8 | | Load_Top At_Offset_0
0ba5 01da | | Execute Vector,Bounds
0ba6 e01c | | Load 0x0,0x1c
0ba7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0ba8 0334 | 4 | Declare_Variable Array,With_Constraint
0ba9 00d0 | | Action Swap_Control
0baa 00d8 | | Load_Top At_Offset_0
0bab 01dd | | Execute Vector,First
0bac 00da | | Load_Top At_Offset_2
0bad 01dd | | Execute Vector,First
0bae 0272 | r | Execute Discrete,Minus
0baf 00da | | Load_Top At_Offset_2
0bb0 01d9 | | Execute Vector,Reverse_Bounds
0bb1 0263 | c | Execute Discrete,Above_Bound
0bb2 700a |p | Jump_Nonzero 0xbbd
0bb3 00d8 | | Load_Top At_Offset_0
0bb4 00db | | Load_Top At_Offset_3
0bb5 0273 | s | Execute Discrete,Plus
0bb6 e605 | | Load 0x3,0x5
0bb7 01d7 | | Execute Vector,Field_Read
0bb8 00d9 | | Load_Top At_Offset_1
0bb9 e604 | | Load 0x3,0x4
0bba 01d5 | | Execute Vector,Field_Reference
0bbb 0118 | | Execute Any,Write_Unchecked
0bbc 3ff6 |? | Loop_Increasing 0xbb3
0bbd 00d2 | | Pop_Control Pop_Count_2
0bbe e414 | | Load 0x2,0x14
0bbf e006 | | Load 0x0,0x6
0bc0 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0bc1 00d8 | | Load_Top At_Offset_0
0bc2 01db | | Execute Vector,Length
0bc3 e00c | | Load 0x0,0xc
0bc4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0bc5 01db | | Execute Vector,Length
0bc6 027f | | Execute Discrete,Equal
0bc7 7001 |p | Jump_Nonzero 0xbc9
0bc8 08e0 | | Execute_Immediate Raise,0xe0
0bc9 e00c | | Load 0x0,0xc
0bca 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0bcb 0337 | 7 | Declare_Variable Array
0bcc 00d0 | | Action Swap_Control
0bcd 00d8 | | Load_Top At_Offset_0
0bce 01dd | | Execute Vector,First
0bcf 00da | | Load_Top At_Offset_2
0bd0 01dd | | Execute Vector,First
0bd1 0272 | r | Execute Discrete,Minus
0bd2 00da | | Load_Top At_Offset_2
0bd3 01d9 | | Execute Vector,Reverse_Bounds
0bd4 0263 | c | Execute Discrete,Above_Bound
0bd5 700a |p | Jump_Nonzero 0xbe0
0bd6 00d8 | | Load_Top At_Offset_0
0bd7 00db | | Load_Top At_Offset_3
0bd8 0273 | s | Execute Discrete,Plus
0bd9 e605 | | Load 0x3,0x5
0bda 01d7 | | Execute Vector,Field_Read
0bdb 00d9 | | Load_Top At_Offset_1
0bdc e604 | | Load 0x3,0x4
0bdd 01d5 | | Execute Vector,Field_Reference
0bde 0118 | | Execute Any,Write_Unchecked
0bdf 3ff6 |? | Loop_Increasing 0xbd6
0be0 00d2 | | Pop_Control Pop_Count_2
0be1 e406 | | Load 0x2,0x6
0be2 01d4 | | Execute Vector,Structure_Write
0be3 c402 | | Store 0x2,0x2
0be4 e402 | | Load 0x2,0x2
0be5 4bff |K | Short_Literal 0x3ff
0be6 027c | | | Execute Discrete,Less
0be7 680c |h | Jump_Zero 0xbf4
0be8 00cf | | Action Mark_Auxiliary
0be9 4bff |K | Short_Literal 0x3ff
0bea e402 | | Load 0x2,0x2
0beb 0263 | c | Execute Discrete,Above_Bound
0bec 7006 |p | Jump_Nonzero 0xbf3
0bed 4800 |H | Short_Literal 0x0
0bee 00d9 | | Load_Top At_Offset_1
0bef e406 | | Load 0x2,0x6
0bf0 01d6 | | Execute Vector,Field_Write
0bf1 00c8 | | Action Pop_Auxiliary_Range
0bf2 3ffa |? | Loop_Increasing 0xbed
0bf3 00ce | | Action Pop_Auxiliary
0bf4 e411 | | Load 0x2,0x11
0bf5 e406 | | Load 0x2,0x6
0bf6 4801 |H | Short_Literal 0x1
0bf7 4801 |H | Short_Literal 0x1
0bf8 e410 | | Load 0x2,0x10
0bf9 e40f | | Load 0x2,0xf
0bfa 0227 | ' | Execute Access,All_Reference
0bfb 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0bfc e40f | | Load 0x2,0xf
0bfd e017 | | Load 0x0,0x17
0bfe 180f | | Execute Package,Field_Execute,Field_Number 0xf
0bff c411 | | Store 0x2,0x11
0c00 e40f | | Load 0x2,0xf
0c01 0227 | ' | Execute Access,All_Reference
0c02 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0c03 0a01 | | Execute_Immediate Plus,0x1
0c04 00d8 | | Load_Top At_Offset_0
0c05 e010 | | Load 0x0,0x10
0c06 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0c07 0260 | ` | Execute Discrete,In_Type
0c08 7001 |p | Jump_Nonzero 0xc0a
0c09 0801 | | Execute_Immediate Raise,0x1
0c0a e40f | | Load 0x2,0xf
0c0b 0227 | ' | Execute Access,All_Reference
0c0c 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0c0d 00c9 | | Action Pop_Auxiliary_Loop
0c0e e414 | | Load 0x2,0x14
0c0f e006 | | Load 0x0,0x6
0c10 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0c11 0c01 | | Execute_Immediate Greater_Equal,0x1
0c12 778f |w | Jump_Nonzero 0xba2
0c13 00ce | | Action Pop_Auxiliary
0c14 e40f | | Load 0x2,0xf
0c15 e411 | | Load 0x2,0x11
0c16 e7ff | | Load 0x3,-0x1
0c17 4801 |H | Short_Literal 0x1
0c18 4800 |H | Short_Literal 0x0
0c19 e017 | | Load 0x0,0x17
0c1a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c1b c411 | | Store 0x2,0x11
0c1c c40f | | Store 0x2,0xf
0c1d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c1e e411 | | Load 0x2,0x11
0c1f 0f06 | | Execute_Immediate Equal,0x6
0c20 680f |h | Jump_Zero 0xc30
0c21 e007 | | Load 0x0,0x7
0c22 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c23 4802 |H | Short_Literal 0x2
0c24 0092 0caf | | Action Push_String_Extended,0xcaf ; "File "
0c26 e7ff | | Load 0x3,-0x1
0c27 e003 | | Load 0x0,0x3
0c28 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c29 01cc | | Execute Vector,Catenate
0c2a 0092 0cb1 | | Action Push_String_Extended,0xcb1 ; " cannot be over-written"
0c2c 01cc | | Execute Vector,Catenate
0c2d e008 | | Load 0x0,0x8
0c2e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c2f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c30 e007 | | Load 0x0,0x7
0c31 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c32 4802 |H | Short_Literal 0x2
0c33 0092 0caf | | Action Push_String_Extended,0xcaf ; "File "
0c35 e7ff | | Load 0x3,-0x1
0c36 e003 | | Load 0x0,0x3
0c37 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c38 01cc | | Execute Vector,Catenate
0c39 0092 0cb2 | | Action Push_String_Extended,0xcb2 ; " cannot be written, reason = "
0c3b 01cc | | Execute Vector,Catenate
0c3c e411 | | Load 0x2,0x11
0c3d e00c | | Load 0x0,0xc
0c3e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0c3f 011c | | Execute Any,Convert_Unchecked
0c40 1c01 | | Execute_Immediate Run_Utility,0x1
0c41 01cc | | Execute Vector,Catenate
0c42 e008 | | Load 0x0,0x8
0c43 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c44 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c45 e403 | | Load 0x2,0x3
0c46 0a01 | | Execute_Immediate Plus,0x1
0c47 c403 | | Store 0x2,0x3
0c48 e007 | | Load 0x0,0x7
0c49 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c4a 4802 |H | Short_Literal 0x2
0c4b 0092 0caf | | Action Push_String_Extended,0xcaf ; "File "
0c4d e7ff | | Load 0x3,-0x1
0c4e e003 | | Load 0x0,0x3
0c4f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c50 01cc | | Execute Vector,Catenate
0c51 0092 0cb3 | | Action Push_String_Extended,0xcb3 ; " would have been written"
0c53 01cc | | Execute Vector,Catenate
0c54 e008 | | Load 0x0,0x8
0c55 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c56 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0c57 0000 | | .XXX[0x1]
0c58 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
0c5c 0000 0000 | | .BLANK 0000[0x4]
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c63 | c | .CONST 0x0c63 ; Address of begin
0c61 0004 | | .CONST 0x0004 ; Address of exception handler
0c62 0001 | | .CONST 0x0001 ; Number of locals
0c63 BODY_0c60:
0c63 INIT_0c60:
0c63 4800 |H | Short_Literal 0x0
0c64 4801 |H | Short_Literal 0x1
0c65 4803 |H | Short_Literal 0x3
0c66 e7ff | | Load 0x3,-0x1
0c67 e01d | | Load 0x0,0x1d
0c68 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0c69 e01d | | Load 0x0,0x1d
0c6a 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0c6b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0c6c ; --------------------------------------------------------------------------------------
0c6c ; STRING TABLE
0c6c ; --------------------------------------------------------------------------------------
0c6c 0092 | | .STRTAB 0x0092->0x0cb5 ; "!Machine.Dfs_Write"
0c6d 00a2 | | .STRTAB 0x00a2->0x0cbe ; "M200_DFS_BOOTSTRAP.M200"
0c6e 00b7 | | .STRTAB 0x00b7->0x0cc9 ; "DFS_BOOTSTRAP.M200"
0c6f 00c7 | | .STRTAB 0x00c7->0x0cd2 ; "M200_KERNEL_0.M200"
0c70 00d7 | | .STRTAB 0x00d7->0x0cdb ; "KERNEL_0.M200"
0c71 00e2 | | .STRTAB 0x00e2->0x0ce2 ; "FS_0.M200"
0c72 00e9 | | .STRTAB 0x00e9->0x0ce6 ; "RECOVERY.M200"
0c73 00f4 | | .STRTAB 0x00f4->0x0ced ; "!Machine.Temporary.Backup_Image"
0c74 0111 | | .STRTAB 0x0111->0x0cfc ; "<QUIET>"
0c75 0116 | | .STRTAB 0x0116->0x0d00 ; "Error copying required file DFS_BOOTSTRAP.M200. Backup Aborted."
0c76 0153 | S | .STRTAB 0x0153->0x0d1f ; "Error copying required file KERNEL_0.M200. Backup Aborted."
0c77 018b | | .STRTAB 0x018b->0x0d3c ; "Error copying required file FS_0.M200. Backup Aborted"
0c78 01be | | .STRTAB 0x01be->0x0d57 ; "Error copying required file RECOVERY.M200. Backup Aborted"
0c79 01f5 | | .STRTAB 0x01f5->0x0d73 ; "@.M200"
0c7a 01f9 | | .STRTAB 0x01f9->0x0d76 ; "Error copying file "
0c7b 020a | | .STRTAB 0x020a->0x0d80 ; ". Aborting backup."
0c7c 021a | | .STRTAB 0x021a->0x0d89 ; "@"
0c7d 0219 | | .STRTAB 0x0219->0x0d89 ; "!Machine.Temporary."
0c7e 022a | * | .STRTAB 0x022a->0x0d93 ; "!!"
0c7f 022a | * | .STRTAB 0x022a->0x0d94 ; "Remote access is not currently supported"
0c80 0250 | P | .STRTAB 0x0250->0x0da8 ; " not copied"
0c81 0259 | Y | .STRTAB 0x0259->0x0dad ; "Environment file "
0c82 0268 | h | .STRTAB 0x0268->0x0db6 ; "would have been written to the Dfs as "
0c83 028c | | .STRTAB 0x028c->0x0dc9 ; "KERNEL_1.M200"
0c84 0297 | | .STRTAB 0x0297->0x0dcf ; "KERNEL_2.M200"
0c85 02a2 | | .STRTAB 0x02a2->0x0dd6 ; "."
0c86 02a1 | | .STRTAB 0x02a1->0x0dd6 ; "No matching files found"
0c87 02b6 | | .STRTAB 0x02b6->0x0de2 ; "M400C_KERNEL_0.M200"
0c88 02c7 | | .STRTAB 0x02c7->0x0deb ; "M400C_KERNEL_1.M200"
0c89 02d8 | | .STRTAB 0x02d8->0x0df5 ; "M400C_KERNEL_2.M200"
0c8a 02e9 | | .STRTAB 0x02e9->0x0dfe ; "M400S_KERNEL_0.M200"
0c8b 02fa | | .STRTAB 0x02fa->0x0e08 ; "M400S_KERNEL_1.M200"
0c8c 030b | | .STRTAB 0x030b->0x0e11 ; "M400S_KERNEL_2.M200"
0c8d 031c | | .STRTAB 0x031c->0x0e1b ; "M300C_KERNEL_0.M200"
0c8e 032d | - | .STRTAB 0x032d->0x0e24 ; "M300C_KERNEL_1.M200"
0c8f 033e | > | .STRTAB 0x033e->0x0e2e ; "M300C_KERNEL_2.M200"
0c90 034f | O | .STRTAB 0x034f->0x0e37 ; "M300S_KERNEL_0.M200"
0c91 0360 | ` | .STRTAB 0x0360->0x0e41 ; "M300S_KERNEL_1.M200"
0c92 0371 | q | .STRTAB 0x0371->0x0e4a ; "M300S_KERNEL_2.M200"
0c93 0382 | | .STRTAB 0x0382->0x0e54 ; "M200_KERNEL_1.M200"
0c94 0392 | | .STRTAB 0x0392->0x0e5d ; "M200_KERNEL_2.M200"
0c95 03a2 | | .STRTAB 0x03a2->0x0e66 ; "This Dfs cannot be used on an R1000 model 100"
0c96 03cd | | .STRTAB 0x03cd->0x0e7c ; "KERNEL_@.M200"
0c97 03d8 | | .STRTAB 0x03d8->0x0e83 ; "TCP_IP_HOST_ID"
0c98 03e4 | | .STRTAB 0x03e4->0x0e8a ; "HARDWARE.M200_CONFIG"
0c99 03f6 | | .STRTAB 0x03f6->0x0e94 ; " files have been downloaded"
0c9a 040f | | .STRTAB 0x040f->0x0ea1 ; " files would have been downloaded"
0c9b 042e | . | .STRTAB 0x042e->0x0eb2 ; "<quiet>"
0c9c 0433 | 3 | .STRTAB 0x0433->0x0eb5 ; "Dfs file "
0c9d 043a | : | .STRTAB 0x043a->0x0eba ; " would have been copied to "
0c9e 0453 | S | .STRTAB 0x0453->0x0ec7 ; " has been renamed "
0c9f 0463 | c | .STRTAB 0x0463->0x0ed0 ; " would have been renamed "
0ca0 047a | z | .STRTAB 0x047a->0x0edd ; " has been deleted"
0ca1 0489 | | .STRTAB 0x0489->0x0ee5 ; " would have been deleted"
0ca2 049f | | .STRTAB 0x049f->0x0ef1 ; " files have been deleted"
0ca3 04b5 | | .STRTAB 0x04b5->0x0efd ; " files would have been deleted"
0ca4 04d1 | | .STRTAB 0x04d1->0x0f0c ; "Unknown error deleting Dfs file "
0ca5 04ef | | .STRTAB 0x04ef->0x0f1c ; "Operator privilege required for attempted operation or another install job already exists"
0ca6 0546 | F | .STRTAB 0x0546->0x0f49 ; "--"
0ca7 0546 | F | .STRTAB 0x0546->0x0f4a ; ": "
0ca8 0546 | F | .STRTAB 0x0546->0x0f4b ; "_"
0ca9 0545 | E | .STRTAB 0x0545->0x0f4b ; "//"
0caa 0545 | E | .STRTAB 0x0545->0x0f4c ; "?"
0cab 0544 | D | .STRTAB 0x0544->0x0f4d ; "*"
0cac 0543 | C | .STRTAB 0x0543->0x0f4d ; " would be copied to Environment Image Object "
0cad 056e | n | .STRTAB 0x056e->0x0f64 ; "Cannot access "
0cae 057a | z | .STRTAB 0x057a->0x0f6b ; " from the environment. File not written"
0caf 05a0 | | .STRTAB 0x05a0->0x0f7f ; "File "
0cb0 05a3 | | .STRTAB 0x05a3->0x0f81 ; " being written"
0cb1 05af | | .STRTAB 0x05af->0x0f88 ; " cannot be over-written"
0cb2 05c4 | | .STRTAB 0x05c4->0x0f94 ; " cannot be written, reason = "
0cb3 05df | | .STRTAB 0x05df->0x0fa2 ; " would have been written"
0cb4 05f5 | | .STREND 0x05f5->0x0fae
0cb5 214d 6163 |!Mac| .STRTAB_STRINGS
0faf 0000 | | .XXX[0x1]
0fb0 ; --------------------------------------------------------------------------------------
0fb0 ; Debug Table
0fb0 ; --------------------------------------------------------------------------------------
0fb0 0004 0010 | | .DEBUG4 0x0004,0x0010,0xabad,0x0000,0x0001,0x0000
0fb6 0000 0000 | | .BLANK 0000[0x4a]