DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦49f604ba7⟧

    Length: 8192 (0x2000)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c0fe

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0f38       | 8  |		.CONST	0x0f38								; 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 005b       | [  |		.CONST	0x005b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0024       | $  |		.CONST	0x0024								; Number of locals
000b			INIT_0008:
000b 0092 0bcc  |    |		Action	Push_String_Extended,0xbcc					; "!Machine.Dfs_Write"
000d 0129       | )  |		Execute	Any,Make_Visible
000e 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated
0010 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated
0012 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated
0014 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
0016 029a 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call,Visible,Unelaborated
0018 029a 05db  |    |		Declare_Subprogram	INIT_05d8,For_Outer_Call,Visible,Unelaborated
001a 029a 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call,Visible,Unelaborated
001c 029a 0713  |    |		Declare_Subprogram	INIT_0710,For_Outer_Call,Visible,Unelaborated
001e 029a 078b  |    |		Declare_Subprogram	INIT_0788,For_Outer_Call,Visible,Unelaborated
0020 00bf       |    |		Action	Accept_Activation
0021 e002       |    |		Load	0x0,0x2
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 0093 0000  |    |		push_full_address	0x0
0028 6187       |a   |		Indirect_Literal	Discrete,0x1b0,{0x80000000, 0x00010000}
0029 0273       | s  |		Execute	Discrete,Plus
002a 0007       |    |		Action	Break_Optional
002b 0093 0000  |    |		push_full_address	0x0
002d 617e       |a~  |		Indirect_Literal	Discrete,0x1ac,{0x80000000, 0x00020000}
002e 0273       | s  |		Execute	Discrete,Plus
002f 0007       |    |		Action	Break_Optional
0030 0093 0000  |    |		push_full_address	0x0
0032 6175       |au  |		Indirect_Literal	Discrete,0x1a8,{0x80000000, 0x00030000}
0033 0273       | s  |		Execute	Discrete,Plus
0034 0007       |    |		Action	Break_Optional
0035 e003       |    |		Load	0x0,0x3
0036 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0037 029d 085b  |   [|		Declare_Subprogram	INIT_0858,For_Outer_Call
0039 029d 08ab  |    |		Declare_Subprogram	INIT_08a8,For_Outer_Call
003b 029d 08d3  |    |		Declare_Subprogram	INIT_08d0,For_Outer_Call
003d 029d 08db  |    |		Declare_Subprogram	INIT_08d8,For_Outer_Call
003f 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0040 00c7       |    |		Action	Elaborate_Subprogram
0041 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0042 00c7       |    |		Action	Elaborate_Subprogram
0043 029d 0903  |    |		Declare_Subprogram	INIT_0900,For_Outer_Call
0045 029d 091b  |    |		Declare_Subprogram	INIT_0918,For_Outer_Call
0047 029d 0933  |   3|		Declare_Subprogram	INIT_0930,For_Outer_Call
0049 029d 09c3  |    |		Declare_Subprogram	INIT_09c0,For_Outer_Call
004b 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
004c 00c7       |    |		Action	Elaborate_Subprogram
004d 029d 09cb  |    |		Declare_Subprogram	INIT_09c8,For_Outer_Call
004f 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0050 00c7       |    |		Action	Elaborate_Subprogram
0051 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0052 00c7       |    |		Action	Elaborate_Subprogram
0053 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0054 00c7       |    |		Action	Elaborate_Subprogram
0055 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0056 00c7       |    |		Action	Elaborate_Subprogram
0057 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0058 00c7       |    |		Action	Elaborate_Subprogram
0059 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
005a 00c7       |    |		Action	Elaborate_Subprogram
005b			BODY_0008:
005b 00bc       |    |		Action	Signal_Activated
005c 00bb       |    |		Action	Signal_Completion
005d 0000 0000  |    |		.XXX[0x3]
005f 0000       |    |
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0088       |    |		.CONST	0x0088								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 000e       |    |		.CONST	0x000e								; Number of locals
0063			INIT_0060:
0063 0092 0bcd  |    |		Action	Push_String_Extended,0xbcd					; "M200_DFS_BOOTSTRAP.M200"
0065 0092 0bce  |    |		Action	Push_String_Extended,0xbce					; "DFS_BOOTSTRAP.M200"
0067 0092 0bcf  |    |		Action	Push_String_Extended,0xbcf					; "M200_KERNEL_0.M200"
0069 0092 0bd0  |    |		Action	Push_String_Extended,0xbd0					; "KERNEL_0.M200"
006b 0092 0bd1  |    |		Action	Push_String_Extended,0xbd1					; "FS_0.M200"
006d 0092 0bd2  |    |		Action	Push_String_Extended,0xbd2					; "RECOVERY.M200"
006f 481e       |H   |		Short_Literal	0x1e
0070 e004       |    |		Load	0x0,0x4
0071 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0072 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0073 00d8       |    |		Load_Top	At_Offset_0
0074 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0075 e002       |    |		Load	0x0,0x2
0076 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0077 02c7       |    |		Declare_Variable	Any
0078 00d8       |    |		Load_Top	At_Offset_0
0079 1c00       |    |		Execute_Immediate	Run_Utility,0x0
007a e005       |    |		Load	0x0,0x5
007b 0322       | "  |		Declare_Variable	Record
007c 00d8       |    |		Load_Top	At_Offset_0
007d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
007e 00e1       |    |		Load_Encached	Boolean_Cache
007f e006       |    |		Load	0x0,0x6
0080 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0081 02c7       |    |		Declare_Variable	Any
0082 00d8       |    |		Load_Top	At_Offset_0
0083 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0084 0092 0bd3  |    |		Action	Push_String_Extended,0xbd3					; "!Machine.Temporary.Backup_Image"
0086 e007       |    |		Load	0x0,0x7
0087 0007       |    |		Action	Break_Optional
0088			BODY_0060:
0088 e5fd       |    |		Load	0x2,-0x3
0089 0092 0bd4  |    |		Action	Push_String_Extended,0xbd4					; "<QUIET>"
008b 01de       |    |		Execute	Vector,Not_Equal
008c 680b       |h   |		Jump_Zero	0x98
008d 00da       |    |		Load_Top	At_Offset_2
008e e5fd       |    |		Load	0x2,-0x3
008f e008       |    |		Load	0x0,0x8
0090 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0091 c40c       |    |		Store	0x2,0xc
0092 e008       |    |		Load	0x0,0x8
0093 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0094 00db       |    |		Load_Top	At_Offset_3
0095 e009       |    |		Load	0x0,0x9
0096 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0097 7804       |x   |		Jump	0x9c
0098 e008       |    |		Load	0x0,0x8
0099 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
009a e008       |    |		Load	0x0,0x8
009b 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
009c 821c       |    |		Call	0x1,0x1c
009d 6906       |i   |		Jump_Zero	0x1a4
009e 4801       |H   |		Short_Literal	0x1
009f a40b       |    |		Store_Unchecked	0x2,0xb
00a0 e007       |    |		Load	0x0,0x7
00a1 4801       |H   |		Short_Literal	0x1
00a2 00db       |    |		Load_Top	At_Offset_3
00a3 800a       |    |		Call	0x0,0xa
00a4 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00a5 00db       |    |		Load_Top	At_Offset_3
00a6 e403       |    |		Load	0x2,0x3
00a7 00da       |    |		Load_Top	At_Offset_2
00a8 e402       |    |		Load	0x2,0x2
00a9 800b       |    |		Call	0x0,0xb
00aa c40b       |    |		Store	0x2,0xb
00ab 00db       |    |		Load_Top	At_Offset_3
00ac 7014       |p   |		Jump_Nonzero	0xc1
00ad e008       |    |		Load	0x0,0x8
00ae 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00af 4807       |H   |		Short_Literal	0x7
00b0 0092 0bd5  |    |		Action	Push_String_Extended,0xbd5					; "Error copying required file DFS_BOOTSTRAP.M200. Backup Aborted."
00b2 e009       |    |		Load	0x0,0x9
00b3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b4 e409       |    |		Load	0x2,0x9
00b5 00ea       |    |		Load_Encached	Null_String_Cache
00b6 00db       |    |		Load_Top	At_Offset_3
00b7 4801       |H   |		Short_Literal	0x1
00b8 e002       |    |		Load	0x0,0x2
00b9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00ba c409       |    |		Store	0x2,0x9
00bb e409       |    |		Load	0x2,0x9
00bc e002       |    |		Load	0x0,0x2
00bd 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00be c409       |    |		Store	0x2,0x9
00bf 821e       |    |		Call	0x1,0x1e
00c0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00c1 00db       |    |		Load_Top	At_Offset_3
00c2 e405       |    |		Load	0x2,0x5
00c3 00da       |    |		Load_Top	At_Offset_2
00c4 e404       |    |		Load	0x2,0x4
00c5 800b       |    |		Call	0x0,0xb
00c6 c40b       |    |		Store	0x2,0xb
00c7 00db       |    |		Load_Top	At_Offset_3
00c8 7014       |p   |		Jump_Nonzero	0xdd
00c9 e008       |    |		Load	0x0,0x8
00ca 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00cb 4807       |H   |		Short_Literal	0x7
00cc 0092 0bd6  |    |		Action	Push_String_Extended,0xbd6					; "Error copying required file KERNEL_0.M200. Backup Aborted."
00ce e009       |    |		Load	0x0,0x9
00cf 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00d0 e409       |    |		Load	0x2,0x9
00d1 00ea       |    |		Load_Encached	Null_String_Cache
00d2 00db       |    |		Load_Top	At_Offset_3
00d3 4801       |H   |		Short_Literal	0x1
00d4 e002       |    |		Load	0x0,0x2
00d5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00d6 c409       |    |		Store	0x2,0x9
00d7 e409       |    |		Load	0x2,0x9
00d8 e002       |    |		Load	0x0,0x2
00d9 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00da c409       |    |		Store	0x2,0x9
00db 821e       |    |		Call	0x1,0x1e
00dc 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00dd 00db       |    |		Load_Top	At_Offset_3
00de 00ea       |    |		Load_Encached	Null_String_Cache
00df 00da       |    |		Load_Top	At_Offset_2
00e0 e406       |    |		Load	0x2,0x6
00e1 800b       |    |		Call	0x0,0xb
00e2 c40b       |    |		Store	0x2,0xb
00e3 00db       |    |		Load_Top	At_Offset_3
00e4 7014       |p   |		Jump_Nonzero	0xf9
00e5 e008       |    |		Load	0x0,0x8
00e6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00e7 4807       |H   |		Short_Literal	0x7
00e8 0092 0bd7  |    |		Action	Push_String_Extended,0xbd7					; "Error copying required file FS_0.M200. Backup Aborted"
00ea e009       |    |		Load	0x0,0x9
00eb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00ec e409       |    |		Load	0x2,0x9
00ed 00ea       |    |		Load_Encached	Null_String_Cache
00ee 00db       |    |		Load_Top	At_Offset_3
00ef 4801       |H   |		Short_Literal	0x1
00f0 e002       |    |		Load	0x0,0x2
00f1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00f2 c409       |    |		Store	0x2,0x9
00f3 e409       |    |		Load	0x2,0x9
00f4 e002       |    |		Load	0x0,0x2
00f5 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00f6 c409       |    |		Store	0x2,0x9
00f7 821e       |    |		Call	0x1,0x1e
00f8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00f9 00db       |    |		Load_Top	At_Offset_3
00fa 00ea       |    |		Load_Encached	Null_String_Cache
00fb 00da       |    |		Load_Top	At_Offset_2
00fc e407       |    |		Load	0x2,0x7
00fd 800b       |    |		Call	0x0,0xb
00fe c40b       |    |		Store	0x2,0xb
00ff 00db       |    |		Load_Top	At_Offset_3
0100 7014       |p   |		Jump_Nonzero	0x115
0101 e008       |    |		Load	0x0,0x8
0102 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0103 4807       |H   |		Short_Literal	0x7
0104 0092 0bd8  |    |		Action	Push_String_Extended,0xbd8					; "Error copying required file RECOVERY.M200. Backup Aborted"
0106 e009       |    |		Load	0x0,0x9
0107 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0108 e409       |    |		Load	0x2,0x9
0109 00ea       |    |		Load_Encached	Null_String_Cache
010a 00db       |    |		Load_Top	At_Offset_3
010b 4801       |H   |		Short_Literal	0x1
010c e002       |    |		Load	0x0,0x2
010d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
010e c409       |    |		Store	0x2,0x9
010f e409       |    |		Load	0x2,0x9
0110 e002       |    |		Load	0x0,0x2
0111 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0112 c409       |    |		Store	0x2,0x9
0113 821e       |    |		Call	0x1,0x1e
0114 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0115 e40a       |    |		Load	0x2,0xa
0116 0092 0bd9  |    |		Action	Push_String_Extended,0xbd9					; "@.M200"
0118 800c       |    |		Call	0x0,0xc
0119 00d1       |    |		Pop_Control	Pop_Count_1
011a e408       |    |		Load	0x2,0x8
011b e40a       |    |		Load	0x2,0xa
011c 800d       |    |		Call	0x0,0xd
011d 00d2       |    |		Pop_Control	Pop_Count_2
011e 00cf       |    |		Action	Mark_Auxiliary
011f 782d       |x-  |		Jump	0x14d
0120 e408       |    |		Load	0x2,0x8
0121 821d       |    |		Call	0x1,0x1d
0122 7025       |p%  |		Jump_Nonzero	0x148
0123 e40b       |    |		Load	0x2,0xb
0124 00ea       |    |		Load_Encached	Null_String_Cache
0125 00db       |    |		Load_Top	At_Offset_3
0126 e408       |    |		Load	0x2,0x8
0127 e004       |    |		Load	0x0,0x4
0128 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0129 800b       |    |		Call	0x0,0xb
012a c40b       |    |		Store	0x2,0xb
012b e40b       |    |		Load	0x2,0xb
012c 701b       |p   |		Jump_Nonzero	0x148
012d e008       |    |		Load	0x0,0x8
012e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
012f 4807       |H   |		Short_Literal	0x7
0130 0092 0bda  |    |		Action	Push_String_Extended,0xbda					; "Error copying file "
0132 e408       |    |		Load	0x2,0x8
0133 e004       |    |		Load	0x0,0x4
0134 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0135 01cc       |    |		Execute	Vector,Catenate
0136 0092 0bdb  |    |		Action	Push_String_Extended,0xbdb					; ". Aborting backup."
0138 01cc       |    |		Execute	Vector,Catenate
0139 e009       |    |		Load	0x0,0x9
013a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
013b e409       |    |		Load	0x2,0x9
013c 00ea       |    |		Load_Encached	Null_String_Cache
013d e40d       |    |		Load	0x2,0xd
013e 4801       |H   |		Short_Literal	0x1
013f e002       |    |		Load	0x0,0x2
0140 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0141 c409       |    |		Store	0x2,0x9
0142 e409       |    |		Load	0x2,0x9
0143 e002       |    |		Load	0x0,0x2
0144 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0145 c409       |    |		Store	0x2,0x9
0146 821e       |    |		Call	0x1,0x1e
0147 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0148 e408       |    |		Load	0x2,0x8
0149 e40a       |    |		Load	0x2,0xa
014a 800d       |    |		Call	0x0,0xd
014b 00d2       |    |		Pop_Control	Pop_Count_2
014c 00c9       |    |		Action	Pop_Auxiliary_Loop
014d e40a       |    |		Load	0x2,0xa
014e 800e       |    |		Call	0x0,0xe
014f 6fd0       |o   |		Jump_Zero	0x120
0150 00ce       |    |		Action	Pop_Auxiliary
0151 e40a       |    |		Load	0x2,0xa
0152 0092 0bdc  |    |		Action	Push_String_Extended,0xbdc					; "@"
0154 800c       |    |		Call	0x0,0xc
0155 00d1       |    |		Pop_Control	Pop_Count_1
0156 e408       |    |		Load	0x2,0x8
0157 e40a       |    |		Load	0x2,0xa
0158 800d       |    |		Call	0x0,0xd
0159 00d2       |    |		Pop_Control	Pop_Count_2
015a 00cf       |    |		Action	Mark_Auxiliary
015b 782d       |x-  |		Jump	0x189
015c e408       |    |		Load	0x2,0x8
015d 821d       |    |		Call	0x1,0x1d
015e 7025       |p%  |		Jump_Nonzero	0x184
015f e40b       |    |		Load	0x2,0xb
0160 00ea       |    |		Load_Encached	Null_String_Cache
0161 00db       |    |		Load_Top	At_Offset_3
0162 e408       |    |		Load	0x2,0x8
0163 e004       |    |		Load	0x0,0x4
0164 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0165 800b       |    |		Call	0x0,0xb
0166 c40b       |    |		Store	0x2,0xb
0167 e40b       |    |		Load	0x2,0xb
0168 701b       |p   |		Jump_Nonzero	0x184
0169 e008       |    |		Load	0x0,0x8
016a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
016b 4807       |H   |		Short_Literal	0x7
016c 0092 0bda  |    |		Action	Push_String_Extended,0xbda					; "Error copying file "
016e e408       |    |		Load	0x2,0x8
016f e004       |    |		Load	0x0,0x4
0170 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0171 01cc       |    |		Execute	Vector,Catenate
0172 0092 0bdb  |    |		Action	Push_String_Extended,0xbdb					; ". Aborting backup."
0174 01cc       |    |		Execute	Vector,Catenate
0175 e009       |    |		Load	0x0,0x9
0176 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0177 e409       |    |		Load	0x2,0x9
0178 00ea       |    |		Load_Encached	Null_String_Cache
0179 e40d       |    |		Load	0x2,0xd
017a 4801       |H   |		Short_Literal	0x1
017b e002       |    |		Load	0x0,0x2
017c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
017d c409       |    |		Store	0x2,0x9
017e e409       |    |		Load	0x2,0x9
017f e002       |    |		Load	0x0,0x2
0180 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0181 c409       |    |		Store	0x2,0x9
0182 821e       |    |		Call	0x1,0x1e
0183 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0184 e408       |    |		Load	0x2,0x8
0185 e40a       |    |		Load	0x2,0xa
0186 800d       |    |		Call	0x0,0xd
0187 00d2       |    |		Pop_Control	Pop_Count_2
0188 00c9       |    |		Action	Pop_Auxiliary_Loop
0189 e40a       |    |		Load	0x2,0xa
018a 800e       |    |		Call	0x0,0xe
018b 6fd0       |o   |		Jump_Zero	0x15c
018c 00ce       |    |		Action	Pop_Auxiliary
018d 00d8       |    |		Load_Top	At_Offset_0
018e 4801       |H   |		Short_Literal	0x1
018f 800f       |    |		Call	0x0,0xf
0190 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0191 4800       |H   |		Short_Literal	0x0
0192 e5fe       |    |		Load	0x2,-0x2
0193 4800       |H   |		Short_Literal	0x0
0194 00ea       |    |		Load_Encached	Null_String_Cache
0195 e5ff       |    |		Load	0x2,-0x1
0196 e40d       |    |		Load	0x2,0xd
0197 8010       |    |		Call	0x0,0x10
0198 e409       |    |		Load	0x2,0x9
0199 00ea       |    |		Load_Encached	Null_String_Cache
019a 00db       |    |		Load_Top	At_Offset_3
019b 4801       |H   |		Short_Literal	0x1
019c e002       |    |		Load	0x0,0x2
019d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
019e c409       |    |		Store	0x2,0x9
019f e409       |    |		Load	0x2,0x9
01a0 e002       |    |		Load	0x0,0x2
01a1 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01a2 c409       |    |		Store	0x2,0x9
01a3 821e       |    |		Call	0x1,0x1e
01a4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01a5 0000 0000  |    |		.XXX[0x3]
01a7 0000       |    |
01a8 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
01ac 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
01b0 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
01b4 0000 0000  |    |		.BLANK	0000[0x4]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01f5       |    |		.CONST	0x01f5								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0014       |    |		.CONST	0x0014								; Number of locals
01bb			INIT_01b8:
01bb 4850       |HP  |		Short_Literal	0x50
01bc e011       |    |		Load	0x0,0x11
01bd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01be 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01bf 00d8       |    |		Load_Top	At_Offset_0
01c0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01c1 00ea       |    |		Load_Encached	Null_String_Cache
01c2 4850       |HP  |		Short_Literal	0x50
01c3 e004       |    |		Load	0x0,0x4
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 4850       |HP  |		Short_Literal	0x50
01c9 e004       |    |		Load	0x0,0x4
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 481e       |H   |		Short_Literal	0x1e
01cf e004       |    |		Load	0x0,0x4
01d0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01d1 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01d2 00d8       |    |		Load_Top	At_Offset_0
01d3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d4 e005       |    |		Load	0x0,0x5
01d5 0322       | "  |		Declare_Variable	Record
01d6 00d8       |    |		Load_Top	At_Offset_0
01d7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d8 00e1       |    |		Load_Encached	Boolean_Cache
01d9 03e9       |    |		Declare_Variable	Discrete,Duplicate
01da 03e9       |    |		Declare_Variable	Discrete,Duplicate
01db 03e9       |    |		Declare_Variable	Discrete,Duplicate
01dc e012       |    |		Load	0x0,0x12
01dd 0337       | 7  |		Declare_Variable	Array
01de e013       |    |		Load	0x0,0x13
01df 0007       |    |		Action	Break_Optional
01e0 e014       |    |		Load	0x0,0x14
01e1 0007       |    |		Action	Break_Optional
01e2 e015       |    |		Load	0x0,0x15
01e3 0322       | "  |		Declare_Variable	Record
01e4 00d8       |    |		Load_Top	At_Offset_0
01e5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e6 e002       |    |		Load	0x0,0x2
01e7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01e8 02c7       |    |		Declare_Variable	Any
01e9 00d8       |    |		Load_Top	At_Offset_0
01ea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01eb e006       |    |		Load	0x0,0x6
01ec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01ed 02c7       |    |		Declare_Variable	Any
01ee 00d8       |    |		Load_Top	At_Offset_0
01ef 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01f0 e016       |    |		Load	0x0,0x16
01f1 0007       |    |		Action	Break_Optional
01f2 e007       |    |		Load	0x0,0x7
01f3 029f 09fb  |    |		Declare_Subprogram	INIT_09f8,For_Call
01f5			BODY_01b8:
01f5 e5fc       |    |		Load	0x2,-0x4
01f6 0092 0bd4  |    |		Action	Push_String_Extended,0xbd4					; "<QUIET>"
01f8 01de       |    |		Execute	Vector,Not_Equal
01f9 680b       |h   |		Jump_Zero	0x205
01fa 00db       |    |		Load_Top	At_Offset_3
01fb e5fc       |    |		Load	0x2,-0x4
01fc e008       |    |		Load	0x0,0x8
01fd 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
01fe c411       |    |		Store	0x2,0x11
01ff e008       |    |		Load	0x0,0x8
0200 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0201 e411       |    |		Load	0x2,0x11
0202 e009       |    |		Load	0x0,0x9
0203 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0204 7804       |x   |		Jump	0x209
0205 e008       |    |		Load	0x0,0x8
0206 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0207 e008       |    |		Load	0x0,0x8
0208 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0209 821c       |    |		Call	0x1,0x1c
020a 6830       |h0  |		Jump_Zero	0x23b
020b e410       |    |		Load	0x2,0x10
020c 00ea       |    |		Load_Encached	Null_String_Cache
020d e5ff       |    |		Load	0x2,-0x1
020e 8017       |    |		Call	0x0,0x17
020f 4800       |H   |		Short_Literal	0x0
0210 e002       |    |		Load	0x0,0x2
0211 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0212 c410       |    |		Store	0x2,0x10
0213 4801       |H   |		Short_Literal	0x1
0214 a408       |    |		Store_Unchecked	0x2,0x8
0215 00cf       |    |		Action	Mark_Auxiliary
0216 7802       |x   |		Jump	0x219
0217 8414       |    |		Call	0x2,0x14
0218 00c9       |    |		Action	Pop_Auxiliary_Loop
0219 e410       |    |		Load	0x2,0x10
021a e002       |    |		Load	0x0,0x2
021b 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
021c 6ffa       |o   |		Jump_Zero	0x217
021d 00ce       |    |		Action	Pop_Auxiliary
021e e410       |    |		Load	0x2,0x10
021f e002       |    |		Load	0x0,0x2
0220 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0221 c410       |    |		Store	0x2,0x10
0222 e409       |    |		Load	0x2,0x9
0223 680b       |h   |		Jump_Zero	0x22f
0224 e402       |    |		Load	0x2,0x2
0225 e405       |    |		Load	0x2,0x5
0226 e004       |    |		Load	0x0,0x4
0227 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0228 e011       |    |		Load	0x0,0x11
0229 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
022a 00d1       |    |		Pop_Control	Pop_Count_1
022b e5fb       |    |		Load	0x2,-0x5
022c e403       |    |		Load	0x2,0x3
022d e402       |    |		Load	0x2,0x2
022e 8018       |    |		Call	0x0,0x18
022f e5fb       |    |		Load	0x2,-0x5
0230 7009       |p   |		Jump_Nonzero	0x23a
0231 00d9       |    |		Load_Top	At_Offset_1
0232 4801       |H   |		Short_Literal	0x1
0233 800f       |    |		Call	0x0,0xf
0234 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0235 e5fb       |    |		Load	0x2,-0x5
0236 e5fd       |    |		Load	0x2,-0x3
0237 e5fe       |    |		Load	0x2,-0x2
0238 e5ff       |    |		Load	0x2,-0x1
0239 8019       |    |		Call	0x0,0x19
023a 821e       |    |		Call	0x1,0x1e
023b 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
023c 0000 0000  |    |		.BLANK	0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0256       | V  |		.CONST	0x0256								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0009       |    |		.CONST	0x0009								; Number of locals
0243			INIT_0240:
0243 e006       |    |		Load	0x0,0x6
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 801a       |    |		Call	0x0,0x1a
024a e016       |    |		Load	0x0,0x16
024b 0007       |    |		Action	Break_Optional
024c e007       |    |		Load	0x0,0x7
024d 0007       |    |		Action	Break_Optional
024e e015       |    |		Load	0x0,0x15
024f 0322       | "  |		Declare_Variable	Record
0250 00d8       |    |		Load_Top	At_Offset_0
0251 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0252 00e2       |    |		Load_Encached	Integer_Cache
0253 03e9       |    |		Declare_Variable	Discrete,Duplicate
0254 e003       |    |		Load	0x0,0x3
0255 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0256			BODY_0240:
0256 e5fa       |    |		Load	0x2,-0x6
0257 0092 0bd4  |    |		Action	Push_String_Extended,0xbd4					; "<QUIET>"
0259 01de       |    |		Execute	Vector,Not_Equal
025a 680b       |h   |		Jump_Zero	0x266
025b e402       |    |		Load	0x2,0x2
025c e5fa       |    |		Load	0x2,-0x6
025d e008       |    |		Load	0x0,0x8
025e 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
025f c402       |    |		Store	0x2,0x2
0260 e008       |    |		Load	0x0,0x8
0261 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0262 e402       |    |		Load	0x2,0x2
0263 e009       |    |		Load	0x0,0x9
0264 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0265 7804       |x   |		Jump	0x26a
0266 e008       |    |		Load	0x0,0x8
0267 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0268 e008       |    |		Load	0x0,0x8
0269 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
026a 821c       |    |		Call	0x1,0x1c
026b 686b       |hk  |		Jump_Zero	0x2d7
026c 4801       |H   |		Short_Literal	0x1
026d e5ff       |    |		Load	0x2,-0x1
026e 0092 0bdd  |    |		Action	Push_String_Extended,0xbdd					; "!!"
0270 e01b       |    |		Load	0x0,0x1b
0271 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0272 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0273 00d9       |    |		Load_Top	At_Offset_1
0274 6808       |h   |		Jump_Zero	0x27d
0275 e008       |    |		Load	0x0,0x8
0276 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0277 4802       |H   |		Short_Literal	0x2
0278 0092 0bde  |    |		Action	Push_String_Extended,0xbde					; "Remote access is not currently supported"
027a e009       |    |		Load	0x0,0x9
027b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
027c 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
027d e5fb       |    |		Load	0x2,-0x5
027e 6807       |h   |		Jump_Zero	0x286
027f e007       |    |		Load	0x0,0x7
0280 4802       |H   |		Short_Literal	0x2
0281 e5ff       |    |		Load	0x2,-0x1
0282 8017       |    |		Call	0x0,0x17
0283 800a       |    |		Call	0x0,0xa
0284 c405       |    |		Store	0x2,0x5
0285 7806       |x   |		Jump	0x28c
0286 e007       |    |		Load	0x0,0x7
0287 4801       |H   |		Short_Literal	0x1
0288 e5ff       |    |		Load	0x2,-0x1
0289 8017       |    |		Call	0x0,0x17
028a 800a       |    |		Call	0x0,0xa
028b c405       |    |		Store	0x2,0x5
028c e405       |    |		Load	0x2,0x5
028d 801c       |    |		Call	0x0,0x1c
028e 6847       |hG  |		Jump_Zero	0x2d6
028f e016       |    |		Load	0x0,0x16
0290 4800       |H   |		Short_Literal	0x0
0291 e5fe       |    |		Load	0x2,-0x2
0292 801d       |    |		Call	0x0,0x1d
0293 c404       |    |		Store	0x2,0x4
0294 e404       |    |		Load	0x2,0x4
0295 801e       |    |		Call	0x0,0x1e
0296 683b       |h;  |		Jump_Zero	0x2d2
0297 00cf       |    |		Action	Mark_Auxiliary
0298 7831       |x1  |		Jump	0x2ca
0299 e406       |    |		Load	0x2,0x6
029a e404       |    |		Load	0x2,0x4
029b 801f       |    |		Call	0x0,0x1f
029c 00d1       |    |		Pop_Control	Pop_Count_1
029d e404       |    |		Load	0x2,0x4
029e 8020       |    |		Call	0x0,0x20
029f 702d       |p-  |		Jump_Nonzero	0x2cd
02a0 e404       |    |		Load	0x2,0x4
02a1 8021       | !  |		Call	0x0,0x21
02a2 6826       |h&  |		Jump_Zero	0x2c9
02a3 e21b       |    |		Load	0x1,0x1b
02a4 e5fd       |    |		Load	0x2,-0x3
02a5 e403       |    |		Load	0x2,0x3
02a6 e406       |    |		Load	0x2,0x6
02a7 8221       | !  |		Call	0x1,0x21
02a8 6812       |h   |		Jump_Zero	0x2bb
02a9 e406       |    |		Load	0x2,0x6
02aa 4800       |H   |		Short_Literal	0x0
02ab e405       |    |		Load	0x2,0x5
02ac 8022       | "  |		Call	0x0,0x22
02ad 00d1       |    |		Pop_Control	Pop_Count_1
02ae e406       |    |		Load	0x2,0x6
02af e405       |    |		Load	0x2,0x5
02b0 8223       | #  |		Call	0x1,0x23
02b1 00d1       |    |		Pop_Control	Pop_Count_1
02b2 00e3       |    |		Load_Encached	Natural_Cache
02b3 6024       |`$  |		Indirect_Literal	Discrete,0x2d8,{0x00000000, 0x7fffffff}
02b4 e404       |    |		Load	0x2,0x4
02b5 e405       |    |		Load	0x2,0x5
02b6 8023       | #  |		Call	0x0,0x23
02b7 c407       |    |		Store	0x2,0x7
02b8 e405       |    |		Load	0x2,0x5
02b9 8024       | $  |		Call	0x0,0x24
02ba 780c       |x   |		Jump	0x2c7
02bb e008       |    |		Load	0x0,0x8
02bc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02bd 4802       |H   |		Short_Literal	0x2
02be e406       |    |		Load	0x2,0x6
02bf 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02c0 e011       |    |		Load	0x0,0x11
02c1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c2 0092 0bdf  |    |		Action	Push_String_Extended,0xbdf					; " not copied"
02c4 01cc       |    |		Execute	Vector,Catenate
02c5 e009       |    |		Load	0x0,0x9
02c6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c7 e404       |    |		Load	0x2,0x4
02c8 8025       | %  |		Call	0x0,0x25
02c9 00c9       |    |		Action	Pop_Auxiliary_Loop
02ca e404       |    |		Load	0x2,0x4
02cb 8020       |    |		Call	0x0,0x20
02cc 6fcc       |o   |		Jump_Zero	0x299
02cd 00ce       |    |		Action	Pop_Auxiliary
02ce e404       |    |		Load	0x2,0x4
02cf 4800       |H   |		Short_Literal	0x0
02d0 8026       | &  |		Call	0x0,0x26
02d1 c404       |    |		Store	0x2,0x4
02d2 e405       |    |		Load	0x2,0x5
02d3 4801       |H   |		Short_Literal	0x1
02d4 800f       |    |		Call	0x0,0xf
02d5 c405       |    |		Store	0x2,0x5
02d6 821e       |    |		Call	0x1,0x1e
02d7 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
02d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
02dc 0000 0000  |    |		.BLANK	0000[0x4]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02eb       |    |		.CONST	0x02eb								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0004       |    |		.CONST	0x0004								; Number of locals
02e3			INIT_02e0:
02e3 00e2       |    |		Load_Encached	Integer_Cache
02e4 e027       | '  |		Load	0x0,0x27
02e5 0007       |    |		Action	Break_Optional
02e6 e006       |    |		Load	0x0,0x6
02e7 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02e8 02c7       |    |		Declare_Variable	Any
02e9 00d8       |    |		Load_Top	At_Offset_0
02ea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02eb			BODY_02e0:
02eb e5fb       |    |		Load	0x2,-0x5
02ec 0092 0bd4  |    |		Action	Push_String_Extended,0xbd4					; "<QUIET>"
02ee 01de       |    |		Execute	Vector,Not_Equal
02ef 680b       |h   |		Jump_Zero	0x2fb
02f0 00d8       |    |		Load_Top	At_Offset_0
02f1 e5fb       |    |		Load	0x2,-0x5
02f2 e008       |    |		Load	0x0,0x8
02f3 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
02f4 c404       |    |		Store	0x2,0x4
02f5 e008       |    |		Load	0x0,0x8
02f6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02f7 00d9       |    |		Load_Top	At_Offset_1
02f8 e009       |    |		Load	0x0,0x9
02f9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02fa 7804       |x   |		Jump	0x2ff
02fb e008       |    |		Load	0x0,0x8
02fc 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
02fd e008       |    |		Load	0x0,0x8
02fe 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
02ff 821c       |    |		Call	0x1,0x1c
0300 682a       |h*  |		Jump_Zero	0x32b
0301 4801       |H   |		Short_Literal	0x1
0302 e5fd       |    |		Load	0x2,-0x3
0303 0092 0bdd  |    |		Action	Push_String_Extended,0xbdd					; "!!"
0305 e01b       |    |		Load	0x0,0x1b
0306 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0307 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0308 00da       |    |		Load_Top	At_Offset_2
0309 6808       |h   |		Jump_Zero	0x312
030a e008       |    |		Load	0x0,0x8
030b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
030c 4802       |H   |		Short_Literal	0x2
030d 0092 0bde  |    |		Action	Push_String_Extended,0xbde					; "Remote access is not currently supported"
030f e009       |    |		Load	0x0,0x9
0310 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0311 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0312 e5fa       |    |		Load	0x2,-0x6
0313 680f       |h   |		Jump_Zero	0x323
0314 e008       |    |		Load	0x0,0x8
0315 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0316 4802       |H   |		Short_Literal	0x2
0317 0092 0be0  |    |		Action	Push_String_Extended,0xbe0					; "Environment file "
0319 e5ff       |    |		Load	0x2,-0x1
031a 01cc       |    |		Execute	Vector,Catenate
031b 0092 0be1  |    |		Action	Push_String_Extended,0xbe1					; "would have been written to the Dfs as "
031d 01cc       |    |		Execute	Vector,Catenate
031e e5fe       |    |		Load	0x2,-0x2
031f 01cc       |    |		Execute	Vector,Catenate
0320 e009       |    |		Load	0x0,0x9
0321 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0322 7807       |x   |		Jump	0x32a
0323 00d9       |    |		Load_Top	At_Offset_1
0324 e5fd       |    |		Load	0x2,-0x3
0325 e5ff       |    |		Load	0x2,-0x1
0326 01cc       |    |		Execute	Vector,Catenate
0327 e5fe       |    |		Load	0x2,-0x2
0328 8028       | (  |		Call	0x0,0x28
0329 005a       | Z  |		Store_Top	Discrete,At_Offset_2
032a 821e       |    |		Call	0x1,0x1e
032b 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
032c 0000 0000  |    |		.BLANK	0000[0x4]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 036b       | k  |		.CONST	0x036b								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0015       |    |		.CONST	0x0015								; Number of locals
0333			INIT_0330:
0333 00e3       |    |		Load_Encached	Natural_Cache
0334 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0335 00e2       |    |		Load_Encached	Integer_Cache
0336 03e9       |    |		Declare_Variable	Discrete,Duplicate
0337 03e9       |    |		Declare_Variable	Discrete,Duplicate
0338 e012       |    |		Load	0x0,0x12
0339 0337       | 7  |		Declare_Variable	Array
033a 481e       |H   |		Short_Literal	0x1e
033b e004       |    |		Load	0x0,0x4
033c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
033d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
033e 00d8       |    |		Load_Top	At_Offset_0
033f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0340 0092 0bd0  |    |		Action	Push_String_Extended,0xbd0					; "KERNEL_0.M200"
0342 e004       |    |		Load	0x0,0x4
0343 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0344 0092 0be2  |    |		Action	Push_String_Extended,0xbe2					; "KERNEL_1.M200"
0346 e004       |    |		Load	0x0,0x4
0347 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0348 0092 0be3  |    |		Action	Push_String_Extended,0xbe3					; "KERNEL_2.M200"
034a e004       |    |		Load	0x0,0x4
034b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
034c e015       |    |		Load	0x0,0x15
034d 0322       | "  |		Declare_Variable	Record
034e 00d8       |    |		Load_Top	At_Offset_0
034f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0350 e029       | )  |		Load	0x0,0x29
0351 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0352 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0353 02c7       |    |		Declare_Variable	Any
0354 00d8       |    |		Load_Top	At_Offset_0
0355 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0356 00e1       |    |		Load_Encached	Boolean_Cache
0357 e029       | )  |		Load	0x0,0x29
0358 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0359 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
035a e02a       | *  |		Load	0x0,0x2a
035b 0007       |    |		Action	Break_Optional
035c e02b       | +  |		Load	0x0,0x2b
035d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
035e e014       |    |		Load	0x0,0x14
035f 0007       |    |		Action	Break_Optional
0360 e5ff       |    |		Load	0x2,-0x1
0361 801a       |    |		Call	0x0,0x1a
0362 e006       |    |		Load	0x0,0x6
0363 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0364 02c7       |    |		Declare_Variable	Any
0365 00d8       |    |		Load_Top	At_Offset_0
0366 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0367 e007       |    |		Load	0x0,0x7
0368 0007       |    |		Action	Break_Optional
0369 029f 0aab  |    |		Declare_Subprogram	INIT_0aa8,For_Call
036b			BODY_0330:
036b e5fc       |    |		Load	0x2,-0x4
036c 0092 0bd4  |    |		Action	Push_String_Extended,0xbd4					; "<QUIET>"
036e 01de       |    |		Execute	Vector,Not_Equal
036f 680b       |h   |		Jump_Zero	0x37b
0370 00da       |    |		Load_Top	At_Offset_2
0371 e5fc       |    |		Load	0x2,-0x4
0372 e008       |    |		Load	0x0,0x8
0373 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0374 c413       |    |		Store	0x2,0x13
0375 e008       |    |		Load	0x0,0x8
0376 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0377 00db       |    |		Load_Top	At_Offset_3
0378 e009       |    |		Load	0x0,0x9
0379 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
037a 7804       |x   |		Jump	0x37f
037b e008       |    |		Load	0x0,0x8
037c 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
037d e008       |    |		Load	0x0,0x8
037e 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
037f 821c       |    |		Call	0x1,0x1c
0380 7001       |p   |		Jump_Nonzero	0x382
0381 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0382 4801       |H   |		Short_Literal	0x1
0383 e5fe       |    |		Load	0x2,-0x2
0384 0092 0bdd  |    |		Action	Push_String_Extended,0xbdd					; "!!"
0386 e01b       |    |		Load	0x0,0x1b
0387 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0388 a405       |    |		Store_Unchecked	0x2,0x5
0389 e405       |    |		Load	0x2,0x5
038a 6808       |h   |		Jump_Zero	0x393
038b e008       |    |		Load	0x0,0x8
038c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
038d 4802       |H   |		Short_Literal	0x2
038e 0092 0bde  |    |		Action	Push_String_Extended,0xbde					; "Remote access is not currently supported"
0390 e009       |    |		Load	0x0,0x9
0391 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0392 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0393 4800       |H   |		Short_Literal	0x0
0394 a403       |    |		Store_Unchecked	0x2,0x3
0395 e029       | )  |		Load	0x0,0x29
0396 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0397 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0398 e40c       |    |		Load	0x2,0xc
0399 623a       |b:  |		Indirect_Literal	Discrete,0x5d4,{0x00000000, 0x00004000}
039a e02c       | ,  |		Load	0x0,0x2c
039b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
039c e02d       | -  |		Load	0x0,0x2d
039d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
039e e02e       | .  |		Load	0x0,0x2e
039f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03a0 4801       |H   |		Short_Literal	0x1
03a1 4800       |H   |		Short_Literal	0x0
03a2 e02d       | -  |		Load	0x0,0x2d
03a3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03a4 e029       | )  |		Load	0x0,0x29
03a5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03a6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03a7 e5fe       |    |		Load	0x2,-0x2
03a8 0092 0be4  |    |		Action	Push_String_Extended,0xbe4					; "."
03aa 01cc       |    |		Execute	Vector,Catenate
03ab e5ff       |    |		Load	0x2,-0x1
03ac 8017       |    |		Call	0x0,0x17
03ad 01cc       |    |		Execute	Vector,Catenate
03ae e029       | )  |		Load	0x0,0x29
03af 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03b0 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03b1 c40c       |    |		Store	0x2,0xc
03b2 c40e       |    |		Store	0x2,0xe
03b3 e40e       |    |		Load	0x2,0xe
03b4 6808       |h   |		Jump_Zero	0x3bd
03b5 e008       |    |		Load	0x0,0x8
03b6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03b7 4802       |H   |		Short_Literal	0x2
03b8 0092 0be5  |    |		Action	Push_String_Extended,0xbe5					; "No matching files found"
03ba e009       |    |		Load	0x0,0x9
03bb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03bc 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
03bd 00cf       |    |		Action	Mark_Auxiliary
03be 79e7       |y   |		Jump	0x5a6
03bf e007       |    |		Load	0x0,0x7
03c0 4800       |H   |		Short_Literal	0x0
03c1 e40c       |    |		Load	0x2,0xc
03c2 e029       | )  |		Load	0x0,0x29
03c3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03c4 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
03c5 800a       |    |		Call	0x0,0xa
03c6 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
03c7 00da       |    |		Load_Top	At_Offset_2
03c8 801c       |    |		Call	0x0,0x1c
03c9 697e       |i~  |		Jump_Zero	0x548
03ca 802f       | /  |		Call	0x0,0x2f
03cb 4605       |F   |		Jump_Case	0x6
03cc 7972       |yr  |		Jump	0x53f								; case 0x0
03cd 7928       |y(  |		Jump	0x4f6								; case 0x1
03ce 78de       |x   |		Jump	0x4ad								; case 0x2
03cf 7894       |x   |		Jump	0x464								; case 0x3
03d0 784a       |xJ  |		Jump	0x41b								; case 0x4
03d1 7800       |x   |		Jump	0x3d2								; case 0x5
03d2 e40b       |    |		Load	0x2,0xb
03d3 4800       |H   |		Short_Literal	0x0
03d4 0092 0be6  |    |		Action	Push_String_Extended,0xbe6					; "M400C_KERNEL_0.M200"
03d6 e414       |    |		Load	0x2,0x14
03d7 8030       | 0  |		Call	0x0,0x30
03d8 00d1       |    |		Pop_Control	Pop_Count_1
03d9 00da       |    |		Load_Top	At_Offset_2
03da 8031       | 1  |		Call	0x0,0x31
03db 6806       |h   |		Jump_Zero	0x3e2
03dc e5fb       |    |		Load	0x2,-0x5
03dd e5fd       |    |		Load	0x2,-0x3
03de e408       |    |		Load	0x2,0x8
03df 8415       |    |		Call	0x2,0x15
03e0 00da       |    |		Load_Top	At_Offset_2
03e1 8024       | $  |		Call	0x0,0x24
03e2 00da       |    |		Load_Top	At_Offset_2
03e3 4801       |H   |		Short_Literal	0x1
03e4 800f       |    |		Call	0x0,0xf
03e5 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
03e6 e007       |    |		Load	0x0,0x7
03e7 4800       |H   |		Short_Literal	0x0
03e8 e40c       |    |		Load	0x2,0xc
03e9 e029       | )  |		Load	0x0,0x29
03ea 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03eb 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
03ec 800a       |    |		Call	0x0,0xa
03ed 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
03ee e40b       |    |		Load	0x2,0xb
03ef 4800       |H   |		Short_Literal	0x0
03f0 0092 0be7  |    |		Action	Push_String_Extended,0xbe7					; "M400C_KERNEL_1.M200"
03f2 e414       |    |		Load	0x2,0x14
03f3 8030       | 0  |		Call	0x0,0x30
03f4 00d1       |    |		Pop_Control	Pop_Count_1
03f5 00da       |    |		Load_Top	At_Offset_2
03f6 8031       | 1  |		Call	0x0,0x31
03f7 6806       |h   |		Jump_Zero	0x3fe
03f8 e5fb       |    |		Load	0x2,-0x5
03f9 e5fd       |    |		Load	0x2,-0x3
03fa e409       |    |		Load	0x2,0x9
03fb 8415       |    |		Call	0x2,0x15
03fc 00da       |    |		Load_Top	At_Offset_2
03fd 8024       | $  |		Call	0x0,0x24
03fe 00da       |    |		Load_Top	At_Offset_2
03ff 4801       |H   |		Short_Literal	0x1
0400 800f       |    |		Call	0x0,0xf
0401 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0402 e007       |    |		Load	0x0,0x7
0403 4800       |H   |		Short_Literal	0x0
0404 e40c       |    |		Load	0x2,0xc
0405 e029       | )  |		Load	0x0,0x29
0406 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0407 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0408 800a       |    |		Call	0x0,0xa
0409 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
040a e40b       |    |		Load	0x2,0xb
040b 4800       |H   |		Short_Literal	0x0
040c 0092 0be8  |    |		Action	Push_String_Extended,0xbe8					; "M400C_KERNEL_2.M200"
040e e414       |    |		Load	0x2,0x14
040f 8030       | 0  |		Call	0x0,0x30
0410 00d1       |    |		Pop_Control	Pop_Count_1
0411 00da       |    |		Load_Top	At_Offset_2
0412 8031       | 1  |		Call	0x0,0x31
0413 6934       |i4  |		Jump_Zero	0x548
0414 e5fb       |    |		Load	0x2,-0x5
0415 e5fd       |    |		Load	0x2,-0x3
0416 e40a       |    |		Load	0x2,0xa
0417 8415       |    |		Call	0x2,0x15
0418 00da       |    |		Load_Top	At_Offset_2
0419 8024       | $  |		Call	0x0,0x24
041a 792d       |y-  |		Jump	0x548
041b e40b       |    |		Load	0x2,0xb
041c 4800       |H   |		Short_Literal	0x0
041d 0092 0be9  |    |		Action	Push_String_Extended,0xbe9					; "M400S_KERNEL_0.M200"
041f e414       |    |		Load	0x2,0x14
0420 8030       | 0  |		Call	0x0,0x30
0421 00d1       |    |		Pop_Control	Pop_Count_1
0422 00da       |    |		Load_Top	At_Offset_2
0423 8031       | 1  |		Call	0x0,0x31
0424 6806       |h   |		Jump_Zero	0x42b
0425 e5fb       |    |		Load	0x2,-0x5
0426 e5fd       |    |		Load	0x2,-0x3
0427 e408       |    |		Load	0x2,0x8
0428 8415       |    |		Call	0x2,0x15
0429 00da       |    |		Load_Top	At_Offset_2
042a 8024       | $  |		Call	0x0,0x24
042b 00da       |    |		Load_Top	At_Offset_2
042c 4801       |H   |		Short_Literal	0x1
042d 800f       |    |		Call	0x0,0xf
042e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
042f e007       |    |		Load	0x0,0x7
0430 4800       |H   |		Short_Literal	0x0
0431 e40c       |    |		Load	0x2,0xc
0432 e029       | )  |		Load	0x0,0x29
0433 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0434 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0435 800a       |    |		Call	0x0,0xa
0436 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0437 e40b       |    |		Load	0x2,0xb
0438 4800       |H   |		Short_Literal	0x0
0439 0092 0bea  |    |		Action	Push_String_Extended,0xbea					; "M400S_KERNEL_1.M200"
043b e414       |    |		Load	0x2,0x14
043c 8030       | 0  |		Call	0x0,0x30
043d 00d1       |    |		Pop_Control	Pop_Count_1
043e 00da       |    |		Load_Top	At_Offset_2
043f 8031       | 1  |		Call	0x0,0x31
0440 6806       |h   |		Jump_Zero	0x447
0441 e5fb       |    |		Load	0x2,-0x5
0442 e5fd       |    |		Load	0x2,-0x3
0443 e409       |    |		Load	0x2,0x9
0444 8415       |    |		Call	0x2,0x15
0445 00da       |    |		Load_Top	At_Offset_2
0446 8024       | $  |		Call	0x0,0x24
0447 00da       |    |		Load_Top	At_Offset_2
0448 4801       |H   |		Short_Literal	0x1
0449 800f       |    |		Call	0x0,0xf
044a 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
044b e007       |    |		Load	0x0,0x7
044c 4800       |H   |		Short_Literal	0x0
044d e40c       |    |		Load	0x2,0xc
044e e029       | )  |		Load	0x0,0x29
044f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0450 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0451 800a       |    |		Call	0x0,0xa
0452 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0453 e40b       |    |		Load	0x2,0xb
0454 4800       |H   |		Short_Literal	0x0
0455 0092 0beb  |    |		Action	Push_String_Extended,0xbeb					; "M400S_KERNEL_2.M200"
0457 e414       |    |		Load	0x2,0x14
0458 8030       | 0  |		Call	0x0,0x30
0459 00d1       |    |		Pop_Control	Pop_Count_1
045a 00da       |    |		Load_Top	At_Offset_2
045b 8031       | 1  |		Call	0x0,0x31
045c 68eb       |h   |		Jump_Zero	0x548
045d e5fb       |    |		Load	0x2,-0x5
045e e5fd       |    |		Load	0x2,-0x3
045f e40a       |    |		Load	0x2,0xa
0460 8415       |    |		Call	0x2,0x15
0461 00da       |    |		Load_Top	At_Offset_2
0462 8024       | $  |		Call	0x0,0x24
0463 78e4       |x   |		Jump	0x548
0464 e40b       |    |		Load	0x2,0xb
0465 4800       |H   |		Short_Literal	0x0
0466 0092 0bec  |    |		Action	Push_String_Extended,0xbec					; "M300C_KERNEL_0.M200"
0468 e414       |    |		Load	0x2,0x14
0469 8030       | 0  |		Call	0x0,0x30
046a 00d1       |    |		Pop_Control	Pop_Count_1
046b 00da       |    |		Load_Top	At_Offset_2
046c 8031       | 1  |		Call	0x0,0x31
046d 6806       |h   |		Jump_Zero	0x474
046e e5fb       |    |		Load	0x2,-0x5
046f e5fd       |    |		Load	0x2,-0x3
0470 e408       |    |		Load	0x2,0x8
0471 8415       |    |		Call	0x2,0x15
0472 00da       |    |		Load_Top	At_Offset_2
0473 8024       | $  |		Call	0x0,0x24
0474 00da       |    |		Load_Top	At_Offset_2
0475 4801       |H   |		Short_Literal	0x1
0476 800f       |    |		Call	0x0,0xf
0477 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0478 e007       |    |		Load	0x0,0x7
0479 4800       |H   |		Short_Literal	0x0
047a e40c       |    |		Load	0x2,0xc
047b e029       | )  |		Load	0x0,0x29
047c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
047d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
047e 800a       |    |		Call	0x0,0xa
047f 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0480 e40b       |    |		Load	0x2,0xb
0481 4800       |H   |		Short_Literal	0x0
0482 0092 0bed  |    |		Action	Push_String_Extended,0xbed					; "M300C_KERNEL_1.M200"
0484 e414       |    |		Load	0x2,0x14
0485 8030       | 0  |		Call	0x0,0x30
0486 00d1       |    |		Pop_Control	Pop_Count_1
0487 00da       |    |		Load_Top	At_Offset_2
0488 8031       | 1  |		Call	0x0,0x31
0489 6806       |h   |		Jump_Zero	0x490
048a e5fb       |    |		Load	0x2,-0x5
048b e5fd       |    |		Load	0x2,-0x3
048c e409       |    |		Load	0x2,0x9
048d 8415       |    |		Call	0x2,0x15
048e 00da       |    |		Load_Top	At_Offset_2
048f 8024       | $  |		Call	0x0,0x24
0490 00da       |    |		Load_Top	At_Offset_2
0491 4801       |H   |		Short_Literal	0x1
0492 800f       |    |		Call	0x0,0xf
0493 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0494 e007       |    |		Load	0x0,0x7
0495 4800       |H   |		Short_Literal	0x0
0496 e40c       |    |		Load	0x2,0xc
0497 e029       | )  |		Load	0x0,0x29
0498 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0499 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
049a 800a       |    |		Call	0x0,0xa
049b 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
049c e40b       |    |		Load	0x2,0xb
049d 4800       |H   |		Short_Literal	0x0
049e 0092 0bee  |    |		Action	Push_String_Extended,0xbee					; "M300C_KERNEL_2.M200"
04a0 e414       |    |		Load	0x2,0x14
04a1 8030       | 0  |		Call	0x0,0x30
04a2 00d1       |    |		Pop_Control	Pop_Count_1
04a3 00da       |    |		Load_Top	At_Offset_2
04a4 8031       | 1  |		Call	0x0,0x31
04a5 68a2       |h   |		Jump_Zero	0x548
04a6 e5fb       |    |		Load	0x2,-0x5
04a7 e5fd       |    |		Load	0x2,-0x3
04a8 e40a       |    |		Load	0x2,0xa
04a9 8415       |    |		Call	0x2,0x15
04aa 00da       |    |		Load_Top	At_Offset_2
04ab 8024       | $  |		Call	0x0,0x24
04ac 789b       |x   |		Jump	0x548
04ad e40b       |    |		Load	0x2,0xb
04ae 4800       |H   |		Short_Literal	0x0
04af 0092 0bef  |    |		Action	Push_String_Extended,0xbef					; "M300S_KERNEL_0.M200"
04b1 e414       |    |		Load	0x2,0x14
04b2 8030       | 0  |		Call	0x0,0x30
04b3 00d1       |    |		Pop_Control	Pop_Count_1
04b4 00da       |    |		Load_Top	At_Offset_2
04b5 8031       | 1  |		Call	0x0,0x31
04b6 6806       |h   |		Jump_Zero	0x4bd
04b7 e5fb       |    |		Load	0x2,-0x5
04b8 e5fd       |    |		Load	0x2,-0x3
04b9 e408       |    |		Load	0x2,0x8
04ba 8415       |    |		Call	0x2,0x15
04bb 00da       |    |		Load_Top	At_Offset_2
04bc 8024       | $  |		Call	0x0,0x24
04bd 00da       |    |		Load_Top	At_Offset_2
04be 4801       |H   |		Short_Literal	0x1
04bf 800f       |    |		Call	0x0,0xf
04c0 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
04c1 e007       |    |		Load	0x0,0x7
04c2 4800       |H   |		Short_Literal	0x0
04c3 e40c       |    |		Load	0x2,0xc
04c4 e029       | )  |		Load	0x0,0x29
04c5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04c6 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
04c7 800a       |    |		Call	0x0,0xa
04c8 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
04c9 e40b       |    |		Load	0x2,0xb
04ca 4800       |H   |		Short_Literal	0x0
04cb 0092 0bf0  |    |		Action	Push_String_Extended,0xbf0					; "M300S_KERNEL_1.M200"
04cd e414       |    |		Load	0x2,0x14
04ce 8030       | 0  |		Call	0x0,0x30
04cf 00d1       |    |		Pop_Control	Pop_Count_1
04d0 00da       |    |		Load_Top	At_Offset_2
04d1 8031       | 1  |		Call	0x0,0x31
04d2 6806       |h   |		Jump_Zero	0x4d9
04d3 e5fb       |    |		Load	0x2,-0x5
04d4 e5fd       |    |		Load	0x2,-0x3
04d5 e409       |    |		Load	0x2,0x9
04d6 8415       |    |		Call	0x2,0x15
04d7 00da       |    |		Load_Top	At_Offset_2
04d8 8024       | $  |		Call	0x0,0x24
04d9 00da       |    |		Load_Top	At_Offset_2
04da 4801       |H   |		Short_Literal	0x1
04db 800f       |    |		Call	0x0,0xf
04dc 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
04dd e007       |    |		Load	0x0,0x7
04de 4800       |H   |		Short_Literal	0x0
04df e40c       |    |		Load	0x2,0xc
04e0 e029       | )  |		Load	0x0,0x29
04e1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04e2 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
04e3 800a       |    |		Call	0x0,0xa
04e4 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
04e5 e40b       |    |		Load	0x2,0xb
04e6 4800       |H   |		Short_Literal	0x0
04e7 0092 0bf1  |    |		Action	Push_String_Extended,0xbf1					; "M300S_KERNEL_2.M200"
04e9 e414       |    |		Load	0x2,0x14
04ea 8030       | 0  |		Call	0x0,0x30
04eb 00d1       |    |		Pop_Control	Pop_Count_1
04ec 00da       |    |		Load_Top	At_Offset_2
04ed 8031       | 1  |		Call	0x0,0x31
04ee 6859       |hY  |		Jump_Zero	0x548
04ef e5fb       |    |		Load	0x2,-0x5
04f0 e5fd       |    |		Load	0x2,-0x3
04f1 e40a       |    |		Load	0x2,0xa
04f2 8415       |    |		Call	0x2,0x15
04f3 00da       |    |		Load_Top	At_Offset_2
04f4 8024       | $  |		Call	0x0,0x24
04f5 7852       |xR  |		Jump	0x548
04f6 e40b       |    |		Load	0x2,0xb
04f7 4800       |H   |		Short_Literal	0x0
04f8 0092 0bcf  |    |		Action	Push_String_Extended,0xbcf					; "M200_KERNEL_0.M200"
04fa e414       |    |		Load	0x2,0x14
04fb 8030       | 0  |		Call	0x0,0x30
04fc 00d1       |    |		Pop_Control	Pop_Count_1
04fd 00da       |    |		Load_Top	At_Offset_2
04fe 8031       | 1  |		Call	0x0,0x31
04ff 6806       |h   |		Jump_Zero	0x506
0500 e5fb       |    |		Load	0x2,-0x5
0501 e5fd       |    |		Load	0x2,-0x3
0502 e408       |    |		Load	0x2,0x8
0503 8415       |    |		Call	0x2,0x15
0504 00da       |    |		Load_Top	At_Offset_2
0505 8024       | $  |		Call	0x0,0x24
0506 00da       |    |		Load_Top	At_Offset_2
0507 4801       |H   |		Short_Literal	0x1
0508 800f       |    |		Call	0x0,0xf
0509 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
050a e007       |    |		Load	0x0,0x7
050b 4800       |H   |		Short_Literal	0x0
050c e40c       |    |		Load	0x2,0xc
050d e029       | )  |		Load	0x0,0x29
050e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
050f 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0510 800a       |    |		Call	0x0,0xa
0511 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0512 e40b       |    |		Load	0x2,0xb
0513 4800       |H   |		Short_Literal	0x0
0514 0092 0bf2  |    |		Action	Push_String_Extended,0xbf2					; "M200_KERNEL_1.M200"
0516 e414       |    |		Load	0x2,0x14
0517 8030       | 0  |		Call	0x0,0x30
0518 00d1       |    |		Pop_Control	Pop_Count_1
0519 00da       |    |		Load_Top	At_Offset_2
051a 8031       | 1  |		Call	0x0,0x31
051b 6806       |h   |		Jump_Zero	0x522
051c e5fb       |    |		Load	0x2,-0x5
051d e5fd       |    |		Load	0x2,-0x3
051e e409       |    |		Load	0x2,0x9
051f 8415       |    |		Call	0x2,0x15
0520 00da       |    |		Load_Top	At_Offset_2
0521 8024       | $  |		Call	0x0,0x24
0522 00da       |    |		Load_Top	At_Offset_2
0523 4801       |H   |		Short_Literal	0x1
0524 800f       |    |		Call	0x0,0xf
0525 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0526 e007       |    |		Load	0x0,0x7
0527 4800       |H   |		Short_Literal	0x0
0528 e40c       |    |		Load	0x2,0xc
0529 e029       | )  |		Load	0x0,0x29
052a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
052b 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
052c 800a       |    |		Call	0x0,0xa
052d 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
052e e40b       |    |		Load	0x2,0xb
052f 4800       |H   |		Short_Literal	0x0
0530 0092 0bf3  |    |		Action	Push_String_Extended,0xbf3					; "M200_KERNEL_2.M200"
0532 e414       |    |		Load	0x2,0x14
0533 8030       | 0  |		Call	0x0,0x30
0534 00d1       |    |		Pop_Control	Pop_Count_1
0535 00da       |    |		Load_Top	At_Offset_2
0536 8031       | 1  |		Call	0x0,0x31
0537 6810       |h   |		Jump_Zero	0x548
0538 e5fb       |    |		Load	0x2,-0x5
0539 e5fd       |    |		Load	0x2,-0x3
053a e40a       |    |		Load	0x2,0xa
053b 8415       |    |		Call	0x2,0x15
053c 00da       |    |		Load_Top	At_Offset_2
053d 8024       | $  |		Call	0x0,0x24
053e 7809       |x   |		Jump	0x548
053f e008       |    |		Load	0x0,0x8
0540 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0541 4802       |H   |		Short_Literal	0x2
0542 0092 0bf4  |    |		Action	Push_String_Extended,0xbf4					; "This Dfs cannot be used on an R1000 model 100"
0544 e009       |    |		Load	0x0,0x9
0545 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0546 821e       |    |		Call	0x1,0x1e
0547 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0548 00da       |    |		Load_Top	At_Offset_2
0549 4801       |H   |		Short_Literal	0x1
054a 800f       |    |		Call	0x0,0xf
054b 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
054c e007       |    |		Load	0x0,0x7
054d 4800       |H   |		Short_Literal	0x0
054e e40c       |    |		Load	0x2,0xc
054f e029       | )  |		Load	0x0,0x29
0550 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0551 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0552 800a       |    |		Call	0x0,0xa
0553 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0554 00da       |    |		Load_Top	At_Offset_2
0555 801c       |    |		Call	0x0,0x1c
0556 6849       |hI  |		Jump_Zero	0x5a0
0557 00cf       |    |		Action	Mark_Auxiliary
0558 783f       |x?  |		Jump	0x598
0559 e40b       |    |		Load	0x2,0xb
055a 4800       |H   |		Short_Literal	0x0
055b e414       |    |		Load	0x2,0x14
055c 8022       | "  |		Call	0x0,0x22
055d 00d1       |    |		Pop_Control	Pop_Count_1
055e 00db       |    |		Load_Top	At_Offset_3
055f 8031       | 1  |		Call	0x0,0x31
0560 6836       |h6  |		Jump_Zero	0x597
0561 e21b       |    |		Load	0x1,0x1b
0562 00ea       |    |		Load_Encached	Null_String_Cache
0563 e412       |    |		Load	0x2,0x12
0564 e40b       |    |		Load	0x2,0xb
0565 8221       | !  |		Call	0x1,0x21
0566 682e       |h.  |		Jump_Zero	0x595
0567 e407       |    |		Load	0x2,0x7
0568 e40b       |    |		Load	0x2,0xb
0569 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
056a e011       |    |		Load	0x0,0x11
056b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
056c e004       |    |		Load	0x0,0x4
056d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
056e 00d1       |    |		Pop_Control	Pop_Count_1
056f e407       |    |		Load	0x2,0x7
0570 e004       |    |		Load	0x0,0x4
0571 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0572 e01b       |    |		Load	0x0,0x1b
0573 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0574 0092 0bf5  |    |		Action	Push_String_Extended,0xbf5					; "KERNEL_@.M200"
0576 e032       | 2  |		Load	0x0,0x32
0577 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0578 701c       |p   |		Jump_Nonzero	0x595
0579 e407       |    |		Load	0x2,0x7
057a e004       |    |		Load	0x0,0x4
057b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
057c e01b       |    |		Load	0x0,0x1b
057d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
057e 0092 0bf6  |    |		Action	Push_String_Extended,0xbf6					; "TCP_IP_HOST_ID"
0580 e032       | 2  |		Load	0x0,0x32
0581 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0582 7012       |p   |		Jump_Nonzero	0x595
0583 e407       |    |		Load	0x2,0x7
0584 e004       |    |		Load	0x0,0x4
0585 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0586 e01b       |    |		Load	0x0,0x1b
0587 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0588 0092 0bf7  |    |		Action	Push_String_Extended,0xbf7					; "HARDWARE.M200_CONFIG"
058a e032       | 2  |		Load	0x0,0x32
058b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
058c 7008       |p   |		Jump_Nonzero	0x595
058d e407       |    |		Load	0x2,0x7
058e 821d       |    |		Call	0x1,0x1d
058f 6801       |h   |		Jump_Zero	0x591
0590 7804       |x   |		Jump	0x595
0591 e5fb       |    |		Load	0x2,-0x5
0592 e5fd       |    |		Load	0x2,-0x3
0593 e407       |    |		Load	0x2,0x7
0594 8415       |    |		Call	0x2,0x15
0595 00db       |    |		Load_Top	At_Offset_3
0596 8024       | $  |		Call	0x0,0x24
0597 00c9       |    |		Action	Pop_Auxiliary_Loop
0598 00db       |    |		Load_Top	At_Offset_3
0599 8033       | 3  |		Call	0x0,0x33
059a 6fbe       |o   |		Jump_Zero	0x559
059b 00ce       |    |		Action	Pop_Auxiliary
059c 00da       |    |		Load_Top	At_Offset_2
059d 4801       |H   |		Short_Literal	0x1
059e 800f       |    |		Call	0x0,0xf
059f 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
05a0 e40c       |    |		Load	0x2,0xc
05a1 e029       | )  |		Load	0x0,0x29
05a2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05a3 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
05a4 c40c       |    |		Store	0x2,0xc
05a5 00c9       |    |		Action	Pop_Auxiliary_Loop
05a6 e40c       |    |		Load	0x2,0xc
05a7 e029       | )  |		Load	0x0,0x29
05a8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05a9 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
05aa 6e14       |n   |		Jump_Zero	0x3bf
05ab 00ce       |    |		Action	Pop_Auxiliary
05ac e403       |    |		Load	0x2,0x3
05ad 7008       |p   |		Jump_Nonzero	0x5b6
05ae e008       |    |		Load	0x0,0x8
05af 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05b0 4802       |H   |		Short_Literal	0x2
05b1 0092 0be5  |    |		Action	Push_String_Extended,0xbe5					; "No matching files found"
05b3 e009       |    |		Load	0x0,0x9
05b4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05b5 781c       |x   |		Jump	0x5d2
05b6 e403       |    |		Load	0x2,0x3
05b7 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
05b8 6819       |h   |		Jump_Zero	0x5d2
05b9 e5fb       |    |		Load	0x2,-0x5
05ba 700c       |p   |		Jump_Nonzero	0x5c7
05bb e008       |    |		Load	0x0,0x8
05bc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05bd 4802       |H   |		Short_Literal	0x2
05be e403       |    |		Load	0x2,0x3
05bf 00e0       |    |		Load_Encached	Standard_Cache
05c0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05c1 0092 0bf8  |    |		Action	Push_String_Extended,0xbf8					; " files have been downloaded"
05c3 01cc       |    |		Execute	Vector,Catenate
05c4 e009       |    |		Load	0x0,0x9
05c5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05c6 780b       |x   |		Jump	0x5d2
05c7 e008       |    |		Load	0x0,0x8
05c8 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05c9 4802       |H   |		Short_Literal	0x2
05ca e403       |    |		Load	0x2,0x3
05cb 00e0       |    |		Load_Encached	Standard_Cache
05cc 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05cd 0092 0bf9  |    |		Action	Push_String_Extended,0xbf9					; " files would have been downloaded"
05cf 01cc       |    |		Execute	Vector,Catenate
05d0 e009       |    |		Load	0x0,0x9
05d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05d2 821e       |    |		Call	0x1,0x1e
05d3 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
05d4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05e8       |    |		.CONST	0x05e8								; Address of begin
05d9 0004       |    |		.CONST	0x0004								; Address of exception handler
05da 0004       |    |		.CONST	0x0004								; Number of locals
05db			INIT_05d8:
05db 00e2       |    |		Load_Encached	Integer_Cache
05dc e006       |    |		Load	0x0,0x6
05dd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05de 02c7       |    |		Declare_Variable	Any
05df 00d8       |    |		Load_Top	At_Offset_0
05e0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05e1 e5fd       |    |		Load	0x2,-0x3
05e2 0092 0be4  |    |		Action	Push_String_Extended,0xbe4					; "."
05e4 01cc       |    |		Execute	Vector,Catenate
05e5 e5ff       |    |		Load	0x2,-0x1
05e6 01cc       |    |		Execute	Vector,Catenate
05e7 0007       |    |		Action	Break_Optional
05e8			BODY_05d8:
05e8 e5fb       |    |		Load	0x2,-0x5
05e9 0092 0bd4  |    |		Action	Push_String_Extended,0xbd4					; "<QUIET>"
05eb 01de       |    |		Execute	Vector,Not_Equal
05ec 680b       |h   |		Jump_Zero	0x5f8
05ed 00d9       |    |		Load_Top	At_Offset_1
05ee e5fb       |    |		Load	0x2,-0x5
05ef e008       |    |		Load	0x0,0x8
05f0 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
05f1 c403       |    |		Store	0x2,0x3
05f2 e008       |    |		Load	0x0,0x8
05f3 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05f4 00da       |    |		Load_Top	At_Offset_2
05f5 e009       |    |		Load	0x0,0x9
05f6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
05f7 7804       |x   |		Jump	0x5fc
05f8 e008       |    |		Load	0x0,0x8
05f9 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
05fa e008       |    |		Load	0x0,0x8
05fb 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
05fc 821c       |    |		Call	0x1,0x1c
05fd 681e       |h   |		Jump_Zero	0x61c
05fe 4801       |H   |		Short_Literal	0x1
05ff e5fd       |    |		Load	0x2,-0x3
0600 0092 0bdd  |    |		Action	Push_String_Extended,0xbdd					; "!!"
0602 e01b       |    |		Load	0x0,0x1b
0603 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0604 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0605 00da       |    |		Load_Top	At_Offset_2
0606 6808       |h   |		Jump_Zero	0x60f
0607 e008       |    |		Load	0x0,0x8
0608 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0609 4802       |H   |		Short_Literal	0x2
060a 0092 0bde  |    |		Action	Push_String_Extended,0xbde					; "Remote access is not currently supported"
060c e009       |    |		Load	0x0,0x9
060d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
060e 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
060f 4800       |H   |		Short_Literal	0x0
0610 4800       |H   |		Short_Literal	0x0
0611 00ea       |    |		Load_Encached	Null_String_Cache
0612 e5fe       |    |		Load	0x2,-0x2
0613 e404       |    |		Load	0x2,0x4
0614 8034       | 4  |		Call	0x0,0x34
0615 821e       |    |		Call	0x1,0x1e
0616 e5fa       |    |		Load	0x2,-0x6
0617 e5fb       |    |		Load	0x2,-0x5
0618 e5fc       |    |		Load	0x2,-0x4
0619 e5fd       |    |		Load	0x2,-0x3
061a e5ff       |    |		Load	0x2,-0x1
061b 8212       |    |		Call	0x1,0x12
061c 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
061d 0000 0000  |    |		.XXX[0x3]
061f 0000       |    |
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 064c       | L  |		.CONST	0x064c								; Address of begin
0621 0004       |    |		.CONST	0x0004								; Address of exception handler
0622 0010       |    |		.CONST	0x0010								; Number of locals
0623			INIT_0620:
0623 e012       |    |		Load	0x0,0x12
0624 0337       | 7  |		Declare_Variable	Array
0625 4801       |H   |		Short_Literal	0x1
0626 e004       |    |		Load	0x0,0x4
0627 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0628 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0629 00d8       |    |		Load_Top	At_Offset_0
062a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
062b e013       |    |		Load	0x0,0x13
062c 0007       |    |		Action	Break_Optional
062d 481e       |H   |		Short_Literal	0x1e
062e e004       |    |		Load	0x0,0x4
062f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0630 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0631 00d8       |    |		Load_Top	At_Offset_0
0632 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0633 00e2       |    |		Load_Encached	Integer_Cache
0634 e02a       | *  |		Load	0x0,0x2a
0635 0007       |    |		Action	Break_Optional
0636 481e       |H   |		Short_Literal	0x1e
0637 e004       |    |		Load	0x0,0x4
0638 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0639 1c08       |    |		Execute_Immediate	Run_Utility,0x8
063a 00d8       |    |		Load_Top	At_Offset_0
063b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
063c e014       |    |		Load	0x0,0x14
063d 0007       |    |		Action	Break_Optional
063e e006       |    |		Load	0x0,0x6
063f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0640 02c7       |    |		Declare_Variable	Any
0641 00d8       |    |		Load_Top	At_Offset_0
0642 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0643 00e1       |    |		Load_Encached	Boolean_Cache
0644 03e9       |    |		Declare_Variable	Discrete,Duplicate
0645 03e9       |    |		Declare_Variable	Discrete,Duplicate
0646 e035       | 5  |		Load	0x0,0x35
0647 0322       | "  |		Declare_Variable	Record
0648 e036       | 6  |		Load	0x0,0x36
0649 0007       |    |		Action	Break_Optional
064a e02b       | +  |		Load	0x0,0x2b
064b 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
064c			BODY_0620:
064c e5fc       |    |		Load	0x2,-0x4
064d 0092 0bfa  |    |		Action	Push_String_Extended,0xbfa					; "<quiet>"
064f 01de       |    |		Execute	Vector,Not_Equal
0650 680b       |h   |		Jump_Zero	0x65c
0651 e40a       |    |		Load	0x2,0xa
0652 e5fc       |    |		Load	0x2,-0x4
0653 e008       |    |		Load	0x0,0x8
0654 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0655 c40a       |    |		Store	0x2,0xa
0656 e008       |    |		Load	0x0,0x8
0657 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0658 e40a       |    |		Load	0x2,0xa
0659 e009       |    |		Load	0x0,0x9
065a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
065b 7804       |x   |		Jump	0x660
065c e008       |    |		Load	0x0,0x8
065d 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
065e e008       |    |		Load	0x0,0x8
065f 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0660 821c       |    |		Call	0x1,0x1c
0661 68a7       |h   |		Jump_Zero	0x709
0662 e5ff       |    |		Load	0x2,-0x1
0663 e004       |    |		Load	0x0,0x4
0664 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0665 821d       |    |		Call	0x1,0x1d
0666 70a1       |p   |		Jump_Nonzero	0x708
0667 e5fb       |    |		Load	0x2,-0x5
0668 7091       |p   |		Jump_Nonzero	0x6fa
0669 e408       |    |		Load	0x2,0x8
066a e5fe       |    |		Load	0x2,-0x2
066b e004       |    |		Load	0x0,0x4
066c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
066d 00d1       |    |		Pop_Control	Pop_Count_1
066e e409       |    |		Load	0x2,0x9
066f e404       |    |		Load	0x2,0x4
0670 4801       |H   |		Short_Literal	0x1
0671 4800       |H   |		Short_Literal	0x0
0672 4800       |H   |		Short_Literal	0x0
0673 e5ff       |    |		Load	0x2,-0x1
0674 8037       | 7  |		Call	0x0,0x37
0675 c404       |    |		Store	0x2,0x4
0676 c409       |    |		Store	0x2,0x9
0677 e409       |    |		Load	0x2,0x9
0678 6802       |h   |		Jump_Zero	0x67b
0679 e218       |    |		Load	0x1,0x18
067a 0257       | W  |		Execute	Discrete,Raise
067b 00da       |    |		Load_Top	At_Offset_2
067c 00e1       |    |		Load_Encached	Boolean_Cache
067d 00e1       |    |		Load_Encached	Boolean_Cache
067e 00e1       |    |		Load_Encached	Boolean_Cache
067f 00e2       |    |		Load_Encached	Integer_Cache
0680 e404       |    |		Load	0x2,0x4
0681 8038       | 8  |		Call	0x0,0x38
0682 c406       |    |		Store	0x2,0x6
0683 c40c       |    |		Store	0x2,0xc
0684 c40d       |    |		Store	0x2,0xd
0685 c40b       |    |		Store	0x2,0xb
0686 00d1       |    |		Pop_Control	Pop_Count_1
0687 e5fd       |    |		Load	0x2,-0x3
0688 680a       |h   |		Jump_Zero	0x693
0689 e407       |    |		Load	0x2,0x7
068a e409       |    |		Load	0x2,0x9
068b e406       |    |		Load	0x2,0x6
068c 4801       |H   |		Short_Literal	0x1
068d 4801       |H   |		Short_Literal	0x1
068e e408       |    |		Load	0x2,0x8
068f 8039       | 9  |		Call	0x0,0x39
0690 c409       |    |		Store	0x2,0x9
0691 c407       |    |		Store	0x2,0x7
0692 7809       |x   |		Jump	0x69c
0693 e407       |    |		Load	0x2,0x7
0694 e409       |    |		Load	0x2,0x9
0695 e406       |    |		Load	0x2,0x6
0696 4801       |H   |		Short_Literal	0x1
0697 4802       |H   |		Short_Literal	0x2
0698 e408       |    |		Load	0x2,0x8
0699 8039       | 9  |		Call	0x0,0x39
069a c409       |    |		Store	0x2,0x9
069b c407       |    |		Store	0x2,0x7
069c e409       |    |		Load	0x2,0x9
069d 6802       |h   |		Jump_Zero	0x6a0
069e e218       |    |		Load	0x1,0x18
069f 0257       | W  |		Execute	Discrete,Raise
06a0 e40c       |    |		Load	0x2,0xc
06a1 e407       |    |		Load	0x2,0x7
06a2 0227       | '  |		Execute	Access,All_Reference
06a3 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
06a4 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
06a5 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
06a6 00db       |    |		Load_Top	At_Offset_3
06a7 e407       |    |		Load	0x2,0x7
06a8 0227       | '  |		Execute	Access,All_Reference
06a9 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
06aa 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
06ab 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
06ac e40b       |    |		Load	0x2,0xb
06ad e407       |    |		Load	0x2,0x7
06ae 0227       | '  |		Execute	Access,All_Reference
06af 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
06b0 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
06b1 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06b2 00da       |    |		Load_Top	At_Offset_2
06b3 e407       |    |		Load	0x2,0x7
06b4 0227       | '  |		Execute	Access,All_Reference
06b5 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
06b6 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
06b7 4801       |H   |		Short_Literal	0x1
06b8 e407       |    |		Load	0x2,0x7
06b9 0227       | '  |		Execute	Access,All_Reference
06ba 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
06bb e407       |    |		Load	0x2,0x7
06bc 803a       | :  |		Call	0x0,0x3a
06bd 00cf       |    |		Action	Mark_Auxiliary
06be 782b       |x+  |		Jump	0x6ea
06bf e409       |    |		Load	0x2,0x9
06c0 e402       |    |		Load	0x2,0x2
06c1 e404       |    |		Load	0x2,0x4
06c2 4801       |H   |		Short_Literal	0x1
06c3 803b       | ;  |		Call	0x0,0x3b
06c4 c404       |    |		Store	0x2,0x4
06c5 00d1       |    |		Pop_Control	Pop_Count_1
06c6 c409       |    |		Store	0x2,0x9
06c7 e409       |    |		Load	0x2,0x9
06c8 6802       |h   |		Jump_Zero	0x6cb
06c9 e218       |    |		Load	0x1,0x18
06ca 0257       | W  |		Execute	Discrete,Raise
06cb e409       |    |		Load	0x2,0x9
06cc e402       |    |		Load	0x2,0x2
06cd 4801       |H   |		Short_Literal	0x1
06ce 4801       |H   |		Short_Literal	0x1
06cf e410       |    |		Load	0x2,0x10
06d0 e407       |    |		Load	0x2,0x7
06d1 0227       | '  |		Execute	Access,All_Reference
06d2 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
06d3 e407       |    |		Load	0x2,0x7
06d4 803c       | <  |		Call	0x0,0x3c
06d5 c409       |    |		Store	0x2,0x9
06d6 e409       |    |		Load	0x2,0x9
06d7 6802       |h   |		Jump_Zero	0x6da
06d8 e218       |    |		Load	0x1,0x18
06d9 0257       | W  |		Execute	Discrete,Raise
06da e406       |    |		Load	0x2,0x6
06db 0aff       |    |		Execute_Immediate	Plus,-0x1
06dc c406       |    |		Store	0x2,0x6
06dd e407       |    |		Load	0x2,0x7
06de 0227       | '  |		Execute	Access,All_Reference
06df 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
06e0 0a01       |    |		Execute_Immediate	Plus,0x1
06e1 00d8       |    |		Load_Top	At_Offset_0
06e2 e036       | 6  |		Load	0x0,0x36
06e3 0260       | `  |		Execute	Discrete,In_Type
06e4 7001       |p   |		Jump_Nonzero	0x6e6
06e5 0801       |    |		Execute_Immediate	Raise,0x1
06e6 e407       |    |		Load	0x2,0x7
06e7 0227       | '  |		Execute	Access,All_Reference
06e8 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
06e9 00c9       |    |		Action	Pop_Auxiliary_Loop
06ea e406       |    |		Load	0x2,0x6
06eb 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
06ec 77d2       |w   |		Jump_Nonzero	0x6bf
06ed 00ce       |    |		Action	Pop_Auxiliary
06ee e407       |    |		Load	0x2,0x7
06ef e409       |    |		Load	0x2,0x9
06f0 e403       |    |		Load	0x2,0x3
06f1 4801       |H   |		Short_Literal	0x1
06f2 4800       |H   |		Short_Literal	0x0
06f3 803d       | =  |		Call	0x0,0x3d
06f4 c409       |    |		Store	0x2,0x9
06f5 c407       |    |		Store	0x2,0x7
06f6 e409       |    |		Load	0x2,0x9
06f7 6810       |h   |		Jump_Zero	0x708
06f8 e218       |    |		Load	0x1,0x18
06f9 0257       | W  |		Execute	Discrete,Raise
06fa e008       |    |		Load	0x0,0x8
06fb 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
06fc 4802       |H   |		Short_Literal	0x2
06fd 0092 0bfb  |    |		Action	Push_String_Extended,0xbfb					; "Dfs file "
06ff e5ff       |    |		Load	0x2,-0x1
0700 01cc       |    |		Execute	Vector,Catenate
0701 0092 0bfc  |    |		Action	Push_String_Extended,0xbfc					; " would have been copied to "
0703 01cc       |    |		Execute	Vector,Catenate
0704 e5fe       |    |		Load	0x2,-0x2
0705 01cc       |    |		Execute	Vector,Catenate
0706 e009       |    |		Load	0x0,0x9
0707 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0708 821e       |    |		Call	0x1,0x1e
0709 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
070a 0000 0000  |    |		.BLANK	0000[0x6]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 072e       | .  |		.CONST	0x072e								; Address of begin
0711 0004       |    |		.CONST	0x0004								; Address of exception handler
0712 0007       |    |		.CONST	0x0007								; Number of locals
0713			INIT_0710:
0713 e014       |    |		Load	0x0,0x14
0714 0007       |    |		Action	Break_Optional
0715 4801       |H   |		Short_Literal	0x1
0716 e004       |    |		Load	0x0,0x4
0717 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0718 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0719 00d8       |    |		Load_Top	At_Offset_0
071a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
071b e02a       | *  |		Load	0x0,0x2a
071c 0007       |    |		Action	Break_Optional
071d 481e       |H   |		Short_Literal	0x1e
071e e004       |    |		Load	0x0,0x4
071f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0720 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0721 00d8       |    |		Load_Top	At_Offset_0
0722 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0723 481e       |H   |		Short_Literal	0x1e
0724 e004       |    |		Load	0x0,0x4
0725 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0726 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0727 00d8       |    |		Load_Top	At_Offset_0
0728 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0729 e006       |    |		Load	0x0,0x6
072a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
072b 02c7       |    |		Declare_Variable	Any
072c 00d8       |    |		Load_Top	At_Offset_0
072d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
072e			BODY_0710:
072e e5fd       |    |		Load	0x2,-0x3
072f 0092 0bfa  |    |		Action	Push_String_Extended,0xbfa					; "<quiet>"
0731 01de       |    |		Execute	Vector,Not_Equal
0732 680b       |h   |		Jump_Zero	0x73e
0733 00d8       |    |		Load_Top	At_Offset_0
0734 e5fd       |    |		Load	0x2,-0x3
0735 e008       |    |		Load	0x0,0x8
0736 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0737 c407       |    |		Store	0x2,0x7
0738 e008       |    |		Load	0x0,0x8
0739 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
073a 00d9       |    |		Load_Top	At_Offset_1
073b e009       |    |		Load	0x0,0x9
073c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
073d 7804       |x   |		Jump	0x742
073e e008       |    |		Load	0x0,0x8
073f 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0740 e008       |    |		Load	0x0,0x8
0741 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0742 821c       |    |		Call	0x1,0x1c
0743 6843       |hC  |		Jump_Zero	0x787
0744 e5fc       |    |		Load	0x2,-0x4
0745 7032       |p2  |		Jump_Nonzero	0x778
0746 00da       |    |		Load_Top	At_Offset_2
0747 e5ff       |    |		Load	0x2,-0x1
0748 e004       |    |		Load	0x0,0x4
0749 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
074a 00d1       |    |		Pop_Control	Pop_Count_1
074b 00d9       |    |		Load_Top	At_Offset_1
074c e5fe       |    |		Load	0x2,-0x2
074d e004       |    |		Load	0x0,0x4
074e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
074f 00d1       |    |		Pop_Control	Pop_Count_1
0750 00db       |    |		Load_Top	At_Offset_3
0751 e402       |    |		Load	0x2,0x2
0752 4800       |H   |		Short_Literal	0x0
0753 4801       |H   |		Short_Literal	0x1
0754 4800       |H   |		Short_Literal	0x0
0755 e405       |    |		Load	0x2,0x5
0756 8039       | 9  |		Call	0x0,0x39
0757 c402       |    |		Store	0x2,0x2
0758 c404       |    |		Store	0x2,0x4
0759 e402       |    |		Load	0x2,0x2
075a 6802       |h   |		Jump_Zero	0x75d
075b e21a       |    |		Load	0x1,0x1a
075c 0257       | W  |		Execute	Discrete,Raise
075d 00db       |    |		Load_Top	At_Offset_3
075e e402       |    |		Load	0x2,0x2
075f 00db       |    |		Load_Top	At_Offset_3
0760 4801       |H   |		Short_Literal	0x1
0761 4801       |H   |		Short_Literal	0x1
0762 803d       | =  |		Call	0x0,0x3d
0763 c402       |    |		Store	0x2,0x2
0764 c404       |    |		Store	0x2,0x4
0765 e402       |    |		Load	0x2,0x2
0766 6802       |h   |		Jump_Zero	0x769
0767 e21a       |    |		Load	0x1,0x1a
0768 0257       | W  |		Execute	Discrete,Raise
0769 e008       |    |		Load	0x0,0x8
076a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
076b 4802       |H   |		Short_Literal	0x2
076c 0092 0bfb  |    |		Action	Push_String_Extended,0xbfb					; "Dfs file "
076e e5ff       |    |		Load	0x2,-0x1
076f 01cc       |    |		Execute	Vector,Catenate
0770 0092 0bfd  |    |		Action	Push_String_Extended,0xbfd					; " has been renamed "
0772 01cc       |    |		Execute	Vector,Catenate
0773 e5fe       |    |		Load	0x2,-0x2
0774 01cc       |    |		Execute	Vector,Catenate
0775 e009       |    |		Load	0x0,0x9
0776 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0777 780e       |x   |		Jump	0x786
0778 e008       |    |		Load	0x0,0x8
0779 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
077a 4802       |H   |		Short_Literal	0x2
077b 0092 0bfb  |    |		Action	Push_String_Extended,0xbfb					; "Dfs file "
077d e5ff       |    |		Load	0x2,-0x1
077e 01cc       |    |		Execute	Vector,Catenate
077f 0092 0bfe  |    |		Action	Push_String_Extended,0xbfe					; " would have been renamed "
0781 01cc       |    |		Execute	Vector,Catenate
0782 e5fe       |    |		Load	0x2,-0x2
0783 01cc       |    |		Execute	Vector,Catenate
0784 e009       |    |		Load	0x0,0x9
0785 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0786 821e       |    |		Call	0x1,0x1e
0787 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 07ac       |    |		.CONST	0x07ac								; Address of begin
0789 0845       | E  |		.CONST	0x0845								; Address of exception handler
078a 0009       |    |		.CONST	0x0009								; Number of locals
078b			INIT_0788:
078b 00e2       |    |		Load_Encached	Integer_Cache
078c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
078d e014       |    |		Load	0x0,0x14
078e 0007       |    |		Action	Break_Optional
078f 4801       |H   |		Short_Literal	0x1
0790 e004       |    |		Load	0x0,0x4
0791 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0792 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0793 00d8       |    |		Load_Top	At_Offset_0
0794 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0795 481e       |H   |		Short_Literal	0x1e
0796 e004       |    |		Load	0x0,0x4
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 481e       |H   |		Short_Literal	0x1e
079c e004       |    |		Load	0x0,0x4
079d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
079e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
079f 00d8       |    |		Load_Top	At_Offset_0
07a0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07a1 e02a       | *  |		Load	0x0,0x2a
07a2 0007       |    |		Action	Break_Optional
07a3 e005       |    |		Load	0x0,0x5
07a4 0322       | "  |		Declare_Variable	Record
07a5 00d8       |    |		Load_Top	At_Offset_0
07a6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07a7 e006       |    |		Load	0x0,0x6
07a8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
07a9 02c7       |    |		Declare_Variable	Any
07aa 00d8       |    |		Load_Top	At_Offset_0
07ab 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07ac			BODY_0788:
07ac e5fe       |    |		Load	0x2,-0x2
07ad 0092 0bfa  |    |		Action	Push_String_Extended,0xbfa					; "<quiet>"
07af 01de       |    |		Execute	Vector,Not_Equal
07b0 680b       |h   |		Jump_Zero	0x7bc
07b1 00d8       |    |		Load_Top	At_Offset_0
07b2 e5fe       |    |		Load	0x2,-0x2
07b3 e008       |    |		Load	0x0,0x8
07b4 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
07b5 c409       |    |		Store	0x2,0x9
07b6 e008       |    |		Load	0x0,0x8
07b7 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
07b8 00d9       |    |		Load_Top	At_Offset_1
07b9 e009       |    |		Load	0x0,0x9
07ba 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07bb 7804       |x   |		Jump	0x7c0
07bc e008       |    |		Load	0x0,0x8
07bd 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
07be e008       |    |		Load	0x0,0x8
07bf 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
07c0 821c       |    |		Call	0x1,0x1c
07c1 6882       |h   |		Jump_Zero	0x844
07c2 e405       |    |		Load	0x2,0x5
07c3 e5ff       |    |		Load	0x2,-0x1
07c4 e004       |    |		Load	0x0,0x4
07c5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
07c6 00d1       |    |		Pop_Control	Pop_Count_1
07c7 00d9       |    |		Load_Top	At_Offset_1
07c8 e405       |    |		Load	0x2,0x5
07c9 e004       |    |		Load	0x0,0x4
07ca 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07cb 800c       |    |		Call	0x0,0xc
07cc 00d1       |    |		Pop_Control	Pop_Count_1
07cd 00db       |    |		Load_Top	At_Offset_3
07ce 00da       |    |		Load_Top	At_Offset_2
07cf 800d       |    |		Call	0x0,0xd
07d0 00d2       |    |		Pop_Control	Pop_Count_2
07d1 00cf       |    |		Action	Mark_Auxiliary
07d2 7846       |xF  |		Jump	0x819
07d3 e406       |    |		Load	0x2,0x6
07d4 821d       |    |		Call	0x1,0x1d
07d5 703e       |p>  |		Jump_Nonzero	0x814
07d6 e5fd       |    |		Load	0x2,-0x3
07d7 702b       |p+  |		Jump_Nonzero	0x803
07d8 00db       |    |		Load_Top	At_Offset_3
07d9 e403       |    |		Load	0x2,0x3
07da 4800       |H   |		Short_Literal	0x0
07db 4801       |H   |		Short_Literal	0x1
07dc 4800       |H   |		Short_Literal	0x0
07dd e406       |    |		Load	0x2,0x6
07de 8039       | 9  |		Call	0x0,0x39
07df c403       |    |		Store	0x2,0x3
07e0 c407       |    |		Store	0x2,0x7
07e1 e403       |    |		Load	0x2,0x3
07e2 6802       |h   |		Jump_Zero	0x7e5
07e3 e219       |    |		Load	0x1,0x19
07e4 0257       | W  |		Execute	Discrete,Raise
07e5 00db       |    |		Load_Top	At_Offset_3
07e6 e403       |    |		Load	0x2,0x3
07e7 e404       |    |		Load	0x2,0x4
07e8 4801       |H   |		Short_Literal	0x1
07e9 4802       |H   |		Short_Literal	0x2
07ea 803d       | =  |		Call	0x0,0x3d
07eb c403       |    |		Store	0x2,0x3
07ec c407       |    |		Store	0x2,0x7
07ed e403       |    |		Load	0x2,0x3
07ee 6802       |h   |		Jump_Zero	0x7f1
07ef e219       |    |		Load	0x1,0x19
07f0 0257       | W  |		Execute	Discrete,Raise
07f1 e008       |    |		Load	0x0,0x8
07f2 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
07f3 4802       |H   |		Short_Literal	0x2
07f4 0092 0bfb  |    |		Action	Push_String_Extended,0xbfb					; "Dfs file "
07f6 e406       |    |		Load	0x2,0x6
07f7 e004       |    |		Load	0x0,0x4
07f8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07f9 01cc       |    |		Execute	Vector,Catenate
07fa 0092 0bff  |    |		Action	Push_String_Extended,0xbff					; " has been deleted"
07fc 01cc       |    |		Execute	Vector,Catenate
07fd e009       |    |		Load	0x0,0x9
07fe 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07ff e402       |    |		Load	0x2,0x2
0800 0a01       |    |		Execute_Immediate	Plus,0x1
0801 c402       |    |		Store	0x2,0x2
0802 7811       |x   |		Jump	0x814
0803 e008       |    |		Load	0x0,0x8
0804 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0805 4802       |H   |		Short_Literal	0x2
0806 0092 0bfb  |    |		Action	Push_String_Extended,0xbfb					; "Dfs file "
0808 e406       |    |		Load	0x2,0x6
0809 e004       |    |		Load	0x0,0x4
080a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
080b 01cc       |    |		Execute	Vector,Catenate
080c 0092 0c00  |    |		Action	Push_String_Extended,0xc00					; " would have been deleted"
080e 01cc       |    |		Execute	Vector,Catenate
080f e009       |    |		Load	0x0,0x9
0810 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0811 e402       |    |		Load	0x2,0x2
0812 0a01       |    |		Execute_Immediate	Plus,0x1
0813 c402       |    |		Store	0x2,0x2
0814 e406       |    |		Load	0x2,0x6
0815 00db       |    |		Load_Top	At_Offset_3
0816 800d       |    |		Call	0x0,0xd
0817 00d2       |    |		Pop_Control	Pop_Count_2
0818 00c9       |    |		Action	Pop_Auxiliary_Loop
0819 00da       |    |		Load_Top	At_Offset_2
081a 800e       |    |		Call	0x0,0xe
081b 6fb7       |o   |		Jump_Zero	0x7d3
081c 00ce       |    |		Action	Pop_Auxiliary
081d e402       |    |		Load	0x2,0x2
081e 7008       |p   |		Jump_Nonzero	0x827
081f e008       |    |		Load	0x0,0x8
0820 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0821 4802       |H   |		Short_Literal	0x2
0822 0092 0be5  |    |		Action	Push_String_Extended,0xbe5					; "No matching files found"
0824 e009       |    |		Load	0x0,0x9
0825 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0826 781c       |x   |		Jump	0x843
0827 e402       |    |		Load	0x2,0x2
0828 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0829 6819       |h   |		Jump_Zero	0x843
082a e5fd       |    |		Load	0x2,-0x3
082b 700c       |p   |		Jump_Nonzero	0x838
082c e008       |    |		Load	0x0,0x8
082d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
082e 4802       |H   |		Short_Literal	0x2
082f e402       |    |		Load	0x2,0x2
0830 00e0       |    |		Load_Encached	Standard_Cache
0831 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0832 0092 0c01  |    |		Action	Push_String_Extended,0xc01					; " files have been deleted"
0834 01cc       |    |		Execute	Vector,Catenate
0835 e009       |    |		Load	0x0,0x9
0836 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0837 780b       |x   |		Jump	0x843
0838 e008       |    |		Load	0x0,0x8
0839 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
083a 4802       |H   |		Short_Literal	0x2
083b e402       |    |		Load	0x2,0x2
083c 00e0       |    |		Load_Encached	Standard_Cache
083d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
083e 0092 0c02  |    |		Action	Push_String_Extended,0xc02					; " files would have been deleted"
0840 01cc       |    |		Execute	Vector,Catenate
0841 e009       |    |		Load	0x0,0x9
0842 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0843 821e       |    |		Call	0x1,0x1e
0844 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0845			TRAP_0788:
0845 e219       |    |		Load	0x1,0x19
0846 010f       |    |		Execute	Exception,Equal
0847 680c       |h   |		Jump_Zero	0x854
0848 e008       |    |		Load	0x0,0x8
0849 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
084a 4802       |H   |		Short_Literal	0x2
084b 0092 0c03  |    |		Action	Push_String_Extended,0xc03					; "Unknown error deleting Dfs file "
084d e406       |    |		Load	0x2,0x6
084e e004       |    |		Load	0x0,0x4
084f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0850 01cc       |    |		Execute	Vector,Catenate
0851 e009       |    |		Load	0x0,0x9
0852 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0853 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0854 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0855 0000 0000  |    |		.XXX[0x3]
0857 0000       |    |
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 085b       | [  |		.CONST	0x085b								; Address of begin
0859 087f       |    |		.CONST	0x087f								; Address of exception handler
085a 0001       |    |		.CONST	0x0001								; Number of locals
085b			BODY_0858:
085b			INIT_0858:
085b 0092 0c04  |    |		Action	Push_String_Extended,0xc04					; "11.5.5"
085d 0092 0c05  |    |		Action	Push_String_Extended,0xc05					; "KERNEL"
085f 803e       | >  |		Call	0x0,0x3e
0860 7009       |p   |		Jump_Nonzero	0x86a
0861 e008       |    |		Load	0x0,0x8
0862 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0863 4802       |H   |		Short_Literal	0x2
0864 0092 0c06  |    |		Action	Push_String_Extended,0xc06					; "These tools require the Kernel subsystem to be at Version 11.5.5 or greater"
0866 e009       |    |		Load	0x0,0x9
0867 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0868 4800       |H   |		Short_Literal	0x0
0869 00ca       |    |		Action	Exit_Nullary_Function
086a e03f       | ?  |		Load	0x0,0x3f
086b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
086c 6809       |h   |		Jump_Zero	0x876
086d e217       |    |		Load	0x1,0x17
086e 00ea       |    |		Load_Encached	Null_String_Cache
086f e20d       |    |		Load	0x1,0xd
0870 4801       |H   |		Short_Literal	0x1
0871 e002       |    |		Load	0x0,0x2
0872 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0873 c217       |    |		Store	0x1,0x17
0874 4801       |H   |		Short_Literal	0x1
0875 00ca       |    |		Action	Exit_Nullary_Function
0876 e008       |    |		Load	0x0,0x8
0877 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0878 4807       |H   |		Short_Literal	0x7
0879 0092 0c07  |    |		Action	Push_String_Extended,0xc07					; "Operator privilege required for attempted operation or another install job already exists"
087b e009       |    |		Load	0x0,0x9
087c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
087d 4800       |H   |		Short_Literal	0x0
087e 00ca       |    |		Action	Exit_Nullary_Function
087f			TRAP_0858:
087f 00d8       |    |		Load_Top	At_Offset_0
0880 0107       |    |		Execute	Exception,Get_Name
0881 4920       |I   |		Short_Literal	0x120
0882 492f       |I/  |		Short_Literal	0x12f
0883 0262       | b  |		Execute	Discrete,In_Range
0884 6816       |h   |		Jump_Zero	0x89b
0885 e217       |    |		Load	0x1,0x17
0886 00ea       |    |		Load_Encached	Null_String_Cache
0887 e20d       |    |		Load	0x1,0xd
0888 4801       |H   |		Short_Literal	0x1
0889 e002       |    |		Load	0x0,0x2
088a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
088b c217       |    |		Store	0x1,0x17
088c e217       |    |		Load	0x1,0x17
088d e002       |    |		Load	0x0,0x2
088e 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
088f 6802       |h   |		Jump_Zero	0x892
0890 4801       |H   |		Short_Literal	0x1
0891 00ca       |    |		Action	Exit_Nullary_Function
0892 e008       |    |		Load	0x0,0x8
0893 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0894 4807       |H   |		Short_Literal	0x7
0895 0092 0c07  |    |		Action	Push_String_Extended,0xc07					; "Operator privilege required for attempted operation or another install job already exists"
0897 e009       |    |		Load	0x0,0x9
0898 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0899 4800       |H   |		Short_Literal	0x0
089a 00ca       |    |		Action	Exit_Nullary_Function
089b e008       |    |		Load	0x0,0x8
089c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
089d 4807       |H   |		Short_Literal	0x7
089e 0092 0c07  |    |		Action	Push_String_Extended,0xc07					; "Operator privilege required for attempted operation or another install job already exists"
08a0 e009       |    |		Load	0x0,0x9
08a1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
08a2 4800       |H   |		Short_Literal	0x0
08a3 00ca       |    |		Action	Exit_Nullary_Function
08a4 0000 0000  |    |		.BLANK	0000[0x4]
08a8 ; --------------------------------------------------------------------------------------
08a8 ; SUBPROGRAM
08a8 ; --------------------------------------------------------------------------------------
08a8 08af       |    |		.CONST	0x08af								; Address of begin
08a9 0004       |    |		.CONST	0x0004								; Address of exception handler
08aa 0003       |    |		.CONST	0x0003								; Number of locals
08ab			INIT_08a8:
08ab 0092 0bce  |    |		Action	Push_String_Extended,0xbce					; "DFS_BOOTSTRAP.M200"
08ad 00e1       |    |		Load_Encached	Boolean_Cache
08ae 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
08af			BODY_08a8:
08af e5ff       |    |		Load	0x2,-0x1
08b0 e004       |    |		Load	0x0,0x4
08b1 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
08b2 0f12       |    |		Execute_Immediate	Equal,0x12
08b3 6817       |h   |		Jump_Zero	0x8cb
08b4 4801       |H   |		Short_Literal	0x1
08b5 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
08b6 00cf       |    |		Action	Mark_Auxiliary
08b7 e5ff       |    |		Load	0x2,-0x1
08b8 e004       |    |		Load	0x0,0x4
08b9 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
08ba 4801       |H   |		Short_Literal	0x1
08bb 0263       | c  |		Execute	Discrete,Above_Bound
08bc 700d       |p   |		Jump_Nonzero	0x8ca
08bd 00db       |    |		Load_Top	At_Offset_3
08be 00d9       |    |		Load_Top	At_Offset_1
08bf e402       |    |		Load	0x2,0x2
08c0 01d7       |    |		Execute	Vector,Field_Read
08c1 00da       |    |		Load_Top	At_Offset_2
08c2 e5ff       |    |		Load	0x2,-0x1
08c3 e004       |    |		Load	0x0,0x4
08c4 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
08c5 027f       |    |		Execute	Discrete,Equal
08c6 0279       | y  |		Execute	Discrete,And
08c7 a403       |    |		Store_Unchecked	0x2,0x3
08c8 00c8       |    |		Action	Pop_Auxiliary_Range
08c9 3ff3       |?   |		Loop_Increasing	0x8bd
08ca 00ce       |    |		Action	Pop_Auxiliary
08cb 00d8       |    |		Load_Top	At_Offset_0
08cc 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08cd 0000 0000  |    |		.XXX[0x3]
08cf 0000       |    |
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08d3       |    |		.CONST	0x08d3								; Address of begin
08d1 0004       |    |		.CONST	0x0004								; Address of exception handler
08d2 0001       |    |		.CONST	0x0001								; Number of locals
08d3			BODY_08d0:
08d3			INIT_08d0:
08d3 e217       |    |		Load	0x1,0x17
08d4 e002       |    |		Load	0x0,0x2
08d5 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
08d6 c217       |    |		Store	0x1,0x17
08d7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08d8 ; --------------------------------------------------------------------------------------
08d8 ; SUBPROGRAM
08d8 ; --------------------------------------------------------------------------------------
08d8 08e3       |    |		.CONST	0x08e3								; Address of begin
08d9 0004       |    |		.CONST	0x0004								; Address of exception handler
08da 0002       |    |		.CONST	0x0002								; Number of locals
08db			INIT_08d8:
08db 4801       |H   |		Short_Literal	0x1
08dc 00db       |    |		Load_Top	At_Offset_3
08dd 0092 0c08  |    |		Action	Push_String_Extended,0xc08					; "--"
08df e01b       |    |		Load	0x0,0x1b
08e0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
08e1 00e2       |    |		Load_Encached	Integer_Cache
08e2 03f1       |    |		Declare_Variable	Discrete,With_Value
08e3			BODY_08d8:
08e3 00d8       |    |		Load_Top	At_Offset_0
08e4 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
08e5 680f       |h   |		Jump_Zero	0x8f5
08e6 4820       |H   |		Short_Literal	0x20
08e7 e5ff       |    |		Load	0x2,-0x1
08e8 01dd       |    |		Execute	Vector,First
08e9 00da       |    |		Load_Top	At_Offset_2
08ea 0aff       |    |		Execute_Immediate	Plus,-0x1
08eb 00d8       |    |		Load_Top	At_Offset_0
08ec 00e2       |    |		Load_Encached	Integer_Cache
08ed 0260       | `  |		Execute	Discrete,In_Type
08ee 7001       |p   |		Jump_Nonzero	0x8f0
08ef 0801       |    |		Execute_Immediate	Raise,0x1
08f0 e5ff       |    |		Load	0x2,-0x1
08f1 01cf       |    |		Execute	Vector,Slice_Read
08f2 e01b       |    |		Load	0x0,0x1b
08f3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
08f4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08f5 4820       |H   |		Short_Literal	0x20
08f6 e5ff       |    |		Load	0x2,-0x1
08f7 e01b       |    |		Load	0x0,0x1b
08f8 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
08f9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08fa 0000 0000  |    |		.BLANK	0000[0x6]
0900 ; --------------------------------------------------------------------------------------
0900 ; SUBPROGRAM
0900 ; --------------------------------------------------------------------------------------
0900 0903       |    |		.CONST	0x0903								; Address of begin
0901 0004       |    |		.CONST	0x0004								; Address of exception handler
0902 0001       |    |		.CONST	0x0001								; Number of locals
0903			BODY_0900:
0903			INIT_0900:
0903 00db       |    |		Load_Top	At_Offset_3
0904 e21b       |    |		Load	0x1,0x1b
0905 022f       | /  |		Execute	Access,Equal
0906 7009       |p   |		Jump_Nonzero	0x910
0907 4801       |H   |		Short_Literal	0x1
0908 e5fe       |    |		Load	0x2,-0x2
0909 e5ff       |    |		Load	0x2,-0x1
090a e003       |    |		Load	0x0,0x3
090b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
090c e003       |    |		Load	0x0,0x3
090d 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
090e 0f00       |    |		Execute_Immediate	Equal,0x0
090f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0910 4800       |H   |		Short_Literal	0x0
0911 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0912 0000 0000  |    |		.BLANK	0000[0x6]
0918 ; --------------------------------------------------------------------------------------
0918 ; SUBPROGRAM
0918 ; --------------------------------------------------------------------------------------
0918 091f       |    |		.CONST	0x091f								; Address of begin
0919 0004       |    |		.CONST	0x0004								; Address of exception handler
091a 0002       |    |		.CONST	0x0002								; Number of locals
091b			INIT_0918:
091b 00da       |    |		Load_Top	At_Offset_2
091c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
091d e011       |    |		Load	0x0,0x11
091e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
091f			BODY_0918:
091f 00d8       |    |		Load_Top	At_Offset_0
0920 e5fe       |    |		Load	0x2,-0x2
0921 e032       | 2  |		Load	0x0,0x32
0922 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0923 6805       |h   |		Jump_Zero	0x929
0924 00d8       |    |		Load_Top	At_Offset_0
0925 e5fd       |    |		Load	0x2,-0x3
0926 e032       | 2  |		Load	0x0,0x32
0927 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0928 6804       |h   |		Jump_Zero	0x92d
0929 e5fc       |    |		Load	0x2,-0x4
092a 00d9       |    |		Load_Top	At_Offset_1
092b 8220       |    |		Call	0x1,0x20
092c 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
092d 4801       |H   |		Short_Literal	0x1
092e 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
092f 0000       |    |		.XXX[0x1]
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 0970       | p  |		.CONST	0x0970								; Address of begin
0931 0004       |    |		.CONST	0x0004								; Address of exception handler
0932 0007       |    |		.CONST	0x0007								; Number of locals
0933			INIT_0930:
0933 4801       |H   |		Short_Literal	0x1
0934 4820       |H   |		Short_Literal	0x20
0935 00e9       |    |		Load_Encached	String_Cache
0936 035b       | [  |		Declare_Type	Array,Constrained
0937 0337       | 7  |		Declare_Variable	Array
0938 00d8       |    |		Load_Top	At_Offset_0
0939 0335       | 5  |		Declare_Variable	Array,Duplicate
093a 00cd       |    |		Action	Spare6_Action
093b 4820       |H   |		Short_Literal	0x20
093c 4801       |H   |		Short_Literal	0x1
093d 4820       |H   |		Short_Literal	0x20
093e 00d9       |    |		Load_Top	At_Offset_1
093f e403       |    |		Load	0x2,0x3
0940 01d6       |    |		Execute	Vector,Field_Write
0941 3ffb       |?   |		Loop_Increasing	0x93d
0942 00d9       |    |		Load_Top	At_Offset_1
0943 01d4       |    |		Execute	Vector,Structure_Write
0944 00e1       |    |		Load_Encached	Boolean_Cache
0945 0266       | f  |		Execute	Discrete,Bounds
0946 00e8       |    |		Load_Encached	Character_Cache
0947 02a0       |    |		Declare_Subprogram	Null_Subprogram
0948 4801       |H   |		Short_Literal	0x1
0949 035d       | ]  |		Declare_Type	Array,Defined
094a 00d8       |    |		Load_Top	At_Offset_0
094b 0337       | 7  |		Declare_Variable	Array
094c 00d8       |    |		Load_Top	At_Offset_0
094d 0335       | 5  |		Declare_Variable	Array,Duplicate
094e 00cd       |    |		Action	Spare6_Action
094f 482d       |H-  |		Short_Literal	0x2d
0950 4800       |H   |		Short_Literal	0x0
0951 00da       |    |		Load_Top	At_Offset_2
0952 01d6       |    |		Execute	Vector,Field_Write
0953 484b       |HK  |		Short_Literal	0x4b
0954 4801       |H   |		Short_Literal	0x1
0955 00da       |    |		Load_Top	At_Offset_2
0956 01d6       |    |		Execute	Vector,Field_Write
0957 00d9       |    |		Load_Top	At_Offset_1
0958 01d4       |    |		Execute	Vector,Structure_Write
0959 00e1       |    |		Load_Encached	Boolean_Cache
095a 0266       | f  |		Execute	Discrete,Bounds
095b 00e8       |    |		Load_Encached	Character_Cache
095c 02a0       |    |		Declare_Subprogram	Null_Subprogram
095d 4801       |H   |		Short_Literal	0x1
095e 035d       | ]  |		Declare_Type	Array,Defined
095f 00d8       |    |		Load_Top	At_Offset_0
0960 0337       | 7  |		Declare_Variable	Array
0961 00d8       |    |		Load_Top	At_Offset_0
0962 0335       | 5  |		Declare_Variable	Array,Duplicate
0963 00cd       |    |		Action	Spare6_Action
0964 482d       |H-  |		Short_Literal	0x2d
0965 4800       |H   |		Short_Literal	0x0
0966 00da       |    |		Load_Top	At_Offset_2
0967 01d6       |    |		Execute	Vector,Field_Write
0968 4850       |HP  |		Short_Literal	0x50
0969 4801       |H   |		Short_Literal	0x1
096a 00da       |    |		Load_Top	At_Offset_2
096b 01d6       |    |		Execute	Vector,Field_Write
096c 00d9       |    |		Load_Top	At_Offset_1
096d 01d4       |    |		Execute	Vector,Structure_Write
096e 029f 0bc3  |    |		Declare_Subprogram	INIT_0bc0,For_Call
0970			BODY_0930:
0970 e5fe       |    |		Load	0x2,-0x2
0971 01db       |    |		Execute	Vector,Length
0972 6803       |h   |		Jump_Zero	0x976
0973 e5fe       |    |		Load	0x2,-0x2
0974 e002       |    |		Load	0x0,0x2
0975 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
0976 e5ff       |    |		Load	0x2,-0x1
0977 8040       | @  |		Call	0x0,0x40
0978 6804       |h   |		Jump_Zero	0x97d
0979 482a       |H*  |		Short_Literal	0x2a
097a e002       |    |		Load	0x0,0x2
097b 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
097c 7803       |x   |		Jump	0x980
097d 4820       |H   |		Short_Literal	0x20
097e e002       |    |		Load	0x0,0x2
097f 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
0980 480a       |H   |		Short_Literal	0xa
0981 4805       |H   |		Short_Literal	0x5
0982 e5ff       |    |		Load	0x2,-0x1
0983 8041       | A  |		Call	0x0,0x41
0984 e002       |    |		Load	0x0,0x2
0985 186c       | l  |		Execute	Package,Field_Execute,Field_Number 0x6c
0986 0092 0c09  |    |		Action	Push_String_Extended,0xc09					; ": "
0988 e002       |    |		Load	0x0,0x2
0989 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
098a e5fd       |    |		Load	0x2,-0x3
098b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
098c e011       |    |		Load	0x0,0x11
098d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
098e 4801       |H   |		Short_Literal	0x1
098f e5fd       |    |		Load	0x2,-0x3
0990 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0991 e011       |    |		Load	0x0,0x11
0992 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0993 e402       |    |		Load	0x2,0x2
0994 01ce       |    |		Execute	Vector,Slice_Write
0995 e402       |    |		Load	0x2,0x2
0996 e002       |    |		Load	0x0,0x2
0997 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
0998 480a       |H   |		Short_Literal	0xa
0999 4808       |H   |		Short_Literal	0x8
099a e5fd       |    |		Load	0x2,-0x3
099b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
099c e002       |    |		Load	0x0,0x2
099d 186c       | l  |		Execute	Package,Field_Execute,Field_Number 0x6c
099e 4820       |H   |		Short_Literal	0x20
099f e002       |    |		Load	0x0,0x2
09a0 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
09a1 e5fd       |    |		Load	0x2,-0x3
09a2 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
09a3 8407       |    |		Call	0x2,0x7
09a4 e002       |    |		Load	0x0,0x2
09a5 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
09a6 4820       |H   |		Short_Literal	0x20
09a7 e002       |    |		Load	0x0,0x2
09a8 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
09a9 e5fd       |    |		Load	0x2,-0x3
09aa 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09ab e404       |    |		Load	0x2,0x4
09ac 01d7       |    |		Execute	Vector,Field_Read
09ad e002       |    |		Load	0x0,0x2
09ae 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
09af e5fd       |    |		Load	0x2,-0x3
09b0 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
09b1 00da       |    |		Load_Top	At_Offset_2
09b2 01d7       |    |		Execute	Vector,Field_Read
09b3 e002       |    |		Load	0x0,0x2
09b4 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
09b5 4801       |H   |		Short_Literal	0x1
09b6 e002       |    |		Load	0x0,0x2
09b7 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
09b8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09b9 0000 0000  |    |		.BLANK	0000[0x7]
09c0 ; --------------------------------------------------------------------------------------
09c0 ; SUBPROGRAM
09c0 ; --------------------------------------------------------------------------------------
09c0 09c3       |    |		.CONST	0x09c3								; Address of begin
09c1 0004       |    |		.CONST	0x0004								; Address of exception handler
09c2 0001       |    |		.CONST	0x0001								; Number of locals
09c3			BODY_09c0:
09c3			INIT_09c0:
09c3 00db       |    |		Load_Top	At_Offset_3
09c4 00ea       |    |		Load_Encached	Null_String_Cache
09c5 e5ff       |    |		Load	0x2,-0x1
09c6 8222       | "  |		Call	0x1,0x22
09c7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
09c8 ; --------------------------------------------------------------------------------------
09c8 ; SUBPROGRAM
09c8 ; --------------------------------------------------------------------------------------
09c8 09d3       |    |		.CONST	0x09d3								; Address of begin
09c9 0004       |    |		.CONST	0x0004								; Address of exception handler
09ca 0002       |    |		.CONST	0x0002								; Number of locals
09cb			INIT_09c8:
09cb 4801       |H   |		Short_Literal	0x1
09cc 00db       |    |		Load_Top	At_Offset_3
09cd 0092 0be4  |    |		Action	Push_String_Extended,0xbe4					; "."
09cf e01b       |    |		Load	0x0,0x1b
09d0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
09d1 00e2       |    |		Load_Encached	Integer_Cache
09d2 03f1       |    |		Declare_Variable	Discrete,With_Value
09d3			BODY_09c8:
09d3 00d8       |    |		Load_Top	At_Offset_0
09d4 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
09d5 681c       |h   |		Jump_Zero	0x9f2
09d6 00db       |    |		Load_Top	At_Offset_3
09d7 01dd       |    |		Execute	Vector,First
09d8 00d9       |    |		Load_Top	At_Offset_1
09d9 0aff       |    |		Execute_Immediate	Plus,-0x1
09da 00d8       |    |		Load_Top	At_Offset_0
09db 00e2       |    |		Load_Encached	Integer_Cache
09dc 0260       | `  |		Execute	Discrete,In_Type
09dd 7001       |p   |		Jump_Nonzero	0x9df
09de 0801       |    |		Execute_Immediate	Raise,0x1
09df e5ff       |    |		Load	0x2,-0x1
09e0 01cf       |    |		Execute	Vector,Slice_Read
09e1 0092 0c0a  |    |		Action	Push_String_Extended,0xc0a					; "_"
09e3 01cc       |    |		Execute	Vector,Catenate
09e4 00d9       |    |		Load_Top	At_Offset_1
09e5 0a01       |    |		Execute_Immediate	Plus,0x1
09e6 00d8       |    |		Load_Top	At_Offset_0
09e7 00e2       |    |		Load_Encached	Integer_Cache
09e8 0260       | `  |		Execute	Discrete,In_Type
09e9 7001       |p   |		Jump_Nonzero	0x9eb
09ea 0801       |    |		Execute_Immediate	Raise,0x1
09eb e5ff       |    |		Load	0x2,-0x1
09ec 01dc       |    |		Execute	Vector,Last
09ed e5ff       |    |		Load	0x2,-0x1
09ee 01cf       |    |		Execute	Vector,Slice_Read
09ef 8224       | $  |		Call	0x1,0x24
09f0 01cc       |    |		Execute	Vector,Catenate
09f1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09f2 00db       |    |		Load_Top	At_Offset_3
09f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09f4 0000 0000  |    |		.BLANK	0000[0x4]
09f8 ; --------------------------------------------------------------------------------------
09f8 ; SUBPROGRAM
09f8 ; --------------------------------------------------------------------------------------
09f8 0a11       |    |		.CONST	0x0a11								; Address of begin
09f9 0004       |    |		.CONST	0x0004								; Address of exception handler
09fa 0005       |    |		.CONST	0x0005								; Number of locals
09fb			INIT_09f8:
09fb e410       |    |		Load	0x2,0x10
09fc e002       |    |		Load	0x0,0x2
09fd 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
09fe 821f       |    |		Call	0x1,0x1f
09ff 00d8       |    |		Load_Top	At_Offset_0
0a00 01dd       |    |		Execute	Vector,First
0a01 00e2       |    |		Load_Encached	Integer_Cache
0a02 03f1       |    |		Declare_Variable	Discrete,With_Value
0a03 4801       |H   |		Short_Literal	0x1
0a04 00da       |    |		Load_Top	At_Offset_2
0a05 483a       |H:  |		Short_Literal	0x3a
0a06 e01b       |    |		Load	0x0,0x1b
0a07 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0a08 00e2       |    |		Load_Encached	Integer_Cache
0a09 03f1       |    |		Declare_Variable	Discrete,With_Value
0a0a 4801       |H   |		Short_Literal	0x1
0a0b 00db       |    |		Load_Top	At_Offset_3
0a0c 482f       |H/  |		Short_Literal	0x2f
0a0d e01b       |    |		Load	0x0,0x1b
0a0e 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0a0f 00e2       |    |		Load_Encached	Integer_Cache
0a10 03f1       |    |		Declare_Variable	Discrete,With_Value
0a11			BODY_09f8:
0a11 00db       |    |		Load_Top	At_Offset_3
0a12 0092 0c0b  |    |		Action	Push_String_Extended,0xc0b					; "//"
0a14 01df       |    |		Execute	Vector,Equal
0a15 6808       |h   |		Jump_Zero	0xa1e
0a16 e413       |    |		Load	0x2,0x13
0a17 801c       |    |		Call	0x0,0x1c
0a18 6804       |h   |		Jump_Zero	0xa1d
0a19 e413       |    |		Load	0x2,0x13
0a1a 8024       | $  |		Call	0x0,0x24
0a1b 4801       |H   |		Short_Literal	0x1
0a1c a408       |    |		Store_Unchecked	0x2,0x8
0a1d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a1e 00db       |    |		Load_Top	At_Offset_3
0a1f 01db       |    |		Execute	Vector,Length
0a20 6884       |h   |		Jump_Zero	0xaa5
0a21 00da       |    |		Load_Top	At_Offset_2
0a22 e602       |    |		Load	0x3,0x2
0a23 01d7       |    |		Execute	Vector,Field_Read
0a24 0f2a       | *  |		Execute_Immediate	Equal,0x2a
0a25 a409       |    |		Store_Unchecked	0x2,0x9
0a26 e409       |    |		Load	0x2,0x9
0a27 6803       |h   |		Jump_Zero	0xa2b
0a28 00da       |    |		Load_Top	At_Offset_2
0a29 0a01       |    |		Execute_Immediate	Plus,0x1
0a2a 005b       | [  |		Store_Top	Discrete,At_Offset_3
0a2b 00d8       |    |		Load_Top	At_Offset_0
0a2c 7004       |p   |		Jump_Nonzero	0xa31
0a2d 00db       |    |		Load_Top	At_Offset_3
0a2e 01dc       |    |		Execute	Vector,Last
0a2f 0a01       |    |		Execute_Immediate	Plus,0x1
0a30 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0a31 e405       |    |		Load	0x2,0x5
0a32 00db       |    |		Load_Top	At_Offset_3
0a33 e602       |    |		Load	0x3,0x2
0a34 01dc       |    |		Execute	Vector,Last
0a35 e602       |    |		Load	0x3,0x2
0a36 01cf       |    |		Execute	Vector,Slice_Read
0a37 8017       |    |		Call	0x0,0x17
0a38 e004       |    |		Load	0x0,0x4
0a39 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0a3a 00d1       |    |		Pop_Control	Pop_Count_1
0a3b e404       |    |		Load	0x2,0x4
0a3c 00db       |    |		Load_Top	At_Offset_3
0a3d e602       |    |		Load	0x3,0x2
0a3e 01dc       |    |		Execute	Vector,Last
0a3f e602       |    |		Load	0x3,0x2
0a40 01cf       |    |		Execute	Vector,Slice_Read
0a41 801a       |    |		Call	0x0,0x1a
0a42 e004       |    |		Load	0x0,0x4
0a43 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0a44 00d1       |    |		Pop_Control	Pop_Count_1
0a45 4801       |H   |		Short_Literal	0x1
0a46 4801       |H   |		Short_Literal	0x1
0a47 e404       |    |		Load	0x2,0x4
0a48 e004       |    |		Load	0x0,0x4
0a49 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0a4a 0092 0c0c  |    |		Action	Push_String_Extended,0xc0c					; "?"
0a4c 01df       |    |		Execute	Vector,Equal
0a4d 6806       |h   |		Jump_Zero	0xa54
0a4e e404       |    |		Load	0x2,0x4
0a4f 0092 0c0d  |    |		Action	Push_String_Extended,0xc0d					; "*"
0a51 e004       |    |		Load	0x0,0x4
0a52 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0a53 00d1       |    |		Pop_Control	Pop_Count_1
0a54 e5fb       |    |		Load	0x2,-0x5
0a55 700b       |p   |		Jump_Nonzero	0xa61
0a56 e408       |    |		Load	0x2,0x8
0a57 6809       |h   |		Jump_Zero	0xa61
0a58 e007       |    |		Load	0x0,0x7
0a59 4801       |H   |		Short_Literal	0x1
0a5a e405       |    |		Load	0x2,0x5
0a5b e004       |    |		Load	0x0,0x4
0a5c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a5d 800a       |    |		Call	0x0,0xa
0a5e c413       |    |		Store	0x2,0x13
0a5f 4800       |H   |		Short_Literal	0x0
0a60 a408       |    |		Store_Unchecked	0x2,0x8
0a61 e407       |    |		Load	0x2,0x7
0a62 e404       |    |		Load	0x2,0x4
0a63 e004       |    |		Load	0x0,0x4
0a64 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a65 800c       |    |		Call	0x0,0xc
0a66 00d1       |    |		Pop_Control	Pop_Count_1
0a67 e406       |    |		Load	0x2,0x6
0a68 e407       |    |		Load	0x2,0x7
0a69 800d       |    |		Call	0x0,0xd
0a6a 00d2       |    |		Pop_Control	Pop_Count_2
0a6b 00cf       |    |		Action	Mark_Auxiliary
0a6c 7834       |x4  |		Jump	0xaa1
0a6d e406       |    |		Load	0x2,0x6
0a6e 821d       |    |		Call	0x1,0x1d
0a6f 701e       |p   |		Jump_Nonzero	0xa8e
0a70 e5fb       |    |		Load	0x2,-0x5
0a71 7009       |p   |		Jump_Nonzero	0xa7b
0a72 e40b       |    |		Load	0x2,0xb
0a73 00ea       |    |		Load_Encached	Null_String_Cache
0a74 e413       |    |		Load	0x2,0x13
0a75 e406       |    |		Load	0x2,0x6
0a76 e004       |    |		Load	0x0,0x4
0a77 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a78 800b       |    |		Call	0x0,0xb
0a79 c40b       |    |		Store	0x2,0xb
0a7a 7821       |x!  |		Jump	0xa9c
0a7b e008       |    |		Load	0x0,0x8
0a7c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0a7d 4802       |H   |		Short_Literal	0x2
0a7e 0092 0bfb  |    |		Action	Push_String_Extended,0xbfb					; "Dfs file "
0a80 e406       |    |		Load	0x2,0x6
0a81 e004       |    |		Load	0x0,0x4
0a82 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a83 01cc       |    |		Execute	Vector,Catenate
0a84 0092 0c0e  |    |		Action	Push_String_Extended,0xc0e					; " would be copied to Environment Image Object "
0a86 01cc       |    |		Execute	Vector,Catenate
0a87 e405       |    |		Load	0x2,0x5
0a88 e004       |    |		Load	0x0,0x4
0a89 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a8a 01cc       |    |		Execute	Vector,Catenate
0a8b e009       |    |		Load	0x0,0x9
0a8c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a8d 780e       |x   |		Jump	0xa9c
0a8e e008       |    |		Load	0x0,0x8
0a8f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0a90 4807       |H   |		Short_Literal	0x7
0a91 0092 0c0f  |    |		Action	Push_String_Extended,0xc0f					; "Cannot access "
0a93 e406       |    |		Load	0x2,0x6
0a94 e004       |    |		Load	0x0,0x4
0a95 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a96 01cc       |    |		Execute	Vector,Catenate
0a97 0092 0c10  |    |		Action	Push_String_Extended,0xc10					; " from the environment.  File not written"
0a99 01cc       |    |		Execute	Vector,Catenate
0a9a e009       |    |		Load	0x0,0x9
0a9b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a9c e406       |    |		Load	0x2,0x6
0a9d e407       |    |		Load	0x2,0x7
0a9e 800d       |    |		Call	0x0,0xd
0a9f 00d2       |    |		Pop_Control	Pop_Count_2
0aa0 00c9       |    |		Action	Pop_Auxiliary_Loop
0aa1 e407       |    |		Load	0x2,0x7
0aa2 800e       |    |		Call	0x0,0xe
0aa3 6fc9       |o   |		Jump_Zero	0xa6d
0aa4 00ce       |    |		Action	Pop_Auxiliary
0aa5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0aa6 0000 0000  |    |		.XXX[0x2]
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; SUBPROGRAM
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0aab       |    |		.CONST	0x0aab								; Address of begin
0aa9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aaa 0001       |    |		.CONST	0x0001								; Number of locals
0aab			BODY_0aa8:
0aab			INIT_0aa8:
0aab e7fd       |    |		Load	0x3,-0x3
0aac 70fc       |p   |		Jump_Nonzero	0xba9
0aad e40b       |    |		Load	0x2,0xb
0aae 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0aaf 09f6       |    |		Execute_Immediate	Binary_Scale,-0xa
0ab0 a404       |    |		Store_Unchecked	0x2,0x4
0ab1 e40b       |    |		Load	0x2,0xb
0ab2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0ab3 6108       |a   |		Indirect_Literal	Discrete,0xbbc,{0x00000000, 0x00000400}
0ab4 026f       | o  |		Execute	Discrete,Remainder
0ab5 6803       |h   |		Jump_Zero	0xab9
0ab6 e404       |    |		Load	0x2,0x4
0ab7 0a01       |    |		Execute_Immediate	Plus,0x1
0ab8 c404       |    |		Store	0x2,0x4
0ab9 e40f       |    |		Load	0x2,0xf
0aba e411       |    |		Load	0x2,0x11
0abb e404       |    |		Load	0x2,0x4
0abc 4801       |H   |		Short_Literal	0x1
0abd 4802       |H   |		Short_Literal	0x2
0abe e7ff       |    |		Load	0x3,-0x1
0abf 8039       | 9  |		Call	0x0,0x39
0ac0 c411       |    |		Store	0x2,0x11
0ac1 c40f       |    |		Store	0x2,0xf
0ac2 e411       |    |		Load	0x2,0x11
0ac3 0f06       |    |		Execute_Immediate	Equal,0x6
0ac4 6813       |h   |		Jump_Zero	0xad8
0ac5 00db       |    |		Load_Top	At_Offset_3
0ac6 e7fe       |    |		Load	0x3,-0x2
0ac7 7004       |p   |		Jump_Nonzero	0xacc
0ac8 e40b       |    |		Load	0x2,0xb
0ac9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0aca 0f00       |    |		Execute_Immediate	Equal,0x0
0acb 7801       |x   |		Jump	0xacd
0acc 4800       |H   |		Short_Literal	0x0
0acd 0278       | x  |		Execute	Discrete,Or
0ace 6809       |h   |		Jump_Zero	0xad8
0acf e40f       |    |		Load	0x2,0xf
0ad0 e411       |    |		Load	0x2,0x11
0ad1 e404       |    |		Load	0x2,0x4
0ad2 4801       |H   |		Short_Literal	0x1
0ad3 4801       |H   |		Short_Literal	0x1
0ad4 e7ff       |    |		Load	0x3,-0x1
0ad5 8039       | 9  |		Call	0x0,0x39
0ad6 c411       |    |		Store	0x2,0x11
0ad7 c40f       |    |		Store	0x2,0xf
0ad8 e411       |    |		Load	0x2,0x11
0ad9 70a9       |p   |		Jump_Nonzero	0xb83
0ada e403       |    |		Load	0x2,0x3
0adb 0a01       |    |		Execute_Immediate	Plus,0x1
0adc c403       |    |		Store	0x2,0x3
0add e008       |    |		Load	0x0,0x8
0ade 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0adf 4802       |H   |		Short_Literal	0x2
0ae0 0092 0c11  |    |		Action	Push_String_Extended,0xc11					; "File "
0ae2 e7ff       |    |		Load	0x3,-0x1
0ae3 e004       |    |		Load	0x0,0x4
0ae4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0ae5 01cc       |    |		Execute	Vector,Catenate
0ae6 0092 0c12  |    |		Action	Push_String_Extended,0xc12					; " being written"
0ae8 01cc       |    |		Execute	Vector,Catenate
0ae9 e009       |    |		Load	0x0,0x9
0aea 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0aeb e40b       |    |		Load	0x2,0xb
0aec 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0aed e40f       |    |		Load	0x2,0xf
0aee 0227       | '  |		Execute	Access,All_Reference
0aef 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0af0 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0af1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0af2 e40b       |    |		Load	0x2,0xb
0af3 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0af4 e40f       |    |		Load	0x2,0xf
0af5 0227       | '  |		Execute	Access,All_Reference
0af6 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0af7 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0af8 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0af9 e40f       |    |		Load	0x2,0xf
0afa 0229       | )  |		Execute	Access,All_Read
0afb 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0afc 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0afd 00d8       |    |		Load_Top	At_Offset_0
0afe e40b       |    |		Load	0x2,0xb
0aff 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0b00 8042       | B  |		Call	0x0,0x42
0b01 00d2       |    |		Pop_Control	Pop_Count_2
0b02 4801       |H   |		Short_Literal	0x1
0b03 e40f       |    |		Load	0x2,0xf
0b04 0227       | '  |		Execute	Access,All_Reference
0b05 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0b06 e40f       |    |		Load	0x2,0xf
0b07 803a       | :  |		Call	0x0,0x3a
0b08 e411       |    |		Load	0x2,0x11
0b09 6802       |h   |		Jump_Zero	0xb0c
0b0a e218       |    |		Load	0x1,0x18
0b0b 0257       | W  |		Execute	Discrete,Raise
0b0c 00cf       |    |		Action	Mark_Auxiliary
0b0d 7867       |xg  |		Jump	0xb75
0b0e 00e3       |    |		Load_Encached	Natural_Cache
0b0f e406       |    |		Load	0x2,0x6
0b10 00d8       |    |		Load_Top	At_Offset_0
0b11 01da       |    |		Execute	Vector,Bounds
0b12 e043       | C  |		Load	0x0,0x43
0b13 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0b14 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b15 00d0       |    |		Action	Swap_Control
0b16 00d8       |    |		Load_Top	At_Offset_0
0b17 01dd       |    |		Execute	Vector,First
0b18 00da       |    |		Load_Top	At_Offset_2
0b19 01dd       |    |		Execute	Vector,First
0b1a 0272       | r  |		Execute	Discrete,Minus
0b1b 00da       |    |		Load_Top	At_Offset_2
0b1c 01d9       |    |		Execute	Vector,Reverse_Bounds
0b1d 0263       | c  |		Execute	Discrete,Above_Bound
0b1e 700a       |p   |		Jump_Nonzero	0xb29
0b1f 00d8       |    |		Load_Top	At_Offset_0
0b20 00db       |    |		Load_Top	At_Offset_3
0b21 0273       | s  |		Execute	Discrete,Plus
0b22 e605       |    |		Load	0x3,0x5
0b23 01d7       |    |		Execute	Vector,Field_Read
0b24 00d9       |    |		Load_Top	At_Offset_1
0b25 e604       |    |		Load	0x3,0x4
0b26 01d5       |    |		Execute	Vector,Field_Reference
0b27 0118       |    |		Execute	Any,Write_Unchecked
0b28 3ff6       |?   |		Loop_Increasing	0xb1f
0b29 00d2       |    |		Pop_Control	Pop_Count_2
0b2a e414       |    |		Load	0x2,0x14
0b2b 8044       | D  |		Call	0x0,0x44
0b2c 00d8       |    |		Load_Top	At_Offset_0
0b2d 01db       |    |		Execute	Vector,Length
0b2e e012       |    |		Load	0x0,0x12
0b2f 01db       |    |		Execute	Vector,Length
0b30 027f       |    |		Execute	Discrete,Equal
0b31 7001       |p   |		Jump_Nonzero	0xb33
0b32 08e0       |    |		Execute_Immediate	Raise,0xe0
0b33 e012       |    |		Load	0x0,0x12
0b34 0337       | 7  |		Declare_Variable	Array
0b35 00d0       |    |		Action	Swap_Control
0b36 00d8       |    |		Load_Top	At_Offset_0
0b37 01dd       |    |		Execute	Vector,First
0b38 00da       |    |		Load_Top	At_Offset_2
0b39 01dd       |    |		Execute	Vector,First
0b3a 0272       | r  |		Execute	Discrete,Minus
0b3b 00da       |    |		Load_Top	At_Offset_2
0b3c 01d9       |    |		Execute	Vector,Reverse_Bounds
0b3d 0263       | c  |		Execute	Discrete,Above_Bound
0b3e 700a       |p   |		Jump_Nonzero	0xb49
0b3f 00d8       |    |		Load_Top	At_Offset_0
0b40 00db       |    |		Load_Top	At_Offset_3
0b41 0273       | s  |		Execute	Discrete,Plus
0b42 e605       |    |		Load	0x3,0x5
0b43 01d7       |    |		Execute	Vector,Field_Read
0b44 00d9       |    |		Load_Top	At_Offset_1
0b45 e604       |    |		Load	0x3,0x4
0b46 01d5       |    |		Execute	Vector,Field_Reference
0b47 0118       |    |		Execute	Any,Write_Unchecked
0b48 3ff6       |?   |		Loop_Increasing	0xb3f
0b49 00d2       |    |		Pop_Control	Pop_Count_2
0b4a e406       |    |		Load	0x2,0x6
0b4b 01d4       |    |		Execute	Vector,Structure_Write
0b4c c402       |    |		Store	0x2,0x2
0b4d e402       |    |		Load	0x2,0x2
0b4e 4bff       |K   |		Short_Literal	0x3ff
0b4f 027c       | |  |		Execute	Discrete,Less
0b50 680c       |h   |		Jump_Zero	0xb5d
0b51 00cf       |    |		Action	Mark_Auxiliary
0b52 4bff       |K   |		Short_Literal	0x3ff
0b53 e402       |    |		Load	0x2,0x2
0b54 0263       | c  |		Execute	Discrete,Above_Bound
0b55 7006       |p   |		Jump_Nonzero	0xb5c
0b56 4800       |H   |		Short_Literal	0x0
0b57 00d9       |    |		Load_Top	At_Offset_1
0b58 e406       |    |		Load	0x2,0x6
0b59 01d6       |    |		Execute	Vector,Field_Write
0b5a 00c8       |    |		Action	Pop_Auxiliary_Range
0b5b 3ffa       |?   |		Loop_Increasing	0xb56
0b5c 00ce       |    |		Action	Pop_Auxiliary
0b5d e411       |    |		Load	0x2,0x11
0b5e e406       |    |		Load	0x2,0x6
0b5f 4801       |H   |		Short_Literal	0x1
0b60 4801       |H   |		Short_Literal	0x1
0b61 e410       |    |		Load	0x2,0x10
0b62 e40f       |    |		Load	0x2,0xf
0b63 0227       | '  |		Execute	Access,All_Reference
0b64 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0b65 e40f       |    |		Load	0x2,0xf
0b66 803c       | <  |		Call	0x0,0x3c
0b67 c411       |    |		Store	0x2,0x11
0b68 e40f       |    |		Load	0x2,0xf
0b69 0227       | '  |		Execute	Access,All_Reference
0b6a 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0b6b 0a01       |    |		Execute_Immediate	Plus,0x1
0b6c 00d8       |    |		Load_Top	At_Offset_0
0b6d e036       | 6  |		Load	0x0,0x36
0b6e 0260       | `  |		Execute	Discrete,In_Type
0b6f 7001       |p   |		Jump_Nonzero	0xb71
0b70 0801       |    |		Execute_Immediate	Raise,0x1
0b71 e40f       |    |		Load	0x2,0xf
0b72 0227       | '  |		Execute	Access,All_Reference
0b73 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0b74 00c9       |    |		Action	Pop_Auxiliary_Loop
0b75 e414       |    |		Load	0x2,0x14
0b76 8045       | E  |		Call	0x0,0x45
0b77 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0b78 7795       |w   |		Jump_Nonzero	0xb0e
0b79 00ce       |    |		Action	Pop_Auxiliary
0b7a e40f       |    |		Load	0x2,0xf
0b7b e411       |    |		Load	0x2,0x11
0b7c e7ff       |    |		Load	0x3,-0x1
0b7d 4801       |H   |		Short_Literal	0x1
0b7e 4800       |H   |		Short_Literal	0x0
0b7f 803d       | =  |		Call	0x0,0x3d
0b80 c411       |    |		Store	0x2,0x11
0b81 c40f       |    |		Store	0x2,0xf
0b82 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0b83 e411       |    |		Load	0x2,0x11
0b84 0f06       |    |		Execute_Immediate	Equal,0x6
0b85 680f       |h   |		Jump_Zero	0xb95
0b86 e008       |    |		Load	0x0,0x8
0b87 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0b88 4802       |H   |		Short_Literal	0x2
0b89 0092 0c11  |    |		Action	Push_String_Extended,0xc11					; "File "
0b8b e7ff       |    |		Load	0x3,-0x1
0b8c e004       |    |		Load	0x0,0x4
0b8d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0b8e 01cc       |    |		Execute	Vector,Catenate
0b8f 0092 0c13  |    |		Action	Push_String_Extended,0xc13					; " cannot be over-written"
0b91 01cc       |    |		Execute	Vector,Catenate
0b92 e009       |    |		Load	0x0,0x9
0b93 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0b94 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0b95 e008       |    |		Load	0x0,0x8
0b96 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0b97 4802       |H   |		Short_Literal	0x2
0b98 0092 0c11  |    |		Action	Push_String_Extended,0xc11					; "File "
0b9a e7ff       |    |		Load	0x3,-0x1
0b9b e004       |    |		Load	0x0,0x4
0b9c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0b9d 01cc       |    |		Execute	Vector,Catenate
0b9e 0092 0c14  |    |		Action	Push_String_Extended,0xc14					; " cannot be written, reason = "
0ba0 01cc       |    |		Execute	Vector,Catenate
0ba1 e411       |    |		Load	0x2,0x11
0ba2 e027       | '  |		Load	0x0,0x27
0ba3 011c       |    |		Execute	Any,Convert_Unchecked
0ba4 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0ba5 01cc       |    |		Execute	Vector,Catenate
0ba6 e009       |    |		Load	0x0,0x9
0ba7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0ba8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0ba9 e403       |    |		Load	0x2,0x3
0baa 0a01       |    |		Execute_Immediate	Plus,0x1
0bab c403       |    |		Store	0x2,0x3
0bac e008       |    |		Load	0x0,0x8
0bad 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0bae 4802       |H   |		Short_Literal	0x2
0baf 0092 0c11  |    |		Action	Push_String_Extended,0xc11					; "File "
0bb1 e7ff       |    |		Load	0x3,-0x1
0bb2 e004       |    |		Load	0x0,0x4
0bb3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0bb4 01cc       |    |		Execute	Vector,Catenate
0bb5 0092 0c15  |    |		Action	Push_String_Extended,0xc15					; " would have been written"
0bb7 01cc       |    |		Execute	Vector,Catenate
0bb8 e009       |    |		Load	0x0,0x9
0bb9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0bba 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0bbb 0000       |    |		.XXX[0x1]
0bbc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000400}
0bc0 ; --------------------------------------------------------------------------------------
0bc0 ; SUBPROGRAM
0bc0 ; --------------------------------------------------------------------------------------
0bc0 0bc3       |    |		.CONST	0x0bc3								; Address of begin
0bc1 0004       |    |		.CONST	0x0004								; Address of exception handler
0bc2 0001       |    |		.CONST	0x0001								; Number of locals
0bc3			BODY_0bc0:
0bc3			INIT_0bc0:
0bc3 4800       |H   |		Short_Literal	0x0
0bc4 4801       |H   |		Short_Literal	0x1
0bc5 4803       |H   |		Short_Literal	0x3
0bc6 e7ff       |    |		Load	0x3,-0x1
0bc7 e046       | F  |		Load	0x0,0x46
0bc8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0bc9 e046       | F  |		Load	0x0,0x46
0bca 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0bcb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0bcc ; --------------------------------------------------------------------------------------
0bcc ; STRING TABLE
0bcc ; --------------------------------------------------------------------------------------
0bcc 0096       |    |		.STRTAB	0x0096->0x0c17							; "!Machine.Dfs_Write"
0bcd 00a6       |    |		.STRTAB	0x00a6->0x0c20							; "M200_DFS_BOOTSTRAP.M200"
0bce 00bb       |    |		.STRTAB	0x00bb->0x0c2b							; "DFS_BOOTSTRAP.M200"
0bcf 00cb       |    |		.STRTAB	0x00cb->0x0c34							; "M200_KERNEL_0.M200"
0bd0 00db       |    |		.STRTAB	0x00db->0x0c3d							; "KERNEL_0.M200"
0bd1 00e6       |    |		.STRTAB	0x00e6->0x0c44							; "FS_0.M200"
0bd2 00ed       |    |		.STRTAB	0x00ed->0x0c48							; "RECOVERY.M200"
0bd3 00f8       |    |		.STRTAB	0x00f8->0x0c4f							; "!Machine.Temporary.Backup_Image"
0bd4 0115       |    |		.STRTAB	0x0115->0x0c5e							; "<QUIET>"
0bd5 011a       |    |		.STRTAB	0x011a->0x0c62							; "Error copying required file DFS_BOOTSTRAP.M200. Backup Aborted."
0bd6 0157       | W  |		.STRTAB	0x0157->0x0c81							; "Error copying required file KERNEL_0.M200. Backup Aborted."
0bd7 018f       |    |		.STRTAB	0x018f->0x0c9e							; "Error copying required file FS_0.M200. Backup Aborted"
0bd8 01c2       |    |		.STRTAB	0x01c2->0x0cb9							; "Error copying required file RECOVERY.M200. Backup Aborted"
0bd9 01f9       |    |		.STRTAB	0x01f9->0x0cd5							; "@.M200"
0bda 01fd       |    |		.STRTAB	0x01fd->0x0cd8							; "Error copying file "
0bdb 020e       |    |		.STRTAB	0x020e->0x0ce2							; ". Aborting backup."
0bdc 021e       |    |		.STRTAB	0x021e->0x0ceb							; "@"
0bdd 021d       |    |		.STRTAB	0x021d->0x0ceb							; "!!"
0bde 021d       |    |		.STRTAB	0x021d->0x0cec							; "Remote access is not currently supported"
0bdf 0243       | C  |		.STRTAB	0x0243->0x0d00							; " not copied"
0be0 024c       | L  |		.STRTAB	0x024c->0x0d06							; "Environment file "
0be1 025b       | [  |		.STRTAB	0x025b->0x0d0e							; "would have been written to the Dfs as "
0be2 027f       |    |		.STRTAB	0x027f->0x0d21							; "KERNEL_1.M200"
0be3 028a       |    |		.STRTAB	0x028a->0x0d28							; "KERNEL_2.M200"
0be4 0295       |    |		.STRTAB	0x0295->0x0d2e							; "."
0be5 0294       |    |		.STRTAB	0x0294->0x0d2f							; "No matching files found"
0be6 02a9       |    |		.STRTAB	0x02a9->0x0d3a							; "M400C_KERNEL_0.M200"
0be7 02ba       |    |		.STRTAB	0x02ba->0x0d44							; "M400C_KERNEL_1.M200"
0be8 02cb       |    |		.STRTAB	0x02cb->0x0d4d							; "M400C_KERNEL_2.M200"
0be9 02dc       |    |		.STRTAB	0x02dc->0x0d57							; "M400S_KERNEL_0.M200"
0bea 02ed       |    |		.STRTAB	0x02ed->0x0d60							; "M400S_KERNEL_1.M200"
0beb 02fe       |    |		.STRTAB	0x02fe->0x0d6a							; "M400S_KERNEL_2.M200"
0bec 030f       |    |		.STRTAB	0x030f->0x0d73							; "M300C_KERNEL_0.M200"
0bed 0320       |    |		.STRTAB	0x0320->0x0d7d							; "M300C_KERNEL_1.M200"
0bee 0331       | 1  |		.STRTAB	0x0331->0x0d86							; "M300C_KERNEL_2.M200"
0bef 0342       | B  |		.STRTAB	0x0342->0x0d90							; "M300S_KERNEL_0.M200"
0bf0 0353       | S  |		.STRTAB	0x0353->0x0d99							; "M300S_KERNEL_1.M200"
0bf1 0364       | d  |		.STRTAB	0x0364->0x0da3							; "M300S_KERNEL_2.M200"
0bf2 0375       | u  |		.STRTAB	0x0375->0x0dac							; "M200_KERNEL_1.M200"
0bf3 0385       |    |		.STRTAB	0x0385->0x0db5							; "M200_KERNEL_2.M200"
0bf4 0395       |    |		.STRTAB	0x0395->0x0dbe							; "This Dfs cannot be used on an R1000 model 100"
0bf5 03c0       |    |		.STRTAB	0x03c0->0x0dd5							; "KERNEL_@.M200"
0bf6 03cb       |    |		.STRTAB	0x03cb->0x0ddb							; "TCP_IP_HOST_ID"
0bf7 03d7       |    |		.STRTAB	0x03d7->0x0de2							; "HARDWARE.M200_CONFIG"
0bf8 03e9       |    |		.STRTAB	0x03e9->0x0dec							; " files have been downloaded"
0bf9 0402       |    |		.STRTAB	0x0402->0x0dfa							; " files would have been downloaded"
0bfa 0421       | !  |		.STRTAB	0x0421->0x0e0a							; "<quiet>"
0bfb 0426       | &  |		.STRTAB	0x0426->0x0e0e							; "Dfs file "
0bfc 042d       | -  |		.STRTAB	0x042d->0x0e12							; " would have been copied to "
0bfd 0446       | F  |		.STRTAB	0x0446->0x0e20							; " has been renamed "
0bfe 0456       | V  |		.STRTAB	0x0456->0x0e29							; " would have been renamed "
0bff 046d       | m  |		.STRTAB	0x046d->0x0e35							; " has been deleted"
0c00 047c       | |  |		.STRTAB	0x047c->0x0e3e							; " would have been deleted"
0c01 0492       |    |		.STRTAB	0x0492->0x0e4a							; " files have been deleted"
0c02 04a8       |    |		.STRTAB	0x04a8->0x0e56							; " files would have been deleted"
0c03 04c4       |    |		.STRTAB	0x04c4->0x0e65							; "Unknown error deleting Dfs file "
0c04 04e2       |    |		.STRTAB	0x04e2->0x0e75							; "11.5.5"
0c05 04e6       |    |		.STRTAB	0x04e6->0x0e78							; "KERNEL"
0c06 04ea       |    |		.STRTAB	0x04ea->0x0e7b							; "These tools require the Kernel subsystem to be at Version 11.5.5 or greater"
0c07 0533       | 3  |		.STRTAB	0x0533->0x0ea0							; "Operator privilege required for attempted operation or another install job already exists"
0c08 058a       |    |		.STRTAB	0x058a->0x0ecd							; "--"
0c09 058a       |    |		.STRTAB	0x058a->0x0ece							; ": "
0c0a 058a       |    |		.STRTAB	0x058a->0x0ecf							; "_"
0c0b 0589       |    |		.STRTAB	0x0589->0x0ecf							; "//"
0c0c 0589       |    |		.STRTAB	0x0589->0x0ed0							; "?"
0c0d 0588       |    |		.STRTAB	0x0588->0x0ed1							; "*"
0c0e 0587       |    |		.STRTAB	0x0587->0x0ed1							; " would be copied to Environment Image Object "
0c0f 05b2       |    |		.STRTAB	0x05b2->0x0ee8							; "Cannot access "
0c10 05be       |    |		.STRTAB	0x05be->0x0eef							; " from the environment.  File not written"
0c11 05e4       |    |		.STRTAB	0x05e4->0x0f03							; "File "
0c12 05e7       |    |		.STRTAB	0x05e7->0x0f05							; " being written"
0c13 05f3       |    |		.STRTAB	0x05f3->0x0f0c							; " cannot be over-written"
0c14 0608       |    |		.STRTAB	0x0608->0x0f18							; " cannot be written, reason = "
0c15 0623       | #  |		.STRTAB	0x0623->0x0f26							; " would have been written"
0c16 0639       | 9  |		.STREND 0x0639->0x0f32
0c17 214d 6163  |!Mac|		.STRTAB_STRINGS
0f33 0000 0000  |    |		.BLANK	0000[0x5]
0f38 ; --------------------------------------------------------------------------------------
0f38 ; Debug Table
0f38 ; --------------------------------------------------------------------------------------
0f38 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0x38ce,0x0000,0x0001,0x0000
0f3e 0000 0000  |    |		.BLANK	0000[0xc2]