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

⟦9f472a3ad⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

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 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 01d8       |    |		.CONST	0x01d8								; 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 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0033       | 3  |		.CONST	0x0033								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0014       |    |		.CONST	0x0014								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x020a,0xc000,0x0000,0x0058,0x5be5,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 4804       |H   |		Short_Literal	0x4
0010 029f 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Call
0012 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0013 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x4 = 0x13,0xfffb
0014 4801       |H   |		Short_Literal	0x1
0015 00db       |    |		Load_Top	At_Offset_3
0016 4801       |H   |		Short_Literal	0x1
0017 e001       |    |		Load	0x0,0x1
0018 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0019 1b2f       | /  |		Execute	Package,Field_Read,Field_Number 0x2f
001a 029f 0053  |   S|		Declare_Subprogram	INIT_0050,For_Call
001c 4802       |H   |		Short_Literal	0x2
001d 4800       |H   |		Short_Literal	0x0
001e 4802       |H   |		Short_Literal	0x2
001f 4800       |H   |		Short_Literal	0x0
0020 4801       |H   |		Short_Literal	0x1
0021 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
0022 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x22,0xfffa
0024 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x24,0xfff9
0026 00bf       |    |		Action	Accept_Activation
0027 613c       |a<  |		Indirect_Literal	Discrete,0x164,{0x00000000, 0x00586245}		; Debug Table 0x1 = .DEBUG	0x0027,0x021a,0xc000,0x0000,0x0058,0x6245,0x0000,0x0007
													; Debug Table 0x1.0x0 = 0x27,0xffff
