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

⟦c01b2daa4⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 07d0       |    |		.CONST	0x07d0								; 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 8004       |    |		.CONST	0x8004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0039       | 9  |		.CONST	0x0039								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0010       |    |		.CONST	0x0010								; Number of locals
001b			INIT_0018:
001b 00e3       |    |		Load_Encached	Natural_Cache
001c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
001d 0092 04b1  |    |		Action	Push_String_Extended,0x4b1					; "Public"
001f 0092 04b2  |    |		Action	Push_String_Extended,0x4b2					; "network_public"
0021 0092 04b3  |    |		Action	Push_String_Extended,0x4b3					; "System"
0023 0092 04b4  |    |		Action	Push_String_Extended,0x4b4					; "R"
0025 0092 04b5  |    |		Action	Push_String_Extended,0x4b5					; "RW"
0027 0092 04b6  |    |		Action	Push_String_Extended,0x4b6					; "RC"
0029 0092 04b7  |    |		Action	Push_String_Extended,0x4b7					; "RCOD"
002b 029f 017b  |   {|		Declare_Subprogram	INIT_0178,For_Call
002d 029f 0193  |    |		Declare_Subprogram	INIT_0190,For_Call
002f 029f 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Call
0031 029f 027b  |   {|		Declare_Subprogram	INIT_0278,For_Call
0033 029f 0323  |   #|		Declare_Subprogram	INIT_0320,For_Call
0035 029f 034b  |   K|		Declare_Subprogram	INIT_0348,For_Call
0037 029f 039b  |    |		Declare_Subprogram	INIT_0398,For_Call
0039			BODY_0018:
0039 00ea       |    |		Load_Encached	Null_String_Cache
003a e406       |    |		Load	0x2,0x6
003b e404       |    |		Load	0x2,0x4
003c 0092 04b8  |    |		Action	Push_String_Extended,0x4b8					; "!"
003e 840d       |    |		Call	0x2,0xd
003f 00ea       |    |		Load_Encached	Null_String_Cache
0040 e406       |    |		Load	0x2,0x6
0041 e403       |    |		Load	0x2,0x3
0042 0092 04b8  |    |		Action	Push_String_Extended,0x4b8					; "!"
0044 840d       |    |		Call	0x2,0xd
0045 00ea       |    |		Load_Encached	Null_String_Cache
0046 0092 04b9  |    |		Action	Push_String_Extended,0x4b9					; "r"
0048 0092 04b2  |    |		Action	Push_String_Extended,0x4b2					; "network_public"
004a 0092 04ba  |    |		Action	Push_String_Extended,0x4ba					; "!machine"
004c 840d       |    |		Call	0x2,0xd
004d 00ea       |    |		Load_Encached	Null_String_Cache
004e e406       |    |		Load	0x2,0x6
004f e403       |    |		Load	0x2,0x3
0050 0092 04ba  |    |		Action	Push_String_Extended,0x4ba					; "!machine"
0052 840d       |    |		Call	0x2,0xd
0053 e407       |    |		Load	0x2,0x7
0054 e404       |    |		Load	0x2,0x4
0055 0092 04ba  |    |		Action	Push_String_Extended,0x4ba					; "!machine"
0057 840e       |    |		Call	0x2,0xe
0058 00ea       |    |		Load_Encached	Null_String_Cache
0059 e408       |    |		Load	0x2,0x8
005a e404       |    |		Load	0x2,0x4
005b 0092 04bb  |    |		Action	Push_String_Extended,0x4bb					; "!machine.temporary"
005d 840d       |    |		Call	0x2,0xd
005e 00ea       |    |		Load_Encached	Null_String_Cache
005f e408       |    |		Load	0x2,0x8
0060 e403       |    |		Load	0x2,0x3
0061 0092 04bb  |    |		Action	Push_String_Extended,0x4bb					; "!machine.temporary"
0063 840d       |    |		Call	0x2,0xd
0064 e407       |    |		Load	0x2,0x7
0065 e404       |    |		Load	0x2,0x4
0066 0092 04bb  |    |		Action	Push_String_Extended,0x4bb					; "!machine.temporary"
0068 840e       |    |		Call	0x2,0xe
0069 4801       |H   |		Short_Literal	0x1
006a 0092 04bc  |    |		Action	Push_String_Extended,0x4bc					; "!machine.editor_data"
006c 840f       |    |		Call	0x2,0xf
006d 00ea       |    |		Load_Encached	Null_String_Cache
006e e406       |    |		Load	0x2,0x6
006f e404       |    |		Load	0x2,0x4
0070 0092 04bc  |    |		Action	Push_String_Extended,0x4bc					; "!machine.editor_data"
0072 840d       |    |		Call	0x2,0xd
0073 4801       |H   |		Short_Literal	0x1
0074 0092 04bd  |    |		Action	Push_String_Extended,0x4bd					; "!machine.cg_data"
0076 840f       |    |		Call	0x2,0xf
0077 00ea       |    |		Load_Encached	Null_String_Cache
0078 e406       |    |		Load	0x2,0x6
0079 e404       |    |		Load	0x2,0x4
007a 0092 04bd  |    |		Action	Push_String_Extended,0x4bd					; "!machine.cg_data"
007c 840d       |    |		Call	0x2,0xd
007d 4801       |H   |		Short_Literal	0x1
007e 0092 04be  |    |		Action	Push_String_Extended,0x4be					; "!machine.accounting"
0080 840f       |    |		Call	0x2,0xf
0081 00ea       |    |		Load_Encached	Null_String_Cache
0082 e406       |    |		Load	0x2,0x6
0083 e404       |    |		Load	0x2,0x4
0084 0092 04bf  |    |		Action	Push_String_Extended,0x4bf					; "!machine.machine_name"
0086 840d       |    |		Call	0x2,0xd
0087 00ea       |    |		Load_Encached	Null_String_Cache
0088 e406       |    |		Load	0x2,0x6
0089 e403       |    |		Load	0x2,0x3
008a 0092 04c0  |    |		Action	Push_String_Extended,0x4c0					; "!Machine.machine_name"
008c 840d       |    |		Call	0x2,0xd
008d 00ea       |    |		Load_Encached	Null_String_Cache
008e e407       |    |		Load	0x2,0x7
008f e404       |    |		Load	0x2,0x4
0090 0092 04c1  |    |		Action	Push_String_Extended,0x4c1					; "!Machine.Switch_Definitions"
0092 840d       |    |		Call	0x2,0xd
0093 00ea       |    |		Load_Encached	Null_String_Cache
0094 e407       |    |		Load	0x2,0x7
0095 e403       |    |		Load	0x2,0x3
0096 0092 04c1  |    |		Action	Push_String_Extended,0x4c1					; "!Machine.Switch_Definitions"
0098 840d       |    |		Call	0x2,0xd
0099 00ea       |    |		Load_Encached	Null_String_Cache
009a e408       |    |		Load	0x2,0x8
009b e404       |    |		Load	0x2,0x4
009c 0092 04c2  |    |		Action	Push_String_Extended,0x4c2					; "!machine.error_logs"
009e 840d       |    |		Call	0x2,0xd
009f 00ea       |    |		Load_Encached	Null_String_Cache
00a0 e408       |    |		Load	0x2,0x8
00a1 e403       |    |		Load	0x2,0x3
00a2 0092 04c2  |    |		Action	Push_String_Extended,0x4c2					; "!machine.error_logs"
00a4 840d       |    |		Call	0x2,0xd
00a5 0092 04c3  |    |		Action	Push_String_Extended,0x4c3					; "rw"
00a7 0092 04b2  |    |		Action	Push_String_Extended,0x4b2					; "network_public"
00a9 0092 04c2  |    |		Action	Push_String_Extended,0x4c2					; "!machine.error_logs"
00ab 840e       |    |		Call	0x2,0xe
00ac 0092 04c3  |    |		Action	Push_String_Extended,0x4c3					; "rw"
00ae 0092 04c4  |    |		Action	Push_String_Extended,0x4c4					; "public"
00b0 0092 04c5  |    |		Action	Push_String_Extended,0x4c5					; "!Machine.sims"
00b2 840e       |    |		Call	0x2,0xe
00b3 00ea       |    |		Load_Encached	Null_String_Cache
00b4 e406       |    |		Load	0x2,0x6
00b5 e403       |    |		Load	0x2,0x3
00b6 0092 04c6  |    |		Action	Push_String_Extended,0x4c6					; "!compiler_interface"
00b8 840d       |    |		Call	0x2,0xd
00b9 00ea       |    |		Load_Encached	Null_String_Cache
00ba e406       |    |		Load	0x2,0x6
00bb e404       |    |		Load	0x2,0x4
00bc 0092 04c6  |    |		Action	Push_String_Extended,0x4c6					; "!compiler_interface"
00be 840d       |    |		Call	0x2,0xd
00bf 00ea       |    |		Load_Encached	Null_String_Cache
00c0 e406       |    |		Load	0x2,0x6
00c1 e403       |    |		Load	0x2,0x3
00c2 0092 04c7  |    |		Action	Push_String_Extended,0x4c7					; "!compiler_interface.subsystem_interface"
00c4 840d       |    |		Call	0x2,0xd
00c5 00ea       |    |		Load_Encached	Null_String_Cache
00c6 e406       |    |		Load	0x2,0x6
00c7 e404       |    |		Load	0x2,0x4
00c8 0092 04c7  |    |		Action	Push_String_Extended,0x4c7					; "!compiler_interface.subsystem_interface"
00ca 840d       |    |		Call	0x2,0xd
00cb 00ea       |    |		Load_Encached	Null_String_Cache
00cc 0092 04b4  |    |		Action	Push_String_Extended,0x4b4					; "R"
00ce 0092 04b2  |    |		Action	Push_String_Extended,0x4b2					; "network_public"
00d0 0092 04c8  |    |		Action	Push_String_Extended,0x4c8					; "!machine.tcp_ip_host_id"
00d2 840d       |    |		Call	0x2,0xd
00d3 00ea       |    |		Load_Encached	Null_String_Cache
00d4 0092 04b4  |    |		Action	Push_String_Extended,0x4b4					; "R"
00d6 0092 04b2  |    |		Action	Push_String_Extended,0x4b2					; "network_public"
00d8 0092 04c9  |    |		Action	Push_String_Extended,0x4c9					; "!machine.transport_name_map"
00da 840d       |    |		Call	0x2,0xd
00db 4801       |H   |		Short_Literal	0x1
00dc 0092 04ca  |    |		Action	Push_String_Extended,0x4ca					; "!machine.initialization"
00de 840f       |    |		Call	0x2,0xf
00df 4801       |H   |		Short_Literal	0x1
00e0 0092 04cb  |    |		Action	Push_String_Extended,0x4cb					; "!machine.Initialization.?"
00e2 840f       |    |		Call	0x2,0xf
00e3 4801       |H   |		Short_Literal	0x1
00e4 0092 04cc  |    |		Action	Push_String_Extended,0x4cc					; "!machine.Initialization.rational"
00e6 840f       |    |		Call	0x2,0xf
00e7 4801       |H   |		Short_Literal	0x1
00e8 0092 04cd  |    |		Action	Push_String_Extended,0x4cd					; "!machine.Initialization.rational.?"
00ea 840f       |    |		Call	0x2,0xf
00eb 4801       |H   |		Short_Literal	0x1
00ec 0092 04ce  |    |		Action	Push_String_Extended,0x4ce					; "!machine.Initialization.site"
00ee 840f       |    |		Call	0x2,0xf
00ef 4801       |H   |		Short_Literal	0x1
00f0 0092 04cf  |    |		Action	Push_String_Extended,0x4cf					; "!machine.Initialization.site.?"
00f2 840f       |    |		Call	0x2,0xf
00f3 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "Queue server will not run"
00f5 0092 04b9  |    |		Action	Push_String_Extended,0x4b9					; "r"
00f7 0092 04b2  |    |		Action	Push_String_Extended,0x4b2					; "network_public"
00f9 0092 04ba  |    |		Action	Push_String_Extended,0x4ba					; "!machine"
00fb 840d       |    |		Call	0x2,0xd
00fc 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "Queue server will not run"
00fe e406       |    |		Load	0x2,0x6
00ff e404       |    |		Load	0x2,0x4
0100 0092 04d1  |    |		Action	Push_String_Extended,0x4d1					; "!machine.release"
0102 840d       |    |		Call	0x2,0xd
0103 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "Queue server will not run"
0105 e406       |    |		Load	0x2,0x6
0106 e404       |    |		Load	0x2,0x4
0107 0092 04d2  |    |		Action	Push_String_Extended,0x4d2					; "!machine.release.current"
0109 840d       |    |		Call	0x2,0xd
010a 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "Queue server will not run"
010c e406       |    |		Load	0x2,0x6
010d e404       |    |		Load	0x2,0x4
010e 0092 04d3  |    |		Action	Push_String_Extended,0x4d3					; "!machine.release.current.activity"
0110 840d       |    |		Call	0x2,0xd
0111 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "Queue server will not run"
0113 e406       |    |		Load	0x2,0x6
0114 e404       |    |		Load	0x2,0x4
0115 0092 04d4  |    |		Action	Push_String_Extended,0x4d4					; "!machine.queues"
0117 840d       |    |		Call	0x2,0xd
0118 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "Queue server will not run"
011a e406       |    |		Load	0x2,0x6
011b e404       |    |		Load	0x2,0x4
011c 0092 04d5  |    |		Action	Push_String_Extended,0x4d5					; "!tools"
011e 840d       |    |		Call	0x2,0xd
011f 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "Queue server will not run"
0121 e406       |    |		Load	0x2,0x6
0122 e404       |    |		Load	0x2,0x4
0123 0092 04d6  |    |		Action	Push_String_Extended,0x4d6					; "!tools.rpc_servers"
0125 840d       |    |		Call	0x2,0xd
0126 0092 04d0  |    |		Action	Push_String_Extended,0x4d0					; "Queue server will not run"
0128 e406       |    |		Load	0x2,0x6
0129 e404       |    |		Load	0x2,0x4
012a 0092 04d7  |    |		Action	Push_String_Extended,0x4d7					; "!tools.rpc_servers.??'c(world)"
012c 840d       |    |		Call	0x2,0xd
012d 0092 04d8  |    |		Action	Push_String_Extended,0x4d8					; "cannot send mail"
012f e407       |    |		Load	0x2,0x7
0130 4804       |H   |		Short_Literal	0x4
0131 0092 04d9  |    |		Action	Push_String_Extended,0x4d9					; "!Machine.[Mail,Transfer]??"
0133 840c       |    |		Call	0x2,0xc
0134 0092 04da  |    |		Action	Push_String_Extended,0x4da					; "Mail Distribute_Server cannot run as Network_Public."
0136 e406       |    |		Load	0x2,0x6
0137 e404       |    |		Load	0x2,0x4
0138 0092 04db  |    |		Action	Push_String_Extended,0x4db					; "!Machine.[Transfer,Transfer.Distribute]"
013a 840d       |    |		Call	0x2,0xd
013b 0092 04da  |    |		Action	Push_String_Extended,0x4da					; "Mail Distribute_Server cannot run as Network_Public."
013d e406       |    |		Load	0x2,0x6
013e e404       |    |		Load	0x2,0x4
013f 0092 04dc  |    |		Action	Push_String_Extended,0x4dc					; "!Machine.Transfer.Distribute.[Master,Slaves,Files]"
0141 840d       |    |		Call	0x2,0xd
0142 0092 04da  |    |		Action	Push_String_Extended,0x4da					; "Mail Distribute_Server cannot run as Network_Public."
0144 e407       |    |		Load	0x2,0x7
0145 e404       |    |		Load	0x2,0x4
0146 0092 04dd  |    |		Action	Push_String_Extended,0x4dd					; "!Machine.Transfer.Distribute.Mailbox"
0148 840d       |    |		Call	0x2,0xd
0149 0092 04de  |    |		Action	Push_String_Extended,0x4de					; "this is the standard output for Mail Distribute Server"
014b e407       |    |		Load	0x2,0x7
014c 0092 04b2  |    |		Action	Push_String_Extended,0x4b2					; "network_public"
014e 0092 04df  |    |		Action	Push_String_Extended,0x4df					; "!Machine.Error_Logs.Mail_Distribute_Server@"
0150 840d       |    |		Call	0x2,0xd
0151 8410       |    |		Call	0x2,0x10
0152 e402       |    |		Load	0x2,0x2
0153 7005       |p   |		Jump_Nonzero	0x159
0154 0092 04e0  |    |		Action	Push_String_Extended,0x4e0					; "+++ No problems found."
0156 e002       |    |		Load	0x0,0x2
0157 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0158 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0159 e402       |    |		Load	0x2,0x2
015a 0f01       |    |		Execute_Immediate	Equal,0x1
015b 680c       |h   |		Jump_Zero	0x168
015c 0092 04e1  |    |		Action	Push_String_Extended,0x4e1					; "++*"
015e e402       |    |		Load	0x2,0x2
015f 00e0       |    |		Load_Encached	Standard_Cache
0160 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0161 01cc       |    |		Execute	Vector,Catenate
0162 0092 04e2  |    |		Action	Push_String_Extended,0x4e2					; " problem."
0164 01cc       |    |		Execute	Vector,Catenate
0165 e002       |    |		Load	0x0,0x2
0166 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0167 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0168 0092 04e1  |    |		Action	Push_String_Extended,0x4e1					; "++*"
016a e402       |    |		Load	0x2,0x2
016b 00e0       |    |		Load_Encached	Standard_Cache
016c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
016d 01cc       |    |		Execute	Vector,Catenate
016e 0092 04e3  |    |		Action	Push_String_Extended,0x4e3					; " problems."
0170 01cc       |    |		Execute	Vector,Catenate
0171 e002       |    |		Load	0x0,0x2
0172 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0173 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0174 0000 0000  |    |		.BLANK	0000[0x4]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b       | {  |		.CONST	0x017b								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0001       |    |		.CONST	0x0001								; Number of locals
017b			BODY_0178:
017b			INIT_0178:
017b e7ff       |    |		Load	0x3,-0x1
017c 0b05       |    |		Execute_Immediate	Case_Compare,0x5
017d 7009       |p   |		Jump_Nonzero	0x187
017e 0f04       |    |		Execute_Immediate	Equal,0x4
017f 700b       |p   |		Jump_Nonzero	0x18b
0180 0092 04e4  |    |		Action	Push_String_Extended,0x4e4					; "Group"
0182 e7ff       |    |		Load	0x3,-0x1
0183 00e0       |    |		Load_Encached	Standard_Cache
0184 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0185 01cc       |    |		Execute	Vector,Catenate
0186 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0187 00d1       |    |		Pop_Control	Pop_Count_1
0188 0092 04e5  |    |		Action	Push_String_Extended,0x4e5					; "Spooler"
018a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
018b 0092 04e6  |    |		Action	Push_String_Extended,0x4e6					; "Mailer"
018d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
018e 0000 0000  |    |		.XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 01a1       |    |		.CONST	0x01a1								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0004       |    |		.CONST	0x0004								; Number of locals
0193			INIT_0190:
0193 e7ff       |    |		Load	0x3,-0x1
0194 01da       |    |		Execute	Vector,Bounds
0195 00e9       |    |		Load_Encached	String_Cache
0196 035b       | [  |		Declare_Type	Array,Constrained
0197 0337       | 7  |		Declare_Variable	Array
0198 e7ff       |    |		Load	0x3,-0x1
0199 e602       |    |		Load	0x3,0x2
019a 01d4       |    |		Execute	Vector,Structure_Write
019b 00d8       |    |		Load_Top	At_Offset_0
019c 01dc       |    |		Execute	Vector,Last
019d 00e3       |    |		Load_Encached	Natural_Cache
019e 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
019f 029f 03db  |    |		Declare_Subprogram	INIT_03d8,For_Call
01a1			BODY_0190:
01a1 00cf       |    |		Action	Mark_Auxiliary
01a2 e7fe       |    |		Load	0x3,-0x2
01a3 01d9       |    |		Execute	Vector,Reverse_Bounds
01a4 0263       | c  |		Execute	Discrete,Above_Bound
01a5 7031       |p1  |		Jump_Nonzero	0x1d7
01a6 00d8       |    |		Load_Top	At_Offset_0
01a7 e7fe       |    |		Load	0x3,-0x2
01a8 01d7       |    |		Execute	Vector,Field_Read
01a9 00d8       |    |		Load_Top	At_Offset_0
01aa 4861       |Ha  |		Short_Literal	0x61
01ab 487a       |Hz  |		Short_Literal	0x7a
01ac 0262       | b  |		Execute	Discrete,In_Range
01ad 7009       |p   |		Jump_Nonzero	0x1b7
01ae 4841       |HA  |		Short_Literal	0x41
01af 485a       |HZ  |		Short_Literal	0x5a
01b0 0262       | b  |		Execute	Discrete,In_Range
01b1 7015       |p   |		Jump_Nonzero	0x1c7
01b2 00d8       |    |		Load_Top	At_Offset_0
01b3 e7fe       |    |		Load	0x3,-0x2
01b4 01d7       |    |		Execute	Vector,Field_Read
01b5 8604       |    |		Call	0x3,0x4
01b6 781e       |x   |		Jump	0x1d5
01b7 00d1       |    |		Pop_Control	Pop_Count_1
01b8 00d8       |    |		Load_Top	At_Offset_0
01b9 e7fe       |    |		Load	0x3,-0x2
01ba 01d7       |    |		Execute	Vector,Field_Read
01bb 8604       |    |		Call	0x3,0x4
01bc 00d8       |    |		Load_Top	At_Offset_0
01bd e7fe       |    |		Load	0x3,-0x2
01be 01d7       |    |		Execute	Vector,Field_Read
01bf 0ae0       |    |		Execute_Immediate	Plus,-0x20
01c0 00d8       |    |		Load_Top	At_Offset_0
01c1 00e8       |    |		Load_Encached	Character_Cache
01c2 0260       | `  |		Execute	Discrete,In_Type
01c3 7001       |p   |		Jump_Nonzero	0x1c5
01c4 0801       |    |		Execute_Immediate	Raise,0x1
01c5 8604       |    |		Call	0x3,0x4
01c6 780e       |x   |		Jump	0x1d5
01c7 00d8       |    |		Load_Top	At_Offset_0
01c8 e7fe       |    |		Load	0x3,-0x2
01c9 01d7       |    |		Execute	Vector,Field_Read
01ca 0a20       |    |		Execute_Immediate	Plus,0x20
01cb 00d8       |    |		Load_Top	At_Offset_0
01cc 00e8       |    |		Load_Encached	Character_Cache
01cd 0260       | `  |		Execute	Discrete,In_Type
01ce 7001       |p   |		Jump_Nonzero	0x1d0
01cf 0801       |    |		Execute_Immediate	Raise,0x1
01d0 8604       |    |		Call	0x3,0x4
01d1 00d8       |    |		Load_Top	At_Offset_0
01d2 e7fe       |    |		Load	0x3,-0x2
01d3 01d7       |    |		Execute	Vector,Field_Read
01d4 8604       |    |		Call	0x3,0x4
01d5 00c8       |    |		Action	Pop_Auxiliary_Range
01d6 3fcf       |?   |		Loop_Increasing	0x1a6
01d7 00ce       |    |		Action	Pop_Auxiliary
01d8 e602       |    |		Load	0x3,0x2
01d9 01dd       |    |		Execute	Vector,First
01da e603       |    |		Load	0x3,0x3
01db e602       |    |		Load	0x3,0x2
01dc 01cf       |    |		Execute	Vector,Slice_Read
01dd 00e9       |    |		Load_Encached	String_Cache
01de 01c6       |    |		Execute	Vector,Convert_To_Formal
01df 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01fe       |    |		.CONST	0x01fe								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0008       |    |		.CONST	0x0008								; Number of locals
01e3			INIT_01e0:
01e3 e003       |    |		Load	0x0,0x3
01e4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01e5 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
01e6 02c7       |    |		Declare_Variable	Any
01e7 00d8       |    |		Load_Top	At_Offset_0
01e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e9 e003       |    |		Load	0x0,0x3
01ea 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01eb 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01ec e003       |    |		Load	0x0,0x3
01ed 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ee e003       |    |		Load	0x0,0x3
01ef 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01f0 02ff       |    |		Declare_Variable	Variant_Record
01f1 00d8       |    |		Load_Top	At_Offset_0
01f2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01f3 e004       |    |		Load	0x0,0x4
01f4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01f5 0337       | 7  |		Declare_Variable	Array
01f6 e004       |    |		Load	0x0,0x4
01f7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
01f8 e606       |    |		Load	0x3,0x6
01f9 01d4       |    |		Execute	Vector,Structure_Write
01fa 029f 040b  |    |		Declare_Subprogram	INIT_0408,For_Call
01fc 029f 0443  |   C|		Declare_Subprogram	INIT_0440,For_Call
01fe			BODY_01e0:
01fe e003       |    |		Load	0x0,0x3
01ff 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0200 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0201 e602       |    |		Load	0x3,0x2
0202 606d       |`m  |		Indirect_Literal	Discrete,0x270,{0x00000000, 0x00004000}
0203 e005       |    |		Load	0x0,0x5
0204 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0205 e006       |    |		Load	0x0,0x6
0206 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0207 e007       |    |		Load	0x0,0x7
0208 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0209 4801       |H   |		Short_Literal	0x1
020a 4800       |H   |		Short_Literal	0x0
020b e006       |    |		Load	0x0,0x6
020c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
020d e003       |    |		Load	0x0,0x3
020e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
020f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0210 e7ff       |    |		Load	0x3,-0x1
0211 e003       |    |		Load	0x0,0x3
0212 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0213 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0214 c602       |    |		Store	0x3,0x2
0215 c603       |    |		Store	0x3,0x3
0216 e603       |    |		Load	0x3,0x3
0217 7035       |p5  |		Jump_Nonzero	0x24d
0218 4801       |H   |		Short_Literal	0x1
0219 e7fe       |    |		Load	0x3,-0x2
021a e606       |    |		Load	0x3,0x6
021b 01d6       |    |		Execute	Vector,Field_Write
021c 4801       |H   |		Short_Literal	0x1
021d 4800       |H   |		Short_Literal	0x0
021e e606       |    |		Load	0x3,0x6
021f 01d6       |    |		Execute	Vector,Field_Write
0220 4801       |H   |		Short_Literal	0x1
0221 4801       |H   |		Short_Literal	0x1
0222 e606       |    |		Load	0x3,0x6
0223 01d6       |    |		Execute	Vector,Field_Write
0224 00cf       |    |		Action	Mark_Auxiliary
0225 7820       |x   |		Jump	0x246
0226 e003       |    |		Load	0x0,0x3
0227 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0228 e605       |    |		Load	0x3,0x5
0229 6046       |`F  |		Indirect_Literal	Discrete,0x270,{0x00000000, 0x00004000}
022a e005       |    |		Load	0x0,0x5
022b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
022c e602       |    |		Load	0x3,0x2
022d e003       |    |		Load	0x0,0x3
022e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
022f 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0230 00d1       |    |		Pop_Control	Pop_Count_1
0231 c604       |    |		Store	0x3,0x4
0232 e604       |    |		Load	0x3,0x4
0233 7002       |p   |		Jump_Nonzero	0x236
0234 8608       |    |		Call	0x3,0x8
0235 780a       |x   |		Jump	0x240
0236 0092 04e7  |    |		Action	Push_String_Extended,0x4e7					; "*** Directory error getting object from iterator: "
0238 e604       |    |		Load	0x3,0x4
0239 e003       |    |		Load	0x0,0x3
023a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
023b 011c       |    |		Execute	Any,Convert_Unchecked
023c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
023d 01cc       |    |		Execute	Vector,Catenate
023e e002       |    |		Load	0x0,0x2
023f 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0240 e602       |    |		Load	0x3,0x2
0241 e003       |    |		Load	0x0,0x3
0242 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0243 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0244 c602       |    |		Store	0x3,0x2
0245 00c9       |    |		Action	Pop_Auxiliary_Loop
0246 e602       |    |		Load	0x3,0x2
0247 e003       |    |		Load	0x0,0x3
0248 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0249 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
024a 6fdb       |o   |		Jump_Zero	0x226
024b 00ce       |    |		Action	Pop_Auxiliary
024c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
024d e603       |    |		Load	0x3,0x3
024e 0f03       |    |		Execute_Immediate	Equal,0x3
024f 680a       |h   |		Jump_Zero	0x25a
0250 0092 04e8  |    |		Action	Push_String_Extended,0x4e8					; "!!! \x22"
0252 e7ff       |    |		Load	0x3,-0x1
0253 01cc       |    |		Execute	Vector,Catenate
0254 0092 04e9  |    |		Action	Push_String_Extended,0x4e9					; "\x22 is undefined."
0256 01cc       |    |		Execute	Vector,Catenate
0257 e002       |    |		Load	0x0,0x2
0258 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0259 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
025a 0092 04ea  |    |		Action	Push_String_Extended,0x4ea					; "*** \x22"
025c e7ff       |    |		Load	0x3,-0x1
025d 01cc       |    |		Execute	Vector,Catenate
025e 0092 04eb  |    |		Action	Push_String_Extended,0x4eb					; "\x22 cannot be resolved ("
0260 01cc       |    |		Execute	Vector,Catenate
0261 e603       |    |		Load	0x3,0x3
0262 e003       |    |		Load	0x0,0x3
0263 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0264 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0265 011c       |    |		Execute	Any,Convert_Unchecked
0266 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0267 01cc       |    |		Execute	Vector,Catenate
0268 0092 04ec  |    |		Action	Push_String_Extended,0x4ec					; ")"
026a 01cc       |    |		Execute	Vector,Catenate
026b e002       |    |		Load	0x0,0x2
026c 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
026d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
026e 0000 0000  |    |		.XXX[0x2]
0270 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0274 0000 0000  |    |		.BLANK	0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 028c       |    |		.CONST	0x028c								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0006       |    |		.CONST	0x0006								; Number of locals
027b			INIT_0278:
027b 00e1       |    |		Load_Encached	Boolean_Cache
027c e003       |    |		Load	0x0,0x3
027d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
027e 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
027f 02c7       |    |		Declare_Variable	Any
0280 00d8       |    |		Load_Top	At_Offset_0
0281 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0282 e003       |    |		Load	0x0,0x3
0283 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0284 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0285 e003       |    |		Load	0x0,0x3
0286 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0287 e003       |    |		Load	0x0,0x3
0288 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0289 02c7       |    |		Declare_Variable	Any
028a 00d8       |    |		Load_Top	At_Offset_0
028b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028c			BODY_0278:
028c e003       |    |		Load	0x0,0x3
028d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
028e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
028f e603       |    |		Load	0x3,0x3
0290 67df       |g   |		Indirect_Literal	Discrete,0x270,{0x00000000, 0x00004000}
0291 e005       |    |		Load	0x0,0x5
0292 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0293 e006       |    |		Load	0x0,0x6
0294 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0295 e007       |    |		Load	0x0,0x7
0296 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0297 4801       |H   |		Short_Literal	0x1
0298 4800       |H   |		Short_Literal	0x0
0299 e006       |    |		Load	0x0,0x6
029a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
029b e003       |    |		Load	0x0,0x3
029c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
029d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
029e e7ff       |    |		Load	0x3,-0x1
029f e003       |    |		Load	0x0,0x3
02a0 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02a1 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02a2 c603       |    |		Store	0x3,0x3
02a3 c604       |    |		Store	0x3,0x4
02a4 e604       |    |		Load	0x3,0x4
02a5 7055       |pU  |		Jump_Nonzero	0x2fb
02a6 00cf       |    |		Action	Mark_Auxiliary
02a7 784c       |xL  |		Jump	0x2f4
02a8 e003       |    |		Load	0x0,0x3
02a9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02aa e606       |    |		Load	0x3,0x6
02ab 0120       |    |		Execute	Any,Is_Value
02ac 6803       |h   |		Jump_Zero	0x2b0
02ad e003       |    |		Load	0x0,0x3
02ae 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02af 7801       |x   |		Jump	0x2b1
02b0 e606       |    |		Load	0x3,0x6
02b1 e603       |    |		Load	0x3,0x3
02b2 e003       |    |		Load	0x0,0x3
02b3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02b4 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02b5 c606       |    |		Store	0x3,0x6
02b6 c605       |    |		Store	0x3,0x5
02b7 e605       |    |		Load	0x3,0x5
02b8 702b       |p+  |		Jump_Nonzero	0x2e4
02b9 e7fd       |    |		Load	0x3,-0x3
02ba e606       |    |		Load	0x3,0x6
02bb e003       |    |		Load	0x0,0x3
02bc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02bd 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
02be e7fe       |    |		Load	0x3,-0x2
02bf e008       |    |		Load	0x0,0x8
02c0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02c1 a602       |    |		Store_Unchecked	0x3,0x2
02c2 e602       |    |		Load	0x3,0x2
02c3 702a       |p*  |		Jump_Nonzero	0x2ee
02c4 e402       |    |		Load	0x2,0x2
02c5 0a01       |    |		Execute_Immediate	Plus,0x1
02c6 c402       |    |		Store	0x2,0x2
02c7 0092 04ed  |    |		Action	Push_String_Extended,0x4ed					; "*** "
02c9 e7fe       |    |		Load	0x3,-0x2
02ca 01cc       |    |		Execute	Vector,Catenate
02cb 0092 04ee  |    |		Action	Push_String_Extended,0x4ee					; " does not have "
02cd 01cc       |    |		Execute	Vector,Catenate
02ce e7fd       |    |		Load	0x3,-0x3
02cf 01cc       |    |		Execute	Vector,Catenate
02d0 0092 04ef  |    |		Action	Push_String_Extended,0x4ef					; " access to "
02d2 01cc       |    |		Execute	Vector,Catenate
02d3 e606       |    |		Load	0x3,0x6
02d4 e003       |    |		Load	0x0,0x3
02d5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02d6 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
02d7 01cc       |    |		Execute	Vector,Catenate
02d8 e002       |    |		Load	0x0,0x2
02d9 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
02da e7fc       |    |		Load	0x3,-0x4
02db 01db       |    |		Execute	Vector,Length
02dc 6811       |h   |		Jump_Zero	0x2ee
02dd 0092 04f0  |    |		Action	Push_String_Extended,0x4f0					; "--- "
02df e7fc       |    |		Load	0x3,-0x4
02e0 01cc       |    |		Execute	Vector,Catenate
02e1 e002       |    |		Load	0x0,0x2
02e2 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
02e3 780a       |x   |		Jump	0x2ee
02e4 0092 04e7  |    |		Action	Push_String_Extended,0x4e7					; "*** Directory error getting object from iterator: "
02e6 e605       |    |		Load	0x3,0x5
02e7 e003       |    |		Load	0x0,0x3
02e8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02e9 011c       |    |		Execute	Any,Convert_Unchecked
02ea 1c01       |    |		Execute_Immediate	Run_Utility,0x1
02eb 01cc       |    |		Execute	Vector,Catenate
02ec e002       |    |		Load	0x0,0x2
02ed 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
02ee e603       |    |		Load	0x3,0x3
02ef e003       |    |		Load	0x0,0x3
02f0 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02f1 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02f2 c603       |    |		Store	0x3,0x3
02f3 00c9       |    |		Action	Pop_Auxiliary_Loop
02f4 e603       |    |		Load	0x3,0x3
02f5 e003       |    |		Load	0x0,0x3
02f6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02f7 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
02f8 6faf       |o   |		Jump_Zero	0x2a8
02f9 00ce       |    |		Action	Pop_Auxiliary
02fa 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02fb e604       |    |		Load	0x3,0x4
02fc 0f03       |    |		Execute_Immediate	Equal,0x3
02fd 680a       |h   |		Jump_Zero	0x308
02fe 0092 04e8  |    |		Action	Push_String_Extended,0x4e8					; "!!! \x22"
0300 e7ff       |    |		Load	0x3,-0x1
0301 01cc       |    |		Execute	Vector,Catenate
0302 0092 04e9  |    |		Action	Push_String_Extended,0x4e9					; "\x22 is undefined."
0304 01cc       |    |		Execute	Vector,Catenate
0305 e002       |    |		Load	0x0,0x2
0306 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0307 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0308 0092 04ea  |    |		Action	Push_String_Extended,0x4ea					; "*** \x22"
030a e7ff       |    |		Load	0x3,-0x1
030b 01cc       |    |		Execute	Vector,Catenate
030c 0092 04eb  |    |		Action	Push_String_Extended,0x4eb					; "\x22 cannot be resolved ("
030e 01cc       |    |		Execute	Vector,Catenate
030f e604       |    |		Load	0x3,0x4
0310 e003       |    |		Load	0x0,0x3
0311 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0312 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0313 011c       |    |		Execute	Any,Convert_Unchecked
0314 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0315 01cc       |    |		Execute	Vector,Catenate
0316 0092 04ec  |    |		Action	Push_String_Extended,0x4ec					; ")"
0318 01cc       |    |		Execute	Vector,Catenate
0319 e002       |    |		Load	0x0,0x2
031a 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
031b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
031c 0000 0000  |    |		.BLANK	0000[0x4]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0324       | $  |		.CONST	0x0324								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0002       |    |		.CONST	0x0002								; Number of locals
0323			INIT_0320:
0323 00e1       |    |		Load_Encached	Boolean_Cache
0324			BODY_0320:
0324 e7fe       |    |		Load	0x3,-0x2
0325 e7fd       |    |		Load	0x3,-0x3
0326 e7ff       |    |		Load	0x3,-0x1
0327 e008       |    |		Load	0x0,0x8
0328 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0329 e008       |    |		Load	0x0,0x8
032a 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
032b a602       |    |		Store_Unchecked	0x3,0x2
032c 00d8       |    |		Load_Top	At_Offset_0
032d 7013       |p   |		Jump_Nonzero	0x341
032e e402       |    |		Load	0x2,0x2
032f 0a01       |    |		Execute_Immediate	Plus,0x1
0330 c402       |    |		Store	0x2,0x2
0331 0092 04ed  |    |		Action	Push_String_Extended,0x4ed					; "*** "
0333 e7fe       |    |		Load	0x3,-0x2
0334 01cc       |    |		Execute	Vector,Catenate
0335 0092 04ee  |    |		Action	Push_String_Extended,0x4ee					; " does not have "
0337 01cc       |    |		Execute	Vector,Catenate
0338 e7fd       |    |		Load	0x3,-0x3
0339 01cc       |    |		Execute	Vector,Catenate
033a 0092 04f1  |    |		Action	Push_String_Extended,0x4f1					; " default access to "
033c 01cc       |    |		Execute	Vector,Catenate
033d e7ff       |    |		Load	0x3,-0x1
033e 01cc       |    |		Execute	Vector,Catenate
033f e002       |    |		Load	0x0,0x2
0340 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0341 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0342 0000 0000  |    |		.BLANK	0000[0x6]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0353       | S  |		.CONST	0x0353								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0003       |    |		.CONST	0x0003								; Number of locals
034b			INIT_0348:
034b e003       |    |		Load	0x0,0x3
034c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
034d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
034e e003       |    |		Load	0x0,0x3
034f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0350 02ff       |    |		Declare_Variable	Variant_Record
0351 00d8       |    |		Load_Top	At_Offset_0
0352 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0353			BODY_0348:
0353 e003       |    |		Load	0x0,0x3
0354 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0355 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0356 e603       |    |		Load	0x3,0x3
0357 603c       |`<  |		Indirect_Literal	Discrete,0x394,{0x00000000, 0x00004000}
0358 e005       |    |		Load	0x0,0x5
0359 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
035a 4800       |H   |		Short_Literal	0x0
035b e006       |    |		Load	0x0,0x6
035c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
035d e003       |    |		Load	0x0,0x3
035e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
035f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0360 e7ff       |    |		Load	0x3,-0x1
0361 e003       |    |		Load	0x0,0x3
0362 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0363 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0364 00d1       |    |		Pop_Control	Pop_Count_1
0365 c602       |    |		Store	0x3,0x2
0366 e005       |    |		Load	0x0,0x5
0367 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0368 e7fe       |    |		Load	0x3,-0x2
0369 e603       |    |		Load	0x3,0x3
036a e004       |    |		Load	0x0,0x4
036b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
036c 0337       | 7  |		Declare_Variable	Array
036d 4801       |H   |		Short_Literal	0x1
036e 4806       |H   |		Short_Literal	0x6
036f e607       |    |		Load	0x3,0x7
0370 01d6       |    |		Execute	Vector,Field_Write
0371 4805       |H   |		Short_Literal	0x5
0372 4800       |H   |		Short_Literal	0x0
0373 4800       |H   |		Short_Literal	0x0
0374 e609       |    |		Load	0x3,0x9
0375 e607       |    |		Load	0x3,0x7
0376 01d6       |    |		Execute	Vector,Field_Write
0377 3ffb       |?   |		Loop_Increasing	0x373
0378 4bff       |K   |		Short_Literal	0x3ff
0379 4807       |H   |		Short_Literal	0x7
037a 4800       |H   |		Short_Literal	0x0
037b e609       |    |		Load	0x3,0x9
037c e607       |    |		Load	0x3,0x7
037d 01d6       |    |		Execute	Vector,Field_Write
037e 3ffb       |?   |		Loop_Increasing	0x37a
037f e004       |    |		Load	0x0,0x4
0380 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0381 01c3       |    |		Execute	Vector,Check_In_Type
0382 e009       |    |		Load	0x0,0x9
0383 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0384 700c       |p   |		Jump_Nonzero	0x391
0385 e402       |    |		Load	0x2,0x2
0386 0a01       |    |		Execute_Immediate	Plus,0x1
0387 c402       |    |		Store	0x2,0x2
0388 0092 04f2  |    |		Action	Push_String_Extended,0x4f2					; "*** System does not have required access to "
038a e603       |    |		Load	0x3,0x3
038b e003       |    |		Load	0x0,0x3
038c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
038d 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
038e 01cc       |    |		Execute	Vector,Catenate
038f e002       |    |		Load	0x0,0x2
0390 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0391 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0392 0000 0000  |    |		.XXX[0x2]
0394 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03a6       |    |		.CONST	0x03a6								; Address of begin
0399 0004       |    |		.CONST	0x0004								; Address of exception handler
039a 0004       |    |		.CONST	0x0004								; Number of locals
039b			INIT_0398:
039b e003       |    |		Load	0x0,0x3
039c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
039d 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
039e 02c7       |    |		Declare_Variable	Any
039f 00d8       |    |		Load_Top	At_Offset_0
03a0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03a1 e003       |    |		Load	0x0,0x3
03a2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03a3 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03a4 029f 047b  |   {|		Declare_Subprogram	INIT_0478,For_Call
03a6			BODY_0398:
03a6 e003       |    |		Load	0x0,0x3
03a7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03a8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03a9 e602       |    |		Load	0x3,0x2
03aa 67e9       |g   |		Indirect_Literal	Discrete,0x394,{0x00000000, 0x00004000}
03ab e005       |    |		Load	0x0,0x5
03ac 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03ad e006       |    |		Load	0x0,0x6
03ae 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03af e007       |    |		Load	0x0,0x7
03b0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03b1 4801       |H   |		Short_Literal	0x1
03b2 4800       |H   |		Short_Literal	0x0
03b3 e006       |    |		Load	0x0,0x6
03b4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03b5 e003       |    |		Load	0x0,0x3
03b6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03b7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03b8 0092 04f3  |    |		Action	Push_String_Extended,0x4f3					; "!Users.@.Mailbox.Main_Set"
03ba e003       |    |		Load	0x0,0x3
03bb 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03bc 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03bd c602       |    |		Store	0x3,0x2
03be c603       |    |		Store	0x3,0x3
03bf e603       |    |		Load	0x3,0x3
03c0 7016       |p   |		Jump_Nonzero	0x3d7
03c1 0092 04f4  |    |		Action	Push_String_Extended,0x4f4					; "cannot deliver mail"
03c3 e406       |    |		Load	0x2,0x6
03c4 4804       |H   |		Short_Literal	0x4
03c5 0092 04f5  |    |		Action	Push_String_Extended,0x4f5					; "!Users'c(world)"
03c7 840c       |    |		Call	0x2,0xc
03c8 00cf       |    |		Action	Mark_Auxiliary
03c9 7807       |x   |		Jump	0x3d1
03ca 8604       |    |		Call	0x3,0x4
03cb e602       |    |		Load	0x3,0x2
03cc e003       |    |		Load	0x0,0x3
03cd 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03ce 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03cf c602       |    |		Store	0x3,0x2
03d0 00c9       |    |		Action	Pop_Auxiliary_Loop
03d1 e602       |    |		Load	0x3,0x2
03d2 e003       |    |		Load	0x0,0x3
03d3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03d4 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
03d5 6ff4       |o   |		Jump_Zero	0x3ca
03d6 00ce       |    |		Action	Pop_Auxiliary
03d7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03df       |    |		.CONST	0x03df								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0002       |    |		.CONST	0x0002								; Number of locals
03db			INIT_03d8:
03db e602       |    |		Load	0x3,0x2
03dc 01dd       |    |		Execute	Vector,First
03dd 00e3       |    |		Load_Encached	Natural_Cache
03de 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
03df			BODY_03d8:
03df 00cf       |    |		Action	Mark_Auxiliary
03e0 7821       |x!  |		Jump	0x402
03e1 e802       |    |		Load	0x4,0x2
03e2 e602       |    |		Load	0x3,0x2
03e3 01d7       |    |		Execute	Vector,Field_Read
03e4 e9ff       |    |		Load	0x4,-0x1
03e5 027f       |    |		Execute	Discrete,Equal
03e6 6817       |h   |		Jump_Zero	0x3fe
03e7 e802       |    |		Load	0x4,0x2
03e8 e603       |    |		Load	0x3,0x3
03e9 027c       | |  |		Execute	Discrete,Less
03ea 680f       |h   |		Jump_Zero	0x3fa
03eb e802       |    |		Load	0x4,0x2
03ec 0a01       |    |		Execute_Immediate	Plus,0x1
03ed 00d8       |    |		Load_Top	At_Offset_0
03ee 00e2       |    |		Load_Encached	Integer_Cache
03ef 0260       | `  |		Execute	Discrete,In_Type
03f0 7001       |p   |		Jump_Nonzero	0x3f2
03f1 0801       |    |		Execute_Immediate	Raise,0x1
03f2 e603       |    |		Load	0x3,0x3
03f3 e602       |    |		Load	0x3,0x2
03f4 01cf       |    |		Execute	Vector,Slice_Read
03f5 e802       |    |		Load	0x4,0x2
03f6 e603       |    |		Load	0x3,0x3
03f7 0aff       |    |		Execute_Immediate	Plus,-0x1
03f8 e602       |    |		Load	0x3,0x2
03f9 01ce       |    |		Execute	Vector,Slice_Write
03fa e603       |    |		Load	0x3,0x3
03fb 0aff       |    |		Execute_Immediate	Plus,-0x1
03fc c603       |    |		Store	0x3,0x3
03fd 7803       |x   |		Jump	0x401
03fe e802       |    |		Load	0x4,0x2
03ff 0a01       |    |		Execute_Immediate	Plus,0x1
0400 c802       |    |		Store	0x4,0x2
0401 00c9       |    |		Action	Pop_Auxiliary_Loop
0402 e802       |    |		Load	0x4,0x2
0403 e603       |    |		Load	0x3,0x3
0404 027a       | z  |		Execute	Discrete,Less_Equal
0405 77db       |w   |		Jump_Nonzero	0x3e1
0406 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0407 0000       |    |		.XXX[0x1]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 0412       |    |		.CONST	0x0412								; Address of begin
0409 0004       |    |		.CONST	0x0004								; Address of exception handler
040a 0003       |    |		.CONST	0x0003								; Number of locals
040b			INIT_0408:
040b e003       |    |		Load	0x0,0x3
040c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
040d 02c7       |    |		Declare_Variable	Any
040e 00d8       |    |		Load_Top	At_Offset_0
040f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0410 e003       |    |		Load	0x0,0x3
0411 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0412			BODY_0408:
0412 e003       |    |		Load	0x0,0x3
0413 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0414 e802       |    |		Load	0x4,0x2
0415 0120       |    |		Execute	Any,Is_Value
0416 6803       |h   |		Jump_Zero	0x41a
0417 e003       |    |		Load	0x0,0x3
0418 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0419 7801       |x   |		Jump	0x41b
041a e802       |    |		Load	0x4,0x2
041b 601c       |`   |		Indirect_Literal	Discrete,0x438,{0x00000000, 0x00004000}
041c e005       |    |		Load	0x0,0x5
041d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
041e e9fe       |    |		Load	0x4,-0x2
041f e003       |    |		Load	0x0,0x3
0420 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0421 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0422 c802       |    |		Store	0x4,0x2
0423 c803       |    |		Store	0x4,0x3
0424 00d8       |    |		Load_Top	At_Offset_0
0425 6802       |h   |		Jump_Zero	0x428
0426 e9ff       |    |		Load	0x4,-0x1
0427 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0428 e802       |    |		Load	0x4,0x2
0429 e003       |    |		Load	0x0,0x3
042a 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
042b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
042c 6805       |h   |		Jump_Zero	0x432
042d 0092 04f6  |    |		Action	Push_String_Extended,0x4f6					; "W"
042f e9ff       |    |		Load	0x4,-0x1
0430 840b       |    |		Call	0x2,0xb
0431 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0432 0092 04f7  |    |		Action	Push_String_Extended,0x4f7					; "COD"
0434 e9ff       |    |		Load	0x4,-0x1
0435 840b       |    |		Call	0x2,0xb
0436 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0437 0000       |    |		.XXX[0x1]
0438 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
043c 0000 0000  |    |		.BLANK	0000[0x4]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0446       | F  |		.CONST	0x0446								; Address of begin
0441 0004       |    |		.CONST	0x0004								; Address of exception handler
0442 0002       |    |		.CONST	0x0002								; Number of locals
0443			INIT_0440:
0443 e605       |    |		Load	0x3,0x5
0444 e7fd       |    |		Load	0x3,-0x3
0445 8607       |    |		Call	0x3,0x7
0446			BODY_0440:
0446 e005       |    |		Load	0x0,0x5
0447 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0448 e802       |    |		Load	0x4,0x2
0449 e009       |    |		Load	0x0,0x9
044a 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
044b e605       |    |		Load	0x3,0x5
044c e606       |    |		Load	0x3,0x6
044d e009       |    |		Load	0x0,0x9
044e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
044f 7020       |p   |		Jump_Nonzero	0x470
0450 e402       |    |		Load	0x2,0x2
0451 0a01       |    |		Execute_Immediate	Plus,0x1
0452 c402       |    |		Store	0x2,0x2
0453 0092 04ed  |    |		Action	Push_String_Extended,0x4ed					; "*** "
0455 e7fe       |    |		Load	0x3,-0x2
0456 840a       |    |		Call	0x2,0xa
0457 01cc       |    |		Execute	Vector,Catenate
0458 0092 04ee  |    |		Action	Push_String_Extended,0x4ee					; " does not have "
045a 01cc       |    |		Execute	Vector,Catenate
045b e802       |    |		Load	0x4,0x2
045c 01cc       |    |		Execute	Vector,Catenate
045d 0092 04ef  |    |		Action	Push_String_Extended,0x4ef					; " access to "
045f 01cc       |    |		Execute	Vector,Catenate
0460 e605       |    |		Load	0x3,0x5
0461 e003       |    |		Load	0x0,0x3
0462 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0463 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0464 01cc       |    |		Execute	Vector,Catenate
0465 e002       |    |		Load	0x0,0x2
0466 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0467 e7fc       |    |		Load	0x3,-0x4
0468 01db       |    |		Execute	Vector,Length
0469 6806       |h   |		Jump_Zero	0x470
046a 0092 04f0  |    |		Action	Push_String_Extended,0x4f0					; "--- "
046c e7fc       |    |		Load	0x3,-0x4
046d 01cc       |    |		Execute	Vector,Catenate
046e e002       |    |		Load	0x0,0x2
046f 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0470 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0471 0000 0000  |    |		.BLANK	0000[0x7]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 0481       |    |		.CONST	0x0481								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0002       |    |		.CONST	0x0002								; Number of locals
047b			INIT_0478:
047b 0092 04f8  |    |		Action	Push_String_Extended,0x4f8					; "@"
047d e602       |    |		Load	0x3,0x2
047e e003       |    |		Load	0x0,0x3
047f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0480 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0481			BODY_0478:
0481 0092 04f9  |    |		Action	Push_String_Extended,0x4f9					; "cannot deliver mail to "
0483 e802       |    |		Load	0x4,0x2
0484 01cc       |    |		Execute	Vector,Catenate
0485 e406       |    |		Load	0x2,0x6
0486 4804       |H   |		Short_Literal	0x4
0487 0092 04fa  |    |		Action	Push_String_Extended,0x4fa					; "!Users.["
0489 e802       |    |		Load	0x4,0x2
048a 01cc       |    |		Execute	Vector,Catenate
048b 0092 04fb  |    |		Action	Push_String_Extended,0x4fb					; ","
048d 01cc       |    |		Execute	Vector,Catenate
048e e802       |    |		Load	0x4,0x2
048f 01cc       |    |		Execute	Vector,Catenate
0490 0092 04fc  |    |		Action	Push_String_Extended,0x4fc					; ".Mailbox]'c(world)"
0492 01cc       |    |		Execute	Vector,Catenate
0493 840c       |    |		Call	0x2,0xc
0494 0092 04f9  |    |		Action	Push_String_Extended,0x4f9					; "cannot deliver mail to "
0496 e802       |    |		Load	0x4,0x2
0497 01cc       |    |		Execute	Vector,Catenate
0498 e407       |    |		Load	0x2,0x7
0499 4804       |H   |		Short_Literal	0x4
049a 0092 04fd  |    |		Action	Push_String_Extended,0x4fd					; "!Users."
049c e802       |    |		Load	0x4,0x2
049d 01cc       |    |		Execute	Vector,Catenate
049e 0092 04fe  |    |		Action	Push_String_Extended,0x4fe					; ".Mailbox.Main_Set"
04a0 01cc       |    |		Execute	Vector,Catenate
04a1 840c       |    |		Call	0x2,0xc
04a2 00d8       |    |		Load_Top	At_Offset_0
04a3 0092 04ff  |    |		Action	Push_String_Extended,0x4ff					; " cannot read mail."
04a5 01cc       |    |		Execute	Vector,Catenate
04a6 e407       |    |		Load	0x2,0x7
04a7 e802       |    |		Load	0x4,0x2
04a8 0092 04fd  |    |		Action	Push_String_Extended,0x4fd					; "!Users."
04aa e802       |    |		Load	0x4,0x2
04ab 01cc       |    |		Execute	Vector,Catenate
04ac 0092 0500  |    |		Action	Push_String_Extended,0x500					; ".Mailbox.[@_Headers,@_Set]"
04ae 01cc       |    |		Execute	Vector,Catenate
04af 840d       |    |		Call	0x2,0xd
04b0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04b1 ; --------------------------------------------------------------------------------------
04b1 ; STRING TABLE
04b1 ; --------------------------------------------------------------------------------------
04b1 00a2       |    |		.STRTAB	0x00a2->0x0502							; "Public"
04b2 00a6       |    |		.STRTAB	0x00a6->0x0505							; "network_public"
04b3 00b2       |    |		.STRTAB	0x00b2->0x050c							; "System"
04b4 00b6       |    |		.STRTAB	0x00b6->0x050f							; "R"
04b5 00b5       |    |		.STRTAB	0x00b5->0x050f							; "RW"
04b6 00b5       |    |		.STRTAB	0x00b5->0x0510							; "RC"
04b7 00b5       |    |		.STRTAB	0x00b5->0x0511							; "RCOD"
04b8 00b7       |    |		.STRTAB	0x00b7->0x0513							; "!"
04b9 00b6       |    |		.STRTAB	0x00b6->0x0514							; "r"
04ba 00b5       |    |		.STRTAB	0x00b5->0x0514							; "!machine"
04bb 00bb       |    |		.STRTAB	0x00bb->0x0518							; "!machine.temporary"
04bc 00cb       |    |		.STRTAB	0x00cb->0x0521							; "!machine.editor_data"
04bd 00dd       |    |		.STRTAB	0x00dd->0x052b							; "!machine.cg_data"
04be 00eb       |    |		.STRTAB	0x00eb->0x0533							; "!machine.accounting"
04bf 00fc       |    |		.STRTAB	0x00fc->0x053d							; "!machine.machine_name"
04c0 010f       |    |		.STRTAB	0x010f->0x0547							; "!Machine.machine_name"
04c1 0122       | "  |		.STRTAB	0x0122->0x0552							; "!Machine.Switch_Definitions"
04c2 013b       | ;  |		.STRTAB	0x013b->0x055f							; "!machine.error_logs"
04c3 014c       | L  |		.STRTAB	0x014c->0x0569							; "rw"
04c4 014c       | L  |		.STRTAB	0x014c->0x056a							; "public"
04c5 0150       | P  |		.STRTAB	0x0150->0x056d							; "!Machine.sims"
04c6 015b       | [  |		.STRTAB	0x015b->0x0573							; "!compiler_interface"
04c7 016c       | l  |		.STRTAB	0x016c->0x057d							; "!compiler_interface.subsystem_interface"
04c8 0191       |    |		.STRTAB	0x0191->0x0590							; "!machine.tcp_ip_host_id"
04c9 01a6       |    |		.STRTAB	0x01a6->0x059c							; "!machine.transport_name_map"
04ca 01bf       |    |		.STRTAB	0x01bf->0x05a9							; "!machine.initialization"
04cb 01d4       |    |		.STRTAB	0x01d4->0x05b5							; "!machine.Initialization.?"
04cc 01eb       |    |		.STRTAB	0x01eb->0x05c1							; "!machine.Initialization.rational"
04cd 0209       |    |		.STRTAB	0x0209->0x05d1							; "!machine.Initialization.rational.?"
04ce 0229       | )  |		.STRTAB	0x0229->0x05e2							; "!machine.Initialization.site"
04cf 0243       | C  |		.STRTAB	0x0243->0x05f0							; "!machine.Initialization.site.?"
04d0 025f       | _  |		.STRTAB	0x025f->0x05ff							; "Queue server will not run"
04d1 0276       | v  |		.STRTAB	0x0276->0x060c							; "!machine.release"
04d2 0284       |    |		.STRTAB	0x0284->0x0614							; "!machine.release.current"
04d3 029a       |    |		.STRTAB	0x029a->0x0620							; "!machine.release.current.activity"
04d4 02b9       |    |		.STRTAB	0x02b9->0x0630							; "!machine.queues"
04d5 02c6       |    |		.STRTAB	0x02c6->0x0638							; "!tools"
04d6 02ca       |    |		.STRTAB	0x02ca->0x063b							; "!tools.rpc_servers"
04d7 02da       |    |		.STRTAB	0x02da->0x0644							; "!tools.rpc_servers.??'c(world)"
04d8 02f6       |    |		.STRTAB	0x02f6->0x0653							; "cannot send mail"
04d9 0304       |    |		.STRTAB	0x0304->0x065b							; "!Machine.[Mail,Transfer]??"
04da 031c       |    |		.STRTAB	0x031c->0x0668							; "Mail Distribute_Server cannot run as Network_Public."
04db 034e       | N  |		.STRTAB	0x034e->0x0682							; "!Machine.[Transfer,Transfer.Distribute]"
04dc 0373       | s  |		.STRTAB	0x0373->0x0695							; "!Machine.Transfer.Distribute.[Master,Slaves,Files]"
04dd 03a3       |    |		.STRTAB	0x03a3->0x06ae							; "!Machine.Transfer.Distribute.Mailbox"
04de 03c5       |    |		.STRTAB	0x03c5->0x06c0							; "this is the standard output for Mail Distribute Server"
04df 03f9       |    |		.STRTAB	0x03f9->0x06db							; "!Machine.Error_Logs.Mail_Distribute_Server@"
04e0 0422       | "  |		.STRTAB	0x0422->0x06f1							; "+++ No problems found."
04e1 0436       | 6  |		.STRTAB	0x0436->0x06fc							; "++*"
04e2 0437       | 7  |		.STRTAB	0x0437->0x06fd							; " problem."
04e3 043e       | >  |		.STRTAB	0x043e->0x0702							; " problems."
04e4 0446       | F  |		.STRTAB	0x0446->0x0707							; "Group"
04e5 0449       | I  |		.STRTAB	0x0449->0x0709							; "Spooler"
04e6 044e       | N  |		.STRTAB	0x044e->0x070d							; "Mailer"
04e7 0452       | R  |		.STRTAB	0x0452->0x0710							; "*** Directory error getting object from iterator: "
04e8 0482       |    |		.STRTAB	0x0482->0x0729							; "!!! \x22"
04e9 0485       |    |		.STRTAB	0x0485->0x072b							; "\x22 is undefined."
04ea 0492       |    |		.STRTAB	0x0492->0x0733							; "*** \x22"
04eb 0495       |    |		.STRTAB	0x0495->0x0735							; "\x22 cannot be resolved ("
04ec 04a9       |    |		.STRTAB	0x04a9->0x0740							; ")"
04ed 04a8       |    |		.STRTAB	0x04a8->0x0741							; "*** "
04ee 04aa       |    |		.STRTAB	0x04aa->0x0743							; " does not have "
04ef 04b7       |    |		.STRTAB	0x04b7->0x074a							; " access to "
04f0 04c0       |    |		.STRTAB	0x04c0->0x0750							; "--- "
04f1 04c2       |    |		.STRTAB	0x04c2->0x0752							; " default access to "
04f2 04d3       |    |		.STRTAB	0x04d3->0x075b							; "*** System does not have required access to "
04f3 04fd       |    |		.STRTAB	0x04fd->0x0771							; "!Users.@.Mailbox.Main_Set"
04f4 0514       |    |		.STRTAB	0x0514->0x077e							; "cannot deliver mail"
04f5 0525       | %  |		.STRTAB	0x0525->0x0787							; "!Users'c(world)"
04f6 0532       | 2  |		.STRTAB	0x0532->0x078f							; "W"
04f7 0531       | 1  |		.STRTAB	0x0531->0x078f							; "COD"
04f8 0532       | 2  |		.STRTAB	0x0532->0x0791							; "@"
04f9 0531       | 1  |		.STRTAB	0x0531->0x0791							; "cannot deliver mail to "
04fa 0546       | F  |		.STRTAB	0x0546->0x079d							; "!Users.["
04fb 054c       | L  |		.STRTAB	0x054c->0x07a1							; ","
04fc 054b       | K  |		.STRTAB	0x054b->0x07a1							; ".Mailbox]'c(world)"
04fd 055b       | [  |		.STRTAB	0x055b->0x07aa							; "!Users."
04fe 0560       | `  |		.STRTAB	0x0560->0x07ae							; ".Mailbox.Main_Set"
04ff 056f       | o  |		.STRTAB	0x056f->0x07b6							; " cannot read mail."
0500 057f       |    |		.STRTAB	0x057f->0x07bf							; ".Mailbox.[@_Headers,@_Set]"
0501 0597       |    |		.STREND 0x0597->0x07cc
0502 5075 626c  |Publ|		.STRTAB_STRINGS
07cd 0000 0000  |    |		.XXX[0x3]
07cf 0000       |    |
07d0 ; --------------------------------------------------------------------------------------
07d0 ; Debug Table
07d0 ; --------------------------------------------------------------------------------------
07d0 0004 0010  |    |		.DEBUG4	0x0004,0x0010,0xd736,0x0000,0x0001,0x0000
07d6 1105 4910  |  I |		.XXX[0x2a]
07d8 b909 3d3d  |  ==|
07da 3115 0538  |1  8|
07dc 0000 0000  |    |
07de b401 5000  |  P |
07e0 9919 3d49  |  =I|
07e2 3505 5151  |5 QQ|
07e4 1549 7d25  | I}%|
07e6 3541 3115  |5A1 |
07e8 3515 3951  |5 9Q|
07ea 0551 253d  | Q%=|
07ec 38b9 2539  |8 %9|
07ee 517d 4915  |Q}I |
07f0 457d 4d41  |E}MA|
07f2 050d 14e1  |    |
07f4 985c 0049  | \ I|
07f6 4d51 0539  |MQ 9|
07f8 1105 4910  |  I |
07fa b90d 2105  |  ! |
07fc 4905 0d51  |I  Q|
07fe 1548 0058  | H X|