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

⟦eb2984cd9⟧

    Length: 7168 (0x1c00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0694fc

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 0c08       |    |		.CONST	0x0c08								; 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 8007       |    |		.CONST	0x8007								; 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 009f       |    |		.CONST	0x009f								; Address of begin
0019 00a1       |    |		.CONST	0x00a1								; Address of exception handler
001a 001b       |    |		.CONST	0x001b								; Number of locals
001b			INIT_0018:
001b e001       |    |		Load	0x0,0x1
001c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
001d 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
001e 02c7       |    |		Declare_Variable	Any
001f 4801       |H   |		Short_Literal	0x1
0020 e001       |    |		Load	0x0,0x1
0021 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0022 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0023 e5ff       |    |		Load	0x2,-0x1
0024 e001       |    |		Load	0x0,0x1
0025 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0026 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0027 a402       |    |		Store_Unchecked	0x2,0x2
0028 0092 07fa  |    |		Action	Push_String_Extended,0x7fa					; "!Machine.Queues.User_To_Printer_Map"
002a 4800       |H   |		Short_Literal	0x0
002b 4804       |H   |		Short_Literal	0x4
002c 029f 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Call
002e 03fd       |    |		Declare_Type	Discrete,Defined
002f 4800       |H   |		Short_Literal	0x0
0030 480a       |H   |		Short_Literal	0xa
0031 029f 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Call
0033 03fd       |    |		Declare_Type	Discrete,Defined
0034 e002       |    |		Load	0x0,0x2
0035 e003       |    |		Load	0x0,0x3
0036 00da       |    |		Load_Top	At_Offset_2
0037 4800       |H   |		Short_Literal	0x0
0038 4801       |H   |		Short_Literal	0x1
0039 480a       |H   |		Short_Literal	0xa
003a 0092 07fb  |    |		Action	Push_String_Extended,0x7fb					; "Original_Raw | Raw | Spool_Each_Item => Boolean, others => Unspecified"
003c 00ea       |    |		Load_Encached	Null_String_Cache
003d 00ea       |    |		Load_Encached	Null_String_Cache
003e 4801       |H   |		Short_Literal	0x1
003f 480a       |H   |		Short_Literal	0xa
0040 e004       |    |		Load	0x0,0x4
0041 0387       |    |		Declare_Variable	Package
0042 00d8       |    |		Load_Top	At_Offset_0
0043 020f       |    |		Execute	Module,Activate
0044 e5fc       |    |		Load	0x2,-0x4
0045 00e1       |    |		Load_Encached	Boolean_Cache
0046 03f1       |    |		Declare_Variable	Discrete,With_Value
0047 e5fb       |    |		Load	0x2,-0x5
0048 00e1       |    |		Load_Encached	Boolean_Cache
0049 03f1       |    |		Declare_Variable	Discrete,With_Value
004a e5fa       |    |		Load	0x2,-0x6
004b 00e1       |    |		Load_Encached	Boolean_Cache
004c 03f1       |    |		Declare_Variable	Discrete,With_Value
004d e5f9       |    |		Load	0x2,-0x7
004e 00e1       |    |		Load_Encached	Boolean_Cache
004f 03f1       |    |		Declare_Variable	Discrete,With_Value
0050 00e1       |    |		Load_Encached	Boolean_Cache
0051 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0052 48c8       |H   |		Short_Literal	0xc8
0053 e005       |    |		Load	0x0,0x5
0054 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0055 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0056 00d8       |    |		Load_Top	At_Offset_0
0057 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0058 48c8       |H   |		Short_Literal	0xc8
0059 e005       |    |		Load	0x0,0x5
005a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
005b 1c08       |    |		Execute_Immediate	Run_Utility,0x8
005c 00d8       |    |		Load_Top	At_Offset_0
005d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
005e 00e1       |    |		Load_Encached	Boolean_Cache
005f e006       |    |		Load	0x0,0x6
0060 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0061 0322       | "  |		Declare_Variable	Record
0062 e006       |    |		Load	0x0,0x6
0063 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0064 00d9       |    |		Load_Top	At_Offset_1
0065 017d       | }  |		Execute	Record,Structure_Write
0066 4802       |H   |		Short_Literal	0x2
0067 4803       |H   |		Short_Literal	0x3
0068 4804       |H   |		Short_Literal	0x4
0069 00db       |    |		Load_Top	At_Offset_3
006a e006       |    |		Load	0x0,0x6
006b 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
006c 4801       |H   |		Short_Literal	0x1
006d 4803       |H   |		Short_Literal	0x3
006e 4804       |H   |		Short_Literal	0x4
006f e40f       |    |		Load	0x2,0xf
0070 e006       |    |		Load	0x0,0x6
0071 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0072 0092 07fc  |    |		Action	Push_String_Extended,0x7fc					; "!Machine.Temporary."
0074 e007       |    |		Load	0x0,0x7
0075 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0076 e007       |    |		Load	0x0,0x7
0077 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0078 01cc       |    |		Execute	Vector,Catenate
0079 0092 07fd  |    |		Action	Push_String_Extended,0x7fd					; "_"
007b 01cc       |    |		Execute	Vector,Catenate
007c e007       |    |		Load	0x0,0x7
007d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
007e e007       |    |		Load	0x0,0x7
007f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0080 01cc       |    |		Execute	Vector,Catenate
0081 0092 07fe  |    |		Action	Push_String_Extended,0x7fe					; "_File_To_Print_On_"
0083 01cc       |    |		Execute	Vector,Catenate
0084 00da       |    |		Load_Top	At_Offset_2
0085 01cc       |    |		Execute	Vector,Catenate
0086 0092 07ff  |    |		Action	Push_String_Extended,0x7ff					; "_At_"
0088 01cc       |    |		Execute	Vector,Catenate
0089 00d9       |    |		Load_Top	At_Offset_1
008a 01cc       |    |		Execute	Vector,Catenate
008b 0007       |    |		Action	Break_Optional
008c e008       |    |		Load	0x0,0x8
008d 1921       | !  |		Execute	Package,Field_Reference,Field_Number 0x21
008e 0007       |    |		Action	Break_Optional
008f 029f 010b  |    |		Declare_Subprogram	INIT_0108,For_Call
0091 029f 011b  |    |		Declare_Subprogram	INIT_0118,For_Call
0093 029f 014b  |   K|		Declare_Subprogram	INIT_0148,For_Call
0095 029f 017b  |   {|		Declare_Subprogram	INIT_0178,For_Call
0097 029f 0203  |    |		Declare_Subprogram	INIT_0200,For_Call
0099 029f 0243  |   C|		Declare_Subprogram	INIT_0240,For_Call
009b 029f 027b  |   {|		Declare_Subprogram	INIT_0278,For_Call
009d 029f 034b  |   K|		Declare_Subprogram	INIT_0348,For_Call
009f			BODY_0018:
009f 841b       |    |		Call	0x2,0x1b
00a0 450e       |E   |		Exit_Suprogram	New_Top_Offset 0xe
00a1			TRAP_0018:
00a1 e009       |    |		Load	0x0,0x9
00a2 010f       |    |		Execute	Exception,Equal
00a3 6801       |h   |		Jump_Zero	0xa5
00a4 450e       |E   |		Exit_Suprogram	New_Top_Offset 0xe
00a5 e00a       |    |		Load	0x0,0xa
00a6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00a7 4807       |H   |		Short_Literal	0x7
00a8 0092 0800  |    |		Action	Push_String_Extended,0x800					; "Unhandled exception: "
00aa 4800       |H   |		Short_Literal	0x0
00ab 4801       |H   |		Short_Literal	0x1
00ac e00b       |    |		Load	0x0,0xb
00ad 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00ae 01cc       |    |		Execute	Vector,Catenate
00af e00c       |    |		Load	0x0,0xc
00b0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b1 450e       |E   |		Exit_Suprogram	New_Top_Offset 0xe
00b2 0000 0000  |    |		.BLANK	0000[0x6]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 4607       |F   |		Jump_Case	0x8
00bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00bd 7806       |x   |		Jump	0xc4								; case 0x1
00be 7809       |x   |		Jump	0xc8								; case 0x2
00bf 780d       |x   |		Jump	0xcd								; case 0x3
00c0 7810       |x   |		Jump	0xd1								; case 0x4
00c1 7811       |x   |		Jump	0xd3								; case 0x5
00c2 7812       |x   |		Jump	0xd5								; case 0x6
00c3 7815       |x   |		Jump	0xd9								; case 0x7
00c4 00da       |    |		Load_Top	At_Offset_2
00c5 0091 07ea  |    |		Action	Push_String_Extended_Indexed,0x7ea				; "ADA_UNIT"
00c7 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00c8 00db       |    |		Load_Top	At_Offset_3
00c9 00db       |    |		Load_Top	At_Offset_3
00ca 00e0       |    |		Load_Encached	Standard_Cache
00cb 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00cc 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00cd 00da       |    |		Load_Top	At_Offset_2
00ce 00e0       |    |		Load_Encached	Standard_Cache
00cf 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00d0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00d1 00db       |    |		Load_Top	At_Offset_3
00d2 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00d3 00db       |    |		Load_Top	At_Offset_3
00d4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00d5 e404       |    |		Load	0x2,0x4
00d6 00dc       |    |		Load_Top	At_Offset_4
00d7 0267       | g  |		Execute	Discrete,Predecessor
00d8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00d9 e404       |    |		Load	0x2,0x4
00da 00dc       |    |		Load_Top	At_Offset_4
00db 0268       | h  |		Execute	Discrete,Successor
00dc 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00dd 0000 0000  |    |		.XXX[0x3]
00df 0000       |    |
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3       |    |		.CONST	0x00e3								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0001       |    |		.CONST	0x0001								; Number of locals
00e3			BODY_00e0:
00e3			INIT_00e0:
00e3 4607       |F   |		Jump_Case	0x8
00e4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00e5 7806       |x   |		Jump	0xec								; case 0x1
00e6 7809       |x   |		Jump	0xf0								; case 0x2
00e7 780d       |x   |		Jump	0xf5								; case 0x3
00e8 7810       |x   |		Jump	0xf9								; case 0x4
00e9 7811       |x   |		Jump	0xfb								; case 0x5
00ea 7812       |x   |		Jump	0xfd								; case 0x6
00eb 7815       |x   |		Jump	0x101								; case 0x7
00ec 00da       |    |		Load_Top	At_Offset_2
00ed 0091 07ef  |    |		Action	Push_String_Extended_Indexed,0x7ef				; "NIL"
00ef 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00f0 00db       |    |		Load_Top	At_Offset_3
00f1 00db       |    |		Load_Top	At_Offset_3
00f2 00e0       |    |		Load_Encached	Standard_Cache
00f3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00f4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00f5 00da       |    |		Load_Top	At_Offset_2
00f6 00e0       |    |		Load_Encached	Standard_Cache
00f7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00f8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00f9 00db       |    |		Load_Top	At_Offset_3
00fa 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00fb 00db       |    |		Load_Top	At_Offset_3
00fc 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00fd e405       |    |		Load	0x2,0x5
00fe 00dc       |    |		Load_Top	At_Offset_4
00ff 0267       | g  |		Execute	Discrete,Predecessor
0100 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0101 e405       |    |		Load	0x2,0x5
0102 00dc       |    |		Load_Top	At_Offset_4
0103 0268       | h  |		Execute	Discrete,Successor
0104 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0105 0000 0000  |    |		.XXX[0x3]
0107 0000       |    |
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b e40c       |    |		Load	0x2,0xc
010c e005       |    |		Load	0x0,0x5
010d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
010e 6807       |h   |		Jump_Zero	0x116
010f 0092 0801  |    |		Action	Push_String_Extended,0x801					; ", Class => "
0111 e40c       |    |		Load	0x2,0xc
0112 e005       |    |		Load	0x0,0x5
0113 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0114 01cc       |    |		Execute	Vector,Catenate
0115 00ca       |    |		Action	Exit_Nullary_Function
0116 00ea       |    |		Load_Encached	Null_String_Cache
0117 00ca       |    |		Action	Exit_Nullary_Function
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0128       | (  |		.CONST	0x0128								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0003       |    |		.CONST	0x0003								; Number of locals
011b			INIT_0118:
011b 4801       |H   |		Short_Literal	0x1
011c 00db       |    |		Load_Top	At_Offset_3
011d 01db       |    |		Execute	Vector,Length
011e 00d8       |    |		Load_Top	At_Offset_0
011f 00e2       |    |		Load_Encached	Integer_Cache
0120 0260       | `  |		Execute	Discrete,In_Type
0121 7001       |p   |		Jump_Nonzero	0x123
0122 0801       |    |		Execute_Immediate	Raise,0x1
0123 00e9       |    |		Load_Encached	String_Cache
0124 035b       | [  |		Declare_Type	Array,Constrained
0125 0337       | 7  |		Declare_Variable	Array
0126 00e3       |    |		Load_Encached	Natural_Cache
0127 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0128			BODY_0118:
0128 00cf       |    |		Action	Mark_Auxiliary
0129 e7ff       |    |		Load	0x3,-0x1
012a 01dc       |    |		Execute	Vector,Last
012b e7ff       |    |		Load	0x3,-0x1
012c 01dd       |    |		Execute	Vector,First
012d 0263       | c  |		Execute	Discrete,Above_Bound
012e 7010       |p   |		Jump_Nonzero	0x13f
012f 00d8       |    |		Load_Top	At_Offset_0
0130 e7ff       |    |		Load	0x3,-0x1
0131 01d7       |    |		Execute	Vector,Field_Read
0132 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0133 6809       |h   |		Jump_Zero	0x13d
0134 00d8       |    |		Load_Top	At_Offset_0
0135 e7ff       |    |		Load	0x3,-0x1
0136 01d7       |    |		Execute	Vector,Field_Read
0137 e603       |    |		Load	0x3,0x3
0138 e602       |    |		Load	0x3,0x2
0139 01d6       |    |		Execute	Vector,Field_Write
013a 00db       |    |		Load_Top	At_Offset_3
013b 0a01       |    |		Execute_Immediate	Plus,0x1
013c c603       |    |		Store	0x3,0x3
013d 00c8       |    |		Action	Pop_Auxiliary_Range
013e 3ff0       |?   |		Loop_Increasing	0x12f
013f 00ce       |    |		Action	Pop_Auxiliary
0140 4801       |H   |		Short_Literal	0x1
0141 00d9       |    |		Load_Top	At_Offset_1
0142 0aff       |    |		Execute_Immediate	Plus,-0x1
0143 00db       |    |		Load_Top	At_Offset_3
0144 01cf       |    |		Execute	Vector,Slice_Read
0145 00e9       |    |		Load_Encached	String_Cache
0146 01c6       |    |		Execute	Vector,Convert_To_Formal
0147 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 015b       | [  |		.CONST	0x015b								; Address of begin
0149 0169       | i  |		.CONST	0x0169								; Address of exception handler
014a 0008       |    |		.CONST	0x0008								; Number of locals
014b			INIT_0148:
014b e00d       |    |		Load	0x0,0xd
014c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014d 02c7       |    |		Declare_Variable	Any
014e 00d8       |    |		Load_Top	At_Offset_0
014f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0150 00e2       |    |		Load_Encached	Integer_Cache
0151 029f 041b  |    |		Declare_Subprogram	INIT_0418,For_Call
0153 029f 0443  |   C|		Declare_Subprogram	INIT_0440,For_Call
0155 029f 045b  |   [|		Declare_Subprogram	INIT_0458,For_Call
0157 029f 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Call
0159 029f 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Call
015b			BODY_0148:
015b 4801       |H   |		Short_Literal	0x1
015c e5f4       |    |		Load	0x2,-0xc
015d 0092 0802  |    |		Action	Push_String_Extended,0x802					; "!!"
015f e008       |    |		Load	0x0,0x8
0160 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0161 6805       |h   |		Jump_Zero	0x167
0162 e40c       |    |		Load	0x2,0xc
0163 e5f4       |    |		Load	0x2,-0xc
0164 e005       |    |		Load	0x0,0x5
0165 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0166 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0167 8608       |    |		Call	0x3,0x8
0168 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0169			TRAP_0148:
0169 00d8       |    |		Load_Top	At_Offset_0
016a 0107       |    |		Execute	Exception,Get_Name
016b 4920       |I   |		Short_Literal	0x120
016c 492f       |I/  |		Short_Literal	0x12f
016d 0262       | b  |		Execute	Discrete,In_Range
016e 6806       |h   |		Jump_Zero	0x175
016f e40c       |    |		Load	0x2,0xc
0170 4820       |H   |		Short_Literal	0x20
0171 4800       |H   |		Short_Literal	0x0
0172 e005       |    |		Load	0x0,0x5
0173 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0174 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0175 0100       |    |		Execute	Exception,Raise
0176 0000 0000  |    |		.XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 01b0       |    |		.CONST	0x01b0								; Address of begin
0179 01fb       |    |		.CONST	0x01fb								; Address of exception handler
017a 000c       |    |		.CONST	0x000c								; Number of locals
017b			INIT_0178:
017b e001       |    |		Load	0x0,0x1
017c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
017d 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
017e 02c7       |    |		Declare_Variable	Any
017f 0092 0803  |    |		Action	Push_String_Extended,0x803					; "TEXT"
0181 e001       |    |		Load	0x0,0x1
0182 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0183 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0184 a602       |    |		Store_Unchecked	0x3,0x2
0185 e001       |    |		Load	0x0,0x1
0186 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0187 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0188 02c7       |    |		Declare_Variable	Any
0189 0092 07f1  |    |		Action	Push_String_Extended,0x7f1					; "POSTSCRIPT"
018b e001       |    |		Load	0x0,0x1
018c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018d 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
018e a603       |    |		Store_Unchecked	0x3,0x3
018f e001       |    |		Load	0x0,0x1
0190 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0191 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0192 02c7       |    |		Declare_Variable	Any
0193 e7ff       |    |		Load	0x3,-0x1
0194 a604       |    |		Store_Unchecked	0x3,0x4
0195 e001       |    |		Load	0x0,0x1
0196 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0197 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0198 02c7       |    |		Declare_Variable	Any
0199 00d8       |    |		Load_Top	At_Offset_0
019a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
019b e001       |    |		Load	0x0,0x1
019c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
019d 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
019e e001       |    |		Load	0x0,0x1
019f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01a0 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
01a1 02c7       |    |		Declare_Variable	Any
01a2 00d8       |    |		Load_Top	At_Offset_0
01a3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a4 e00d       |    |		Load	0x0,0xd
01a5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01a6 02c7       |    |		Declare_Variable	Any
01a7 00d8       |    |		Load_Top	At_Offset_0
01a8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a9 00e8       |    |		Load_Encached	Character_Cache
01aa e404       |    |		Load	0x2,0x4
01ab 0007       |    |		Action	Break_Optional
01ac 00d8       |    |		Load_Top	At_Offset_0
01ad 0604       |    |		Execute_Immediate	Set_Value_Unchecked,0x4
01ae 029f 051b  |    |		Declare_Subprogram	INIT_0518,For_Call
01b0			BODY_0178:
01b0 e604       |    |		Load	0x3,0x4
01b1 e001       |    |		Load	0x0,0x1
01b2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01b3 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
01b4 00cf       |    |		Action	Mark_Auxiliary
01b5 e604       |    |		Load	0x3,0x4
01b6 e001       |    |		Load	0x0,0x1
01b7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01b8 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01b9 c605       |    |		Store	0x3,0x5
01ba e605       |    |		Load	0x3,0x5
01bb e001       |    |		Load	0x0,0x1
01bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01bd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01be a606       |    |		Store_Unchecked	0x3,0x6
01bf e605       |    |		Load	0x3,0x5
01c0 e001       |    |		Load	0x0,0x1
01c1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01c2 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
01c3 c607       |    |		Store	0x3,0x7
01c4 e606       |    |		Load	0x3,0x6
01c5 0f02       |    |		Execute_Immediate	Equal,0x2
01c6 6803       |h   |		Jump_Zero	0x1ca
01c7 4800       |H   |		Short_Literal	0x0
01c8 a60a       |    |		Store_Unchecked	0x3,0xa
01c9 7813       |x   |		Jump	0x1dd
01ca e606       |    |		Load	0x3,0x6
01cb 0f03       |    |		Execute_Immediate	Equal,0x3
01cc 680e       |h   |		Jump_Zero	0x1db
01cd e605       |    |		Load	0x3,0x5
01ce e001       |    |		Load	0x0,0x1
01cf 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d0 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
01d1 c607       |    |		Store	0x3,0x7
01d2 e607       |    |		Load	0x3,0x7
01d3 e603       |    |		Load	0x3,0x3
01d4 012f       | /  |		Execute	Any,Equal
01d5 6803       |h   |		Jump_Zero	0x1d9
01d6 4802       |H   |		Short_Literal	0x2
01d7 a60a       |    |		Store_Unchecked	0x3,0xa
01d8 7804       |x   |		Jump	0x1dd
01d9 860c       |    |		Call	0x3,0xc
01da 7802       |x   |		Jump	0x1dd
01db 4804       |H   |		Short_Literal	0x4
01dc a60a       |    |		Store_Unchecked	0x3,0xa
01dd 00db       |    |		Load_Top	At_Offset_3
01de 00db       |    |		Load_Top	At_Offset_3
01df 027e       | ~  |		Execute	Discrete,Not_Equal
01e0 6808       |h   |		Jump_Zero	0x1e9
01e1 00da       |    |		Load_Top	At_Offset_2
01e2 0f04       |    |		Execute_Immediate	Equal,0x4
01e3 6803       |h   |		Jump_Zero	0x1e7
01e4 00db       |    |		Load_Top	At_Offset_3
01e5 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
01e6 7802       |x   |		Jump	0x1e9
01e7 4804       |H   |		Short_Literal	0x4
01e8 a60a       |    |		Store_Unchecked	0x3,0xa
01e9 e604       |    |		Load	0x3,0x4
01ea e001       |    |		Load	0x0,0x1
01eb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ec 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
01ed c604       |    |		Store	0x3,0x4
01ee e604       |    |		Load	0x3,0x4
01ef e001       |    |		Load	0x0,0x1
01f0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01f1 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
01f2 7005       |p   |		Jump_Nonzero	0x1f8
01f3 00db       |    |		Load_Top	At_Offset_3
01f4 0f04       |    |		Execute_Immediate	Equal,0x4
01f5 7002       |p   |		Jump_Nonzero	0x1f8
01f6 00c9       |    |		Action	Pop_Auxiliary_Loop
01f7 7fbd       |    |		Jump	0x1b5
01f8 00ce       |    |		Action	Pop_Auxiliary
01f9 00da       |    |		Load_Top	At_Offset_2
01fa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01fb			TRAP_0178:
01fb 0007       |    |		Action	Break_Optional
01fc 4804       |H   |		Short_Literal	0x4
01fd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01fe 0000 0000  |    |		.XXX[0x2]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0208       |    |		.CONST	0x0208								; Address of begin
0201 0217       |    |		.CONST	0x0217								; Address of exception handler
0202 0002       |    |		.CONST	0x0002								; Number of locals
0203			INIT_0200:
0203 e00d       |    |		Load	0x0,0xd
0204 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0205 02c7       |    |		Declare_Variable	Any
0206 00d8       |    |		Load_Top	At_Offset_0
0207 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0208			BODY_0200:
0208 00d8       |    |		Load_Top	At_Offset_0
0209 00ea       |    |		Load_Encached	Null_String_Cache
020a e7ff       |    |		Load	0x3,-0x1
020b 4801       |H   |		Short_Literal	0x1
020c e00d       |    |		Load	0x0,0xd
020d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
020e c602       |    |		Store	0x3,0x2
020f 00d8       |    |		Load_Top	At_Offset_0
0210 e00d       |    |		Load	0x0,0xd
0211 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0212 c602       |    |		Store	0x3,0x2
0213 00db       |    |		Load_Top	At_Offset_3
0214 e00e       |    |		Load	0x0,0xe
0215 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0216 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0217			TRAP_0200:
0217 00d8       |    |		Load_Top	At_Offset_0
0218 0107       |    |		Execute	Exception,Get_Name
0219 4930       |I0  |		Short_Literal	0x130
021a 493f       |I?  |		Short_Literal	0x13f
021b 0262       | b  |		Execute	Discrete,In_Range
021c 681b       |h   |		Jump_Zero	0x238
021d e7fe       |    |		Load	0x3,-0x2
021e 700d       |p   |		Jump_Nonzero	0x22c
021f 0092 0804  |    |		Action	Push_String_Extended,0x804					; "PRINT: Unable to print a window image (after retries, a USE_ERROR was encountered creating "
0221 e7ff       |    |		Load	0x3,-0x1
0222 e008       |    |		Load	0x0,0x8
0223 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0224 01cc       |    |		Execute	Vector,Catenate
0225 0092 0805  |    |		Action	Push_String_Extended,0x805					; ")"
0227 01cc       |    |		Execute	Vector,Catenate
0228 e00d       |    |		Load	0x0,0xd
0229 1860       | `  |		Execute	Package,Field_Execute,Field_Number 0x60
022a e009       |    |		Load	0x0,0x9
022b 0257       | W  |		Execute	Discrete,Raise
022c 600f       |`   |		Indirect_Literal	Discrete,0x23c,{0x00000000, 0x00008000}
022d 00ba       |    |		Action	Initiate_Delay
022e e7fe       |    |		Load	0x3,-0x2
022f 0aff       |    |		Execute_Immediate	Plus,-0x1
0230 00d8       |    |		Load_Top	At_Offset_0
0231 00e3       |    |		Load_Encached	Natural_Cache
0232 0260       | `  |		Execute	Discrete,In_Type
0233 7001       |p   |		Jump_Nonzero	0x235
0234 0801       |    |		Execute_Immediate	Raise,0x1
0235 e7ff       |    |		Load	0x3,-0x1
0236 8418       |    |		Call	0x2,0x18
0237 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0238 0100       |    |		Execute	Exception,Raise
0239 0000 0000  |    |		.XXX[0x3]
023b 0000       |    |
023c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008000}
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0251       | Q  |		.CONST	0x0251								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0006       |    |		.CONST	0x0006								; Number of locals
0243			INIT_0240:
0243 e00f       |    |		Load	0x0,0xf
0244 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0245 02c7       |    |		Declare_Variable	Any
0246 00d8       |    |		Load_Top	At_Offset_0
0247 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0248 0092 0806  |    |		Action	Push_String_Extended,0x806					; "Mailboxes: "
024a e00f       |    |		Load	0x0,0xf
024b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
024c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
024d 029f 0553  |   S|		Declare_Subprogram	INIT_0550,For_Call
024f 029f 056b  |   k|		Declare_Subprogram	INIT_0568,For_Call
0251			BODY_0240:
0251 e00f       |    |		Load	0x0,0xf
0252 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0253 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0254 e602       |    |		Load	0x3,0x2
0255 0120       |    |		Execute	Any,Is_Value
0256 6803       |h   |		Jump_Zero	0x25a
0257 e00f       |    |		Load	0x0,0xf
0258 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0259 7801       |x   |		Jump	0x25b
025a e602       |    |		Load	0x3,0x2
025b e010       |    |		Load	0x0,0x10
025c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
025d 4802       |H   |		Short_Literal	0x2
025e e00f       |    |		Load	0x0,0xf
025f 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0260 e011       |    |		Load	0x0,0x11
0261 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0262 c602       |    |		Store	0x3,0x2
0263 005b       | [  |		Store_Top	Discrete,At_Offset_3
0264 00da       |    |		Load_Top	At_Offset_2
0265 6809       |h   |		Jump_Zero	0x26f
0266 e011       |    |		Load	0x0,0x11
0267 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0268 e008       |    |		Load	0x0,0x8
0269 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
026a 0092 0807  |    |		Action	Push_String_Extended,0x807					; "MAIL"
026c 01df       |    |		Execute	Vector,Equal
026d 6801       |h   |		Jump_Zero	0x26f
026e 8606       |    |		Call	0x3,0x6
026f 4800       |H   |		Short_Literal	0x0
0270 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0271 0000 0000  |    |		.BLANK	0000[0x7]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0292       |    |		.CONST	0x0292								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0009       |    |		.CONST	0x0009								; Number of locals
027b			INIT_0278:
027b 00db       |    |		Load_Top	At_Offset_3
027c 8417       |    |		Call	0x2,0x17
027d e404       |    |		Load	0x2,0x4
027e 03f1       |    |		Declare_Variable	Discrete,With_Value
027f 492c       |I,  |		Short_Literal	0x12c
0280 e005       |    |		Load	0x0,0x5
0281 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0282 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0283 00d8       |    |		Load_Top	At_Offset_0
0284 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0285 e5f6       |    |		Load	0x2,-0xa
0286 e406       |    |		Load	0x2,0x6
0287 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0288 e405       |    |		Load	0x2,0x5
0289 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
028a 029f 0593  |    |		Declare_Subprogram	INIT_0590,For_Call
028c 029f 05ab  |    |		Declare_Subprogram	INIT_05a8,For_Call
028e 029f 05bb  |    |		Declare_Subprogram	INIT_05b8,For_Call
0290 029f 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Call
0292			BODY_0278:
0292 e603       |    |		Load	0x3,0x3
0293 4820       |H   |		Short_Literal	0x20
0294 4800       |H   |		Short_Literal	0x0
0295 e005       |    |		Load	0x0,0x5
0296 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0297 00d1       |    |		Pop_Control	Pop_Count_1
0298 e5f6       |    |		Load	0x2,-0xa
0299 01db       |    |		Execute	Vector,Length
029a 683e       |h>  |		Jump_Zero	0x2d9
029b e604       |    |		Load	0x3,0x4
029c e406       |    |		Load	0x2,0x6
029d 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
029e 700e       |p   |		Jump_Nonzero	0x2ad
029f e00a       |    |		Load	0x0,0xa
02a0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02a1 4807       |H   |		Short_Literal	0x7
02a2 0092 0808  |    |		Action	Push_String_Extended,0x808					; "The Other_Options parameter could not be parsed because "
02a4 4800       |H   |		Short_Literal	0x0
02a5 e604       |    |		Load	0x3,0x4
02a6 e406       |    |		Load	0x2,0x6
02a7 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02a8 01cc       |    |		Execute	Vector,Catenate
02a9 e00c       |    |		Load	0x0,0xc
02aa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02ab e009       |    |		Load	0x0,0x9
02ac 0257       | W  |		Execute	Discrete,Raise
02ad 8607       |    |		Call	0x3,0x7
02ae 8608       |    |		Call	0x3,0x8
02af e605       |    |		Load	0x3,0x5
02b0 460a       |F   |		Jump_Case	0xb
02b1 7827       |x'  |		Jump	0x2d9								; case 0x0
02b2 7821       |x!  |		Jump	0x2d4								; case 0x1
02b3 7808       |x   |		Jump	0x2bc								; case 0x2
02b4 7812       |x   |		Jump	0x2c7								; case 0x3
02b5 781e       |x   |		Jump	0x2d4								; case 0x4
02b6 7822       |x"  |		Jump	0x2d9								; case 0x5
02b7 7821       |x!  |		Jump	0x2d9								; case 0x6
02b8 7820       |x   |		Jump	0x2d9								; case 0x7
02b9 781f       |x   |		Jump	0x2d9								; case 0x8
02ba 781e       |x   |		Jump	0x2d9								; case 0x9
02bb 781d       |x   |		Jump	0x2d9								; case 0xa
02bc e40e       |    |		Load	0x2,0xe
02bd 701b       |p   |		Jump_Nonzero	0x2d9
02be e00a       |    |		Load	0x0,0xa
02bf 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02c0 4807       |H   |		Short_Literal	0x7
02c1 0092 0809  |    |		Action	Push_String_Extended,0x809					; "You cannot use Postscript options in the Other_Options parameter because the currently selected printer is not a laser printer."
02c3 e00c       |    |		Load	0x0,0xc
02c4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c5 e009       |    |		Load	0x0,0x9
02c6 0257       | W  |		Execute	Discrete,Raise
02c7 0092 080a  |    |		Action	Push_String_Extended,0x80a					; "Format => ("
02c9 00ea       |    |		Load_Encached	Null_String_Cache
02ca e605       |    |		Load	0x3,0x5
02cb e604       |    |		Load	0x3,0x4
02cc e406       |    |		Load	0x2,0x6
02cd 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
02ce 01cc       |    |		Execute	Vector,Catenate
02cf 0092 0805  |    |		Action	Push_String_Extended,0x805					; ")"
02d1 01cc       |    |		Execute	Vector,Catenate
02d2 8606       |    |		Call	0x3,0x6
02d3 7805       |x   |		Jump	0x2d9
02d4 e605       |    |		Load	0x3,0x5
02d5 e405       |    |		Load	0x2,0x5
02d6 011c       |    |		Execute	Any,Convert_Unchecked
02d7 1c01       |    |		Execute_Immediate	Run_Utility,0x1
02d8 8606       |    |		Call	0x3,0x6
02d9 e605       |    |		Load	0x3,0x5
02da 0f02       |    |		Execute_Immediate	Equal,0x2
02db e605       |    |		Load	0x3,0x5
02dc 0f00       |    |		Execute_Immediate	Equal,0x0
02dd e40e       |    |		Load	0x2,0xe
02de 0279       | y  |		Execute	Discrete,And
02df 0278       | x  |		Execute	Discrete,Or
02e0 6802       |h   |		Jump_Zero	0x2e3
02e1 8609       |    |		Call	0x3,0x9
02e2 7817       |x   |		Jump	0x2fa
02e3 e605       |    |		Load	0x3,0x5
02e4 7015       |p   |		Jump_Nonzero	0x2fa
02e5 e40e       |    |		Load	0x2,0xe
02e6 7013       |p   |		Jump_Nonzero	0x2fa
02e7 0092 080b  |    |		Action	Push_String_Extended,0x80b					; "Queue.Options"
02e9 e012       |    |		Load	0x0,0x12
02ea 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
02eb 680b       |h   |		Jump_Zero	0x2f7
02ec 6057       |`W  |		Indirect_Literal	Discrete,0x344,{0x00000000, 0x00004000}
02ed e013       |    |		Load	0x0,0x13
02ee 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02ef 0092 080b  |    |		Action	Push_String_Extended,0x80b					; "Queue.Options"
02f1 e012       |    |		Load	0x0,0x12
02f2 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02f3 e012       |    |		Load	0x0,0x12
02f4 1846       | F  |		Execute	Package,Field_Execute,Field_Number 0x46
02f5 8606       |    |		Call	0x3,0x6
02f6 7803       |x   |		Jump	0x2fa
02f7 0092 080c  |    |		Action	Push_String_Extended,0x80c					; "Format => (System_Header, Wrap)"
02f9 8606       |    |		Call	0x3,0x6
02fa 480a       |H   |		Short_Literal	0xa
02fb e604       |    |		Load	0x3,0x4
02fc e406       |    |		Load	0x2,0x6
02fd 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02fe 680a       |h   |		Jump_Zero	0x309
02ff 0092 080d  |    |		Action	Push_String_Extended,0x80d					; "Copies => "
0301 00ea       |    |		Load_Encached	Null_String_Cache
0302 480a       |H   |		Short_Literal	0xa
0303 e604       |    |		Load	0x3,0x4
0304 e406       |    |		Load	0x2,0x6
0305 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0306 01cc       |    |		Execute	Vector,Catenate
0307 8606       |    |		Call	0x3,0x6
0308 7807       |x   |		Jump	0x310
0309 0092 080e  |    |		Action	Push_String_Extended,0x80e					; "Copies =>"
030b e5f5       |    |		Load	0x2,-0xb
030c 00e0       |    |		Load_Encached	Standard_Cache
030d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
030e 01cc       |    |		Execute	Vector,Catenate
030f 8606       |    |		Call	0x3,0x6
0310 4809       |H   |		Short_Literal	0x9
0311 e604       |    |		Load	0x3,0x4
0312 e406       |    |		Load	0x2,0x6
0313 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0314 680a       |h   |		Jump_Zero	0x31f
0315 0092 080f  |    |		Action	Push_String_Extended,0x80f					; "Class => "
0317 00ea       |    |		Load_Encached	Null_String_Cache
0318 4809       |H   |		Short_Literal	0x9
0319 e604       |    |		Load	0x3,0x4
031a e406       |    |		Load	0x2,0x6
031b 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
031c 01cc       |    |		Execute	Vector,Catenate
031d 8606       |    |		Call	0x3,0x6
031e 7805       |x   |		Jump	0x324
031f e603       |    |		Load	0x3,0x3
0320 8414       |    |		Call	0x2,0x14
0321 e005       |    |		Load	0x0,0x5
0322 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0323 00d1       |    |		Pop_Control	Pop_Count_1
0324 e5f3       |    |		Load	0x2,-0xd
0325 6811       |h   |		Jump_Zero	0x337
0326 0092 0810  |    |		Action	Push_String_Extended,0x810					; "Queue.Print (Name => \x22"
0328 e7ff       |    |		Load	0x3,-0x1
0329 01cc       |    |		Execute	Vector,Catenate
032a 0092 0811  |    |		Action	Push_String_Extended,0x811					; "\x22, Options => \x22"
032c 01cc       |    |		Execute	Vector,Catenate
032d e603       |    |		Load	0x3,0x3
032e e005       |    |		Load	0x0,0x5
032f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0330 01cc       |    |		Execute	Vector,Catenate
0331 0092 0812  |    |		Action	Push_String_Extended,0x812					; "\x22);"
0333 01cc       |    |		Execute	Vector,Catenate
0334 e00d       |    |		Load	0x0,0xd
0335 1860       | `  |		Execute	Package,Field_Execute,Field_Number 0x60
0336 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0337 0092 0813  |    |		Action	Push_String_Extended,0x813					; "<DEFAULT>"
0339 0092 0813  |    |		Action	Push_String_Extended,0x813					; "<DEFAULT>"
033b 0092 0813  |    |		Action	Push_String_Extended,0x813					; "<DEFAULT>"
033d e603       |    |		Load	0x3,0x3
033e e005       |    |		Load	0x0,0x5
033f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0340 e7ff       |    |		Load	0x3,-0x1
0341 e014       |    |		Load	0x0,0x14
0342 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0343 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0344 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0356       | V  |		.CONST	0x0356								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0002       |    |		.CONST	0x0002								; Number of locals
034b			INIT_0348:
034b e402       |    |		Load	0x2,0x2
034c e001       |    |		Load	0x0,0x1
034d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
034e 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
034f e001       |    |		Load	0x0,0x1
0350 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0351 1845       | E  |		Execute	Package,Field_Execute,Field_Number 0x45
0352 e001       |    |		Load	0x0,0x1
0353 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0354 1b44       | D  |		Execute	Package,Field_Read,Field_Number 0x44
0355 03f1       |    |		Declare_Variable	Discrete,With_Value
0356			BODY_0348:
0356 00d8       |    |		Load_Top	At_Offset_0
0357 4618       |F   |		Jump_Case	0x19
0358 7830       |x0  |		Jump	0x389								; case 0x0
0359 782f       |x/  |		Jump	0x389								; case 0x1
035a 7868       |xh  |		Jump	0x3c3								; case 0x2
035b 789f       |x   |		Jump	0x3fb								; case 0x3
035c 789e       |x   |		Jump	0x3fb								; case 0x4
035d 789d       |x   |		Jump	0x3fb								; case 0x5
035e 789c       |x   |		Jump	0x3fb								; case 0x6
035f 789b       |x   |		Jump	0x3fb								; case 0x7
0360 789a       |x   |		Jump	0x3fb								; case 0x8
0361 787d       |x}  |		Jump	0x3df								; case 0x9
0362 788a       |x   |		Jump	0x3ed								; case 0xa
0363 7847       |xG  |		Jump	0x3ab								; case 0xb
0364 7846       |xF  |		Jump	0x3ab								; case 0xc
0365 7845       |xE  |		Jump	0x3ab								; case 0xd
0366 7844       |xD  |		Jump	0x3ab								; case 0xe
0367 7827       |x'  |		Jump	0x38f								; case 0xf
0368 7868       |xh  |		Jump	0x3d1								; case 0x10
0369 7891       |x   |		Jump	0x3fb								; case 0x11
036a 7806       |x   |		Jump	0x371								; case 0x12
036b 7805       |x   |		Jump	0x371								; case 0x13
036c 7822       |x"  |		Jump	0x38f								; case 0x14
036d 7803       |x   |		Jump	0x371								; case 0x15
036e 7820       |x   |		Jump	0x38f								; case 0x16
036f 7801       |x   |		Jump	0x371								; case 0x17
0370 7800       |x   |		Jump	0x371								; case 0x18
0371 e00a       |    |		Load	0x0,0xa
0372 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0373 e402       |    |		Load	0x2,0x2
0374 e001       |    |		Load	0x0,0x1
0375 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0376 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0377 e00a       |    |		Load	0x0,0xa
0378 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0379 4807       |H   |		Short_Literal	0x7
037a 0092 0814  |    |		Action	Push_String_Extended,0x814					; "Could not print because no objects could be resolved (Status => "
037c 00db       |    |		Load_Top	At_Offset_3
037d e001       |    |		Load	0x0,0x1
037e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
037f 1b44       | D  |		Execute	Package,Field_Read,Field_Number 0x44
0380 011c       |    |		Execute	Any,Convert_Unchecked
0381 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0382 01cc       |    |		Execute	Vector,Catenate
0383 0092 0805  |    |		Action	Push_String_Extended,0x805					; ")"
0385 01cc       |    |		Execute	Vector,Catenate
0386 e00c       |    |		Load	0x0,0xc
0387 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0388 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0389 8416       |    |		Call	0x2,0x16
038a e402       |    |		Load	0x2,0x2
038b e5ff       |    |		Load	0x2,-0x1
038c 841a       |    |		Call	0x2,0x1a
038d 00cc       |    |		Action	Pop_Block
038e 450e       |E   |		Exit_Suprogram	New_Top_Offset 0xe
038f e5ff       |    |		Load	0x2,-0x1
0390 8419       |    |		Call	0x2,0x19
0391 7003       |p   |		Jump_Nonzero	0x395
0392 4804       |H   |		Short_Literal	0x4
0393 e412       |    |		Load	0x2,0x12
0394 8418       |    |		Call	0x2,0x18
0395 8416       |    |		Call	0x2,0x16
0396 4801       |H   |		Short_Literal	0x1
0397 e001       |    |		Load	0x0,0x1
0398 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0399 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
039a e412       |    |		Load	0x2,0x12
039b e001       |    |		Load	0x0,0x1
039c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
039d 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
039e c402       |    |		Store	0x2,0x2
039f e402       |    |		Load	0x2,0x2
03a0 e412       |    |		Load	0x2,0x12
03a1 841a       |    |		Call	0x2,0x1a
03a2 00ea       |    |		Load_Encached	Null_String_Cache
03a3 0092 0815  |    |		Action	Push_String_Extended,0x815					; "<DIRECTORIES>"
03a5 4801       |H   |		Short_Literal	0x1
03a6 e412       |    |		Load	0x2,0x12
03a7 e015       |    |		Load	0x0,0x15
03a8 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
03a9 00cc       |    |		Action	Pop_Block
03aa 450e       |E   |		Exit_Suprogram	New_Top_Offset 0xe
03ab e00a       |    |		Load	0x0,0xa
03ac 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03ad e402       |    |		Load	0x2,0x2
03ae e001       |    |		Load	0x0,0x1
03af 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03b0 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
03b1 e00a       |    |		Load	0x0,0xa
03b2 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03b3 4807       |H   |		Short_Literal	0x7
03b4 0092 0816  |    |		Action	Push_String_Extended,0x816					; "Could not print because one or more of the specified objects could not be resolved (Status => "
03b6 00db       |    |		Load_Top	At_Offset_3
03b7 e001       |    |		Load	0x0,0x1
03b8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03b9 1b44       | D  |		Execute	Package,Field_Read,Field_Number 0x44
03ba 011c       |    |		Execute	Any,Convert_Unchecked
03bb 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03bc 01cc       |    |		Execute	Vector,Catenate
03bd 0092 0805  |    |		Action	Push_String_Extended,0x805					; ")"
03bf 01cc       |    |		Execute	Vector,Catenate
03c0 e00c       |    |		Load	0x0,0xc
03c1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03c2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03c3 e00a       |    |		Load	0x0,0xa
03c4 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03c5 e402       |    |		Load	0x2,0x2
03c6 e001       |    |		Load	0x0,0x1
03c7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03c8 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
03c9 e00a       |    |		Load	0x0,0xa
03ca 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03cb 4807       |H   |		Short_Literal	0x7
03cc 0092 0817  |    |		Action	Push_String_Extended,0x817					; "Could not print because one or more of the specified objects are locked"
03ce e00c       |    |		Load	0x0,0xc
03cf 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03d0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d1 e00a       |    |		Load	0x0,0xa
03d2 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03d3 e402       |    |		Load	0x2,0x2
03d4 e001       |    |		Load	0x0,0x1
03d5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03d6 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
03d7 e00a       |    |		Load	0x0,0xa
03d8 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03d9 4807       |H   |		Short_Literal	0x7
03da 0092 0818  |    |		Action	Push_String_Extended,0x818					; "Could not print because this job does not have access to one or more of the specified objects"
03dc e00c       |    |		Load	0x0,0xc
03dd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03de 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03df e00a       |    |		Load	0x0,0xa
03e0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03e1 e402       |    |		Load	0x2,0x2
03e2 e001       |    |		Load	0x0,0x1
03e3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03e4 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
03e5 e00a       |    |		Load	0x0,0xa
03e6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03e7 4807       |H   |		Short_Literal	0x7
03e8 0092 0819  |    |		Action	Push_String_Extended,0x819					; "Could not print because the required version is not available for one or more of the specified objects"
03ea e00c       |    |		Load	0x0,0xc
03eb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03ec 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03ed e00a       |    |		Load	0x0,0xa
03ee 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03ef e402       |    |		Load	0x2,0x2
03f0 e001       |    |		Load	0x0,0x1
03f1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03f2 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
03f3 e00a       |    |		Load	0x0,0xa
03f4 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03f5 4807       |H   |		Short_Literal	0x7
03f6 0092 081a  |    |		Action	Push_String_Extended,0x81a					; "Could not print because this operation violates a policy rule for one or more of the objects specified"
03f8 e00c       |    |		Load	0x0,0xc
03f9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03fa 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03fb e00a       |    |		Load	0x0,0xa
03fc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03fd e402       |    |		Load	0x2,0x2
03fe e001       |    |		Load	0x0,0x1
03ff 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0400 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0401 e00a       |    |		Load	0x0,0xa
0402 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0403 4807       |H   |		Short_Literal	0x7
0404 0092 081b  |    |		Action	Push_String_Extended,0x81b					; "Could not print because an unexpected resolution error was encountered (Status => "
0406 00db       |    |		Load_Top	At_Offset_3
0407 e001       |    |		Load	0x0,0x1
0408 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0409 1b44       | D  |		Execute	Package,Field_Read,Field_Number 0x44
040a 011c       |    |		Execute	Any,Convert_Unchecked
040b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
040c 01cc       |    |		Execute	Vector,Catenate
040d 0092 0805  |    |		Action	Push_String_Extended,0x805					; ")"
040f 01cc       |    |		Execute	Vector,Catenate
0410 e00c       |    |		Load	0x0,0xc
0411 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0412 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0413 0000 0000  |    |		.BLANK	0000[0x5]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 041b       |    |		.CONST	0x041b								; Address of begin
0419 0004       |    |		.CONST	0x0004								; Address of exception handler
041a 0001       |    |		.CONST	0x0001								; Number of locals
041b			BODY_0418:
041b			INIT_0418:
041b 00db       |    |		Load_Top	At_Offset_3
041c 01db       |    |		Execute	Vector,Length
041d 680b       |h   |		Jump_Zero	0x429
041e 00db       |    |		Load_Top	At_Offset_3
041f 01dd       |    |		Execute	Vector,First
0420 e9fe       |    |		Load	0x4,-0x2
0421 01d7       |    |		Execute	Vector,Field_Read
0422 0f2a       | *  |		Execute_Immediate	Equal,0x2a
0423 6805       |h   |		Jump_Zero	0x429
0424 4801       |H   |		Short_Literal	0x1
0425 e9fe       |    |		Load	0x4,-0x2
0426 e9ff       |    |		Load	0x4,-0x1
0427 8413       |    |		Call	0x2,0x13
0428 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0429 4801       |H   |		Short_Literal	0x1
042a 0092 081c  |    |		Action	Push_String_Extended,0x81c					; "others"
042c e9ff       |    |		Load	0x4,-0x1
042d 8413       |    |		Call	0x2,0x13
042e 6802       |h   |		Jump_Zero	0x431
042f 4801       |H   |		Short_Literal	0x1
0430 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0431 00da       |    |		Load_Top	At_Offset_2
0432 0092 081d  |    |		Action	Push_String_Extended,0x81d					; "@"
0434 01df       |    |		Execute	Vector,Equal
0435 6802       |h   |		Jump_Zero	0x438
0436 4801       |H   |		Short_Literal	0x1
0437 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0438 4801       |H   |		Short_Literal	0x1
0439 e9fe       |    |		Load	0x4,-0x2
043a e9ff       |    |		Load	0x4,-0x1
043b 8413       |    |		Call	0x2,0x13
043c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
043d 0000 0000  |    |		.XXX[0x3]
043f 0000       |    |
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443       | C  |		.CONST	0x0443								; Address of begin
0441 0004       |    |		.CONST	0x0004								; Address of exception handler
0442 0001       |    |		.CONST	0x0001								; Number of locals
0443			BODY_0440:
0443			INIT_0440:
0443 4801       |H   |		Short_Literal	0x1
0444 0092 081e  |    |		Action	Push_String_Extended,0x81e					; "<Default>"
0446 e9ff       |    |		Load	0x4,-0x1
0447 8413       |    |		Call	0x2,0x13
0448 6805       |h   |		Jump_Zero	0x44e
0449 e007       |    |		Load	0x0,0x7
044a 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
044b e007       |    |		Load	0x0,0x7
044c 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
044d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
044e 0092 081f  |    |		Action	Push_String_Extended,0x81f					; "*"
0450 00db       |    |		Load_Top	At_Offset_3
0451 01cc       |    |		Execute	Vector,Catenate
0452 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0453 0000 0000  |    |		.BLANK	0000[0x5]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045d       | ]  |		.CONST	0x045d								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0003       |    |		.CONST	0x0003								; Number of locals
045b			INIT_0458:
045b 00e3       |    |		Load_Encached	Natural_Cache
045c 03e9       |    |		Declare_Variable	Discrete,Duplicate
045d			BODY_0458:
045d e603       |    |		Load	0x3,0x3
045e 4fff       |O   |		Short_Literal	-0x1
045f 027f       |    |		Execute	Discrete,Equal
0460 6803       |h   |		Jump_Zero	0x464
0461 e9ff       |    |		Load	0x4,-0x1
0462 01dd       |    |		Execute	Vector,First
0463 a603       |    |		Store_Unchecked	0x3,0x3
0464 e603       |    |		Load	0x3,0x3
0465 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0466 00cf       |    |		Action	Mark_Auxiliary
0467 7804       |x   |		Jump	0x46c
0468 00da       |    |		Load_Top	At_Offset_2
0469 0a01       |    |		Execute_Immediate	Plus,0x1
046a 005b       | [  |		Store_Top	Discrete,At_Offset_3
046b 00c9       |    |		Action	Pop_Auxiliary_Loop
046c 00da       |    |		Load_Top	At_Offset_2
046d e9ff       |    |		Load	0x4,-0x1
046e 01dc       |    |		Execute	Vector,Last
046f 027a       | z  |		Execute	Discrete,Less_Equal
0470 6805       |h   |		Jump_Zero	0x476
0471 00da       |    |		Load_Top	At_Offset_2
0472 e9ff       |    |		Load	0x4,-0x1
0473 01d7       |    |		Execute	Vector,Field_Read
0474 0f20       |    |		Execute_Immediate	Equal,0x20
0475 77f2       |w   |		Jump_Nonzero	0x468
0476 00ce       |    |		Action	Pop_Auxiliary
0477 00d9       |    |		Load_Top	At_Offset_1
0478 a603       |    |		Store_Unchecked	0x3,0x3
0479 00cf       |    |		Action	Mark_Auxiliary
047a 7804       |x   |		Jump	0x47f
047b e603       |    |		Load	0x3,0x3
047c 0a01       |    |		Execute_Immediate	Plus,0x1
047d c603       |    |		Store	0x3,0x3
047e 00c9       |    |		Action	Pop_Auxiliary_Loop
047f e603       |    |		Load	0x3,0x3
0480 e9ff       |    |		Load	0x4,-0x1
0481 01dc       |    |		Execute	Vector,Last
0482 027a       | z  |		Execute	Discrete,Less_Equal
0483 6805       |h   |		Jump_Zero	0x489
0484 e603       |    |		Load	0x3,0x3
0485 e9ff       |    |		Load	0x4,-0x1
0486 01d7       |    |		Execute	Vector,Field_Read
0487 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0488 77f2       |w   |		Jump_Nonzero	0x47b
0489 00ce       |    |		Action	Pop_Auxiliary
048a 00d9       |    |		Load_Top	At_Offset_1
048b e9ff       |    |		Load	0x4,-0x1
048c 01dc       |    |		Execute	Vector,Last
048d 027a       | z  |		Execute	Discrete,Less_Equal
048e 6811       |h   |		Jump_Zero	0x4a0
048f e603       |    |		Load	0x3,0x3
0490 e9ff       |    |		Load	0x4,-0x1
0491 01dc       |    |		Execute	Vector,Last
0492 027d       | }  |		Execute	Discrete,Greater
0493 6804       |h   |		Jump_Zero	0x498
0494 e9ff       |    |		Load	0x4,-0x1
0495 01dc       |    |		Execute	Vector,Last
0496 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0497 7803       |x   |		Jump	0x49b
0498 e603       |    |		Load	0x3,0x3
0499 0aff       |    |		Execute_Immediate	Plus,-0x1
049a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
049b 00d9       |    |		Load_Top	At_Offset_1
049c 00d9       |    |		Load_Top	At_Offset_1
049d e9ff       |    |		Load	0x4,-0x1
049e 01cf       |    |		Execute	Vector,Slice_Read
049f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04a0 00ea       |    |		Load_Encached	Null_String_Cache
04a1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04a2 0000 0000  |    |		.BLANK	0000[0x6]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ac       |    |		.CONST	0x04ac								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0002       |    |		.CONST	0x0002								; Number of locals
04ab			INIT_04a8:
04ab 00e3       |    |		Load_Encached	Natural_Cache
04ac			BODY_04a8:
04ac 4801       |H   |		Short_Literal	0x1
04ad e603       |    |		Load	0x3,0x3
04ae e9ff       |    |		Load	0x4,-0x1
04af 01dc       |    |		Execute	Vector,Last
04b0 e9ff       |    |		Load	0x4,-0x1
04b1 01cf       |    |		Execute	Vector,Slice_Read
04b2 0092 0820  |    |		Action	Push_String_Extended,0x820					; "--"
04b4 e008       |    |		Load	0x0,0x8
04b5 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
04b6 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
04b7 00d8       |    |		Load_Top	At_Offset_0
04b8 7004       |p   |		Jump_Nonzero	0x4bd
04b9 00db       |    |		Load_Top	At_Offset_3
04ba 01dc       |    |		Execute	Vector,Last
04bb 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04bc 7803       |x   |		Jump	0x4c0
04bd 00d8       |    |		Load_Top	At_Offset_0
04be 0aff       |    |		Execute_Immediate	Plus,-0x1
04bf 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04c0 4820       |H   |		Short_Literal	0x20
04c1 e603       |    |		Load	0x3,0x3
04c2 00da       |    |		Load_Top	At_Offset_2
04c3 e9ff       |    |		Load	0x4,-0x1
04c4 01cf       |    |		Execute	Vector,Slice_Read
04c5 e008       |    |		Load	0x0,0x8
04c6 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cf       |    |		.CONST	0x04cf								; Address of begin
04c9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ca 0003       |    |		.CONST	0x0003								; Number of locals
04cb			INIT_04c8:
04cb e5f4       |    |		Load	0x2,-0xc
04cc 8605       |    |		Call	0x3,0x5
04cd 029f 0683  |    |		Declare_Subprogram	INIT_0680,For_Call
04cf			BODY_04c8:
04cf e602       |    |		Load	0x3,0x2
04d0 00ea       |    |		Load_Encached	Null_String_Cache
04d1 e403       |    |		Load	0x2,0x3
04d2 4800       |H   |		Short_Literal	0x0
04d3 e00d       |    |		Load	0x0,0xd
04d4 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04d5 c602       |    |		Store	0x3,0x2
04d6 00cf       |    |		Action	Mark_Auxiliary
04d7 7804       |x   |		Jump	0x4dc
04d8 4fff       |O   |		Short_Literal	-0x1
04d9 a603       |    |		Store_Unchecked	0x3,0x3
04da 8803       |    |		Call	0x4,0x3
04db 00c9       |    |		Action	Pop_Auxiliary_Loop
04dc e602       |    |		Load	0x3,0x2
04dd e00d       |    |		Load	0x0,0xd
04de 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
04df 6ff8       |o   |		Jump_Zero	0x4d8
04e0 00ce       |    |		Action	Pop_Auxiliary
04e1 e602       |    |		Load	0x3,0x2
04e2 e00d       |    |		Load	0x0,0xd
04e3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04e4 c602       |    |		Store	0x3,0x2
04e5 00d9       |    |		Load_Top	At_Offset_1
04e6 01dd       |    |		Execute	Vector,First
04e7 00da       |    |		Load_Top	At_Offset_2
04e8 01d7       |    |		Execute	Vector,Field_Read
04e9 0f2a       | *  |		Execute_Immediate	Equal,0x2a
04ea 681b       |h   |		Jump_Zero	0x506
04eb e00a       |    |		Load	0x0,0xa
04ec 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04ed 4807       |H   |		Short_Literal	0x7
04ee 0092 0821  |   !|		Action	Push_String_Extended,0x821					; "The printer "
04f0 e802       |    |		Load	0x4,0x2
04f1 01dd       |    |		Execute	Vector,First
04f2 0a01       |    |		Execute_Immediate	Plus,0x1
04f3 00d8       |    |		Load_Top	At_Offset_0
04f4 00e2       |    |		Load_Encached	Integer_Cache
04f5 0260       | `  |		Execute	Discrete,In_Type
04f6 7001       |p   |		Jump_Nonzero	0x4f8
04f7 0801       |    |		Execute_Immediate	Raise,0x1
04f8 e802       |    |		Load	0x4,0x2
04f9 01dc       |    |		Execute	Vector,Last
04fa e802       |    |		Load	0x4,0x2
04fb 01cf       |    |		Execute	Vector,Slice_Read
04fc 01cc       |    |		Execute	Vector,Catenate
04fd 0092 0822  |   "|		Action	Push_String_Extended,0x822					; " does not exist.  Please check the printer configuration"
04ff 01cc       |    |		Execute	Vector,Catenate
0500 0092 0823  |   #|		Action	Push_String_Extended,0x823					; " file for possible names."
0502 01cc       |    |		Execute	Vector,Catenate
0503 e00c       |    |		Load	0x0,0xc
0504 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0505 780f       |x   |		Jump	0x515
0506 e00a       |    |		Load	0x0,0xa
0507 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0508 4807       |H   |		Short_Literal	0x7
0509 0092 0824  |   $|		Action	Push_String_Extended,0x824					; "Could not print because no printer assignment has been made for you ("
050b e802       |    |		Load	0x4,0x2
050c 01cc       |    |		Execute	Vector,Catenate
050d 0092 0825  |   %|		Action	Push_String_Extended,0x825					; ").  Contact your system manager.  You can also "
050f 01cc       |    |		Execute	Vector,Catenate
0510 0092 0826  |   &|		Action	Push_String_Extended,0x826					; "specify an explicit printer name if you know one."
0512 01cc       |    |		Execute	Vector,Catenate
0513 e00c       |    |		Load	0x0,0xc
0514 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0515 e009       |    |		Load	0x0,0x9
0516 0257       | W  |		Execute	Discrete,Raise
0517 0000       |    |		.XXX[0x1]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b       |    |		.CONST	0x051b								; Address of begin
0519 053e       | >  |		.CONST	0x053e								; Address of exception handler
051a 0001       |    |		.CONST	0x0001								; Number of locals
051b			BODY_0518:
051b			INIT_0518:
051b e608       |    |		Load	0x3,0x8
051c 00ea       |    |		Load_Encached	Null_String_Cache
051d e605       |    |		Load	0x3,0x5
051e e001       |    |		Load	0x0,0x1
051f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0520 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0521 4800       |H   |		Short_Literal	0x0
0522 e00d       |    |		Load	0x0,0xd
0523 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0524 c608       |    |		Store	0x3,0x8
0525 00e8       |    |		Load_Encached	Character_Cache
0526 e608       |    |		Load	0x3,0x8
0527 e00d       |    |		Load	0x0,0xd
0528 1857       | W  |		Execute	Package,Field_Execute,Field_Number 0x57
0529 c609       |    |		Store	0x3,0x9
052a e609       |    |		Load	0x3,0x9
052b 0f25       | %  |		Execute_Immediate	Equal,0x25
052c 6803       |h   |		Jump_Zero	0x530
052d 4802       |H   |		Short_Literal	0x2
052e a60a       |    |		Store_Unchecked	0x3,0xa
052f 7809       |x   |		Jump	0x539
0530 e607       |    |		Load	0x3,0x7
0531 e602       |    |		Load	0x3,0x2
0532 012f       | /  |		Execute	Any,Equal
0533 6803       |h   |		Jump_Zero	0x537
0534 4801       |H   |		Short_Literal	0x1
0535 a60a       |    |		Store_Unchecked	0x3,0xa
0536 7802       |x   |		Jump	0x539
0537 4804       |H   |		Short_Literal	0x4
0538 a60a       |    |		Store_Unchecked	0x3,0xa
0539 e608       |    |		Load	0x3,0x8
053a e00d       |    |		Load	0x0,0xd
053b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
053c c608       |    |		Store	0x3,0x8
053d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
053e			TRAP_0518:
053e 0007       |    |		Action	Break_Optional
053f e607       |    |		Load	0x3,0x7
0540 e602       |    |		Load	0x3,0x2
0541 012f       | /  |		Execute	Any,Equal
0542 6803       |h   |		Jump_Zero	0x546
0543 4801       |H   |		Short_Literal	0x1
0544 a60a       |    |		Store_Unchecked	0x3,0xa
0545 7802       |x   |		Jump	0x548
0546 4804       |H   |		Short_Literal	0x4
0547 a60a       |    |		Store_Unchecked	0x3,0xa
0548 e608       |    |		Load	0x3,0x8
0549 e00d       |    |		Load	0x0,0xd
054a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
054b c608       |    |		Store	0x3,0x8
054c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
054d 0000 0000  |    |		.XXX[0x3]
054f 0000       |    |
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0559       | Y  |		.CONST	0x0559								; Address of begin
0551 0004       |    |		.CONST	0x0004								; Address of exception handler
0552 0004       |    |		.CONST	0x0004								; Number of locals
0553			INIT_0550:
0553 029f 06cb  |    |		Declare_Subprogram	INIT_06c8,For_Call
0555 029f 06db  |    |		Declare_Subprogram	INIT_06d8,For_Call
0557 029f 0733  |   3|		Declare_Subprogram	INIT_0730,For_Call
0559			BODY_0550:
0559 e00a       |    |		Load	0x0,0xa
055a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
055b 4807       |H   |		Short_Literal	0x7
055c 0092 0827  |   '|		Action	Push_String_Extended,0x827					; "Printing of mailboxes is not presently implemented."
055e e00c       |    |		Load	0x0,0xc
055f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0560 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0561 0000 0000  |    |		.BLANK	0000[0x7]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 0570       | p  |		.CONST	0x0570								; Address of begin
0569 0004       |    |		.CONST	0x0004								; Address of exception handler
056a 0002       |    |		.CONST	0x0002								; Number of locals
056b			INIT_0568:
056b e010       |    |		Load	0x0,0x10
056c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
056d 4802       |H   |		Short_Literal	0x2
056e e011       |    |		Load	0x0,0x11
056f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0570			BODY_0568:
0570 00d8       |    |		Load_Top	At_Offset_0
0571 01db       |    |		Execute	Vector,Length
0572 0c0c       |    |		Execute_Immediate	Greater_Equal,0xc
0573 6818       |h   |		Jump_Zero	0x58c
0574 4801       |H   |		Short_Literal	0x1
0575 00d9       |    |		Load_Top	At_Offset_1
0576 01dd       |    |		Execute	Vector,First
0577 00da       |    |		Load_Top	At_Offset_2
0578 01dd       |    |		Execute	Vector,First
0579 0a0a       |    |		Execute_Immediate	Plus,0xa
057a 00d8       |    |		Load_Top	At_Offset_0
057b 00e2       |    |		Load_Encached	Integer_Cache
057c 0260       | `  |		Execute	Discrete,In_Type
057d 7001       |p   |		Jump_Nonzero	0x57f
057e 0801       |    |		Execute_Immediate	Raise,0x1
057f 00db       |    |		Load_Top	At_Offset_3
0580 01cf       |    |		Execute	Vector,Slice_Read
0581 e603       |    |		Load	0x3,0x3
0582 e008       |    |		Load	0x0,0x8
0583 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0584 6807       |h   |		Jump_Zero	0x58c
0585 4801       |H   |		Short_Literal	0x1
0586 e412       |    |		Load	0x2,0x12
0587 00da       |    |		Load_Top	At_Offset_2
0588 8605       |    |		Call	0x3,0x5
0589 4801       |H   |		Short_Literal	0x1
058a 00cb       |    |		Action	Pop_Block_With_Result
058b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
058c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
058d 0000 0000  |    |		.XXX[0x3]
058f 0000       |    |
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593       |    |		.CONST	0x0593								; Address of begin
0591 0004       |    |		.CONST	0x0004								; Address of exception handler
0592 0001       |    |		.CONST	0x0001								; Number of locals
0593			BODY_0590:
0593			INIT_0590:
0593 e603       |    |		Load	0x3,0x3
0594 e005       |    |		Load	0x0,0x5
0595 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0596 7006       |p   |		Jump_Nonzero	0x59d
0597 e603       |    |		Load	0x3,0x3
0598 00db       |    |		Load_Top	At_Offset_3
0599 e005       |    |		Load	0x0,0x5
059a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
059b 00d1       |    |		Pop_Control	Pop_Count_1
059c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
059d e603       |    |		Load	0x3,0x3
059e 0092 0828  |   (|		Action	Push_String_Extended,0x828					; ", "
05a0 e9ff       |    |		Load	0x4,-0x1
05a1 01cc       |    |		Execute	Vector,Catenate
05a2 e005       |    |		Load	0x0,0x5
05a3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05a4 00d1       |    |		Pop_Control	Pop_Count_1
05a5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05a6 0000 0000  |    |		.XXX[0x2]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ad       |    |		.CONST	0x05ad								; Address of begin
05a9 0004       |    |		.CONST	0x0004								; Address of exception handler
05aa 0002       |    |		.CONST	0x0002								; Number of locals
05ab			INIT_05a8:
05ab 029f 078b  |    |		Declare_Subprogram	INIT_0788,For_Call
05ad			BODY_05a8:
05ad 4805       |H   |		Short_Literal	0x5
05ae 8802       |    |		Call	0x4,0x2
05af 4806       |H   |		Short_Literal	0x6
05b0 8802       |    |		Call	0x4,0x2
05b1 4807       |H   |		Short_Literal	0x7
05b2 8802       |    |		Call	0x4,0x2
05b3 4808       |H   |		Short_Literal	0x8
05b4 8802       |    |		Call	0x4,0x2
05b5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05b6 0000 0000  |    |		.XXX[0x2]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bd       |    |		.CONST	0x05bd								; Address of begin
05b9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ba 0002       |    |		.CONST	0x0002								; Number of locals
05bb			INIT_05b8:
05bb 029f 07ab  |    |		Declare_Subprogram	INIT_07a8,For_Call
05bd			BODY_05b8:
05bd 4801       |H   |		Short_Literal	0x1
05be 8802       |    |		Call	0x4,0x2
05bf 4804       |H   |		Short_Literal	0x4
05c0 8802       |    |		Call	0x4,0x2
05c1 4802       |H   |		Short_Literal	0x2
05c2 8802       |    |		Call	0x4,0x2
05c3 4803       |H   |		Short_Literal	0x3
05c4 8802       |    |		Call	0x4,0x2
05c5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05c6 0000 0000  |    |		.XXX[0x2]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05d2       |    |		.CONST	0x05d2								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0003       |    |		.CONST	0x0003								; Number of locals
05cb			INIT_05c8:
05cb 00ea       |    |		Load_Encached	Null_String_Cache
05cc 4802       |H   |		Short_Literal	0x2
05cd e604       |    |		Load	0x3,0x4
05ce e406       |    |		Load	0x2,0x6
05cf 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
05d0 00d8       |    |		Load_Top	At_Offset_0
05d1 8415       |    |		Call	0x2,0x15
05d2			BODY_05c8:
05d2 e605       |    |		Load	0x3,0x5
05d3 0f02       |    |		Execute_Immediate	Equal,0x2
05d4 6806       |h   |		Jump_Zero	0x5db
05d5 0092 0829  |   )|		Action	Push_String_Extended,0x829					; "Postscript => ("
05d7 00da       |    |		Load_Top	At_Offset_2
05d8 01cc       |    |		Execute	Vector,Catenate
05d9 8606       |    |		Call	0x3,0x6
05da 7803       |x   |		Jump	0x5de
05db 0092 0829  |   )|		Action	Push_String_Extended,0x829					; "Postscript => ("
05dd 8606       |    |		Call	0x3,0x6
05de 4801       |H   |		Short_Literal	0x1
05df 00d9       |    |		Load_Top	At_Offset_1
05e0 0092 082a  |   *|		Action	Push_String_Extended,0x82a					; "Format="
05e2 e008       |    |		Load	0x0,0x8
05e3 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
05e4 7095       |p   |		Jump_Nonzero	0x67a
05e5 e605       |    |		Load	0x3,0x5
05e6 0f02       |    |		Execute_Immediate	Equal,0x2
05e7 6806       |h   |		Jump_Zero	0x5ee
05e8 e603       |    |		Load	0x3,0x3
05e9 0092 0828  |   (|		Action	Push_String_Extended,0x828					; ", "
05eb e005       |    |		Load	0x0,0x5
05ec 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05ed 00d1       |    |		Pop_Control	Pop_Count_1
05ee e603       |    |		Load	0x3,0x3
05ef 0092 082b  |   +|		Action	Push_String_Extended,0x82b					; "Format => "
05f1 e005       |    |		Load	0x0,0x5
05f2 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05f3 00d1       |    |		Pop_Control	Pop_Count_1
05f4 e602       |    |		Load	0x3,0x2
05f5 0f02       |    |		Execute_Immediate	Equal,0x2
05f6 6807       |h   |		Jump_Zero	0x5fe
05f7 e603       |    |		Load	0x3,0x3
05f8 0092 082c  |   ,|		Action	Push_String_Extended,0x82c					; "PostScript"
05fa e005       |    |		Load	0x0,0x5
05fb 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05fc 00d1       |    |		Pop_Control	Pop_Count_1
05fd 781e       |x   |		Jump	0x61c
05fe e602       |    |		Load	0x3,0x2
05ff 7009       |p   |		Jump_Nonzero	0x609
0600 e5f7       |    |		Load	0x2,-0x9
0601 6807       |h   |		Jump_Zero	0x609
0602 e603       |    |		Load	0x3,0x3
0603 0092 082d  |   -|		Action	Push_String_Extended,0x82d					; "Fancy"
0605 e005       |    |		Load	0x0,0x5
0606 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0607 00d1       |    |		Pop_Control	Pop_Count_1
0608 7813       |x   |		Jump	0x61c
0609 e602       |    |		Load	0x3,0x2
060a 0f01       |    |		Execute_Immediate	Equal,0x1
060b e602       |    |		Load	0x3,0x2
060c 0f00       |    |		Execute_Immediate	Equal,0x0
060d 0278       | x  |		Execute	Discrete,Or
060e 6807       |h   |		Jump_Zero	0x616
060f e603       |    |		Load	0x3,0x3
0610 0092 082e  |   .|		Action	Push_String_Extended,0x82e					; "Plain_Text"
0612 e005       |    |		Load	0x0,0x5
0613 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0614 00d1       |    |		Pop_Control	Pop_Count_1
0615 7806       |x   |		Jump	0x61c
0616 e603       |    |		Load	0x3,0x3
0617 0092 082f  |   /|		Action	Push_String_Extended,0x82f					; "Automatic"
0619 e005       |    |		Load	0x0,0x5
061a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
061b 00d1       |    |		Pop_Control	Pop_Count_1
061c e40d       |    |		Load	0x2,0xd
061d e005       |    |		Load	0x0,0x5
061e 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
061f 6804       |h   |		Jump_Zero	0x624
0620 e40d       |    |		Load	0x2,0xd
0621 e005       |    |		Load	0x0,0x5
0622 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0623 8606       |    |		Call	0x3,0x6
0624 e602       |    |		Load	0x3,0x2
0625 0e02       |    |		Execute_Immediate	Not_Equal,0x2
0626 7002       |p   |		Jump_Nonzero	0x629
0627 e5f8       |    |		Load	0x2,-0x8
0628 703c       |p<  |		Jump_Nonzero	0x665
0629 4801       |H   |		Short_Literal	0x1
062a 00d9       |    |		Load_Top	At_Offset_1
062b 0092 0830  |   0|		Action	Push_String_Extended,0x830					; "Twoup"
062d e008       |    |		Load	0x0,0x8
062e 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
062f 7008       |p   |		Jump_Nonzero	0x638
0630 0092 0831  |   1|		Action	Push_String_Extended,0x831					; "Twoup => "
0632 e407       |    |		Load	0x2,0x7
0633 00e1       |    |		Load_Encached	Boolean_Cache
0634 011c       |    |		Execute	Any,Convert_Unchecked
0635 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0636 01cc       |    |		Execute	Vector,Catenate
0637 8606       |    |		Call	0x3,0x6
0638 4801       |H   |		Short_Literal	0x1
0639 00d9       |    |		Load_Top	At_Offset_1
063a 0092 0832  |   2|		Action	Push_String_Extended,0x832					; "Border"
063c e008       |    |		Load	0x0,0x8
063d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
063e 7008       |p   |		Jump_Nonzero	0x647
063f 0092 0833  |   3|		Action	Push_String_Extended,0x833					; "Border => "
0641 e408       |    |		Load	0x2,0x8
0642 00e1       |    |		Load_Encached	Boolean_Cache
0643 011c       |    |		Execute	Any,Convert_Unchecked
0644 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0645 01cc       |    |		Execute	Vector,Catenate
0646 8606       |    |		Call	0x3,0x6
0647 4801       |H   |		Short_Literal	0x1
0648 00d9       |    |		Load_Top	At_Offset_1
0649 0092 0834  |   4|		Action	Push_String_Extended,0x834					; "Filename"
064b e008       |    |		Load	0x0,0x8
064c 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
064d 7008       |p   |		Jump_Nonzero	0x656
064e 0092 0835  |   5|		Action	Push_String_Extended,0x835					; "Filename => "
0650 e409       |    |		Load	0x2,0x9
0651 00e1       |    |		Load_Encached	Boolean_Cache
0652 011c       |    |		Execute	Any,Convert_Unchecked
0653 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0654 01cc       |    |		Execute	Vector,Catenate
0655 8606       |    |		Call	0x3,0x6
0656 4801       |H   |		Short_Literal	0x1
0657 00d9       |    |		Load_Top	At_Offset_1
0658 0092 0836  |   6|		Action	Push_String_Extended,0x836					; "Date"
065a e008       |    |		Load	0x0,0x8
065b 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
065c 7008       |p   |		Jump_Nonzero	0x665
065d 0092 0837  |   7|		Action	Push_String_Extended,0x837					; "Date => "
065f e40a       |    |		Load	0x2,0xa
0660 00e1       |    |		Load_Encached	Boolean_Cache
0661 011c       |    |		Execute	Any,Convert_Unchecked
0662 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0663 01cc       |    |		Execute	Vector,Catenate
0664 8606       |    |		Call	0x3,0x6
0665 4801       |H   |		Short_Literal	0x1
0666 00d9       |    |		Load_Top	At_Offset_1
0667 0092 0838  |   8|		Action	Push_String_Extended,0x838					; "Pages="
0669 e008       |    |		Load	0x0,0x8
066a 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
066b 700e       |p   |		Jump_Nonzero	0x67a
066c 0092 0839  |   9|		Action	Push_String_Extended,0x839					; "Pages =>"
066e e5fe       |    |		Load	0x2,-0x2
066f 00e0       |    |		Load_Encached	Standard_Cache
0670 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0671 01cc       |    |		Execute	Vector,Catenate
0672 0092 083a  |   :|		Action	Push_String_Extended,0x83a					; ".."
0674 01cc       |    |		Execute	Vector,Catenate
0675 e5fd       |    |		Load	0x2,-0x3
0676 00e0       |    |		Load_Encached	Standard_Cache
0677 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0678 01cc       |    |		Execute	Vector,Catenate
0679 8606       |    |		Call	0x3,0x6
067a e603       |    |		Load	0x3,0x3
067b 0092 0805  |    |		Action	Push_String_Extended,0x805					; ")"
067d e005       |    |		Load	0x0,0x5
067e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
067f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 068e       |    |		.CONST	0x068e								; Address of begin
0681 0004       |    |		.CONST	0x0004								; Address of exception handler
0682 0006       |    |		.CONST	0x0006								; Number of locals
0683			INIT_0680:
0683 e602       |    |		Load	0x3,0x2
0684 e00d       |    |		Load	0x0,0xd
0685 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0686 00d8       |    |		Load_Top	At_Offset_0
0687 8606       |    |		Call	0x3,0x6
0688 00d9       |    |		Load_Top	At_Offset_1
0689 8606       |    |		Call	0x3,0x6
068a 00da       |    |		Load_Top	At_Offset_2
068b 8606       |    |		Call	0x3,0x6
068c 00db       |    |		Load_Top	At_Offset_3
068d 8607       |    |		Call	0x3,0x7
068e			BODY_0680:
068e 00db       |    |		Load_Top	At_Offset_3
068f 01db       |    |		Execute	Vector,Length
0690 0d02       |    |		Execute_Immediate	Less,0x2
0691 7010       |p   |		Jump_Nonzero	0x6a2
0692 00db       |    |		Load_Top	At_Offset_3
0693 01dd       |    |		Execute	Vector,First
0694 ea03       |    |		Load	0x5,0x3
0695 01dd       |    |		Execute	Vector,First
0696 0a01       |    |		Execute_Immediate	Plus,0x1
0697 00d8       |    |		Load_Top	At_Offset_0
0698 00e2       |    |		Load_Encached	Integer_Cache
0699 0260       | `  |		Execute	Discrete,In_Type
069a 7001       |p   |		Jump_Nonzero	0x69c
069b 0801       |    |		Execute_Immediate	Raise,0x1
069c ea03       |    |		Load	0x5,0x3
069d 01cf       |    |		Execute	Vector,Slice_Read
069e 0092 0820  |    |		Action	Push_String_Extended,0x820					; "--"
06a0 01de       |    |		Execute	Vector,Not_Equal
06a1 681f       |h   |		Jump_Zero	0x6c1
06a2 e802       |    |		Load	0x4,0x2
06a3 ea03       |    |		Load	0x5,0x3
06a4 8604       |    |		Call	0x3,0x4
06a5 681b       |h   |		Jump_Zero	0x6c1
06a6 e602       |    |		Load	0x3,0x2
06a7 e00d       |    |		Load	0x0,0xd
06a8 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
06a9 c602       |    |		Store	0x3,0x2
06aa e40c       |    |		Load	0x2,0xc
06ab 00db       |    |		Load_Top	At_Offset_3
06ac e005       |    |		Load	0x0,0x5
06ad 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
06ae 00d1       |    |		Pop_Control	Pop_Count_1
06af e40d       |    |		Load	0x2,0xd
06b0 00d9       |    |		Load_Top	At_Offset_1
06b1 e005       |    |		Load	0x0,0x5
06b2 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
06b3 00d1       |    |		Pop_Control	Pop_Count_1
06b4 00d9       |    |		Load_Top	At_Offset_1
06b5 0092 083b  |   ;|		Action	Push_String_Extended,0x83b					; "Laser"
06b7 01df       |    |		Execute	Vector,Equal
06b8 6803       |h   |		Jump_Zero	0x6bc
06b9 4801       |H   |		Short_Literal	0x1
06ba a40e       |    |		Store_Unchecked	0x2,0xe
06bb 7802       |x   |		Jump	0x6be
06bc 4800       |H   |		Short_Literal	0x0
06bd a40e       |    |		Store_Unchecked	0x2,0xe
06be 00cc       |    |		Action	Pop_Block
06bf 00cc       |    |		Action	Pop_Block
06c0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06c1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06c2 0000 0000  |    |		.BLANK	0000[0x6]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb       |    |		.CONST	0x06cb								; Address of begin
06c9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ca 0001       |    |		.CONST	0x0001								; Number of locals
06cb			BODY_06c8:
06cb			INIT_06c8:
06cb 4800       |H   |		Short_Literal	0x0
06cc 00db       |    |		Load_Top	At_Offset_3
06cd e008       |    |		Load	0x0,0x8
06ce 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06cf ebff       |    |		Load	0x5,-0x1
06d0 e008       |    |		Load	0x0,0x8
06d1 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
06d2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06d3 0000 0000  |    |		.BLANK	0000[0x5]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06e6       |    |		.CONST	0x06e6								; Address of begin
06d9 0004       |    |		.CONST	0x0004								; Address of exception handler
06da 0003       |    |		.CONST	0x0003								; Number of locals
06db			INIT_06d8:
06db 4801       |H   |		Short_Literal	0x1
06dc 00db       |    |		Load_Top	At_Offset_3
06dd 0092 083c  |   <|		Action	Push_String_Extended,0x83c					; " "
06df e008       |    |		Load	0x0,0x8
06e0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
06e1 4801       |H   |		Short_Literal	0x1
06e2 ebff       |    |		Load	0x5,-0x1
06e3 480a       |H   |		Short_Literal	0xa
06e4 e008       |    |		Load	0x0,0x8
06e5 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
06e6			BODY_06d8:
06e6 ebff       |    |		Load	0x5,-0x1
06e7 01db       |    |		Execute	Vector,Length
06e8 6805       |h   |		Jump_Zero	0x6ee
06e9 00d8       |    |		Load_Top	At_Offset_0
06ea ebff       |    |		Load	0x5,-0x1
06eb 01dd       |    |		Execute	Vector,First
06ec 027f       |    |		Execute	Discrete,Equal
06ed 6801       |h   |		Jump_Zero	0x6ef
06ee 08e2       |    |		Execute_Immediate	Raise,0xe2
06ef 00d9       |    |		Load_Top	At_Offset_1
06f0 00d9       |    |		Load_Top	At_Offset_1
06f1 027d       | }  |		Execute	Discrete,Greater
06f2 7002       |p   |		Jump_Nonzero	0x6f5
06f3 00d9       |    |		Load_Top	At_Offset_1
06f4 7012       |p   |		Jump_Nonzero	0x707
06f5 00d8       |    |		Load_Top	At_Offset_0
06f6 6810       |h   |		Jump_Zero	0x707
06f7 ebff       |    |		Load	0x5,-0x1
06f8 01dd       |    |		Execute	Vector,First
06f9 00d9       |    |		Load_Top	At_Offset_1
06fa 0aff       |    |		Execute_Immediate	Plus,-0x1
06fb ebff       |    |		Load	0x5,-0x1
06fc 01cf       |    |		Execute	Vector,Slice_Read
06fd 8802       |    |		Call	0x4,0x2
06fe 6807       |h   |		Jump_Zero	0x706
06ff ebff       |    |		Load	0x5,-0x1
0700 01dd       |    |		Execute	Vector,First
0701 00d9       |    |		Load_Top	At_Offset_1
0702 0aff       |    |		Execute_Immediate	Plus,-0x1
0703 ebff       |    |		Load	0x5,-0x1
0704 01cf       |    |		Execute	Vector,Slice_Read
0705 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0706 08e2       |    |		Execute_Immediate	Raise,0xe2
0707 00d9       |    |		Load_Top	At_Offset_1
0708 681c       |h   |		Jump_Zero	0x725
0709 ebff       |    |		Load	0x5,-0x1
070a 01dd       |    |		Execute	Vector,First
070b 00da       |    |		Load_Top	At_Offset_2
070c 0aff       |    |		Execute_Immediate	Plus,-0x1
070d ebff       |    |		Load	0x5,-0x1
070e 01cf       |    |		Execute	Vector,Slice_Read
070f 8802       |    |		Call	0x4,0x2
0710 6807       |h   |		Jump_Zero	0x718
0711 ebff       |    |		Load	0x5,-0x1
0712 01dd       |    |		Execute	Vector,First
0713 00da       |    |		Load_Top	At_Offset_2
0714 0aff       |    |		Execute_Immediate	Plus,-0x1
0715 ebff       |    |		Load	0x5,-0x1
0716 01cf       |    |		Execute	Vector,Slice_Read
0717 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0718 00d9       |    |		Load_Top	At_Offset_1
0719 0a01       |    |		Execute_Immediate	Plus,0x1
071a 00d8       |    |		Load_Top	At_Offset_0
071b 00e2       |    |		Load_Encached	Integer_Cache
071c 0260       | `  |		Execute	Discrete,In_Type
071d 7001       |p   |		Jump_Nonzero	0x71f
071e 0801       |    |		Execute_Immediate	Raise,0x1
071f ebff       |    |		Load	0x5,-0x1
0720 01dc       |    |		Execute	Vector,Last
0721 ebff       |    |		Load	0x5,-0x1
0722 01cf       |    |		Execute	Vector,Slice_Read
0723 8803       |    |		Call	0x4,0x3
0724 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0725 ebff       |    |		Load	0x5,-0x1
0726 8802       |    |		Call	0x4,0x2
0727 6802       |h   |		Jump_Zero	0x72a
0728 ebff       |    |		Load	0x5,-0x1
0729 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
072a 08e2       |    |		Execute_Immediate	Raise,0xe2
072b 0000 0000  |    |		.BLANK	0000[0x5]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 073e       | >  |		.CONST	0x073e								; Address of begin
0731 0004       |    |		.CONST	0x0004								; Address of exception handler
0732 0003       |    |		.CONST	0x0003								; Number of locals
0733			INIT_0730:
0733 4801       |H   |		Short_Literal	0x1
0734 00db       |    |		Load_Top	At_Offset_3
0735 0092 083c  |   <|		Action	Push_String_Extended,0x83c					; " "
0737 e008       |    |		Load	0x0,0x8
0738 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0739 4801       |H   |		Short_Literal	0x1
073a ebff       |    |		Load	0x5,-0x1
073b 480a       |H   |		Short_Literal	0xa
073c e008       |    |		Load	0x0,0x8
073d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
073e			BODY_0730:
073e ebff       |    |		Load	0x5,-0x1
073f 01db       |    |		Execute	Vector,Length
0740 6805       |h   |		Jump_Zero	0x746
0741 00d8       |    |		Load_Top	At_Offset_0
0742 ebff       |    |		Load	0x5,-0x1
0743 01dd       |    |		Execute	Vector,First
0744 027f       |    |		Execute	Discrete,Equal
0745 6802       |h   |		Jump_Zero	0x748
0746 00ea       |    |		Load_Encached	Null_String_Cache
0747 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0748 00d9       |    |		Load_Top	At_Offset_1
0749 7013       |p   |		Jump_Nonzero	0x75d
074a 00d8       |    |		Load_Top	At_Offset_0
074b 6811       |h   |		Jump_Zero	0x75d
074c ebff       |    |		Load	0x5,-0x1
074d 01dd       |    |		Execute	Vector,First
074e 00d9       |    |		Load_Top	At_Offset_1
074f 0aff       |    |		Execute_Immediate	Plus,-0x1
0750 ebff       |    |		Load	0x5,-0x1
0751 01cf       |    |		Execute	Vector,Slice_Read
0752 8802       |    |		Call	0x4,0x2
0753 6807       |h   |		Jump_Zero	0x75b
0754 ebff       |    |		Load	0x5,-0x1
0755 01dd       |    |		Execute	Vector,First
0756 00d9       |    |		Load_Top	At_Offset_1
0757 0aff       |    |		Execute_Immediate	Plus,-0x1
0758 ebff       |    |		Load	0x5,-0x1
0759 01cf       |    |		Execute	Vector,Slice_Read
075a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
075b 00ea       |    |		Load_Encached	Null_String_Cache
075c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
075d 00d9       |    |		Load_Top	At_Offset_1
075e 681c       |h   |		Jump_Zero	0x77b
075f ebff       |    |		Load	0x5,-0x1
0760 01dd       |    |		Execute	Vector,First
0761 00da       |    |		Load_Top	At_Offset_2
0762 0aff       |    |		Execute_Immediate	Plus,-0x1
0763 ebff       |    |		Load	0x5,-0x1
0764 01cf       |    |		Execute	Vector,Slice_Read
0765 8802       |    |		Call	0x4,0x2
0766 6807       |h   |		Jump_Zero	0x76e
0767 ebff       |    |		Load	0x5,-0x1
0768 01dd       |    |		Execute	Vector,First
0769 00da       |    |		Load_Top	At_Offset_2
076a 0aff       |    |		Execute_Immediate	Plus,-0x1
076b ebff       |    |		Load	0x5,-0x1
076c 01cf       |    |		Execute	Vector,Slice_Read
076d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
076e 00d9       |    |		Load_Top	At_Offset_1
076f 0a01       |    |		Execute_Immediate	Plus,0x1
0770 00d8       |    |		Load_Top	At_Offset_0
0771 00e2       |    |		Load_Encached	Integer_Cache
0772 0260       | `  |		Execute	Discrete,In_Type
0773 7001       |p   |		Jump_Nonzero	0x775
0774 0801       |    |		Execute_Immediate	Raise,0x1
0775 ebff       |    |		Load	0x5,-0x1
0776 01dc       |    |		Execute	Vector,Last
0777 ebff       |    |		Load	0x5,-0x1
0778 01cf       |    |		Execute	Vector,Slice_Read
0779 8803       |    |		Call	0x4,0x3
077a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
077b ebff       |    |		Load	0x5,-0x1
077c 8802       |    |		Call	0x4,0x2
077d 6802       |h   |		Jump_Zero	0x780
077e ebff       |    |		Load	0x5,-0x1
077f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0780 00ea       |    |		Load_Encached	Null_String_Cache
0781 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0782 0000 0000  |    |		.BLANK	0000[0x6]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 0799       |    |		.CONST	0x0799								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0002       |    |		.CONST	0x0002								; Number of locals
078b			INIT_0788:
078b 00da       |    |		Load_Top	At_Offset_2
078c e405       |    |		Load	0x2,0x5
078d 011c       |    |		Execute	Any,Convert_Unchecked
078e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
078f 0092 083d  |   =|		Action	Push_String_Extended,0x83d					; " => "
0791 01cc       |    |		Execute	Vector,Catenate
0792 00ea       |    |		Load_Encached	Null_String_Cache
0793 ebff       |    |		Load	0x5,-0x1
0794 e604       |    |		Load	0x3,0x4
0795 e406       |    |		Load	0x2,0x6
0796 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0797 01cc       |    |		Execute	Vector,Catenate
0798 0007       |    |		Action	Break_Optional
0799			BODY_0788:
0799 00db       |    |		Load_Top	At_Offset_3
079a e604       |    |		Load	0x3,0x4
079b e406       |    |		Load	0x2,0x6
079c 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
079d 6802       |h   |		Jump_Zero	0x7a0
079e 00d8       |    |		Load_Top	At_Offset_0
079f 8606       |    |		Call	0x3,0x6
07a0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07a1 0000 0000  |    |		.BLANK	0000[0x7]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab       |    |		.CONST	0x07ab								; Address of begin
07a9 0004       |    |		.CONST	0x0004								; Address of exception handler
07aa 0001       |    |		.CONST	0x0001								; Number of locals
07ab			BODY_07a8:
07ab			INIT_07a8:
07ab 00da       |    |		Load_Top	At_Offset_2
07ac e604       |    |		Load	0x3,0x4
07ad e406       |    |		Load	0x2,0x6
07ae 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
07af 6839       |h9  |		Jump_Zero	0x7e9
07b0 e605       |    |		Load	0x3,0x5
07b1 6816       |h   |		Jump_Zero	0x7c8
07b2 e00a       |    |		Load	0x0,0xa
07b3 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
07b4 4807       |H   |		Short_Literal	0x7
07b5 0092 083e  |   >|		Action	Push_String_Extended,0x83e					; "The Other_Options parameter contains conflicting formats: "
07b7 e605       |    |		Load	0x3,0x5
07b8 e405       |    |		Load	0x2,0x5
07b9 011c       |    |		Execute	Any,Convert_Unchecked
07ba 1c01       |    |		Execute_Immediate	Run_Utility,0x1
07bb 01cc       |    |		Execute	Vector,Catenate
07bc 0092 083f  |   ?|		Action	Push_String_Extended,0x83f					; " & "
07be 01cc       |    |		Execute	Vector,Catenate
07bf ebff       |    |		Load	0x5,-0x1
07c0 e405       |    |		Load	0x2,0x5
07c1 011c       |    |		Execute	Any,Convert_Unchecked
07c2 1c01       |    |		Execute_Immediate	Run_Utility,0x1
07c3 01cc       |    |		Execute	Vector,Catenate
07c4 e00c       |    |		Load	0x0,0xc
07c5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07c6 e009       |    |		Load	0x0,0x9
07c7 0257       | W  |		Execute	Discrete,Raise
07c8 00da       |    |		Load_Top	At_Offset_2
07c9 460a       |F   |		Jump_Case	0xb
07ca 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x0
07cb 780c       |x   |		Jump	0x7d8								; case 0x1
07cc 7808       |x   |		Jump	0x7d5								; case 0x2
07cd 7807       |x   |		Jump	0x7d5								; case 0x3
07ce 7809       |x   |		Jump	0x7d8								; case 0x4
07cf 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x5
07d0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x6
07d1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x7
07d2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x8
07d3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x9
07d4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0xa
07d5 00da       |    |		Load_Top	At_Offset_2
07d6 a605       |    |		Store_Unchecked	0x3,0x5
07d7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07d8 4800       |H   |		Short_Literal	0x0
07d9 00db       |    |		Load_Top	At_Offset_3
07da e604       |    |		Load	0x3,0x4
07db e406       |    |		Load	0x2,0x6
07dc 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
07dd 6803       |h   |		Jump_Zero	0x7e1
07de 00da       |    |		Load_Top	At_Offset_2
07df a605       |    |		Store_Unchecked	0x3,0x5
07e0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07e1 0092 0840  |   @|		Action	Push_String_Extended,0x840					; "~"
07e3 00db       |    |		Load_Top	At_Offset_3
07e4 e405       |    |		Load	0x2,0x5
07e5 011c       |    |		Execute	Any,Convert_Unchecked
07e6 1c01       |    |		Execute_Immediate	Run_Utility,0x1
07e7 01cc       |    |		Execute	Vector,Catenate
07e8 8606       |    |		Call	0x3,0x6
07e9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07ea ; --------------------------------------------------------------------------------------
07ea ; STRING TABLE
07ea ; --------------------------------------------------------------------------------------
07ea 00b0       |    |		.STRTAB	0x00b0->0x0842							; "ADA_UNIT"
07eb 00b6       |    |		.STRTAB	0x00b6->0x0846							; "TEXT_FILE"
07ec 00bd       |    |		.STRTAB	0x00bd->0x084a							; "POSTSCRIPT_FILE"
07ed 00ca       |    |		.STRTAB	0x00ca->0x0852							; "IMAGE_FILE"
07ee 00d2       |    |		.STRTAB	0x00d2->0x0857							; "OTHER_KIND"
07ef 00da       |    |		.STRTAB	0x00da->0x085c							; "NIL"
07f0 00db       |    |		.STRTAB	0x00db->0x085d							; "ORIGINAL_RAW"
07f1 00e5       |    |		.STRTAB	0x00e5->0x0863							; "POSTSCRIPT"
07f2 00ed       |    |		.STRTAB	0x00ed->0x0868							; "FORMAT"
07f3 00f1       |    |		.STRTAB	0x00f1->0x086b							; "RAW"
07f4 00f2       |    |		.STRTAB	0x00f2->0x086d							; "BANNER_PAGE_USER_TEXT"
07f5 0105       |    |		.STRTAB	0x0105->0x0877							; "LENGTH"
07f6 0109       |    |		.STRTAB	0x0109->0x087a							; "NOTIFY"
07f7 010d       |    |		.STRTAB	0x010d->0x087d							; "SPOOL_EACH_ITEM"
07f8 011a       |    |		.STRTAB	0x011a->0x0885							; "CLASS"
07f9 011d       |    |		.STRTAB	0x011d->0x0887							; "COPIES"
07fa 0121       | !  |		.STRTAB	0x0121->0x088a							; "!Machine.Queues.User_To_Printer_Map"
07fb 0142       | B  |		.STRTAB	0x0142->0x089c							; "Original_Raw | Raw | Spool_Each_Item => Boolean, others => Unspecified"
07fc 0186       |    |		.STRTAB	0x0186->0x08bf							; "!Machine.Temporary."
07fd 0197       |    |		.STRTAB	0x0197->0x08c8							; "_"
07fe 0196       |    |		.STRTAB	0x0196->0x08c9							; "_File_To_Print_On_"
07ff 01a6       |    |		.STRTAB	0x01a6->0x08d2							; "_At_"
0800 01a8       |    |		.STRTAB	0x01a8->0x08d4							; "Unhandled exception: "
0801 01bb       |    |		.STRTAB	0x01bb->0x08de							; ", Class => "
0802 01c4       |    |		.STRTAB	0x01c4->0x08e4							; "!!"
0803 01c4       |    |		.STRTAB	0x01c4->0x08e5							; "TEXT"
0804 01c6       |    |		.STRTAB	0x01c6->0x08e7							; "PRINT: Unable to print a window image (after retries, a USE_ERROR was encountered creating "
0805 021f       |    |		.STRTAB	0x021f->0x0914							; ")"
0806 021e       |    |		.STRTAB	0x021e->0x0915							; "Mailboxes: "
0807 0227       | '  |		.STRTAB	0x0227->0x091a							; "MAIL"
0808 0229       | )  |		.STRTAB	0x0229->0x091c							; "The Other_Options parameter could not be parsed because "
0809 025f       | _  |		.STRTAB	0x025f->0x0938							; "You cannot use Postscript options in the Other_Options parameter because the currently selected printer is not a laser printer."
080a 02dc       |    |		.STRTAB	0x02dc->0x0978							; "Format => ("
080b 02e5       |    |		.STRTAB	0x02e5->0x097d							; "Queue.Options"
080c 02f0       |    |		.STRTAB	0x02f0->0x0984							; "Format => (System_Header, Wrap)"
080d 030d       |    |		.STRTAB	0x030d->0x0993							; "Copies => "
080e 0315       |    |		.STRTAB	0x0315->0x0998							; "Copies =>"
080f 031c       |    |		.STRTAB	0x031c->0x099d							; "Class => "
0810 0323       | #  |		.STRTAB	0x0323->0x09a1							; "Queue.Print (Name => \x22"
0811 0337       | 7  |		.STRTAB	0x0337->0x09ac							; "\x22, Options => \x22"
0812 0344       | D  |		.STRTAB	0x0344->0x09b4							; "\x22);"
0813 0345       | E  |		.STRTAB	0x0345->0x09b5							; "<DEFAULT>"
0814 034c       | L  |		.STRTAB	0x034c->0x09ba							; "Could not print because no objects could be resolved (Status => "
0815 038a       |    |		.STRTAB	0x038a->0x09da							; "<DIRECTORIES>"
0816 0395       |    |		.STRTAB	0x0395->0x09e0							; "Could not print because one or more of the specified objects could not be resolved (Status => "
0817 03f1       |    |		.STRTAB	0x03f1->0x0a0f							; "Could not print because one or more of the specified objects are locked"
0818 0436       | 6  |		.STRTAB	0x0436->0x0a33							; "Could not print because this job does not have access to one or more of the specified objects"
0819 0491       |    |		.STRTAB	0x0491->0x0a61							; "Could not print because the required version is not available for one or more of the specified objects"
081a 04f5       |    |		.STRTAB	0x04f5->0x0a94							; "Could not print because this operation violates a policy rule for one or more of the objects specified"
081b 0559       | Y  |		.STRTAB	0x0559->0x0ac7							; "Could not print because an unexpected resolution error was encountered (Status => "
081c 05a9       |    |		.STRTAB	0x05a9->0x0af0							; "others"
081d 05ad       |    |		.STRTAB	0x05ad->0x0af3							; "@"
081e 05ac       |    |		.STRTAB	0x05ac->0x0af4							; "<Default>"
081f 05b3       |    |		.STRTAB	0x05b3->0x0af8							; "*"
0820 05b2       |    |		.STRTAB	0x05b2->0x0af9							; "--"
0821 05b2       |    |		.STRTAB	0x05b2->0x0afa							; "The printer "
0822 05bc       |    |		.STRTAB	0x05bc->0x0b00							; " does not exist.  Please check the printer configuration"
0823 05f2       |    |		.STRTAB	0x05f2->0x0b1c							; " file for possible names."
0824 0609       |    |		.STRTAB	0x0609->0x0b28							; "Could not print because no printer assignment has been made for you ("
0825 064c       | L  |		.STRTAB	0x064c->0x0b4b							; ").  Contact your system manager.  You can also "
0826 0679       | y  |		.STRTAB	0x0679->0x0b62							; "specify an explicit printer name if you know one."
0827 06a8       |    |		.STRTAB	0x06a8->0x0b7b							; "Printing of mailboxes is not presently implemented."
0828 06d9       |    |		.STRTAB	0x06d9->0x0b94							; ", "
0829 06d9       |    |		.STRTAB	0x06d9->0x0b95							; "Postscript => ("
082a 06e6       |    |		.STRTAB	0x06e6->0x0b9d							; "Format="
082b 06eb       |    |		.STRTAB	0x06eb->0x0ba0							; "Format => "
082c 06f3       |    |		.STRTAB	0x06f3->0x0ba5							; "PostScript"
082d 06fb       |    |		.STRTAB	0x06fb->0x0baa							; "Fancy"
082e 06fe       |    |		.STRTAB	0x06fe->0x0bad							; "Plain_Text"
082f 0706       |    |		.STRTAB	0x0706->0x0bb2							; "Automatic"
0830 070d       |    |		.STRTAB	0x070d->0x0bb6							; "Twoup"
0831 0710       |    |		.STRTAB	0x0710->0x0bb9							; "Twoup => "
0832 0717       |    |		.STRTAB	0x0717->0x0bbd							; "Border"
0833 071b       |    |		.STRTAB	0x071b->0x0bc0							; "Border => "
0834 0723       | #  |		.STRTAB	0x0723->0x0bc5							; "Filename"
0835 0729       | )  |		.STRTAB	0x0729->0x0bc9							; "Filename => "
0836 0733       | 3  |		.STRTAB	0x0733->0x0bcf							; "Date"
0837 0735       | 5  |		.STRTAB	0x0735->0x0bd1							; "Date => "
0838 073b       | ;  |		.STRTAB	0x073b->0x0bd5							; "Pages="
0839 073f       | ?  |		.STRTAB	0x073f->0x0bd8							; "Pages =>"
083a 0745       | E  |		.STRTAB	0x0745->0x0bdc							; ".."
083b 0745       | E  |		.STRTAB	0x0745->0x0bdd							; "Laser"
083c 0748       | H  |		.STRTAB	0x0748->0x0be0							; " "
083d 0747       | G  |		.STRTAB	0x0747->0x0be0							; " => "
083e 0749       | I  |		.STRTAB	0x0749->0x0be2							; "The Other_Options parameter contains conflicting formats: "
083f 0781       |    |		.STRTAB	0x0781->0x0bff							; " & "
0840 0782       |    |		.STRTAB	0x0782->0x0c01							; "~"
0841 0781       |    |		.STREND 0x0781->0x0c01
0842 4144 415f  |ADA_|		.STRTAB_STRINGS
0c02 0000 0000  |    |		.BLANK	0000[0x6]
0c08 ; --------------------------------------------------------------------------------------
0c08 ; Debug Table
0c08 ; --------------------------------------------------------------------------------------
0c08 0004 0011  |    |		.DEBUG4	0x0004,0x0011,0xd63e,0x0000,0x0001,0x0000
0c0e f46a 5392  | jS |		.XXX[0x1f2]
0c10 1790 c8c2  |    |
0c12 e9fc c6d4  |    |
0c14 90af 88ee  |    |
0c16 c402 d52c  |   ,|
0c18 533b 943a  |S; :|
0c1a 7793 a247  |w  G|
0c1c 2b78 480c  |+xH |
0c1e 1ace 7b92  |  { |
0c20 fdee 3c7b  |  <{|
0c22 0031 7805  | 1x |
0c24 8002 7b91  |  { |
0c26 c407 537b  |  S{|
0c28 0031 e006  | 1  |
0c2a b392 904b  |   K|
0c2c 9525 994e  | % N|
0c2e 9cb6 1053  |   S|
0c30 4401 ff91  |D   |
0c32 8188 bf7e  |   ~|
0c34 c400 7c89  |  | |
0c36 d01b f803  |    |
0c38 6801 9ceb  |h   |
0c3a 6046 ec00  |`F  |
0c3c 594e 7b8b  |YN{ |
0c3e af68 1e7c  | h ||
0c40 f364 8f3e  | d >|
0c42 b36f 8af6  | o  |
0c44 e5c0 0758  |   X|
0c46 a5bf 1048  |   H|
0c48 be62 204a  | b J|
0c4a 2000 388d  |  8 |
0c4c 6e1f 8d4d  |n  M|
0c4e 0001 5df4  |  ] |
0c50 dda2 6a3c  |  j<|
0c52 9f7e 1148  | ~ H|
0c54 180d b018  |    |
0c56 5de0 ccc1  |]   |
0c58 a1c4 ccc3  |    |
0c5a fd0a 4c56  |  LV|
0c5c 3393 3cd6  |3 < |
0c5e 3b93 8e6e  |;  n|
0c60 cc31 c095  | 1  |
0c62 8393 4626  |  F&|
0c64 2760 326f  |'`2o|
0c66 ab91 b4cb  |    |
0c68 3a7a 444a  |:zDJ|
0c6a f000 d37d  |   }|
0c6c dad8 4361  |  Ca|
0c6e 842d 0c72  | - r|
0c70 1412 f81c  |    |
0c72 e37e 100d  | ~  |
0c74 3c01 6def  |< m |
0c76 a140 4f07  | @O |
0c78 0eb4 7892  |  x |
0c7a 0800 1cb1  |    |
0c7c 8768 7371  | hsq|
0c7e 06bb f466  |   f|
0c80 8aec 648d  |  d |
0c82 777e 8002  |w~  |
0c84 c401 8f6e  |   n|
0c86 f077 ac8d  | w  |
0c88 cc0a 7b91  |  { |
0c8a 65c0 e02b  |e  +|
0c8c ac8c a804  |    |
0c8e 4794 5791  |G W |
0c90 a77d 6c10  | }l |
0c92 0c08 4795  |  G |
0c94 b77d 7415  | }t |
0c96 bf7c 8006  | |  |
0c98 7b91 cf7c  |{  ||
0c9a 3825 d77e  |8% ~|
0c9c db92 f857  |   W|
0c9e b401 ff91  |    |
0ca0 6e99 f37c  |n  ||
0ca2 8002 c401  |    |
0ca4 ff7e f393  | ~  |
0ca6 024e 24a3  | N$ |
0ca8 f803 6403  |  d |
0caa 0c6d a134  | m 4|
0cac 8f57 280a  | W( |
0cae 237c 85f6  |#|  |
0cb0 b5f2 e085  |    |
0cb2 b001 ec51  |   Q|
0cb4 7517 6ca0  |u l |
0cb6 2802 437f  |( C |
0cb8 4c0b bd57  |L  W|
0cba f864 f606  | d  |
0cbc 4d5a bb35  |MZ 5|
0cbe 2f62 61f7  |/ba |
0cc0 2ab2 222b  |* "+|
0cc2 163d eb64  | = d|
0cc4 df95 2a0b  |  * |
0cc6 340a 6b7f  |4 k |
0cc8 180a 737d  |  s}|
0cca 6c9e f851  |l  Q|
0ccc 084e 6003  | N` |
0cce 4c0b 5451  |L TQ|
0cd0 d801 18ed  |    |
0cd2 765d c766  |v] f|
0cd4 f009 5029  |  P)|
0cd6 5396 14fb  |S   |
0cd8 a81d 35f3  |  5 |
0cda c761 5b6b  | a[k|
0cdc 340a 7002  |4 p |
0cde e851 4791  | QG |
0ce0 8f19 f036  |   6|
0ce2 0e61 41f1  | aA |
0ce4 1793 bd9d  |    |
0ce6 765e d235  |v^ 5|
0ce8 1b95 502b  |  P+|
0cea d42f 7053  | /pS|
0cec 1809 6c49  |  lI|
0cee 6df2 b37f  |m   |
0cf0 6850 a393  |hP  |
0cf2 9051 183b  | Q ;|
0cf4 12ca ad3b  |   ;|
0cf6 316f cc51  |1o Q|
0cf8 1792 1c9e  |    |
0cfa 4d5a 8779  |MZ y|
0cfc c394 c1c3  |    |
0cfe 316d 8452  |1m R|
0d00 8dff ea3d  |   =|
0d02 14c8 9406  |    |
0d04 d465 4967  | eIg|
0d06 8852 9adc  | R  |
0d08 8696 9970  |   p|
0d0a 4f92 3c53  |O <S|
0d0c 748b f76c  |t  l|
0d0e d82a 1815  | *  |
0d10 f550 5e7d  | P^}|
0d12 09f3 9404  |    |
0d14 877c 0403  | |  |
0d16 9718 326f  |  2o|
0d18 25f0 6920  |% i |
0d1a 9406 8395  |    |
0d1c 15f3 602c  |  `,|
0d1e 55f5 8c08  |U   |
0d20 1c09 b9d6  |    |
0d22 252c d9d7  |%,  |
0d24 b006 fd9a  |    |
0d26 567c 4008  |V|@ |
0d28 7c17 5407  || T |
0d2a 35f1 2cd7  |5 , |
0d2c 8228 e00a  | (  |
0d2e 1b92 2c08  |  , |
0d30 55f5 1938  |U  8|
0d32 4289 f52e  |B  .|
0d34 a0f6 acf6  |    |
0d36 e5da f805  |    |
0d38 9549 9d48  | I H|
0d3a a006 d795  |    |
0d3c de13 c139  |   9|
0d3e 000a 8001  |    |
0d40 bf91 c5be  |    |
0d42 bc4d f791  | M  |
0d44 94ef ed10  |    |
0d46 2ce6 60be  |, ` |
0d48 9e48 b407  | H  |
0d4a 0403 c003  |    |
0d4c 1843 0401  | C  |
0d4e d29e e9ff  |    |
0d50 d72c ad8e  | ,  |
0d52 d616 e6d2  |    |
0d54 fb47 5451  | GTQ|
0d56 d401 b322  |   "|
0d58 fb45 0460  | E `|
0d5a 0001 d400  |    |
0d5c d8fe 8efb  |    |
0d5e 8b96 16bf  |    |
0d60 dd3c f863  | < c|
0d62 0408 ba82  |    |
0d64 5483 0801  |T   |
0d66 2c4f 3003  |,O0 |
0d68 2f95 8402  |/   |
0d6a bdd1 3802  |  8 |
0d6c 55c6 0e2f  |U  /|
0d6e fb57 087c  | W ||
0d70 8200 8a02  |    |
0d72 e150 b2f1  | P  |
0d74 fe19 0a68  |   h|
0d76 45fa 94d3  |E   |
0d78 98cb 29ba  |  ) |
0d7a 2049 24d3  | I$ |
0d7c 90ef c8e4  |    |
0d7e 8803 4d66  |  Mf|
0d80 cc00 768a  |  v |
0d82 6090 0460  |`  `|
0d84 ef40 ed2e  | @ .|
0d86 4929 6184  |I)a |
0d88 736a 0c1f  |sj  |
0d8a f394 95ae  |    |
0d8c 9ec7 6601  |  f |
0d8e f073 f397  | s  |
0d90 25cb 5e7b  |% ^{|
0d92 2b47 c13a  |+G :|
0d94 8e8f 4ede  |  N |
0d96 e470 7948  | pyH|
0d98 26ac 9ee9  |&   |
0d9a eca2 f002  |    |
0d9c 2cc5 96d2  |,   |
0d9e dad1 c4ea  |    |
0da0 5604 e154  |V  T|
0da2 8ec5 f073  |   s|
0da4 0005 9883  |    |
0da6 48c0 19f9  |H   |
0da8 5c8b 82be  |\   |
0daa ac30 e8f9  | 0  |
0dac a734 147a  | 4 z|
0dae c000 b407  |    |
0db0 55c2 3464  |U 4d|
0db2 56c7 6ebf  |V n |
0db4 35ce 186c  |5  l|
0db6 147a 8483  | z  |
0db8 dce3 7e6b  |  ~k|
0dba 1809 0002  |    |
0dbc 4c84 2398  |L # |
0dbe b93c 3328  | <3(|
0dc0 1478 186c  | x l|
0dc2 6b68 2079  |kh y|
0dc4 0b9a ce81  |    |
0dc6 9ea4 7803  |  x |
0dc8 1415 52f7  |  R |
0dca 4860 b0bc  |H`  |
0dcc 239a 2e29  |# .)|
0dce f328 0001  | (  |
0dd0 9ce8 f340  |   @|
0dd2 a854 90ee  | T  |
0dd4 e730 8201  | 0  |
0dd6 c78d 7f83  |    |
0dd8 f824 4c60  | $L`|
0dda bf9a 50e9  |  P |
0ddc 0a01 2864  |  (d|
0dde 9425 24d2  | %$ |
0de0 0074 b9f3  | t  |
0de2 6456 e78e  |dV  |
0de4 6c59 ea0e  |lY  |
0de6 2c16 11d4  |,   |
0de8 503b af97  |P;  |
0dea 98cb 3000  |  0 |
0dec 209d e256  |   V|
0dee 2c17 c5ec  |,   |
0df0 9e59 9e40  | Y @|
0df2 880c 782f  |  x/|
0df4 3000 f716  |0   |
0df6 a598 3c34  |  <4|
0df8 8401 d0c6  |    |
0dfa e6a7 6f67  |  og|
0dfc 89a9 fdd6  |    |
0dfe 0072 f875  | r u|