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

⟦33bfc686b⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 580b_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

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 580b       |X   |		.CONST	0x580b								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0448       | H  |		.CONST	0x0448								; 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 008f       |    |		.CONST	0x008f								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0028       | (  |		.CONST	0x0028								; Number of locals
000b			INIT_0008:
000b 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0542,0x8000,0x0000,0x0038,0xd486,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 00bf       |    |		Action	Accept_Activation
001a 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x001a,0x0552,0x8000,0x0000,0x0039,0x3516,0x0000,0x0023
													; Debug Table 0x1.0x0 = 0x1a,0xffff
001b 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x1b,0xfffe
001c 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x1c,0xfffd
001d e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x3 = 0x1d,0xfffc
001e 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
001f 0007       |    |		Action	Break_Optional
0020 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x4 = 0x20,0xfffb
0021 191e       |    |		Execute	Package,Field_Reference,Field_Number 0x1e
0022 0007       |    |		Action	Break_Optional
0023 00e9       |    |		Load_Encached	String_Cache						; Debug Table 0x1.0x5 = 0x23,0xfffa
0024 02a0       |    |		Declare_Subprogram	Null_Subprogram
0025 4818       |H   |		Short_Literal	0x18
0026 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
0027 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1.0x6 = 0x27,0xfff9
0028 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0029 0092 0401  |    |		Action	Push_String_Extended,0x401					; "dt_tmp"
													; Debug Table 0x1.0x7 = 0x29,0xfff8
002b 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x8 = 0x2b,0xfff7
002c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1.0x9 = 0x2c,0xfff6
002d 0007       |    |		Action	Break_Optional
002e e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0xa = 0x2e,0xfff5
002f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0030 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0xb = 0x30,0xfff4
0031 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0032 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0xc = 0x32,0xfff3
0033 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0034 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0xd = 0x34,0xfff2
0035 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0xe = 0x35,0xfff1
0036 62dd       |b   |		Indirect_Literal	Discrete,0x314,{0x00b5bc18, 0x00003330}
0037 02a0       |    |		Declare_Subprogram	Null_Subprogram
0038 038e       |    |		Declare_Type	Package,Defined
0039 e004       |    |		Load	0x0,0x4
003a 4801       |H   |		Short_Literal	0x1
003b 00da       |    |		Load_Top	At_Offset_2
003c 020e       |    |		Execute	Module,Augment_Imports
003d 0387       |    |		Declare_Variable	Package
003e 029b 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Unelaborated		; Debug Table 0x1.0xf = 0x3e,0xfff0
0040 62cf       |b   |		Indirect_Literal	Discrete,0x310,{0x00000000, 0x00393516}		; Debug Table 0x1.0x10 = 0x40,0xffef
0041 48fa       |H   |		Short_Literal	0xfa
0042 00db       |    |		Load_Top	At_Offset_3
0043 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0044 e21a       |    |		Load	0x1,0x1a
0045 e21d       |    |		Load	0x1,0x1d
0046 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
0047 e21d       |    |		Load	0x1,0x1d
0048 190f       |    |		Execute	Package,Field_Reference,Field_Number 0xf
0049 e21d       |    |		Load	0x1,0x1d
004a 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
004b e21d       |    |		Load	0x1,0x1d
004c 1910       |    |		Execute	Package,Field_Reference,Field_Number 0x10
004d e21d       |    |		Load	0x1,0x1d
004e 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
004f e21d       |    |		Load	0x1,0x1d
0050 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
0051 e21d       |    |		Load	0x1,0x1d
0052 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
0053 e005       |    |		Load	0x0,0x5
0054 190f       |    |		Execute	Package,Field_Reference,Field_Number 0xf
0055 e005       |    |		Load	0x0,0x5
0056 1910       |    |		Execute	Package,Field_Reference,Field_Number 0x10
0057 e005       |    |		Load	0x0,0x5
0058 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
0059 e005       |    |		Load	0x0,0x5
005a 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
005b e005       |    |		Load	0x0,0x5
005c 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
005d e005       |    |		Load	0x0,0x5
005e 1914       |    |		Execute	Package,Field_Reference,Field_Number 0x14
005f 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0060 e006       |    |		Load	0x0,0x6
0061 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0062 0387       |    |		Declare_Variable	Package
0063 00d8       |    |		Load_Top	At_Offset_0
0064 020f       |    |		Execute	Module,Activate
0065 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x11 = 0x65,0xffee
0066 00c7       |    |		Action	Elaborate_Subprogram
0067 029d 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call			; Debug Table 0x1.0x12 = 0x67,0xffed
0069 029d 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call			; Debug Table 0x1.0x13 = 0x69,0xffec
006b 029d 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call			; Debug Table 0x1.0x14 = 0x6b,0xffeb
006d 029d 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call			; Debug Table 0x1.0x15 = 0x6d,0xffea
006f 029d 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call			; Debug Table 0x1.0x16 = 0x6f,0xffe9
0071 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x17 = 0x71,0xffe8
0072 00c7       |    |		Action	Elaborate_Subprogram
0073 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x18 = 0x73,0xffe7
0074 00c7       |    |		Action	Elaborate_Subprogram
0075 029d 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call			; Debug Table 0x1.0x19 = 0x75,0xffe6
0077 029d 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call			; Debug Table 0x1.0x1a = 0x77,0xffe5
0079 029d 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call			; Debug Table 0x1.0x1b = 0x79,0xffe4
007b 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x1c = 0x7b,0xffe3
007c 00c7       |    |		Action	Elaborate_Subprogram
007d e218       |    |		Load	0x1,0x18							; Debug Table 0x1.0x1d = 0x7d,0xffe2
007e e007       |    |		Load	0x0,0x7
007f 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0080 4803       |H   |		Short_Literal	0x3
0081 e21d       |    |		Load	0x1,0x1d
0082 020e       |    |		Execute	Module,Augment_Imports
0083 e21d       |    |		Load	0x1,0x1d
0084 020f       |    |		Execute	Module,Activate
0085 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x1e = 0x85,0xffe1
0086 00c7       |    |		Action	Elaborate_Subprogram
0087 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x1f = 0x87,0xffe0
0088 00c7       |    |		Action	Elaborate_Subprogram
0089 029d 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call			; Debug Table 0x1.0x20 = 0x89,0xffdf
008b 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x21 = 0x8b,0xffde
008c 00c7       |    |		Action	Elaborate_Subprogram
008d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x22 = 0x8d,0xffdd
008e 00c7       |    |		Action	Elaborate_Subprogram
008f			BODY_0008:
008f 00bc       |    |		Action	Signal_Activated
0090 00bb       |    |		Action	Signal_Completion
0091 0000 0000  |    |		.BLANK	0000[0x7]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a9       |    |		.CONST	0x00a9								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0004       |    |		.CONST	0x0004								; Number of locals
009b			INIT_0098:
009b e008       |    |		Load	0x0,0x8								; Debug Table 0x2 = .DEBUG	0x009b,0x059a,0x0001,0x0000,0x0038,0xd486,0x0000,0x000a
													; Debug Table 0x2.0x0 = 0x9b,0xffff
009c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
009d e009       |    |		Load	0x0,0x9
009e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
009f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00a0 00d8       |    |		Load_Top	At_Offset_0
00a1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a2 e008       |    |		Load	0x0,0x8								; Debug Table 0x2.0x1 = 0xa2,0xfffe
00a3 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00a4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a5 02c7       |    |		Declare_Variable	Any
00a6 00d8       |    |		Load_Top	At_Offset_0
00a7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a8 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2.0x2 = 0xa8,0xfffd
00a9			BODY_0098:
00a9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x3 = 0xa9,0x1
00aa 4800       |H   |		Short_Literal	0x0
00ab e5ff       |    |		Load	0x2,-0x1
00ac e009       |    |		Load	0x0,0x9
00ad 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00ae 025b       | [  |		Execute	Discrete,Check_In_Type
00af e009       |    |		Load	0x0,0x9
00b0 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00b1 00d1       |    |		Pop_Control	Pop_Count_1
00b2 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2.0x4 = 0xb2,0x2
00b3 00da       |    |		Load_Top	At_Offset_2
00b4 0120       |    |		Execute	Any,Is_Value
00b5 6804       |h   |		Jump_Zero	0xba
00b6 e008       |    |		Load	0x0,0x8
00b7 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00b8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00b9 7801       |x   |		Jump	0xbb
00ba 00da       |    |		Load_Top	At_Offset_2
00bb e002       |    |		Load	0x0,0x2
00bc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00bd e402       |    |		Load	0x2,0x2
00be e00a       |    |		Load	0x0,0xa
00bf 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00c0 c403       |    |		Store	0x2,0x3
00c1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00c2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x5 = 0xc2,0x3
00c3 680b       |h   |		Jump_Zero	0xcf
00c4 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x6 = 0xc4,0x4
00c5 4800       |H   |		Short_Literal	0x0
00c6 4801       |H   |		Short_Literal	0x1
00c7 4800       |H   |		Short_Literal	0x0
00c8 e403       |    |		Load	0x2,0x3
00c9 e008       |    |		Load	0x0,0x8
00ca 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00cb 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00cc e00b       |    |		Load	0x0,0xb
00cd 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00ce 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00cf 8215       |    |		Call	0x1,0x15							; Debug Table 0x2.0x7 = 0xcf,0x5
00d0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00d1 0000 0000  |    |		.BLANK	0000[0x7]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 00e3       |    |		.CONST	0x00e3								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00db,0x05ac,0x0002,0x0000,0x0038,0xd486,0x0000,0x0012
													; Debug Table 0x3.0x0 = 0xdb,0x1
00dc e008       |    |		Load	0x0,0x8
00dd 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00de 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00df e008       |    |		Load	0x0,0x8
00e0 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00e1 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
00e2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e3			TRAP_00d8:
00e3 0007       |    |		Action	Break_Optional
00e4 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x1 = 0xe4,0x2
00e5 e009       |    |		Load	0x0,0x9
00e6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00e7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x00eb,0x05b2,0x0001,0x0000,0x0038,0xd486,0x0000,0x001f
													; Debug Table 0x4.0x0 = 0xeb,0x1
00ec 01dd       |    |		Execute	Vector,First
00ed 00db       |    |		Load_Top	At_Offset_3
00ee 01d7       |    |		Execute	Vector,Field_Read
00ef 0f2e       | .  |		Execute_Immediate	Equal,0x2e
00f0 681e       |h   |		Jump_Zero	0x10f
00f1 e00c       |    |		Load	0x0,0xc								; Debug Table 0x4.0x1 = 0xf1,0x2
00f2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00f3 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00f4 e5fd       |    |		Load	0x2,-0x3
00f5 0120       |    |		Execute	Any,Is_Value
00f6 6803       |h   |		Jump_Zero	0xfa
00f7 e00c       |    |		Load	0x0,0xc
00f8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00f9 7801       |x   |		Jump	0xfb
00fa e5fd       |    |		Load	0x2,-0x3
00fb 6210       |b   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00028000}
00fc e002       |    |		Load	0x0,0x2
00fd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00fe e00c       |    |		Load	0x0,0xc
00ff 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0100 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0101 e5ff       |    |		Load	0x2,-0x1
0102 01dd       |    |		Execute	Vector,First
0103 0a01       |    |		Execute_Immediate	Plus,0x1
0104 0248       | H  |		Execute	Discrete,Check_In_Integer
0105 e5ff       |    |		Load	0x2,-0x1
0106 01dc       |    |		Execute	Vector,Last
0107 e5ff       |    |		Load	0x2,-0x1
0108 01cf       |    |		Execute	Vector,Slice_Read
0109 e00c       |    |		Load	0x0,0xc
010a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
010b 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
010c c5fd       |    |		Store	0x2,-0x3
010d c5fe       |    |		Store	0x2,-0x2
010e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
010f e00c       |    |		Load	0x0,0xc								; Debug Table 0x4.0x2 = 0x10f,0x3
0110 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0111 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0112 e5fd       |    |		Load	0x2,-0x3
0113 0120       |    |		Execute	Any,Is_Value
0114 6803       |h   |		Jump_Zero	0x118
0115 e00c       |    |		Load	0x0,0xc
0116 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0117 7801       |x   |		Jump	0x119
0118 e5fd       |    |		Load	0x2,-0x3
0119 61f2       |a   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00028000}
011a e002       |    |		Load	0x0,0x2
011b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
011c 8214       |    |		Call	0x1,0x14
011d 8228       | (  |		Call	0x1,0x28
011e e5ff       |    |		Load	0x2,-0x1
011f e00c       |    |		Load	0x0,0xc
0120 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0121 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0122 c5fd       |    |		Store	0x2,-0x3
0123 c5fe       |    |		Store	0x2,-0x2
0124 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0125 0000 0000  |    |		.XXX[0x3]
0127 0000       |    |
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x012b,0x05ba,0x0001,0x0000,0x0038,0xd486,0x0000,0x0035
													; Debug Table 0x5.0x0 = 0x12b,0x1
012c 01dd       |    |		Execute	Vector,First
012d 00db       |    |		Load_Top	At_Offset_3
012e 01d7       |    |		Execute	Vector,Field_Read
012f 0f2e       | .  |		Execute_Immediate	Equal,0x2e
0130 6819       |h   |		Jump_Zero	0x14a
0131 e00c       |    |		Load	0x0,0xc								; Debug Table 0x5.0x1 = 0x131,0x2
0132 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0133 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0134 e00c       |    |		Load	0x0,0xc
0135 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0136 61d5       |a   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00028000}
0137 e002       |    |		Load	0x0,0x2
0138 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0139 e00c       |    |		Load	0x0,0xc
013a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
013b 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
013c e5ff       |    |		Load	0x2,-0x1
013d 01dd       |    |		Execute	Vector,First
013e 0a01       |    |		Execute_Immediate	Plus,0x1
013f 0248       | H  |		Execute	Discrete,Check_In_Integer
0140 e5ff       |    |		Load	0x2,-0x1
0141 01dc       |    |		Execute	Vector,Last
0142 e5ff       |    |		Load	0x2,-0x1
0143 01cf       |    |		Execute	Vector,Slice_Read
0144 e00c       |    |		Load	0x0,0xc
0145 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0146 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0147 c5fd       |    |		Store	0x2,-0x3
0148 c5fe       |    |		Store	0x2,-0x2
0149 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
014a e00c       |    |		Load	0x0,0xc								; Debug Table 0x5.0x2 = 0x14a,0x3
014b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
014c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
014d e00c       |    |		Load	0x0,0xc
014e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
014f 61bc       |a   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00028000}
0150 e002       |    |		Load	0x0,0x2
0151 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0152 8214       |    |		Call	0x1,0x14
0153 8228       | (  |		Call	0x1,0x28
0154 e5ff       |    |		Load	0x2,-0x1
0155 e00c       |    |		Load	0x0,0xc
0156 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0157 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0158 c5fd       |    |		Store	0x2,-0x3
0159 c5fe       |    |		Store	0x2,-0x2
015a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
015b 0000 0000  |    |		.BLANK	0000[0x5]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0169       | i  |		.CONST	0x0169								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0004       |    |		.CONST	0x0004								; Number of locals
0163			INIT_0160:
0163 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6 = .DEBUG	0x0163,0x05c2,0x0001,0x0000,0x0038,0xd486,0x0000,0x004b
													; Debug Table 0x6.0x0 = 0x163,0xffff
0164 49f4       |I   |		Short_Literal	0x1f4
0165 00e9       |    |		Load_Encached	String_Cache
0166 0334       | 4  |		Declare_Variable	Array,With_Constraint
0167 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x6.0x1 = 0x167,0xfffe
0168 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x6.0x2 = 0x168,0xfffd
0169			BODY_0160:
0169 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x6.0x3 = 0x169,0x1
016a 00db       |    |		Load_Top	At_Offset_3
016b 4801       |H   |		Short_Literal	0x1
016c e001       |    |		Load	0x0,0x1
016d 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
016e 00d1       |    |		Pop_Control	Pop_Count_1
016f 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0170 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x4 = 0x170,0x2
0171 7005       |p   |		Jump_Nonzero	0x177
0172 0092 0402  |    |		Action	Push_String_Extended,0x402					; "no name given"
													; Debug Table 0x6.0x5 = 0x172,0x3
0174 e00d       |    |		Load	0x0,0xd
0175 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0176 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x6.0x6 = 0x176,0x4
0177 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x7 = 0x177,0x5
0178 00db       |    |		Load_Top	At_Offset_3
0179 01d7       |    |		Execute	Vector,Field_Read
017a 0f5e       | ^  |		Execute_Immediate	Equal,0x5e
017b 6806       |h   |		Jump_Zero	0x182
017c 4802       |H   |		Short_Literal	0x2							; Debug Table 0x6.0x8 = 0x17c,0x6
017d 00da       |    |		Load_Top	At_Offset_2
017e e402       |    |		Load	0x2,0x2
017f 01cf       |    |		Execute	Vector,Slice_Read
0180 8227       | '  |		Call	0x1,0x27
0181 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0182 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x6.0x9 = 0x182,0x7
0183 4801       |H   |		Short_Literal	0x1
0184 00db       |    |		Load_Top	At_Offset_3
0185 e402       |    |		Load	0x2,0x2
0186 01cf       |    |		Execute	Vector,Slice_Read
0187 00ea       |    |		Load_Encached	Null_String_Cache
0188 8226       | &  |		Call	0x1,0x26
0189 0059       | Y  |		Store_Top	Discrete,At_Offset_1
018a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
018b 0000 0000  |    |		.BLANK	0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0198       |    |		.CONST	0x0198								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0003       |    |		.CONST	0x0003								; Number of locals
0193			INIT_0190:
0193 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7 = .DEBUG	0x0193,0x05d8,0x0001,0x0000,0x0038,0xd486,0x0000,0x004f
													; Debug Table 0x7.0x0 = 0x193,0xffff
0194 49f4       |I   |		Short_Literal	0x1f4
0195 00e9       |    |		Load_Encached	String_Cache
0196 0334       | 4  |		Declare_Variable	Array,With_Constraint
0197 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x7.0x1 = 0x197,0xfffe
0198			BODY_0190:
0198 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x7.0x2 = 0x198,0x1
0199 00da       |    |		Load_Top	At_Offset_2
019a 4801       |H   |		Short_Literal	0x1
019b e001       |    |		Load	0x0,0x1
019c 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
019d 00d1       |    |		Pop_Control	Pop_Count_1
019e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
019f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x3 = 0x19f,0x2
01a0 7005       |p   |		Jump_Nonzero	0x1a6
01a1 0092 0403  |    |		Action	Push_String_Extended,0x403					; "UNIVERSE'BOD"
													; Debug Table 0x7.0x4 = 0x1a1,0x3
01a3 e004       |    |		Load	0x0,0x4
01a4 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01a5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01a6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x5 = 0x1a6,0x4
01a7 00d9       |    |		Load_Top	At_Offset_1
01a8 00db       |    |		Load_Top	At_Offset_3
01a9 01cf       |    |		Execute	Vector,Slice_Read
01aa e004       |    |		Load	0x0,0x4
01ab 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01ac 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01ad 0000 0000  |    |		.XXX[0x3]
01af 0000       |    |
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b8       |    |		.CONST	0x01b8								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0003       |    |		.CONST	0x0003								; Number of locals
01b3			INIT_01b0:
01b3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8 = .DEBUG	0x01b3,0x05e6,0x0001,0x0000,0x0038,0xd486,0x0000,0x0053
													; Debug Table 0x8.0x0 = 0x1b3,0xffff
01b4 49f4       |I   |		Short_Literal	0x1f4
01b5 00e9       |    |		Load_Encached	String_Cache
01b6 0334       | 4  |		Declare_Variable	Array,With_Constraint
01b7 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x8.0x1 = 0x1b7,0xfffe
01b8			BODY_01b0:
01b8 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x8.0x2 = 0x1b8,0x1
01b9 00da       |    |		Load_Top	At_Offset_2
01ba 4801       |H   |		Short_Literal	0x1
01bb e001       |    |		Load	0x0,0x1
01bc 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
01bd 00d1       |    |		Pop_Control	Pop_Count_1
01be 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01bf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x3 = 0x1bf,0x2
01c0 7003       |p   |		Jump_Nonzero	0x1c4
01c1 e216       |    |		Load	0x1,0x16							; Debug Table 0x8.0x4 = 0x1c1,0x3
01c2 a219       |    |		Store_Unchecked	0x1,0x19
01c3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x8.0x5 = 0x1c3,0x4
01c4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x6 = 0x1c4,0x5
01c5 00da       |    |		Load_Top	At_Offset_2
01c6 01d7       |    |		Execute	Vector,Field_Read
01c7 0e3a       | :  |		Execute_Immediate	Not_Equal,0x3a
01c8 680b       |h   |		Jump_Zero	0x1d4
01c9 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x7 = 0x1c9,0x6
01ca 00d9       |    |		Load_Top	At_Offset_1
01cb 00db       |    |		Load_Top	At_Offset_3
01cc 01cf       |    |		Execute	Vector,Slice_Read
01cd 0092 0404  |    |		Action	Push_String_Extended,0x404					; ":"
01cf 01cc       |    |		Execute	Vector,Catenate
01d0 e216       |    |		Load	0x1,0x16
01d1 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
01d2 a219       |    |		Store_Unchecked	0x1,0x19
01d3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01d4 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x8 = 0x1d4,0x7
01d5 00d9       |    |		Load_Top	At_Offset_1
01d6 00db       |    |		Load_Top	At_Offset_3
01d7 01cf       |    |		Execute	Vector,Slice_Read
01d8 e216       |    |		Load	0x1,0x16
01d9 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
01da a219       |    |		Store_Unchecked	0x1,0x19
01db 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01dc 0000 0000  |    |		.BLANK	0000[0x4]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3       |    |		.CONST	0x01e3								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0001       |    |		.CONST	0x0001								; Number of locals
01e3			BODY_01e0:
01e3			INIT_01e0:
01e3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x01e3,0x05fa,0x0001,0x0000,0x0039,0x3516,0x0000,0x00ee
													; Debug Table 0x9.0x0 = 0x1e3,0x1
01e4 e00b       |    |		Load	0x0,0xb
01e5 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01e6 e00b       |    |		Load	0x0,0xb								; Debug Table 0x9.0x1 = 0x1e6,0x2
01e7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01e8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01e9 0000 0000  |    |		.BLANK	0000[0x7]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 e217       |    |		Load	0x1,0x17							; Debug Table 0xa = .DEBUG	0x01f3,0x0600,0x0002,0x0000,0x0039,0x3516,0x0000,0x0121
													; Debug Table 0xa.0x0 = 0x1f3,0x1
01f4 0a01       |    |		Execute_Immediate	Plus,0x1
01f5 c217       |    |		Store	0x1,0x17
01f6 e218       |    |		Load	0x1,0x18							; Debug Table 0xa.0x1 = 0x1f6,0x2
01f7 4820       |H   |		Short_Literal	0x20
01f8 e217       |    |		Load	0x1,0x17
01f9 00e0       |    |		Load_Encached	Standard_Cache
01fa 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01fb e007       |    |		Load	0x0,0x7
01fc 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01fd 01cc       |    |		Execute	Vector,Catenate
01fe 00ca       |    |		Action	Exit_Nullary_Function
01ff 0000       |    |		.XXX[0x1]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x0203,0x0606,0x0001,0x0000,0x0039,0x3516,0x0000,0x0140
													; Debug Table 0xb.0x0 = 0x203,0x1
0204 0f03       |    |		Execute_Immediate	Equal,0x3
0205 7012       |p   |		Jump_Nonzero	0x218
0206 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x1 = 0x206,0x2
0207 a5fe       |    |		Store_Unchecked	0x2,-0x2
0208 0092 0405  |    |		Action	Push_String_Extended,0x405					; "COMMUNICATIONS STATUS "
													; Debug Table 0xb.0x2 = 0x208,0x3
020a 00db       |    |		Load_Top	At_Offset_3
020b e00e       |    |		Load	0x0,0xe
020c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
020d 025e       | ^  |		Execute	Discrete,Convert
020e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
020f 01cc       |    |		Execute	Vector,Catenate
0210 0092 0406  |    |		Action	Push_String_Extended,0x406					; ": "
0212 01cc       |    |		Execute	Vector,Catenate
0213 e21f       |    |		Load	0x1,0x1f
0214 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0215 01cc       |    |		Execute	Vector,Catenate
0216 821e       |    |		Call	0x1,0x1e
0217 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0218 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x3 = 0x218,0x4
0219 a5fe       |    |		Store_Unchecked	0x2,-0x2
021a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
021b 0000 0000  |    |		.BLANK	0000[0x5]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x0223,0x0610,0x0002,0x0000,0x0039,0x3516,0x0000,0x0181
													; Debug Table 0xc.0x0 = 0x223,0x1
0224 0f0a       |    |		Execute_Immediate	Equal,0xa
0225 7003       |p   |		Jump_Nonzero	0x229
0226 00da       |    |		Load_Top	At_Offset_2
0227 0f0d       |    |		Execute_Immediate	Equal,0xd
0228 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0229 4801       |H   |		Short_Literal	0x1
022a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
022b 0000 0000  |    |		.BLANK	0000[0x5]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 023a       | :  |		.CONST	0x023a								; Address of begin
0231 0253       | S  |		.CONST	0x0253								; Address of exception handler
0232 0003       |    |		.CONST	0x0003								; Number of locals
0233			INIT_0230:
0233 4900       |I   |		Short_Literal	0x100							; Debug Table 0xd = .DEBUG	0x0233,0x0614,0x0002,0x0000,0x0039,0x3516,0x0000,0x019f
													; Debug Table 0xd.0x0 = 0x233,0xffff
0234 e00f       |    |		Load	0x0,0xf
0235 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0236 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0237 00d8       |    |		Load_Top	At_Offset_0
0238 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0239 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0xd.0x1 = 0x239,0xfffe
023a			BODY_0230:
023a 00cf       |    |		Action	Mark_Auxiliary
023b 780e       |x   |		Jump	0x24a
023c 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0xd.0x2 = 0x23c,0x2
023d e5ff       |    |		Load	0x2,-0x1
023e e004       |    |		Load	0x0,0x4
023f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0240 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0241 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x3 = 0x241,0x3
0242 8222       | "  |		Call	0x1,0x22
0243 700a       |p   |		Jump_Nonzero	0x24e
0244 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x4 = 0x244,0x4
0245 00da       |    |		Load_Top	At_Offset_2
0246 e00f       |    |		Load	0x0,0xf
0247 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0248 00d1       |    |		Pop_Control	Pop_Count_1
0249 00c9       |    |		Action	Pop_Auxiliary_Loop
024a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xd.0x5 = 0x24a,0x1
024b e004       |    |		Load	0x0,0x4
024c 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
024d 6fee       |o   |		Jump_Zero	0x23c
024e 00ce       |    |		Action	Pop_Auxiliary
024f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x6 = 0x24f,0x5
0250 e00f       |    |		Load	0x0,0xf
0251 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0252 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0253			TRAP_0230:
0253 0007       |    |		Action	Break_Optional
0254 0092 0407  |    |		Action	Push_String_Extended,0x407					; "Read_Failure: "
													; Debug Table 0xd.0x7 = 0x254,0x6
0256 e010       |    |		Load	0x0,0x10
0257 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0258 01cc       |    |		Execute	Vector,Catenate
0259 821e       |    |		Call	0x1,0x1e
025a 60ad       |`   |		Indirect_Literal	Discrete,0x308,{0x00000000, 0x39351601}		; Debug Table 0xd.0x8 = 0x25a,0x7
025b 0257       | W  |		Execute	Discrete,Raise
025c 0000 0000  |    |		.BLANK	0000[0x4]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0267       | g  |		.CONST	0x0267								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0002       |    |		.CONST	0x0002								; Number of locals
0263			INIT_0260:
0263 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x0263,0x0628,0x0002,0x0000,0x0039,0x3516,0x0000,0x01ec
													; Debug Table 0xe.0x0 = 0x263,0xffff
0264 01dd       |    |		Execute	Vector,First
0265 00e2       |    |		Load_Encached	Integer_Cache
0266 03f1       |    |		Declare_Variable	Discrete,With_Value
0267			BODY_0260:
0267 00cf       |    |		Action	Mark_Auxiliary
0268 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xe.0x1 = 0x268,0x1
0269 01d9       |    |		Execute	Vector,Reverse_Bounds
026a 0263       | c  |		Execute	Discrete,Above_Bound
026b 700b       |p   |		Jump_Nonzero	0x277
026c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x2 = 0x26c,0x2
026d e5ff       |    |		Load	0x2,-0x1
026e 01d7       |    |		Execute	Vector,Field_Read
026f 0f3a       | :  |		Execute_Immediate	Equal,0x3a
0270 6804       |h   |		Jump_Zero	0x275
0271 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x3 = 0x271,0x3
0272 0a01       |    |		Execute_Immediate	Plus,0x1
0273 0248       | H  |		Execute	Discrete,Check_In_Integer
0274 a402       |    |		Store_Unchecked	0x2,0x2
0275 00c8       |    |		Action	Pop_Auxiliary_Range
0276 3ff5       |?   |		Loop_Increasing	0x26c
0277 00ce       |    |		Action	Pop_Auxiliary
0278 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x4 = 0x278,0x4
0279 e5ff       |    |		Load	0x2,-0x1
027a 01dc       |    |		Execute	Vector,Last
027b e5ff       |    |		Load	0x2,-0x1
027c 01cf       |    |		Execute	Vector,Slice_Read
027d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
027e 0000 0000  |    |		.XXX[0x2]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283       |    |		.CONST	0x0283								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0001       |    |		.CONST	0x0001								; Number of locals
0283			BODY_0280:
0283			INIT_0280:
0283 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xf = .DEBUG	0x0283,0x0634,0x0002,0x0000,0x0039,0x3516,0x0000,0x02a7
													; Debug Table 0xf.0x0 = 0x283,0x1
0284 01dd       |    |		Execute	Vector,First
0285 00db       |    |		Load_Top	At_Offset_3
0286 01d7       |    |		Execute	Vector,Field_Read
0287 0f3a       | :  |		Execute_Immediate	Equal,0x3a
0288 7002       |p   |		Jump_Nonzero	0x28b
0289 e219       |    |		Load	0x1,0x19
028a 7002       |p   |		Jump_Nonzero	0x28d
028b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xf.0x1 = 0x28b,0x2
028c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028d e219       |    |		Load	0x1,0x19							; Debug Table 0xf.0x2 = 0x28d,0x3
028e 0227       | '  |		Execute	Access,All_Reference
028f 00db       |    |		Load_Top	At_Offset_3
0290 01cc       |    |		Execute	Vector,Catenate
0291 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0292 0000 0000  |    |		.BLANK	0000[0x6]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a1       |    |		.CONST	0x02a1								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0003       |    |		.CONST	0x0003								; Number of locals
029b			INIT_0298:
029b e21a       |    |		Load	0x1,0x1a							; Debug Table 0x10 = .DEBUG	0x029b,0x063c,0x0001,0x0000,0x0039,0x3516,0x0000,0x02d3
													; Debug Table 0x10.0x0 = 0x29b,0xffff
029c 02c7       |    |		Declare_Variable	Any
029d 00d8       |    |		Load_Top	At_Offset_0
029e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
029f e00e       |    |		Load	0x0,0xe								; Debug Table 0x10.0x1 = 0x29f,0xfffe
02a0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02a1			BODY_0298:
02a1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0x2 = 0x2a1,0x1
02a2 01db       |    |		Execute	Vector,Length
02a3 7006       |p   |		Jump_Nonzero	0x2aa
02a4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x10.0x3 = 0x2a4,0x2
02a5 e5fe       |    |		Load	0x2,-0x2
02a6 e5fe       |    |		Load	0x2,-0x2
02a7 8226       | &  |		Call	0x1,0x26
02a8 c5fd       |    |		Store	0x2,-0x3
02a9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02aa e00e       |    |		Load	0x0,0xe								; Debug Table 0x10.0x4 = 0x2aa,0x3
02ab 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02ac 00da       |    |		Load_Top	At_Offset_2
02ad e5ff       |    |		Load	0x2,-0x1
02ae 8225       | %  |		Call	0x1,0x25
02af e5fe       |    |		Load	0x2,-0x2
02b0 8224       | $  |		Call	0x1,0x24
02b1 e21f       |    |		Load	0x1,0x1f
02b2 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02b3 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02b4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x10.0x5 = 0x2b4,0x4
02b5 00d9       |    |		Load_Top	At_Offset_1
02b6 8221       | !  |		Call	0x1,0x21
02b7 c5fd       |    |		Store	0x2,-0x3
02b8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x10.0x6 = 0x2b8,0x5
02b9 0000 0000  |    |		.BLANK	0000[0x7]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02ca       |    |		.CONST	0x02ca								; Address of begin
02c1 02f1       |    |		.CONST	0x02f1								; Address of exception handler
02c2 0004       |    |		.CONST	0x0004								; Number of locals
02c3			INIT_02c0:
02c3 8220       |    |		Call	0x1,0x20							; Debug Table 0x11 = .DEBUG	0x02c3,0x064c,0x0001,0x0000,0x0039,0x3516,0x0000,0x0320
													; Debug Table 0x11.0x0 = 0x2c3,0xffff
02c4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x1 = 0x2c4,0xfffe
02c5 e004       |    |		Load	0x0,0x4								; Debug Table 0x11.0x2 = 0x2c5,0xfffd
02c6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02c7 02c7       |    |		Declare_Variable	Any
02c8 00d8       |    |		Load_Top	At_Offset_0
02c9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02ca			BODY_02c0:
02ca 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x3 = 0x2ca,0x1
02cb 00db       |    |		Load_Top	At_Offset_3
02cc e5ff       |    |		Load	0x2,-0x1
02cd 8226       | &  |		Call	0x1,0x26
02ce 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02cf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x4 = 0x2cf,0x2
02d0 7005       |p   |		Jump_Nonzero	0x2d6
02d1 0092 0408  |    |		Action	Push_String_Extended,0x408					; "can't get indirect file"
													; Debug Table 0x11.0x5 = 0x2d1,0x3
02d3 e00d       |    |		Load	0x0,0xd
02d4 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
02d5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x11.0x6 = 0x2d5,0x4
02d6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x7 = 0x2d6,0x5
02d7 00db       |    |		Load_Top	At_Offset_3
02d8 e004       |    |		Load	0x0,0x4
02d9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02da c404       |    |		Store	0x2,0x4
02db 00cf       |    |		Action	Mark_Auxiliary
02dc 7807       |x   |		Jump	0x2e4
02dd 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x8 = 0x2dd,0x7
02de 00da       |    |		Load_Top	At_Offset_2
02df 8223       | #  |		Call	0x1,0x23
02e0 00ea       |    |		Load_Encached	Null_String_Cache
02e1 8226       | &  |		Call	0x1,0x26
02e2 005b       | [  |		Store_Top	Discrete,At_Offset_3
02e3 00c9       |    |		Action	Pop_Auxiliary_Loop
02e4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x9 = 0x2e4,0x6
02e5 e004       |    |		Load	0x0,0x4
02e6 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02e7 6ff5       |o   |		Jump_Zero	0x2dd
02e8 00ce       |    |		Action	Pop_Auxiliary
02e9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xa = 0x2e9,0x8
02ea e004       |    |		Load	0x0,0x4
02eb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02ec c404       |    |		Store	0x2,0x4
02ed 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0xb = 0x2ed,0x9
02ee e004       |    |		Load	0x0,0x4
02ef 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
02f0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02f1			TRAP_02c0:
02f1 6016       |`   |		Indirect_Literal	Discrete,0x308,{0x00000000, 0x39351601}
02f2 010f       |    |		Execute	Exception,Equal
02f3 6805       |h   |		Jump_Zero	0x2f9
02f4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0xc = 0x2f4,0xa
02f5 e004       |    |		Load	0x0,0x4
02f6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02f7 c404       |    |		Store	0x2,0x4
02f8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02f9 00d8       |    |		Load_Top	At_Offset_0
02fa 0107       |    |		Execute	Exception,Get_Name
02fb 4920       |I   |		Short_Literal	0x120
02fc 492f       |I/  |		Short_Literal	0x12f
02fd 0262       | b  |		Execute	Discrete,In_Range
02fe 6806       |h   |		Jump_Zero	0x305
02ff e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0xd = 0x2ff,0xb
0300 0092 0409  |    |		Action	Push_String_Extended,0x409					; " not found"
0302 01cc       |    |		Execute	Vector,Catenate
0303 821e       |    |		Call	0x1,0x1e
0304 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0305 0100       |    |		Execute	Exception,Raise
0306 0000 0000  |    |		.XXX[0x2]
0308 0000 0000  |    |		.LITERAL	{0x00000000, 0x39351601}
030c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00028000}
0310 0000 0000  |    |		.LITERAL	{0x00000000, 0x00393516}
0314 00b5 bc18  |    |		.LITERAL	{0x00b5bc18, 0x00003330}
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 0320       |    |		.CONST	0x0320								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0002       |    |		.CONST	0x0002								; Number of locals
031b			INIT_0318:
031b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x12 = .DEBUG	0x031b,0x066a,0x0002,0x0000,0x0039,0x3516,0x0000,0x054e
													; Debug Table 0x12.0x0 = 0x31b,0xffff
