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

⟦7992d0ee2⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5813_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 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0168       | h  |		.CONST	0x0168								; 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 005f       | _  |		.CONST	0x005f								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001e       |    |		.CONST	0x001e								; Number of locals
000b			INIT_0008:
000b 03a9       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible			; Debug Table 0x0 = .DEBUG	0x000b,0x01ea,0x8000,0x0000,0x0059,0x88c5,0x0000,0x000c
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 03a9       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible			; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xf,0xfffc
0011 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x15,0xfff9
0017 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x17,0xfff8
0019 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x19,0xfff7
001b 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1b,0xfff6
001d 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1d,0xfff5
001f 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x1f,0xfff4
0021 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x21,0xfff3
0023 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x23,0xfff2
0025 4803       |H   |		Short_Literal	0x3							; Debug Table 0x0.0xe = 0x25,0xfff1
0026 032a       | *  |		Declare_Type	Record,Incomplete
0027 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0xf = 0x27,0xfff0
0028 02a0       |    |		Declare_Subprogram	Null_Subprogram
0029 e20d       |    |		Load	0x1,0xd
002a 03a3       |    |		Complete_Type	Heap_Access,By_Defining
002b e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x10 = 0x2b,0xffef
													; Debug Table 0x0.0x11 = 0x2b,0xffee
002c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
002d 029b 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Unelaborated		; Debug Table 0x0.0x12 = 0x2d,0xffed
002f 6134       |a4  |		Indirect_Literal	Discrete,0x164,{0x00000000, 0x005988c5}		; Debug Table 0x0.0x13 = 0x2f,0xffec
0030 48c6       |H   |		Short_Literal	0xc6
0031 00db       |    |		Load_Top	At_Offset_3
0032 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0033 e002       |    |		Load	0x0,0x2
0034 0387       |    |		Declare_Variable	Package
0035 00d8       |    |		Load_Top	At_Offset_0
0036 020f       |    |		Execute	Module,Activate
0037 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x14 = 0x37,0xffeb
0038 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0039 e20e       |    |		Load	0x1,0xe
003a 03a2       |    |		Complete_Type	Heap_Access,By_Renaming
003b 00bf       |    |		Action	Accept_Activation
003c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1 = .DEBUG	0x003c,0x0216,0x8000,0x0000,0x0059,0x8ca5,0x0000,0x0007
													; Debug Table 0x1.0x0 = 0x3c,0xffff
													; Debug Table 0x1.0x1 = 0x3c,0xfffe
003d 00d9       |    |		Load_Top	At_Offset_1
003e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
003f 00da       |    |		Load_Top	At_Offset_2
0040 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0041 029f 0153  |   S|		Declare_Subprogram	INIT_0150,For_Call
0043 e21b       |    |		Load	0x1,0x1b
0044 0326       | &  |		Complete_Type	Record,By_Defining
0045 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x2 = 0x45,0xfffd
0046 00c7       |    |		Action	Elaborate_Subprogram
0047 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x3 = 0x47,0xfffc
0048 00c7       |    |		Action	Elaborate_Subprogram
0049 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x4 = 0x49,0xfffb
004a 00c7       |    |		Action	Elaborate_Subprogram
004b 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x5 = 0x4b,0xfffa
004c 00c7       |    |		Action	Elaborate_Subprogram
004d 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x6 = 0x4d,0xfff9
004e 00c7       |    |		Action	Elaborate_Subprogram
004f 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x7 = 0x4f,0xfff8
0050 00c7       |    |		Action	Elaborate_Subprogram
0051 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x8 = 0x51,0xfff7
0052 00c7       |    |		Action	Elaborate_Subprogram
0053 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x9 = 0x53,0xfff6
0054 00c7       |    |		Action	Elaborate_Subprogram
0055 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xa = 0x55,0xfff5
0056 00c7       |    |		Action	Elaborate_Subprogram
0057 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0xb = 0x57,0xfff4
0058 00c7       |    |		Action	Elaborate_Subprogram
0059 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xc = 0x59,0xfff3
005a 00c7       |    |		Action	Elaborate_Subprogram
005b 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xd = 0x5b,0xfff2
005c 00c7       |    |		Action	Elaborate_Subprogram
005d 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0xe = 0x5d,0xfff1
005e 00c7       |    |		Action	Elaborate_Subprogram
005f			BODY_0008:
005f 00bc       |    |		Action	Signal_Activated
0060 00bb       |    |		Action	Signal_Completion
0061 0000 0000  |    |		.BLANK	0000[0x7]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006c       | l  |		.CONST	0x006c								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0002       |    |		.CONST	0x0002								; Number of locals
006b			INIT_0068:
006b e20d       |    |		Load	0x1,0xd								; Debug Table 0x2 = .DEBUG	0x006b,0x0236,0x0002,0x0000,0x0059,0x88c5,0x0000,0x0015
													; Debug Table 0x2.0x0 = 0x6b,0xffff