0028 4808       |H   |		Short_Literal	0x8
0029 e20f       |    |		Load	0x1,0xf
002a e002       |    |		Load	0x0,0x2
002b 0387       |    |		Declare_Variable	Package
002c 00d8       |    |		Load_Top	At_Offset_0
002d 020f       |    |		Execute	Module,Activate
002e 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x2e,0xfffe
002f 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x2 = 0x2f,0xfffd
0030 00c7       |    |		Action	Elaborate_Subprogram
0031 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x3 = 0x31,0xfffc
0032 00c7       |    |		Action	Elaborate_Subprogram
0033			BODY_0008:
0033 00bc       |    |		Action	Signal_Activated
0034 00bb       |    |		Action	Signal_Completion
0035 0000 0000  |    |		.XXX[0x3]
0037 0000       |    |
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b       | ;  |		.CONST	0x003b								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0001       |    |		.CONST	0x0001								; Number of locals
003b			BODY_0038:
003b			INIT_0038:
003b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x003b,0x0224,0x1005,0x0000,0x0058,0x5be5,0x0000,0x001a
003c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
003d 7802       |x   |		Jump	0x40								; case 0x1
003e 7805       |x   |		Jump	0x44								; case 0x2
003f 7809       |x   |		Jump	0x49								; case 0x3
0040 00da       |    |		Load_Top	At_Offset_2
0041 0091 0168  |   h|		Action	Push_String_Extended_Indexed,0x168				; "NOT_SPECIAL"
0043 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0044 00db       |    |		Load_Top	At_Offset_3
0045 00db       |    |		Load_Top	At_Offset_3
0046 00e0       |    |		Load_Encached	Standard_Cache
0047 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0048 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0049 00da       |    |		Load_Top	At_Offset_2
004a 00e0       |    |		Load_Encached	Standard_Cache
004b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
004c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
004d 0000 0000  |    |		.XXX[0x3]
004f 0000       |    |
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 4608       |F   |		Jump_Case	0x9							; Debug Table 0x3 = .DEBUG	0x0053,0x0226,0x1005,0x0000,0x0058,0x5be5,0x0000,0x0023
0054 7808       |x   |		Jump	0x5d								; case 0x0
0055 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0056 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0057 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0058 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0059 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
005a 7816       |x   |		Jump	0x71								; case 0x6
005b 7822       |x"  |		Jump	0x7e								; case 0x7
005c 7831       |x1  |		Jump	0x8e								; case 0x8
005d 00da       |    |		Load_Top	At_Offset_2
005e 016c       | l  |		Execute	Variant_Record,Is_Constrained
005f 7009       |p   |		Jump_Nonzero	0x69
0060 00cf       |    |		Action	Mark_Auxiliary
0061 4800       |H   |		Short_Literal	0x0
0062 e5ff       |    |		Load	0x2,-0x1
0063 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0064 00d8       |    |		Load_Top	At_Offset_0
0065 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0066 c5ff       |    |		Store	0x2,-0x1
0067 00ce       |    |		Action	Pop_Auxiliary
0068 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0069 00da       |    |		Load_Top	At_Offset_2
006a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
006b 4604       |F   |		Jump_Case	0x5
006c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
006d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
006e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
006f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0070 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0071 00db       |    |		Load_Top	At_Offset_3
0072 4604       |F   |		Jump_Case	0x5
0073 7804       |x   |		Jump	0x78								; case 0x0
0074 7803       |x   |		Jump	0x78								; case 0x1
0075 7802       |x   |		Jump	0x78								; case 0x2
0076 7803       |x   |		Jump	0x7a								; case 0x3
0077 7804       |x   |		Jump	0x7c								; case 0x4
0078 48ff       |H   |		Short_Literal	0xff
0079 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
007a 4801       |H   |		Short_Literal	0x1
007b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
007c 4802       |H   |		Short_Literal	0x2
007d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
007e 00db       |    |		Load_Top	At_Offset_3
007f e5fe       |    |		Load	0x2,-0x2
0080 4604       |F   |		Jump_Case	0x5
0081 7804       |x   |		Jump	0x86								; case 0x0
0082 7803       |x   |		Jump	0x86								; case 0x1
0083 7802       |x   |		Jump	0x86								; case 0x2
0084 7803       |x   |		Jump	0x88								; case 0x3
0085 7804       |x   |		Jump	0x8a								; case 0x4
0086 48ff       |H   |		Short_Literal	0xff
0087 7803       |x   |		Jump	0x8b
0088 4801       |H   |		Short_Literal	0x1
0089 7801       |x   |		Jump	0x8b
008a 4802       |H   |		Short_Literal	0x2
008b e5ff       |    |		Load	0x2,-0x1
008c 031b       |    |		Declare_Type	Variant_Record,Constrained
008d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
008e 00db       |    |		Load_Top	At_Offset_3
008f e5fe       |    |		Load	0x2,-0x2
0090 e5ff       |    |		Load	0x2,-0x1
0091 1c06       |    |		Execute_Immediate	Run_Utility,0x6
0092 e5ff       |    |		Load	0x2,-0x1
0093 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0094 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0095 0000 0000  |    |		.XXX[0x3]
0097 0000       |    |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a2       |    |		.CONST	0x00a2								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0005       |    |		.CONST	0x0005								; Number of locals
009b			INIT_0098:
009b e20f       |    |		Load	0x1,0xf								; Debug Table 0x4 = .DEBUG	0x009b,0x0228,0x1001,0x0000,0x0058,0x5be5,0x0000,0x004c
													; Debug Table 0x4.0x0 = 0x9b,0xffff
