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

⟦a6469f5ee⟧

    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 02b0       |    |		.CONST	0x02b0								; 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 0092       |    |		.CONST	0x0092								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0020       |    |		.CONST	0x0020								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1								; Debug Table 0x0 = .DEBUG	0x000b,0x0322,0x8000,0x0000,0x0056,0xfb85,0x0000,0x000f
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
													; Debug Table 0x0.0x3 = 0xb,0xfffc
													; Debug Table 0x0.0x4 = 0xb,0xfffb
000c 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
000d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
000e 0129       | )  |		Execute	Any,Make_Visible
000f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0x5 = 0xf,0xfffa
0010 e002       |    |		Load	0x0,0x2
0011 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0012 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0013 0129       | )  |		Execute	Any,Make_Visible
0014 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x6 = 0x14,0xfff9
0015 4802       |H   |		Short_Literal	0x2
0016 029f 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Call
0018 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0019 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x0.0x7 = 0x19,0xfff8
001a 00e3       |    |		Load_Encached	Natural_Cache
001b 00e3       |    |		Load_Encached	Natural_Cache
001c 02a0       |    |		Declare_Subprogram	Null_Subprogram
001d 4803       |H   |		Short_Literal	0x3
001e 032e       | .  |		Declare_Type	Record,Defined,Visible
001f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x8 = 0x1f,0xfff7
0020 0322       | "  |		Declare_Variable	Record
0021 4800       |H   |		Short_Literal	0x0
0022 00d9       |    |		Load_Top	At_Offset_1
0023 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0024 4800       |H   |		Short_Literal	0x0
0025 00d9       |    |		Load_Top	At_Offset_1
0026 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0027 4800       |H   |		Short_Literal	0x0
0028 00d9       |    |		Load_Top	At_Offset_1
0029 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
002a 0129       | )  |		Execute	Any,Make_Visible
002b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x0.0x9 = 0x2b,0xfff6
002c 0266       | f  |		Execute	Discrete,Bounds
002d 00db       |    |		Load_Top	At_Offset_3
002e 02a0       |    |		Declare_Subprogram	Null_Subprogram
002f 4801       |H   |		Short_Literal	0x1
0030 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
0031 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0xa = 0x31,0xfff5
0032 4800       |H   |		Short_Literal	0x0
0033 00da       |    |		Load_Top	At_Offset_2
0034 0333       | 3  |		Declare_Variable	Array,Visible,With_Constraint
0035 4801       |H   |		Short_Literal	0x1
0036 4800       |H   |		Short_Literal	0x0
0037 00db       |    |		Load_Top	At_Offset_3
0038 0334       | 4  |		Declare_Variable	Array,With_Constraint
0039 00d9       |    |		Load_Top	At_Offset_1
003a 01d4       |    |		Execute	Vector,Structure_Write
003b 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x3b,0xfff4
003d 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x3d,0xfff3
003f 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x3f,0xfff2
0041 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x41,0xfff1
0043 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x43,0xfff0
0045 00bf       |    |		Action	Accept_Activation
0046 0092 027c  |   ||		Action	Push_String_Extended,0x27c					; "LXERR_LINE"
													; Debug Table 0x1 = .DEBUG	0x0046,0x0344,0x8000,0x0000,0x0056,0xfbd5,0x0000,0x000b
													; Debug Table 0x1.0x0 = 0x46,0xffff
													; Debug Table 0x1.0x1 = 0x46,0xfffe
													; Debug Table 0x1.0x2 = 0x46,0xfffd
0048 e003       |    |		Load	0x0,0x3
0049 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
004a 4973       |Is  |		Short_Literal	0x173
004b 00eb       |    |		Load_Encached	Diana_Cache
004c 0098       |    |		Execute	Package,Field_Read_Dynamic
004d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
004e 03f1       |    |		Declare_Variable	Discrete,With_Value
004f 0092 027d  |   }|		Action	Push_String_Extended,0x27d					; "LXERR_COLUMN"
													; Debug Table 0x1.0x3 = 0x4f,0xfffc
0051 e003       |    |		Load	0x0,0x3
0052 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0053 4973       |Is  |		Short_Literal	0x173
0054 00eb       |    |		Load_Encached	Diana_Cache
0055 0098       |    |		Execute	Package,Field_Read_Dynamic
0056 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0057 03f1       |    |		Declare_Variable	Discrete,With_Value
0058 0092 027e  |   ~|		Action	Push_String_Extended,0x27e					; "LXERR_LENGTH"
													; Debug Table 0x1.0x4 = 0x58,0xfffb
005a e003       |    |		Load	0x0,0x3
005b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
005c 4973       |Is  |		Short_Literal	0x173
005d 00eb       |    |		Load_Encached	Diana_Cache
005e 0098       |    |		Execute	Package,Field_Read_Dynamic
005f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0060 03f1       |    |		Declare_Variable	Discrete,With_Value
0061 0092 027f  |    |		Action	Push_String_Extended,0x27f					; "LXERR_ANNOTATIONS"
													; Debug Table 0x1.0x5 = 0x61,0xfffa