006c			BODY_0068:
006c e20d       |    |		Load	0x1,0xd								; Debug Table 0x2.0x1 = 0x6c,0x1
006d e5ff       |    |		Load	0x2,-0x1
006e 8212       |    |		Call	0x1,0x12
006f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0070 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x2 = 0x70,0x2
0071 e5ff       |    |		Load	0x2,-0x1
0072 e001       |    |		Load	0x0,0x1
0073 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0074 0322       | "  |		Declare_Variable	Record
0075 4801       |H   |		Short_Literal	0x1
0076 00d9       |    |		Load_Top	At_Offset_1
0077 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0078 4897       |H   |		Short_Literal	0x97
0079 e003       |    |		Load	0x0,0x3
007a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
007b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
007c 00d9       |    |		Load_Top	At_Offset_1
007d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
007e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x3 = 0x7e,0x401
007f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x4 = 0x7f,0x2
0080 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0081 4800       |H   |		Short_Literal	0x0
0082 00d9       |    |		Load_Top	At_Offset_1
0083 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0084 4800       |H   |		Short_Literal	0x0
0085 00d9       |    |		Load_Top	At_Offset_1
0086 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0087 4800       |H   |		Short_Literal	0x0
0088 00d9       |    |		Load_Top	At_Offset_1
0089 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
008a 8214       |    |		Call	0x1,0x14
008b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
008c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x5 = 0x8c,0x3
008d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
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 0x3 = .DEBUG	0x0093,0x0244,0x0001,0x0000,0x0059,0x88c5,0x0000,0x0020
													; Debug Table 0x3.0x0 = 0x93,0x1
0094 a5fe       |    |		Store_Unchecked	0x2,-0x2
0095 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0096 0000 0000  |    |		.XXX[0x2]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a1       |    |		.CONST	0x00a1								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0002       |    |		.CONST	0x0002								; Number of locals
009b			INIT_0098:
009b e21e       |    |		Load	0x1,0x1e							; Debug Table 0x4 = .DEBUG	0x009b,0x0248,0x0001,0x0000,0x0059,0x88c5,0x0000,0x002c
													; Debug Table 0x4.0x0 = 0x9b,0xffff
009c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
009d 00db       |    |		Load_Top	At_Offset_3
009e 0217       |    |		Execute	Heap_Access,All_Reference
009f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00a0 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00a1			BODY_0098:
00a1 00cf       |    |		Action	Mark_Auxiliary
00a2 780c       |x   |		Jump	0xaf
00a3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x4.0x1 = 0xa3,0x2
00a4 e5fe       |    |		Load	0x2,-0x2
00a5 00db       |    |		Load_Top	At_Offset_3
00a6 e21e       |    |		Load	0x1,0x1e
00a7 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00a8 8214       |    |		Call	0x1,0x14
00a9 c5fd       |    |		Store	0x2,-0x3
00aa 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x2 = 0xaa,0x3
00ab e21e       |    |		Load	0x1,0x1e
00ac 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00ad 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
00ae 00c9       |    |		Action	Pop_Auxiliary_Loop
00af 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x3 = 0xaf,0x1
00b0 e21e       |    |		Load	0x1,0x1e
00b1 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00b2 6ff0       |o   |		Jump_Zero	0xa3
00b3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00b4 0000 0000  |    |		.BLANK	0000[0x4]
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 e20d       |    |		Load	0x1,0xd								; Debug Table 0x5 = .DEBUG	0x00bb,0x0252,0x0001,0x0000,0x0059,0x88c5,0x0000,0x003e
													; Debug Table 0x5.0x0 = 0xbb,0x1