009c 0007       |    |		Action	Break_Optional
009d e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x1 = 0x9d,0xfffe
009e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
009f 1b2f       | /  |		Execute	Package,Field_Read,Field_Number 0x2f
00a0 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x2 = 0xa0,0xfffd
00a1 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x3 = 0xa1,0xfffc
00a2			BODY_0098:
00a2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x4 = 0xa2,0x1
00a3 01db       |    |		Execute	Vector,Length
00a4 0d02       |    |		Execute_Immediate	Less,0x2
00a5 700c       |p   |		Jump_Nonzero	0xb2
00a6 e5ff       |    |		Load	0x2,-0x1
00a7 01dd       |    |		Execute	Vector,First
00a8 e5ff       |    |		Load	0x2,-0x1
00a9 01d7       |    |		Execute	Vector,Field_Read
00aa 0e3c       | <  |		Execute_Immediate	Not_Equal,0x3c
00ab e5ff       |    |		Load	0x2,-0x1
00ac 01dc       |    |		Execute	Vector,Last
00ad e5ff       |    |		Load	0x2,-0x1
00ae 01d7       |    |		Execute	Vector,Field_Read
00af 0e3e       | >  |		Execute_Immediate	Not_Equal,0x3e
00b0 0278       | x  |		Execute	Discrete,Or
00b1 6806       |h   |		Jump_Zero	0xb8
00b2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x5 = 0xb2,0x2
00b3 e211       |    |		Load	0x1,0x11
00b4 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00b5 e5fe       |    |		Load	0x2,-0x2
00b6 016d       | m  |		Execute	Variant_Record,Structure_Write
00b7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x4.0x6 = 0xb7,0x3
00b8 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x7 = 0xb8,0x4
00b9 e001       |    |		Load	0x0,0x1
00ba 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00bb 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
00bc 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
00bd 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x8 = 0xbd,0x5
00be 00e1       |    |		Load_Encached	Boolean_Cache
00bf e214       |    |		Load	0x1,0x14
00c0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00c1 e5ff       |    |		Load	0x2,-0x1
00c2 01dd       |    |		Execute	Vector,First
00c3 0a01       |    |		Execute_Immediate	Plus,0x1
00c4 0248       | H  |		Execute	Discrete,Check_In_Integer
00c5 e5ff       |    |		Load	0x2,-0x1
00c6 01dc       |    |		Execute	Vector,Last
00c7 0aff       |    |		Execute_Immediate	Plus,-0x1
00c8 0248       | H  |		Execute	Discrete,Check_In_Integer
00c9 e5ff       |    |		Load	0x2,-0x1
00ca 01cf       |    |		Execute	Vector,Slice_Read
00cb e214       |    |		Load	0x1,0x14
00cc 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00cd c402       |    |		Store	0x2,0x2
00ce 005b       | [  |		Store_Top	Discrete,At_Offset_3
00cf 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00d0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x9 = 0xd0,0x6
00d1 0b00       |    |		Execute_Immediate	Case_Compare,0x0
00d2 7015       |p   |		Jump_Nonzero	0xe8
00d3 0b01       |    |		Execute_Immediate	Case_Compare,0x1
00d4 7015       |p   |		Jump_Nonzero	0xea
00d5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xa = 0xd5,0xd
00d6 00da       |    |		Load_Top	At_Offset_2
00d7 0278       | x  |		Execute	Discrete,Or
00d8 6806       |h   |		Jump_Zero	0xdf
00d9 4802       |H   |		Short_Literal	0x2							; Debug Table 0x4.0xb = 0xd9,0xe
00da e211       |    |		Load	0x1,0x11
00db 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00dc e5fe       |    |		Load	0x2,-0x2
00dd 016d       | m  |		Execute	Variant_Record,Structure_Write
00de 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00df 4804       |H   |		Short_Literal	0x4							; Debug Table 0x4.0xc = 0xdf,0xf
00e0 e211       |    |		Load	0x1,0x11
00e1 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00e2 e403       |    |		Load	0x2,0x3
00e3 00d9       |    |		Load_Top	At_Offset_1
00e4 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
00e5 e5fe       |    |		Load	0x2,-0x2
00e6 016d       | m  |		Execute	Variant_Record,Structure_Write
00e7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00e8 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x4.0xd = 0xe8,0x7
00e9 0257       | W  |		Execute	Discrete,Raise
00ea 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0xe = 0xea,0x8
00eb 6809       |h   |		Jump_Zero	0xf5
00ec 4803       |H   |		Short_Literal	0x3							; Debug Table 0x4.0xf = 0xec,0x9
00ed e211       |    |		Load	0x1,0x11
00ee 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00ef e402       |    |		Load	0x2,0x2
00f0 00d9       |    |		Load_Top	At_Offset_1
00f1 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
00f2 e5fe       |    |		Load	0x2,-0x2
00f3 016d       | m  |		Execute	Variant_Record,Structure_Write
00f4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00f5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x10 = 0xf5,0xa
00f6 6806       |h   |		Jump_Zero	0xfd
00f7 4802       |H   |		Short_Literal	0x2							; Debug Table 0x4.0x11 = 0xf7,0xb
00f8 e211       |    |		Load	0x1,0x11
00f9 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00fa e5fe       |    |		Load	0x2,-0x2
00fb 016d       | m  |		Execute	Variant_Record,Structure_Write
00fc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00fd 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x12 = 0xfd,0xc
00fe e211       |    |		Load	0x1,0x11
00ff 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0100 e5fe       |    |		Load	0x2,-0x2
0101 016d       | m  |		Execute	Variant_Record,Structure_Write
0102 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0103 0000 0000  |    |		.BLANK	0000[0x5]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010f       |    |		.CONST	0x010f								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0002       |    |		.CONST	0x0002								; Number of locals
010b			INIT_0108:
010b e211       |    |		Load	0x1,0x11							; Debug Table 0x5 = .DEBUG	0x010b,0x0250,0x1002,0x0000,0x0058,0x5be5,0x0000,0x0058
													; Debug Table 0x5.0x0 = 0x10b,0xffff
010c 02ff       |    |		Declare_Variable	Variant_Record
010d 00d8       |    |		Load_Top	At_Offset_0
010e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
010f			BODY_0108:
010f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x1 = 0x10f,0x1
0110 e5ff       |    |		Load	0x2,-0x1
0111 8212       |    |		Call	0x1,0x12
0112 00d1       |    |		Pop_Control	Pop_Count_1
0113 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x2 = 0x113,0x2
0114 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0115 4604       |F   |		Jump_Case	0x5
0116 781f       |x   |		Jump	0x136								; case 0x0
0117 7820       |x   |		Jump	0x138								; case 0x1
0118 7833       |x3  |		Jump	0x14c								; case 0x2
0119 7801       |x   |		Jump	0x11b								; case 0x3
011a 781b       |x   |		Jump	0x136								; case 0x4
011b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x3 = 0x11b,0x3
011c 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
011d e5fe       |    |		Load	0x2,-0x2
011e 027f       |    |		Execute	Discrete,Equal
011f 6802       |h   |		Jump_Zero	0x122
0120 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x4 = 0x120,0x4
0121 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0122 0092 016d  |   m|		Action	Push_String_Extended,0x16d					; "The only valid option is <"
													; Debug Table 0x5.0x5 = 0x122,0x5
0124 e5fe       |    |		Load	0x2,-0x2
0125 e20f       |    |		Load	0x1,0xf
0126 0122       | "  |		Execute	Any,Make_Root_Type
0127 025e       | ^  |		Execute	Discrete,Convert
0128 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0129 01cc       |    |		Execute	Vector,Catenate
012a 0092 016e  |   n|		Action	Push_String_Extended,0x16e					; ">.  The option specification, "
012c 01cc       |    |		Execute	Vector,Catenate
012d e5ff       |    |		Load	0x2,-0x1
012e 01cc       |    |		Execute	Vector,Catenate
012f 0092 016f  |   o|		Action	Push_String_Extended,0x16f					; ", is not allowed."
0131 01cc       |    |		Execute	Vector,Catenate
0132 e5fd       |    |		Load	0x2,-0x3
0133 e003       |    |		Load	0x0,0x3
0134 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0135 7829       |x)  |		Jump	0x15f
0136 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x6 = 0x136,0x6
0137 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0138 0092 016d  |   m|		Action	Push_String_Extended,0x16d					; "The only valid option is <"
													; Debug Table 0x5.0x7 = 0x138,0x7
