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

⟦afab0555b⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 02f8       |    |		.CONST	0x02f8								; 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 00b3       |    |		.CONST	0x00b3								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0015       |    |		.CONST	0x0015								; Number of locals
000b			INIT_0008:
000b 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0342,0x8000,0x0000,0x0058,0x1215,0x0000,0x0003
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 00bf       |    |		Action	Accept_Activation
000e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1 = .DEBUG	0x000e,0x0346,0x8000,0x0000,0x0058,0x1225,0x0000,0x0005
													; Debug Table 0x1.0x0 = 0xe,0xffff
000f 480f       |H   |		Short_Literal	0xf
0010 029f 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Call
0012 03fd       |    |		Declare_Type	Discrete,Defined
0013 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1 = 0x13,0xfffe
0014 00e4       |    |		Load_Encached	Positive_Cache
0015 00e2       |    |		Load_Encached	Integer_Cache
0016 00e1       |    |		Load_Encached	Boolean_Cache
0017 02a0       |    |		Declare_Subprogram	Null_Subprogram
0018 4804       |H   |		Short_Literal	0x4
0019 032d       | -  |		Declare_Type	Record,Defined
001a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x2 = 0x1a,0xfffd
001b 4806       |H   |		Short_Literal	0x6
001c 029f 010b  |    |		Declare_Subprogram	INIT_0108,For_Call
001e 03fd       |    |		Declare_Type	Discrete,Defined
001f 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x1.0x3 = 0x1f,0xfffc
0020 0266       | f  |		Execute	Discrete,Bounds
0021 00da       |    |		Load_Top	At_Offset_2
0022 02a0       |    |		Declare_Subprogram	Null_Subprogram
0023 4801       |H   |		Short_Literal	0x1
0024 035d       | ]  |		Declare_Type	Array,Defined
0025 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x4 = 0x25,0xfffb
0026 0337       | 7  |		Declare_Variable	Array
0027 00d9       |    |		Load_Top	At_Offset_1
0028 0337       | 7  |		Declare_Variable	Array
0029 4800       |H   |		Short_Literal	0x0
002a 480a       |H   |		Short_Literal	0xa
002b 00da       |    |		Load_Top	At_Offset_2
002c 01d6       |    |		Execute	Vector,Field_Write
002d 4800       |H   |		Short_Literal	0x0
002e 480c       |H   |		Short_Literal	0xc
002f 00da       |    |		Load_Top	At_Offset_2
0030 01d6       |    |		Execute	Vector,Field_Write
0031 4801       |H   |		Short_Literal	0x1
0032 4820       |H   |		Short_Literal	0x20
0033 00da       |    |		Load_Top	At_Offset_2
0034 01d6       |    |		Execute	Vector,Field_Write
0035 4801       |H   |		Short_Literal	0x1
0036 4809       |H   |		Short_Literal	0x9
0037 00da       |    |		Load_Top	At_Offset_2
0038 01d6       |    |		Execute	Vector,Field_Write
0039 4802       |H   |		Short_Literal	0x2
003a 482d       |H-  |		Short_Literal	0x2d
003b 00da       |    |		Load_Top	At_Offset_2
003c 01d6       |    |		Execute	Vector,Field_Write
003d 4803       |H   |		Short_Literal	0x3
003e 4827       |H'  |		Short_Literal	0x27
003f 00da       |    |		Load_Top	At_Offset_2
0040 01d6       |    |		Execute	Vector,Field_Write
0041 4804       |H   |		Short_Literal	0x4
0042 4822       |H"  |		Short_Literal	0x22
0043 00da       |    |		Load_Top	At_Offset_2
0044 01d6       |    |		Execute	Vector,Field_Write
0045 487a       |Hz  |		Short_Literal	0x7a
0046 4861       |Ha  |		Short_Literal	0x61
0047 4806       |H   |		Short_Literal	0x6
0048 00d9       |    |		Load_Top	At_Offset_1
0049 e213       |    |		Load	0x1,0x13
004a 01d6       |    |		Execute	Vector,Field_Write
004b 3ffb       |?   |		Loop_Increasing	0x47
004c 485a       |HZ  |		Short_Literal	0x5a
004d 4841       |HA  |		Short_Literal	0x41
004e 4806       |H   |		Short_Literal	0x6
004f 00d9       |    |		Load_Top	At_Offset_1
0050 e213       |    |		Load	0x1,0x13
0051 01d6       |    |		Execute	Vector,Field_Write
0052 3ffb       |?   |		Loop_Increasing	0x4e
0053 4806       |H   |		Short_Literal	0x6
0054 4823       |H#  |		Short_Literal	0x23
0055 00da       |    |		Load_Top	At_Offset_2
0056 01d6       |    |		Execute	Vector,Field_Write
0057 4839       |H9  |		Short_Literal	0x39
0058 4830       |H0  |		Short_Literal	0x30
0059 4806       |H   |		Short_Literal	0x6
005a 00d9       |    |		Load_Top	At_Offset_1
005b e213       |    |		Load	0x1,0x13
005c 01d6       |    |		Execute	Vector,Field_Write
005d 3ffb       |?   |		Loop_Increasing	0x59
005e 4806       |H   |		Short_Literal	0x6
005f 485f       |H_  |		Short_Literal	0x5f
0060 00da       |    |		Load_Top	At_Offset_2
0061 01d6       |    |		Execute	Vector,Field_Write
0062 4808       |H   |		Short_Literal	0x8
0063 4800       |H   |		Short_Literal	0x0
0064 4805       |H   |		Short_Literal	0x5
0065 00d9       |    |		Load_Top	At_Offset_1
0066 e213       |    |		Load	0x1,0x13
0067 01d6       |    |		Execute	Vector,Field_Write
0068 3ffb       |?   |		Loop_Increasing	0x64
0069 4805       |H   |		Short_Literal	0x5
006a 480b       |H   |		Short_Literal	0xb
006b 00da       |    |		Load_Top	At_Offset_2
006c 01d6       |    |		Execute	Vector,Field_Write
006d 481f       |H   |		Short_Literal	0x1f
006e 480d       |H   |		Short_Literal	0xd
006f 4805       |H   |		Short_Literal	0x5
0070 00d9       |    |		Load_Top	At_Offset_1
0071 e213       |    |		Load	0x1,0x13
0072 01d6       |    |		Execute	Vector,Field_Write
0073 3ffb       |?   |		Loop_Increasing	0x6f
0074 4805       |H   |		Short_Literal	0x5
0075 4821       |H!  |		Short_Literal	0x21
0076 00da       |    |		Load_Top	At_Offset_2
0077 01d6       |    |		Execute	Vector,Field_Write
0078 4826       |H&  |		Short_Literal	0x26
0079 4824       |H$  |		Short_Literal	0x24
007a 4805       |H   |		Short_Literal	0x5
007b 00d9       |    |		Load_Top	At_Offset_1
007c e213       |    |		Load	0x1,0x13
007d 01d6       |    |		Execute	Vector,Field_Write
007e 3ffb       |?   |		Loop_Increasing	0x7a
007f 482c       |H,  |		Short_Literal	0x2c
0080 4828       |H(  |		Short_Literal	0x28
0081 4805       |H   |		Short_Literal	0x5
0082 00d9       |    |		Load_Top	At_Offset_1
0083 e213       |    |		Load	0x1,0x13
0084 01d6       |    |		Execute	Vector,Field_Write
0085 3ffb       |?   |		Loop_Increasing	0x81
0086 4805       |H   |		Short_Literal	0x5
0087 482e       |H.  |		Short_Literal	0x2e
0088 00da       |    |		Load_Top	At_Offset_2
0089 01d6       |    |		Execute	Vector,Field_Write
008a 4805       |H   |		Short_Literal	0x5
008b 482f       |H/  |		Short_Literal	0x2f
008c 00da       |    |		Load_Top	At_Offset_2
008d 01d6       |    |		Execute	Vector,Field_Write
008e 4840       |H@  |		Short_Literal	0x40
008f 483a       |H:  |		Short_Literal	0x3a
0090 4805       |H   |		Short_Literal	0x5
0091 00d9       |    |		Load_Top	At_Offset_1
0092 e213       |    |		Load	0x1,0x13
0093 01d6       |    |		Execute	Vector,Field_Write
0094 3ffb       |?   |		Loop_Increasing	0x90
0095 485e       |H^  |		Short_Literal	0x5e
0096 485b       |H[  |		Short_Literal	0x5b
0097 4805       |H   |		Short_Literal	0x5
0098 00d9       |    |		Load_Top	At_Offset_1
0099 e213       |    |		Load	0x1,0x13
009a 01d6       |    |		Execute	Vector,Field_Write
009b 3ffb       |?   |		Loop_Increasing	0x97
009c 4805       |H   |		Short_Literal	0x5
009d 4860       |H`  |		Short_Literal	0x60
009e 00da       |    |		Load_Top	At_Offset_2
009f 01d6       |    |		Execute	Vector,Field_Write
00a0 487f       |H   |		Short_Literal	0x7f
00a1 487b       |H{  |		Short_Literal	0x7b
00a2 4805       |H   |		Short_Literal	0x5
00a3 00d9       |    |		Load_Top	At_Offset_1
00a4 e213       |    |		Load	0x1,0x13
00a5 01d6       |    |		Execute	Vector,Field_Write
00a6 3ffb       |?   |		Loop_Increasing	0xa2
00a7 00da       |    |		Load_Top	At_Offset_2
00a8 01c3       |    |		Execute	Vector,Check_In_Type
00a9 00d9       |    |		Load_Top	At_Offset_1
00aa 01d4       |    |		Execute	Vector,Structure_Write
00ab 029d 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call			; Debug Table 0x1.0x5 = 0xab,0xfffa
00ad 029d 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call			; Debug Table 0x1.0x6 = 0xad,0xfff9
00af 029d 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call			; Debug Table 0x1.0x7 = 0xaf,0xfff8
00b1 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x8 = 0xb1,0xfff7
00b2 00c7       |    |		Action	Elaborate_Subprogram
00b3			BODY_0008:
00b3 00bc       |    |		Action	Signal_Activated
00b4 00bb       |    |		Action	Signal_Completion
00b5 0000 0000  |    |		.XXX[0x3]
00b7 0000       |    |
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bf       |    |		.CONST	0x00bf								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0003       |    |		.CONST	0x0003								; Number of locals
00bb			INIT_00b8:
00bb e20f       |    |		Load	0x1,0xf								; Debug Table 0x2 = .DEBUG	0x00bb,0x035a,0x0002,0x0000,0x0058,0x1215,0x0000,0x0004
													; Debug Table 0x2.0x0 = 0xbb,0xffff
00bc 0322       | "  |		Declare_Variable	Record
00bd e20f       |    |		Load	0x1,0xf
00be 0322       | "  |		Declare_Variable	Record
00bf			BODY_00b8:
00bf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x1 = 0xbf,0x1
00c0 e5ff       |    |		Load	0x2,-0x1
00c1 8214       |    |		Call	0x1,0x14
00c2 00d1       |    |		Pop_Control	Pop_Count_1
00c3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x2 = 0xc3,0x2
00c4 e5fe       |    |		Load	0x2,-0x2
00c5 8214       |    |		Call	0x1,0x14
00c6 00d1       |    |		Pop_Control	Pop_Count_1
00c7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x3 = 0xc7,0x3
00c8 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00c9 00d9       |    |		Load_Top	At_Offset_1
00ca 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00cb 027e       | ~  |		Execute	Discrete,Not_Equal
00cc 6802       |h   |		Jump_Zero	0xcf
00cd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x4 = 0xcd,0x4
00ce 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00cf 00cf       |    |		Action	Mark_Auxiliary
00d0 7811       |x   |		Jump	0xe2
00d1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x5 = 0xd1,0x6
00d2 e5ff       |    |		Load	0x2,-0x1
00d3 8213       |    |		Call	0x1,0x13
00d4 00d1       |    |		Pop_Control	Pop_Count_1
00d5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x6 = 0xd5,0x7
00d6 e5fe       |    |		Load	0x2,-0x2
00d7 8213       |    |		Call	0x1,0x13
00d8 00d1       |    |		Pop_Control	Pop_Count_1
00d9 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x7 = 0xd9,0x8
00da e5ff       |    |		Load	0x2,-0x1
00db 00db       |    |		Load_Top	At_Offset_3
00dc e402       |    |		Load	0x2,0x2
00dd 8215       |    |		Call	0x1,0x15
00de 7002       |p   |		Jump_Nonzero	0xe1
00df 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x8 = 0xdf,0x9
00e0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00e1 00c9       |    |		Action	Pop_Auxiliary_Loop
00e2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x9 = 0xe2,0x5
00e3 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00e4 00da       |    |		Load_Top	At_Offset_2
00e5 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00e6 0279       | y  |		Execute	Discrete,And
00e7 6fe9       |o   |		Jump_Zero	0xd1
00e8 00ce       |    |		Action	Pop_Auxiliary
00e9 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0xa = 0xe9,0xa
00ea 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00eb 0000 0000  |    |		.BLANK	0000[0x5]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 4603       |F   |		Jump_Case	0x4							; Debug Table 0x3 = .DEBUG	0x00f3,0x0372,0x0005,0x0000,0x0058,0x1225,0x0000,0x0006
00f4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00f5 7802       |x   |		Jump	0xf8								; case 0x1
00f6 7805       |x   |		Jump	0xfc								; case 0x2
00f7 7809       |x   |		Jump	0x101								; case 0x3
00f8 00da       |    |		Load_Top	At_Offset_2
00f9 0091 0285  |    |		Action	Push_String_Extended_Indexed,0x285				; "DELIMITER"
00fb 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00fc 00db       |    |		Load_Top	At_Offset_3
00fd 00db       |    |		Load_Top	At_Offset_3
00fe 00e0       |    |		Load_Encached	Standard_Cache
00ff 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0100 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0101 00da       |    |		Load_Top	At_Offset_2
0102 00e0       |    |		Load_Encached	Standard_Cache
0103 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0104 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0105 0000 0000  |    |		.XXX[0x3]
0107 0000       |    |
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 4603       |F   |		Jump_Case	0x4							; Debug Table 0x4 = .DEBUG	0x010b,0x0374,0x0005,0x0000,0x0058,0x1225,0x0000,0x0032
010c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
010d 7802       |x   |		Jump	0x110								; case 0x1
010e 7805       |x   |		Jump	0x114								; case 0x2
010f 7809       |x   |		Jump	0x119								; case 0x3
0110 00da       |    |		Load_Top	At_Offset_2
0111 0091 0295  |    |		Action	Push_String_Extended_Indexed,0x295				; "NEWLINE"
0113 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0114 00db       |    |		Load_Top	At_Offset_3
0115 00db       |    |		Load_Top	At_Offset_3
0116 00e0       |    |		Load_Encached	Standard_Cache
0117 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0118 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0119 00da       |    |		Load_Top	At_Offset_2
011a 00e0       |    |		Load_Encached	Standard_Cache
011b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
011c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
011d 0000 0000  |    |		.XXX[0x3]
011f 0000       |    |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0127       | '  |		.CONST	0x0127								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0004       |    |		.CONST	0x0004								; Number of locals
0123			INIT_0120:
0123 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x5 = .DEBUG	0x0123,0x0376,0x0001,0x0000,0x0058,0x1225,0x0000,0x007c
													; Debug Table 0x5.0x0 = 0x123,0xffff
0124 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5.0x1 = 0x124,0xfffe
0125 029f 0273  |   s|		Declare_Subprogram	INIT_0270,For_Call				; Debug Table 0x5.0x2 = 0x125,0xfffd
0127			BODY_0120:
0127 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x3 = 0x127,0x1
0128 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0129 6801       |h   |		Jump_Zero	0x12b
012a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x5.0x4 = 0x12a,0x2
012b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x5 = 0x12b,0x3
012c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
012d e5fe       |    |		Load	0x2,-0x2
012e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
012f 027f       |    |		Execute	Discrete,Equal
0130 6804       |h   |		Jump_Zero	0x135
0131 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x6 = 0x131,0x4
0132 e5fe       |    |		Load	0x2,-0x2
0133 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0134 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x5.0x7 = 0x134,0x5
0135 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x8 = 0x135,0x6
0136 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0137 0a01       |    |		Execute_Immediate	Plus,0x1
0138 e5fe       |    |		Load	0x2,-0x2
0139 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
013a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x9 = 0x13a,0x7
013b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
013c e5ff       |    |		Load	0x2,-0x1
013d 01d7       |    |		Execute	Vector,Field_Read
013e 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
013f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0xa = 0x13f,0x8
0140 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0141 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0xb = 0x141,0x9
0142 0f0a       |    |		Execute_Immediate	Equal,0xa
0143 7003       |p   |		Jump_Nonzero	0x147
0144 00da       |    |		Load_Top	At_Offset_2
0145 0f0c       |    |		Execute_Immediate	Equal,0xc
0146 6804       |h   |		Jump_Zero	0x14b
0147 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0xc = 0x147,0xa
0148 e5fe       |    |		Load	0x2,-0x2
0149 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
014a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x5.0xd = 0x14a,0xb
014b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0xe = 0x14b,0xc
014c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
014d 460f       |F   |		Jump_Case	0x10
014e 780f       |x   |		Jump	0x15e								; case 0x0
014f 780e       |x   |		Jump	0x15e								; case 0x1
0150 780d       |x   |		Jump	0x15e								; case 0x2
0151 780c       |x   |		Jump	0x15e								; case 0x3
0152 7865       |xe  |		Jump	0x1b8								; case 0x4
0153 7864       |xd  |		Jump	0x1b8								; case 0x5
0154 7893       |x   |		Jump	0x1e8								; case 0x6
0155 7892       |x   |		Jump	0x1e8								; case 0x7
0156 7895       |x   |		Jump	0x1ec								; case 0x8
0157 7898       |x   |		Jump	0x1f0								; case 0x9
0158 78a2       |x   |		Jump	0x1fb								; case 0xa
0159 78ae       |x   |		Jump	0x208								; case 0xb
015a 78ba       |x   |		Jump	0x215								; case 0xc
015b 78b9       |x   |		Jump	0x215								; case 0xd
015c 78c6       |x   |		Jump	0x223								; case 0xe
015d 7800       |x   |		Jump	0x15e								; case 0xf
015e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0xf = 0x15e,0xd
015f e212       |    |		Load	0x1,0x12
0160 01d7       |    |		Execute	Vector,Field_Read
0161 4606       |F   |		Jump_Case	0x7
0162 7853       |xS  |		Jump	0x1b6								; case 0x0
0163 7805       |x   |		Jump	0x169								; case 0x1
0164 781f       |x   |		Jump	0x184								; case 0x2
0165 783c       |x<  |		Jump	0x1a2								; case 0x3
0166 7837       |x7  |		Jump	0x19e								; case 0x4
0167 784a       |xJ  |		Jump	0x1b2								; case 0x5
0168 7845       |xE  |		Jump	0x1ae								; case 0x6
0169 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x10 = 0x169,0xe
016a 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
016b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x11 = 0x16b,0xf
016c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
016d 460f       |F   |		Jump_Case	0x10
016e 78b7       |x   |		Jump	0x226								; case 0x0
016f 78b6       |x   |		Jump	0x226								; case 0x1
0170 78b5       |x   |		Jump	0x226								; case 0x2
0171 780c       |x   |		Jump	0x17e								; case 0x3
0172 780f       |x   |		Jump	0x182								; case 0x4
0173 780e       |x   |		Jump	0x182								; case 0x5
0174 780d       |x   |		Jump	0x182								; case 0x6
0175 780c       |x   |		Jump	0x182								; case 0x7
0176 780b       |x   |		Jump	0x182								; case 0x8
0177 780a       |x   |		Jump	0x182								; case 0x9
0178 7809       |x   |		Jump	0x182								; case 0xa
0179 7808       |x   |		Jump	0x182								; case 0xb
017a 7807       |x   |		Jump	0x182								; case 0xc
017b 7806       |x   |		Jump	0x182								; case 0xd
017c 7805       |x   |		Jump	0x182								; case 0xe
017d 7804       |x   |		Jump	0x182								; case 0xf
017e 4804       |H   |		Short_Literal	0x4							; Debug Table 0x5.0x12 = 0x17e,0x10
017f e5fe       |    |		Load	0x2,-0x2
0180 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0181 78a4       |x   |		Jump	0x226
0182 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x5.0x13 = 0x182,0x12
0183 0257       | W  |		Execute	Discrete,Raise
0184 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x14 = 0x184,0x13
0185 8404       |    |		Call	0x2,0x4
0186 0f2d       | -  |		Execute_Immediate	Equal,0x2d
0187 6812       |h   |		Jump_Zero	0x19a
0188 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x15 = 0x188,0x14
0189 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
018a 0b02       |    |		Execute_Immediate	Case_Compare,0x2
018b 7004       |p   |		Jump_Nonzero	0x190
018c 4808       |H   |		Short_Literal	0x8							; Debug Table 0x5.0x16 = 0x18c,0x17
018d e5fe       |    |		Load	0x2,-0x2
018e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
018f 7808       |x   |		Jump	0x198
0190 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x17 = 0x190,0x15
0191 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0192 0aff       |    |		Execute_Immediate	Plus,-0x1
0193 e5fe       |    |		Load	0x2,-0x2
0194 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0195 4806       |H   |		Short_Literal	0x6							; Debug Table 0x5.0x18 = 0x195,0x16
0196 e5fe       |    |		Load	0x2,-0x2
0197 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0198 00d1       |    |		Pop_Control	Pop_Count_1
0199 788c       |x   |		Jump	0x226
019a 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x19 = 0x19a,0x18
019b e5fe       |    |		Load	0x2,-0x2
019c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
019d 7888       |x   |		Jump	0x226
019e 480c       |H   |		Short_Literal	0xc							; Debug Table 0x5.0x1a = 0x19e,0x19
019f e5fe       |    |		Load	0x2,-0x2
01a0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01a1 7884       |x   |		Jump	0x226
01a2 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x1b = 0x1a2,0x1a
01a3 8404       |    |		Call	0x2,0x4
01a4 0f27       | '  |		Execute_Immediate	Equal,0x27
01a5 6804       |h   |		Jump_Zero	0x1aa
01a6 480e       |H   |		Short_Literal	0xe							; Debug Table 0x5.0x1c = 0x1a6,0x1b
01a7 e5fe       |    |		Load	0x2,-0x2
01a8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01a9 787c       |x|  |		Jump	0x226
01aa 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x1d = 0x1aa,0x1c
01ab e5fe       |    |		Load	0x2,-0x2
01ac 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01ad 7878       |xx  |		Jump	0x226
01ae 4803       |H   |		Short_Literal	0x3							; Debug Table 0x5.0x1e = 0x1ae,0x1d
01af e5fe       |    |		Load	0x2,-0x2
01b0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01b1 7874       |xt  |		Jump	0x226
01b2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x1f = 0x1b2,0x1e
01b3 e5fe       |    |		Load	0x2,-0x2
01b4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01b5 7870       |xp  |		Jump	0x226
01b6 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x5.0x20 = 0x1b6,0x1f
01b7 0257       | W  |		Execute	Discrete,Raise
01b8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x21 = 0x1b8,0x20
01b9 e212       |    |		Load	0x1,0x12
01ba 01d7       |    |		Execute	Vector,Field_Read
01bb 4606       |F   |		Jump_Case	0x7
01bc 7809       |x   |		Jump	0x1c6								; case 0x0
01bd 7805       |x   |		Jump	0x1c3								; case 0x1
01be 7816       |x   |		Jump	0x1d5								; case 0x2
01bf 7815       |x   |		Jump	0x1d5								; case 0x3
01c0 7814       |x   |		Jump	0x1d5								; case 0x4
01c1 7813       |x   |		Jump	0x1d5								; case 0x5
01c2 7809       |x   |		Jump	0x1cc								; case 0x6
01c3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x22 = 0x1c3,0x21
01c4 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
01c5 7860       |x`  |		Jump	0x226
01c6 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x23 = 0x1c6,0x22
01c7 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
01c8 4805       |H   |		Short_Literal	0x5							; Debug Table 0x5.0x24 = 0x1c8,0x23
01c9 e5fe       |    |		Load	0x2,-0x2
01ca 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01cb 785a       |xZ  |		Jump	0x226
01cc e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x25 = 0x1cc,0x24
01cd 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01ce 0aff       |    |		Execute_Immediate	Plus,-0x1
01cf e5fe       |    |		Load	0x2,-0x2
01d0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01d1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x26 = 0x1d1,0x25
01d2 e5fe       |    |		Load	0x2,-0x2
01d3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01d4 7851       |xQ  |		Jump	0x226
01d5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x27 = 0x1d5,0x26
01d6 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
01d7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x28 = 0x1d7,0x27
01d8 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01d9 0aff       |    |		Execute_Immediate	Plus,-0x1
01da e5fe       |    |		Load	0x2,-0x2
01db 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01dc e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x29 = 0x1dc,0x28
01dd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01de 0f04       |    |		Execute_Immediate	Equal,0x4
01df 6804       |h   |		Jump_Zero	0x1e4
01e0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x2a = 0x1e0,0x29
01e1 e5fe       |    |		Load	0x2,-0x2
01e2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01e3 7842       |xB  |		Jump	0x226
01e4 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x2b = 0x1e4,0x2a
01e5 e5fe       |    |		Load	0x2,-0x2
01e6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01e7 783e       |x>  |		Jump	0x226
01e8 4808       |H   |		Short_Literal	0x8							; Debug Table 0x5.0x2c = 0x1e8,0x2b
01e9 e5fe       |    |		Load	0x2,-0x2
01ea 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01eb 783a       |x:  |		Jump	0x226
01ec 4809       |H   |		Short_Literal	0x9							; Debug Table 0x5.0x2d = 0x1ec,0x2c
01ed e5fe       |    |		Load	0x2,-0x2
01ee 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01ef 7836       |x6  |		Jump	0x226
01f0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x2e = 0x1f0,0x2d
01f1 0f0a       |    |		Execute_Immediate	Equal,0xa
01f2 6804       |h   |		Jump_Zero	0x1f7
01f3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x2f = 0x1f3,0x2e
01f4 e5fe       |    |		Load	0x2,-0x2
01f5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01f6 782f       |x/  |		Jump	0x226
01f7 4809       |H   |		Short_Literal	0x9							; Debug Table 0x5.0x30 = 0x1f7,0x2f
01f8 e5fe       |    |		Load	0x2,-0x2
01f9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01fa 782b       |x+  |		Jump	0x226
01fb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x31 = 0x1fb,0x30
01fc 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
01fd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x32 = 0x1fd,0x31
01fe 0f0a       |    |		Execute_Immediate	Equal,0xa
01ff 6804       |h   |		Jump_Zero	0x204
0200 4804       |H   |		Short_Literal	0x4							; Debug Table 0x5.0x33 = 0x200,0x32
0201 e5fe       |    |		Load	0x2,-0x2
0202 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0203 7822       |x"  |		Jump	0x226
0204 480a       |H   |		Short_Literal	0xa							; Debug Table 0x5.0x34 = 0x204,0x33
0205 e5fe       |    |		Load	0x2,-0x2
0206 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0207 781e       |x   |		Jump	0x226
0208 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x35 = 0x208,0x34
0209 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
020a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x36 = 0x20a,0x35
020b 0f0a       |    |		Execute_Immediate	Equal,0xa
020c 6804       |h   |		Jump_Zero	0x211
020d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x37 = 0x20d,0x36
020e e5fe       |    |		Load	0x2,-0x2
020f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0210 7815       |x   |		Jump	0x226
0211 480b       |H   |		Short_Literal	0xb							; Debug Table 0x5.0x38 = 0x211,0x37
0212 e5fe       |    |		Load	0x2,-0x2
0213 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0214 7811       |x   |		Jump	0x226
0215 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x39 = 0x215,0x38
0216 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
0217 7006       |p   |		Jump_Nonzero	0x21e
0218 0b0a       |    |		Execute_Immediate	Case_Compare,0xa
0219 7004       |p   |		Jump_Nonzero	0x21e
021a 480d       |H   |		Short_Literal	0xd							; Debug Table 0x5.0x3a = 0x21a,0x3a
021b e5fe       |    |		Load	0x2,-0x2
021c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
021d 7803       |x   |		Jump	0x221
021e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x3b = 0x21e,0x39
021f e5fe       |    |		Load	0x2,-0x2
0220 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0221 00d1       |    |		Pop_Control	Pop_Count_1
0222 7803       |x   |		Jump	0x226
0223 480f       |H   |		Short_Literal	0xf							; Debug Table 0x5.0x3c = 0x223,0x3b
0224 e5fe       |    |		Load	0x2,-0x2
0225 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0226 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x3d = 0x226,0x3c
0227 7001       |p   |		Jump_Nonzero	0x229
0228 7f02       |    |		Jump	0x12b								; Debug Table 0x5.0x3e = 0x228,0x3d
0229 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
022a 0000 0000  |    |		.BLANK	0000[0x6]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233       | 3  |		.CONST	0x0233								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0001       |    |		.CONST	0x0001								; Number of locals
0233			BODY_0230:
0233			INIT_0230:
0233 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6 = .DEBUG	0x0233,0x03f6,0x0001,0x0000,0x0058,0x1225,0x0000,0x02aa
													; Debug Table 0x6.0x0 = 0x233,0x1
0234 e5fe       |    |		Load	0x2,-0x2
0235 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0236 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1 = 0x236,0x2
0237 01db       |    |		Execute	Vector,Length
0238 0f00       |    |		Execute_Immediate	Equal,0x0
0239 e5fe       |    |		Load	0x2,-0x2
023a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
023b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x2 = 0x23b,0x3
023c 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
023d 6807       |h   |		Jump_Zero	0x245
023e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x3 = 0x23e,0x4
023f e5fe       |    |		Load	0x2,-0x2
0240 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0241 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x4 = 0x241,0x5
0242 e5fe       |    |		Load	0x2,-0x2
0243 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0244 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0245 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x5 = 0x245,0x6
0246 01dd       |    |		Execute	Vector,First
0247 0aff       |    |		Execute_Immediate	Plus,-0x1
0248 e5fe       |    |		Load	0x2,-0x2
0249 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
024a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x6 = 0x24a,0x7
024b 01dc       |    |		Execute	Vector,Last
024c e5fe       |    |		Load	0x2,-0x2
024d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
024e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
024f 0000       |    |		.XXX[0x1]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x0253,0x0406,0x0002,0x0000,0x0058,0x1225,0x0000,0x02ee
													; Debug Table 0x7.0x0 = 0x253,0x1
0254 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0255 6807       |h   |		Jump_Zero	0x25d
0256 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x1 = 0x256,0x2
0257 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0258 6802       |h   |		Jump_Zero	0x25b
0259 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x2 = 0x259,0x3
025a 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
025b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x3 = 0x25b,0x4
025c 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
025d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x4 = 0x25d,0x5
025e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
025f 6802       |h   |		Jump_Zero	0x262
0260 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x5 = 0x260,0x6
0261 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0262 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x6 = 0x262,0x7
0263 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0264 e5fd       |    |		Load	0x2,-0x3
0265 01d7       |    |		Execute	Vector,Field_Read
0266 e5fe       |    |		Load	0x2,-0x2
0267 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0268 e5fc       |    |		Load	0x2,-0x4
0269 01d7       |    |		Execute	Vector,Field_Read
026a 027f       |    |		Execute	Discrete,Equal
026b 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
026c 0000 0000  |    |		.BLANK	0000[0x4]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 027a       | z  |		.CONST	0x027a								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0002       |    |		.CONST	0x0002								; Number of locals
0273			INIT_0270:
0273 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8 = .DEBUG	0x0273,0x0416,0x0002,0x0000,0x0058,0x1225,0x0000,0x0091
													; Debug Table 0x8.0x0 = 0x273,0xffff
0274 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0275 00db       |    |		Load_Top	At_Offset_3
0276 0273       | s  |		Execute	Discrete,Plus
0277 0248       | H  |		Execute	Discrete,Check_In_Integer
0278 00e2       |    |		Load_Encached	Integer_Cache
0279 03f1       |    |		Declare_Variable	Discrete,With_Value
027a			BODY_0270:
027a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x1 = 0x27a,0x1
027b e5fe       |    |		Load	0x2,-0x2
027c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
027d 027d       | }  |		Execute	Discrete,Greater
027e 6802       |h   |		Jump_Zero	0x281
027f 480a       |H   |		Short_Literal	0xa							; Debug Table 0x8.0x2 = 0x27f,0x2
0280 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0281 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x3 = 0x281,0x3
0282 e5ff       |    |		Load	0x2,-0x1
0283 01d7       |    |		Execute	Vector,Field_Read
0284 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0285 ; --------------------------------------------------------------------------------------
0285 ; STRING TABLE
0285 ; --------------------------------------------------------------------------------------
0285 0030       | 0  |		.STRTAB	0x0030->0x029d							; "DELIMITER"
0286 0037       | 7  |		.STRTAB	0x0037->0x02a1							; "DELIMITER_INDENT"
0287 0045       | E  |		.STRTAB	0x0045->0x02a9							; "DASH"
0288 0047       | G  |		.STRTAB	0x0047->0x02ab							; "ID"
0289 0047       | G  |		.STRTAB	0x0047->0x02ac							; "ID_SPACE"
028a 004d       | M  |		.STRTAB	0x004d->0x02b0							; "ID_INDENT"
028b 0054       | T  |		.STRTAB	0x0054->0x02b5							; "COMMENT0"
028c 005a       | Z  |		.STRTAB	0x005a->0x02b9							; "COMMENT1"
028d 0060       | `  |		.STRTAB	0x0060->0x02bd							; "COMMENT2"
028e 0066       | f  |		.STRTAB	0x0066->0x02c1							; "COMMENT_TEXT"
028f 0070       | p  |		.STRTAB	0x0070->0x02c7							; "ID_COMMENT"
0290 0078       | x  |		.STRTAB	0x0078->0x02cc							; "DELIMITER_COMMENT"
0291 0087       |    |		.STRTAB	0x0087->0x02d4							; "STRING_LIT1"
0292 0090       |    |		.STRTAB	0x0090->0x02da							; "STRING_LIT2"
0293 0099       |    |		.STRTAB	0x0099->0x02df							; "CHAR_LIT1"
0294 00a0       |    |		.STRTAB	0x00a0->0x02e4							; "CHAR_LIT2"
0295 00a7       |    |		.STRTAB	0x00a7->0x02e8							; "NEWLINE"
0296 00ac       |    |		.STRTAB	0x00ac->0x02ec							; "' '"
0297 00ad       |    |		.STRTAB	0x00ad->0x02ed							; "'-'"
0298 00ae       |    |		.STRTAB	0x00ae->0x02ef							; "'''"
0299 00af       |    |		.STRTAB	0x00af->0x02f0							; "'\x22'"
029a 00b0       |    |		.STRTAB	0x00b0->0x02f2							; "'+'"
029b 00b1       |    |		.STRTAB	0x00b1->0x02f3							; "'A'"
029c 00b2       |    |		.STREND 0x00b2->0x02f5
029d 4445 4c49  |DELI|		.STRTAB_STRINGS
02f5 0000 0000  |    |		.XXX[0x3]
02f7 0000       |    |
02f8 ; --------------------------------------------------------------------------------------
02f8 ; Debug Table
02f8 ; --------------------------------------------------------------------------------------
02f8 0003 0009  |    |		.CONST	0x0003,0x0009
02fa 000b 0342  |   B|		.DEBUG	0x000b,0x0342,0x8000,0x0000,0x0058,0x1215,0x0000,0x0003
0302 000e 0346  |   F|		.DEBUG	0x000e,0x0346,0x8000,0x0000,0x0058,0x1225,0x0000,0x0005
030a 00bb 035a  |   Z|		.DEBUG	0x00bb,0x035a,0x0002,0x0000,0x0058,0x1215,0x0000,0x0004
0312 00f3 0372  |   r|		.DEBUG	0x00f3,0x0372,0x0005,0x0000,0x0058,0x1225,0x0000,0x0006
031a 010b 0374  |   t|		.DEBUG	0x010b,0x0374,0x0005,0x0000,0x0058,0x1225,0x0000,0x0032
0322 0123 0376  | # v|		.DEBUG	0x0123,0x0376,0x0001,0x0000,0x0058,0x1225,0x0000,0x007c
032a 0233 03f6  | 3  |		.DEBUG	0x0233,0x03f6,0x0001,0x0000,0x0058,0x1225,0x0000,0x02aa
0332 0253 0406  | S  |		.DEBUG	0x0253,0x0406,0x0002,0x0000,0x0058,0x1225,0x0000,0x02ee
033a 0273 0416  | s  |		.DEBUG	0x0273,0x0416,0x0002,0x0000,0x0058,0x1225,0x0000,0x0091
0342 ; --------------------------------------------------------------------------------------
0342 ; Debug3 Subtable 0x0
0342 ; --------------------------------------------------------------------------------------
0342 0001 0000  |    |		.DBG3TAB	0x0001,0x0000
0344 000b ffff  |    |		.CONST	0x000b,0xffff
0346 ; --------------------------------------------------------------------------------------
0346 ; Debug3 Subtable 0x1
0346 ; --------------------------------------------------------------------------------------
0346 0009 0000  |    |		.DBG3TAB	0x0009,0x0000
0348 000e ffff  |    |		.CONST	0x000e,0xffff
034a 0013 fffe  |    |		.CONST	0x0013,0xfffe
034c 001a fffd  |    |		.CONST	0x001a,0xfffd
034e 001f fffc  |    |		.CONST	0x001f,0xfffc
0350 0025 fffb  | %  |		.CONST	0x0025,0xfffb
0352 00ab fffa  |    |		.CONST	0x00ab,0xfffa
0354 00ad fff9  |    |		.CONST	0x00ad,0xfff9
0356 00af fff8  |    |		.CONST	0x00af,0xfff8
0358 00b1 fff7  |    |		.CONST	0x00b1,0xfff7
035a ; --------------------------------------------------------------------------------------
035a ; Debug3 Subtable 0x2
035a ; --------------------------------------------------------------------------------------
035a 0001 000a  |    |		.DBG3TAB	0x0001,0x000a
035c 00bb ffff  |    |		.CONST	0x00bb,0xffff
035e 00bf 0001  |    |		.CONST	0x00bf,0x0001
0360 00c3 0002  |    |		.CONST	0x00c3,0x0002
0362 00c7 0003  |    |		.CONST	0x00c7,0x0003
0364 00cd 0004  |    |		.CONST	0x00cd,0x0004
0366 00d1 0006  |    |		.CONST	0x00d1,0x0006
0368 00d5 0007  |    |		.CONST	0x00d5,0x0007
036a 00d9 0008  |    |		.CONST	0x00d9,0x0008
036c 00df 0009  |    |		.CONST	0x00df,0x0009
036e 00e2 0005  |    |		.CONST	0x00e2,0x0005
0370 00e9 000a  |    |		.CONST	0x00e9,0x000a
0372 ; --------------------------------------------------------------------------------------
0372 ; Debug3 Subtable 0x3
0372 ; --------------------------------------------------------------------------------------
0372 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0374 ; --------------------------------------------------------------------------------------
0374 ; Debug3 Subtable 0x4
0374 ; --------------------------------------------------------------------------------------
0374 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0376 ; --------------------------------------------------------------------------------------
0376 ; Debug3 Subtable 0x5
0376 ; --------------------------------------------------------------------------------------
0376 0003 003c  |   <|		.DBG3TAB	0x0003,0x003c
0378 0123 ffff  | #  |		.CONST	0x0123,0xffff
037a 0124 fffe  | $  |		.CONST	0x0124,0xfffe
037c 0125 fffd  | %  |		.CONST	0x0125,0xfffd
037e 0127 0001  | '  |		.CONST	0x0127,0x0001
0380 012a 0002  | *  |		.CONST	0x012a,0x0002
0382 012b 0003  | +  |		.CONST	0x012b,0x0003
0384 0131 0004  | 1  |		.CONST	0x0131,0x0004
0386 0134 0005  | 4  |		.CONST	0x0134,0x0005
0388 0135 0006  | 5  |		.CONST	0x0135,0x0006
038a 013a 0007  | :  |		.CONST	0x013a,0x0007
038c 013f 0008  | ?  |		.CONST	0x013f,0x0008
038e 0141 0009  | A  |		.CONST	0x0141,0x0009
0390 0147 000a  | G  |		.CONST	0x0147,0x000a
0392 014a 000b  | J  |		.CONST	0x014a,0x000b
0394 014b 000c  | K  |		.CONST	0x014b,0x000c
0396 015e 000d  | ^  |		.CONST	0x015e,0x000d
0398 0169 000e  | i  |		.CONST	0x0169,0x000e
039a 016b 000f  | k  |		.CONST	0x016b,0x000f
039c 017e 0010  | ~  |		.CONST	0x017e,0x0010
039e 0182 0012  |    |		.CONST	0x0182,0x0012
03a0 0184 0013  |    |		.CONST	0x0184,0x0013
03a2 0188 0014  |    |		.CONST	0x0188,0x0014
03a4 018c 0017  |    |		.CONST	0x018c,0x0017
03a6 0190 0015  |    |		.CONST	0x0190,0x0015
03a8 0195 0016  |    |		.CONST	0x0195,0x0016
03aa 019a 0018  |    |		.CONST	0x019a,0x0018
03ac 019e 0019  |    |		.CONST	0x019e,0x0019
03ae 01a2 001a  |    |		.CONST	0x01a2,0x001a
03b0 01a6 001b  |    |		.CONST	0x01a6,0x001b
03b2 01aa 001c  |    |		.CONST	0x01aa,0x001c
03b4 01ae 001d  |    |		.CONST	0x01ae,0x001d
03b6 01b2 001e  |    |		.CONST	0x01b2,0x001e
03b8 01b6 001f  |    |		.CONST	0x01b6,0x001f
03ba 01b8 0020  |    |		.CONST	0x01b8,0x0020
03bc 01c3 0021  |   !|		.CONST	0x01c3,0x0021
03be 01c6 0022  |   "|		.CONST	0x01c6,0x0022
03c0 01c8 0023  |   #|		.CONST	0x01c8,0x0023
03c2 01cc 0024  |   $|		.CONST	0x01cc,0x0024
03c4 01d1 0025  |   %|		.CONST	0x01d1,0x0025
03c6 01d5 0026  |   &|		.CONST	0x01d5,0x0026
03c8 01d7 0027  |   '|		.CONST	0x01d7,0x0027
03ca 01dc 0028  |   (|		.CONST	0x01dc,0x0028
03cc 01e0 0029  |   )|		.CONST	0x01e0,0x0029
03ce 01e4 002a  |   *|		.CONST	0x01e4,0x002a
03d0 01e8 002b  |   +|		.CONST	0x01e8,0x002b
03d2 01ec 002c  |   ,|		.CONST	0x01ec,0x002c
03d4 01f0 002d  |   -|		.CONST	0x01f0,0x002d
03d6 01f3 002e  |   .|		.CONST	0x01f3,0x002e
03d8 01f7 002f  |   /|		.CONST	0x01f7,0x002f
03da 01fb 0030  |   0|		.CONST	0x01fb,0x0030
03dc 01fd 0031  |   1|		.CONST	0x01fd,0x0031
03de 0200 0032  |   2|		.CONST	0x0200,0x0032
03e0 0204 0033  |   3|		.CONST	0x0204,0x0033
03e2 0208 0034  |   4|		.CONST	0x0208,0x0034
03e4 020a 0035  |   5|		.CONST	0x020a,0x0035
03e6 020d 0036  |   6|		.CONST	0x020d,0x0036
03e8 0211 0037  |   7|		.CONST	0x0211,0x0037
03ea 0215 0038  |   8|		.CONST	0x0215,0x0038
03ec 021a 003a  |   :|		.CONST	0x021a,0x003a
03ee 021e 0039  |   9|		.CONST	0x021e,0x0039
03f0 0223 003b  | # ;|		.CONST	0x0223,0x003b
03f2 0226 003c  | & <|		.CONST	0x0226,0x003c
03f4 0228 003d  | ( =|		.CONST	0x0228,0x003d
03f6 ; --------------------------------------------------------------------------------------
03f6 ; Debug3 Subtable 0x6
03f6 ; --------------------------------------------------------------------------------------
03f6 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
03f8 0233 0001  | 3  |		.CONST	0x0233,0x0001
03fa 0236 0002  | 6  |		.CONST	0x0236,0x0002
03fc 023b 0003  | ;  |		.CONST	0x023b,0x0003
03fe 023e 0004  | >  |		.CONST	0x023e,0x0004
0400 0241 0005  | A  |		.CONST	0x0241,0x0005
0402 0245 0006  | E  |		.CONST	0x0245,0x0006
0404 024a 0007  | J  |		.CONST	0x024a,0x0007
0406 ; --------------------------------------------------------------------------------------
0406 ; Debug3 Subtable 0x7
0406 ; --------------------------------------------------------------------------------------
0406 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
0408 0253 0001  | S  |		.CONST	0x0253,0x0001
040a 0256 0002  | V  |		.CONST	0x0256,0x0002
040c 0259 0003  | Y  |		.CONST	0x0259,0x0003
040e 025b 0004  | [  |		.CONST	0x025b,0x0004
0410 025d 0005  | ]  |		.CONST	0x025d,0x0005
0412 0260 0006  | `  |		.CONST	0x0260,0x0006
0414 0262 0007  | b  |		.CONST	0x0262,0x0007
0416 ; --------------------------------------------------------------------------------------
0416 ; Debug3 Subtable 0x8
0416 ; --------------------------------------------------------------------------------------
0416 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0418 0273 ffff  | s  |		.CONST	0x0273,0xffff
041a 027a 0001  | z  |		.CONST	0x027a,0x0001
041c 027f 0002  |    |		.CONST	0x027f,0x0002
041e 0281 0003  |    |		.CONST	0x0281,0x0003
0420 0000 0000  |    |		.BLANK	0000[0x1e0]