031c 00db       |    |		Load_Top	At_Offset_3
031d 00eb       |    |		Load_Encached	Diana_Cache
031e 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
031f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0320			BODY_0318:
0320 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x1 = 0x320,0x1
0321 00eb       |    |		Load_Encached	Diana_Cache
0322 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0323 0ba8       |    |		Execute_Immediate	Case_Compare,0xa8
0324 7004       |p   |		Jump_Nonzero	0x329
0325 0b49       | I  |		Execute_Immediate	Case_Compare,0x49
0326 7004       |p   |		Jump_Nonzero	0x32b
0327 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x12.0x2 = 0x327,0x4
0328 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0329 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x3 = 0x329,0x2
032a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
032b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x4 = 0x32b,0x3
032c 00eb       |    |		Load_Encached	Diana_Cache
032d 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
032e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
032f 0000 035e  |   ^|		.XXX[0x4]
0331 0004 0016  |    |
0333 e001       |    |		Load	0x0,0x1								; Debug Table 0x13 = .DEBUG	0x0333,0x0676,0x0000,0x0000,0x0039,0x3516,0x0000,0x0079
													; Debug Table 0x13.0x0 = 0x333,0xffff
0334 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0335 029f 0363  |   c|		Declare_Subprogram	INIT_0360,For_Call
0337 4801       |H   |		Short_Literal	0x1
0338 032e       | .  |		Declare_Type	Record,Defined,Visible
0339 029a 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x1 = 0x339,0xfffe
033b 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x2 = 0x33b,0xfffd
033d 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x3 = 0x33d,0xfffc
033f 029a 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x4 = 0x33f,0xfffb
0341 029a 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x5 = 0x341,0xfffa
0343 029a 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x6 = 0x343,0xfff9
0345 029a 03db  |    |		Declare_Subprogram	INIT_03d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x7 = 0x345,0xfff8
0347 029a 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x8 = 0x347,0xfff7
0349 029a 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x13.0x9 = 0x349,0xfff6
034b 00bf       |    |		Action	Accept_Activation
034c 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x14 = .DEBUG	0x034c,0x068c,0x0000,0x0000,0x0039,0x3516,0x0000,0x03da
													; Debug Table 0x14.0x0 = 0x34c,0xffff