00bc 00db       |    |		Load_Top	At_Offset_3
00bd 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
00be 00d8       |    |		Load_Top	At_Offset_0
00bf 0217       |    |		Execute	Heap_Access,All_Reference
00c0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00c1 a5fe       |    |		Store_Unchecked	0x2,-0x2
00c2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x5.0x1 = 0xc2,0x2
00c3 0000 0000  |    |		.BLANK	0000[0x5]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb e20d       |    |		Load	0x1,0xd								; Debug Table 0x6 = .DEBUG	0x00cb,0x0258,0x0001,0x0000,0x0059,0x88c5,0x0000,0x004c
													; Debug Table 0x6.0x0 = 0xcb,0x1
00cc 00db       |    |		Load_Top	At_Offset_3
00cd 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
00ce 00d8       |    |		Load_Top	At_Offset_0
00cf 0217       |    |		Execute	Heap_Access,All_Reference
00d0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00d1 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
00d2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x6.0x1 = 0xd2,0x2
00d3 0000 0000  |    |		.BLANK	0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e3       |    |		.CONST	0x00e3								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0003       |    |		.CONST	0x0003								; Number of locals
00db			INIT_00d8:
00db e21e       |    |		Load	0x1,0x1e							; Debug Table 0x7 = .DEBUG	0x00db,0x025e,0x0001,0x0000,0x0059,0x88c5,0x0000,0x0054
													; Debug Table 0x7.0x0 = 0xdb,0xffff
00dc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00dd e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x1 = 0xdd,0xfffe
00de 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00df 0322       | "  |		Declare_Variable	Record
00e0 e5ff       |    |		Load	0x2,-0x1
00e1 00d9       |    |		Load_Top	At_Offset_1
00e2 017d       | }  |		Execute	Record,Structure_Write
00e3			BODY_00d8:
00e3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x2 = 0xe3,0x1
00e4 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
00e5 7003       |p   |		Jump_Nonzero	0xe9
00e6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x3 = 0xe6,0x2
00e7 00d9       |    |		Load_Top	At_Offset_1
00e8 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
00e9 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x4 = 0xe9,0x3
00ea e21e       |    |		Load	0x1,0x1e
00eb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00ec 00da       |    |		Load_Top	At_Offset_2
00ed e21e       |    |		Load	0x1,0x1e
00ee 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00ef 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
00f0 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x5 = 0xf0,0x4
00f1 0217       |    |		Execute	Heap_Access,All_Reference
00f2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00f3 e21e       |    |		Load	0x1,0x1e
00f4 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00f5 6809       |h   |		Jump_Zero	0xff
00f6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x6 = 0xf6,0x5
00f7 e5fd       |    |		Load	0x2,-0x3
00f8 0217       |    |		Execute	Heap_Access,All_Reference
00f9 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00fa 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x7 = 0xfa,0x6
00fb e5fd       |    |		Load	0x2,-0x3
00fc 0217       |    |		Execute	Heap_Access,All_Reference
00fd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fe 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00ff 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x8 = 0xff,0x7
0100 e5fd       |    |		Load	0x2,-0x3
0101 0217       |    |		Execute	Heap_Access,All_Reference
0102 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0103 e21e       |    |		Load	0x1,0x1e
0104 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0105 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x9 = 0x105,0x8
0106 e5fd       |    |		Load	0x2,-0x3
0107 0217       |    |		Execute	Heap_Access,All_Reference
0108 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0109 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
010a 0000 0000  |    |		.BLANK	0000[0x6]
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x0113,0x0274,0x0001,0x0000,0x0059,0x88c5,0x0000,0x0068
													; Debug Table 0x8.0x0 = 0x113,0x1
0114 e5fe       |    |		Load	0x2,-0x2
0115 0217       |    |		Execute	Heap_Access,All_Reference
0116 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0117 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b       |    |		.CONST	0x011b								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0001       |    |		.CONST	0x0001								; Number of locals
011b			BODY_0118:
011b			INIT_0118:
011b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x011b,0x0278,0x0002,0x0000,0x0059,0x88c5,0x0000,0x0075
													; Debug Table 0x9.0x0 = 0x11b,0x1
011c 6804       |h   |		Jump_Zero	0x121
011d 00da       |    |		Load_Top	At_Offset_2
011e 0217       |    |		Execute	Heap_Access,All_Reference
011f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0120 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0121 4800       |H   |		Short_Literal	0x0
0122 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0123 0000 0000  |    |		.BLANK	0000[0x5]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x012b,0x027c,0x0001,0x0000,0x0059,0x88c5,0x0000,0x007e
													; Debug Table 0xa.0x0 = 0x12b,0x1