0063 e003       |    |		Load	0x0,0x3
0064 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0065 4973       |Is  |		Short_Literal	0x173
0066 00eb       |    |		Load_Encached	Diana_Cache
0067 0098       |    |		Execute	Package,Field_Read_Dynamic
0068 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0069 03f1       |    |		Declare_Variable	Discrete,With_Value
006a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x6 = 0x6a,0xfff9
006b 4b7a       |Kz  |		Short_Literal	0x37a
006c e001       |    |		Load	0x0,0x1
006d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
006e 02a0       |    |		Declare_Subprogram	Null_Subprogram
006f 4801       |H   |		Short_Literal	0x1
0070 035d       | ]  |		Declare_Type	Array,Defined
0071 00d8       |    |		Load_Top	At_Offset_0
0072 0337       | 7  |		Declare_Variable	Array
0073 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1.0x7 = 0x73,0xfff8
0074 0266       | f  |		Execute	Discrete,Bounds
0075 e004       |    |		Load	0x0,0x4
0076 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0077 02a0       |    |		Declare_Subprogram	Null_Subprogram
0078 4801       |H   |		Short_Literal	0x1
0079 035d       | ]  |		Declare_Type	Array,Defined
007a 00d8       |    |		Load_Top	At_Offset_0
007b 0337       | 7  |		Declare_Variable	Array
007c 00d8       |    |		Load_Top	At_Offset_0
007d 0337       | 7  |		Declare_Variable	Array
007e 4802       |H   |		Short_Literal	0x2
007f 4801       |H   |		Short_Literal	0x1
0080 00da       |    |		Load_Top	At_Offset_2
0081 01d6       |    |		Execute	Vector,Field_Write
0082 4800       |H   |		Short_Literal	0x0
0083 4800       |H   |		Short_Literal	0x0
0084 00da       |    |		Load_Top	At_Offset_2
0085 01d6       |    |		Execute	Vector,Field_Write
0086 00d9       |    |		Load_Top	At_Offset_1
0087 01d4       |    |		Execute	Vector,Structure_Write
0088 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x8 = 0x88,0xfff7
0089 00c7       |    |		Action	Elaborate_Subprogram
008a 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x9 = 0x8a,0xfff6
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xa = 0x8c,0xfff5
008d 00c7       |    |		Action	Elaborate_Subprogram
008e 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xb = 0x8e,0xfff4
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xc = 0x90,0xfff3
0091 00c7       |    |		Action	Elaborate_Subprogram
0092			BODY_0008:
0092 00cf       |    |		Action	Mark_Auxiliary
0093 48ff       |H   |		Short_Literal	0xff							; Debug Table 0x1.0xd = 0x93,0x1
0094 4800       |H   |		Short_Literal	0x0
0095 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0xe = 0x95,0x2
0096 00d9       |    |		Load_Top	At_Offset_1
0097 e005       |    |		Load	0x0,0x5
0098 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0099 e21e       |    |		Load	0x1,0x1e
009a 01d6       |    |		Execute	Vector,Field_Write
009b 00c8       |    |		Action	Pop_Auxiliary_Range
009c 3ff8       |?   |		Loop_Increasing	0x95
009d 00ce       |    |		Action	Pop_Auxiliary
009e 00bc       |    |		Action	Signal_Activated
009f 00bb       |    |		Action	Signal_Completion
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3       |    |		.CONST	0x00a3								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0001       |    |		.CONST	0x0001								; Number of locals
00a3			BODY_00a0:
00a3			INIT_00a0:
00a3 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x00a3,0x0364,0x0005,0x0000,0x0056,0xfb85,0x0000,0x0033
00a4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00a5 7802       |x   |		Jump	0xa8								; case 0x1
00a6 7805       |x   |		Jump	0xac								; case 0x2
00a7 7809       |x   |		Jump	0xb1								; case 0x3
00a8 00da       |    |		Load_Top	At_Offset_2
00a9 0091 0278  |   x|		Action	Push_String_Extended_Indexed,0x278				; "TEXT_LINE"
00ab 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00ac 00db       |    |		Load_Top	At_Offset_3
00ad 00db       |    |		Load_Top	At_Offset_3
00ae 00e0       |    |		Load_Encached	Standard_Cache
00af 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00b0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00b1 00da       |    |		Load_Top	At_Offset_2
00b2 00e0       |    |		Load_Encached	Standard_Cache
00b3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00b4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00b5 0000 0000  |    |		.XXX[0x3]
00b7 0000       |    |
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3 = .DEBUG	0x00bb,0x0366,0x0001,0x0000,0x0056,0xfb85,0x0000,0x006d
													; Debug Table 0x3.0x0 = 0xbb,0x1
00bc 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
00bd e006       |    |		Load	0x0,0x6								; Debug Table 0x3.0x1 = 0xbd,0x2
00be 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00bf e5fe       |    |		Load	0x2,-0x2
00c0 017d       | }  |		Execute	Record,Structure_Write
00c1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x2 = 0xc1,0x3
00c2 e5fd       |    |		Load	0x2,-0x3
00c3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00c4 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x3 = 0xc4,0x4
00c5 e5fd       |    |		Load	0x2,-0x3
00c6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00c7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00f0       |    |		.CONST	0x00f0								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0008       |    |		.CONST	0x0008								; Number of locals
00cb			INIT_00c8:
00cb 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4 = .DEBUG	0x00cb,0x0370,0x2801,0x0002,0x0056,0xfb85,0x0000,0x0081
													; Debug Table 0x4.0x0 = 0xcb,0xffff
