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

⟦33a90e477⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5811_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 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0158       | X  |		.CONST	0x0158								; 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 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 005d       | ]  |		.CONST	0x005d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0015       |    |		.CONST	0x0015								; Number of locals
000b			INIT_0008:
000b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0 = .DEBUG	0x000b,0x0192,0x8000,0x0000,0x0035,0x1a54,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 4802       |H   |		Short_Literal	0x2
000d e001       |    |		Load	0x0,0x1
000e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
000f 035c       | \  |		Declare_Type	Array,Constrained,Visible
0010 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0x10,0xfffe
0012 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x12,0xfffd
0014 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x14,0xfffc
0016 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x16,0xfffb
0018 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x18,0xfffa
001a 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x6 = 0x1a,0xfff9
001b 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x001b,0x01a2,0x8000,0x0000,0x0036,0xace4,0x0000,0x0009
													; Debug Table 0x1.0x0 = 0x1b,0xffff
001c 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x1c,0xfffe
001d 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x1d,0xfffd
001e 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x1e,0xfffc
001f e20d       |    |		Load	0x1,0xd								; Debug Table 0x1.0x4 = 0x1f,0xfffb
0020 0337       | 7  |		Declare_Variable	Array
0021 4801       |H   |		Short_Literal	0x1
0022 4802       |H   |		Short_Literal	0x2
0023 e002       |    |		Load	0x0,0x2
0024 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0025 0334       | 4  |		Declare_Variable	Array,With_Constraint
0026 480d       |H   |		Short_Literal	0xd
0027 4801       |H   |		Short_Literal	0x1
0028 00da       |    |		Load_Top	At_Offset_2
0029 01d6       |    |		Execute	Vector,Field_Write
002a 4800       |H   |		Short_Literal	0x0
002b 4802       |H   |		Short_Literal	0x2
002c 00da       |    |		Load_Top	At_Offset_2
002d 01d6       |    |		Execute	Vector,Field_Write
002e 00d9       |    |		Load_Top	At_Offset_1
002f 01d4       |    |		Execute	Vector,Structure_Write
0030 e20d       |    |		Load	0x1,0xd								; Debug Table 0x1.0x5 = 0x30,0xfffa
0031 0337       | 7  |		Declare_Variable	Array
0032 4801       |H   |		Short_Literal	0x1
0033 4802       |H   |		Short_Literal	0x2
0034 e002       |    |		Load	0x0,0x2
0035 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0036 0334       | 4  |		Declare_Variable	Array,With_Constraint
0037 48ff       |H   |		Short_Literal	0xff
0038 4801       |H   |		Short_Literal	0x1
0039 00da       |    |		Load_Top	At_Offset_2
003a 01d6       |    |		Execute	Vector,Field_Write
003b 48ff       |H   |		Short_Literal	0xff
003c 4802       |H   |		Short_Literal	0x2
003d 00da       |    |		Load_Top	At_Offset_2
003e 01d6       |    |		Execute	Vector,Field_Write
003f 00d9       |    |		Load_Top	At_Offset_1
0040 01d4       |    |		Execute	Vector,Structure_Write
0041 e20d       |    |		Load	0x1,0xd								; Debug Table 0x1.0x6 = 0x41,0xfff9
0042 0337       | 7  |		Declare_Variable	Array
0043 4801       |H   |		Short_Literal	0x1
0044 4802       |H   |		Short_Literal	0x2
0045 e002       |    |		Load	0x0,0x2
0046 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0047 0334       | 4  |		Declare_Variable	Array,With_Constraint
0048 4800       |H   |		Short_Literal	0x0
0049 4801       |H   |		Short_Literal	0x1
004a 00da       |    |		Load_Top	At_Offset_2
004b 01d6       |    |		Execute	Vector,Field_Write
004c 4800       |H   |		Short_Literal	0x0
004d 4802       |H   |		Short_Literal	0x2
004e 00da       |    |		Load_Top	At_Offset_2
004f 01d6       |    |		Execute	Vector,Field_Write
0050 00d9       |    |		Load_Top	At_Offset_1
0051 01d4       |    |		Execute	Vector,Structure_Write
0052 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x7 = 0x52,0xfff8
0053 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x8 = 0x53,0xfff7
0054 00c7       |    |		Action	Elaborate_Subprogram
0055 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x9 = 0x55,0xfff6
0056 00c7       |    |		Action	Elaborate_Subprogram
0057 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0xa = 0x57,0xfff5
0058 00c7       |    |		Action	Elaborate_Subprogram
0059 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0xb = 0x59,0xfff4
005a 00c7       |    |		Action	Elaborate_Subprogram
005b 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0xc = 0x5b,0xfff3
005c 00c7       |    |		Action	Elaborate_Subprogram
005d			BODY_0008:
005d 00bc       |    |		Action	Signal_Activated
005e 00bb       |    |		Action	Signal_Completion
005f 0000       |    |		.XXX[0x1]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063       | c  |		.CONST	0x0063								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0001       |    |		.CONST	0x0001								; Number of locals
0063			BODY_0060:
0063			INIT_0060:
0063 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x0063,0x01be,0x0002,0x0000,0x0035,0x1a54,0x0000,0x0010
													; Debug Table 0x2.0x0 = 0x63,0x1