012c 0217       |    |		Execute	Heap_Access,All_Reference
012d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
012e a5fe       |    |		Store_Unchecked	0x2,-0x2
012f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x0133,0x0280,0x0001,0x0000,0x0059,0x88c5,0x0000,0x008a
													; Debug Table 0xb.0x0 = 0x133,0x1
0134 e21e       |    |		Load	0x1,0x1e
0135 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0136 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0137 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b       | ;  |		.CONST	0x013b								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0001       |    |		.CONST	0x0001								; Number of locals
013b			BODY_0138:
013b			INIT_0138:
013b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x013b,0x0284,0x0002,0x0000,0x0059,0x88c5,0x0000,0x0092
													; Debug Table 0xc.0x0 = 0x13b,0x1
013c e21e       |    |		Load	0x1,0x1e
013d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
013e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013f 0000       |    |		.XXX[0x1]
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x0143,0x0288,0x0002,0x0000,0x0059,0x88c5,0x0000,0x009d
													; Debug Table 0xd.0x0 = 0x143,0x1
0144 e21e       |    |		Load	0x1,0x1e
0145 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0146 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0147 0000       |    |		.XXX[0x1]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x014b,0x028c,0x0001,0x0000,0x0059,0x88c5,0x0000,0x00ba
													; Debug Table 0xe.0x0 = 0x14b,0x1