00cc 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00cd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x1 = 0xcd,0xfffe
00ce 4800       |H   |		Short_Literal	0x0
00cf 029f 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Call
00d1 03fd       |    |		Declare_Type	Discrete,Defined
00d2 029f 01db  |    |		Declare_Subprogram	INIT_01d8,For_Call				; Debug Table 0x4.0x2 = 0xd2,0xfffd
00d4 029f 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Call				; Debug Table 0x4.0x3 = 0xd4,0xfffc
00d6 029f 0203  |    |		Declare_Subprogram	INIT_0200,For_Call				; Debug Table 0x4.0x4 = 0xd6,0xfffb
00d8 029f 020b  |    |		Declare_Subprogram	INIT_0208,For_Call				; Debug Table 0x4.0x5 = 0xd8,0xfffa
00da 6199       |a   |		Indirect_Literal	Discrete,0x274,{0x00000000, 0x0056fbd5}		; Debug Table 0x4.0x6 = 0xda,0xfff9
00db 4af8       |J   |		Short_Literal	0x2f8
00dc e403       |    |		Load	0x2,0x3
00dd 4804       |H   |		Short_Literal	0x4
00de 4802       |H   |		Short_Literal	0x2
00df 0099       |    |		Action	Reference_Dynamic
00e0 4805       |H   |		Short_Literal	0x5
00e1 4802       |H   |		Short_Literal	0x2
00e2 0099       |    |		Action	Reference_Dynamic
00e3 4806       |H   |		Short_Literal	0x6
00e4 4802       |H   |		Short_Literal	0x2
00e5 0099       |    |		Action	Reference_Dynamic
00e6 e403       |    |		Load	0x2,0x3
00e7 4807       |H   |		Short_Literal	0x7
00e8 4802       |H   |		Short_Literal	0x2
00e9 0099       |    |		Action	Reference_Dynamic
00ea 4801       |H   |		Short_Literal	0x1
00eb e004       |    |		Load	0x0,0x4
00ec 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00ed 0387       |    |		Declare_Variable	Package
00ee 00d8       |    |		Load_Top	At_Offset_0
00ef 020f       |    |		Execute	Module,Activate
00f0			BODY_00c8:
00f0 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x4.0x7 = 0xf0,0x1
00f1 e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0x8 = 0xf1,0xfbff
00f2 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00f3 03e9       |    |		Declare_Variable	Discrete,Duplicate
00f4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x9 = 0xf4,0xfbfe
00f5 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x4.0xa = 0xf5,0xfbfd
00f6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xb = 0xf6,0x401
00f7 e40a       |    |		Load	0x2,0xa
00f8 00ef       |    |		Load_Encached	Diana_Sequence_Cache
00f9 00e1       |    |		Load_Encached	Boolean_Cache
00fa e001       |    |		Load	0x0,0x1
00fb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00fc 00ec       |    |		Load_Encached	Diana_Tree_Cache
00fd 4800       |H   |		Short_Literal	0x0
00fe e5fe       |    |		Load	0x2,-0x2
00ff e004       |    |		Load	0x0,0x4
0100 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0101 0322       | "  |		Declare_Variable	Record
0102 e5f5       |    |		Load	0x2,-0xb
0103 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0104 e007       |    |		Load	0x0,0x7
0105 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0106 025b       | [  |		Execute	Discrete,Check_In_Type
0107 e21e       |    |		Load	0x1,0x1e
0108 01d7       |    |		Execute	Vector,Field_Read
0109 00d9       |    |		Load_Top	At_Offset_1
010a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
010b e004       |    |		Load	0x0,0x4
010c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
010d 00d9       |    |		Load_Top	At_Offset_1
010e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
010f e004       |    |		Load	0x0,0x4
0110 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0111 00d9       |    |		Load_Top	At_Offset_1
0112 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0113 e5f4       |    |		Load	0x2,-0xc
0114 e220       |    |		Load	0x1,0x20
0115 01d7       |    |		Execute	Vector,Field_Read
0116 e5f3       |    |		Load	0x2,-0xd
0117 e5f6       |    |		Load	0x2,-0xa
0118 e408       |    |		Load	0x2,0x8
0119 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
011a c5f1       |    |		Store	0x2,-0xf
011b c5f0       |    |		Store	0x2,-0x10
011c c40c       |    |		Store	0x2,0xc
011d 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
011e c40a       |    |		Store	0x2,0xa
011f 005b       | [  |		Store_Top	Discrete,At_Offset_3
0120 450e       |E   |		Exit_Suprogram	New_Top_Offset 0xe
0121 0000 0000  |    |		.BLANK	0000[0x7]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 0130       | 0  |		.CONST	0x0130								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0005       |    |		.CONST	0x0005								; Number of locals
012b			INIT_0128:
012b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x5 = .DEBUG	0x012b,0x038a,0x0001,0x0000,0x0056,0xfb85,0x0000,0x0107
													; Debug Table 0x5.0x0 = 0x12b,0xffff
012c 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x5.0x1 = 0x12c,0xfffe
012d 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x5.0x2 = 0x12d,0xfffd
012e 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x5.0x3 = 0x12e,0xfffc
012f 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0130			BODY_0128:
0130 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x5.0x4 = 0x130,0x1
0131 e5ff       |    |		Load	0x2,-0x1
0132 4973       |Is  |		Short_Literal	0x173
0133 00eb       |    |		Load_Encached	Diana_Cache
0134 0098       |    |		Execute	Package,Field_Read_Dynamic
0135 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0136 6838       |h8  |		Jump_Zero	0x16f
0137 e219       |    |		Load	0x1,0x19							; Debug Table 0x5.0x5 = 0x137,0x2
0138 e5ff       |    |		Load	0x2,-0x1
0139 4973       |Is  |		Short_Literal	0x173
013a 00eb       |    |		Load_Encached	Diana_Cache
013b 0098       |    |		Execute	Package,Field_Read_Dynamic
013c 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
013d c402       |    |		Store	0x2,0x2
013e e21a       |    |		Load	0x1,0x1a							; Debug Table 0x5.0x6 = 0x13e,0x3
013f e5ff       |    |		Load	0x2,-0x1
0140 4973       |Is  |		Short_Literal	0x173
0141 00eb       |    |		Load_Encached	Diana_Cache
0142 0098       |    |		Execute	Package,Field_Read_Dynamic
0143 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0144 005b       | [  |		Store_Top	Discrete,At_Offset_3
0145 e21b       |    |		Load	0x1,0x1b							; Debug Table 0x5.0x7 = 0x145,0x4
0146 e5ff       |    |		Load	0x2,-0x1
0147 4973       |Is  |		Short_Literal	0x173
0148 00eb       |    |		Load_Encached	Diana_Cache
0149 0098       |    |		Execute	Package,Field_Read_Dynamic
014a 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
014b 005a       | Z  |		Store_Top	Discrete,At_Offset_2
014c e21c       |    |		Load	0x1,0x1c							; Debug Table 0x5.0x8 = 0x14c,0x5
014d e5ff       |    |		Load	0x2,-0x1
014e 4973       |Is  |		Short_Literal	0x173
014f 00eb       |    |		Load_Encached	Diana_Cache
0150 0098       |    |		Execute	Package,Field_Read_Dynamic
0151 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0152 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0153 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x9 = 0x153,0x6
0154 e219       |    |		Load	0x1,0x19
0155 e5fe       |    |		Load	0x2,-0x2
0156 4973       |Is  |		Short_Literal	0x173
0157 00eb       |    |		Load_Encached	Diana_Cache
0158 0098       |    |		Execute	Package,Field_Read_Dynamic
0159 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
015a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0xa = 0x15a,0x7
015b e21a       |    |		Load	0x1,0x1a
015c e5fe       |    |		Load	0x2,-0x2
015d 4973       |Is  |		Short_Literal	0x173
015e 00eb       |    |		Load_Encached	Diana_Cache
015f 0098       |    |		Execute	Package,Field_Read_Dynamic
0160 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0161 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0xb = 0x161,0x8
0162 e21b       |    |		Load	0x1,0x1b
0163 e5fe       |    |		Load	0x2,-0x2
0164 4973       |Is  |		Short_Literal	0x173
0165 00eb       |    |		Load_Encached	Diana_Cache
0166 0098       |    |		Execute	Package,Field_Read_Dynamic
0167 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0168 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xc = 0x168,0x9
0169 e21c       |    |		Load	0x1,0x1c
016a e5fe       |    |		Load	0x2,-0x2
016b 4973       |Is  |		Short_Literal	0x173
016c 00eb       |    |		Load_Encached	Diana_Cache
016d 0098       |    |		Execute	Package,Field_Read_Dynamic
016e 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
016f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 017a       | z  |		.CONST	0x017a								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0003       |    |		.CONST	0x0003								; Number of locals
0173			INIT_0170:
0173 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6 = .DEBUG	0x0173,0x03a6,0x0002,0x0000,0x0056,0xfb85,0x0000,0x0117
													; Debug Table 0x6.0x0 = 0x173,0xffff
0174 4801       |H   |		Short_Literal	0x1
0175 e212       |    |		Load	0x1,0x12
0176 0334       | 4  |		Declare_Variable	Array,With_Constraint
0177 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x1 = 0x177,0xfffe
0178 00d9       |    |		Load_Top	At_Offset_1
0179 01d5       |    |		Execute	Vector,Field_Reference
017a			BODY_0170:
017a e21c       |    |		Load	0x1,0x1c							; Debug Table 0x6.0x2 = 0x17a,0x1
017b e5ff       |    |		Load	0x2,-0x1
017c 4973       |Is  |		Short_Literal	0x173
017d 00eb       |    |		Load_Encached	Diana_Cache
017e 0098       |    |		Execute	Package,Field_Read_Dynamic
017f 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0180 681a       |h   |		Jump_Zero	0x19b
0181 e219       |    |		Load	0x1,0x19							; Debug Table 0x6.0x3 = 0x181,0x2
0182 e5ff       |    |		Load	0x2,-0x1
0183 4973       |Is  |		Short_Literal	0x173
0184 00eb       |    |		Load_Encached	Diana_Cache
0185 0098       |    |		Execute	Package,Field_Read_Dynamic
0186 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0187 00d9       |    |		Load_Top	At_Offset_1
0188 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0189 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x6.0x4 = 0x189,0x3
018a e5ff       |    |		Load	0x2,-0x1
018b 4973       |Is  |		Short_Literal	0x173
018c 00eb       |    |		Load_Encached	Diana_Cache
018d 0098       |    |		Execute	Package,Field_Read_Dynamic
018e 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
018f 00d9       |    |		Load_Top	At_Offset_1
0190 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0191 e21b       |    |		Load	0x1,0x1b							; Debug Table 0x6.0x5 = 0x191,0x4
0192 e5ff       |    |		Load	0x2,-0x1
0193 4973       |Is  |		Short_Literal	0x173
0194 00eb       |    |		Load_Encached	Diana_Cache
0195 0098       |    |		Execute	Package,Field_Read_Dynamic
0196 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0197 00d9       |    |		Load_Top	At_Offset_1
0198 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0199 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x6 = 0x199,0x5
019a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019b e213       |    |		Load	0x1,0x13							; Debug Table 0x6.0x7 = 0x19b,0x6
019c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019d 0000 0000  |    |		.XXX[0x3]
019f 0000       |    |
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a5       |    |		.CONST	0x01a5								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0002       |    |		.CONST	0x0002								; Number of locals
01a3			INIT_01a0:
01a3 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x7 = .DEBUG	0x01a3,0x03b8,0x0002,0x0000,0x0056,0xfb85,0x0000,0x0122
													; Debug Table 0x7.0x0 = 0x1a3,0xffff
01a4 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
01a5			BODY_01a0:
01a5 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x7.0x1 = 0x1a5,0x1
01a6 e5ff       |    |		Load	0x2,-0x1
01a7 4973       |Is  |		Short_Literal	0x173
01a8 00eb       |    |		Load_Encached	Diana_Cache
01a9 0098       |    |		Execute	Package,Field_Read_Dynamic
01aa 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
01ab 680b       |h   |		Jump_Zero	0x1b7
01ac e21c       |    |		Load	0x1,0x1c							; Debug Table 0x7.0x2 = 0x1ac,0x2
01ad e5ff       |    |		Load	0x2,-0x1
01ae 4973       |Is  |		Short_Literal	0x173
01af 00eb       |    |		Load_Encached	Diana_Cache
01b0 0098       |    |		Execute	Package,Field_Read_Dynamic
01b1 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
01b2 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01b3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x3 = 0x1b3,0x3
01b4 00eb       |    |		Load_Encached	Diana_Cache
01b5 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
01b6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01b7 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x7.0x4 = 0x1b7,0x4
01b8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01b9 0000 0000  |    |		.BLANK	0000[0x7]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3       |    |		.CONST	0x01c3								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0001       |    |		.CONST	0x0001								; Number of locals
01c3			BODY_01c0:
01c3			INIT_01c0:
01c3 4603       |F   |		Jump_Case	0x4							; Debug Table 0x8 = .DEBUG	0x01c3,0x03c4,0x0805,0x0002,0x0056,0xfbd5,0x0000,0x01d2
01c4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
01c5 7802       |x   |		Jump	0x1c8								; case 0x1
01c6 7805       |x   |		Jump	0x1cc								; case 0x2
01c7 7809       |x   |		Jump	0x1d1								; case 0x3
01c8 00da       |    |		Load_Top	At_Offset_2
01c9 0091 027b  |   {|		Action	Push_String_Extended_Indexed,0x27b				; "NIL"
01cb 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01cc 00db       |    |		Load_Top	At_Offset_3
01cd 00db       |    |		Load_Top	At_Offset_3
01ce 00e0       |    |		Load_Encached	Standard_Cache
01cf 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01d0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01d1 00da       |    |		Load_Top	At_Offset_2
01d2 00e0       |    |		Load_Encached	Standard_Cache
01d3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01d4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01d5 0000 0000  |    |		.XXX[0x3]
01d7 0000       |    |
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db       |    |		.CONST	0x01db								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0001       |    |		.CONST	0x0001								; Number of locals
01db			BODY_01d8:
01db			INIT_01d8:
01db e5f2       |    |		Load	0x2,-0xe							; Debug Table 0x9 = .DEBUG	0x01db,0x03c6,0x0802,0x0002,0x0056,0xfbd5,0x0000,0x01d7
													; Debug Table 0x9.0x0 = 0x1db,0x1
01dc e5f7       |    |		Load	0x2,-0x9
01dd 0119       |    |		Execute	Any,Check_In_Formal_Type
01de 85f8       |    |		Call	0x2,-0x8
01df 0f02       |    |		Execute_Immediate	Equal,0x2
01e0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01e1 0000 0000  |    |		.BLANK	0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01ed       |    |		.CONST	0x01ed								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0002       |    |		.CONST	0x0002								; Number of locals
01eb			INIT_01e8:
01eb 029f 0213  |    |		Declare_Subprogram	INIT_0210,For_Call				; Debug Table 0xa = .DEBUG	0x01eb,0x03ca,0x0801,0x0002,0x0056,0xfbd5,0x0000,0x01ed
													; Debug Table 0xa.0x0 = 0x1eb,0xffff
01ed			BODY_01e8:
01ed e5f2       |    |		Load	0x2,-0xe							; Debug Table 0xa.0x1 = 0x1ed,0x1
01ee e5f7       |    |		Load	0x2,-0x9
01ef 0119       |    |		Execute	Any,Check_In_Formal_Type
01f0 85f8       |    |		Call	0x2,-0x8
01f1 6802       |h   |		Jump_Zero	0x1f4
01f2 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0xa.0x2 = 0x1f2,0x2
01f3 0257       | W  |		Execute	Discrete,Raise
01f4 e5f2       |    |		Load	0x2,-0xe							; Debug Table 0xa.0x3 = 0x1f4,0x3
01f5 e5f7       |    |		Load	0x2,-0x9
01f6 0119       |    |		Execute	Any,Check_In_Formal_Type
01f7 85fa       |    |		Call	0x2,-0x6
01f8 8602       |    |		Call	0x3,0x2
01f9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01fa 0000 0000  |    |		.BLANK	0000[0x6]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0xb = .DEBUG	0x0203,0x03d4,0x0801,0x0002,0x0056,0xfbd5,0x0000,0x02cf
													; Debug Table 0xb.0x0 = 0x203,0x1
0204 0257       | W  |		Execute	Discrete,Raise
0205 0000 0000  |    |		.XXX[0x3]
0207 0000       |    |
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xc = .DEBUG	0x020b,0x03d8,0x0801,0x0002,0x0056,0xfbd5,0x0000,0x02dd
													; Debug Table 0xc.0x0 = 0x20b,0x1
020c 0000 0000  |    |		.BLANK	0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0226       | &  |		.CONST	0x0226								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0003       |    |		.CONST	0x0003								; Number of locals
0213			INIT_0210:
0213 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0xd = .DEBUG	0x0213,0x03dc,0x0801,0x0002,0x0056,0xfbd5,0x0000,0x0208
													; Debug Table 0xd.0x0 = 0x213,0xffff
0214 01dd       |    |		Execute	Vector,First
0215 00db       |    |		Load_Top	At_Offset_3
0216 01db       |    |		Execute	Vector,Length
0217 0273       | s  |		Execute	Discrete,Plus
0218 0248       | H  |		Execute	Discrete,Check_In_Integer
0219 e402       |    |		Load	0x2,0x2
021a 0272       | r  |		Execute	Discrete,Minus
021b 0aff       |    |		Execute_Immediate	Plus,-0x1
021c 0248       | H  |		Execute	Discrete,Check_In_Integer
021d 00e2       |    |		Load_Encached	Integer_Cache
021e 03f1       |    |		Declare_Variable	Discrete,With_Value
021f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x1 = 0x21f,0xfffe
0220 01dd       |    |		Execute	Vector,First
0221 e402       |    |		Load	0x2,0x2
0222 0273       | s  |		Execute	Discrete,Plus
0223 0248       | H  |		Execute	Discrete,Check_In_Integer
0224 00e2       |    |		Load_Encached	Integer_Cache
0225 03f1       |    |		Declare_Variable	Discrete,With_Value
0226			BODY_0210:
0226 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x2 = 0x226,0x1
0227 e7fe       |    |		Load	0x3,-0x2
0228 01dc       |    |		Execute	Vector,Last
0229 027a       | z  |		Execute	Discrete,Less_Equal
022a 682c       |h,  |		Jump_Zero	0x257
022b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x3 = 0x22b,0x2
022c e9ff       |    |		Load	0x4,-0x1
022d 01dc       |    |		Execute	Vector,Last
022e e9ff       |    |		Load	0x4,-0x1
022f 01cf       |    |		Execute	Vector,Slice_Read
0230 e7fe       |    |		Load	0x3,-0x2
0231 01dd       |    |		Execute	Vector,First
0232 00db       |    |		Load_Top	At_Offset_3
0233 e7fe       |    |		Load	0x3,-0x2
0234 01ce       |    |		Execute	Vector,Slice_Write
0235 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x4 = 0x235,0x3
0236 a7fc       |    |		Store_Unchecked	0x3,-0x4
0237 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0xd.0x5 = 0x237,0x4
0238 01db       |    |		Execute	Vector,Length
0239 680d       |h   |		Jump_Zero	0x247
023a e9ff       |    |		Load	0x4,-0x1
023b 01dc       |    |		Execute	Vector,Last
023c e9ff       |    |		Load	0x4,-0x1
023d 01d7       |    |		Execute	Vector,Field_Read
023e 0f0c       |    |		Execute_Immediate	Equal,0xc
023f 6807       |h   |		Jump_Zero	0x247
0240 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x6 = 0x240,0x5
0241 0aff       |    |		Execute_Immediate	Plus,-0x1
0242 0248       | H  |		Execute	Discrete,Check_In_Integer
0243 a7fd       |    |		Store_Unchecked	0x3,-0x3
0244 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x7 = 0x244,0x6
0245 a7fb       |    |		Store_Unchecked	0x3,-0x5
0246 7804       |x   |		Jump	0x24b
0247 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x8 = 0x247,0x7
0248 a7fd       |    |		Store_Unchecked	0x3,-0x3
0249 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x9 = 0x249,0x8
024a a7fb       |    |		Store_Unchecked	0x3,-0x5
024b e5f2       |    |		Load	0x2,-0xe							; Debug Table 0xd.0xa = 0x24b,0x9
024c 85fc       |    |		Call	0x2,-0x4
024d c5f2       |    |		Store	0x2,-0xe
024e 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0xb = 0x24e,0xa
024f a402       |    |		Store_Unchecked	0x2,0x2
0250 e5f2       |    |		Load	0x2,-0xe							; Debug Table 0xd.0xc = 0x250,0xb
0251 e5f7       |    |		Load	0x2,-0x9
0252 0119       |    |		Execute	Any,Check_In_Formal_Type
0253 85f8       |    |		Call	0x2,-0x8
0254 0f02       |    |		Execute_Immediate	Equal,0x2
0255 a7fa       |    |		Store_Unchecked	0x3,-0x6
0256 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xd.0xd = 0x256,0xc
0257 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0xe = 0x257,0xd
0258 a7fc       |    |		Store_Unchecked	0x3,-0x4
0259 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0xf = 0x259,0xe
025a a7fb       |    |		Store_Unchecked	0x3,-0x5
025b 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x10 = 0x25b,0xf
025c a7fa       |    |		Store_Unchecked	0x3,-0x6
025d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x11 = 0x25d,0x10
025e 00d9       |    |		Load_Top	At_Offset_1
025f e7fe       |    |		Load	0x3,-0x2
0260 01db       |    |		Execute	Vector,Length
0261 0273       | s  |		Execute	Discrete,Plus
0262 0aff       |    |		Execute_Immediate	Plus,-0x1
0263 0248       | H  |		Execute	Discrete,Check_In_Integer
0264 e9ff       |    |		Load	0x4,-0x1
0265 01cf       |    |		Execute	Vector,Slice_Read
0266 e7fe       |    |		Load	0x3,-0x2
0267 01d4       |    |		Execute	Vector,Structure_Write
0268 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0xd.0x12 = 0x268,0x11
0269 01dc       |    |		Execute	Vector,Last
026a a7fd       |    |		Store_Unchecked	0x3,-0x3
026b e402       |    |		Load	0x2,0x2								; Debug Table 0xd.0x13 = 0x26b,0x12
026c e7fe       |    |		Load	0x3,-0x2
026d 01db       |    |		Execute	Vector,Length
026e 0273       | s  |		Execute	Discrete,Plus
026f c402       |    |		Store	0x2,0x2
0270 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0271 0000 0000  |    |		.XXX[0x3]
0273 0000       |    |
0274 0000 0000  |    |		.LITERAL	{0x00000000, 0x0056fbd5}
0278 ; --------------------------------------------------------------------------------------
0278 ; STRING TABLE
0278 ; --------------------------------------------------------------------------------------
0278 0012       |    |		.STRTAB	0x0012->0x0281							; "TEXT_LINE"
0279 0019       |    |		.STRTAB	0x0019->0x0285							; "SUBOBJECT_TOKEN"
027a 0026       | &  |		.STRTAB	0x0026->0x028d							; "END_OF_INPUT"
027b 0030       | 0  |		.STRTAB	0x0030->0x0293							; "NIL"
027c 0031       | 1  |		.STRTAB	0x0031->0x0294							; "LXERR_LINE"
027d 0039       | 9  |		.STRTAB	0x0039->0x0299							; "LXERR_COLUMN"
027e 0043       | C  |		.STRTAB	0x0043->0x029f							; "LXERR_LENGTH"
027f 004d       | M  |		.STRTAB	0x004d->0x02a5							; "LXERR_ANNOTATIONS"
0280 005c       | \  |		.STREND 0x005c->0x02ae
0281 5445 5854  |TEXT|		.STRTAB_STRINGS
02ae 0000 0000  |    |		.XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; Debug Table
02b0 ; --------------------------------------------------------------------------------------
02b0 0003 000e  |    |		.CONST	0x0003,0x000e
02b2 000b 0322  |   "|		.DEBUG	0x000b,0x0322,0x8000,0x0000,0x0056,0xfb85,0x0000,0x000f
02ba 0046 0344  | F D|		.DEBUG	0x0046,0x0344,0x8000,0x0000,0x0056,0xfbd5,0x0000,0x000b
02c2 00a3 0364  |   d|		.DEBUG	0x00a3,0x0364,0x0005,0x0000,0x0056,0xfb85,0x0000,0x0033
02ca 00bb 0366  |   f|		.DEBUG	0x00bb,0x0366,0x0001,0x0000,0x0056,0xfb85,0x0000,0x006d
02d2 00cb 0370  |   p|		.DEBUG	0x00cb,0x0370,0x2801,0x0002,0x0056,0xfb85,0x0000,0x0081
02da 012b 038a  | +  |		.DEBUG	0x012b,0x038a,0x0001,0x0000,0x0056,0xfb85,0x0000,0x0107
02e2 0173 03a6  | s  |		.DEBUG	0x0173,0x03a6,0x0002,0x0000,0x0056,0xfb85,0x0000,0x0117
02ea 01a3 03b8  |    |		.DEBUG	0x01a3,0x03b8,0x0002,0x0000,0x0056,0xfb85,0x0000,0x0122
02f2 01c3 03c4  |    |		.DEBUG	0x01c3,0x03c4,0x0805,0x0002,0x0056,0xfbd5,0x0000,0x01d2
02fa 01db 03c6  |    |		.DEBUG	0x01db,0x03c6,0x0802,0x0002,0x0056,0xfbd5,0x0000,0x01d7
0302 01eb 03ca  |    |		.DEBUG	0x01eb,0x03ca,0x0801,0x0002,0x0056,0xfbd5,0x0000,0x01ed
030a 0203 03d4  |    |		.DEBUG	0x0203,0x03d4,0x0801,0x0002,0x0056,0xfbd5,0x0000,0x02cf
0312 020b 03d8  |    |		.DEBUG	0x020b,0x03d8,0x0801,0x0002,0x0056,0xfbd5,0x0000,0x02dd
031a 0213 03dc  |    |		.DEBUG	0x0213,0x03dc,0x0801,0x0002,0x0056,0xfbd5,0x0000,0x0208
0322 ; --------------------------------------------------------------------------------------
0322 ; Debug3 Subtable 0x0
0322 ; --------------------------------------------------------------------------------------
0322 0010 0000  |    |		.DBG3TAB	0x0010,0x0000
0324 000b ffff  |    |		.CONST	0x000b,0xffff
0326 000b fffe  |    |		.CONST	0x000b,0xfffe
0328 000b fffd  |    |		.CONST	0x000b,0xfffd
032a 000b fffc  |    |		.CONST	0x000b,0xfffc
032c 000b fffb  |    |		.CONST	0x000b,0xfffb
032e 000f fffa  |    |		.CONST	0x000f,0xfffa
0330 0014 fff9  |    |		.CONST	0x0014,0xfff9
0332 0019 fff8  |    |		.CONST	0x0019,0xfff8
0334 001f fff7  |    |		.CONST	0x001f,0xfff7
0336 002b fff6  | +  |		.CONST	0x002b,0xfff6
0338 0031 fff5  | 1  |		.CONST	0x0031,0xfff5
033a 003b fff4  | ;  |		.CONST	0x003b,0xfff4
033c 003d fff3  | =  |		.CONST	0x003d,0xfff3
033e 003f fff2  | ?  |		.CONST	0x003f,0xfff2
0340 0041 fff1  | A  |		.CONST	0x0041,0xfff1
0342 0043 fff0  | C  |		.CONST	0x0043,0xfff0
0344 ; --------------------------------------------------------------------------------------
0344 ; Debug3 Subtable 0x1
0344 ; --------------------------------------------------------------------------------------
0344 000d 0002  |    |		.DBG3TAB	0x000d,0x0002
0346 0046 ffff  | F  |		.CONST	0x0046,0xffff
0348 0046 fffe  | F  |		.CONST	0x0046,0xfffe
034a 0046 fffd  | F  |		.CONST	0x0046,0xfffd
034c 004f fffc  | O  |		.CONST	0x004f,0xfffc
034e 0058 fffb  | X  |		.CONST	0x0058,0xfffb
0350 0061 fffa  | a  |		.CONST	0x0061,0xfffa
0352 006a fff9  | j  |		.CONST	0x006a,0xfff9
0354 0073 fff8  | s  |		.CONST	0x0073,0xfff8
0356 0088 fff7  |    |		.CONST	0x0088,0xfff7
0358 008a fff6  |    |		.CONST	0x008a,0xfff6
035a 008c fff5  |    |		.CONST	0x008c,0xfff5
035c 008e fff4  |    |		.CONST	0x008e,0xfff4
035e 0090 fff3  |    |		.CONST	0x0090,0xfff3
0360 0093 0001  |    |		.CONST	0x0093,0x0001
0362 0095 0002  |    |		.CONST	0x0095,0x0002
0364 ; --------------------------------------------------------------------------------------
0364 ; Debug3 Subtable 0x2
0364 ; --------------------------------------------------------------------------------------
0364 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0366 ; --------------------------------------------------------------------------------------
0366 ; Debug3 Subtable 0x3
0366 ; --------------------------------------------------------------------------------------
0366 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0368 00bb 0001  |    |		.CONST	0x00bb,0x0001
036a 00bd 0002  |    |		.CONST	0x00bd,0x0002
036c 00c1 0003  |    |		.CONST	0x00c1,0x0003
036e 00c4 0004  |    |		.CONST	0x00c4,0x0004
0370 ; --------------------------------------------------------------------------------------
0370 ; Debug3 Subtable 0x4
0370 ; --------------------------------------------------------------------------------------
0370 000a 0002  |    |		.DBG3TAB	0x000a,0x0002
0372 00cb ffff  |    |		.CONST	0x00cb,0xffff
0374 00cd fffe  |    |		.CONST	0x00cd,0xfffe
0376 00d2 fffd  |    |		.CONST	0x00d2,0xfffd
0378 00d4 fffc  |    |		.CONST	0x00d4,0xfffc
037a 00d6 fffb  |    |		.CONST	0x00d6,0xfffb
037c 00d8 fffa  |    |		.CONST	0x00d8,0xfffa
037e 00da fff9  |    |		.CONST	0x00da,0xfff9
0380 00f0 0001  |    |		.CONST	0x00f0,0x0001
0382 00f1 fbff  |    |		.CONST	0x00f1,0xfbff
0384 00f4 fbfe  |    |		.CONST	0x00f4,0xfbfe
0386 00f5 fbfd  |    |		.CONST	0x00f5,0xfbfd
0388 00f6 0401  |    |		.CONST	0x00f6,0x0401
038a ; --------------------------------------------------------------------------------------
038a ; Debug3 Subtable 0x5
038a ; --------------------------------------------------------------------------------------
038a 0004 0009  |    |		.DBG3TAB	0x0004,0x0009
038c 012b ffff  | +  |		.CONST	0x012b,0xffff
038e 012c fffe  | ,  |		.CONST	0x012c,0xfffe
0390 012d fffd  | -  |		.CONST	0x012d,0xfffd
0392 012e fffc  | .  |		.CONST	0x012e,0xfffc
0394 0130 0001  | 0  |		.CONST	0x0130,0x0001
0396 0137 0002  | 7  |		.CONST	0x0137,0x0002
0398 013e 0003  | >  |		.CONST	0x013e,0x0003
039a 0145 0004  | E  |		.CONST	0x0145,0x0004
039c 014c 0005  | L  |		.CONST	0x014c,0x0005
039e 0153 0006  | S  |		.CONST	0x0153,0x0006
03a0 015a 0007  | Z  |		.CONST	0x015a,0x0007
03a2 0161 0008  | a  |		.CONST	0x0161,0x0008
03a4 0168 0009  | h  |		.CONST	0x0168,0x0009
03a6 ; --------------------------------------------------------------------------------------
03a6 ; Debug3 Subtable 0x6
03a6 ; --------------------------------------------------------------------------------------
03a6 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
03a8 0173 ffff  | s  |		.CONST	0x0173,0xffff
03aa 0177 fffe  | w  |		.CONST	0x0177,0xfffe
03ac 017a 0001  | z  |		.CONST	0x017a,0x0001
03ae 0181 0002  |    |		.CONST	0x0181,0x0002
03b0 0189 0003  |    |		.CONST	0x0189,0x0003
03b2 0191 0004  |    |		.CONST	0x0191,0x0004
03b4 0199 0005  |    |		.CONST	0x0199,0x0005
03b6 019b 0006  |    |		.CONST	0x019b,0x0006
03b8 ; --------------------------------------------------------------------------------------
03b8 ; Debug3 Subtable 0x7
03b8 ; --------------------------------------------------------------------------------------
03b8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
03ba 01a3 ffff  |    |		.CONST	0x01a3,0xffff
03bc 01a5 0001  |    |		.CONST	0x01a5,0x0001
03be 01ac 0002  |    |		.CONST	0x01ac,0x0002
03c0 01b3 0003  |    |		.CONST	0x01b3,0x0003
03c2 01b7 0004  |    |		.CONST	0x01b7,0x0004
03c4 ; --------------------------------------------------------------------------------------
03c4 ; Debug3 Subtable 0x8
03c4 ; --------------------------------------------------------------------------------------
03c4 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
03c6 ; --------------------------------------------------------------------------------------
03c6 ; Debug3 Subtable 0x9
03c6 ; --------------------------------------------------------------------------------------
03c6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
03c8 01db 0001  |    |		.CONST	0x01db,0x0001
03ca ; --------------------------------------------------------------------------------------
03ca ; Debug3 Subtable 0xa
03ca ; --------------------------------------------------------------------------------------
03ca 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
03cc 01eb ffff  |    |		.CONST	0x01eb,0xffff
03ce 01ed 0001  |    |		.CONST	0x01ed,0x0001
03d0 01f2 0002  |    |		.CONST	0x01f2,0x0002
03d2 01f4 0003  |    |		.CONST	0x01f4,0x0003
03d4 ; --------------------------------------------------------------------------------------
03d4 ; Debug3 Subtable 0xb
03d4 ; --------------------------------------------------------------------------------------
03d4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
03d6 0203 0001  |    |		.CONST	0x0203,0x0001
03d8 ; --------------------------------------------------------------------------------------
03d8 ; Debug3 Subtable 0xc
03d8 ; --------------------------------------------------------------------------------------
03d8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
03da 020b 0001  |    |		.CONST	0x020b,0x0001
03dc ; --------------------------------------------------------------------------------------
03dc ; Debug3 Subtable 0xd
03dc ; --------------------------------------------------------------------------------------
03dc 0002 0012  |    |		.DBG3TAB	0x0002,0x0012
03de 0213 ffff  |    |		.CONST	0x0213,0xffff
03e0 021f fffe  |    |		.CONST	0x021f,0xfffe
03e2 0226 0001  | &  |		.CONST	0x0226,0x0001
03e4 022b 0002  | +  |		.CONST	0x022b,0x0002
03e6 0235 0003  | 5  |		.CONST	0x0235,0x0003
03e8 0237 0004  | 7  |		.CONST	0x0237,0x0004
03ea 0240 0005  | @  |		.CONST	0x0240,0x0005
03ec 0244 0006  | D  |		.CONST	0x0244,0x0006
03ee 0247 0007  | G  |		.CONST	0x0247,0x0007
03f0 0249 0008  | I  |		.CONST	0x0249,0x0008
03f2 024b 0009  | K  |		.CONST	0x024b,0x0009
03f4 024e 000a  | N  |		.CONST	0x024e,0x000a
03f6 0250 000b  | P  |		.CONST	0x0250,0x000b
03f8 0256 000c  | V  |		.CONST	0x0256,0x000c
03fa 0257 000d  | W  |		.CONST	0x0257,0x000d
03fc 0259 000e  | Y  |		.CONST	0x0259,0x000e
03fe 025b 000f  | [  |		.CONST	0x025b,0x000f
0400 025d 0010  | ]  |		.CONST	0x025d,0x0010
0402 0268 0011  | h  |		.CONST	0x0268,0x0011
0404 026b 0012  | k  |		.CONST	0x026b,0x0012
0406 0000 0000  |    |		.BLANK	0000[0x1fa]