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

⟦33a7cfc28⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0190       |    |		.CONST	0x0190								; 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 0042       | B  |		.CONST	0x0042								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0017       |    |		.CONST	0x0017								; Number of locals
000b			INIT_0008:
000b 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x0 = .DEBUG	0x000b,0x01e2,0x8000,0x0000,0x0037,0xb184,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0266       | f  |		Execute	Discrete,Bounds
000d 00e3       |    |		Load_Encached	Natural_Cache
000e 02a0       |    |		Declare_Subprogram	Null_Subprogram
000f 4801       |H   |		Short_Literal	0x1
0010 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
0011 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0x11,0xfffe
0013 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0x2 = 0x13,0xfffd
0014 4800       |H   |		Short_Literal	0x0
0015 00db       |    |		Load_Top	At_Offset_3
0016 0333       | 3  |		Declare_Variable	Array,Visible,With_Constraint
0017 4801       |H   |		Short_Literal	0x1
0018 4800       |H   |		Short_Literal	0x0
0019 e20d       |    |		Load	0x1,0xd
001a 035b       | [  |		Declare_Type	Array,Constrained
001b 0337       | 7  |		Declare_Variable	Array
001c 00d9       |    |		Load_Top	At_Offset_1
001d 01d4       |    |		Execute	Vector,Structure_Write
001e 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x0.0x3 = 0x1e,0xfffc
001f 00e2       |    |		Load_Encached	Integer_Cache
0020 00e4       |    |		Load_Encached	Positive_Cache
0021 00e3       |    |		Load_Encached	Natural_Cache
0022 02a0       |    |		Declare_Subprogram	Null_Subprogram
0023 4804       |H   |		Short_Literal	0x4
0024 032e       | .  |		Declare_Type	Record,Defined,Visible
0025 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x25,0xfffb
0027 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x27,0xfffa
0029 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x29,0xfff9
002b 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x2b,0xfff8
002d 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x2d,0xfff7
002f 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x2f,0xfff6
0031 00bf       |    |		Action	Accept_Activation
0032 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1 = .DEBUG	0x0032,0x01f8,0x8000,0x0000,0x0037,0xb2c4,0x0000,0x0003
													; Debug Table 0x1.0x0 = 0x32,0xffff
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 029d 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call			; Debug Table 0x1.0x1 = 0x34,0xfffe
0036 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x2 = 0x36,0xfffd
0037 00c7       |    |		Action	Elaborate_Subprogram
0038 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x3 = 0x38,0xfffc
0039 00c7       |    |		Action	Elaborate_Subprogram
003a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x4 = 0x3a,0xfffb
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x5 = 0x3c,0xfffa
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x6 = 0x3e,0xfff9
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x7 = 0x40,0xfff8
0041 00c7       |    |		Action	Elaborate_Subprogram
0042			BODY_0008:
0042 00bc       |    |		Action	Signal_Activated
0043 00bb       |    |		Action	Signal_Completion
0044 0000 0000  |    |		.BLANK	0000[0x4]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004d       | M  |		.CONST	0x004d								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 0002       |    |		.CONST	0x0002								; Number of locals
004b			INIT_0048:
004b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x2 = .DEBUG	0x004b,0x020a,0x0002,0x0000,0x0037,0xb184,0x0000,0x000f
													; Debug Table 0x2.0x0 = 0x4b,0xffff
004c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
004d			BODY_0048:
004d 00cf       |    |		Action	Mark_Auxiliary
004e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x1 = 0x4e,0x1
004f 01d9       |    |		Execute	Vector,Reverse_Bounds
0050 0263       | c  |		Execute	Discrete,Above_Bound
0051 7008       |p   |		Jump_Nonzero	0x5a
0052 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x2 = 0x52,0x2
0053 00d9       |    |		Load_Top	At_Offset_1
0054 e5ff       |    |		Load	0x2,-0x1
0055 01d7       |    |		Execute	Vector,Field_Read
0056 0273       | s  |		Execute	Discrete,Plus
0057 c402       |    |		Store	0x2,0x2
0058 00c8       |    |		Action	Pop_Auxiliary_Range
0059 3ff8       |?   |		Loop_Increasing	0x52
005a 00ce       |    |		Action	Pop_Auxiliary
005b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x3 = 0x5b,0x3
005c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
005d 0000 0000  |    |		.XXX[0x3]
005f 0000       |    |
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0072       | r  |		.CONST	0x0072								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0002       |    |		.CONST	0x0002								; Number of locals
0063			INIT_0060:
0063 e210       |    |		Load	0x1,0x10							; Debug Table 0x3 = .DEBUG	0x0063,0x0214,0x0002,0x0000,0x0037,0xb184,0x0000,0x003e
													; Debug Table 0x3.0x0 = 0x63,0xffff
0064 0322       | "  |		Declare_Variable	Record
0065 00db       |    |		Load_Top	At_Offset_3
0066 00d9       |    |		Load_Top	At_Offset_1
0067 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0068 e5fe       |    |		Load	0x2,-0x2
0069 00d9       |    |		Load_Top	At_Offset_1
006a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
006b e5fd       |    |		Load	0x2,-0x3
006c 01dd       |    |		Execute	Vector,First
006d 00d9       |    |		Load_Top	At_Offset_1
006e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
006f 4800       |H   |		Short_Literal	0x0
0070 00d9       |    |		Load_Top	At_Offset_1
0071 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0072			BODY_0060:
0072 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x1 = 0x72,0x1
0073 e20f       |    |		Load	0x1,0xf
0074 01df       |    |		Execute	Vector,Equal
0075 680c       |h   |		Jump_Zero	0x82
0076 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x2 = 0x76,0x2
0077 e5ff       |    |		Load	0x2,-0x1
0078 027b       | {  |		Execute	Discrete,Greater_Equal
0079 6812       |h   |		Jump_Zero	0x8c
007a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x3 = 0x7a,0x3
007b e5ff       |    |		Load	0x2,-0x1
007c 0272       | r  |		Execute	Discrete,Minus
007d 0248       | H  |		Execute	Discrete,Check_In_Integer
007e 0a01       |    |		Execute_Immediate	Plus,0x1
007f 00d9       |    |		Load_Top	At_Offset_1
0080 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0081 780a       |x   |		Jump	0x8c
0082 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x4 = 0x82,0x4
0083 01dd       |    |		Execute	Vector,First
0084 e5fd       |    |		Load	0x2,-0x3
0085 01d7       |    |		Execute	Vector,Field_Read
0086 00d9       |    |		Load_Top	At_Offset_1
0087 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0088 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x5 = 0x88,0x5
0089 e5fd       |    |		Load	0x2,-0x3
008a 8217       |    |		Call	0x1,0x17
008b 00d1       |    |		Pop_Control	Pop_Count_1
008c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x6 = 0x8c,0x6
008d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
008e 0000 0000  |    |		.XXX[0x2]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x0093,0x0224,0x0002,0x0000,0x0037,0xb184,0x0000,0x004d
													; Debug Table 0x4.0x0 = 0x93,0x1
0094 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0095 00db       |    |		Load_Top	At_Offset_3
0096 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0097 027d       | }  |		Execute	Discrete,Greater
0098 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0099 0000 0000  |    |		.BLANK	0000[0x7]
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00a3,0x0228,0x0002,0x0000,0x0037,0xb184,0x0000,0x0056
													; Debug Table 0x5.0x0 = 0xa3,0x1
00a4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a6 0000 0000  |    |		.XXX[0x2]
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 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6 = .DEBUG	0x00ab,0x022c,0x0001,0x0000,0x0037,0xb184,0x0000,0x005f
													; Debug Table 0x6.0x0 = 0xab,0x1
00ac 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ad 0a01       |    |		Execute_Immediate	Plus,0x1
00ae e5fe       |    |		Load	0x2,-0x2
00af 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00b0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1 = 0xb0,0x2
00b1 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00b2 0aff       |    |		Execute_Immediate	Plus,-0x1
00b3 e5fe       |    |		Load	0x2,-0x2
00b4 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
00b5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x2 = 0xb5,0x3
00b6 00db       |    |		Load_Top	At_Offset_3
00b7 8217       |    |		Call	0x1,0x17
00b8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00b9 0000 0000  |    |		.BLANK	0000[0x7]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c7       |    |		.CONST	0x00c7								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0002       |    |		.CONST	0x0002								; Number of locals
00c3			INIT_00c0:
00c3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7 = .DEBUG	0x00c3,0x0234,0x0001,0x0000,0x0037,0xb184,0x0000,0x006c
													; Debug Table 0x7.0x0 = 0xc3,0xffff
00c4 01db       |    |		Execute	Vector,Length
00c5 00e3       |    |		Load_Encached	Natural_Cache
00c6 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
00c7			BODY_00c0:
00c7 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x1 = 0xc7,0x1
00c8 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00c9 00d9       |    |		Load_Top	At_Offset_1
00ca 027c       | |  |		Execute	Discrete,Less
00cb 6814       |h   |		Jump_Zero	0xe0
00cc 00cf       |    |		Action	Mark_Auxiliary
00cd e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x2 = 0xcd,0x2
00ce 01d9       |    |		Execute	Vector,Reverse_Bounds
00cf 0263       | c  |		Execute	Discrete,Above_Bound
00d0 700d       |p   |		Jump_Nonzero	0xde
00d1 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x3 = 0xd1,0x3
00d2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00d3 e5ff       |    |		Load	0x2,-0x1
00d4 01d7       |    |		Execute	Vector,Field_Read
00d5 00d9       |    |		Load_Top	At_Offset_1
00d6 e5fd       |    |		Load	0x2,-0x3
00d7 01d6       |    |		Execute	Vector,Field_Write
00d8 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x4 = 0xd8,0x4
00d9 e5fe       |    |		Load	0x2,-0x2
00da 8214       |    |		Call	0x1,0x14
00db 00d1       |    |		Pop_Control	Pop_Count_1
00dc 00c8       |    |		Action	Pop_Auxiliary_Range
00dd 3ff3       |?   |		Loop_Increasing	0xd1
00de 00ce       |    |		Action	Pop_Auxiliary
00df 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00e0 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x5 = 0xe0,0x5
00e1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e2 e5fc       |    |		Load	0x2,-0x4
00e3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e4 00da       |    |		Load_Top	At_Offset_2
00e5 0273       | s  |		Execute	Discrete,Plus
00e6 0aff       |    |		Execute_Immediate	Plus,-0x1
00e7 0248       | H  |		Execute	Discrete,Check_In_Integer
00e8 e5ff       |    |		Load	0x2,-0x1
00e9 01cf       |    |		Execute	Vector,Slice_Read
00ea e5fd       |    |		Load	0x2,-0x3
00eb 01d4       |    |		Execute	Vector,Structure_Write
00ec e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x6 = 0xec,0x6
00ed 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ee 00d9       |    |		Load_Top	At_Offset_1
00ef 0273       | s  |		Execute	Discrete,Plus
00f0 e5fc       |    |		Load	0x2,-0x4
00f1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f2 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x7 = 0xf2,0x7
00f3 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00f4 00d9       |    |		Load_Top	At_Offset_1
00f5 0272       | r  |		Execute	Discrete,Minus
00f6 e5fc       |    |		Load	0x2,-0x4
00f7 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
00f8 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x8 = 0xf8,0x8
00f9 e5fe       |    |		Load	0x2,-0x2
00fa 8217       |    |		Call	0x1,0x17
00fb 00d1       |    |		Pop_Control	Pop_Count_1
00fc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00fd 0000 0000  |    |		.XXX[0x3]
00ff 0000       |    |
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0107       |    |		.CONST	0x0107								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0002       |    |		.CONST	0x0002								; Number of locals
0103			INIT_0100:
0103 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x0103,0x0248,0x0001,0x0000,0x0037,0xb184,0x0000,0x0085
													; Debug Table 0x8.0x0 = 0x103,0xffff
0104 01db       |    |		Execute	Vector,Length
0105 00e3       |    |		Load_Encached	Natural_Cache
0106 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0107			BODY_0100:
0107 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x8.0x1 = 0x107,0x1
0108 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0109 00d9       |    |		Load_Top	At_Offset_1
010a 027c       | |  |		Execute	Discrete,Less
010b 6814       |h   |		Jump_Zero	0x120
010c 00cf       |    |		Action	Mark_Auxiliary
010d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x2 = 0x10d,0x2
010e 01d9       |    |		Execute	Vector,Reverse_Bounds
010f 0263       | c  |		Execute	Discrete,Above_Bound
0110 700d       |p   |		Jump_Nonzero	0x11e
0111 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x3 = 0x111,0x3
0112 e5ff       |    |		Load	0x2,-0x1
0113 01d7       |    |		Execute	Vector,Field_Read
0114 e5fc       |    |		Load	0x2,-0x4
0115 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0116 e5fd       |    |		Load	0x2,-0x3
0117 01d6       |    |		Execute	Vector,Field_Write
0118 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x8.0x4 = 0x118,0x4
0119 e5fe       |    |		Load	0x2,-0x2
011a 8214       |    |		Call	0x1,0x14
011b 00d1       |    |		Pop_Control	Pop_Count_1
011c 00c8       |    |		Action	Pop_Auxiliary_Range
011d 3ff3       |?   |		Loop_Increasing	0x111
011e 00ce       |    |		Action	Pop_Auxiliary
011f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0120 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x5 = 0x120,0x5
0121 e5fc       |    |		Load	0x2,-0x4
0122 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0123 e5fc       |    |		Load	0x2,-0x4
0124 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0125 00db       |    |		Load_Top	At_Offset_3
0126 0273       | s  |		Execute	Discrete,Plus
0127 0aff       |    |		Execute_Immediate	Plus,-0x1
0128 0248       | H  |		Execute	Discrete,Check_In_Integer
0129 e5fd       |    |		Load	0x2,-0x3
012a 01ce       |    |		Execute	Vector,Slice_Write
012b e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x8.0x6 = 0x12b,0x6
012c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
012d 00d9       |    |		Load_Top	At_Offset_1
012e 0273       | s  |		Execute	Discrete,Plus
012f e5fc       |    |		Load	0x2,-0x4
0130 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0131 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x8.0x7 = 0x131,0x7
0132 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0133 00d9       |    |		Load_Top	At_Offset_1
0134 0272       | r  |		Execute	Discrete,Minus
0135 e5fc       |    |		Load	0x2,-0x4
0136 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0137 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x8.0x8 = 0x137,0x8
0138 e5fe       |    |		Load	0x2,-0x2
0139 8217       |    |		Call	0x1,0x17
013a 00d1       |    |		Pop_Control	Pop_Count_1
013b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
013c 0000 0000  |    |		.BLANK	0000[0x4]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x9 = .DEBUG	0x0143,0x025c,0x0001,0x0000,0x0037,0xb2c4,0x0000,0x002a
0144 7835       |x5  |		Jump	0x17a
0145 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x0 = 0x145,0x2
0146 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0147 0a02       |    |		Execute_Immediate	Plus,0x2
0148 e5fe       |    |		Load	0x2,-0x2
0149 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
014a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x1 = 0x14a,0x3
014b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
014c e5ff       |    |		Load	0x2,-0x1
014d 01dc       |    |		Execute	Vector,Last
014e 0a02       |    |		Execute_Immediate	Plus,0x2
014f 027f       |    |		Execute	Discrete,Equal
0150 6806       |h   |		Jump_Zero	0x157
0151 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x2 = 0x151,0x4
0152 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0153 0a01       |    |		Execute_Immediate	Plus,0x1
0154 e5fe       |    |		Load	0x2,-0x2
0155 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0156 7822       |x"  |		Jump	0x179
0157 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x3 = 0x157,0x5
0158 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0159 e5fe       |    |		Load	0x2,-0x2
015a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
015b 0aff       |    |		Execute_Immediate	Plus,-0x1
015c 0248       | H  |		Execute	Discrete,Check_In_Integer
015d e5ff       |    |		Load	0x2,-0x1
015e 01d7       |    |		Execute	Vector,Field_Read
015f 0273       | s  |		Execute	Discrete,Plus
0160 e5fe       |    |		Load	0x2,-0x2
0161 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0162 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x4 = 0x162,0x6
0163 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0164 e5ff       |    |		Load	0x2,-0x1
0165 01dc       |    |		Execute	Vector,Last
0166 0a01       |    |		Execute_Immediate	Plus,0x1
0167 027f       |    |		Execute	Discrete,Equal
0168 680a       |h   |		Jump_Zero	0x173
0169 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x5 = 0x169,0x7
016a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
016b e5fe       |    |		Load	0x2,-0x2
016c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
016d 0272       | r  |		Execute	Discrete,Minus
016e 0248       | H  |		Execute	Discrete,Check_In_Integer
016f 0a01       |    |		Execute_Immediate	Plus,0x1
0170 e5fe       |    |		Load	0x2,-0x2
0171 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0172 7806       |x   |		Jump	0x179
0173 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x6 = 0x173,0x8
0174 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0175 e5ff       |    |		Load	0x2,-0x1
0176 01d7       |    |		Execute	Vector,Field_Read
0177 e5fe       |    |		Load	0x2,-0x2
0178 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0179 00c9       |    |		Action	Pop_Auxiliary_Loop
017a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x7 = 0x17a,0x1
017b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
017c 700c       |p   |		Jump_Nonzero	0x189
017d e5fe       |    |		Load	0x2,-0x2
017e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
017f e5fe       |    |		Load	0x2,-0x2
0180 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0181 027a       | z  |		Execute	Discrete,Less_Equal
0182 6806       |h   |		Jump_Zero	0x189
0183 e5fe       |    |		Load	0x2,-0x2
0184 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0185 e5ff       |    |		Load	0x2,-0x1
0186 01dc       |    |		Execute	Vector,Last
0187 027a       | z  |		Execute	Discrete,Less_Equal
0188 77bc       |w   |		Jump_Nonzero	0x145
0189 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
018a 0000 0000  |    |		.BLANK	0000[0x6]
0190 ; --------------------------------------------------------------------------------------
0190 ; Debug Table
0190 ; --------------------------------------------------------------------------------------
0190 0003 000a  |    |		.CONST	0x0003,0x000a
0192 000b 01e2  |    |		.DEBUG	0x000b,0x01e2,0x8000,0x0000,0x0037,0xb184,0x0000,0x0005
019a 0032 01f8  | 2  |		.DEBUG	0x0032,0x01f8,0x8000,0x0000,0x0037,0xb2c4,0x0000,0x0003
01a2 004b 020a  | K  |		.DEBUG	0x004b,0x020a,0x0002,0x0000,0x0037,0xb184,0x0000,0x000f
01aa 0063 0214  | c  |		.DEBUG	0x0063,0x0214,0x0002,0x0000,0x0037,0xb184,0x0000,0x003e
01b2 0093 0224  |   $|		.DEBUG	0x0093,0x0224,0x0002,0x0000,0x0037,0xb184,0x0000,0x004d
01ba 00a3 0228  |   (|		.DEBUG	0x00a3,0x0228,0x0002,0x0000,0x0037,0xb184,0x0000,0x0056
01c2 00ab 022c  |   ,|		.DEBUG	0x00ab,0x022c,0x0001,0x0000,0x0037,0xb184,0x0000,0x005f
01ca 00c3 0234  |   4|		.DEBUG	0x00c3,0x0234,0x0001,0x0000,0x0037,0xb184,0x0000,0x006c
01d2 0103 0248  |   H|		.DEBUG	0x0103,0x0248,0x0001,0x0000,0x0037,0xb184,0x0000,0x0085
01da 0143 025c  | C \|		.DEBUG	0x0143,0x025c,0x0001,0x0000,0x0037,0xb2c4,0x0000,0x002a
01e2 ; --------------------------------------------------------------------------------------
01e2 ; Debug3 Subtable 0x0
01e2 ; --------------------------------------------------------------------------------------
01e2 000a 0000  |    |		.DBG3TAB	0x000a,0x0000
01e4 000b ffff  |    |		.CONST	0x000b,0xffff
01e6 0011 fffe  |    |		.CONST	0x0011,0xfffe
01e8 0013 fffd  |    |		.CONST	0x0013,0xfffd
01ea 001e fffc  |    |		.CONST	0x001e,0xfffc
01ec 0025 fffb  | %  |		.CONST	0x0025,0xfffb
01ee 0027 fffa  | '  |		.CONST	0x0027,0xfffa
01f0 0029 fff9  | )  |		.CONST	0x0029,0xfff9
01f2 002b fff8  | +  |		.CONST	0x002b,0xfff8
01f4 002d fff7  | -  |		.CONST	0x002d,0xfff7
01f6 002f fff6  | /  |		.CONST	0x002f,0xfff6
01f8 ; --------------------------------------------------------------------------------------
01f8 ; Debug3 Subtable 0x1
01f8 ; --------------------------------------------------------------------------------------
01f8 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
01fa 0032 ffff  | 2  |		.CONST	0x0032,0xffff
01fc 0034 fffe  | 4  |		.CONST	0x0034,0xfffe
01fe 0036 fffd  | 6  |		.CONST	0x0036,0xfffd
0200 0038 fffc  | 8  |		.CONST	0x0038,0xfffc
0202 003a fffb  | :  |		.CONST	0x003a,0xfffb
0204 003c fffa  | <  |		.CONST	0x003c,0xfffa
0206 003e fff9  | >  |		.CONST	0x003e,0xfff9
0208 0040 fff8  | @  |		.CONST	0x0040,0xfff8
020a ; --------------------------------------------------------------------------------------
020a ; Debug3 Subtable 0x2
020a ; --------------------------------------------------------------------------------------
020a 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
020c 004b ffff  | K  |		.CONST	0x004b,0xffff
020e 004e 0001  | N  |		.CONST	0x004e,0x0001
0210 0052 0002  | R  |		.CONST	0x0052,0x0002
0212 005b 0003  | [  |		.CONST	0x005b,0x0003
0214 ; --------------------------------------------------------------------------------------
0214 ; Debug3 Subtable 0x3
0214 ; --------------------------------------------------------------------------------------
0214 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0216 0063 ffff  | c  |		.CONST	0x0063,0xffff
0218 0072 0001  | r  |		.CONST	0x0072,0x0001
021a 0076 0002  | v  |		.CONST	0x0076,0x0002
021c 007a 0003  | z  |		.CONST	0x007a,0x0003
021e 0082 0004  |    |		.CONST	0x0082,0x0004
0220 0088 0005  |    |		.CONST	0x0088,0x0005
0222 008c 0006  |    |		.CONST	0x008c,0x0006
0224 ; --------------------------------------------------------------------------------------
0224 ; Debug3 Subtable 0x4
0224 ; --------------------------------------------------------------------------------------
0224 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0226 0093 0001  |    |		.CONST	0x0093,0x0001
0228 ; --------------------------------------------------------------------------------------
0228 ; Debug3 Subtable 0x5
0228 ; --------------------------------------------------------------------------------------
0228 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
022a 00a3 0001  |    |		.CONST	0x00a3,0x0001
022c ; --------------------------------------------------------------------------------------
022c ; Debug3 Subtable 0x6
022c ; --------------------------------------------------------------------------------------
022c 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
022e 00ab 0001  |    |		.CONST	0x00ab,0x0001
0230 00b0 0002  |    |		.CONST	0x00b0,0x0002
0232 00b5 0003  |    |		.CONST	0x00b5,0x0003
0234 ; --------------------------------------------------------------------------------------
0234 ; Debug3 Subtable 0x7
0234 ; --------------------------------------------------------------------------------------
0234 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0236 00c3 ffff  |    |		.CONST	0x00c3,0xffff
0238 00c7 0001  |    |		.CONST	0x00c7,0x0001
023a 00cd 0002  |    |		.CONST	0x00cd,0x0002
023c 00d1 0003  |    |		.CONST	0x00d1,0x0003
023e 00d8 0004  |    |		.CONST	0x00d8,0x0004
0240 00e0 0005  |    |		.CONST	0x00e0,0x0005
0242 00ec 0006  |    |		.CONST	0x00ec,0x0006
0244 00f2 0007  |    |		.CONST	0x00f2,0x0007
0246 00f8 0008  |    |		.CONST	0x00f8,0x0008
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug3 Subtable 0x8
0248 ; --------------------------------------------------------------------------------------
0248 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
024a 0103 ffff  |    |		.CONST	0x0103,0xffff
024c 0107 0001  |    |		.CONST	0x0107,0x0001
024e 010d 0002  |    |		.CONST	0x010d,0x0002
0250 0111 0003  |    |		.CONST	0x0111,0x0003
0252 0118 0004  |    |		.CONST	0x0118,0x0004
0254 0120 0005  |    |		.CONST	0x0120,0x0005
0256 012b 0006  | +  |		.CONST	0x012b,0x0006
0258 0131 0007  | 1  |		.CONST	0x0131,0x0007
025a 0137 0008  | 7  |		.CONST	0x0137,0x0008
025c ; --------------------------------------------------------------------------------------
025c ; Debug3 Subtable 0x9
025c ; --------------------------------------------------------------------------------------
025c 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
025e 0145 0002  | E  |		.CONST	0x0145,0x0002
0260 014a 0003  | J  |		.CONST	0x014a,0x0003
0262 0151 0004  | Q  |		.CONST	0x0151,0x0004
0264 0157 0005  | W  |		.CONST	0x0157,0x0005
0266 0162 0006  | b  |		.CONST	0x0162,0x0006
0268 0169 0007  | i  |		.CONST	0x0169,0x0007
026a 0173 0008  | s  |		.CONST	0x0173,0x0008
026c 017a 0001  | z  |		.CONST	0x017a,0x0001
026e 0000 0000  |    |		.BLANK	0000[0x192]