014c e5fe       |    |		Load	0x2,-0x2
014d 017d       | }  |		Execute	Record,Structure_Write
014e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
014f 0000       |    |		.XXX[0x1]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153       | S  |		.CONST	0x0153								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0001       |    |		.CONST	0x0001								; Number of locals
0153			BODY_0150:
0153			INIT_0150:
0153 4608       |F   |		Jump_Case	0x9							; Debug Table 0xf = .DEBUG	0x0153,0x0290,0x0005,0x0000,0x0059,0x8ca5,0x0000,0x000e
0154 7808       |x   |		Jump	0x15d								; case 0x0
0155 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0156 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0157 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0158 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0159 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
015a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
015b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
015c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
015d 4800       |H   |		Short_Literal	0x0
015e 00db       |    |		Load_Top	At_Offset_3
015f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0160 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0161 0000 0000  |    |		.XXX[0x3]
0163 0000       |    |
0164 0000 0000  |    |		.LITERAL	{0x00000000, 0x005988c5}
0168 ; --------------------------------------------------------------------------------------
0168 ; Debug Table
0168 ; --------------------------------------------------------------------------------------
0168 0003 0010  |    |		.CONST	0x0003,0x0010
016a 000b 01ea  |    |		.DEBUG	0x000b,0x01ea,0x8000,0x0000,0x0059,0x88c5,0x0000,0x000c
0172 003c 0216  | <  |		.DEBUG	0x003c,0x0216,0x8000,0x0000,0x0059,0x8ca5,0x0000,0x0007
017a 006b 0236  | k 6|		.DEBUG	0x006b,0x0236,0x0002,0x0000,0x0059,0x88c5,0x0000,0x0015
0182 0093 0244  |   D|		.DEBUG	0x0093,0x0244,0x0001,0x0000,0x0059,0x88c5,0x0000,0x0020
018a 009b 0248  |   H|		.DEBUG	0x009b,0x0248,0x0001,0x0000,0x0059,0x88c5,0x0000,0x002c
0192 00bb 0252  |   R|		.DEBUG	0x00bb,0x0252,0x0001,0x0000,0x0059,0x88c5,0x0000,0x003e
019a 00cb 0258  |   X|		.DEBUG	0x00cb,0x0258,0x0001,0x0000,0x0059,0x88c5,0x0000,0x004c
01a2 00db 025e  |   ^|		.DEBUG	0x00db,0x025e,0x0001,0x0000,0x0059,0x88c5,0x0000,0x0054
01aa 0113 0274  |   t|		.DEBUG	0x0113,0x0274,0x0001,0x0000,0x0059,0x88c5,0x0000,0x0068
01b2 011b 0278  |   x|		.DEBUG	0x011b,0x0278,0x0002,0x0000,0x0059,0x88c5,0x0000,0x0075
01ba 012b 027c  | + ||		.DEBUG	0x012b,0x027c,0x0001,0x0000,0x0059,0x88c5,0x0000,0x007e
01c2 0133 0280  | 3  |		.DEBUG	0x0133,0x0280,0x0001,0x0000,0x0059,0x88c5,0x0000,0x008a
01ca 013b 0284  | ;  |		.DEBUG	0x013b,0x0284,0x0002,0x0000,0x0059,0x88c5,0x0000,0x0092
01d2 0143 0288  | C  |		.DEBUG	0x0143,0x0288,0x0002,0x0000,0x0059,0x88c5,0x0000,0x009d
01da 014b 028c  | K  |		.DEBUG	0x014b,0x028c,0x0001,0x0000,0x0059,0x88c5,0x0000,0x00ba
01e2 0153 0290  | S  |		.DEBUG	0x0153,0x0290,0x0005,0x0000,0x0059,0x8ca5,0x0000,0x000e
01ea ; --------------------------------------------------------------------------------------
01ea ; Debug3 Subtable 0x0
01ea ; --------------------------------------------------------------------------------------
01ea 0015 0000  |    |		.DBG3TAB	0x0015,0x0000
01ec 000b ffff  |    |		.CONST	0x000b,0xffff
01ee 000c fffe  |    |		.CONST	0x000c,0xfffe
01f0 000d fffd  |    |		.CONST	0x000d,0xfffd
01f2 000f fffc  |    |		.CONST	0x000f,0xfffc
01f4 0011 fffb  |    |		.CONST	0x0011,0xfffb
01f6 0013 fffa  |    |		.CONST	0x0013,0xfffa
01f8 0015 fff9  |    |		.CONST	0x0015,0xfff9
01fa 0017 fff8  |    |		.CONST	0x0017,0xfff8
01fc 0019 fff7  |    |		.CONST	0x0019,0xfff7
01fe 001b fff6  |    |		.CONST	0x001b,0xfff6
0200 001d fff5  |    |		.CONST	0x001d,0xfff5
0202 001f fff4  |    |		.CONST	0x001f,0xfff4
0204 0021 fff3  | !  |		.CONST	0x0021,0xfff3
0206 0023 fff2  | #  |		.CONST	0x0023,0xfff2
0208 0025 fff1  | %  |		.CONST	0x0025,0xfff1
020a 0027 fff0  | '  |		.CONST	0x0027,0xfff0
020c 002b ffef  | +  |		.CONST	0x002b,0xffef
020e 002b ffee  | +  |		.CONST	0x002b,0xffee
0210 002d ffed  | -  |		.CONST	0x002d,0xffed
0212 002f ffec  | /  |		.CONST	0x002f,0xffec
0214 0037 ffeb  | 7  |		.CONST	0x0037,0xffeb
0216 ; --------------------------------------------------------------------------------------
0216 ; Debug3 Subtable 0x1
0216 ; --------------------------------------------------------------------------------------
0216 000f 0000  |    |		.DBG3TAB	0x000f,0x0000
0218 003c ffff  | <  |		.CONST	0x003c,0xffff
021a 003c fffe  | <  |		.CONST	0x003c,0xfffe
021c 0045 fffd  | E  |		.CONST	0x0045,0xfffd
021e 0047 fffc  | G  |		.CONST	0x0047,0xfffc
0220 0049 fffb  | I  |		.CONST	0x0049,0xfffb
0222 004b fffa  | K  |		.CONST	0x004b,0xfffa
0224 004d fff9  | M  |		.CONST	0x004d,0xfff9
0226 004f fff8  | O  |		.CONST	0x004f,0xfff8
0228 0051 fff7  | Q  |		.CONST	0x0051,0xfff7
022a 0053 fff6  | S  |		.CONST	0x0053,0xfff6
022c 0055 fff5  | U  |		.CONST	0x0055,0xfff5
022e 0057 fff4  | W  |		.CONST	0x0057,0xfff4
0230 0059 fff3  | Y  |		.CONST	0x0059,0xfff3
0232 005b fff2  | [  |		.CONST	0x005b,0xfff2
0234 005d fff1  | ]  |		.CONST	0x005d,0xfff1
0236 ; --------------------------------------------------------------------------------------
0236 ; Debug3 Subtable 0x2
0236 ; --------------------------------------------------------------------------------------
0236 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0238 006b ffff  | k  |		.CONST	0x006b,0xffff
023a 006c 0001  | l  |		.CONST	0x006c,0x0001
023c 0070 0002  | p  |		.CONST	0x0070,0x0002
023e 007e 0401  | ~  |		.CONST	0x007e,0x0401
0240 007f 0002  |    |		.CONST	0x007f,0x0002
0242 008c 0003  |    |		.CONST	0x008c,0x0003
0244 ; --------------------------------------------------------------------------------------
0244 ; Debug3 Subtable 0x3
0244 ; --------------------------------------------------------------------------------------
0244 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0246 0093 0001  |    |		.CONST	0x0093,0x0001
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug3 Subtable 0x4
0248 ; --------------------------------------------------------------------------------------
0248 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
024a 009b ffff  |    |		.CONST	0x009b,0xffff
024c 00a3 0002  |    |		.CONST	0x00a3,0x0002
024e 00aa 0003  |    |		.CONST	0x00aa,0x0003
0250 00af 0001  |    |		.CONST	0x00af,0x0001
0252 ; --------------------------------------------------------------------------------------
0252 ; Debug3 Subtable 0x5
0252 ; --------------------------------------------------------------------------------------
0252 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0254 00bb 0001  |    |		.CONST	0x00bb,0x0001
0256 00c2 0002  |    |		.CONST	0x00c2,0x0002
0258 ; --------------------------------------------------------------------------------------
0258 ; Debug3 Subtable 0x6
0258 ; --------------------------------------------------------------------------------------
0258 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
025a 00cb 0001  |    |		.CONST	0x00cb,0x0001
025c 00d2 0002  |    |		.CONST	0x00d2,0x0002
025e ; --------------------------------------------------------------------------------------
025e ; Debug3 Subtable 0x7
025e ; --------------------------------------------------------------------------------------
025e 0002 0008  |    |		.DBG3TAB	0x0002,0x0008
0260 00db ffff  |    |		.CONST	0x00db,0xffff
0262 00dd fffe  |    |		.CONST	0x00dd,0xfffe
0264 00e3 0001  |    |		.CONST	0x00e3,0x0001
0266 00e6 0002  |    |		.CONST	0x00e6,0x0002
0268 00e9 0003  |    |		.CONST	0x00e9,0x0003
026a 00f0 0004  |    |		.CONST	0x00f0,0x0004
026c 00f6 0005  |    |		.CONST	0x00f6,0x0005
026e 00fa 0006  |    |		.CONST	0x00fa,0x0006
0270 00ff 0007  |    |		.CONST	0x00ff,0x0007
0272 0105 0008  |    |		.CONST	0x0105,0x0008
0274 ; --------------------------------------------------------------------------------------
0274 ; Debug3 Subtable 0x8
0274 ; --------------------------------------------------------------------------------------
0274 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0276 0113 0001  |    |		.CONST	0x0113,0x0001
0278 ; --------------------------------------------------------------------------------------
0278 ; Debug3 Subtable 0x9
0278 ; --------------------------------------------------------------------------------------
0278 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
027a 011b 0001  |    |		.CONST	0x011b,0x0001
027c ; --------------------------------------------------------------------------------------
027c ; Debug3 Subtable 0xa
027c ; --------------------------------------------------------------------------------------
027c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
027e 012b 0001  | +  |		.CONST	0x012b,0x0001
0280 ; --------------------------------------------------------------------------------------
0280 ; Debug3 Subtable 0xb
0280 ; --------------------------------------------------------------------------------------
0280 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0282 0133 0001  | 3  |		.CONST	0x0133,0x0001
0284 ; --------------------------------------------------------------------------------------
0284 ; Debug3 Subtable 0xc
0284 ; --------------------------------------------------------------------------------------
0284 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0286 013b 0001  | ;  |		.CONST	0x013b,0x0001
0288 ; --------------------------------------------------------------------------------------
0288 ; Debug3 Subtable 0xd
0288 ; --------------------------------------------------------------------------------------
0288 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
028a 0143 0001  | C  |		.CONST	0x0143,0x0001
028c ; --------------------------------------------------------------------------------------
028c ; Debug3 Subtable 0xe
028c ; --------------------------------------------------------------------------------------
028c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
028e 014b 0001  | K  |		.CONST	0x014b,0x0001
0290 ; --------------------------------------------------------------------------------------
0290 ; Debug3 Subtable 0xf
0290 ; --------------------------------------------------------------------------------------
0290 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0292 0000 0000  |    |		.BLANK	0000[0x16e]