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

⟦d051fc31e⟧

    Length: 2048 (0x800)
    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 0150       | P  |		.CONST	0x0150								; 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 003e       | >  |		.CONST	0x003e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0019       |    |		.CONST	0x0019								; Number of locals
000b			INIT_0008:
000b 029a 0043  |   C|		Declare_Subprogram	INIT_0040,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x01aa,0x8000,0x0000,0x0056,0x5ac5,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 00bf       |    |		Action	Accept_Activation
001e 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x1 = .DEBUG	0x001e,0x01be,0x8000,0x0000,0x0056,0xcd15,0x0000,0x0005
													; Debug Table 0x1.0x0 = 0x1e,0xffff
001f 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x1.0x1 = 0x1f,0x401
0020 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x1.0x2 = 0x20,0xffff
0021 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0x3 = 0x21,0xfffe
0022 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0x4 = 0x22,0x801
0023 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x1.0x5 = 0x23,0xfffe
0024 4975       |Iu  |		Short_Literal	0x175							; Debug Table 0x1.0x6 = 0x24,0xfffd
0025 00eb       |    |		Load_Encached	Diana_Cache
0026 0098       |    |		Execute	Package,Field_Read_Dynamic
0027 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
0028 4975       |Iu  |		Short_Literal	0x175							; Debug Table 0x1.0x7 = 0x28,0xfffc
0029 00eb       |    |		Load_Encached	Diana_Cache
002a 0098       |    |		Execute	Package,Field_Read_Dynamic
002b 1918       |    |		Execute	Package,Field_Reference,Field_Number 0x18
002c 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x8 = 0x2c,0xfffb
002d 00c7       |    |		Action	Elaborate_Subprogram
002e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x9 = 0x2e,0xfffa
002f 00c7       |    |		Action	Elaborate_Subprogram
0030 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0xa = 0x30,0xfff9
0031 00c7       |    |		Action	Elaborate_Subprogram
0032 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0xb = 0x32,0xfff8
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0xc = 0x34,0xfff7
0035 00c7       |    |		Action	Elaborate_Subprogram
0036 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0xd = 0x36,0xfff6
0037 00c7       |    |		Action	Elaborate_Subprogram
0038 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xe = 0x38,0xfff5
0039 00c7       |    |		Action	Elaborate_Subprogram
003a 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0xf = 0x3a,0xfff4
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x10 = 0x3c,0xfff3
003d 00c7       |    |		Action	Elaborate_Subprogram
003e			BODY_0008:
003e 00bc       |    |		Action	Signal_Activated
003f 00bb       |    |		Action	Signal_Completion
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0048       | H  |		.CONST	0x0048								; Address of begin
0041 0004       |    |		.CONST	0x0004								; Address of exception handler
0042 0002       |    |		.CONST	0x0002								; Number of locals
0043			INIT_0040:
0043 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x2 = .DEBUG	0x0043,0x01e2,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0006
													; Debug Table 0x2.0x0 = 0x43,0xffff
