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

⟦a3ceacce6⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0518       |    |		.CONST	0x0518								; 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 8003       |    |		.CONST	0x8003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 003d       | =  |		.CONST	0x003d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001d       |    |		.CONST	0x001d								; Number of locals
000b			INIT_0008:
000b 029a 0043  |   C|		Declare_Subprogram	INIT_0040,For_Outer_Call,Visible,Unelaborated
000d 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated
000f 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated
0011 00bf       |    |		Action	Accept_Activation
0012 4800       |H   |		Short_Literal	0x0
0013 4803       |H   |		Short_Literal	0x3
0014 029f 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Call
0016 03fd       |    |		Declare_Type	Discrete,Defined
0017 00e2       |    |		Load_Encached	Integer_Cache
0018 0620       |    |		Execute_Immediate	Set_Value_Unchecked,0x20
0019 00e2       |    |		Load_Encached	Integer_Cache
001a 0604       |    |		Execute_Immediate	Set_Value_Unchecked,0x4
001b 6054       |`T  |		Indirect_Literal	Discrete,0x70,{0x00000000, 0x00000400}
001c 00e2       |    |		Load_Encached	Integer_Cache
001d 03f1       |    |		Declare_Variable	Discrete,With_Value
001e 00d8       |    |		Load_Top	At_Offset_0
001f e001       |    |		Load	0x0,0x1
0020 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0021 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0022 480c       |H   |		Short_Literal	0xc
0023 0092 033d  |   =|		Action	Push_String_Extended,0x33d					; "archive"
0025 e002       |    |		Load	0x0,0x2
0026 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0027 029d 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call
0029 029d 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call
002b 029d 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call
002d 029d 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call
002f 029d 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call
0031 029d 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call
0033 029d 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call
0035 029d 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call
0037 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0038 00c7       |    |		Action	Elaborate_Subprogram
0039 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
003a 00c7       |    |		Action	Elaborate_Subprogram
003b 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
003c 00c7       |    |		Action	Elaborate_Subprogram
003d			BODY_0008:
003d 00bc       |    |		Action	Signal_Activated
003e 00bb       |    |		Action	Signal_Completion
003f 0000       |    |		.XXX[0x1]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 004a       | J  |		.CONST	0x004a								; Address of begin
0041 005a       | Z  |		.CONST	0x005a								; Address of exception handler
0042 0003       |    |		.CONST	0x0003								; Number of locals
0043			INIT_0040:
0043 e5fe       |    |		Load	0x2,-0x2
0044 8217       |    |		Call	0x1,0x17
0045 e210       |    |		Load	0x1,0x10
0046 03f1       |    |		Declare_Variable	Discrete,With_Value
0047 e002       |    |		Load	0x0,0x2
0048 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0049 0322       | "  |		Declare_Variable	Record
004a			BODY_0040:
004a e402       |    |		Load	0x2,0x2
004b 0f03       |    |		Execute_Immediate	Equal,0x3
004c 6802       |h   |		Jump_Zero	0x4f
004d e003       |    |		Load	0x0,0x3
004e 0257       | W  |		Execute	Discrete,Raise
004f e5ff       |    |		Load	0x2,-0x1
0050 e002       |    |		Load	0x0,0x2
0051 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0052 e403       |    |		Load	0x2,0x3
0053 017d       | }  |		Execute	Record,Structure_Write
0054 e5fd       |    |		Load	0x2,-0x3
0055 e402       |    |		Load	0x2,0x2
0056 e5ff       |    |		Load	0x2,-0x1
0057 e403       |    |		Load	0x2,0x3
0058 821d       |    |		Call	0x1,0x1d
0059 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
005a			TRAP_0040:
005a e002       |    |		Load	0x0,0x2
005b 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
005c 010f       |    |		Execute	Exception,Equal
005d 6811       |h   |		Jump_Zero	0x6f
005e e004       |    |		Load	0x0,0x4
005f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0060 4807       |H   |		Short_Literal	0x7
0061 0092 033e  |   >|		Action	Push_String_Extended,0x33e					; "Encountered too many parent gateway objects for the gateway "
0063 4801       |H   |		Short_Literal	0x1
0064 e5ff       |    |		Load	0x2,-0x1
0065 e005       |    |		Load	0x0,0x5
0066 1867       | g  |		Execute	Package,Field_Execute,Field_Number 0x67
0067 01cc       |    |		Execute	Vector,Catenate
0068 0092 033f  |   ?|		Action	Push_String_Extended,0x33f					; "; check for loops, or reduce the number of parents to 10."
006a 01cc       |    |		Execute	Vector,Catenate
006b e006       |    |		Load	0x0,0x6
006c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
006d e007       |    |		Load	0x0,0x7
006e 0257       | W  |		Execute	Discrete,Raise
006f 0100       |    |		Execute	Exception,Raise
0070 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000400}
0074 0000 0000  |    |		.BLANK	0000[0x4]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 0082       |    |		.CONST	0x0082								; Address of begin
0079 009e       |    |		.CONST	0x009e								; Address of exception handler
007a 0003       |    |		.CONST	0x0003								; Number of locals
007b			INIT_0078:
007b e5fe       |    |		Load	0x2,-0x2
007c 8217       |    |		Call	0x1,0x17
007d e210       |    |		Load	0x1,0x10
007e 03f1       |    |		Declare_Variable	Discrete,With_Value
007f e002       |    |		Load	0x0,0x2
0080 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0081 0322       | "  |		Declare_Variable	Record
0082			BODY_0078:
0082 e402       |    |		Load	0x2,0x2
0083 0f03       |    |		Execute_Immediate	Equal,0x3
0084 6802       |h   |		Jump_Zero	0x87
0085 e003       |    |		Load	0x0,0x3
0086 0257       | W  |		Execute	Discrete,Raise
0087 e5ff       |    |		Load	0x2,-0x1
0088 e002       |    |		Load	0x0,0x2
0089 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
008a e403       |    |		Load	0x2,0x3
008b 017d       | }  |		Execute	Record,Structure_Write
008c 4801       |H   |		Short_Literal	0x1
008d e5ff       |    |		Load	0x2,-0x1
008e e005       |    |		Load	0x0,0x5
008f 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0090 e008       |    |		Load	0x0,0x8
0091 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0092 0260       | `  |		Execute	Discrete,In_Type
0093 7004       |p   |		Jump_Nonzero	0x98
0094 00d8       |    |		Load_Top	At_Offset_0
0095 e002       |    |		Load	0x0,0x2
0096 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0097 00d1       |    |		Pop_Control	Pop_Count_1
0098 e5fd       |    |		Load	0x2,-0x3
0099 e402       |    |		Load	0x2,0x2
009a e5ff       |    |		Load	0x2,-0x1
009b e403       |    |		Load	0x2,0x3
009c 821d       |    |		Call	0x1,0x1d
009d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
009e			TRAP_0078:
009e e002       |    |		Load	0x0,0x2
009f 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
00a0 010f       |    |		Execute	Exception,Equal
00a1 6811       |h   |		Jump_Zero	0xb3
00a2 e004       |    |		Load	0x0,0x4
00a3 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00a4 4807       |H   |		Short_Literal	0x7
00a5 0092 033e  |   >|		Action	Push_String_Extended,0x33e					; "Encountered too many parent gateway objects for the gateway "
00a7 4801       |H   |		Short_Literal	0x1
00a8 e5ff       |    |		Load	0x2,-0x1
00a9 e005       |    |		Load	0x0,0x5
00aa 1867       | g  |		Execute	Package,Field_Execute,Field_Number 0x67
00ab 01cc       |    |		Execute	Vector,Catenate
00ac 0092 033f  |   ?|		Action	Push_String_Extended,0x33f					; "; check for loops, or reduce the number of parents to 10."
00ae 01cc       |    |		Execute	Vector,Catenate
00af e006       |    |		Load	0x0,0x6
00b0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b1 e007       |    |		Load	0x0,0x7
00b2 0257       | W  |		Execute	Discrete,Raise
00b3 0100       |    |		Execute	Exception,Raise
00b4 0000 0000  |    |		.BLANK	0000[0x4]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c2       |    |		.CONST	0x00c2								; Address of begin
00b9 00d7       |    |		.CONST	0x00d7								; Address of exception handler
00ba 0003       |    |		.CONST	0x0003								; Number of locals
00bb			INIT_00b8:
00bb e5fe       |    |		Load	0x2,-0x2
00bc 8217       |    |		Call	0x1,0x17
00bd e210       |    |		Load	0x1,0x10
00be 03f1       |    |		Declare_Variable	Discrete,With_Value
00bf e002       |    |		Load	0x0,0x2
00c0 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
00c1 0322       | "  |		Declare_Variable	Record
00c2			BODY_00b8:
00c2 e402       |    |		Load	0x2,0x2
00c3 0f03       |    |		Execute_Immediate	Equal,0x3
00c4 6802       |h   |		Jump_Zero	0xc7
00c5 e003       |    |		Load	0x0,0x3
00c6 0257       | W  |		Execute	Discrete,Raise
00c7 e5ff       |    |		Load	0x2,-0x1
00c8 e002       |    |		Load	0x0,0x2
00c9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00ca e403       |    |		Load	0x2,0x3
00cb 017d       | }  |		Execute	Record,Structure_Write
00cc 00d8       |    |		Load_Top	At_Offset_0
00cd e215       |    |		Load	0x1,0x15
00ce e002       |    |		Load	0x0,0x2
00cf 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
00d0 00d1       |    |		Pop_Control	Pop_Count_1
00d1 e5fd       |    |		Load	0x2,-0x3
00d2 e402       |    |		Load	0x2,0x2
00d3 e5ff       |    |		Load	0x2,-0x1
00d4 e403       |    |		Load	0x2,0x3
00d5 821d       |    |		Call	0x1,0x1d
00d6 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00d7			TRAP_00b8:
00d7 e002       |    |		Load	0x0,0x2
00d8 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
00d9 010f       |    |		Execute	Exception,Equal
00da 6811       |h   |		Jump_Zero	0xec
00db e004       |    |		Load	0x0,0x4
00dc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00dd 4807       |H   |		Short_Literal	0x7
00de 0092 033e  |   >|		Action	Push_String_Extended,0x33e					; "Encountered too many parent gateway objects for the gateway "
00e0 4801       |H   |		Short_Literal	0x1
00e1 e5ff       |    |		Load	0x2,-0x1
00e2 e005       |    |		Load	0x0,0x5
00e3 1867       | g  |		Execute	Package,Field_Execute,Field_Number 0x67
00e4 01cc       |    |		Execute	Vector,Catenate
00e5 0092 033f  |   ?|		Action	Push_String_Extended,0x33f					; "; check for loops, or reduce the number of parents to 10."
00e7 01cc       |    |		Execute	Vector,Catenate
00e8 e006       |    |		Load	0x0,0x6
00e9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00ea e007       |    |		Load	0x0,0x7
00eb 0257       | W  |		Execute	Discrete,Raise
00ec 0100       |    |		Execute	Exception,Raise
00ed 0000 0000  |    |		.XXX[0x3]
00ef 0000       |    |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 4607       |F   |		Jump_Case	0x8
00f4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00f5 7806       |x   |		Jump	0xfc								; case 0x1
00f6 7809       |x   |		Jump	0x100								; case 0x2
00f7 780d       |x   |		Jump	0x105								; case 0x3
00f8 7810       |x   |		Jump	0x109								; case 0x4
00f9 7811       |x   |		Jump	0x10b								; case 0x5
00fa 7812       |x   |		Jump	0x10d								; case 0x6
00fb 7815       |x   |		Jump	0x111								; case 0x7
00fc 00da       |    |		Load_Top	At_Offset_2
00fd 0091 0339  |   9|		Action	Push_String_Extended_Indexed,0x339				; "UNIX"
00ff 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0100 00db       |    |		Load_Top	At_Offset_3
0101 00db       |    |		Load_Top	At_Offset_3
0102 00e0       |    |		Load_Encached	Standard_Cache
0103 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0104 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0105 00da       |    |		Load_Top	At_Offset_2
0106 00e0       |    |		Load_Encached	Standard_Cache
0107 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0108 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0109 00db       |    |		Load_Top	At_Offset_3
010a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
010b 00db       |    |		Load_Top	At_Offset_3
010c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
010d e210       |    |		Load	0x1,0x10
010e 00dc       |    |		Load_Top	At_Offset_4
010f 0267       | g  |		Execute	Discrete,Predecessor
0110 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0111 e210       |    |		Load	0x1,0x10
0112 00dc       |    |		Load_Top	At_Offset_4
0113 0268       | h  |		Execute	Discrete,Successor
0114 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0115 0000 0000  |    |		.XXX[0x3]
0117 0000       |    |
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b       |    |		.CONST	0x011b								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0001       |    |		.CONST	0x0001								; Number of locals
011b			BODY_0118:
011b			INIT_0118:
011b e213       |    |		Load	0x1,0x13
011c 00d8       |    |		Load_Top	At_Offset_0
011d 00e3       |    |		Load_Encached	Natural_Cache
011e 0260       | `  |		Execute	Discrete,In_Type
011f 7001       |p   |		Jump_Nonzero	0x121
0120 0801       |    |		Execute_Immediate	Raise,0x1
0121 e5ff       |    |		Load	0x2,-0x1
0122 e001       |    |		Load	0x0,0x1
0123 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0124 e214       |    |		Load	0x1,0x14
0125 0161       | a  |		Execute	Variant_Record,Check_In_Formal_Type
0126 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0127 0000       |    |		.XXX[0x1]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b e5ff       |    |		Load	0x2,-0x1
012c 00d8       |    |		Load_Top	At_Offset_0
012d 4801       |H   |		Short_Literal	0x1
012e 4803       |H   |		Short_Literal	0x3
012f 0262       | b  |		Execute	Discrete,In_Range
0130 7008       |p   |		Jump_Nonzero	0x139
0131 0b06       |    |		Execute_Immediate	Case_Compare,0x6
0132 7006       |p   |		Jump_Nonzero	0x139
0133 0b04       |    |		Execute_Immediate	Case_Compare,0x4
0134 7007       |p   |		Jump_Nonzero	0x13c
0135 0f05       |    |		Execute_Immediate	Equal,0x5
0136 7008       |p   |		Jump_Nonzero	0x13f
0137 4803       |H   |		Short_Literal	0x3
0138 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0139 00d1       |    |		Pop_Control	Pop_Count_1
013a 4800       |H   |		Short_Literal	0x0
013b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013c 00d1       |    |		Pop_Control	Pop_Count_1
013d 4801       |H   |		Short_Literal	0x1
013e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013f 4802       |H   |		Short_Literal	0x2
0140 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0141 0000 0000  |    |		.BLANK	0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b e5ff       |    |		Load	0x2,-0x1
014c 4616       |F   |		Jump_Case	0x17
014d 7816       |x   |		Jump	0x164								; case 0x0
014e 7817       |x   |		Jump	0x166								; case 0x1
014f 7819       |x   |		Jump	0x169								; case 0x2
0150 781b       |x   |		Jump	0x16c								; case 0x3
0151 781d       |x   |		Jump	0x16f								; case 0x4
0152 781f       |x   |		Jump	0x172								; case 0x5
0153 7821       |x!  |		Jump	0x175								; case 0x6
0154 7823       |x#  |		Jump	0x178								; case 0x7
0155 780e       |x   |		Jump	0x164								; case 0x8
0156 7824       |x$  |		Jump	0x17b								; case 0x9
0157 7826       |x&  |		Jump	0x17e								; case 0xa
0158 7828       |x(  |		Jump	0x181								; case 0xb
0159 780a       |x   |		Jump	0x164								; case 0xc
015a 7829       |x)  |		Jump	0x184								; case 0xd
015b 782b       |x+  |		Jump	0x187								; case 0xe
015c 782d       |x-  |		Jump	0x18a								; case 0xf
015d 782f       |x/  |		Jump	0x18d								; case 0x10
015e 7831       |x1  |		Jump	0x190								; case 0x11
015f 7833       |x3  |		Jump	0x193								; case 0x12
0160 7835       |x5  |		Jump	0x196								; case 0x13
0161 7837       |x7  |		Jump	0x199								; case 0x14
0162 7839       |x9  |		Jump	0x19c								; case 0x15
0163 7800       |x   |		Jump	0x164								; case 0x16
0164 00ea       |    |		Load_Encached	Null_String_Cache
0165 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0166 0092 0340  |   @|		Action	Push_String_Extended,0x340					; "fdr"
0168 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0169 0092 0341  |   A|		Action	Push_String_Extended,0x341					; "drw"
016b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
016c 0092 0342  |   B|		Action	Push_String_Extended,0x342					; "cab"
016e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
016f 0092 0343  |   C|		Action	Push_String_Extended,0x343					; "boo"
0171 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0172 0092 0344  |   D|		Action	Push_String_Extended,0x344					; "mas"
0174 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0175 0092 0345  |   E|		Action	Push_String_Extended,0x345					; "clp"
0177 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0178 0092 0346  |   F|		Action	Push_String_Extended,0x346					; "scn"
017a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
017b 0092 0347  |   G|		Action	Push_String_Extended,0x347					; "doc"
017d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
017e 0092 0348  |   H|		Action	Push_String_Extended,0x348					; "sty"
0180 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0181 0092 0349  |   I|		Action	Push_String_Extended,0x349					; "dct"
0183 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0184 0092 034a  |   J|		Action	Push_String_Extended,0x34a					; "dgm"
0186 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0187 0092 034b  |   K|		Action	Push_String_Extended,0x34b					; "img"
0189 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
018a 0092 034c  |   L|		Action	Push_String_Extended,0x34c					; "cht"
018c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
018d 0092 034d  |   M|		Action	Push_String_Extended,0x34d					; "plt"
018f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0190 0092 034e  |   N|		Action	Push_String_Extended,0x34e					; "eps"
0192 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0193 0092 034f  |   O|		Action	Push_String_Extended,0x34f					; "lsp"
0195 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0196 0092 0350  |   P|		Action	Push_String_Extended,0x350					; "pal"
0198 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0199 0092 0351  |   Q|		Action	Push_String_Extended,0x351					; "pl"
019b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
019c 0092 0352  |   R|		Action	Push_String_Extended,0x352					; "ter"
019e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
019f 0000       |    |		.XXX[0x1]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a6       |    |		.CONST	0x01a6								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0002       |    |		.CONST	0x0002								; Number of locals
01a3			INIT_01a0:
01a3 e5fe       |    |		Load	0x2,-0x2
01a4 e5ff       |    |		Load	0x2,-0x1
01a5 8218       |    |		Call	0x1,0x18
01a6			BODY_01a0:
01a6 00d8       |    |		Load_Top	At_Offset_0
01a7 01db       |    |		Execute	Vector,Length
01a8 7002       |p   |		Jump_Nonzero	0x1ab
01a9 00ea       |    |		Load_Encached	Null_String_Cache
01aa 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01ab e5fe       |    |		Load	0x2,-0x2
01ac 4603       |F   |		Jump_Case	0x4
01ad 7805       |x   |		Jump	0x1b3								; case 0x0
01ae 7804       |x   |		Jump	0x1b3								; case 0x1
01af 7807       |x   |		Jump	0x1b7								; case 0x2
01b0 7800       |x   |		Jump	0x1b1								; case 0x3
01b1 00ea       |    |		Load_Encached	Null_String_Cache
01b2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01b3 482e       |H.  |		Short_Literal	0x2e
01b4 e402       |    |		Load	0x2,0x2
01b5 01ca       |    |		Execute	Vector,Prepend
01b6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01b7 e5ff       |    |		Load	0x2,-0x1
01b8 e008       |    |		Load	0x0,0x8
01b9 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
01ba 0260       | `  |		Execute	Discrete,In_Type
01bb 6804       |h   |		Jump_Zero	0x1c0
01bc 485f       |H_  |		Short_Literal	0x5f
01bd e402       |    |		Load	0x2,0x2
01be 01ca       |    |		Execute	Vector,Prepend
01bf 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01c0 482e       |H.  |		Short_Literal	0x2e
01c1 e402       |    |		Load	0x2,0x2
01c2 01ca       |    |		Execute	Vector,Prepend
01c3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01c4 0000 0000  |    |		.BLANK	0000[0x4]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d9       |    |		.CONST	0x01d9								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0005       |    |		.CONST	0x0005								; Number of locals
01cb			INIT_01c8:
01cb e5ff       |    |		Load	0x2,-0x1
01cc e002       |    |		Load	0x0,0x2
01cd 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
01ce e5ff       |    |		Load	0x2,-0x1
01cf e002       |    |		Load	0x0,0x2
01d0 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
01d1 e008       |    |		Load	0x0,0x8
01d2 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
01d3 03f1       |    |		Declare_Variable	Discrete,With_Value
01d4 e5fe       |    |		Load	0x2,-0x2
01d5 e403       |    |		Load	0x2,0x3
01d6 8219       |    |		Call	0x1,0x19
01d7 029f 032b  |   +|		Declare_Subprogram	INIT_0328,For_Call
01d9			BODY_01c8:
01d9 e5fe       |    |		Load	0x2,-0x2
01da 4603       |F   |		Jump_Case	0x4
01db 7805       |x   |		Jump	0x1e1								; case 0x0
01dc 7804       |x   |		Jump	0x1e1								; case 0x1
01dd 7835       |x5  |		Jump	0x213								; case 0x2
01de 7800       |x   |		Jump	0x1df								; case 0x3
01df e003       |    |		Load	0x0,0x3
01e0 0257       | W  |		Execute	Discrete,Raise
01e1 e5fd       |    |		Load	0x2,-0x3
01e2 8405       |    |		Call	0x2,0x5
01e3 00d1       |    |		Pop_Control	Pop_Count_1
01e4 e5fe       |    |		Load	0x2,-0x2
01e5 0f01       |    |		Execute_Immediate	Equal,0x1
01e6 6824       |h$  |		Jump_Zero	0x20b
01e7 e402       |    |		Load	0x2,0x2
01e8 01db       |    |		Execute	Vector,Length
01e9 e404       |    |		Load	0x2,0x4
01ea 01db       |    |		Execute	Vector,Length
01eb 0273       | s  |		Execute	Discrete,Plus
01ec e212       |    |		Load	0x1,0x12
01ed 0273       | s  |		Execute	Discrete,Plus
01ee e211       |    |		Load	0x1,0x11
01ef 027d       | }  |		Execute	Discrete,Greater
01f0 681a       |h   |		Jump_Zero	0x20b
01f1 e5fd       |    |		Load	0x2,-0x3
01f2 e402       |    |		Load	0x2,0x2
01f3 01dd       |    |		Execute	Vector,First
01f4 e402       |    |		Load	0x2,0x2
01f5 01dd       |    |		Execute	Vector,First
01f6 e211       |    |		Load	0x1,0x11
01f7 0273       | s  |		Execute	Discrete,Plus
01f8 e404       |    |		Load	0x2,0x4
01f9 01db       |    |		Execute	Vector,Length
01fa 0272       | r  |		Execute	Discrete,Minus
01fb e212       |    |		Load	0x1,0x12
01fc 0272       | r  |		Execute	Discrete,Minus
01fd 0aff       |    |		Execute_Immediate	Plus,-0x1
01fe 00d8       |    |		Load_Top	At_Offset_0
01ff 00e2       |    |		Load_Encached	Integer_Cache
0200 0260       | `  |		Execute	Discrete,In_Type
0201 7001       |p   |		Jump_Nonzero	0x203
0202 0801       |    |		Execute_Immediate	Raise,0x1
0203 e402       |    |		Load	0x2,0x2
0204 01cf       |    |		Execute	Vector,Slice_Read
0205 e404       |    |		Load	0x2,0x4
0206 01cc       |    |		Execute	Vector,Catenate
0207 e001       |    |		Load	0x0,0x1
0208 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0209 00d1       |    |		Pop_Control	Pop_Count_1
020a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
020b e5fd       |    |		Load	0x2,-0x3
020c e402       |    |		Load	0x2,0x2
020d e404       |    |		Load	0x2,0x4
020e 01cc       |    |		Execute	Vector,Catenate
020f e001       |    |		Load	0x0,0x1
0210 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0211 00d1       |    |		Pop_Control	Pop_Count_1
0212 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0213 e403       |    |		Load	0x2,0x3
0214 e008       |    |		Load	0x0,0x8
0215 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0216 0260       | `  |		Execute	Discrete,In_Type
0217 6833       |h3  |		Jump_Zero	0x24b
0218 4820       |H   |		Short_Literal	0x20
0219 e5fd       |    |		Load	0x2,-0x3
021a e001       |    |		Load	0x0,0x1
021b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
021c e009       |    |		Load	0x0,0x9
021d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
021e 01db       |    |		Execute	Vector,Length
021f 7007       |p   |		Jump_Nonzero	0x227
0220 e5fd       |    |		Load	0x2,-0x3
0221 0092 0353  |   S|		Action	Push_String_Extended,0x353					; "[."
0223 e001       |    |		Load	0x0,0x1
0224 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0225 00d1       |    |		Pop_Control	Pop_Count_1
0226 781a       |x   |		Jump	0x241
0227 e5fd       |    |		Load	0x2,-0x3
0228 e001       |    |		Load	0x0,0x1
0229 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
022a 00d8       |    |		Load_Top	At_Offset_0
022b 00e4       |    |		Load_Encached	Positive_Cache
022c 0260       | `  |		Execute	Discrete,In_Type
022d 7001       |p   |		Jump_Nonzero	0x22f
022e 0801       |    |		Execute_Immediate	Raise,0x1
022f e5fd       |    |		Load	0x2,-0x3
0230 e001       |    |		Load	0x0,0x1
0231 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0232 0f5d       | ]  |		Execute_Immediate	Equal,0x5d
0233 680d       |h   |		Jump_Zero	0x241
0234 e5fd       |    |		Load	0x2,-0x3
0235 482e       |H.  |		Short_Literal	0x2e
0236 e5fd       |    |		Load	0x2,-0x3
0237 e001       |    |		Load	0x0,0x1
0238 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0239 00d8       |    |		Load_Top	At_Offset_0
023a 00e4       |    |		Load_Encached	Positive_Cache
023b 0260       | `  |		Execute	Discrete,In_Type
023c 7001       |p   |		Jump_Nonzero	0x23e
023d 0801       |    |		Execute_Immediate	Raise,0x1
023e e001       |    |		Load	0x0,0x1
023f 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0240 00d1       |    |		Pop_Control	Pop_Count_1
0241 e5fd       |    |		Load	0x2,-0x3
0242 485d       |H]  |		Short_Literal	0x5d
0243 e402       |    |		Load	0x2,0x2
0244 e404       |    |		Load	0x2,0x4
0245 01cc       |    |		Execute	Vector,Catenate
0246 01cb       |    |		Execute	Vector,Append
0247 e001       |    |		Load	0x0,0x1
0248 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0249 00d1       |    |		Pop_Control	Pop_Count_1
024a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
024b e5fd       |    |		Load	0x2,-0x3
024c e402       |    |		Load	0x2,0x2
024d e404       |    |		Load	0x2,0x4
024e 01cc       |    |		Execute	Vector,Catenate
024f e001       |    |		Load	0x0,0x1
0250 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0251 00d1       |    |		Pop_Control	Pop_Count_1
0252 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0253 0000 0000  |    |		.BLANK	0000[0x5]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0264       | d  |		.CONST	0x0264								; Address of begin
0259 0280       |    |		.CONST	0x0280								; Address of exception handler
025a 0003       |    |		.CONST	0x0003								; Number of locals
025b			INIT_0258:
025b e002       |    |		Load	0x0,0x2
025c 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
025d 0322       | "  |		Declare_Variable	Record
025e e214       |    |		Load	0x1,0x14
025f 02ff       |    |		Declare_Variable	Variant_Record
0260 e5ff       |    |		Load	0x2,-0x1
0261 8216       |    |		Call	0x1,0x16
0262 e403       |    |		Load	0x2,0x3
0263 016d       | m  |		Execute	Variant_Record,Structure_Write
0264			BODY_0258:
0264 e402       |    |		Load	0x2,0x2
0265 e5fe       |    |		Load	0x2,-0x2
0266 e002       |    |		Load	0x0,0x2
0267 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0268 00d1       |    |		Pop_Control	Pop_Count_1
0269 00cf       |    |		Action	Mark_Auxiliary
026a 780c       |x   |		Jump	0x277
026b e403       |    |		Load	0x2,0x3
026c e5fd       |    |		Load	0x2,-0x3
026d e402       |    |		Load	0x2,0x2
026e e002       |    |		Load	0x0,0x2
026f 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0270 821a       |    |		Call	0x1,0x1a
0271 00d1       |    |		Pop_Control	Pop_Count_1
0272 e402       |    |		Load	0x2,0x2
0273 e002       |    |		Load	0x0,0x2
0274 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0275 00d1       |    |		Pop_Control	Pop_Count_1
0276 00c9       |    |		Action	Pop_Auxiliary_Loop
0277 e402       |    |		Load	0x2,0x2
0278 e002       |    |		Load	0x0,0x2
0279 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
027a 6ff0       |o   |		Jump_Zero	0x26b
027b 00ce       |    |		Action	Pop_Auxiliary
027c 00d8       |    |		Load_Top	At_Offset_0
027d e001       |    |		Load	0x0,0x1
027e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
027f 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0280			TRAP_0258:
0280 e002       |    |		Load	0x0,0x2
0281 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0282 010f       |    |		Execute	Exception,Equal
0283 6809       |h   |		Jump_Zero	0x28d
0284 e004       |    |		Load	0x0,0x4
0285 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0286 4807       |H   |		Short_Literal	0x7
0287 0092 0354  |   T|		Action	Push_String_Extended,0x354					; "Internal error: Encountered nil icon value when processing parent list in procedure Desktop_Operations.Remote_Naming.Construct_Name"
0289 e006       |    |		Load	0x0,0x6
028a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
028b e007       |    |		Load	0x0,0x7
028c 0257       | W  |		Execute	Discrete,Raise
028d 010e       |    |		Execute	Exception,Is_Constraint_Error
028e 6809       |h   |		Jump_Zero	0x298
028f e004       |    |		Load	0x0,0x4
0290 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0291 4807       |H   |		Short_Literal	0x7
0292 0092 0355  |   U|		Action	Push_String_Extended,0x355					; "Internal error: Raised Constraint_Error when processing parent list in procedure Desktop_Operations.Remote_Naming.Construct_Name"
0294 e006       |    |		Load	0x0,0x6
0295 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0296 e007       |    |		Load	0x0,0x7
0297 0257       | W  |		Execute	Discrete,Raise
0298 0100       |    |		Execute	Exception,Raise
0299 0000 0000  |    |		.BLANK	0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a9       |    |		.CONST	0x02a9								; Address of begin
02a1 02ea       |    |		.CONST	0x02ea								; Address of exception handler
02a2 0003       |    |		.CONST	0x0003								; Number of locals
02a3			INIT_02a0:
02a3 e002       |    |		Load	0x0,0x2
02a4 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
02a5 0322       | "  |		Declare_Variable	Record
02a6 e002       |    |		Load	0x0,0x2
02a7 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
02a8 0322       | "  |		Declare_Variable	Record
02a9			BODY_02a0:
02a9 e402       |    |		Load	0x2,0x2
02aa e5ff       |    |		Load	0x2,-0x1
02ab e002       |    |		Load	0x0,0x2
02ac 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
02ad 00d1       |    |		Pop_Control	Pop_Count_1
02ae 00cf       |    |		Action	Mark_Auxiliary
02af 7835       |x5  |		Jump	0x2e5
02b0 e402       |    |		Load	0x2,0x2
02b1 e002       |    |		Load	0x0,0x2
02b2 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
02b3 e403       |    |		Load	0x2,0x3
02b4 017d       | }  |		Execute	Record,Structure_Write
02b5 e402       |    |		Load	0x2,0x2
02b6 e002       |    |		Load	0x0,0x2
02b7 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
02b8 00d1       |    |		Pop_Control	Pop_Count_1
02b9 e403       |    |		Load	0x2,0x3
02ba e002       |    |		Load	0x0,0x2
02bb 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02bc e008       |    |		Load	0x0,0x8
02bd 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
02be 0260       | `  |		Execute	Discrete,In_Type
02bf 7024       |p$  |		Jump_Nonzero	0x2e4
02c0 e402       |    |		Load	0x2,0x2
02c1 e002       |    |		Load	0x0,0x2
02c2 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
02c3 7020       |p   |		Jump_Nonzero	0x2e4
02c4 e004       |    |		Load	0x0,0x4
02c5 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02c6 4807       |H   |		Short_Literal	0x7
02c7 0092 0356  |   V|		Action	Push_String_Extended,0x356					; "The "
02c9 e403       |    |		Load	0x2,0x3
02ca e002       |    |		Load	0x0,0x2
02cb 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02cc e008       |    |		Load	0x0,0x8
02cd 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
02ce 011c       |    |		Execute	Any,Convert_Unchecked
02cf 1c01       |    |		Execute_Immediate	Run_Utility,0x1
02d0 01cc       |    |		Execute	Vector,Catenate
02d1 0092 0357  |   W|		Action	Push_String_Extended,0x357					; " icon named "
02d3 01cc       |    |		Execute	Vector,Catenate
02d4 e403       |    |		Load	0x2,0x3
02d5 e002       |    |		Load	0x0,0x2
02d6 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02d7 01cc       |    |		Execute	Vector,Catenate
02d8 0092 0358  |   X|		Action	Push_String_Extended,0x358					; " is not a container icon.  It was found in a parent gateway of "
02da 01cc       |    |		Execute	Vector,Catenate
02db e5fe       |    |		Load	0x2,-0x2
02dc 01cc       |    |		Execute	Vector,Catenate
02dd 0092 0359  |   Y|		Action	Push_String_Extended,0x359					; "; this is not allowed, since all parent gateways must list container icon types"
02df 01cc       |    |		Execute	Vector,Catenate
02e0 e006       |    |		Load	0x0,0x6
02e1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02e2 e007       |    |		Load	0x0,0x7
02e3 0257       | W  |		Execute	Discrete,Raise
02e4 00c9       |    |		Action	Pop_Auxiliary_Loop
02e5 e402       |    |		Load	0x2,0x2
02e6 e002       |    |		Load	0x0,0x2
02e7 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
02e8 6fc7       |o   |		Jump_Zero	0x2b0
02e9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02ea			TRAP_02a0:
02ea e002       |    |		Load	0x0,0x2
02eb 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
02ec 010f       |    |		Execute	Exception,Equal
02ed 6809       |h   |		Jump_Zero	0x2f7
02ee e004       |    |		Load	0x0,0x4
02ef 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02f0 4807       |H   |		Short_Literal	0x7
02f1 0092 035a  |   Z|		Action	Push_String_Extended,0x35a					; "Internal error: Encountered nil icon value when processing parent list in procedure Desktop_Operations.Remote_Naming.Check_Parents"
02f3 e006       |    |		Load	0x0,0x6
02f4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02f5 e007       |    |		Load	0x0,0x7
02f6 0257       | W  |		Execute	Discrete,Raise
02f7 010e       |    |		Execute	Exception,Is_Constraint_Error
02f8 6809       |h   |		Jump_Zero	0x302
02f9 e004       |    |		Load	0x0,0x4
02fa 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02fb 4807       |H   |		Short_Literal	0x7
02fc 0092 035b  |   [|		Action	Push_String_Extended,0x35b					; "Internal error: Raised Constraint_Error when processing parent list in procedure Desktop_Operations.Remote_Naming.Check_Parents"
02fe e006       |    |		Load	0x0,0x6
02ff 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0300 e007       |    |		Load	0x0,0x7
0301 0257       | W  |		Execute	Discrete,Raise
0302 0100       |    |		Execute	Exception,Raise
0303 0000 0000  |    |		.BLANK	0000[0x5]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030f       |    |		.CONST	0x030f								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0002       |    |		.CONST	0x0002								; Number of locals
030b			INIT_0308:
030b 4801       |H   |		Short_Literal	0x1
030c e5fe       |    |		Load	0x2,-0x2
030d e005       |    |		Load	0x0,0x5
030e 1867       | g  |		Execute	Package,Field_Execute,Field_Number 0x67
030f			BODY_0308:
030f 00d8       |    |		Load_Top	At_Offset_0
0310 e5ff       |    |		Load	0x2,-0x1
0311 821c       |    |		Call	0x1,0x1c
0312 e5fc       |    |		Load	0x2,-0x4
0313 6808       |h   |		Jump_Zero	0x31c
0314 e5fd       |    |		Load	0x2,-0x3
0315 e5ff       |    |		Load	0x2,-0x1
0316 4801       |H   |		Short_Literal	0x1
0317 e5fe       |    |		Load	0x2,-0x2
0318 e005       |    |		Load	0x0,0x5
0319 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
031a 821b       |    |		Call	0x1,0x1b
031b 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
031c e5fd       |    |		Load	0x2,-0x3
031d e5ff       |    |		Load	0x2,-0x1
031e 00ea       |    |		Load_Encached	Null_String_Cache
031f 821b       |    |		Call	0x1,0x1b
0320 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0321 0000 0000  |    |		.BLANK	0000[0x7]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b       | +  |		.CONST	0x032b								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0001       |    |		.CONST	0x0001								; Number of locals
032b			BODY_0328:
032b			INIT_0328:
032b 4820       |H   |		Short_Literal	0x20
032c e5fd       |    |		Load	0x2,-0x3
032d e001       |    |		Load	0x0,0x1
032e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
032f e009       |    |		Load	0x0,0x9
0330 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0331 01db       |    |		Execute	Vector,Length
0332 6805       |h   |		Jump_Zero	0x338
0333 e5fd       |    |		Load	0x2,-0x3
0334 482f       |H/  |		Short_Literal	0x2f
0335 e001       |    |		Load	0x0,0x1
0336 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0337 00d1       |    |		Pop_Control	Pop_Count_1
0338 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0339 ; --------------------------------------------------------------------------------------
0339 ; STRING TABLE
0339 ; --------------------------------------------------------------------------------------
0339 0048       | H  |		.STRTAB	0x0048->0x035d							; "UNIX"
033a 004a       | J  |		.STRTAB	0x004a->0x035f							; "SHORT_UNIX"
033b 0052       | R  |		.STRTAB	0x0052->0x0364							; "VMS"
033c 0053       | S  |		.STRTAB	0x0053->0x0365							; "UNSUPPORTED"
033d 005c       | \  |		.STRTAB	0x005c->0x036b							; "archive"
033e 0061       | a  |		.STRTAB	0x0061->0x036e							; "Encountered too many parent gateway objects for the gateway "
033f 009b       |    |		.STRTAB	0x009b->0x038c							; "; check for loops, or reduce the number of parents to 10."
0340 00d2       |    |		.STRTAB	0x00d2->0x03a9							; "fdr"
0341 00d3       |    |		.STRTAB	0x00d3->0x03aa							; "drw"
0342 00d4       |    |		.STRTAB	0x00d4->0x03ac							; "cab"
0343 00d5       |    |		.STRTAB	0x00d5->0x03ad							; "boo"
0344 00d6       |    |		.STRTAB	0x00d6->0x03af							; "mas"
0345 00d7       |    |		.STRTAB	0x00d7->0x03b0							; "clp"
0346 00d8       |    |		.STRTAB	0x00d8->0x03b2							; "scn"
0347 00d9       |    |		.STRTAB	0x00d9->0x03b3							; "doc"
0348 00da       |    |		.STRTAB	0x00da->0x03b5							; "sty"
0349 00db       |    |		.STRTAB	0x00db->0x03b6							; "dct"
034a 00dc       |    |		.STRTAB	0x00dc->0x03b8							; "dgm"
034b 00dd       |    |		.STRTAB	0x00dd->0x03b9							; "img"
034c 00de       |    |		.STRTAB	0x00de->0x03bb							; "cht"
034d 00df       |    |		.STRTAB	0x00df->0x03bc							; "plt"
034e 00e0       |    |		.STRTAB	0x00e0->0x03be							; "eps"
034f 00e1       |    |		.STRTAB	0x00e1->0x03bf							; "lsp"
0350 00e2       |    |		.STRTAB	0x00e2->0x03c1							; "pal"
0351 00e3       |    |		.STRTAB	0x00e3->0x03c2							; "pl"
0352 00e3       |    |		.STRTAB	0x00e3->0x03c3							; "ter"
0353 00e4       |    |		.STRTAB	0x00e4->0x03c5							; "[."
0354 00e4       |    |		.STRTAB	0x00e4->0x03c6							; "Internal error: Encountered nil icon value when processing parent list in procedure Desktop_Operations.Remote_Naming.Construct_Name"
0355 0165       | e  |		.STRTAB	0x0165->0x0407							; "Internal error: Raised Constraint_Error when processing parent list in procedure Desktop_Operations.Remote_Naming.Construct_Name"
0356 01e3       |    |		.STRTAB	0x01e3->0x0447							; "The "
0357 01e5       |    |		.STRTAB	0x01e5->0x0449							; " icon named "
0358 01ef       |    |		.STRTAB	0x01ef->0x044f							; " is not a container icon.  It was found in a parent gateway of "
0359 022c       | ,  |		.STRTAB	0x022c->0x046f							; "; this is not allowed, since all parent gateways must list container icon types"
035a 0279       | y  |		.STRTAB	0x0279->0x0496							; "Internal error: Encountered nil icon value when processing parent list in procedure Desktop_Operations.Remote_Naming.Check_Parents"
035b 02f9       |    |		.STRTAB	0x02f9->0x04d7							; "Internal error: Raised Constraint_Error when processing parent list in procedure Desktop_Operations.Remote_Naming.Check_Parents"
035c 0376       | v  |		.STREND 0x0376->0x0517
035d 554e 4958  |UNIX|		.STRTAB_STRINGS
0517 0000       |    |		.XXX[0x1]
0518 ; --------------------------------------------------------------------------------------
0518 ; Debug Table
0518 ; --------------------------------------------------------------------------------------
0518 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xce78,0x0000,0x0001,0x0000
051e 0000 0000  |    |		.BLANK	0000[0x1c]
053a 0004 00a0  |    |		.XXX[0xc]
053c 0000 0000  |    |
053e 0000 0800  |    |
0540 0000 4400  |  D |
0542 0000 0020  |    |
0544 0000 0140  |   @|
0546 0000 0000  |    |		.BLANK	0000[0x2e]
0574 8014 0000  |    |		.XXX[0xb]
0576 0000 0000  |    |
0578 0100 0000  |    |
057a 0880 0000  |    |
057c 0004 0000  |    |
057e 0028       | (  |
057f 0000 0000  |    |		.BLANK	0000[0x2e]
05ad 1002 8000  |    |		.XXX[0xb]
05af 0000 0000  |    |
05b1 0020 0000  |    |
05b3 0110 0000  |    |
05b5 0000 8000  |    |
05b7 0005       |    |
05b8 0000 0000  |    |		.BLANK	0000[0x48]