013a e5fe       |    |		Load	0x2,-0x2
013b e20f       |    |		Load	0x1,0xf
013c 0122       | "  |		Execute	Any,Make_Root_Type
013d 025e       | ^  |		Execute	Discrete,Convert
013e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
013f 01cc       |    |		Execute	Vector,Catenate
0140 0092 016e  |   n|		Action	Push_String_Extended,0x16e					; ">.  The option specification, "
0142 01cc       |    |		Execute	Vector,Catenate
0143 e5ff       |    |		Load	0x2,-0x1
0144 01cc       |    |		Execute	Vector,Catenate
0145 0092 0170  |   p|		Action	Push_String_Extended,0x170					; ", matches no known option"
0147 01cc       |    |		Execute	Vector,Catenate
0148 e5fd       |    |		Load	0x2,-0x3
0149 e003       |    |		Load	0x0,0x3
014a 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
014b 7813       |x   |		Jump	0x15f
014c 0092 016d  |   m|		Action	Push_String_Extended,0x16d					; "The only valid option is <"
													; Debug Table 0x5.0x8 = 0x14c,0x8
014e e5fe       |    |		Load	0x2,-0x2
014f e20f       |    |		Load	0x1,0xf
0150 0122       | "  |		Execute	Any,Make_Root_Type
0151 025e       | ^  |		Execute	Discrete,Convert
0152 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0153 01cc       |    |		Execute	Vector,Catenate
0154 0092 016e  |   n|		Action	Push_String_Extended,0x16e					; ">.  The option specification, "
0156 01cc       |    |		Execute	Vector,Catenate
0157 e5ff       |    |		Load	0x2,-0x1
0158 01cc       |    |		Execute	Vector,Catenate
0159 0092 0171  |   q|		Action	Push_String_Extended,0x171					; ", is an ambiguous option prefix."
015b 01cc       |    |		Execute	Vector,Catenate
015c e5fd       |    |		Load	0x2,-0x3
015d e003       |    |		Load	0x0,0x3
015e 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
015f 4831       |H1  |		Short_Literal	0x31
0160 0257       | W  |		Execute	Discrete,Raise
0161 0000 0000  |    |		.XXX[0x3]
0163 0000       |    |
0164 0000 0000  |    |		.LITERAL	{0x00000000, 0x00586245}
0168 ; --------------------------------------------------------------------------------------
0168 ; STRING TABLE
0168 ; --------------------------------------------------------------------------------------
0168 0016       |    |		.STRTAB	0x0016->0x0173							; "NOT_SPECIAL"
0169 001f       |    |		.STRTAB	0x001f->0x0178							; "UNKNOWN"
016a 0024       | $  |		.STRTAB	0x0024->0x017c							; "AMBIGUOUS"
016b 002b       | +  |		.STRTAB	0x002b->0x0180							; "OPTION"
016c 002f       | /  |		.STRTAB	0x002f->0x0183							; "DIRECTORY_SPECIAL_STRING"
016d 0045       | E  |		.STRTAB	0x0045->0x018f							; "The only valid option is <"
016e 005d       | ]  |		.STRTAB	0x005d->0x019c							; ">.  The option specification, "
016f 0079       | y  |		.STRTAB	0x0079->0x01ab							; ", is not allowed."
0170 0088       |    |		.STRTAB	0x0088->0x01b4							; ", matches no known option"
0171 009f       |    |		.STRTAB	0x009f->0x01c0							; ", is an ambiguous option prefix."
0172 00bd       |    |		.STREND 0x00bd->0x01d0
0173 4e4f 545f  |NOT_|		.STRTAB_STRINGS
01d1 0000 0000  |    |		.BLANK	0000[0x7]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; Debug Table
01d8 ; --------------------------------------------------------------------------------------
01d8 0003 0006  |    |		.CONST	0x0003,0x0006
01da 000b 020a  |    |		.DEBUG	0x000b,0x020a,0xc000,0x0000,0x0058,0x5be5,0x0000,0x0007
01e2 0027 021a  | '  |		.DEBUG	0x0027,0x021a,0xc000,0x0000,0x0058,0x6245,0x0000,0x0007
01ea 003b 0224  | ; $|		.DEBUG	0x003b,0x0224,0x1005,0x0000,0x0058,0x5be5,0x0000,0x001a
01f2 0053 0226  | S &|		.DEBUG	0x0053,0x0226,0x1005,0x0000,0x0058,0x5be5,0x0000,0x0023
01fa 009b 0228  |   (|		.DEBUG	0x009b,0x0228,0x1001,0x0000,0x0058,0x5be5,0x0000,0x004c
0202 010b 0250  |   P|		.DEBUG	0x010b,0x0250,0x1002,0x0000,0x0058,0x5be5,0x0000,0x0058
020a ; --------------------------------------------------------------------------------------
020a ; Debug3 Subtable 0x0
020a ; --------------------------------------------------------------------------------------
020a 0007 0000  |    |		.DBG3TAB	0x0007,0x0000
020c 000b ffff  |    |		.CONST	0x000b,0xffff
020e 000c fffe  |    |		.CONST	0x000c,0xfffe
0210 000d fffd  |    |		.CONST	0x000d,0xfffd
0212 000e fffc  |    |		.CONST	0x000e,0xfffc
0214 0013 fffb  |    |		.CONST	0x0013,0xfffb
0216 0022 fffa  | "  |		.CONST	0x0022,0xfffa
0218 0024 fff9  | $  |		.CONST	0x0024,0xfff9
021a ; --------------------------------------------------------------------------------------
021a ; Debug3 Subtable 0x1
021a ; --------------------------------------------------------------------------------------
021a 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
021c 0027 ffff  | '  |		.CONST	0x0027,0xffff
021e 002e fffe  | .  |		.CONST	0x002e,0xfffe
0220 002f fffd  | /  |		.CONST	0x002f,0xfffd
0222 0031 fffc  | 1  |		.CONST	0x0031,0xfffc
0224 ; --------------------------------------------------------------------------------------
0224 ; Debug3 Subtable 0x2
0224 ; --------------------------------------------------------------------------------------
0224 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0226 ; --------------------------------------------------------------------------------------
0226 ; Debug3 Subtable 0x3
0226 ; --------------------------------------------------------------------------------------
0226 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0228 ; --------------------------------------------------------------------------------------
0228 ; Debug3 Subtable 0x4
0228 ; --------------------------------------------------------------------------------------
0228 0004 000f  |    |		.DBG3TAB	0x0004,0x000f
022a 009b ffff  |    |		.CONST	0x009b,0xffff
022c 009d fffe  |    |		.CONST	0x009d,0xfffe
022e 00a0 fffd  |    |		.CONST	0x00a0,0xfffd
0230 00a1 fffc  |    |		.CONST	0x00a1,0xfffc
0232 00a2 0001  |    |		.CONST	0x00a2,0x0001
0234 00b2 0002  |    |		.CONST	0x00b2,0x0002
0236 00b7 0003  |    |		.CONST	0x00b7,0x0003
0238 00b8 0004  |    |		.CONST	0x00b8,0x0004
023a 00bd 0005  |    |		.CONST	0x00bd,0x0005
023c 00d0 0006  |    |		.CONST	0x00d0,0x0006
023e 00d5 000d  |    |		.CONST	0x00d5,0x000d
0240 00d9 000e  |    |		.CONST	0x00d9,0x000e
0242 00df 000f  |    |		.CONST	0x00df,0x000f
0244 00e8 0007  |    |		.CONST	0x00e8,0x0007
0246 00ea 0008  |    |		.CONST	0x00ea,0x0008
0248 00ec 0009  |    |		.CONST	0x00ec,0x0009
024a 00f5 000a  |    |		.CONST	0x00f5,0x000a
024c 00f7 000b  |    |		.CONST	0x00f7,0x000b
024e 00fd 000c  |    |		.CONST	0x00fd,0x000c
0250 ; --------------------------------------------------------------------------------------
0250 ; Debug3 Subtable 0x5
0250 ; --------------------------------------------------------------------------------------
0250 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0252 010b ffff  |    |		.CONST	0x010b,0xffff
0254 010f 0001  |    |		.CONST	0x010f,0x0001
0256 0113 0002  |    |		.CONST	0x0113,0x0002
0258 011b 0003  |    |		.CONST	0x011b,0x0003
025a 0120 0004  |    |		.CONST	0x0120,0x0004
025c 0122 0005  | "  |		.CONST	0x0122,0x0005
025e 0136 0006  | 6  |		.CONST	0x0136,0x0006
0260 0138 0007  | 8  |		.CONST	0x0138,0x0007
0262 014c 0008  | L  |		.CONST	0x014c,0x0008
0264 0000 0000  |    |		.BLANK	0000[0x19c]