0064 e003       |    |		Load	0x0,0x3
0065 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0066 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0067 0000       |    |		.XXX[0x1]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0071       | q  |		.CONST	0x0071								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0002       |    |		.CONST	0x0002								; Number of locals
006b			INIT_0068:
006b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x006b,0x01c2,0x0002,0x0000,0x0035,0x1a54,0x0000,0x001b
													; Debug Table 0x3.0x0 = 0x6b,0xffff
006c 01da       |    |		Execute	Vector,Bounds
006d e001       |    |		Load	0x0,0x1
006e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
006f 035b       | [  |		Declare_Type	Array,Constrained
0070 0337       | 7  |		Declare_Variable	Array
0071			BODY_0068:
0071 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x1 = 0x71,0x1
0072 6804       |h   |		Jump_Zero	0x77
0073 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x2 = 0x73,0x2
0074 e003       |    |		Load	0x0,0x3
0075 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0076 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0077 00cf       |    |		Action	Mark_Auxiliary
0078 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x3 = 0x78,0x3
0079 01da       |    |		Execute	Vector,Bounds
007a 0264       | d  |		Execute	Discrete,Below_Bound
007b 7020       |p   |		Jump_Nonzero	0x9c
007c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x4 = 0x7c,0x4
007d e5ff       |    |		Load	0x2,-0x1
007e 01d7       |    |		Execute	Vector,Field_Read
007f 0f0d       |    |		Execute_Immediate	Equal,0xd
0080 6810       |h   |		Jump_Zero	0x91
0081 00d8       |    |		Load_Top	At_Offset_0
0082 e5ff       |    |		Load	0x2,-0x1
0083 01dc       |    |		Execute	Vector,Last
0084 027f       |    |		Execute	Discrete,Equal
0085 7007       |p   |		Jump_Nonzero	0x8d
0086 00d8       |    |		Load_Top	At_Offset_0
0087 0a01       |    |		Execute_Immediate	Plus,0x1
0088 0248       | H  |		Execute	Discrete,Check_In_Integer
0089 e5ff       |    |		Load	0x2,-0x1
008a 01d7       |    |		Execute	Vector,Field_Read
008b 0e0a       |    |		Execute_Immediate	Not_Equal,0xa
008c 7801       |x   |		Jump	0x8e
008d 4801       |H   |		Short_Literal	0x1
008e 6802       |h   |		Jump_Zero	0x91
008f 60c4       |`   |		Indirect_Literal	Discrete,0x154,{0x00000000, 0x351a5401}		; Debug Table 0x3.0x5 = 0x8f,0x5
0090 0257       | W  |		Execute	Discrete,Raise
0091 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x6 = 0x91,0x6
0092 e5ff       |    |		Load	0x2,-0x1
0093 01d7       |    |		Execute	Vector,Field_Read
0094 e002       |    |		Load	0x0,0x2
0095 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0096 025b       | [  |		Execute	Discrete,Check_In_Type
0097 00d9       |    |		Load_Top	At_Offset_1
0098 e402       |    |		Load	0x2,0x2
0099 01d6       |    |		Execute	Vector,Field_Write
009a 00c8       |    |		Action	Pop_Auxiliary_Range
009b 37e0       |7   |		Loop_Decreasing	0x7c
009c 00ce       |    |		Action	Pop_Auxiliary
009d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x7 = 0x9d,0x7
009e e002       |    |		Load	0x0,0x2
009f 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00a0 01c6       |    |		Execute	Vector,Convert_To_Formal
00a1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00a2 0000 0000  |    |		.BLANK	0000[0x6]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab       |    |		.CONST	0x00ab								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0001       |    |		.CONST	0x0001								; Number of locals
00ab			BODY_00a8:
00ab			INIT_00a8:
00ab 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x4 = .DEBUG	0x00ab,0x01d4,0x0001,0x0000,0x0035,0x1a54,0x0000,0x002a
00ac 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x0 = 0xac,0x1
00ad 01da       |    |		Execute	Vector,Bounds
00ae 0264       | d  |		Execute	Discrete,Below_Bound
00af 7020       |p   |		Jump_Nonzero	0xd0
00b0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x1 = 0xb0,0x2
00b1 e5ff       |    |		Load	0x2,-0x1
00b2 01d7       |    |		Execute	Vector,Field_Read
00b3 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
00b4 7003       |p   |		Jump_Nonzero	0xb8
00b5 0bff       |    |		Execute_Immediate	Case_Compare,0xff
00b6 7014       |p   |		Jump_Nonzero	0xcb
00b7 7815       |x   |		Jump	0xcd								; Debug Table 0x4.0x2 = 0xb7,0x6
00b8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x3 = 0xb8,0x3
00b9 7013       |p   |		Jump_Nonzero	0xcd
00ba 00d9       |    |		Load_Top	At_Offset_1
00bb e5ff       |    |		Load	0x2,-0x1
00bc 01dc       |    |		Execute	Vector,Last
00bd 027f       |    |		Execute	Discrete,Equal
00be 7008       |p   |		Jump_Nonzero	0xc7
00bf 00d9       |    |		Load_Top	At_Offset_1
00c0 0a01       |    |		Execute_Immediate	Plus,0x1
00c1 0248       | H  |		Execute	Discrete,Check_In_Integer
00c2 e5ff       |    |		Load	0x2,-0x1
00c3 01d7       |    |		Execute	Vector,Field_Read
00c4 0f0a       |    |		Execute_Immediate	Equal,0xa
00c5 0f00       |    |		Execute_Immediate	Equal,0x0
00c6 7801       |x   |		Jump	0xc8
00c7 4801       |H   |		Short_Literal	0x1
00c8 6804       |h   |		Jump_Zero	0xcd
00c9 608a       |`   |		Indirect_Literal	Discrete,0x154,{0x00000000, 0x351a5401}		; Debug Table 0x4.0x4 = 0xc9,0x4
00ca 0257       | W  |		Execute	Discrete,Raise
00cb 6088       |`   |		Indirect_Literal	Discrete,0x154,{0x00000000, 0x351a5401}		; Debug Table 0x4.0x5 = 0xcb,0x5
00cc 0257       | W  |		Execute	Discrete,Raise
00cd 00d1       |    |		Pop_Control	Pop_Count_1
00ce 00c8       |    |		Action	Pop_Auxiliary_Range
00cf 37e0       |7   |		Loop_Decreasing	0xb0
00d0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00d1 0000 0000  |    |		.BLANK	0000[0x7]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5 = .DEBUG	0x00db,0x01e2,0x0001,0x0000,0x0035,0x1a54,0x0000,0x0038
													; Debug Table 0x5.0x0 = 0xdb,0x1
00dc 7024       |p$  |		Jump_Nonzero	0x101
00dd 00cf       |    |		Action	Mark_Auxiliary
00de 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x1 = 0xde,0x2
00df 01dc       |    |		Execute	Vector,Last
00e0 e5fe       |    |		Load	0x2,-0x2
00e1 0263       | c  |		Execute	Discrete,Above_Bound
00e2 701d       |p   |		Jump_Nonzero	0x100
00e3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x2 = 0xe3,0x3
00e4 e5ff       |    |		Load	0x2,-0x1
00e5 01d7       |    |		Execute	Vector,Field_Read
00e6 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
00e7 7001       |p   |		Jump_Nonzero	0xe9
00e8 7814       |x   |		Jump	0xfd								; Debug Table 0x5.0x3 = 0xe8,0x8
00e9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x4 = 0xe9,0x4
00ea e5ff       |    |		Load	0x2,-0x1
00eb 01dc       |    |		Execute	Vector,Last
00ec 027f       |    |		Execute	Discrete,Equal
00ed 7007       |p   |		Jump_Nonzero	0xf5
00ee 00d9       |    |		Load_Top	At_Offset_1
00ef 0a01       |    |		Execute_Immediate	Plus,0x1
00f0 0248       | H  |		Execute	Discrete,Check_In_Integer
00f1 e5ff       |    |		Load	0x2,-0x1
00f2 01d7       |    |		Execute	Vector,Field_Read
00f3 0e0a       |    |		Execute_Immediate	Not_Equal,0xa
00f4 6808       |h   |		Jump_Zero	0xfd
00f5 e213       |    |		Load	0x1,0x13							; Debug Table 0x5.0x5 = 0xf5,0x5
00f6 e5fb       |    |		Load	0x2,-0x5
00f7 01d4       |    |		Execute	Vector,Structure_Write
00f8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x6 = 0xf8,0x6
00f9 e5fe       |    |		Load	0x2,-0x2
00fa 0272       | r  |		Execute	Discrete,Minus
00fb c5fc       |    |		Store	0x2,-0x4
00fc 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x5.0x7 = 0xfc,0x7
00fd 00d1       |    |		Pop_Control	Pop_Count_1
00fe 00c8       |    |		Action	Pop_Auxiliary_Range
00ff 3fe3       |?   |		Loop_Increasing	0xe3
0100 00ce       |    |		Action	Pop_Auxiliary
0101 e215       |    |		Load	0x1,0x15							; Debug Table 0x5.0x8 = 0x101,0x9
0102 e5fb       |    |		Load	0x2,-0x5
0103 01d4       |    |		Execute	Vector,Structure_Write
0104 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x9 = 0x104,0xa
0105 01dc       |    |		Execute	Vector,Last
0106 e5fe       |    |		Load	0x2,-0x2
0107 0272       | r  |		Execute	Discrete,Minus
0108 0248       | H  |		Execute	Discrete,Check_In_Integer
0109 0a01       |    |		Execute_Immediate	Plus,0x1
010a c5fc       |    |		Store	0x2,-0x4
010b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
010c 0000 0000  |    |		.BLANK	0000[0x4]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113       |    |		.CONST	0x0113								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0001       |    |		.CONST	0x0001								; Number of locals
0113			BODY_0110:
0113			INIT_0110:
0113 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x6 = .DEBUG	0x0113,0x01f8,0x0001,0x0000,0x0035,0x1a54,0x0000,0x0050
0114 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x0 = 0x114,0x1
0115 01dc       |    |		Execute	Vector,Last
0116 e5fe       |    |		Load	0x2,-0x2
0117 0263       | c  |		Execute	Discrete,Above_Bound
0118 702c       |p,  |		Jump_Nonzero	0x145
0119 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x1 = 0x119,0x2
011a e5ff       |    |		Load	0x2,-0x1
011b 01d7       |    |		Execute	Vector,Field_Read
011c 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
011d 7003       |p   |		Jump_Nonzero	0x121
011e 0bff       |    |		Execute_Immediate	Case_Compare,0xff
011f 701a       |p   |		Jump_Nonzero	0x13a
0120 7821       |x!  |		Jump	0x142								; Debug Table 0x6.0x2 = 0x120,0xa
0121 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0x3 = 0x121,0x3
0122 701f       |p   |		Jump_Nonzero	0x142
0123 00d9       |    |		Load_Top	At_Offset_1
0124 e5ff       |    |		Load	0x2,-0x1
0125 01dc       |    |		Execute	Vector,Last
0126 027f       |    |		Execute	Discrete,Equal
0127 7008       |p   |		Jump_Nonzero	0x130
0128 00d9       |    |		Load_Top	At_Offset_1
0129 0a01       |    |		Execute_Immediate	Plus,0x1
012a 0248       | H  |		Execute	Discrete,Check_In_Integer
012b e5ff       |    |		Load	0x2,-0x1
012c 01d7       |    |		Execute	Vector,Field_Read
012d 0f0a       |    |		Execute_Immediate	Equal,0xa
012e 0f00       |    |		Execute_Immediate	Equal,0x0
012f 7801       |x   |		Jump	0x131
0130 4801       |H   |		Short_Literal	0x1
0131 6810       |h   |		Jump_Zero	0x142
0132 e213       |    |		Load	0x1,0x13							; Debug Table 0x6.0x4 = 0x132,0x4
0133 e5fb       |    |		Load	0x2,-0x5
0134 01d4       |    |		Execute	Vector,Structure_Write
0135 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x5 = 0x135,0x5
0136 e5fe       |    |		Load	0x2,-0x2
0137 0272       | r  |		Execute	Discrete,Minus
0138 c5fc       |    |		Store	0x2,-0x4
0139 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x6.0x6 = 0x139,0x6
013a e214       |    |		Load	0x1,0x14							; Debug Table 0x6.0x7 = 0x13a,0x7
013b e5fb       |    |		Load	0x2,-0x5
013c 01d4       |    |		Execute	Vector,Structure_Write
013d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x8 = 0x13d,0x8
013e e5fe       |    |		Load	0x2,-0x2
013f 0272       | r  |		Execute	Discrete,Minus
0140 c5fc       |    |		Store	0x2,-0x4
0141 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x6.0x9 = 0x141,0x9
0142 00d1       |    |		Pop_Control	Pop_Count_1
0143 00c8       |    |		Action	Pop_Auxiliary_Range
0144 3fd4       |?   |		Loop_Increasing	0x119
0145 00ce       |    |		Action	Pop_Auxiliary
0146 e215       |    |		Load	0x1,0x15							; Debug Table 0x6.0xa = 0x146,0xb
0147 e5fb       |    |		Load	0x2,-0x5
0148 01d4       |    |		Execute	Vector,Structure_Write
0149 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xb = 0x149,0xc
014a 01dc       |    |		Execute	Vector,Last
014b e5fe       |    |		Load	0x2,-0x2
014c 0272       | r  |		Execute	Discrete,Minus
014d 0248       | H  |		Execute	Discrete,Check_In_Integer
014e 0a01       |    |		Execute_Immediate	Plus,0x1
014f c5fc       |    |		Store	0x2,-0x4
0150 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0151 0000 0000  |    |		.XXX[0x3]
0153 0000       |    |
0154 0000 0000  |    |		.LITERAL	{0x00000000, 0x351a5401}
0158 ; --------------------------------------------------------------------------------------
0158 ; Debug Table
0158 ; --------------------------------------------------------------------------------------
0158 0003 0007  |    |		.CONST	0x0003,0x0007
015a 000b 0192  |    |		.DEBUG	0x000b,0x0192,0x8000,0x0000,0x0035,0x1a54,0x0000,0x0005
0162 001b 01a2  |    |		.DEBUG	0x001b,0x01a2,0x8000,0x0000,0x0036,0xace4,0x0000,0x0009
016a 0063 01be  | c  |		.DEBUG	0x0063,0x01be,0x0002,0x0000,0x0035,0x1a54,0x0000,0x0010
0172 006b 01c2  | k  |		.DEBUG	0x006b,0x01c2,0x0002,0x0000,0x0035,0x1a54,0x0000,0x001b
017a 00ab 01d4  |    |		.DEBUG	0x00ab,0x01d4,0x0001,0x0000,0x0035,0x1a54,0x0000,0x002a
0182 00db 01e2  |    |		.DEBUG	0x00db,0x01e2,0x0001,0x0000,0x0035,0x1a54,0x0000,0x0038
018a 0113 01f8  |    |		.DEBUG	0x0113,0x01f8,0x0001,0x0000,0x0035,0x1a54,0x0000,0x0050
0192 ; --------------------------------------------------------------------------------------
0192 ; Debug3 Subtable 0x0
0192 ; --------------------------------------------------------------------------------------
0192 0007 0000  |    |		.DBG3TAB	0x0007,0x0000
0194 000b ffff  |    |		.CONST	0x000b,0xffff
0196 0010 fffe  |    |		.CONST	0x0010,0xfffe
0198 0012 fffd  |    |		.CONST	0x0012,0xfffd
019a 0014 fffc  |    |		.CONST	0x0014,0xfffc
019c 0016 fffb  |    |		.CONST	0x0016,0xfffb
019e 0018 fffa  |    |		.CONST	0x0018,0xfffa
01a0 001a fff9  |    |		.CONST	0x001a,0xfff9
01a2 ; --------------------------------------------------------------------------------------
01a2 ; Debug3 Subtable 0x1
01a2 ; --------------------------------------------------------------------------------------
01a2 000d 0000  |    |		.DBG3TAB	0x000d,0x0000
01a4 001b ffff  |    |		.CONST	0x001b,0xffff
01a6 001c fffe  |    |		.CONST	0x001c,0xfffe
01a8 001d fffd  |    |		.CONST	0x001d,0xfffd
01aa 001e fffc  |    |		.CONST	0x001e,0xfffc
01ac 001f fffb  |    |		.CONST	0x001f,0xfffb
01ae 0030 fffa  | 0  |		.CONST	0x0030,0xfffa
01b0 0041 fff9  | A  |		.CONST	0x0041,0xfff9
01b2 0052 fff8  | R  |		.CONST	0x0052,0xfff8
01b4 0053 fff7  | S  |		.CONST	0x0053,0xfff7
01b6 0055 fff6  | U  |		.CONST	0x0055,0xfff6
01b8 0057 fff5  | W  |		.CONST	0x0057,0xfff5
01ba 0059 fff4  | Y  |		.CONST	0x0059,0xfff4
01bc 005b fff3  | [  |		.CONST	0x005b,0xfff3
01be ; --------------------------------------------------------------------------------------
01be ; Debug3 Subtable 0x2
01be ; --------------------------------------------------------------------------------------
01be 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
01c0 0063 0001  | c  |		.CONST	0x0063,0x0001
01c2 ; --------------------------------------------------------------------------------------
01c2 ; Debug3 Subtable 0x3
01c2 ; --------------------------------------------------------------------------------------
01c2 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
01c4 006b ffff  | k  |		.CONST	0x006b,0xffff
01c6 0071 0001  | q  |		.CONST	0x0071,0x0001
01c8 0073 0002  | s  |		.CONST	0x0073,0x0002
01ca 0078 0003  | x  |		.CONST	0x0078,0x0003
01cc 007c 0004  | |  |		.CONST	0x007c,0x0004
01ce 008f 0005  |    |		.CONST	0x008f,0x0005
01d0 0091 0006  |    |		.CONST	0x0091,0x0006
01d2 009d 0007  |    |		.CONST	0x009d,0x0007
01d4 ; --------------------------------------------------------------------------------------
01d4 ; Debug3 Subtable 0x4
01d4 ; --------------------------------------------------------------------------------------
01d4 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
01d6 00ac 0001  |    |		.CONST	0x00ac,0x0001
01d8 00b0 0002  |    |		.CONST	0x00b0,0x0002
01da 00b7 0006  |    |		.CONST	0x00b7,0x0006
01dc 00b8 0003  |    |		.CONST	0x00b8,0x0003
01de 00c9 0004  |    |		.CONST	0x00c9,0x0004
01e0 00cb 0005  |    |		.CONST	0x00cb,0x0005
01e2 ; --------------------------------------------------------------------------------------
01e2 ; Debug3 Subtable 0x5
01e2 ; --------------------------------------------------------------------------------------
01e2 0000 000a  |    |		.DBG3TAB	0x0000,0x000a
01e4 00db 0001  |    |		.CONST	0x00db,0x0001
01e6 00de 0002  |    |		.CONST	0x00de,0x0002
01e8 00e3 0003  |    |		.CONST	0x00e3,0x0003
01ea 00e8 0008  |    |		.CONST	0x00e8,0x0008
01ec 00e9 0004  |    |		.CONST	0x00e9,0x0004
01ee 00f5 0005  |    |		.CONST	0x00f5,0x0005
01f0 00f8 0006  |    |		.CONST	0x00f8,0x0006
01f2 00fc 0007  |    |		.CONST	0x00fc,0x0007
01f4 0101 0009  |    |		.CONST	0x0101,0x0009
01f6 0104 000a  |    |		.CONST	0x0104,0x000a
01f8 ; --------------------------------------------------------------------------------------
01f8 ; Debug3 Subtable 0x6
01f8 ; --------------------------------------------------------------------------------------
01f8 0000 000c  |    |		.DBG3TAB	0x0000,0x000c
01fa 0114 0001  |    |		.CONST	0x0114,0x0001
01fc 0119 0002  |    |		.CONST	0x0119,0x0002
01fe 0120 000a  |    |		.CONST	0x0120,0x000a
0200 0121 0003  | !  |		.CONST	0x0121,0x0003
0202 0132 0004  | 2  |		.CONST	0x0132,0x0004
0204 0135 0005  | 5  |		.CONST	0x0135,0x0005
0206 0139 0006  | 9  |		.CONST	0x0139,0x0006
0208 013a 0007  | :  |		.CONST	0x013a,0x0007
020a 013d 0008  | =  |		.CONST	0x013d,0x0008
020c 0141 0009  | A  |		.CONST	0x0141,0x0009
020e 0146 000b  | F  |		.CONST	0x0146,0x000b
0210 0149 000c  | I  |		.CONST	0x0149,0x000c
0212 0000 0000  |    |		.BLANK	0000[0x1ee]