0044 00db       |    |		Load_Top	At_Offset_3
0045 00eb       |    |		Load_Encached	Diana_Cache
0046 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0047 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0048			BODY_0040:
0048 e216       |    |		Load	0x1,0x16							; Debug Table 0x2.0x1 = 0x48,0x1
0049 e5ff       |    |		Load	0x2,-0x1
004a 00eb       |    |		Load_Encached	Diana_Cache
004b 1891       |    |		Execute	Package,Field_Execute,Field_Number 0x91
004c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x2 = 0x4c,0x2
004d e5fe       |    |		Load	0x2,-0x2
004e 00eb       |    |		Load_Encached	Diana_Cache
004f 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
0050 e5ff       |    |		Load	0x2,-0x1
0051 00eb       |    |		Load_Encached	Diana_Cache
0052 1891       |    |		Execute	Package,Field_Execute,Field_Number 0x91
0053 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0054 0000 0000  |    |		.BLANK	0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 0060       | `  |		.CONST	0x0060								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0002       |    |		.CONST	0x0002								; Number of locals
005b			INIT_0058:
005b 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x3 = .DEBUG	0x005b,0x01ea,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0016
													; Debug Table 0x3.0x0 = 0x5b,0xffff
005c 00db       |    |		Load_Top	At_Offset_3
005d 00eb       |    |		Load_Encached	Diana_Cache
005e 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
005f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0060			BODY_0058:
0060 e216       |    |		Load	0x1,0x16							; Debug Table 0x3.0x1 = 0x60,0x1
0061 e5ff       |    |		Load	0x2,-0x1
0062 00eb       |    |		Load_Encached	Diana_Cache
0063 1891       |    |		Execute	Package,Field_Execute,Field_Number 0x91
0064 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0x64,0x2
0065 e5fe       |    |		Load	0x2,-0x2
0066 8219       |    |		Call	0x1,0x19
0067 e5ff       |    |		Load	0x2,-0x1
0068 00eb       |    |		Load_Encached	Diana_Cache
0069 1891       |    |		Execute	Package,Field_Execute,Field_Number 0x91
006a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
006b 0000 0000  |    |		.BLANK	0000[0x5]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0080       |    |		.CONST	0x0080								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0003       |    |		.CONST	0x0003								; Number of locals
0073			INIT_0070:
0073 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x4 = .DEBUG	0x0073,0x01f2,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0026
													; Debug Table 0x4.0x0 = 0x73,0xffff
0074 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1 = 0x74,0x401
0075 7002       |p   |		Jump_Nonzero	0x78
0076 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x4.0x2 = 0x76,0x402
0077 7803       |x   |		Jump	0x7b
0078 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x3 = 0x78,0x403
0079 0217       |    |		Execute	Heap_Access,All_Reference
007a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
007b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x4.0x4 = 0x7b,0xffff
007c 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x4.0x5 = 0x7c,0xfffe
007d e5fe       |    |		Load	0x2,-0x2
007e 8218       |    |		Call	0x1,0x18
007f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0080			BODY_0070:
0080 e216       |    |		Load	0x1,0x16							; Debug Table 0x4.0x6 = 0x80,0x1
0081 e5ff       |    |		Load	0x2,-0x1
0082 00eb       |    |		Load_Encached	Diana_Cache
0083 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
0084 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x7 = 0x84,0x2
0085 00d9       |    |		Load_Top	At_Offset_1
0086 00eb       |    |		Load_Encached	Diana_Cache
0087 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
0088 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x8 = 0x88,0x3
0089 e5ff       |    |		Load	0x2,-0x1
008a 00eb       |    |		Load_Encached	Diana_Cache
008b 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
008c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
008d 0000 0000  |    |		.XXX[0x3]
008f 0000       |    |
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 009c       |    |		.CONST	0x009c								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0002       |    |		.CONST	0x0002								; Number of locals
0093			INIT_0090:
0093 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x5 = .DEBUG	0x0093,0x0206,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0036
													; Debug Table 0x5.0x0 = 0x93,0xffff
0094 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x1 = 0x94,0x401
0095 7002       |p   |		Jump_Nonzero	0x98
0096 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x5.0x2 = 0x96,0x402
0097 7803       |x   |		Jump	0x9b
0098 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x3 = 0x98,0x403
0099 0217       |    |		Execute	Heap_Access,All_Reference
009a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
009b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x5.0x4 = 0x9b,0xffff
009c			BODY_0090:
009c e216       |    |		Load	0x1,0x16							; Debug Table 0x5.0x5 = 0x9c,0x1
009d e5ff       |    |		Load	0x2,-0x1
009e 00eb       |    |		Load_Encached	Diana_Cache
009f 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
00a0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x6 = 0xa0,0x2
00a1 e5fe       |    |		Load	0x2,-0x2
00a2 8219       |    |		Call	0x1,0x19
00a3 e5ff       |    |		Load	0x2,-0x1
00a4 00eb       |    |		Load_Encached	Diana_Cache
00a5 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
00a6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00a7 0000       |    |		.XXX[0x1]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00b9       |    |		.CONST	0x00b9								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0003       |    |		.CONST	0x0003								; Number of locals
00ab			INIT_00a8:
00ab 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x6 = .DEBUG	0x00ab,0x0216,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0046
													; Debug Table 0x6.0x0 = 0xab,0xffff
00ac 00db       |    |		Load_Top	At_Offset_3
00ad 00eb       |    |		Load_Encached	Diana_Cache
00ae 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
00af 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00b0 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x6.0x1 = 0xb0,0xfffe
00b1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x2 = 0xb1,0x401
00b2 7002       |p   |		Jump_Nonzero	0xb5
00b3 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x6.0x3 = 0xb3,0x402
00b4 7803       |x   |		Jump	0xb8
00b5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x4 = 0xb5,0x403
00b6 0217       |    |		Execute	Heap_Access,All_Reference
00b7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00b8 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x6.0x5 = 0xb8,0xfffe
00b9			BODY_00a8:
00b9 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x6 = 0xb9,0x1
00ba 0aff       |    |		Execute_Immediate	Plus,-0x1
00bb 0248       | H  |		Execute	Discrete,Check_In_Integer
00bc 4801       |H   |		Short_Literal	0x1
00bd 0263       | c  |		Execute	Discrete,Above_Bound
00be 700b       |p   |		Jump_Nonzero	0xca
00bf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x7 = 0xbf,0x2
00c0 a402       |    |		Store_Unchecked	0x2,0x2
00c1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x8 = 0xc1,0x3
													; Debug Table 0x6.0x9 = 0xc1,0x801
00c2 7002       |p   |		Jump_Nonzero	0xc5
00c3 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x6.0xa = 0xc3,0x802
00c4 7803       |x   |		Jump	0xc8
00c5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xb = 0xc5,0x803
00c6 0217       |    |		Execute	Heap_Access,All_Reference
00c7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00c8 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0x6.0xc = 0xc8,0x3
00c9 3ff5       |?   |		Loop_Increasing	0xbf
00ca e216       |    |		Load	0x1,0x16							; Debug Table 0x6.0xd = 0xca,0x4
00cb 00da       |    |		Load_Top	At_Offset_2
00cc 00eb       |    |		Load_Encached	Diana_Cache
00cd 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
00ce 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xe = 0xce,0x5
00cf e5ff       |    |		Load	0x2,-0x1
00d0 00eb       |    |		Load_Encached	Diana_Cache
00d1 1891       |    |		Execute	Package,Field_Execute,Field_Number 0x91
00d2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00d3 0000 0000  |    |		.BLANK	0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00ed       |    |		.CONST	0x00ed								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0003       |    |		.CONST	0x0003								; Number of locals
00db			INIT_00d8:
00db 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7 = .DEBUG	0x00db,0x0236,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0055
													; Debug Table 0x7.0x0 = 0xdb,0xffff
00dc 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x1 = 0xdc,0x401
00dd 7002       |p   |		Jump_Nonzero	0xe0
00de 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7.0x2 = 0xde,0x402
00df 7803       |x   |		Jump	0xe3
00e0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x3 = 0xe0,0x403
00e1 0217       |    |		Execute	Heap_Access,All_Reference
00e2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00e3 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x7.0x4 = 0xe3,0xffff
00e4 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7.0x5 = 0xe4,0xfffe
00e5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x6 = 0xe5,0x801
00e6 7002       |p   |		Jump_Nonzero	0xe9
00e7 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7.0x7 = 0xe7,0x802
00e8 7803       |x   |		Jump	0xec
00e9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x8 = 0xe9,0x803
00ea 0217       |    |		Execute	Heap_Access,All_Reference
00eb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00ec 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x7.0x9 = 0xec,0xfffe
00ed			BODY_00d8:
00ed e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0xa = 0xed,0x1
00ee 0aff       |    |		Execute_Immediate	Plus,-0x1
00ef 0248       | H  |		Execute	Discrete,Check_In_Integer
00f0 4801       |H   |		Short_Literal	0x1
00f1 0263       | c  |		Execute	Discrete,Above_Bound
00f2 700b       |p   |		Jump_Nonzero	0xfe
00f3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0xb = 0xf3,0x2
00f4 a402       |    |		Store_Unchecked	0x2,0x2
00f5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0xc = 0xf5,0x3
													; Debug Table 0x7.0xd = 0xf5,0xc01
00f6 7002       |p   |		Jump_Nonzero	0xf9
00f7 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x7.0xe = 0xf7,0xc02
00f8 7803       |x   |		Jump	0xfc
00f9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0xf = 0xf9,0xc03
00fa 0217       |    |		Execute	Heap_Access,All_Reference
00fb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00fc 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0x7.0x10 = 0xfc,0x3
00fd 3ff5       |?   |		Loop_Increasing	0xf3
00fe e216       |    |		Load	0x1,0x16							; Debug Table 0x7.0x11 = 0xfe,0x4
00ff 00da       |    |		Load_Top	At_Offset_2
0100 00eb       |    |		Load_Encached	Diana_Cache
0101 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
0102 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x12 = 0x102,0x5
0103 e5ff       |    |		Load	0x2,-0x1
0104 00eb       |    |		Load_Encached	Diana_Cache
0105 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
0106 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0107 0000       |    |		.XXX[0x1]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0110       |    |		.CONST	0x0110								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0002       |    |		.CONST	0x0002								; Number of locals
010b			INIT_0108:
010b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8 = .DEBUG	0x010b,0x025e,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0064
													; Debug Table 0x8.0x0 = 0x10b,0xffff
010c 00db       |    |		Load_Top	At_Offset_3
010d 00eb       |    |		Load_Encached	Diana_Cache
010e 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
010f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0110			BODY_0108:
0110 e217       |    |		Load	0x1,0x17							; Debug Table 0x8.0x1 = 0x110,0x1
0111 e5ff       |    |		Load	0x2,-0x1
0112 00eb       |    |		Load_Encached	Diana_Cache
0113 188e       |    |		Execute	Package,Field_Execute,Field_Number 0x8e
0114 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x2 = 0x114,0x2
0115 e5fe       |    |		Load	0x2,-0x2
0116 4849       |HI  |		Short_Literal	0x49
0117 00eb       |    |		Load_Encached	Diana_Cache
0118 187d       | }  |		Execute	Package,Field_Execute,Field_Number 0x7d
0119 e5ff       |    |		Load	0x2,-0x1
011a 00eb       |    |		Load_Encached	Diana_Cache
011b 188e       |    |		Execute	Package,Field_Execute,Field_Number 0x8e
011c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
011d 0000 0000  |    |		.XXX[0x3]
011f 0000       |    |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 012d       | -  |		.CONST	0x012d								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0003       |    |		.CONST	0x0003								; Number of locals
0123			INIT_0120:
0123 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9 = .DEBUG	0x0123,0x0266,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0074
													; Debug Table 0x9.0x0 = 0x123,0xffff
0124 00db       |    |		Load_Top	At_Offset_3
0125 00eb       |    |		Load_Encached	Diana_Cache
0126 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
0127 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0128 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x1 = 0x128,0xfffe
0129 00d9       |    |		Load_Top	At_Offset_1
012a 00eb       |    |		Load_Encached	Diana_Cache
012b 18e5       |    |		Execute	Package,Field_Execute,Field_Number 0xe5
012c 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
012d			BODY_0120:
012d e217       |    |		Load	0x1,0x17							; Debug Table 0x9.0x2 = 0x12d,0x1
012e 00da       |    |		Load_Top	At_Offset_2
012f 00eb       |    |		Load_Encached	Diana_Cache
0130 188e       |    |		Execute	Package,Field_Execute,Field_Number 0x8e
0131 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3 = 0x131,0x2
0132 e5ff       |    |		Load	0x2,-0x1
0133 00eb       |    |		Load_Encached	Diana_Cache
0134 188e       |    |		Execute	Package,Field_Execute,Field_Number 0x8e
0135 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0136 0000 0000  |    |		.XXX[0x2]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013e       | >  |		.CONST	0x013e								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0002       |    |		.CONST	0x0002								; Number of locals
013b			INIT_0138:
013b 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xa = .DEBUG	0x013b,0x0270,0x0002,0x0000,0x0056,0x5ac5,0x0000,0x007e
													; Debug Table 0xa.0x0 = 0x13b,0xffff
013c 00db       |    |		Load_Top	At_Offset_3
013d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
013e			BODY_0138:
013e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x1 = 0x13e,0x1
013f 4801       |H   |		Short_Literal	0x1
0140 0263       | c  |		Execute	Discrete,Above_Bound
0141 7009       |p   |		Jump_Nonzero	0x14b
0142 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x2 = 0x142,0x2
													; Debug Table 0xa.0x3 = 0x142,0x401
0143 7002       |p   |		Jump_Nonzero	0x146
0144 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xa.0x4 = 0x144,0x402
0145 7803       |x   |		Jump	0x149
0146 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x5 = 0x146,0x403
0147 0217       |    |		Execute	Heap_Access,All_Reference
0148 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0149 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0xa.0x6 = 0x149,0x2
014a 3ff7       |?   |		Loop_Increasing	0x142
014b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x7 = 0x14b,0x3
													; Debug Table 0xa.0x8 = 0x14b,0x801
014c 021d       |    |		Execute	Heap_Access,Is_Null
014d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2				; Debug Table 0xa.0x9 = 0x14d,0x3
014e 0000 0000  |    |		.XXX[0x2]
0150 ; --------------------------------------------------------------------------------------
0150 ; Debug Table
0150 ; --------------------------------------------------------------------------------------
0150 0003 000b  |    |		.CONST	0x0003,0x000b
0152 000b 01aa  |    |		.DEBUG	0x000b,0x01aa,0x8000,0x0000,0x0056,0x5ac5,0x0000,0x0005
015a 001e 01be  |    |		.DEBUG	0x001e,0x01be,0x8000,0x0000,0x0056,0xcd15,0x0000,0x0005
0162 0043 01e2  | C  |		.DEBUG	0x0043,0x01e2,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0006
016a 005b 01ea  | [  |		.DEBUG	0x005b,0x01ea,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0016
0172 0073 01f2  | s  |		.DEBUG	0x0073,0x01f2,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0026
017a 0093 0206  |    |		.DEBUG	0x0093,0x0206,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0036
0182 00ab 0216  |    |		.DEBUG	0x00ab,0x0216,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0046
018a 00db 0236  |   6|		.DEBUG	0x00db,0x0236,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0055
0192 010b 025e  |   ^|		.DEBUG	0x010b,0x025e,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0064
019a 0123 0266  | # f|		.DEBUG	0x0123,0x0266,0x0001,0x0000,0x0056,0x5ac5,0x0000,0x0074
01a2 013b 0270  | ; p|		.DEBUG	0x013b,0x0270,0x0002,0x0000,0x0056,0x5ac5,0x0000,0x007e
01aa ; --------------------------------------------------------------------------------------
01aa ; Debug3 Subtable 0x0
01aa ; --------------------------------------------------------------------------------------
01aa 0009 0000  |    |		.DBG3TAB	0x0009,0x0000
01ac 000b ffff  |    |		.CONST	0x000b,0xffff
01ae 000d fffe  |    |		.CONST	0x000d,0xfffe
01b0 000f fffd  |    |		.CONST	0x000f,0xfffd
01b2 0011 fffc  |    |		.CONST	0x0011,0xfffc
01b4 0013 fffb  |    |		.CONST	0x0013,0xfffb
01b6 0015 fffa  |    |		.CONST	0x0015,0xfffa
01b8 0017 fff9  |    |		.CONST	0x0017,0xfff9
01ba 0019 fff8  |    |		.CONST	0x0019,0xfff8
01bc 001b fff7  |    |		.CONST	0x001b,0xfff7
01be ; --------------------------------------------------------------------------------------
01be ; Debug3 Subtable 0x1
01be ; --------------------------------------------------------------------------------------
01be 000f 0002  |    |		.DBG3TAB	0x000f,0x0002
01c0 001e ffff  |    |		.CONST	0x001e,0xffff
01c2 001f 0401  |    |		.CONST	0x001f,0x0401
01c4 0020 ffff  |    |		.CONST	0x0020,0xffff
01c6 0021 fffe  | !  |		.CONST	0x0021,0xfffe
01c8 0022 0801  | "  |		.CONST	0x0022,0x0801
01ca 0023 fffe  | #  |		.CONST	0x0023,0xfffe
01cc 0024 fffd  | $  |		.CONST	0x0024,0xfffd
01ce 0028 fffc  | (  |		.CONST	0x0028,0xfffc
01d0 002c fffb  | ,  |		.CONST	0x002c,0xfffb
01d2 002e fffa  | .  |		.CONST	0x002e,0xfffa
01d4 0030 fff9  | 0  |		.CONST	0x0030,0xfff9
01d6 0032 fff8  | 2  |		.CONST	0x0032,0xfff8
01d8 0034 fff7  | 4  |		.CONST	0x0034,0xfff7
01da 0036 fff6  | 6  |		.CONST	0x0036,0xfff6
01dc 0038 fff5  | 8  |		.CONST	0x0038,0xfff5
01de 003a fff4  | :  |		.CONST	0x003a,0xfff4
01e0 003c fff3  | <  |		.CONST	0x003c,0xfff3
01e2 ; --------------------------------------------------------------------------------------
01e2 ; Debug3 Subtable 0x2
01e2 ; --------------------------------------------------------------------------------------
01e2 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
01e4 0043 ffff  | C  |		.CONST	0x0043,0xffff
01e6 0048 0001  | H  |		.CONST	0x0048,0x0001
01e8 004c 0002  | L  |		.CONST	0x004c,0x0002
01ea ; --------------------------------------------------------------------------------------
01ea ; Debug3 Subtable 0x3
01ea ; --------------------------------------------------------------------------------------
01ea 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
01ec 005b ffff  | [  |		.CONST	0x005b,0xffff
01ee 0060 0001  | `  |		.CONST	0x0060,0x0001
01f0 0064 0002  | d  |		.CONST	0x0064,0x0002
01f2 ; --------------------------------------------------------------------------------------
01f2 ; Debug3 Subtable 0x4
01f2 ; --------------------------------------------------------------------------------------
01f2 0003 0006  |    |		.DBG3TAB	0x0003,0x0006
01f4 0073 ffff  | s  |		.CONST	0x0073,0xffff
01f6 0074 0401  | t  |		.CONST	0x0074,0x0401
01f8 0076 0402  | v  |		.CONST	0x0076,0x0402
01fa 0078 0403  | x  |		.CONST	0x0078,0x0403
01fc 007b ffff  | {  |		.CONST	0x007b,0xffff
01fe 007c fffe  | |  |		.CONST	0x007c,0xfffe
0200 0080 0001  |    |		.CONST	0x0080,0x0001
0202 0084 0002  |    |		.CONST	0x0084,0x0002
0204 0088 0003  |    |		.CONST	0x0088,0x0003
0206 ; --------------------------------------------------------------------------------------
0206 ; Debug3 Subtable 0x5
0206 ; --------------------------------------------------------------------------------------
0206 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
0208 0093 ffff  |    |		.CONST	0x0093,0xffff
020a 0094 0401  |    |		.CONST	0x0094,0x0401
020c 0096 0402  |    |		.CONST	0x0096,0x0402
020e 0098 0403  |    |		.CONST	0x0098,0x0403
0210 009b ffff  |    |		.CONST	0x009b,0xffff
0212 009c 0001  |    |		.CONST	0x009c,0x0001
0214 00a0 0002  |    |		.CONST	0x00a0,0x0002
0216 ; --------------------------------------------------------------------------------------
0216 ; Debug3 Subtable 0x6
0216 ; --------------------------------------------------------------------------------------
0216 0003 000c  |    |		.DBG3TAB	0x0003,0x000c
0218 00ab ffff  |    |		.CONST	0x00ab,0xffff
021a 00b0 fffe  |    |		.CONST	0x00b0,0xfffe
021c 00b1 0401  |    |		.CONST	0x00b1,0x0401
021e 00b3 0402  |    |		.CONST	0x00b3,0x0402
0220 00b5 0403  |    |		.CONST	0x00b5,0x0403
0222 00b8 fffe  |    |		.CONST	0x00b8,0xfffe
0224 00b9 0001  |    |		.CONST	0x00b9,0x0001
0226 00bf 0002  |    |		.CONST	0x00bf,0x0002
0228 00c1 0003  |    |		.CONST	0x00c1,0x0003
022a 00c1 0801  |    |		.CONST	0x00c1,0x0801
022c 00c3 0802  |    |		.CONST	0x00c3,0x0802
022e 00c5 0803  |    |		.CONST	0x00c5,0x0803
0230 00c8 0003  |    |		.CONST	0x00c8,0x0003
0232 00ca 0004  |    |		.CONST	0x00ca,0x0004
0234 00ce 0005  |    |		.CONST	0x00ce,0x0005
0236 ; --------------------------------------------------------------------------------------
0236 ; Debug3 Subtable 0x7
0236 ; --------------------------------------------------------------------------------------
0236 0004 000f  |    |		.DBG3TAB	0x0004,0x000f
0238 00db ffff  |    |		.CONST	0x00db,0xffff
023a 00dc 0401  |    |		.CONST	0x00dc,0x0401
023c 00de 0402  |    |		.CONST	0x00de,0x0402
023e 00e0 0403  |    |		.CONST	0x00e0,0x0403
0240 00e3 ffff  |    |		.CONST	0x00e3,0xffff
0242 00e4 fffe  |    |		.CONST	0x00e4,0xfffe
0244 00e5 0801  |    |		.CONST	0x00e5,0x0801
0246 00e7 0802  |    |		.CONST	0x00e7,0x0802
0248 00e9 0803  |    |		.CONST	0x00e9,0x0803
024a 00ec fffe  |    |		.CONST	0x00ec,0xfffe
024c 00ed 0001  |    |		.CONST	0x00ed,0x0001
024e 00f3 0002  |    |		.CONST	0x00f3,0x0002
0250 00f5 0003  |    |		.CONST	0x00f5,0x0003
0252 00f5 0c01  |    |		.CONST	0x00f5,0x0c01
0254 00f7 0c02  |    |		.CONST	0x00f7,0x0c02
0256 00f9 0c03  |    |		.CONST	0x00f9,0x0c03
0258 00fc 0003  |    |		.CONST	0x00fc,0x0003
025a 00fe 0004  |    |		.CONST	0x00fe,0x0004
025c 0102 0005  |    |		.CONST	0x0102,0x0005
025e ; --------------------------------------------------------------------------------------
025e ; Debug3 Subtable 0x8
025e ; --------------------------------------------------------------------------------------
025e 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0260 010b ffff  |    |		.CONST	0x010b,0xffff
0262 0110 0001  |    |		.CONST	0x0110,0x0001
0264 0114 0002  |    |		.CONST	0x0114,0x0002
0266 ; --------------------------------------------------------------------------------------
0266 ; Debug3 Subtable 0x9
0266 ; --------------------------------------------------------------------------------------
0266 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
0268 0123 ffff  | #  |		.CONST	0x0123,0xffff
026a 0128 fffe  | (  |		.CONST	0x0128,0xfffe
026c 012d 0001  | -  |		.CONST	0x012d,0x0001
026e 0131 0002  | 1  |		.CONST	0x0131,0x0002
0270 ; --------------------------------------------------------------------------------------
0270 ; Debug3 Subtable 0xa
0270 ; --------------------------------------------------------------------------------------
0270 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
0272 013b ffff  | ;  |		.CONST	0x013b,0xffff
0274 013e 0001  | >  |		.CONST	0x013e,0x0001
0276 0142 0002  | B  |		.CONST	0x0142,0x0002
0278 0142 0401  | B  |		.CONST	0x0142,0x0401
027a 0144 0402  | D  |		.CONST	0x0144,0x0402
027c 0146 0403  | F  |		.CONST	0x0146,0x0403
027e 0149 0002  | I  |		.CONST	0x0149,0x0002
0280 014b 0003  | K  |		.CONST	0x014b,0x0003
0282 014b 0801  | K  |		.CONST	0x014b,0x0801
0284 014d 0003  | M  |		.CONST	0x014d,0x0003
0286 0000 0000  |    |		.BLANK	0000[0x17a]