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

⟦23386c8d4⟧

    Length: 4096 (0x1000)
    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 04d0       |    |		.CONST	0x04d0								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0055       | U  |		.CONST	0x0055								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001e       |    |		.CONST	0x001e								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0 = .DEBUG	0x000b,0x056a,0x0000,0x0000,0x0055,0xe795,0x0000,0x0f41
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 4802       |H   |		Short_Literal	0x2
000d 029f 005b  |   [|		Declare_Subprogram	INIT_0058,For_Call
000f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0010 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0x10,0xfffe
0012 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x12,0xfffd
0014 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x14,0xfffc
0016 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x16,0xfffb
0018 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x18,0xfffa
001a 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x1a,0xfff9
001c 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x1c,0xfff8
001e 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1e,0xfff7
0020 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x20,0xfff6
0022 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x22,0xfff5
0024 029a 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x24,0xfff4
0026 029a 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x26,0xfff3
0028 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0xd = 0x28,0xfff2
0029 481f       |H   |		Short_Literal	0x1f
002a 00e3       |    |		Load_Encached	Natural_Cache
002b 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
002c 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x2c,0xfff1
002e 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x2e,0xfff0
0030 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x30,0xffef
0032 029a 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x32,0xffee
0034 00bf       |    |		Action	Accept_Activation
0035 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1 = .DEBUG	0x0035,0x0590,0x0000,0x0000,0x0057,0x7a35,0x0000,0x000a
													; Debug Table 0x1.0x0 = 0x35,0xffff
													; Debug Table 0x1.0x1 = 0x35,0xfffe
													; Debug Table 0x1.0x2 = 0x35,0xfffd
													; Debug Table 0x1.0x3 = 0x35,0xfffc
0036 00c7       |    |		Action	Elaborate_Subprogram
0037 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x4 = 0x37,0xfffb
0038 00c7       |    |		Action	Elaborate_Subprogram
0039 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x5 = 0x39,0xfffa
003a 00c7       |    |		Action	Elaborate_Subprogram
003b 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x6 = 0x3b,0xfff9
003c 00c7       |    |		Action	Elaborate_Subprogram
003d 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x7 = 0x3d,0xfff8
003e 00c7       |    |		Action	Elaborate_Subprogram
003f 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x8 = 0x3f,0xfff7
0040 00c7       |    |		Action	Elaborate_Subprogram
0041 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x9 = 0x41,0xfff6
0042 00c7       |    |		Action	Elaborate_Subprogram
0043 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xa = 0x43,0xfff5
0044 00c7       |    |		Action	Elaborate_Subprogram
0045 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xb = 0x45,0xfff4
0046 00c7       |    |		Action	Elaborate_Subprogram
0047 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xc = 0x47,0xfff3
0048 00c7       |    |		Action	Elaborate_Subprogram
0049 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xd = 0x49,0xfff2
004a 00c7       |    |		Action	Elaborate_Subprogram
004b 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xe = 0x4b,0xfff1
004c 00c7       |    |		Action	Elaborate_Subprogram
004d 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0xf = 0x4d,0xfff0
004e 00c7       |    |		Action	Elaborate_Subprogram
004f 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x10 = 0x4f,0xffef
0050 00c7       |    |		Action	Elaborate_Subprogram
0051 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x11 = 0x51,0xffee
0052 00c7       |    |		Action	Elaborate_Subprogram
0053 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x12 = 0x53,0xffed
0054 00c7       |    |		Action	Elaborate_Subprogram
0055			BODY_0008:
0055 00bc       |    |		Action	Signal_Activated
0056 00bb       |    |		Action	Signal_Completion
0057 0000       |    |		.XXX[0x1]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b       | [  |		.CONST	0x005b								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0001       |    |		.CONST	0x0001								; Number of locals
005b			BODY_0058:
005b			INIT_0058:
005b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x005b,0x05b8,0x0005,0x0000,0x0055,0xe795,0x0000,0x0f42
005c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
005d 7802       |x   |		Jump	0x60								; case 0x1
005e 7805       |x   |		Jump	0x64								; case 0x2
005f 7809       |x   |		Jump	0x69								; case 0x3
0060 00da       |    |		Load_Top	At_Offset_2
0061 0091 0414  |    |		Action	Push_String_Extended_Indexed,0x414				; "NOT_A_LIBRARY"
0063 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0064 00db       |    |		Load_Top	At_Offset_3
0065 00db       |    |		Load_Top	At_Offset_3
0066 00e0       |    |		Load_Encached	Standard_Cache
0067 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0068 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0069 00da       |    |		Load_Top	At_Offset_2
006a 00e0       |    |		Load_Encached	Standard_Cache
006b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
006c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
006d 0000 0000  |    |		.XXX[0x3]
006f 0000       |    |
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 007a       | z  |		.CONST	0x007a								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0003       |    |		.CONST	0x0003								; Number of locals
0073			INIT_0070:
0073 e001       |    |		Load	0x0,0x1								; Debug Table 0x3 = .DEBUG	0x0073,0x05ba,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f49
													; Debug Table 0x3.0x0 = 0x73,0xffff
0074 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0075 02c7       |    |		Declare_Variable	Any
0076 00d8       |    |		Load_Top	At_Offset_0
0077 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0078 e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x1 = 0x78,0xfffe
0079 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
007a			BODY_0070:
007a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x2 = 0x7a,0x1
007b e002       |    |		Load	0x0,0x2
007c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
007d 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
007e 6802       |h   |		Jump_Zero	0x81
007f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x3 = 0x7f,0x2
0080 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0081 e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x4 = 0x81,0x3
0082 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0083 00da       |    |		Load_Top	At_Offset_2
0084 0120       |    |		Execute	Any,Is_Value
0085 6803       |h   |		Jump_Zero	0x89
0086 e001       |    |		Load	0x0,0x1
0087 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0088 7801       |x   |		Jump	0x8a
0089 00da       |    |		Load_Top	At_Offset_2
008a e5ff       |    |		Load	0x2,-0x1
008b e002       |    |		Load	0x0,0x2
008c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
008d 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
008e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
008f c402       |    |		Store	0x2,0x2
0090 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0091 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x5 = 0x91,0x4
0092 6802       |h   |		Jump_Zero	0x95
0093 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x6 = 0x93,0x5
0094 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0095 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x7 = 0x95,0x6
0096 e001       |    |		Load	0x0,0x1
0097 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0098 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0099 7002       |p   |		Jump_Nonzero	0x9c
009a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x8 = 0x9a,0x7
009b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
009c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x9 = 0x9c,0x8
009d e001       |    |		Load	0x0,0x1
009e 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
009f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00a0 6802       |h   |		Jump_Zero	0xa3
00a1 4802       |H   |		Short_Literal	0x2							; Debug Table 0x3.0xa = 0xa1,0x9
00a2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0xb = 0xa3,0xa
00a4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a5 0000 0000  |    |		.XXX[0x3]
00a7 0000       |    |
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ae       |    |		.CONST	0x00ae								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0002       |    |		.CONST	0x0002								; Number of locals
00ab			INIT_00a8:
00ab e002       |    |		Load	0x0,0x2								; Debug Table 0x4 = .DEBUG	0x00ab,0x05d4,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f56
													; Debug Table 0x4.0x0 = 0xab,0xffff
00ac 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ad 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ae			BODY_00a8:
00ae 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x1 = 0xae,0x1
00af e002       |    |		Load	0x0,0x2
00b0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00b1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b2 e5ff       |    |		Load	0x2,-0x1
00b3 e002       |    |		Load	0x0,0x2
00b4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00b5 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
00b6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00b7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x2 = 0xb7,0x2
00b8 820e       |    |		Call	0x1,0xe
00b9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ba 0000 0000  |    |		.BLANK	0000[0x6]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00c3,0x05dc,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f63
													; Debug Table 0x5.0x0 = 0xc3,0x1
00c4 820e       |    |		Call	0x1,0xe
00c5 6802       |h   |		Jump_Zero	0xc8
00c6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x1 = 0xc6,0x2
00c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00c8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x2 = 0xc8,0x3
00c9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ca 0000 0000  |    |		.BLANK	0000[0x6]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x00d3,0x05e4,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f6e
													; Debug Table 0x6.0x0 = 0xd3,0x1
00d4 820f       |    |		Call	0x1,0xf
00d5 6802       |h   |		Jump_Zero	0xd8
00d6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x1 = 0xd6,0x2
00d7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x2 = 0xd8,0x3
00d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00da 0000 0000  |    |		.BLANK	0000[0x6]
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x00e3,0x05ec,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f79
													; Debug Table 0x7.0x0 = 0xe3,0x1
00e4 820e       |    |		Call	0x1,0xe
00e5 0f02       |    |		Execute_Immediate	Equal,0x2
00e6 6802       |h   |		Jump_Zero	0xe9
00e7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x1 = 0xe7,0x2
00e8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x2 = 0xe9,0x3
00ea 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00eb 0000 0000  |    |		.BLANK	0000[0x5]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x00f3,0x05f4,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f84
													; Debug Table 0x8.0x0 = 0xf3,0x1
00f4 820f       |    |		Call	0x1,0xf
00f5 0f02       |    |		Execute_Immediate	Equal,0x2
00f6 6802       |h   |		Jump_Zero	0xf9
00f7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x1 = 0xf7,0x2
00f8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00f9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x2 = 0xf9,0x3
00fa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00fb 0000 0000  |    |		.BLANK	0000[0x5]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103       |    |		.CONST	0x0103								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0001       |    |		.CONST	0x0001								; Number of locals
0103			BODY_0100:
0103			INIT_0100:
0103 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x0103,0x05fc,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f8f
													; Debug Table 0x9.0x0 = 0x103,0x1
0104 820e       |    |		Call	0x1,0xe
0105 0f01       |    |		Execute_Immediate	Equal,0x1
0106 6802       |h   |		Jump_Zero	0x109
0107 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x1 = 0x107,0x2
0108 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0109 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x2 = 0x109,0x3
010a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
010b 0000 0000  |    |		.BLANK	0000[0x5]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113       |    |		.CONST	0x0113								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0001       |    |		.CONST	0x0001								; Number of locals
0113			BODY_0110:
0113			INIT_0110:
0113 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x0113,0x0604,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f9a
													; Debug Table 0xa.0x0 = 0x113,0x1
0114 820f       |    |		Call	0x1,0xf
0115 0f01       |    |		Execute_Immediate	Equal,0x1
0116 6802       |h   |		Jump_Zero	0x119
0117 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x1 = 0x117,0x2
0118 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0119 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x2 = 0x119,0x3
011a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
011b 0000 0000  |    |		.BLANK	0000[0x5]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 012f       | /  |		.CONST	0x012f								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0004       |    |		.CONST	0x0004								; Number of locals
0123			INIT_0120:
0123 e001       |    |		Load	0x0,0x1								; Debug Table 0xb = .DEBUG	0x0123,0x060c,0x0001,0x0000,0x0055,0xe795,0x0000,0x0fa5
													; Debug Table 0xb.0x0 = 0x123,0xffff
0124 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0125 02c7       |    |		Declare_Variable	Any
0126 00d8       |    |		Load_Top	At_Offset_0
0127 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0128 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x1 = 0x128,0xfffe
0129 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
012a 02c7       |    |		Declare_Variable	Any
012b 00d8       |    |		Load_Top	At_Offset_0
012c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
012d e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x2 = 0x12d,0xfffd
012e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
012f			BODY_0120:
012f e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x3 = 0x12f,0x1
0130 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0131 00db       |    |		Load_Top	At_Offset_3
0132 0120       |    |		Execute	Any,Is_Value
0133 6803       |h   |		Jump_Zero	0x137
0134 e001       |    |		Load	0x0,0x1
0135 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0136 7801       |x   |		Jump	0x138
0137 00db       |    |		Load_Top	At_Offset_3
0138 e5ff       |    |		Load	0x2,-0x1
0139 e002       |    |		Load	0x0,0x2
013a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
013b 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
013c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
013d c402       |    |		Store	0x2,0x2
013e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
013f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x4 = 0x13f,0x2
0140 6815       |h   |		Jump_Zero	0x156
0141 e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x5 = 0x141,0x3
0142 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0143 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0144 e002       |    |		Load	0x0,0x2
0145 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0146 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0147 e002       |    |		Load	0x0,0x2
0148 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0149 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
014a 0092 0417  |    |		Action	Push_String_Extended,0x417					; "set_switch_object: bad library"
014c e404       |    |		Load	0x2,0x4
014d e002       |    |		Load	0x0,0x2
014e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014f 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0150 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0151 e002       |    |		Load	0x0,0x2
0152 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0153 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
0154 a5fd       |    |		Store_Unchecked	0x2,-0x3
0155 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xb.0x6 = 0x155,0x4
0156 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x7 = 0x156,0x5
0157 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0158 00da       |    |		Load_Top	At_Offset_2
0159 0120       |    |		Execute	Any,Is_Value
015a 6803       |h   |		Jump_Zero	0x15e
015b e001       |    |		Load	0x0,0x1
015c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
015d 7801       |x   |		Jump	0x15f
015e 00da       |    |		Load_Top	At_Offset_2
015f e5fe       |    |		Load	0x2,-0x2
0160 e002       |    |		Load	0x0,0x2
0161 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0162 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0163 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0164 c403       |    |		Store	0x2,0x3
0165 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0166 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x8 = 0x166,0x6
0167 6815       |h   |		Jump_Zero	0x17d
0168 e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x9 = 0x168,0x7
0169 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
016a 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
016b e002       |    |		Load	0x0,0x2
016c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
016d 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
016e e002       |    |		Load	0x0,0x2
016f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0170 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0171 0092 0418  |    |		Action	Push_String_Extended,0x418					; "Set_Switch_Object: bad switch file"
0173 e404       |    |		Load	0x2,0x4
0174 e002       |    |		Load	0x0,0x2
0175 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0176 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0177 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0178 e002       |    |		Load	0x0,0x2
0179 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
017a 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
017b a5fd       |    |		Store_Unchecked	0x2,-0x3
017c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xb.0xa = 0x17c,0x8
017d e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0xb = 0x17d,0x9
017e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
017f 6290       |b   |		Indirect_Literal	Discrete,0x410,{0x00000000, 0x00004000}
0180 e5ff       |    |		Load	0x2,-0x1
0181 e002       |    |		Load	0x0,0x2
0182 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0183 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0184 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0185 e403       |    |		Load	0x2,0x3
0186 e402       |    |		Load	0x2,0x2
0187 e001       |    |		Load	0x0,0x1
0188 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0189 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
018a e001       |    |		Load	0x0,0x1
018b 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
018c 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
018d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
018e e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0xc = 0x18e,0xa
018f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0190 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0191 e002       |    |		Load	0x0,0x2
0192 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0193 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0194 e002       |    |		Load	0x0,0x2
0195 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0196 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0197 0092 0419  |    |		Action	Push_String_Extended,0x419					; "Set_Switch_Object"
0199 e404       |    |		Load	0x2,0x4
019a e002       |    |		Load	0x0,0x2
019b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
019c 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
019d 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
019e e002       |    |		Load	0x0,0x2
019f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01a0 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
01a1 a5fd       |    |		Store_Unchecked	0x2,-0x3
01a2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01a3 0000 0000  |    |		.BLANK	0000[0x5]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b1       |    |		.CONST	0x01b1								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0003       |    |		.CONST	0x0003								; Number of locals
01ab			INIT_01a8:
01ab e002       |    |		Load	0x0,0x2								; Debug Table 0xc = .DEBUG	0x01ab,0x0628,0x0001,0x0000,0x0055,0xe795,0x0000,0x0fbb
													; Debug Table 0xc.0x0 = 0x1ab,0xffff
01ac 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ad 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ae e002       |    |		Load	0x0,0x2								; Debug Table 0xc.0x1 = 0x1ae,0xfffe
01af 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01b0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01b1			BODY_01a8:
01b1 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x2 = 0x1b1,0x1
01b2 e002       |    |		Load	0x0,0x2
01b3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01b4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01b5 e5ff       |    |		Load	0x2,-0x1
01b6 e002       |    |		Load	0x0,0x2
01b7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01b8 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
01b9 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
01ba 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x3 = 0x1ba,0x2
01bb e002       |    |		Load	0x0,0x2
01bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01bd 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
01be 6806       |h   |		Jump_Zero	0x1c5
01bf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x4 = 0x1bf,0x3
01c0 e002       |    |		Load	0x0,0x2
01c1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01c2 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
01c3 a5fd       |    |		Store_Unchecked	0x2,-0x3
01c4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xc.0x5 = 0x1c4,0x4
01c5 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x6 = 0x1c5,0x5
01c6 e002       |    |		Load	0x0,0x2
01c7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01c8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01c9 e5fe       |    |		Load	0x2,-0x2
01ca e002       |    |		Load	0x0,0x2
01cb 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01cc 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
01cd 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01ce 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x7 = 0x1ce,0x6
01cf e002       |    |		Load	0x0,0x2
01d0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d1 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
01d2 6806       |h   |		Jump_Zero	0x1d9
01d3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x8 = 0x1d3,0x7
01d4 e002       |    |		Load	0x0,0x2
01d5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d6 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
01d7 a5fd       |    |		Store_Unchecked	0x2,-0x3
01d8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xc.0x9 = 0x1d8,0x8
01d9 e002       |    |		Load	0x0,0x2								; Debug Table 0xc.0xa = 0x1d9,0x9
01da 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01db 1b30       | 0  |		Execute	Package,Field_Read,Field_Number 0x30
01dc 00d9       |    |		Load_Top	At_Offset_1
01dd 00db       |    |		Load_Top	At_Offset_3
01de 8216       |    |		Call	0x1,0x16
01df c5fd       |    |		Store	0x2,-0x3
01e0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e1 0000 0000  |    |		.BLANK	0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f7       |    |		.CONST	0x01f7								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0004       |    |		.CONST	0x0004								; Number of locals
01eb			INIT_01e8:
01eb e001       |    |		Load	0x0,0x1								; Debug Table 0xd = .DEBUG	0x01eb,0x0640,0x0002,0x0000,0x0055,0xe795,0x0000,0x0fd1
													; Debug Table 0xd.0x0 = 0x1eb,0xffff
01ec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01ed 02c7       |    |		Declare_Variable	Any
01ee 00d8       |    |		Load_Top	At_Offset_0
01ef 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01f0 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x1 = 0x1f0,0xfffe
01f1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01f2 02c7       |    |		Declare_Variable	Any
01f3 00d8       |    |		Load_Top	At_Offset_0
01f4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01f5 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x2 = 0x1f5,0xfffd
01f6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01f7			BODY_01e8:
01f7 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x3 = 0x1f7,0x1
01f8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01f9 00db       |    |		Load_Top	At_Offset_3
01fa 0120       |    |		Execute	Any,Is_Value
01fb 6803       |h   |		Jump_Zero	0x1ff
01fc e001       |    |		Load	0x0,0x1
01fd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01fe 7801       |x   |		Jump	0x200
01ff 00db       |    |		Load_Top	At_Offset_3
0200 e5ff       |    |		Load	0x2,-0x1
0201 e002       |    |		Load	0x0,0x2
0202 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0203 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0204 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0205 c402       |    |		Store	0x2,0x2
0206 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0207 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x4 = 0x207,0x2
0208 6825       |h%  |		Jump_Zero	0x22e
0209 e002       |    |		Load	0x0,0x2								; Debug Table 0xd.0x5 = 0x209,0x3
020a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
020b 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
020c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
020d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd.0x6 = 0x20d,0x401
020e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd.0x7 = 0x20e,0x3
													; Debug Table 0xd.0x8 = 0x20e,0x801
020f e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x9 = 0x20f,0x401
0210 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0211 e001       |    |		Load	0x0,0x1
0212 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0213 e001       |    |		Load	0x0,0x1
0214 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0215 00ea       |    |		Load_Encached	Null_String_Cache
0216 e002       |    |		Load	0x0,0x2
0217 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0218 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0219 e002       |    |		Load	0x0,0x2
021a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
021b 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
021c e002       |    |		Load	0x0,0x2
021d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
021e 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
021f 0092 041a  |    |		Action	Push_String_Extended,0x41a					; "Switch_Object: bad library"
0221 e404       |    |		Load	0x2,0x4
0222 e002       |    |		Load	0x0,0x2
0223 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0224 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0225 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0226 e002       |    |		Load	0x0,0x2
0227 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0228 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
0229 e002       |    |		Load	0x0,0x2
022a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
022b 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
022c 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
022d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
022e e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0xa = 0x22e,0x4
022f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0230 00da       |    |		Load_Top	At_Offset_2
0231 0120       |    |		Execute	Any,Is_Value
0232 6803       |h   |		Jump_Zero	0x236
0233 e001       |    |		Load	0x0,0x1
0234 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0235 7801       |x   |		Jump	0x237
0236 00da       |    |		Load_Top	At_Offset_2
0237 61d8       |a   |		Indirect_Literal	Discrete,0x410,{0x00000000, 0x00004000}
0238 e5ff       |    |		Load	0x2,-0x1
0239 e002       |    |		Load	0x0,0x2
023a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
023b 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
023c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
023d e402       |    |		Load	0x2,0x2
023e e001       |    |		Load	0x0,0x1
023f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0240 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0241 e001       |    |		Load	0x0,0x1
0242 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0243 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0244 c403       |    |		Store	0x2,0x3
0245 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0246 e002       |    |		Load	0x0,0x2								; Debug Table 0xd.0xb = 0x246,0x5
0247 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0248 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0249 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
024a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd.0xc = 0x24a,0xc01
024b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd.0xd = 0x24b,0x5
													; Debug Table 0xd.0xe = 0x24b,0x1001
024c e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0xf = 0x24c,0xc01
024d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
024e e001       |    |		Load	0x0,0x1
024f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0250 e403       |    |		Load	0x2,0x3
0251 00ea       |    |		Load_Encached	Null_String_Cache
0252 e002       |    |		Load	0x0,0x2
0253 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0254 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0255 e002       |    |		Load	0x0,0x2
0256 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0257 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0258 e002       |    |		Load	0x0,0x2
0259 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
025a 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
025b 0092 041b  |    |		Action	Push_String_Extended,0x41b					; "Switch_Object"
025d e404       |    |		Load	0x2,0x4
025e e002       |    |		Load	0x0,0x2
025f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0260 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0261 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0262 e002       |    |		Load	0x0,0x2
0263 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0264 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
0265 e002       |    |		Load	0x0,0x2
0266 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0267 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0268 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0269 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
026a 0000 0000  |    |		.BLANK	0000[0x6]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0279       | y  |		.CONST	0x0279								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0003       |    |		.CONST	0x0003								; Number of locals
0273			INIT_0270:
0273 e002       |    |		Load	0x0,0x2								; Debug Table 0xe = .DEBUG	0x0273,0x0662,0x0002,0x0000,0x0055,0xe795,0x0000,0x0fde
													; Debug Table 0xe.0x0 = 0x273,0xffff
0274 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0275 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0276 e002       |    |		Load	0x0,0x2								; Debug Table 0xe.0x1 = 0x276,0xfffe
0277 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0278 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0279			BODY_0270:
0279 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0x2 = 0x279,0x1
027a e002       |    |		Load	0x0,0x2
027b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
027c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
027d e5ff       |    |		Load	0x2,-0x1
027e e002       |    |		Load	0x0,0x2
027f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0280 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0281 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0282 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x3 = 0x282,0x2
0283 8218       |    |		Call	0x1,0x18
0284 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0285 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x4 = 0x285,0x3
0286 e002       |    |		Load	0x0,0x2
0287 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0288 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0289 680e       |h   |		Jump_Zero	0x298
028a 0092 041c  |    |		Action	Push_String_Extended,0x41c					; "[{<"
													; Debug Table 0xe.0x5 = 0x28a,0x4
028c 00d9       |    |		Load_Top	At_Offset_1
028d e002       |    |		Load	0x0,0x2
028e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
028f 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0290 e002       |    |		Load	0x0,0x2
0291 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0292 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0293 01cc       |    |		Execute	Vector,Catenate
0294 0092 041d  |    |		Action	Push_String_Extended,0x41d					; ">}]"
0296 01cc       |    |		Execute	Vector,Catenate
0297 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0298 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x6 = 0x298,0x5
0299 e002       |    |		Load	0x0,0x2
029a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
029b 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
029c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029d 0000 0000  |    |		.XXX[0x3]
029f 0000       |    |
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf = .DEBUG	0x02a3,0x0672,0x0002,0x0000,0x0055,0xe795,0x0000,0x0ff2
													; Debug Table 0xf.0x0 = 0x2a3,0x1
02a4 00ca       |    |		Action	Exit_Nullary_Function
02a5 0000 0000  |    |		.XXX[0x3]
02a7 0000       |    |
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10 = .DEBUG	0x02ab,0x0676,0x0002,0x0000,0x0055,0xe795,0x0000,0x0ff9
													; Debug Table 0x10.0x0 = 0x2ab,0x1
02ac 0f00       |    |		Execute_Immediate	Equal,0x0
02ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ae 0000 0000  |    |		.XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02ba       |    |		.CONST	0x02ba								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0003       |    |		.CONST	0x0003								; Number of locals
02b3			INIT_02b0:
02b3 e001       |    |		Load	0x0,0x1								; Debug Table 0x11 = .DEBUG	0x02b3,0x067a,0x0002,0x0000,0x0055,0xe795,0x0000,0x1004
													; Debug Table 0x11.0x0 = 0x2b3,0xffff
02b4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02b5 02c7       |    |		Declare_Variable	Any
02b6 00d8       |    |		Load_Top	At_Offset_0
02b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b8 e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x1 = 0x2b8,0xfffe
02b9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02ba			BODY_02b0:
02ba e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x2 = 0x2ba,0x1
02bb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02bc 00da       |    |		Load_Top	At_Offset_2
02bd 0120       |    |		Execute	Any,Is_Value
02be 6803       |h   |		Jump_Zero	0x2c2
02bf e001       |    |		Load	0x0,0x1
02c0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02c1 7801       |x   |		Jump	0x2c3
02c2 00da       |    |		Load_Top	At_Offset_2
02c3 e5ff       |    |		Load	0x2,-0x1
02c4 e002       |    |		Load	0x0,0x2
02c5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02c6 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
02c7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02c8 c402       |    |		Store	0x2,0x2
02c9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02ca 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x3 = 0x2ca,0x2
02cb 6802       |h   |		Jump_Zero	0x2ce
02cc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x4 = 0x2cc,0x3
02cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ce 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x5 = 0x2ce,0x4
02cf e001       |    |		Load	0x0,0x1
02d0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02d1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02d2 e001       |    |		Load	0x0,0x1
02d3 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
02d4 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d6 0000 0000  |    |		.XXX[0x2]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 0305       |    |		.CONST	0x0305								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 000c       |    |		.CONST	0x000c								; Number of locals
02db			INIT_02d8:
02db e001       |    |		Load	0x0,0x1								; Debug Table 0x12 = .DEBUG	0x02db,0x0688,0x0001,0x0000,0x0055,0xe795,0x0000,0x1011
													; Debug Table 0x12.0x0 = 0x2db,0xffff
02dc 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
02dd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02de e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x1 = 0x2de,0xfffe
02df 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
02e0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02e1 02c7       |    |		Declare_Variable	Any
02e2 00d8       |    |		Load_Top	At_Offset_0
02e3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02e4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x12.0x2 = 0x2e4,0xfffd
02e5 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x3 = 0x2e5,0xfffc
02e6 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02e7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02e8 02c7       |    |		Declare_Variable	Any
02e9 00d8       |    |		Load_Top	At_Offset_0
02ea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02eb e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x4 = 0x2eb,0xfffb
02ec 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02ed e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x5 = 0x2ed,0xfffa
02ee 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02ef 02c7       |    |		Declare_Variable	Any
02f0 00d8       |    |		Load_Top	At_Offset_0
02f1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02f2 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x6 = 0x2f2,0xfff9
02f3 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02f4 02ff       |    |		Declare_Variable	Variant_Record
02f5 00d8       |    |		Load_Top	At_Offset_0
02f6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02f7 e003       |    |		Load	0x0,0x3								; Debug Table 0x12.0x7 = 0x2f7,0xfff8
02f8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02f9 02c7       |    |		Declare_Variable	Any
02fa 00d8       |    |		Load_Top	At_Offset_0
02fb 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02fc e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x8 = 0x2fc,0xfff7
02fd 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02fe 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02ff 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x12.0x9 = 0x2ff,0xfff6
0300 e004       |    |		Load	0x0,0x4								; Debug Table 0x12.0xa = 0x300,0xfff5
0301 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0302 02c7       |    |		Declare_Variable	Any
0303 00d8       |    |		Load_Top	At_Offset_0
0304 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0305			BODY_02d8:
0305 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0xb = 0x305,0x1
0306 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0307 00ec       |    |		Load_Encached	Diana_Tree_Cache
0308 6107       |a   |		Indirect_Literal	Discrete,0x410,{0x00000000, 0x00004000}
0309 e003       |    |		Load	0x0,0x3
030a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
030b e5fc       |    |		Load	0x2,-0x4
030c e002       |    |		Load	0x0,0x2
030d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
030e 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
030f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0310 c404       |    |		Store	0x2,0x4
0311 c406       |    |		Store	0x2,0x6
0312 e406       |    |		Load	0x2,0x6								; Debug Table 0x12.0xc = 0x312,0x2
0313 6815       |h   |		Jump_Zero	0x329
0314 e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0xd = 0x314,0x3
0315 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0316 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0317 e002       |    |		Load	0x0,0x2
0318 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0319 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
031a e002       |    |		Load	0x0,0x2
031b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
031c 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
031d 0092 041e  |    |		Action	Push_String_Extended,0x41e					; "create: bad context"
031f e406       |    |		Load	0x2,0x6
0320 e002       |    |		Load	0x0,0x2
0321 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0322 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0323 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0324 e002       |    |		Load	0x0,0x2
0325 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0326 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
0327 a5f8       |    |		Store_Unchecked	0x2,-0x8
0328 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x12.0xe = 0x328,0x4
0329 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0xf = 0x329,0x5
032a 4602       |F   |		Jump_Case	0x3
032b 7802       |x   |		Jump	0x32e								; case 0x0
032c 7812       |x   |		Jump	0x33f								; case 0x1
032d 7814       |x   |		Jump	0x342								; case 0x2
032e e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x10 = 0x32e,0x6
032f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0330 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0331 e002       |    |		Load	0x0,0x2
0332 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0333 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0334 e002       |    |		Load	0x0,0x2
0335 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0336 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0337 0092 041f  |    |		Action	Push_String_Extended,0x41f					; "create: kind isn't directory or world"
0339 4807       |H   |		Short_Literal	0x7
033a e002       |    |		Load	0x0,0x2
033b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
033c 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
033d a5f8       |    |		Store_Unchecked	0x2,-0x8
033e 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x12.0x11 = 0x33e,0x7
033f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x12 = 0x33f,0x8
0340 a402       |    |		Store_Unchecked	0x2,0x2
0341 7802       |x   |		Jump	0x344
0342 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x13 = 0x342,0x9
0343 a402       |    |		Store_Unchecked	0x2,0x2
0344 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x14 = 0x344,0xa
0345 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0346 e405       |    |		Load	0x2,0x5
0347 0120       |    |		Execute	Any,Is_Value
0348 6804       |h   |		Jump_Zero	0x34d
0349 e001       |    |		Load	0x0,0x1
034a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
034b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
034c 7801       |x   |		Jump	0x34e
034d e405       |    |		Load	0x2,0x5
034e e404       |    |		Load	0x2,0x4
034f e001       |    |		Load	0x0,0x1
0350 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0351 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0352 c405       |    |		Store	0x2,0x5
0353 c406       |    |		Store	0x2,0x6
0354 e406       |    |		Load	0x2,0x6								; Debug Table 0x12.0x15 = 0x354,0xb
0355 6815       |h   |		Jump_Zero	0x36b
0356 e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x16 = 0x356,0xc
0357 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0358 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0359 e002       |    |		Load	0x0,0x2
035a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
035b 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
035c e002       |    |		Load	0x0,0x2
035d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
035e 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
035f 0092 0420  |    |		Action	Push_String_Extended,0x420					; "create: context couldn't be translated to unit"
0361 e406       |    |		Load	0x2,0x6
0362 e002       |    |		Load	0x0,0x2
0363 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0364 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0365 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0366 e002       |    |		Load	0x0,0x2
0367 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0368 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
0369 a5f8       |    |		Store_Unchecked	0x2,-0x8
036a 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x12.0x17 = 0x36a,0xd
036b e005       |    |		Load	0x0,0x5								; Debug Table 0x12.0x18 = 0x36b,0xe
036c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
036d e003       |    |		Load	0x0,0x3
036e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
036f c409       |    |		Store	0x2,0x9
0370 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x19 = 0x370,0xf
0371 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0372 e403       |    |		Load	0x2,0x3
0373 0120       |    |		Execute	Any,Is_Value
0374 6804       |h   |		Jump_Zero	0x379
0375 e001       |    |		Load	0x0,0x1
0376 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0377 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0378 7801       |x   |		Jump	0x37a
0379 e403       |    |		Load	0x2,0x3
037a 6095       |`   |		Indirect_Literal	Discrete,0x410,{0x00000000, 0x00004000}
037b e409       |    |		Load	0x2,0x9
037c e001       |    |		Load	0x0,0x1
037d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
037e 4802       |H   |		Short_Literal	0x2
037f e5fb       |    |		Load	0x2,-0x5
0380 e5fb       |    |		Load	0x2,-0x5
0381 e5fd       |    |		Load	0x2,-0x3
0382 e5fa       |    |		Load	0x2,-0x6
0383 e002       |    |		Load	0x0,0x2
0384 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0385 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0386 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0387 e405       |    |		Load	0x2,0x5
0388 e402       |    |		Load	0x2,0x2
0389 e5ff       |    |		Load	0x2,-0x1
038a e001       |    |		Load	0x0,0x1
038b 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
038c 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
038d c403       |    |		Store	0x2,0x3
038e c406       |    |		Store	0x2,0x6
038f e406       |    |		Load	0x2,0x6								; Debug Table 0x12.0x1a = 0x38f,0x10
0390 681b       |h   |		Jump_Zero	0x3ac
0391 e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x1b = 0x391,0x11
0392 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0393 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0394 e002       |    |		Load	0x0,0x2
0395 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0396 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0397 e002       |    |		Load	0x0,0x2
0398 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0399 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
039a 0092 0421  |   !|		Action	Push_String_Extended,0x421					; "create: library couldn't be created"
039c e406       |    |		Load	0x2,0x6
039d e002       |    |		Load	0x0,0x2
039e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
039f 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
03a0 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
03a1 e002       |    |		Load	0x0,0x2
03a2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03a3 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
03a4 a5f8       |    |		Store_Unchecked	0x2,-0x8
03a5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x1c = 0x3a5,0x12
03a6 4801       |H   |		Short_Literal	0x1
03a7 4800       |H   |		Short_Literal	0x0
03a8 e003       |    |		Load	0x0,0x3
03a9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03aa c409       |    |		Store	0x2,0x9
03ab 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x12.0x1d = 0x3ab,0x13
03ac e403       |    |		Load	0x2,0x3								; Debug Table 0x12.0x1e = 0x3ac,0x14
03ad e001       |    |		Load	0x0,0x1
03ae 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
03af 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03b0 c407       |    |		Store	0x2,0x7
03b1 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x1f = 0x3b1,0x15
03b2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03b3 00f1       |    |		Load_Encached	Diana_Temp_Seq
03b4 e001       |    |		Load	0x0,0x1
03b5 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
03b6 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
03b7 00db       |    |		Load_Top	At_Offset_3
03b8 0120       |    |		Execute	Any,Is_Value
03b9 6803       |h   |		Jump_Zero	0x3bd
03ba e004       |    |		Load	0x0,0x4
03bb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03bc 7801       |x   |		Jump	0x3be
03bd 00db       |    |		Load_Top	At_Offset_3
03be e408       |    |		Load	0x2,0x8
03bf 6050       |`P  |		Indirect_Literal	Discrete,0x410,{0x00000000, 0x00004000}
03c0 e409       |    |		Load	0x2,0x9
03c1 4800       |H   |		Short_Literal	0x0
03c2 e001       |    |		Load	0x0,0x1
03c3 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
03c4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03c5 e001       |    |		Load	0x0,0x1
03c6 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03c7 4ffc       |O   |		Short_Literal	-0x4
03c8 4ffd       |O   |		Short_Literal	-0x3
03c9 e407       |    |		Load	0x2,0x7
03ca e001       |    |		Load	0x0,0x1
03cb 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
03cc 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03cd 00d1       |    |		Pop_Control	Pop_Count_1
03ce c40c       |    |		Store	0x2,0xc
03cf c40a       |    |		Store	0x2,0xa
03d0 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
03d1 c406       |    |		Store	0x2,0x6
03d2 e406       |    |		Load	0x2,0x6								; Debug Table 0x12.0x20 = 0x3d2,0x16
03d3 681b       |h   |		Jump_Zero	0x3ef
03d4 e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x21 = 0x3d4,0x17
03d5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03d6 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
03d7 e002       |    |		Load	0x0,0x2
03d8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03d9 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
03da e002       |    |		Load	0x0,0x2
03db 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03dc 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
03dd 0092 0422  |   "|		Action	Push_String_Extended,0x422					; "Create:Version couldn't be created for stub"
03df e406       |    |		Load	0x2,0x6
03e0 e002       |    |		Load	0x0,0x2
03e1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03e2 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
03e3 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
03e4 e002       |    |		Load	0x0,0x2
03e5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03e6 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
03e7 a5f8       |    |		Store_Unchecked	0x2,-0x8
03e8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x22 = 0x3e8,0x18
03e9 4801       |H   |		Short_Literal	0x1
03ea 4800       |H   |		Short_Literal	0x0
03eb e003       |    |		Load	0x0,0x3
03ec 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03ed c409       |    |		Store	0x2,0x9
03ee 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x12.0x23 = 0x3ee,0x19
03ef e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x24 = 0x3ef,0x1a
03f0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03f1 1854       | T  |		Execute	Package,Field_Execute,Field_Number 0x54
03f2 a5f8       |    |		Store_Unchecked	0x2,-0x8
03f3 e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x25 = 0x3f3,0x1b
03f4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03f5 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
03f6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03f7 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x12.0x26 = 0x3f7,0x401
03f8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x12.0x27 = 0x3f8,0x1b
													; Debug Table 0x12.0x28 = 0x3f8,0x801
03f9 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x29 = 0x3f9,0x401
03fa 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
03fb e408       |    |		Load	0x2,0x8
03fc e001       |    |		Load	0x0,0x1
03fd 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03fe e5ff       |    |		Load	0x2,-0x1
03ff e002       |    |		Load	0x0,0x2
0400 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0401 1854       | T  |		Execute	Package,Field_Execute,Field_Number 0x54
0402 e002       |    |		Load	0x0,0x2
0403 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0404 1b56       | V  |		Execute	Package,Field_Read,Field_Number 0x56
0405 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0406 a5f9       |    |		Store_Unchecked	0x2,-0x7
0407 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x2a = 0x407,0x1c
0408 4801       |H   |		Short_Literal	0x1
0409 4801       |H   |		Short_Literal	0x1
040a e003       |    |		Load	0x0,0x3
040b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
040c c409       |    |		Store	0x2,0x9
040d 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
040e 0000 0000  |    |		.XXX[0x2]
0410 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0414 ; --------------------------------------------------------------------------------------
0414 ; STRING TABLE
0414 ; --------------------------------------------------------------------------------------
0414 0020       |    |		.STRTAB	0x0020->0x0424							; "NOT_A_LIBRARY"
0415 002b       | +  |		.STRTAB	0x002b->0x042a							; "DIRECTORY"
0416 0032       | 2  |		.STRTAB	0x0032->0x042f							; "WORLD"
0417 0035       | 5  |		.STRTAB	0x0035->0x0431							; "set_switch_object: bad library"
0418 0051       | Q  |		.STRTAB	0x0051->0x0440							; "Set_Switch_Object: bad switch file"
0419 0071       | q  |		.STRTAB	0x0071->0x0451							; "Set_Switch_Object"
041a 0080       |    |		.STRTAB	0x0080->0x045a							; "Switch_Object: bad library"
041b 0098       |    |		.STRTAB	0x0098->0x0467							; "Switch_Object"
041c 00a3       |    |		.STRTAB	0x00a3->0x046d							; "[{<"
041d 00a4       |    |		.STRTAB	0x00a4->0x046f							; ">}]"
041e 00a5       |    |		.STRTAB	0x00a5->0x0470							; "create: bad context"
041f 00b6       |    |		.STRTAB	0x00b6->0x047a							; "create: kind isn't directory or world"
0420 00d9       |    |		.STRTAB	0x00d9->0x048c							; "create: context couldn't be translated to unit"
0421 0105       |    |		.STRTAB	0x0105->0x04a3							; "create: library couldn't be created"
0422 0126       | &  |		.STRTAB	0x0126->0x04b5							; "Create:Version couldn't be created for stub"
0423 014f       | O  |		.STREND 0x014f->0x04ca
0424 4e4f 545f  |NOT_|		.STRTAB_STRINGS
04cb 0000 0000  |    |		.BLANK	0000[0x5]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; Debug Table
04d0 ; --------------------------------------------------------------------------------------
04d0 0003 0013  |    |		.CONST	0x0003,0x0013
04d2 000b 056a  |   j|		.DEBUG	0x000b,0x056a,0x0000,0x0000,0x0055,0xe795,0x0000,0x0f41
04da 0035 0590  | 5  |		.DEBUG	0x0035,0x0590,0x0000,0x0000,0x0057,0x7a35,0x0000,0x000a
04e2 005b 05b8  | [  |		.DEBUG	0x005b,0x05b8,0x0005,0x0000,0x0055,0xe795,0x0000,0x0f42
04ea 0073 05ba  | s  |		.DEBUG	0x0073,0x05ba,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f49
04f2 00ab 05d4  |    |		.DEBUG	0x00ab,0x05d4,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f56
04fa 00c3 05dc  |    |		.DEBUG	0x00c3,0x05dc,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f63
0502 00d3 05e4  |    |		.DEBUG	0x00d3,0x05e4,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f6e
050a 00e3 05ec  |    |		.DEBUG	0x00e3,0x05ec,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f79
0512 00f3 05f4  |    |		.DEBUG	0x00f3,0x05f4,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f84
051a 0103 05fc  |    |		.DEBUG	0x0103,0x05fc,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f8f
0522 0113 0604  |    |		.DEBUG	0x0113,0x0604,0x0002,0x0000,0x0055,0xe795,0x0000,0x0f9a
052a 0123 060c  | #  |		.DEBUG	0x0123,0x060c,0x0001,0x0000,0x0055,0xe795,0x0000,0x0fa5
0532 01ab 0628  |   (|		.DEBUG	0x01ab,0x0628,0x0001,0x0000,0x0055,0xe795,0x0000,0x0fbb
053a 01eb 0640  |   @|		.DEBUG	0x01eb,0x0640,0x0002,0x0000,0x0055,0xe795,0x0000,0x0fd1
0542 0273 0662  | s b|		.DEBUG	0x0273,0x0662,0x0002,0x0000,0x0055,0xe795,0x0000,0x0fde
054a 02a3 0672  |   r|		.DEBUG	0x02a3,0x0672,0x0002,0x0000,0x0055,0xe795,0x0000,0x0ff2
0552 02ab 0676  |   v|		.DEBUG	0x02ab,0x0676,0x0002,0x0000,0x0055,0xe795,0x0000,0x0ff9
055a 02b3 067a  |   z|		.DEBUG	0x02b3,0x067a,0x0002,0x0000,0x0055,0xe795,0x0000,0x1004
0562 02db 0688  |    |		.DEBUG	0x02db,0x0688,0x0001,0x0000,0x0055,0xe795,0x0000,0x1011
056a ; --------------------------------------------------------------------------------------
056a ; Debug3 Subtable 0x0
056a ; --------------------------------------------------------------------------------------
056a 0012 0000  |    |		.DBG3TAB	0x0012,0x0000
056c 000b ffff  |    |		.CONST	0x000b,0xffff
056e 0010 fffe  |    |		.CONST	0x0010,0xfffe
0570 0012 fffd  |    |		.CONST	0x0012,0xfffd
0572 0014 fffc  |    |		.CONST	0x0014,0xfffc
0574 0016 fffb  |    |		.CONST	0x0016,0xfffb
0576 0018 fffa  |    |		.CONST	0x0018,0xfffa
0578 001a fff9  |    |		.CONST	0x001a,0xfff9
057a 001c fff8  |    |		.CONST	0x001c,0xfff8
057c 001e fff7  |    |		.CONST	0x001e,0xfff7
057e 0020 fff6  |    |		.CONST	0x0020,0xfff6
0580 0022 fff5  | "  |		.CONST	0x0022,0xfff5
0582 0024 fff4  | $  |		.CONST	0x0024,0xfff4
0584 0026 fff3  | &  |		.CONST	0x0026,0xfff3
0586 0028 fff2  | (  |		.CONST	0x0028,0xfff2
0588 002c fff1  | ,  |		.CONST	0x002c,0xfff1
058a 002e fff0  | .  |		.CONST	0x002e,0xfff0
058c 0030 ffef  | 0  |		.CONST	0x0030,0xffef
058e 0032 ffee  | 2  |		.CONST	0x0032,0xffee
0590 ; --------------------------------------------------------------------------------------
0590 ; Debug3 Subtable 0x1
0590 ; --------------------------------------------------------------------------------------
0590 0013 0000  |    |		.DBG3TAB	0x0013,0x0000
0592 0035 ffff  | 5  |		.CONST	0x0035,0xffff
0594 0035 fffe  | 5  |		.CONST	0x0035,0xfffe
0596 0035 fffd  | 5  |		.CONST	0x0035,0xfffd
0598 0035 fffc  | 5  |		.CONST	0x0035,0xfffc
059a 0037 fffb  | 7  |		.CONST	0x0037,0xfffb
059c 0039 fffa  | 9  |		.CONST	0x0039,0xfffa
059e 003b fff9  | ;  |		.CONST	0x003b,0xfff9
05a0 003d fff8  | =  |		.CONST	0x003d,0xfff8
05a2 003f fff7  | ?  |		.CONST	0x003f,0xfff7
05a4 0041 fff6  | A  |		.CONST	0x0041,0xfff6
05a6 0043 fff5  | C  |		.CONST	0x0043,0xfff5
05a8 0045 fff4  | E  |		.CONST	0x0045,0xfff4
05aa 0047 fff3  | G  |		.CONST	0x0047,0xfff3
05ac 0049 fff2  | I  |		.CONST	0x0049,0xfff2
05ae 004b fff1  | K  |		.CONST	0x004b,0xfff1
05b0 004d fff0  | M  |		.CONST	0x004d,0xfff0
05b2 004f ffef  | O  |		.CONST	0x004f,0xffef
05b4 0051 ffee  | Q  |		.CONST	0x0051,0xffee
05b6 0053 ffed  | S  |		.CONST	0x0053,0xffed
05b8 ; --------------------------------------------------------------------------------------
05b8 ; Debug3 Subtable 0x2
05b8 ; --------------------------------------------------------------------------------------
05b8 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
05ba ; --------------------------------------------------------------------------------------
05ba ; Debug3 Subtable 0x3
05ba ; --------------------------------------------------------------------------------------
05ba 0002 000a  |    |		.DBG3TAB	0x0002,0x000a
05bc 0073 ffff  | s  |		.CONST	0x0073,0xffff
05be 0078 fffe  | x  |		.CONST	0x0078,0xfffe
05c0 007a 0001  | z  |		.CONST	0x007a,0x0001
05c2 007f 0002  |    |		.CONST	0x007f,0x0002
05c4 0081 0003  |    |		.CONST	0x0081,0x0003
05c6 0091 0004  |    |		.CONST	0x0091,0x0004
05c8 0093 0005  |    |		.CONST	0x0093,0x0005
05ca 0095 0006  |    |		.CONST	0x0095,0x0006
05cc 009a 0007  |    |		.CONST	0x009a,0x0007
05ce 009c 0008  |    |		.CONST	0x009c,0x0008
05d0 00a1 0009  |    |		.CONST	0x00a1,0x0009
05d2 00a3 000a  |    |		.CONST	0x00a3,0x000a
05d4 ; --------------------------------------------------------------------------------------
05d4 ; Debug3 Subtable 0x4
05d4 ; --------------------------------------------------------------------------------------
05d4 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
05d6 00ab ffff  |    |		.CONST	0x00ab,0xffff
05d8 00ae 0001  |    |		.CONST	0x00ae,0x0001
05da 00b7 0002  |    |		.CONST	0x00b7,0x0002
05dc ; --------------------------------------------------------------------------------------
05dc ; Debug3 Subtable 0x5
05dc ; --------------------------------------------------------------------------------------
05dc 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05de 00c3 0001  |    |		.CONST	0x00c3,0x0001
05e0 00c6 0002  |    |		.CONST	0x00c6,0x0002
05e2 00c8 0003  |    |		.CONST	0x00c8,0x0003
05e4 ; --------------------------------------------------------------------------------------
05e4 ; Debug3 Subtable 0x6
05e4 ; --------------------------------------------------------------------------------------
05e4 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05e6 00d3 0001  |    |		.CONST	0x00d3,0x0001
05e8 00d6 0002  |    |		.CONST	0x00d6,0x0002
05ea 00d8 0003  |    |		.CONST	0x00d8,0x0003
05ec ; --------------------------------------------------------------------------------------
05ec ; Debug3 Subtable 0x7
05ec ; --------------------------------------------------------------------------------------
05ec 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05ee 00e3 0001  |    |		.CONST	0x00e3,0x0001
05f0 00e7 0002  |    |		.CONST	0x00e7,0x0002
05f2 00e9 0003  |    |		.CONST	0x00e9,0x0003
05f4 ; --------------------------------------------------------------------------------------
05f4 ; Debug3 Subtable 0x8
05f4 ; --------------------------------------------------------------------------------------
05f4 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05f6 00f3 0001  |    |		.CONST	0x00f3,0x0001
05f8 00f7 0002  |    |		.CONST	0x00f7,0x0002
05fa 00f9 0003  |    |		.CONST	0x00f9,0x0003
05fc ; --------------------------------------------------------------------------------------
05fc ; Debug3 Subtable 0x9
05fc ; --------------------------------------------------------------------------------------
05fc 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05fe 0103 0001  |    |		.CONST	0x0103,0x0001
0600 0107 0002  |    |		.CONST	0x0107,0x0002
0602 0109 0003  |    |		.CONST	0x0109,0x0003
0604 ; --------------------------------------------------------------------------------------
0604 ; Debug3 Subtable 0xa
0604 ; --------------------------------------------------------------------------------------
0604 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0606 0113 0001  |    |		.CONST	0x0113,0x0001
0608 0117 0002  |    |		.CONST	0x0117,0x0002
060a 0119 0003  |    |		.CONST	0x0119,0x0003
060c ; --------------------------------------------------------------------------------------
060c ; Debug3 Subtable 0xb
060c ; --------------------------------------------------------------------------------------
060c 0003 000a  |    |		.DBG3TAB	0x0003,0x000a
060e 0123 ffff  | #  |		.CONST	0x0123,0xffff
0610 0128 fffe  | (  |		.CONST	0x0128,0xfffe
0612 012d fffd  | -  |		.CONST	0x012d,0xfffd
0614 012f 0001  | /  |		.CONST	0x012f,0x0001
0616 013f 0002  | ?  |		.CONST	0x013f,0x0002
0618 0141 0003  | A  |		.CONST	0x0141,0x0003
061a 0155 0004  | U  |		.CONST	0x0155,0x0004
061c 0156 0005  | V  |		.CONST	0x0156,0x0005
061e 0166 0006  | f  |		.CONST	0x0166,0x0006
0620 0168 0007  | h  |		.CONST	0x0168,0x0007
0622 017c 0008  | |  |		.CONST	0x017c,0x0008
0624 017d 0009  | }  |		.CONST	0x017d,0x0009
0626 018e 000a  |    |		.CONST	0x018e,0x000a
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0xc
0628 ; --------------------------------------------------------------------------------------
0628 0002 0009  |    |		.DBG3TAB	0x0002,0x0009
062a 01ab ffff  |    |		.CONST	0x01ab,0xffff
062c 01ae fffe  |    |		.CONST	0x01ae,0xfffe
062e 01b1 0001  |    |		.CONST	0x01b1,0x0001
0630 01ba 0002  |    |		.CONST	0x01ba,0x0002
0632 01bf 0003  |    |		.CONST	0x01bf,0x0003
0634 01c4 0004  |    |		.CONST	0x01c4,0x0004
0636 01c5 0005  |    |		.CONST	0x01c5,0x0005
0638 01ce 0006  |    |		.CONST	0x01ce,0x0006
063a 01d3 0007  |    |		.CONST	0x01d3,0x0007
063c 01d8 0008  |    |		.CONST	0x01d8,0x0008
063e 01d9 0009  |    |		.CONST	0x01d9,0x0009
0640 ; --------------------------------------------------------------------------------------
0640 ; Debug3 Subtable 0xd
0640 ; --------------------------------------------------------------------------------------
0640 0003 000d  |    |		.DBG3TAB	0x0003,0x000d
0642 01eb ffff  |    |		.CONST	0x01eb,0xffff
0644 01f0 fffe  |    |		.CONST	0x01f0,0xfffe
0646 01f5 fffd  |    |		.CONST	0x01f5,0xfffd
0648 01f7 0001  |    |		.CONST	0x01f7,0x0001
064a 0207 0002  |    |		.CONST	0x0207,0x0002
064c 0209 0003  |    |		.CONST	0x0209,0x0003
064e 020d 0401  |    |		.CONST	0x020d,0x0401
0650 020e 0003  |    |		.CONST	0x020e,0x0003
0652 020e 0801  |    |		.CONST	0x020e,0x0801
0654 020f 0401  |    |		.CONST	0x020f,0x0401
0656 022e 0004  | .  |		.CONST	0x022e,0x0004
0658 0246 0005  | F  |		.CONST	0x0246,0x0005
065a 024a 0c01  | J  |		.CONST	0x024a,0x0c01
065c 024b 0005  | K  |		.CONST	0x024b,0x0005
065e 024b 1001  | K  |		.CONST	0x024b,0x1001
0660 024c 0c01  | L  |		.CONST	0x024c,0x0c01
0662 ; --------------------------------------------------------------------------------------
0662 ; Debug3 Subtable 0xe
0662 ; --------------------------------------------------------------------------------------
0662 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
0664 0273 ffff  | s  |		.CONST	0x0273,0xffff
0666 0276 fffe  | v  |		.CONST	0x0276,0xfffe
0668 0279 0001  | y  |		.CONST	0x0279,0x0001
066a 0282 0002  |    |		.CONST	0x0282,0x0002
066c 0285 0003  |    |		.CONST	0x0285,0x0003
066e 028a 0004  |    |		.CONST	0x028a,0x0004
0670 0298 0005  |    |		.CONST	0x0298,0x0005
0672 ; --------------------------------------------------------------------------------------
0672 ; Debug3 Subtable 0xf
0672 ; --------------------------------------------------------------------------------------
0672 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0674 02a3 0001  |    |		.CONST	0x02a3,0x0001
0676 ; --------------------------------------------------------------------------------------
0676 ; Debug3 Subtable 0x10
0676 ; --------------------------------------------------------------------------------------
0676 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0678 02ab 0001  |    |		.CONST	0x02ab,0x0001
067a ; --------------------------------------------------------------------------------------
067a ; Debug3 Subtable 0x11
067a ; --------------------------------------------------------------------------------------
067a 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
067c 02b3 ffff  |    |		.CONST	0x02b3,0xffff
067e 02b8 fffe  |    |		.CONST	0x02b8,0xfffe
0680 02ba 0001  |    |		.CONST	0x02ba,0x0001
0682 02ca 0002  |    |		.CONST	0x02ca,0x0002
0684 02cc 0003  |    |		.CONST	0x02cc,0x0003
0686 02ce 0004  |    |		.CONST	0x02ce,0x0004
0688 ; --------------------------------------------------------------------------------------
0688 ; Debug3 Subtable 0x12
0688 ; --------------------------------------------------------------------------------------
0688 000b 0020  |    |		.DBG3TAB	0x000b,0x0020
068a 02db ffff  |    |		.CONST	0x02db,0xffff
068c 02de fffe  |    |		.CONST	0x02de,0xfffe
068e 02e4 fffd  |    |		.CONST	0x02e4,0xfffd
0690 02e5 fffc  |    |		.CONST	0x02e5,0xfffc
0692 02eb fffb  |    |		.CONST	0x02eb,0xfffb
0694 02ed fffa  |    |		.CONST	0x02ed,0xfffa
0696 02f2 fff9  |    |		.CONST	0x02f2,0xfff9
0698 02f7 fff8  |    |		.CONST	0x02f7,0xfff8
069a 02fc fff7  |    |		.CONST	0x02fc,0xfff7
069c 02ff fff6  |    |		.CONST	0x02ff,0xfff6
069e 0300 fff5  |    |		.CONST	0x0300,0xfff5
06a0 0305 0001  |    |		.CONST	0x0305,0x0001
06a2 0312 0002  |    |		.CONST	0x0312,0x0002
06a4 0314 0003  |    |		.CONST	0x0314,0x0003
06a6 0328 0004  | (  |		.CONST	0x0328,0x0004
06a8 0329 0005  | )  |		.CONST	0x0329,0x0005
06aa 032e 0006  | .  |		.CONST	0x032e,0x0006
06ac 033e 0007  | >  |		.CONST	0x033e,0x0007
06ae 033f 0008  | ?  |		.CONST	0x033f,0x0008
06b0 0342 0009  | B  |		.CONST	0x0342,0x0009
06b2 0344 000a  | D  |		.CONST	0x0344,0x000a
06b4 0354 000b  | T  |		.CONST	0x0354,0x000b
06b6 0356 000c  | V  |		.CONST	0x0356,0x000c
06b8 036a 000d  | j  |		.CONST	0x036a,0x000d
06ba 036b 000e  | k  |		.CONST	0x036b,0x000e
06bc 0370 000f  | p  |		.CONST	0x0370,0x000f
06be 038f 0010  |    |		.CONST	0x038f,0x0010
06c0 0391 0011  |    |		.CONST	0x0391,0x0011
06c2 03a5 0012  |    |		.CONST	0x03a5,0x0012
06c4 03ab 0013  |    |		.CONST	0x03ab,0x0013
06c6 03ac 0014  |    |		.CONST	0x03ac,0x0014
06c8 03b1 0015  |    |		.CONST	0x03b1,0x0015
06ca 03d2 0016  |    |		.CONST	0x03d2,0x0016
06cc 03d4 0017  |    |		.CONST	0x03d4,0x0017
06ce 03e8 0018  |    |		.CONST	0x03e8,0x0018
06d0 03ee 0019  |    |		.CONST	0x03ee,0x0019
06d2 03ef 001a  |    |		.CONST	0x03ef,0x001a
06d4 03f3 001b  |    |		.CONST	0x03f3,0x001b
06d6 03f7 0401  |    |		.CONST	0x03f7,0x0401
06d8 03f8 001b  |    |		.CONST	0x03f8,0x001b
06da 03f8 0801  |    |		.CONST	0x03f8,0x0801
06dc 03f9 0401  |    |		.CONST	0x03f9,0x0401
06de 0407 001c  |    |		.CONST	0x0407,0x001c
06e0 0000 0000  |    |		.BLANK	0000[0x120]