034d 00c7       |    |		Action	Elaborate_Subprogram
034e 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x14.0x1 = 0x34e,0xfffe
034f 00c7       |    |		Action	Elaborate_Subprogram
0350 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x14.0x2 = 0x350,0xfffd
0351 00c7       |    |		Action	Elaborate_Subprogram
0352 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x14.0x3 = 0x352,0xfffc
0353 00c7       |    |		Action	Elaborate_Subprogram
0354 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x14.0x4 = 0x354,0xfffb
0355 00c7       |    |		Action	Elaborate_Subprogram
0356 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x14.0x5 = 0x356,0xfffa
0357 00c7       |    |		Action	Elaborate_Subprogram
0358 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x14.0x6 = 0x358,0xfff9
0359 00c7       |    |		Action	Elaborate_Subprogram
035a 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x14.0x7 = 0x35a,0xfff8
035b 00c7       |    |		Action	Elaborate_Subprogram
035c 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x14.0x8 = 0x35c,0xfff7
035d 00c7       |    |		Action	Elaborate_Subprogram
035e 00bc       |    |		Action	Signal_Activated
035f 00bb       |    |		Action	Signal_Completion
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363       | c  |		.CONST	0x0363								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0001       |    |		.CONST	0x0001								; Number of locals
0363			BODY_0360:
0363			INIT_0360:
0363 4608       |F   |		Jump_Case	0x9							; Debug Table 0x15 = .DEBUG	0x0363,0x06a0,0x0005,0x0000,0x0039,0x3516,0x0000,0x007a
0364 7808       |x   |		Jump	0x36d								; case 0x0
0365 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0366 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0367 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0368 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0369 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
036a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
036b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
036c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
036d 00da       |    |		Load_Top	At_Offset_2
036e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
036f 0125       | %  |		Execute	Any,Set_Constraint
0370 00da       |    |		Load_Top	At_Offset_2
0371 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0372 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0373 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0374 0000 0000  |    |		.BLANK	0000[0x4]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b       | {  |		.CONST	0x037b								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0001       |    |		.CONST	0x0001								; Number of locals
037b			BODY_0378:
037b			INIT_0378:
037b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16 = .DEBUG	0x037b,0x06a2,0x0001,0x0000,0x0039,0x3516,0x0000,0x0083
													; Debug Table 0x16.0x0 = 0x37b,0x1
037c 6808       |h   |		Jump_Zero	0x385
037d e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x16.0x1 = 0x37d,0x2
037e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
037f 00db       |    |		Load_Top	At_Offset_3
0380 e001       |    |		Load	0x0,0x1
0381 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0382 e5fc       |    |		Load	0x2,-0x4
0383 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0384 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0385 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x16.0x2 = 0x385,0x3
0386 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0387 00db       |    |		Load_Top	At_Offset_3
0388 e001       |    |		Load	0x0,0x1
0389 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
038a e5fc       |    |		Load	0x2,-0x4
038b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
038c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
038d 0000 0000  |    |		.XXX[0x3]
038f 0000       |    |
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393       |    |		.CONST	0x0393								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0001       |    |		.CONST	0x0001								; Number of locals
0393			BODY_0390:
0393			INIT_0390:
0393 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17 = .DEBUG	0x0393,0x06aa,0x0001,0x0000,0x0039,0x3516,0x0000,0x0097
													; Debug Table 0x17.0x0 = 0x393,0x1
0394 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0395 e001       |    |		Load	0x0,0x1
0396 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0397 00db       |    |		Load_Top	At_Offset_3
0398 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0399 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
039a 0000 0000  |    |		.BLANK	0000[0x6]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3       |    |		.CONST	0x03a3								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0001       |    |		.CONST	0x0001								; Number of locals
03a3			BODY_03a0:
03a3			INIT_03a0:
03a3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18 = .DEBUG	0x03a3,0x06ae,0x0002,0x0000,0x0039,0x3516,0x0000,0x009f
													; Debug Table 0x18.0x0 = 0x3a3,0x1
03a4 00db       |    |		Load_Top	At_Offset_3
03a5 e002       |    |		Load	0x0,0x2
03a6 e003       |    |		Load	0x0,0x3
03a7 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03a8 00db       |    |		Load_Top	At_Offset_3
03a9 01dd       |    |		Execute	Vector,First
03aa 027e       | ~  |		Execute	Discrete,Not_Equal
03ab 6805       |h   |		Jump_Zero	0x3b1
03ac 0092 040a  |    |		Action	Push_String_Extended,0x40a					; "Creating "
													; Debug Table 0x18.0x1 = 0x3ac,0x2
03ae 00db       |    |		Load_Top	At_Offset_3
03af 01cc       |    |		Execute	Vector,Catenate
03b0 8004       |    |		Call	0x0,0x4
03b1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x18.0x2 = 0x3b1,0x3
03b2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b3 0000 0000  |    |		.BLANK	0000[0x5]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19 = .DEBUG	0x03bb,0x06b6,0x0002,0x0000,0x0039,0x3516,0x0000,0x00a8
													; Debug Table 0x19.0x0 = 0x3bb,0x1
03bc 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03bd e001       |    |		Load	0x0,0x1
03be 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03bf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3       |    |		.CONST	0x03c3								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0001       |    |		.CONST	0x0001								; Number of locals
03c3			BODY_03c0:
03c3			INIT_03c0:
03c3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a = .DEBUG	0x03c3,0x06ba,0x0002,0x0000,0x0039,0x3516,0x0000,0x00b1
													; Debug Table 0x1a.0x0 = 0x3c3,0x1
03c4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03c5 e001       |    |		Load	0x0,0x1
03c6 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
03c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb       |    |		.CONST	0x03cb								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0001       |    |		.CONST	0x0001								; Number of locals
03cb			BODY_03c8:
03cb			INIT_03c8:
03cb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b = .DEBUG	0x03cb,0x06be,0x0001,0x0000,0x0039,0x3516,0x0000,0x00ba
													; Debug Table 0x1b.0x0 = 0x3cb,0x1
03cc 00db       |    |		Load_Top	At_Offset_3
03cd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03ce e001       |    |		Load	0x0,0x1
03cf 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03d0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d1 0000 0000  |    |		.BLANK	0000[0x7]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db       |    |		.CONST	0x03db								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0001       |    |		.CONST	0x0001								; Number of locals
03db			BODY_03d8:
03db			INIT_03d8:
03db e001       |    |		Load	0x0,0x1								; Debug Table 0x1c = .DEBUG	0x03db,0x06c2,0x0001,0x0000,0x0039,0x3516,0x0000,0x00c6
													; Debug Table 0x1c.0x0 = 0x3db,0x1
03dc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03dd 00db       |    |		Load_Top	At_Offset_3
03de 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03df e001       |    |		Load	0x0,0x1
03e0 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
03e1 c5fe       |    |		Store	0x2,-0x2
03e2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03e3 0000 0000  |    |		.BLANK	0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x1d = .DEBUG	0x03eb,0x06c6,0x0001,0x0000,0x0039,0x3516,0x0000,0x00d2
													; Debug Table 0x1d.0x0 = 0x3eb,0x1
03ec 00db       |    |		Load_Top	At_Offset_3
03ed 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03ee e001       |    |		Load	0x0,0x1
03ef 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03f0 c5fe       |    |		Store	0x2,-0x2
03f1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03f2 0000 0000  |    |		.BLANK	0000[0x6]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fb       |    |		.CONST	0x03fb								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0001       |    |		.CONST	0x0001								; Number of locals
03fb			BODY_03f8:
03fb			INIT_03f8:
03fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e = .DEBUG	0x03fb,0x06ca,0x0001,0x0000,0x0039,0x3516,0x0000,0x00de
													; Debug Table 0x1e.0x0 = 0x3fb,0x1
03fc e5fe       |    |		Load	0x2,-0x2
03fd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03fe e001       |    |		Load	0x0,0x1
03ff 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0400 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0401 ; --------------------------------------------------------------------------------------
0401 ; STRING TABLE
0401 ; --------------------------------------------------------------------------------------
0401 0016       |    |		.STRTAB	0x0016->0x040c							; "dt_tmp"
0402 001a       |    |		.STRTAB	0x001a->0x040f							; "no name given"
0403 0025       | %  |		.STRTAB	0x0025->0x0415							; "UNIVERSE'BOD"
0404 002f       | /  |		.STRTAB	0x002f->0x041b							; ":"
0405 002e       | .  |		.STRTAB	0x002e->0x041c							; "COMMUNICATIONS STATUS "
0406 0042       | B  |		.STRTAB	0x0042->0x0427							; ": "
0407 0042       | B  |		.STRTAB	0x0042->0x0428							; "Read_Failure: "
0408 004e       | N  |		.STRTAB	0x004e->0x042f							; "can't get indirect file"
0409 0063       | c  |		.STRTAB	0x0063->0x043a							; " not found"
040a 006b       | k  |		.STRTAB	0x006b->0x043f							; "Creating "
040b 0072       | r  |		.STREND 0x0072->0x0444
040c 6474 5f74  |dt_t|		.STRTAB_STRINGS
0444 0000 0000  |    |		.BLANK	0000[0x4]
0448 ; --------------------------------------------------------------------------------------
0448 ; Debug Table
0448 ; --------------------------------------------------------------------------------------
0448 0003 001f  |    |		.CONST	0x0003,0x001f
044a 000b 0542  |   B|		.DEBUG	0x000b,0x0542,0x8000,0x0000,0x0038,0xd486,0x0000,0x0009
0452 001a 0552  |   R|		.DEBUG	0x001a,0x0552,0x8000,0x0000,0x0039,0x3516,0x0000,0x0023
045a 009b 059a  |    |		.DEBUG	0x009b,0x059a,0x0001,0x0000,0x0038,0xd486,0x0000,0x000a
0462 00db 05ac  |    |		.DEBUG	0x00db,0x05ac,0x0002,0x0000,0x0038,0xd486,0x0000,0x0012
046a 00eb 05b2  |    |		.DEBUG	0x00eb,0x05b2,0x0001,0x0000,0x0038,0xd486,0x0000,0x001f
0472 012b 05ba  | +  |		.DEBUG	0x012b,0x05ba,0x0001,0x0000,0x0038,0xd486,0x0000,0x0035
047a 0163 05c2  | c  |		.DEBUG	0x0163,0x05c2,0x0001,0x0000,0x0038,0xd486,0x0000,0x004b
0482 0193 05d8  |    |		.DEBUG	0x0193,0x05d8,0x0001,0x0000,0x0038,0xd486,0x0000,0x004f
048a 01b3 05e6  |    |		.DEBUG	0x01b3,0x05e6,0x0001,0x0000,0x0038,0xd486,0x0000,0x0053
0492 01e3 05fa  |    |		.DEBUG	0x01e3,0x05fa,0x0001,0x0000,0x0039,0x3516,0x0000,0x00ee
049a 01f3 0600  |    |		.DEBUG	0x01f3,0x0600,0x0002,0x0000,0x0039,0x3516,0x0000,0x0121
04a2 0203 0606  |    |		.DEBUG	0x0203,0x0606,0x0001,0x0000,0x0039,0x3516,0x0000,0x0140
04aa 0223 0610  | #  |		.DEBUG	0x0223,0x0610,0x0002,0x0000,0x0039,0x3516,0x0000,0x0181
04b2 0233 0614  | 3  |		.DEBUG	0x0233,0x0614,0x0002,0x0000,0x0039,0x3516,0x0000,0x019f
04ba 0263 0628  | c (|		.DEBUG	0x0263,0x0628,0x0002,0x0000,0x0039,0x3516,0x0000,0x01ec
04c2 0283 0634  |   4|		.DEBUG	0x0283,0x0634,0x0002,0x0000,0x0039,0x3516,0x0000,0x02a7
04ca 029b 063c  |   <|		.DEBUG	0x029b,0x063c,0x0001,0x0000,0x0039,0x3516,0x0000,0x02d3
04d2 02c3 064c  |   L|		.DEBUG	0x02c3,0x064c,0x0001,0x0000,0x0039,0x3516,0x0000,0x0320
04da 031b 066a  |   j|		.DEBUG	0x031b,0x066a,0x0002,0x0000,0x0039,0x3516,0x0000,0x054e
04e2 0333 0676  | 3 v|		.DEBUG	0x0333,0x0676,0x0000,0x0000,0x0039,0x3516,0x0000,0x0079
04ea 034c 068c  | L  |		.DEBUG	0x034c,0x068c,0x0000,0x0000,0x0039,0x3516,0x0000,0x03da
04f2 0363 06a0  | c  |		.DEBUG	0x0363,0x06a0,0x0005,0x0000,0x0039,0x3516,0x0000,0x007a
04fa 037b 06a2  | {  |		.DEBUG	0x037b,0x06a2,0x0001,0x0000,0x0039,0x3516,0x0000,0x0083
0502 0393 06aa  |    |		.DEBUG	0x0393,0x06aa,0x0001,0x0000,0x0039,0x3516,0x0000,0x0097
050a 03a3 06ae  |    |		.DEBUG	0x03a3,0x06ae,0x0002,0x0000,0x0039,0x3516,0x0000,0x009f
0512 03bb 06b6  |    |		.DEBUG	0x03bb,0x06b6,0x0002,0x0000,0x0039,0x3516,0x0000,0x00a8
051a 03c3 06ba  |    |		.DEBUG	0x03c3,0x06ba,0x0002,0x0000,0x0039,0x3516,0x0000,0x00b1
0522 03cb 06be  |    |		.DEBUG	0x03cb,0x06be,0x0001,0x0000,0x0039,0x3516,0x0000,0x00ba
052a 03db 06c2  |    |		.DEBUG	0x03db,0x06c2,0x0001,0x0000,0x0039,0x3516,0x0000,0x00c6
0532 03eb 06c6  |    |		.DEBUG	0x03eb,0x06c6,0x0001,0x0000,0x0039,0x3516,0x0000,0x00d2
053a 03fb 06ca  |    |		.DEBUG	0x03fb,0x06ca,0x0001,0x0000,0x0039,0x3516,0x0000,0x00de
0542 ; --------------------------------------------------------------------------------------
0542 ; Debug3 Subtable 0x0
0542 ; --------------------------------------------------------------------------------------
0542 0007 0000  |    |		.DBG3TAB	0x0007,0x0000
0544 000b ffff  |    |		.CONST	0x000b,0xffff
0546 000d fffe  |    |		.CONST	0x000d,0xfffe
0548 000f fffd  |    |		.CONST	0x000f,0xfffd
054a 0011 fffc  |    |		.CONST	0x0011,0xfffc
054c 0013 fffb  |    |		.CONST	0x0013,0xfffb
054e 0015 fffa  |    |		.CONST	0x0015,0xfffa
0550 0017 fff9  |    |		.CONST	0x0017,0xfff9
0552 ; --------------------------------------------------------------------------------------
0552 ; Debug3 Subtable 0x1
0552 ; --------------------------------------------------------------------------------------
0552 0023 0000  | #  |		.DBG3TAB	0x0023,0x0000
0554 001a ffff  |    |		.CONST	0x001a,0xffff
0556 001b fffe  |    |		.CONST	0x001b,0xfffe
0558 001c fffd  |    |		.CONST	0x001c,0xfffd
055a 001d fffc  |    |		.CONST	0x001d,0xfffc
055c 0020 fffb  |    |		.CONST	0x0020,0xfffb
055e 0023 fffa  | #  |		.CONST	0x0023,0xfffa
0560 0027 fff9  | '  |		.CONST	0x0027,0xfff9
0562 0029 fff8  | )  |		.CONST	0x0029,0xfff8
0564 002b fff7  | +  |		.CONST	0x002b,0xfff7
0566 002c fff6  | ,  |		.CONST	0x002c,0xfff6
0568 002e fff5  | .  |		.CONST	0x002e,0xfff5
056a 0030 fff4  | 0  |		.CONST	0x0030,0xfff4
056c 0032 fff3  | 2  |		.CONST	0x0032,0xfff3
056e 0034 fff2  | 4  |		.CONST	0x0034,0xfff2
0570 0035 fff1  | 5  |		.CONST	0x0035,0xfff1
0572 003e fff0  | >  |		.CONST	0x003e,0xfff0
0574 0040 ffef  | @  |		.CONST	0x0040,0xffef
0576 0065 ffee  | e  |		.CONST	0x0065,0xffee
0578 0067 ffed  | g  |		.CONST	0x0067,0xffed
057a 0069 ffec  | i  |		.CONST	0x0069,0xffec
057c 006b ffeb  | k  |		.CONST	0x006b,0xffeb
057e 006d ffea  | m  |		.CONST	0x006d,0xffea
0580 006f ffe9  | o  |		.CONST	0x006f,0xffe9
0582 0071 ffe8  | q  |		.CONST	0x0071,0xffe8
0584 0073 ffe7  | s  |		.CONST	0x0073,0xffe7
0586 0075 ffe6  | u  |		.CONST	0x0075,0xffe6
0588 0077 ffe5  | w  |		.CONST	0x0077,0xffe5
058a 0079 ffe4  | y  |		.CONST	0x0079,0xffe4
058c 007b ffe3  | {  |		.CONST	0x007b,0xffe3
058e 007d ffe2  | }  |		.CONST	0x007d,0xffe2
0590 0085 ffe1  |    |		.CONST	0x0085,0xffe1
0592 0087 ffe0  |    |		.CONST	0x0087,0xffe0
0594 0089 ffdf  |    |		.CONST	0x0089,0xffdf
0596 008b ffde  |    |		.CONST	0x008b,0xffde
0598 008d ffdd  |    |		.CONST	0x008d,0xffdd
059a ; --------------------------------------------------------------------------------------
059a ; Debug3 Subtable 0x2
059a ; --------------------------------------------------------------------------------------
059a 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
059c 009b ffff  |    |		.CONST	0x009b,0xffff
059e 00a2 fffe  |    |		.CONST	0x00a2,0xfffe
05a0 00a8 fffd  |    |		.CONST	0x00a8,0xfffd
05a2 00a9 0001  |    |		.CONST	0x00a9,0x0001
05a4 00b2 0002  |    |		.CONST	0x00b2,0x0002
05a6 00c2 0003  |    |		.CONST	0x00c2,0x0003
05a8 00c4 0004  |    |		.CONST	0x00c4,0x0004
05aa 00cf 0005  |    |		.CONST	0x00cf,0x0005
05ac ; --------------------------------------------------------------------------------------
05ac ; Debug3 Subtable 0x3
05ac ; --------------------------------------------------------------------------------------
05ac 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
05ae 00db 0001  |    |		.CONST	0x00db,0x0001
05b0 00e4 0002  |    |		.CONST	0x00e4,0x0002
05b2 ; --------------------------------------------------------------------------------------
05b2 ; Debug3 Subtable 0x4
05b2 ; --------------------------------------------------------------------------------------
05b2 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05b4 00eb 0001  |    |		.CONST	0x00eb,0x0001
05b6 00f1 0002  |    |		.CONST	0x00f1,0x0002
05b8 010f 0003  |    |		.CONST	0x010f,0x0003
05ba ; --------------------------------------------------------------------------------------
05ba ; Debug3 Subtable 0x5
05ba ; --------------------------------------------------------------------------------------
05ba 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05bc 012b 0001  | +  |		.CONST	0x012b,0x0001
05be 0131 0002  | 1  |		.CONST	0x0131,0x0002
05c0 014a 0003  | J  |		.CONST	0x014a,0x0003
05c2 ; --------------------------------------------------------------------------------------
05c2 ; Debug3 Subtable 0x6
05c2 ; --------------------------------------------------------------------------------------
05c2 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
05c4 0163 ffff  | c  |		.CONST	0x0163,0xffff
05c6 0167 fffe  | g  |		.CONST	0x0167,0xfffe
05c8 0168 fffd  | h  |		.CONST	0x0168,0xfffd
05ca 0169 0001  | i  |		.CONST	0x0169,0x0001
05cc 0170 0002  | p  |		.CONST	0x0170,0x0002
05ce 0172 0003  | r  |		.CONST	0x0172,0x0003
05d0 0176 0004  | v  |		.CONST	0x0176,0x0004
05d2 0177 0005  | w  |		.CONST	0x0177,0x0005
05d4 017c 0006  | |  |		.CONST	0x017c,0x0006
05d6 0182 0007  |    |		.CONST	0x0182,0x0007
05d8 ; --------------------------------------------------------------------------------------
05d8 ; Debug3 Subtable 0x7
05d8 ; --------------------------------------------------------------------------------------
05d8 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
05da 0193 ffff  |    |		.CONST	0x0193,0xffff
05dc 0197 fffe  |    |		.CONST	0x0197,0xfffe
05de 0198 0001  |    |		.CONST	0x0198,0x0001
05e0 019f 0002  |    |		.CONST	0x019f,0x0002
05e2 01a1 0003  |    |		.CONST	0x01a1,0x0003
05e4 01a6 0004  |    |		.CONST	0x01a6,0x0004
05e6 ; --------------------------------------------------------------------------------------
05e6 ; Debug3 Subtable 0x8
05e6 ; --------------------------------------------------------------------------------------
05e6 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
05e8 01b3 ffff  |    |		.CONST	0x01b3,0xffff
05ea 01b7 fffe  |    |		.CONST	0x01b7,0xfffe
05ec 01b8 0001  |    |		.CONST	0x01b8,0x0001
05ee 01bf 0002  |    |		.CONST	0x01bf,0x0002
05f0 01c1 0003  |    |		.CONST	0x01c1,0x0003
05f2 01c3 0004  |    |		.CONST	0x01c3,0x0004
05f4 01c4 0005  |    |		.CONST	0x01c4,0x0005
05f6 01c9 0006  |    |		.CONST	0x01c9,0x0006
05f8 01d4 0007  |    |		.CONST	0x01d4,0x0007
05fa ; --------------------------------------------------------------------------------------
05fa ; Debug3 Subtable 0x9
05fa ; --------------------------------------------------------------------------------------
05fa 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
05fc 01e3 0001  |    |		.CONST	0x01e3,0x0001
05fe 01e6 0002  |    |		.CONST	0x01e6,0x0002
0600 ; --------------------------------------------------------------------------------------
0600 ; Debug3 Subtable 0xa
0600 ; --------------------------------------------------------------------------------------
0600 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0602 01f3 0001  |    |		.CONST	0x01f3,0x0001
0604 01f6 0002  |    |		.CONST	0x01f6,0x0002
0606 ; --------------------------------------------------------------------------------------
0606 ; Debug3 Subtable 0xb
0606 ; --------------------------------------------------------------------------------------
0606 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0608 0203 0001  |    |		.CONST	0x0203,0x0001
060a 0206 0002  |    |		.CONST	0x0206,0x0002
060c 0208 0003  |    |		.CONST	0x0208,0x0003
060e 0218 0004  |    |		.CONST	0x0218,0x0004
0610 ; --------------------------------------------------------------------------------------
0610 ; Debug3 Subtable 0xc
0610 ; --------------------------------------------------------------------------------------
0610 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0612 0223 0001  | #  |		.CONST	0x0223,0x0001
0614 ; --------------------------------------------------------------------------------------
0614 ; Debug3 Subtable 0xd
0614 ; --------------------------------------------------------------------------------------
0614 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
0616 0233 ffff  | 3  |		.CONST	0x0233,0xffff
0618 0239 fffe  | 9  |		.CONST	0x0239,0xfffe
061a 023c 0002  | <  |		.CONST	0x023c,0x0002
061c 0241 0003  | A  |		.CONST	0x0241,0x0003
061e 0244 0004  | D  |		.CONST	0x0244,0x0004
0620 024a 0001  | J  |		.CONST	0x024a,0x0001
0622 024f 0005  | O  |		.CONST	0x024f,0x0005
0624 0254 0006  | T  |		.CONST	0x0254,0x0006
0626 025a 0007  | Z  |		.CONST	0x025a,0x0007
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0xe
0628 ; --------------------------------------------------------------------------------------
0628 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
062a 0263 ffff  | c  |		.CONST	0x0263,0xffff
062c 0268 0001  | h  |		.CONST	0x0268,0x0001
062e 026c 0002  | l  |		.CONST	0x026c,0x0002
0630 0271 0003  | q  |		.CONST	0x0271,0x0003
0632 0278 0004  | x  |		.CONST	0x0278,0x0004
0634 ; --------------------------------------------------------------------------------------
0634 ; Debug3 Subtable 0xf
0634 ; --------------------------------------------------------------------------------------
0634 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0636 0283 0001  |    |		.CONST	0x0283,0x0001
0638 028b 0002  |    |		.CONST	0x028b,0x0002
063a 028d 0003  |    |		.CONST	0x028d,0x0003
063c ; --------------------------------------------------------------------------------------
063c ; Debug3 Subtable 0x10
063c ; --------------------------------------------------------------------------------------
063c 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
063e 029b ffff  |    |		.CONST	0x029b,0xffff
0640 029f fffe  |    |		.CONST	0x029f,0xfffe
0642 02a1 0001  |    |		.CONST	0x02a1,0x0001
0644 02a4 0002  |    |		.CONST	0x02a4,0x0002
0646 02aa 0003  |    |		.CONST	0x02aa,0x0003
0648 02b4 0004  |    |		.CONST	0x02b4,0x0004
064a 02b8 0005  |    |		.CONST	0x02b8,0x0005
064c ; --------------------------------------------------------------------------------------
064c ; Debug3 Subtable 0x11
064c ; --------------------------------------------------------------------------------------
064c 0003 000b  |    |		.DBG3TAB	0x0003,0x000b
064e 02c3 ffff  |    |		.CONST	0x02c3,0xffff
0650 02c4 fffe  |    |		.CONST	0x02c4,0xfffe
0652 02c5 fffd  |    |		.CONST	0x02c5,0xfffd
0654 02ca 0001  |    |		.CONST	0x02ca,0x0001
0656 02cf 0002  |    |		.CONST	0x02cf,0x0002
0658 02d1 0003  |    |		.CONST	0x02d1,0x0003
065a 02d5 0004  |    |		.CONST	0x02d5,0x0004
065c 02d6 0005  |    |		.CONST	0x02d6,0x0005
065e 02dd 0007  |    |		.CONST	0x02dd,0x0007
0660 02e4 0006  |    |		.CONST	0x02e4,0x0006
0662 02e9 0008  |    |		.CONST	0x02e9,0x0008
0664 02ed 0009  |    |		.CONST	0x02ed,0x0009
0666 02f4 000a  |    |		.CONST	0x02f4,0x000a
0668 02ff 000b  |    |		.CONST	0x02ff,0x000b
066a ; --------------------------------------------------------------------------------------
066a ; Debug3 Subtable 0x12
066a ; --------------------------------------------------------------------------------------
066a 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
066c 031b ffff  |    |		.CONST	0x031b,0xffff
066e 0320 0001  |    |		.CONST	0x0320,0x0001
0670 0327 0004  | '  |		.CONST	0x0327,0x0004
0672 0329 0002  | )  |		.CONST	0x0329,0x0002
0674 032b 0003  | +  |		.CONST	0x032b,0x0003
0676 ; --------------------------------------------------------------------------------------
0676 ; Debug3 Subtable 0x13
0676 ; --------------------------------------------------------------------------------------
0676 000a 0000  |    |		.DBG3TAB	0x000a,0x0000
0678 0333 ffff  | 3  |		.CONST	0x0333,0xffff
067a 0339 fffe  | 9  |		.CONST	0x0339,0xfffe
067c 033b fffd  | ;  |		.CONST	0x033b,0xfffd
067e 033d fffc  | =  |		.CONST	0x033d,0xfffc
0680 033f fffb  | ?  |		.CONST	0x033f,0xfffb
0682 0341 fffa  | A  |		.CONST	0x0341,0xfffa
0684 0343 fff9  | C  |		.CONST	0x0343,0xfff9
0686 0345 fff8  | E  |		.CONST	0x0345,0xfff8
0688 0347 fff7  | G  |		.CONST	0x0347,0xfff7
068a 0349 fff6  | I  |		.CONST	0x0349,0xfff6
068c ; --------------------------------------------------------------------------------------
068c ; Debug3 Subtable 0x14
068c ; --------------------------------------------------------------------------------------
068c 0009 0000  |    |		.DBG3TAB	0x0009,0x0000
068e 034c ffff  | L  |		.CONST	0x034c,0xffff
0690 034e fffe  | N  |		.CONST	0x034e,0xfffe
0692 0350 fffd  | P  |		.CONST	0x0350,0xfffd
0694 0352 fffc  | R  |		.CONST	0x0352,0xfffc
0696 0354 fffb  | T  |		.CONST	0x0354,0xfffb
0698 0356 fffa  | V  |		.CONST	0x0356,0xfffa
069a 0358 fff9  | X  |		.CONST	0x0358,0xfff9
069c 035a fff8  | Z  |		.CONST	0x035a,0xfff8
069e 035c fff7  | \  |		.CONST	0x035c,0xfff7
06a0 ; --------------------------------------------------------------------------------------
06a0 ; Debug3 Subtable 0x15
06a0 ; --------------------------------------------------------------------------------------
06a0 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
06a2 ; --------------------------------------------------------------------------------------
06a2 ; Debug3 Subtable 0x16
06a2 ; --------------------------------------------------------------------------------------
06a2 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
06a4 037b 0001  | {  |		.CONST	0x037b,0x0001
06a6 037d 0002  | }  |		.CONST	0x037d,0x0002
06a8 0385 0003  |    |		.CONST	0x0385,0x0003
06aa ; --------------------------------------------------------------------------------------
06aa ; Debug3 Subtable 0x17
06aa ; --------------------------------------------------------------------------------------
06aa 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06ac 0393 0001  |    |		.CONST	0x0393,0x0001
06ae ; --------------------------------------------------------------------------------------
06ae ; Debug3 Subtable 0x18
06ae ; --------------------------------------------------------------------------------------
06ae 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
06b0 03a3 0001  |    |		.CONST	0x03a3,0x0001
06b2 03ac 0002  |    |		.CONST	0x03ac,0x0002
06b4 03b1 0003  |    |		.CONST	0x03b1,0x0003
06b6 ; --------------------------------------------------------------------------------------
06b6 ; Debug3 Subtable 0x19
06b6 ; --------------------------------------------------------------------------------------
06b6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06b8 03bb 0001  |    |		.CONST	0x03bb,0x0001
06ba ; --------------------------------------------------------------------------------------
06ba ; Debug3 Subtable 0x1a
06ba ; --------------------------------------------------------------------------------------
06ba 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06bc 03c3 0001  |    |		.CONST	0x03c3,0x0001
06be ; --------------------------------------------------------------------------------------
06be ; Debug3 Subtable 0x1b
06be ; --------------------------------------------------------------------------------------
06be 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06c0 03cb 0001  |    |		.CONST	0x03cb,0x0001
06c2 ; --------------------------------------------------------------------------------------
06c2 ; Debug3 Subtable 0x1c
06c2 ; --------------------------------------------------------------------------------------
06c2 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06c4 03db 0001  |    |		.CONST	0x03db,0x0001
06c6 ; --------------------------------------------------------------------------------------
06c6 ; Debug3 Subtable 0x1d
06c6 ; --------------------------------------------------------------------------------------
06c6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06c8 03eb 0001  |    |		.CONST	0x03eb,0x0001
06ca ; --------------------------------------------------------------------------------------
06ca ; Debug3 Subtable 0x1e
06ca ; --------------------------------------------------------------------------------------
06ca 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06cc 03fb 0001  |    |		.CONST	0x03fb,0x0001
06ce 0000 0000  |    |		.BLANK	0000[0x132]