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

⟦67cc16907⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5811_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 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0308       |    |		.CONST	0x0308								; 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 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0082       |    |		.CONST	0x0082								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001b       |    |		.CONST	0x001b								; Number of locals
000b			INIT_0008:
000b 62a0       |b   |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x0037b404}		; Debug Table 0x0 = .DEBUG	0x000b,0x035a,0x8000,0x0000,0x0037,0xb404,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 4808       |H   |		Short_Literal	0x8
000d 629a       |b   |		Indirect_Literal	Discrete,0x2a8,{0x00000000, 0x00000400}
000e e001       |    |		Load	0x0,0x1
000f 0386       |    |		Declare_Variable	Package,Visible
0010 00d8       |    |		Load_Top	At_Offset_0
0011 020f       |    |		Execute	Module,Activate
0012 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x1 = 0x12,0xfffe
0013 4804       |H   |		Short_Literal	0x4
0014 029f 008b  |    |		Declare_Subprogram	INIT_0088,For_Call
0016 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0017 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x17,0xfffd
0019 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x0.0x3 = 0x19,0xfffc
001a 0266       | f  |		Execute	Discrete,Bounds
001b 00e1       |    |		Load_Encached	Boolean_Cache
001c 02a0       |    |		Declare_Subprogram	Null_Subprogram
001d 4801       |H   |		Short_Literal	0x1
001e 035e       | ^  |		Declare_Type	Array,Defined,Visible
001f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x4 = 0x1f,0xfffb
0020 0336       | 6  |		Declare_Variable	Array,Visible
0021 00d9       |    |		Load_Top	At_Offset_1
0022 0337       | 7  |		Declare_Variable	Array
0023 4803       |H   |		Short_Literal	0x3
0024 4800       |H   |		Short_Literal	0x0
0025 4801       |H   |		Short_Literal	0x1
0026 00d9       |    |		Load_Top	At_Offset_1
0027 e212       |    |		Load	0x1,0x12
0028 01d6       |    |		Execute	Vector,Field_Write
0029 3ffb       |?   |		Loop_Increasing	0x25
002a 4800       |H   |		Short_Literal	0x0
002b 4804       |H   |		Short_Literal	0x4
002c 00da       |    |		Load_Top	At_Offset_2
002d 01d6       |    |		Execute	Vector,Field_Write
002e 00d9       |    |		Load_Top	At_Offset_1
002f 01d4       |    |		Execute	Vector,Structure_Write
0030 627b       |b{  |		Indirect_Literal	Discrete,0x2ac,{0x00000000, 0x0037b404}		; Debug Table 0x0.0x5 = 0x30,0xfffa
0031 483f       |H?  |		Short_Literal	0x3f
0032 6275       |bu  |		Indirect_Literal	Discrete,0x2a8,{0x00000000, 0x00000400}
0033 6274       |bt  |		Indirect_Literal	Discrete,0x2a8,{0x00000000, 0x00000400}
0034 e20e       |    |		Load	0x1,0xe
0035 4800       |H   |		Short_Literal	0x0
0036 4805       |H   |		Short_Literal	0x5
0037 e210       |    |		Load	0x1,0x10
0038 e211       |    |		Load	0x1,0x11
0039 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
003a e002       |    |		Load	0x0,0x2
003b 0386       |    |		Declare_Variable	Package,Visible
003c 00d8       |    |		Load_Top	At_Offset_0
003d 020f       |    |		Execute	Module,Activate
003e 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x3e,0xfff9
0040 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x40,0xfff8
0042 00bf       |    |		Action	Accept_Activation
0043 0092 02b5  |    |		Action	Push_String_Extended,0x2b5					; "cr"
													; Debug Table 0x1 = .DEBUG	0x0043,0x036c,0x8000,0x0000,0x0037,0xb5f4,0x0000,0x0007
													; Debug Table 0x1.0x0 = 0x43,0xffff
0045 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x1 = 0x45,0xfffe
0046 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0047 0337       | 7  |		Declare_Variable	Array
0048 0092 02b6  |    |		Action	Push_String_Extended,0x2b6					; "abcdefghijklmnopqrstuvwxyz_ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"
004a e003       |    |		Load	0x0,0x3
004b 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
004c 00d9       |    |		Load_Top	At_Offset_1
004d 01d4       |    |		Execute	Vector,Structure_Write
004e e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x2 = 0x4e,0xfffd
004f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0050 0337       | 7  |		Declare_Variable	Array
0051 0092 02b7  |    |		Action	Push_String_Extended,0x2b7					; "\x22-["
0053 e003       |    |		Load	0x0,0x3
0054 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0055 00d9       |    |		Load_Top	At_Offset_1
0056 01d4       |    |		Execute	Vector,Structure_Write
0057 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x3 = 0x57,0xfffc
0058 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0059 0337       | 7  |		Declare_Variable	Array
005a 0092 02b8  |    |		Action	Push_String_Extended,0x2b8					; "\x22"
005c e003       |    |		Load	0x0,0x3
005d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
005e 00d9       |    |		Load_Top	At_Offset_1
005f 01d4       |    |		Execute	Vector,Structure_Write
0060 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x4 = 0x60,0xfffb
0061 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0062 0337       | 7  |		Declare_Variable	Array
0063 0092 02b9  |    |		Action	Push_String_Extended,0x2b9					; "]"
0065 e003       |    |		Load	0x0,0x3
0066 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0067 00d9       |    |		Load_Top	At_Offset_1
0068 01d4       |    |		Execute	Vector,Structure_Write
0069 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x5 = 0x69,0xfffa
006a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
006b 0337       | 7  |		Declare_Variable	Array
006c 0092 02ba  |    |		Action	Push_String_Extended,0x2ba					; " "
006e e003       |    |		Load	0x0,0x3
006f 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0070 00d9       |    |		Load_Top	At_Offset_1
0071 01d4       |    |		Execute	Vector,Structure_Write
0072 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x6 = 0x72,0xfff9
0073 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0074 0337       | 7  |		Declare_Variable	Array
0075 0092 02bb  |    |		Action	Push_String_Extended,0x2bb					; "\x5c()"
0077 e003       |    |		Load	0x0,0x3
0078 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0079 00d9       |    |		Load_Top	At_Offset_1
007a 01d4       |    |		Execute	Vector,Structure_Write
007b 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x7 = 0x7b,0xfff8
007c 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x8 = 0x7c,0xfff7
007d 00c7       |    |		Action	Elaborate_Subprogram
007e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x9 = 0x7e,0xfff6
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0xa = 0x80,0xfff5
0081 00c7       |    |		Action	Elaborate_Subprogram
0082			BODY_0008:
0082 00bc       |    |		Action	Signal_Activated
0083 00bb       |    |		Action	Signal_Completion
0084 0000 0000  |    |		.BLANK	0000[0x4]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b       |    |		.CONST	0x008b								; Address of begin
0089 0004       |    |		.CONST	0x0004								; Address of exception handler
008a 0001       |    |		.CONST	0x0001								; Number of locals
008b			BODY_0088:
008b			INIT_0088:
008b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x008b,0x0384,0x0005,0x0000,0x0037,0xb404,0x0000,0x0010
008c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
008d 7802       |x   |		Jump	0x90								; case 0x1
008e 7805       |x   |		Jump	0x94								; case 0x2
008f 7809       |x   |		Jump	0x99								; case 0x3
0090 00da       |    |		Load_Top	At_Offset_2
0091 0091 02b0  |    |		Action	Push_String_Extended_Indexed,0x2b0				; "LEADING_BLANKS"
0093 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0094 00db       |    |		Load_Top	At_Offset_3
0095 00db       |    |		Load_Top	At_Offset_3
0096 00e0       |    |		Load_Encached	Standard_Cache
0097 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0098 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0099 00da       |    |		Load_Top	At_Offset_2
009a 00e0       |    |		Load_Encached	Standard_Cache
009b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
009c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
009d 0000 0000  |    |		.XXX[0x3]
009f 0000       |    |
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00aa       |    |		.CONST	0x00aa								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0003       |    |		.CONST	0x0003								; Number of locals
00a3			INIT_00a0:
00a3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3 = .DEBUG	0x00a3,0x0386,0x0002,0x0000,0x0037,0xb404,0x0000,0x0019
													; Debug Table 0x3.0x0 = 0xa3,0xffff
00a4 485c       |H\  |		Short_Literal	0x5c
00a5 e21b       |    |		Load	0x1,0x1b
00a6 e003       |    |		Load	0x0,0x3
00a7 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00a8 029f 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Call				; Debug Table 0x3.0x1 = 0xa8,0xfffe
00aa			BODY_00a0:
00aa e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x2 = 0xaa,0x1
00ab 4604       |F   |		Jump_Case	0x5
00ac 7822       |x"  |		Jump	0xcf								; case 0x0
00ad 7803       |x   |		Jump	0xb1								; case 0x1
00ae 7809       |x   |		Jump	0xb8								; case 0x2
00af 7811       |x   |		Jump	0xc1								; case 0x3
00b0 7817       |x   |		Jump	0xc8								; case 0x4
00b1 4828       |H(  |		Short_Literal	0x28							; Debug Table 0x3.0x3 = 0xb1,0x2
00b2 00da       |    |		Load_Top	At_Offset_2
00b3 01ca       |    |		Execute	Vector,Prepend
00b4 0092 02bc  |    |		Action	Push_String_Extended,0x2bc					; ") n "
00b6 01cc       |    |		Execute	Vector,Catenate
00b7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00b8 4828       |H(  |		Short_Literal	0x28							; Debug Table 0x3.0x4 = 0xb8,0x3
00b9 00da       |    |		Load_Top	At_Offset_2
00ba e003       |    |		Load	0x0,0x3
00bb 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00bc 01ca       |    |		Execute	Vector,Prepend
00bd 0092 02bd  |    |		Action	Push_String_Extended,0x2bd					; ") b "
00bf 01cc       |    |		Execute	Vector,Catenate
00c0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00c1 4828       |H(  |		Short_Literal	0x28							; Debug Table 0x3.0x5 = 0xc1,0x4
00c2 00da       |    |		Load_Top	At_Offset_2
00c3 01ca       |    |		Execute	Vector,Prepend
00c4 0092 02be  |    |		Action	Push_String_Extended,0x2be					; ") i "
00c6 01cc       |    |		Execute	Vector,Catenate
00c7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00c8 4828       |H(  |		Short_Literal	0x28							; Debug Table 0x3.0x6 = 0xc8,0x5
00c9 00da       |    |		Load_Top	At_Offset_2
00ca 01ca       |    |		Execute	Vector,Prepend
00cb 0092 02bf  |    |		Action	Push_String_Extended,0x2bf					; ") r "
00cd 01cc       |    |		Execute	Vector,Catenate
00ce 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00cf e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x7 = 0xcf,0x6
00d0 01db       |    |		Execute	Vector,Length
00d1 8403       |    |		Call	0x2,0x3
00d2 0092 02c0  |    |		Action	Push_String_Extended,0x2c0					; " l "
00d4 01cc       |    |		Execute	Vector,Catenate
00d5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00d6 0000 0000  |    |		.XXX[0x2]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e1       |    |		.CONST	0x00e1								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0006       |    |		.CONST	0x0006								; Number of locals
00db			INIT_00d8:
00db 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4 = .DEBUG	0x00db,0x0398,0x0001,0x0000,0x0037,0xb404,0x0000,0x005c
													; Debug Table 0x4.0x0 = 0xdb,0xffff
00dc 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4.0x1 = 0xdc,0xfffe
00dd 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4.0x2 = 0xdd,0xfffd
00de 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4.0x3 = 0xde,0xfffc
00df 029f 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Call				; Debug Table 0x4.0x4 = 0xdf,0xfffb
00e1			BODY_00d8:
00e1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x5 = 0xe1,0x1
00e2 a402       |    |		Store_Unchecked	0x2,0x2
00e3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x6 = 0xe3,0x2
00e4 e5ff       |    |		Load	0x2,-0x1
00e5 e20d       |    |		Load	0x1,0xd
00e6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00e7 e212       |    |		Load	0x1,0x12
00e8 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00e9 00d1       |    |		Pop_Control	Pop_Count_1
00ea e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x7 = 0xea,0x3
00eb e5ff       |    |		Load	0x2,-0x1
00ec e20d       |    |		Load	0x1,0xd
00ed 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00ee 027d       | }  |		Execute	Discrete,Greater
00ef 6801       |h   |		Jump_Zero	0xf1
00f0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x4.0x8 = 0xf0,0x4
00f1 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x9 = 0xf1,0x5
00f2 e5ff       |    |		Load	0x2,-0x1
00f3 e20d       |    |		Load	0x1,0xd
00f4 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00f5 e21a       |    |		Load	0x1,0x1a
00f6 e003       |    |		Load	0x0,0x3
00f7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00f8 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
00f9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xa = 0xf9,0x6
00fa 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
00fb 680c       |h   |		Jump_Zero	0x108
00fc e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0xb = 0xfc,0x7
00fd 4800       |H   |		Short_Literal	0x0
00fe e404       |    |		Load	0x2,0x4
00ff 0aff       |    |		Execute_Immediate	Plus,-0x1
0100 00e3       |    |		Load_Encached	Natural_Cache
0101 025b       | [  |		Execute	Discrete,Check_In_Type
0102 e402       |    |		Load	0x2,0x2
0103 e212       |    |		Load	0x1,0x12
0104 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0105 00d1       |    |		Pop_Control	Pop_Count_1
0106 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xc = 0x106,0x8
0107 a402       |    |		Store_Unchecked	0x2,0x2
0108 00cf       |    |		Action	Mark_Auxiliary
0109 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0xd = 0x109,0x9
010a e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0xe = 0x10a,0xa
010b e5ff       |    |		Load	0x2,-0x1
010c e20d       |    |		Load	0x1,0xd
010d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
010e 027d       | }  |		Execute	Discrete,Greater
010f 70a0       |p   |		Jump_Nonzero	0x1b0
0110 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0xf = 0x110,0xb
0111 e5ff       |    |		Load	0x2,-0x1
0112 e20d       |    |		Load	0x1,0xd
0113 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0114 e217       |    |		Load	0x1,0x17
0115 e003       |    |		Load	0x0,0x3
0116 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0117 a404       |    |		Store_Unchecked	0x2,0x4
0118 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x10 = 0x118,0xc
0119 7005       |p   |		Jump_Nonzero	0x11f
011a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x11 = 0x11a,0xd
011b e20d       |    |		Load	0x1,0xd
011c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
011d 0a01       |    |		Execute_Immediate	Plus,0x1
011e c404       |    |		Store	0x2,0x4
011f e20d       |    |		Load	0x1,0xd								; Debug Table 0x4.0x12 = 0x11f,0xe
0120 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0121 0337       | 7  |		Declare_Variable	Array
0122 e402       |    |		Load	0x2,0x2
0123 4801       |H   |		Short_Literal	0x1
0124 00da       |    |		Load_Top	At_Offset_2
0125 01d6       |    |		Execute	Vector,Field_Write
0126 e404       |    |		Load	0x2,0x4
0127 0aff       |    |		Execute_Immediate	Plus,-0x1
0128 4802       |H   |		Short_Literal	0x2
0129 00da       |    |		Load_Top	At_Offset_2
012a 01d6       |    |		Execute	Vector,Field_Write
012b e20d       |    |		Load	0x1,0xd
012c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
012d 01c3       |    |		Execute	Vector,Check_In_Type
012e e5ff       |    |		Load	0x2,-0x1
012f e20d       |    |		Load	0x1,0xd
0130 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0131 8406       |    |		Call	0x2,0x6
0132 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x13 = 0x132,0xf
0133 a402       |    |		Store_Unchecked	0x2,0x2
0134 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x14 = 0x134,0x10
0135 e5ff       |    |		Load	0x2,-0x1
0136 e20d       |    |		Load	0x1,0xd
0137 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0138 027d       | }  |		Execute	Discrete,Greater
0139 7076       |pv  |		Jump_Nonzero	0x1b0
013a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x15 = 0x13a,0x11
013b e5ff       |    |		Load	0x2,-0x1
013c e20d       |    |		Load	0x1,0xd
013d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
013e 0f22       | "  |		Execute_Immediate	Equal,0x22
013f 681c       |h   |		Jump_Zero	0x15c
0140 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x16 = 0x140,0x12
0141 0a01       |    |		Execute_Immediate	Plus,0x1
0142 00e3       |    |		Load_Encached	Natural_Cache
0143 025b       | [  |		Execute	Discrete,Check_In_Type
0144 e5ff       |    |		Load	0x2,-0x1
0145 e20d       |    |		Load	0x1,0xd
0146 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0147 e218       |    |		Load	0x1,0x18
0148 e003       |    |		Load	0x0,0x3
0149 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
014a 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
014b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x17 = 0x14b,0x13
014c 7004       |p   |		Jump_Nonzero	0x151
014d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x18 = 0x14d,0x14
014e e20d       |    |		Load	0x1,0xd
014f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0150 005b       | [  |		Store_Top	Discrete,At_Offset_3
0151 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x19 = 0x151,0x15
0152 4801       |H   |		Short_Literal	0x1
0153 e405       |    |		Load	0x2,0x5
0154 e404       |    |		Load	0x2,0x4
0155 e212       |    |		Load	0x1,0x12
0156 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0157 00d1       |    |		Pop_Control	Pop_Count_1
0158 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x1a = 0x158,0x16
0159 0a01       |    |		Execute_Immediate	Plus,0x1
015a c402       |    |		Store	0x2,0x2
015b 7852       |xR  |		Jump	0x1ae
015c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1b = 0x15c,0x17
015d e5ff       |    |		Load	0x2,-0x1
015e e20d       |    |		Load	0x1,0xd
015f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0160 0f5b       | [  |		Execute_Immediate	Equal,0x5b
0161 681c       |h   |		Jump_Zero	0x17e
0162 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1c = 0x162,0x18
0163 0a01       |    |		Execute_Immediate	Plus,0x1
0164 00e3       |    |		Load_Encached	Natural_Cache
0165 025b       | [  |		Execute	Discrete,Check_In_Type
0166 e5ff       |    |		Load	0x2,-0x1
0167 e20d       |    |		Load	0x1,0xd
0168 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0169 e219       |    |		Load	0x1,0x19
016a e003       |    |		Load	0x0,0x3
016b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
016c 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
016d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x1d = 0x16d,0x19
016e 7004       |p   |		Jump_Nonzero	0x173
016f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x1e = 0x16f,0x1a
0170 e20d       |    |		Load	0x1,0xd
0171 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0172 005b       | [  |		Store_Top	Discrete,At_Offset_3
0173 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x1f = 0x173,0x1b
0174 4804       |H   |		Short_Literal	0x4
0175 e405       |    |		Load	0x2,0x5
0176 e404       |    |		Load	0x2,0x4
0177 e212       |    |		Load	0x1,0x12
0178 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0179 00d1       |    |		Pop_Control	Pop_Count_1
017a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x20 = 0x17a,0x1c
017b 0a01       |    |		Execute_Immediate	Plus,0x1
017c c402       |    |		Store	0x2,0x2
017d 7830       |x0  |		Jump	0x1ae
017e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x21 = 0x17e,0x1d
017f e5ff       |    |		Load	0x2,-0x1
0180 e20d       |    |		Load	0x1,0xd
0181 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0182 0f2d       | -  |		Execute_Immediate	Equal,0x2d
0183 6820       |h   |		Jump_Zero	0x1a4
0184 00db       |    |		Load_Top	At_Offset_3
0185 e5ff       |    |		Load	0x2,-0x1
0186 e20d       |    |		Load	0x1,0xd
0187 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0188 027c       | |  |		Execute	Discrete,Less
0189 681a       |h   |		Jump_Zero	0x1a4
018a 00db       |    |		Load_Top	At_Offset_3
018b 0a01       |    |		Execute_Immediate	Plus,0x1
018c 00e3       |    |		Load_Encached	Natural_Cache
018d 025b       | [  |		Execute	Discrete,Check_In_Type
018e e5ff       |    |		Load	0x2,-0x1
018f e20d       |    |		Load	0x1,0xd
0190 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0191 0f2d       | -  |		Execute_Immediate	Equal,0x2d
0192 6811       |h   |		Jump_Zero	0x1a4
0193 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x22 = 0x193,0x1e
0194 4803       |H   |		Short_Literal	0x3
0195 e5ff       |    |		Load	0x2,-0x1
0196 e20d       |    |		Load	0x1,0xd
0197 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0198 00e3       |    |		Load_Encached	Natural_Cache
0199 025b       | [  |		Execute	Discrete,Check_In_Type
019a e402       |    |		Load	0x2,0x2
019b e212       |    |		Load	0x1,0x12
019c 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
019d 00d1       |    |		Pop_Control	Pop_Count_1
019e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x23 = 0x19e,0x1f
019f e20d       |    |		Load	0x1,0xd
01a0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01a1 0a01       |    |		Execute_Immediate	Plus,0x1
01a2 c402       |    |		Store	0x2,0x2
01a3 780a       |x   |		Jump	0x1ae
01a4 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x24 = 0x1a4,0x20
01a5 4801       |H   |		Short_Literal	0x1
01a6 e402       |    |		Load	0x2,0x2
01a7 e402       |    |		Load	0x2,0x2
01a8 e212       |    |		Load	0x1,0x12
01a9 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01aa 00d1       |    |		Pop_Control	Pop_Count_1
01ab e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x25 = 0x1ab,0x21
01ac 0a01       |    |		Execute_Immediate	Plus,0x1
01ad c402       |    |		Store	0x2,0x2
01ae 00c9       |    |		Action	Pop_Auxiliary_Loop
01af 7f5a       | Z  |		Jump	0x10a
01b0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01b1 0000 0000  |    |		.BLANK	0000[0x7]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bf       |    |		.CONST	0x01bf								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0003       |    |		.CONST	0x0003								; Number of locals
01bb			INIT_01b8:
01bb 029f 0273  |   s|		Declare_Subprogram	INIT_0270,For_Call				; Debug Table 0x5 = .DEBUG	0x01bb,0x03e6,0x0001,0x0000,0x0037,0xb404,0x0000,0x006c
													; Debug Table 0x5.0x0 = 0x1bb,0xffff
01bd 029f 0283  |    |		Declare_Subprogram	INIT_0280,For_Call				; Debug Table 0x5.0x1 = 0x1bd,0xfffe
01bf			BODY_01b8:
01bf e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x2 = 0x1bf,0x1
01c0 e212       |    |		Load	0x1,0x12
01c1 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01c2 7003       |p   |		Jump_Nonzero	0x1c6
01c3 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x5.0x3 = 0x1c3,0x2
01c4 8402       |    |		Call	0x2,0x2
01c5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01c6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x4 = 0x1c6,0x3
01c7 e212       |    |		Load	0x1,0x12
01c8 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01c9 e5ff       |    |		Load	0x2,-0x1
01ca 027a       | z  |		Execute	Discrete,Less_Equal
01cb 680a       |h   |		Jump_Zero	0x1d6
01cc e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x5 = 0x1cc,0x4
01cd e212       |    |		Load	0x1,0x12
01ce 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01cf 8402       |    |		Call	0x2,0x2
01d0 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x6 = 0x1d0,0x5
01d1 00ea       |    |		Load_Encached	Null_String_Cache
01d2 e212       |    |		Load	0x1,0x12
01d3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01d4 00d1       |    |		Pop_Control	Pop_Count_1
01d5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01d6 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x7 = 0x1d6,0x6
01d7 7009       |p   |		Jump_Nonzero	0x1e1
01d8 0092 02c1  |    |		Action	Push_String_Extended,0x2c1					; "|"
													; Debug Table 0x5.0x8 = 0x1d8,0x7
01da 8403       |    |		Call	0x2,0x3
01db e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x9 = 0x1db,0x8
01dc 00ea       |    |		Load_Encached	Null_String_Cache
01dd e212       |    |		Load	0x1,0x12
01de 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01df 00d1       |    |		Pop_Control	Pop_Count_1
01e0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e1 0092 02c2  |    |		Action	Push_String_Extended,0x2c2					; "\x5c"
													; Debug Table 0x5.0xa = 0x1e1,0x9
01e3 8403       |    |		Call	0x2,0x3
01e4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e5 0000 0000  |    |		.XXX[0x3]
01e7 0000       |    |
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01ee       |    |		.CONST	0x01ee								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0002       |    |		.CONST	0x0002								; Number of locals
01eb			INIT_01e8:
01eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x01eb,0x03fe,0x0002,0x0000,0x0037,0xb5f4,0x0000,0x007f
													; Debug Table 0x6.0x0 = 0x1eb,0xffff
01ec 00e0       |    |		Load_Encached	Standard_Cache
01ed 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01ee			BODY_01e8:
01ee 4802       |H   |		Short_Literal	0x2							; Debug Table 0x6.0x1 = 0x1ee,0x1
01ef 00d9       |    |		Load_Top	At_Offset_1
01f0 01db       |    |		Execute	Vector,Length
01f1 00da       |    |		Load_Top	At_Offset_2
01f2 01cf       |    |		Execute	Vector,Slice_Read
01f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f4 0000 0000  |    |		.BLANK	0000[0x4]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fe       |    |		.CONST	0x01fe								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0004       |    |		.CONST	0x0004								; Number of locals
01fb			INIT_01f8:
01fb 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x7 = .DEBUG	0x01fb,0x0404,0x0001,0x0000,0x0037,0xb5f4,0x0000,0x0115
													; Debug Table 0x7.0x0 = 0x1fb,0xffff
01fc 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x7.0x1 = 0x1fc,0xfffe
01fd 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x7.0x2 = 0x1fd,0xfffd
01fe			BODY_01f8:
01fe e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x7.0x3 = 0x1fe,0x1
01ff 01dd       |    |		Execute	Vector,First
0200 005b       | [  |		Store_Top	Discrete,At_Offset_3
0201 00cf       |    |		Action	Mark_Auxiliary
0202 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0x4 = 0x202,0x2
0203 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x5 = 0x203,0x3
0204 e7ff       |    |		Load	0x3,-0x1
0205 01dc       |    |		Execute	Vector,Last
0206 027d       | }  |		Execute	Discrete,Greater
0207 7064       |pd  |		Jump_Nonzero	0x26c
0208 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x6 = 0x208,0x4
0209 e7ff       |    |		Load	0x3,-0x1
020a 01dc       |    |		Execute	Vector,Last
020b e7ff       |    |		Load	0x3,-0x1
020c 01cf       |    |		Execute	Vector,Slice_Read
020d e216       |    |		Load	0x1,0x16
020e e003       |    |		Load	0x0,0x3
020f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0210 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0211 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x7 = 0x211,0x5
0212 7004       |p   |		Jump_Nonzero	0x217
0213 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x7.0x8 = 0x213,0x6
0214 01dc       |    |		Execute	Vector,Last
0215 0a01       |    |		Execute_Immediate	Plus,0x1
0216 005b       | [  |		Store_Top	Discrete,At_Offset_3
0217 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x9 = 0x217,0x7
0218 4801       |H   |		Short_Literal	0x1
0219 e603       |    |		Load	0x3,0x3
021a 0aff       |    |		Execute_Immediate	Plus,-0x1
021b 00e3       |    |		Load_Encached	Natural_Cache
021c 025b       | [  |		Execute	Discrete,Check_In_Type
021d e602       |    |		Load	0x3,0x2
021e e212       |    |		Load	0x1,0x12
021f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0220 00d1       |    |		Pop_Control	Pop_Count_1
0221 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0xa = 0x221,0x8
0222 a602       |    |		Store_Unchecked	0x3,0x2
0223 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xb = 0x223,0x9
0224 e7ff       |    |		Load	0x3,-0x1
0225 01dc       |    |		Execute	Vector,Last
0226 027d       | }  |		Execute	Discrete,Greater
0227 7044       |pD  |		Jump_Nonzero	0x26c
0228 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xc = 0x228,0xa
0229 e7ff       |    |		Load	0x3,-0x1
022a 01dc       |    |		Execute	Vector,Last
022b e7ff       |    |		Load	0x3,-0x1
022c 01cf       |    |		Execute	Vector,Slice_Read
022d e216       |    |		Load	0x1,0x16
022e e003       |    |		Load	0x0,0x3
022f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0230 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0231 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0xd = 0x231,0xb
0232 6803       |h   |		Jump_Zero	0x236
0233 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0xe = 0x233,0xc
0234 0aff       |    |		Execute_Immediate	Plus,-0x1
0235 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0236 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0xf = 0x236,0xd
0237 00da       |    |		Load_Top	At_Offset_2
0238 e7ff       |    |		Load	0x3,-0x1
0239 01cf       |    |		Execute	Vector,Slice_Read
023a e004       |    |		Load	0x0,0x4
023b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
023c 6823       |h#  |		Jump_Zero	0x260
023d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x10 = 0x23d,0xe
023e e7ff       |    |		Load	0x3,-0x1
023f 01dd       |    |		Execute	Vector,First
0240 027d       | }  |		Execute	Discrete,Greater
0241 6816       |h   |		Jump_Zero	0x258
0242 00da       |    |		Load_Top	At_Offset_2
0243 0aff       |    |		Execute_Immediate	Plus,-0x1
0244 0248       | H  |		Execute	Discrete,Check_In_Integer
0245 e7ff       |    |		Load	0x3,-0x1
0246 01d7       |    |		Execute	Vector,Field_Read
0247 0f27       | '  |		Execute_Immediate	Equal,0x27
0248 680f       |h   |		Jump_Zero	0x258
0249 00da       |    |		Load_Top	At_Offset_2
024a 00da       |    |		Load_Top	At_Offset_2
024b e7ff       |    |		Load	0x3,-0x1
024c 01cf       |    |		Execute	Vector,Slice_Read
024d e004       |    |		Load	0x0,0x4
024e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
024f 6808       |h   |		Jump_Zero	0x258
0250 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x11 = 0x250,0xf
0251 4801       |H   |		Short_Literal	0x1
0252 00db       |    |		Load_Top	At_Offset_3
0253 e603       |    |		Load	0x3,0x3
0254 e212       |    |		Load	0x1,0x12
0255 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0256 00d1       |    |		Pop_Control	Pop_Count_1
0257 780f       |x   |		Jump	0x267
0258 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x12 = 0x258,0x10
0259 4802       |H   |		Short_Literal	0x2
025a 00db       |    |		Load_Top	At_Offset_3
025b e603       |    |		Load	0x3,0x3
025c e212       |    |		Load	0x1,0x12
025d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
025e 00d1       |    |		Pop_Control	Pop_Count_1
025f 7807       |x   |		Jump	0x267
0260 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x13 = 0x260,0x11
0261 4801       |H   |		Short_Literal	0x1
0262 00db       |    |		Load_Top	At_Offset_3
0263 e603       |    |		Load	0x3,0x3
0264 e212       |    |		Load	0x1,0x12
0265 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0266 00d1       |    |		Pop_Control	Pop_Count_1
0267 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x14 = 0x267,0x12
0268 0a01       |    |		Execute_Immediate	Plus,0x1
0269 c602       |    |		Store	0x3,0x2
026a 00c9       |    |		Action	Pop_Auxiliary_Loop
026b 7f97       |    |		Jump	0x203
026c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
026d 0000 0000  |    |		.XXX[0x3]
026f 0000       |    |
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x0273,0x0430,0x0001,0x0000,0x0037,0xb5f4,0x0000,0x0356
													; Debug Table 0x8.0x0 = 0x273,0x1
0274 4801       |H   |		Short_Literal	0x1
0275 e7ff       |    |		Load	0x3,-0x1
0276 01db       |    |		Execute	Vector,Length
0277 e5fc       |    |		Load	0x2,-0x4
0278 01ce       |    |		Execute	Vector,Slice_Write
0279 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x1 = 0x279,0x2
027a 01db       |    |		Execute	Vector,Length
027b c5fb       |    |		Store	0x2,-0x5
027c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
027d 0000 0000  |    |		.XXX[0x3]
027f 0000       |    |
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0288       |    |		.CONST	0x0288								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0002       |    |		.CONST	0x0002								; Number of locals
0283			INIT_0280:
0283 e212       |    |		Load	0x1,0x12							; Debug Table 0x9 = .DEBUG	0x0283,0x0436,0x0001,0x0000,0x0037,0xb5f4,0x0000,0x0370
													; Debug Table 0x9.0x0 = 0x283,0xffff
0284 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0285 0322       | "  |		Declare_Variable	Record
0286 00d8       |    |		Load_Top	At_Offset_0
0287 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0288			BODY_0280:
0288 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x1 = 0x288,0x1
0289 e5fd       |    |		Load	0x2,-0x3
028a e5ff       |    |		Load	0x2,-0x1
028b 0aff       |    |		Execute_Immediate	Plus,-0x1
028c 00e3       |    |		Load_Encached	Natural_Cache
028d 025b       | [  |		Execute	Discrete,Check_In_Type
028e e212       |    |		Load	0x1,0x12
028f 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0290 00d2       |    |		Pop_Control	Pop_Count_2
0291 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x2 = 0x291,0x2
0292 e7ff       |    |		Load	0x3,-0x1
0293 e212       |    |		Load	0x1,0x12
0294 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0295 00d1       |    |		Pop_Control	Pop_Count_1
0296 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3 = 0x296,0x3
0297 4802       |H   |		Short_Literal	0x2
0298 00da       |    |		Load_Top	At_Offset_2
0299 e212       |    |		Load	0x1,0x12
029a 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
029b 00db       |    |		Load_Top	At_Offset_3
029c e212       |    |		Load	0x1,0x12
029d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
029e e212       |    |		Load	0x1,0x12
029f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02a0 00d1       |    |		Pop_Control	Pop_Count_1
02a1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x4 = 0x2a1,0x4
02a2 e212       |    |		Load	0x1,0x12
02a3 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02a4 8402       |    |		Call	0x2,0x2
02a5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02a6 0000 0000  |    |		.XXX[0x2]
02a8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000400}
02ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x0037b404}
02b0 ; --------------------------------------------------------------------------------------
02b0 ; STRING TABLE
02b0 ; --------------------------------------------------------------------------------------
02b0 0028       | (  |		.STRTAB	0x0028->0x02c4							; "LEADING_BLANKS"
02b1 0034       | 4  |		.STRTAB	0x0034->0x02cb							; "NORMAL"
02b2 0038       | 8  |		.STRTAB	0x0038->0x02ce							; "BOLD"
02b3 003a       | :  |		.STRTAB	0x003a->0x02d0							; "ITALIC"
02b4 003e       | >  |		.STRTAB	0x003e->0x02d3							; "INVERSE"
02b5 0043       | C  |		.STRTAB	0x0043->0x02d6							; "cr"
02b6 0043       | C  |		.STRTAB	0x0043->0x02d7							; "abcdefghijklmnopqrstuvwxyz_ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"
02b7 0080       |    |		.STRTAB	0x0080->0x02f7							; "\x22-["
02b8 0081       |    |		.STRTAB	0x0081->0x02f8							; "\x22"
02b9 0080       |    |		.STRTAB	0x0080->0x02f9							; "]"
02ba 007f       |    |		.STRTAB	0x007f->0x02f9							; " "
02bb 007e       | ~  |		.STRTAB	0x007e->0x02fa							; "\x5c()"
02bc 007f       |    |		.STRTAB	0x007f->0x02fb							; ") n "
02bd 0081       |    |		.STRTAB	0x0081->0x02fd							; ") b "
02be 0083       |    |		.STRTAB	0x0083->0x02ff							; ") i "
02bf 0085       |    |		.STRTAB	0x0085->0x0301							; ") r "
02c0 0087       |    |		.STRTAB	0x0087->0x0303							; " l "
02c1 0088       |    |		.STRTAB	0x0088->0x0305							; "|"
02c2 0087       |    |		.STRTAB	0x0087->0x0305							; "\x5c"
02c3 0086       |    |		.STREND 0x0086->0x0306
02c4 4c45 4144  |LEAD|		.STRTAB_STRINGS
0306 0000 0000  |    |		.XXX[0x2]
0308 ; --------------------------------------------------------------------------------------
0308 ; Debug Table
0308 ; --------------------------------------------------------------------------------------
0308 0003 000a  |    |		.CONST	0x0003,0x000a
030a 000b 035a  |   Z|		.DEBUG	0x000b,0x035a,0x8000,0x0000,0x0037,0xb404,0x0000,0x0007
0312 0043 036c  | C l|		.DEBUG	0x0043,0x036c,0x8000,0x0000,0x0037,0xb5f4,0x0000,0x0007
031a 008b 0384  |    |		.DEBUG	0x008b,0x0384,0x0005,0x0000,0x0037,0xb404,0x0000,0x0010
0322 00a3 0386  |    |		.DEBUG	0x00a3,0x0386,0x0002,0x0000,0x0037,0xb404,0x0000,0x0019
032a 00db 0398  |    |		.DEBUG	0x00db,0x0398,0x0001,0x0000,0x0037,0xb404,0x0000,0x005c
0332 01bb 03e6  |    |		.DEBUG	0x01bb,0x03e6,0x0001,0x0000,0x0037,0xb404,0x0000,0x006c
033a 01eb 03fe  |    |		.DEBUG	0x01eb,0x03fe,0x0002,0x0000,0x0037,0xb5f4,0x0000,0x007f
0342 01fb 0404  |    |		.DEBUG	0x01fb,0x0404,0x0001,0x0000,0x0037,0xb5f4,0x0000,0x0115
034a 0273 0430  | s 0|		.DEBUG	0x0273,0x0430,0x0001,0x0000,0x0037,0xb5f4,0x0000,0x0356
0352 0283 0436  |   6|		.DEBUG	0x0283,0x0436,0x0001,0x0000,0x0037,0xb5f4,0x0000,0x0370
035a ; --------------------------------------------------------------------------------------
035a ; Debug3 Subtable 0x0
035a ; --------------------------------------------------------------------------------------
035a 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
035c 000b ffff  |    |		.CONST	0x000b,0xffff
035e 0012 fffe  |    |		.CONST	0x0012,0xfffe
0360 0017 fffd  |    |		.CONST	0x0017,0xfffd
0362 0019 fffc  |    |		.CONST	0x0019,0xfffc
0364 001f fffb  |    |		.CONST	0x001f,0xfffb
0366 0030 fffa  | 0  |		.CONST	0x0030,0xfffa
0368 003e fff9  | >  |		.CONST	0x003e,0xfff9
036a 0040 fff8  | @  |		.CONST	0x0040,0xfff8
036c ; --------------------------------------------------------------------------------------
036c ; Debug3 Subtable 0x1
036c ; --------------------------------------------------------------------------------------
036c 000b 0000  |    |		.DBG3TAB	0x000b,0x0000
036e 0043 ffff  | C  |		.CONST	0x0043,0xffff
0370 0045 fffe  | E  |		.CONST	0x0045,0xfffe
0372 004e fffd  | N  |		.CONST	0x004e,0xfffd
0374 0057 fffc  | W  |		.CONST	0x0057,0xfffc
0376 0060 fffb  | `  |		.CONST	0x0060,0xfffb
0378 0069 fffa  | i  |		.CONST	0x0069,0xfffa
037a 0072 fff9  | r  |		.CONST	0x0072,0xfff9
037c 007b fff8  | {  |		.CONST	0x007b,0xfff8
037e 007c fff7  | |  |		.CONST	0x007c,0xfff7
0380 007e fff6  | ~  |		.CONST	0x007e,0xfff6
0382 0080 fff5  |    |		.CONST	0x0080,0xfff5
0384 ; --------------------------------------------------------------------------------------
0384 ; Debug3 Subtable 0x2
0384 ; --------------------------------------------------------------------------------------
0384 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0386 ; --------------------------------------------------------------------------------------
0386 ; Debug3 Subtable 0x3
0386 ; --------------------------------------------------------------------------------------
0386 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
0388 00a3 ffff  |    |		.CONST	0x00a3,0xffff
038a 00a8 fffe  |    |		.CONST	0x00a8,0xfffe
038c 00aa 0001  |    |		.CONST	0x00aa,0x0001
038e 00b1 0002  |    |		.CONST	0x00b1,0x0002
0390 00b8 0003  |    |		.CONST	0x00b8,0x0003
0392 00c1 0004  |    |		.CONST	0x00c1,0x0004
0394 00c8 0005  |    |		.CONST	0x00c8,0x0005
0396 00cf 0006  |    |		.CONST	0x00cf,0x0006
0398 ; --------------------------------------------------------------------------------------
0398 ; Debug3 Subtable 0x4
0398 ; --------------------------------------------------------------------------------------
0398 0005 0021  |   !|		.DBG3TAB	0x0005,0x0021
039a 00db ffff  |    |		.CONST	0x00db,0xffff
039c 00dc fffe  |    |		.CONST	0x00dc,0xfffe
039e 00dd fffd  |    |		.CONST	0x00dd,0xfffd
03a0 00de fffc  |    |		.CONST	0x00de,0xfffc
03a2 00df fffb  |    |		.CONST	0x00df,0xfffb
03a4 00e1 0001  |    |		.CONST	0x00e1,0x0001
03a6 00e3 0002  |    |		.CONST	0x00e3,0x0002
03a8 00ea 0003  |    |		.CONST	0x00ea,0x0003
03aa 00f0 0004  |    |		.CONST	0x00f0,0x0004
03ac 00f1 0005  |    |		.CONST	0x00f1,0x0005
03ae 00f9 0006  |    |		.CONST	0x00f9,0x0006
03b0 00fc 0007  |    |		.CONST	0x00fc,0x0007
03b2 0106 0008  |    |		.CONST	0x0106,0x0008
03b4 0109 0009  |    |		.CONST	0x0109,0x0009
03b6 010a 000a  |    |		.CONST	0x010a,0x000a
03b8 0110 000b  |    |		.CONST	0x0110,0x000b
03ba 0118 000c  |    |		.CONST	0x0118,0x000c
03bc 011a 000d  |    |		.CONST	0x011a,0x000d
03be 011f 000e  |    |		.CONST	0x011f,0x000e
03c0 0132 000f  | 2  |		.CONST	0x0132,0x000f
03c2 0134 0010  | 4  |		.CONST	0x0134,0x0010
03c4 013a 0011  | :  |		.CONST	0x013a,0x0011
03c6 0140 0012  | @  |		.CONST	0x0140,0x0012
03c8 014b 0013  | K  |		.CONST	0x014b,0x0013
03ca 014d 0014  | M  |		.CONST	0x014d,0x0014
03cc 0151 0015  | Q  |		.CONST	0x0151,0x0015
03ce 0158 0016  | X  |		.CONST	0x0158,0x0016
03d0 015c 0017  | \  |		.CONST	0x015c,0x0017
03d2 0162 0018  | b  |		.CONST	0x0162,0x0018
03d4 016d 0019  | m  |		.CONST	0x016d,0x0019
03d6 016f 001a  | o  |		.CONST	0x016f,0x001a
03d8 0173 001b  | s  |		.CONST	0x0173,0x001b
03da 017a 001c  | z  |		.CONST	0x017a,0x001c
03dc 017e 001d  | ~  |		.CONST	0x017e,0x001d
03de 0193 001e  |    |		.CONST	0x0193,0x001e
03e0 019e 001f  |    |		.CONST	0x019e,0x001f
03e2 01a4 0020  |    |		.CONST	0x01a4,0x0020
03e4 01ab 0021  |   !|		.CONST	0x01ab,0x0021
03e6 ; --------------------------------------------------------------------------------------
03e6 ; Debug3 Subtable 0x5
03e6 ; --------------------------------------------------------------------------------------
03e6 0002 0009  |    |		.DBG3TAB	0x0002,0x0009
03e8 01bb ffff  |    |		.CONST	0x01bb,0xffff
03ea 01bd fffe  |    |		.CONST	0x01bd,0xfffe
03ec 01bf 0001  |    |		.CONST	0x01bf,0x0001
03ee 01c3 0002  |    |		.CONST	0x01c3,0x0002
03f0 01c6 0003  |    |		.CONST	0x01c6,0x0003
03f2 01cc 0004  |    |		.CONST	0x01cc,0x0004
03f4 01d0 0005  |    |		.CONST	0x01d0,0x0005
03f6 01d6 0006  |    |		.CONST	0x01d6,0x0006
03f8 01d8 0007  |    |		.CONST	0x01d8,0x0007
03fa 01db 0008  |    |		.CONST	0x01db,0x0008
03fc 01e1 0009  |    |		.CONST	0x01e1,0x0009
03fe ; --------------------------------------------------------------------------------------
03fe ; Debug3 Subtable 0x6
03fe ; --------------------------------------------------------------------------------------
03fe 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0400 01eb ffff  |    |		.CONST	0x01eb,0xffff
0402 01ee 0001  |    |		.CONST	0x01ee,0x0001
0404 ; --------------------------------------------------------------------------------------
0404 ; Debug3 Subtable 0x7
0404 ; --------------------------------------------------------------------------------------
0404 0003 0012  |    |		.DBG3TAB	0x0003,0x0012
0406 01fb ffff  |    |		.CONST	0x01fb,0xffff
0408 01fc fffe  |    |		.CONST	0x01fc,0xfffe
040a 01fd fffd  |    |		.CONST	0x01fd,0xfffd
040c 01fe 0001  |    |		.CONST	0x01fe,0x0001
040e 0202 0002  |    |		.CONST	0x0202,0x0002
0410 0203 0003  |    |		.CONST	0x0203,0x0003
0412 0208 0004  |    |		.CONST	0x0208,0x0004
0414 0211 0005  |    |		.CONST	0x0211,0x0005
0416 0213 0006  |    |		.CONST	0x0213,0x0006
0418 0217 0007  |    |		.CONST	0x0217,0x0007
041a 0221 0008  | !  |		.CONST	0x0221,0x0008
041c 0223 0009  | #  |		.CONST	0x0223,0x0009
041e 0228 000a  | (  |		.CONST	0x0228,0x000a
0420 0231 000b  | 1  |		.CONST	0x0231,0x000b
0422 0233 000c  | 3  |		.CONST	0x0233,0x000c
0424 0236 000d  | 6  |		.CONST	0x0236,0x000d
0426 023d 000e  | =  |		.CONST	0x023d,0x000e
0428 0250 000f  | P  |		.CONST	0x0250,0x000f
042a 0258 0010  | X  |		.CONST	0x0258,0x0010
042c 0260 0011  | `  |		.CONST	0x0260,0x0011
042e 0267 0012  | g  |		.CONST	0x0267,0x0012
0430 ; --------------------------------------------------------------------------------------
0430 ; Debug3 Subtable 0x8
0430 ; --------------------------------------------------------------------------------------
0430 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0432 0273 0001  | s  |		.CONST	0x0273,0x0001
0434 0279 0002  | y  |		.CONST	0x0279,0x0002
0436 ; --------------------------------------------------------------------------------------
0436 ; Debug3 Subtable 0x9
0436 ; --------------------------------------------------------------------------------------
0436 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0438 0283 ffff  |    |		.CONST	0x0283,0xffff
043a 0288 0001  |    |		.CONST	0x0288,0x0001
043c 0291 0002  |    |		.CONST	0x0291,0x0002
043e 0296 0003  |    |		.CONST	0x0296,0x0003
0440 02a1 0004  |    |		.CONST	0x02a1,0x0004
0442 0000 0000  |    |		.BLANK	0000[0x1be]