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

⟦514bce966⟧

    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 0178       | x  |		.CONST	0x0178								; 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 0052       | R  |		.CONST	0x0052								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001e       |    |		.CONST	0x001e								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x0212,0x8000,0x0000,0x0058,0x5af5,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2 = 0xd,0xfffd
000e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0010 0129       | )  |		Execute	Any,Make_Visible
0011 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x15,0xfff9
0017 029a 008b  |    |		Declare_Subprogram	INIT_0088,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x17,0xfff8
0019 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x19,0xfff7
001b 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1b,0xfff6
001d 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1d,0xfff5
001f 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x1f,0xfff4
0021 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x21,0xfff3
0023 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x23,0xfff2
0025 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x25,0xfff1
0027 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x27,0xfff0
0029 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x29,0xffef
002b 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x2b,0xffee
002d 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x2d,0xffed
002f 00bf       |    |		Action	Accept_Activation
0030 029d 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call			; Debug Table 0x1 = .DEBUG	0x0030,0x023a,0x8000,0x0000,0x0058,0x5fa5,0x0000,0x0007
													; Debug Table 0x1.0x0 = 0x30,0xffff
0032 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x1 = 0x32,0xfffe
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x2 = 0x34,0xfffd
0035 00c7       |    |		Action	Elaborate_Subprogram
0036 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x3 = 0x36,0xfffc
0037 00c7       |    |		Action	Elaborate_Subprogram
0038 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x4 = 0x38,0xfffb
0039 00c7       |    |		Action	Elaborate_Subprogram
003a 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x5 = 0x3a,0xfffa
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x6 = 0x3c,0xfff9
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x7 = 0x3e,0xfff8
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x8 = 0x40,0xfff7
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 029d 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call			; Debug Table 0x1.0x9 = 0x42,0xfff6
0044 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xa = 0x44,0xfff5
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xb = 0x46,0xfff4
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xc = 0x48,0xfff3
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xd = 0x4a,0xfff2
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xe = 0x4c,0xfff1
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xf = 0x4e,0xfff0
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x10 = 0x50,0xffef
0051 00c7       |    |		Action	Elaborate_Subprogram
0052			BODY_0008:
0052 00bc       |    |		Action	Signal_Activated
0053 00bb       |    |		Action	Signal_Completion
0054 0000 0000  |    |		.BLANK	0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b       | [  |		.CONST	0x005b								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0001       |    |		.CONST	0x0001								; Number of locals
005b			BODY_0058:
005b			INIT_0058:
005b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2 = .DEBUG	0x005b,0x025e,0x0001,0x0000,0x0058,0x5af5,0x0000,0x001d
													; Debug Table 0x2.0x0 = 0x5b,0x1
005c 0217       |    |		Execute	Heap_Access,All_Reference
005d 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
005e 4802       |H   |		Short_Literal	0x2
005f e5ff       |    |		Load	0x2,-0x1
0060 e002       |    |		Load	0x0,0x2
0061 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0062 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0063 0000 0000  |    |		.BLANK	0000[0x5]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3 = .DEBUG	0x006b,0x0262,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0029
													; Debug Table 0x3.0x0 = 0x6b,0x1
006c 0217       |    |		Execute	Heap_Access,All_Reference
006d 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
006e 4800       |H   |		Short_Literal	0x0
006f e5ff       |    |		Load	0x2,-0x1
0070 e002       |    |		Load	0x0,0x2
0071 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0072 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0073 0000 0000  |    |		.BLANK	0000[0x5]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b       | {  |		.CONST	0x007b								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 0001       |    |		.CONST	0x0001								; Number of locals
007b			BODY_0078:
007b			INIT_0078:
007b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4 = .DEBUG	0x007b,0x0266,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0035
													; Debug Table 0x4.0x0 = 0x7b,0x1
007c 0217       |    |		Execute	Heap_Access,All_Reference
007d 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
007e 4803       |H   |		Short_Literal	0x3
007f e5ff       |    |		Load	0x2,-0x1
0080 e002       |    |		Load	0x0,0x2
0081 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0082 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0083 0000 0000  |    |		.BLANK	0000[0x5]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b       |    |		.CONST	0x008b								; Address of begin
0089 0004       |    |		.CONST	0x0004								; Address of exception handler
008a 0001       |    |		.CONST	0x0001								; Number of locals
008b			BODY_0088:
008b			INIT_0088:
008b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5 = .DEBUG	0x008b,0x026a,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0041
													; Debug Table 0x5.0x0 = 0x8b,0x1
008c 0217       |    |		Execute	Heap_Access,All_Reference
008d 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
008e 4805       |H   |		Short_Literal	0x5
008f e5ff       |    |		Load	0x2,-0x1
0090 e002       |    |		Load	0x0,0x2
0091 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0092 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x1 = 0x92,0x2
0093 4802       |H   |		Short_Literal	0x2
0094 821d       |    |		Call	0x1,0x1d
0095 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0096 0000 0000  |    |		.XXX[0x2]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b       |    |		.CONST	0x009b								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0001       |    |		.CONST	0x0001								; Number of locals
009b			BODY_0098:
009b			INIT_0098:
009b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6 = .DEBUG	0x009b,0x0270,0x0001,0x0000,0x0058,0x5af5,0x0000,0x004d
													; Debug Table 0x6.0x0 = 0x9b,0x1
009c 0217       |    |		Execute	Heap_Access,All_Reference
009d 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
009e 4807       |H   |		Short_Literal	0x7
009f e5ff       |    |		Load	0x2,-0x1
00a0 e002       |    |		Load	0x0,0x2
00a1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00a2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1 = 0xa2,0x2
00a3 4802       |H   |		Short_Literal	0x2
00a4 821d       |    |		Call	0x1,0x1d
00a5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
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 0x7 = .DEBUG	0x00ab,0x0276,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0059
													; Debug Table 0x7.0x0 = 0xab,0x1
00ac 0217       |    |		Execute	Heap_Access,All_Reference
00ad 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
00ae 4808       |H   |		Short_Literal	0x8
00af e5ff       |    |		Load	0x2,-0x1
00b0 e002       |    |		Load	0x0,0x2
00b1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x1 = 0xb2,0x2
00b3 4802       |H   |		Short_Literal	0x2
00b4 821d       |    |		Call	0x1,0x1d
00b5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00b6 0000 0000  |    |		.XXX[0x2]
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 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8 = .DEBUG	0x00bb,0x027c,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0065
													; Debug Table 0x8.0x0 = 0xbb,0x1
00bc 0217       |    |		Execute	Heap_Access,All_Reference
00bd 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
00be 4806       |H   |		Short_Literal	0x6
00bf e5ff       |    |		Load	0x2,-0x1
00c0 e002       |    |		Load	0x0,0x2
00c1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00c2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x1 = 0xc2,0x2
00c3 4801       |H   |		Short_Literal	0x1
00c4 821d       |    |		Call	0x1,0x1d
00c5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00c6 0000 0000  |    |		.XXX[0x2]
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 4802       |H   |		Short_Literal	0x2							; Debug Table 0x9 = .DEBUG	0x00cb,0x0282,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0071
													; Debug Table 0x9.0x0 = 0xcb,0x1
00cc e5fc       |    |		Load	0x2,-0x4
00cd e5fd       |    |		Load	0x2,-0x3
00ce e5fe       |    |		Load	0x2,-0x2
00cf e5ff       |    |		Load	0x2,-0x1
00d0 821e       |    |		Call	0x1,0x1e
00d1 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00d2 0000 0000  |    |		.BLANK	0000[0x6]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa = .DEBUG	0x00db,0x0286,0x0001,0x0000,0x0058,0x5af5,0x0000,0x008c
													; Debug Table 0xa.0x0 = 0xdb,0x1
00dc e5fc       |    |		Load	0x2,-0x4
00dd e5fd       |    |		Load	0x2,-0x3
00de e5fe       |    |		Load	0x2,-0x2
00df e5ff       |    |		Load	0x2,-0x1
00e0 821e       |    |		Call	0x1,0x1e
00e1 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00e2 0000 0000  |    |		.BLANK	0000[0x6]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 4803       |H   |		Short_Literal	0x3							; Debug Table 0xb = .DEBUG	0x00eb,0x028a,0x0001,0x0000,0x0058,0x5af5,0x0000,0x00a7
													; Debug Table 0xb.0x0 = 0xeb,0x1
00ec e5fc       |    |		Load	0x2,-0x4
00ed e5fd       |    |		Load	0x2,-0x3
00ee e5fe       |    |		Load	0x2,-0x2
00ef e5ff       |    |		Load	0x2,-0x1
00f0 821e       |    |		Call	0x1,0x1e
00f1 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00f2 0000 0000  |    |		.BLANK	0000[0x6]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb       |    |		.CONST	0x00fb								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0001       |    |		.CONST	0x0001								; Number of locals
00fb			BODY_00f8:
00fb			INIT_00f8:
00fb 4805       |H   |		Short_Literal	0x5							; Debug Table 0xc = .DEBUG	0x00fb,0x028e,0x0001,0x0000,0x0058,0x5af5,0x0000,0x00c2
													; Debug Table 0xc.0x0 = 0xfb,0x1
00fc e5fc       |    |		Load	0x2,-0x4
00fd e5fd       |    |		Load	0x2,-0x3
00fe e5fe       |    |		Load	0x2,-0x2
00ff e5ff       |    |		Load	0x2,-0x1
0100 821e       |    |		Call	0x1,0x1e
0101 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x1 = 0x101,0x2
0102 4802       |H   |		Short_Literal	0x2
0103 821d       |    |		Call	0x1,0x1d
0104 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0105 0000 0000  |    |		.XXX[0x3]
0107 0000       |    |
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 4807       |H   |		Short_Literal	0x7							; Debug Table 0xd = .DEBUG	0x010b,0x0294,0x0001,0x0000,0x0058,0x5af5,0x0000,0x00dd
													; Debug Table 0xd.0x0 = 0x10b,0x1
010c e5fc       |    |		Load	0x2,-0x4
010d e5fd       |    |		Load	0x2,-0x3
010e e5fe       |    |		Load	0x2,-0x2
010f e5ff       |    |		Load	0x2,-0x1
0110 821e       |    |		Call	0x1,0x1e
0111 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x1 = 0x111,0x2
0112 4802       |H   |		Short_Literal	0x2
0113 821d       |    |		Call	0x1,0x1d
0114 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0115 0000 0000  |    |		.XXX[0x3]
0117 0000       |    |
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 4806       |H   |		Short_Literal	0x6							; Debug Table 0xe = .DEBUG	0x011b,0x029a,0x0001,0x0000,0x0058,0x5af5,0x0000,0x00f8
													; Debug Table 0xe.0x0 = 0x11b,0x1
011c e5fc       |    |		Load	0x2,-0x4
011d e5fd       |    |		Load	0x2,-0x3
011e e5fe       |    |		Load	0x2,-0x2
011f e5ff       |    |		Load	0x2,-0x1
0120 821e       |    |		Call	0x1,0x1e
0121 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x1 = 0x121,0x2
0122 4801       |H   |		Short_Literal	0x1
0123 821d       |    |		Call	0x1,0x1d
0124 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0125 0000 0000  |    |		.XXX[0x3]
0127 0000       |    |
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 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xf = .DEBUG	0x012b,0x02a0,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0113
													; Debug Table 0xf.0x0 = 0x12b,0x1
012c 0217       |    |		Execute	Heap_Access,All_Reference
012d 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
012e 4801       |H   |		Short_Literal	0x1
012f e5ff       |    |		Load	0x2,-0x1
0130 e002       |    |		Load	0x0,0x2
0131 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0132 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0133 0000 0000  |    |		.BLANK	0000[0x5]
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 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10 = .DEBUG	0x013b,0x02a4,0x0001,0x0000,0x0058,0x5af5,0x0000,0x011f
													; Debug Table 0x10.0x0 = 0x13b,0x1
013c e5fc       |    |		Load	0x2,-0x4
013d e5fd       |    |		Load	0x2,-0x3
013e e5fe       |    |		Load	0x2,-0x2
013f e5ff       |    |		Load	0x2,-0x1
0140 821e       |    |		Call	0x1,0x1e
0141 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0142 0000 0000  |    |		.BLANK	0000[0x6]
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 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11 = .DEBUG	0x014b,0x02a8,0x0001,0x0000,0x0058,0x5fa5,0x0000,0x0008
													; Debug Table 0x11.0x0 = 0x14b,0x1
014c 0217       |    |		Execute	Heap_Access,All_Reference
014d 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
014e 00db       |    |		Load_Top	At_Offset_3
014f 027c       | |  |		Execute	Discrete,Less
0150 6804       |h   |		Jump_Zero	0x155
0151 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x1 = 0x151,0x2
0152 e5fe       |    |		Load	0x2,-0x2
0153 0217       |    |		Execute	Heap_Access,All_Reference
0154 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
0155 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0156 0000 0000  |    |		.XXX[0x2]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b       | [  |		.CONST	0x015b								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0001       |    |		.CONST	0x0001								; Number of locals
015b			BODY_0158:
015b			INIT_0158:
015b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x12 = .DEBUG	0x015b,0x02ae,0x0001,0x0000,0x0058,0x5fa5,0x0000,0x0127
													; Debug Table 0x12.0x0 = 0x15b,0x1
015c e003       |    |		Load	0x0,0x3
015d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
015e 6808       |h   |		Jump_Zero	0x167
015f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x1 = 0x15f,0x2
0160 0217       |    |		Execute	Heap_Access,All_Reference
0161 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0162 e5fb       |    |		Load	0x2,-0x5
0163 e5ff       |    |		Load	0x2,-0x1
0164 e002       |    |		Load	0x0,0x2
0165 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0166 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0167 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x2 = 0x167,0x3
0168 0217       |    |		Execute	Heap_Access,All_Reference
0169 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
016a e5fb       |    |		Load	0x2,-0x5
016b e5fc       |    |		Load	0x2,-0x4
016c e5ff       |    |		Load	0x2,-0x1
016d e5fd       |    |		Load	0x2,-0x3
016e e002       |    |		Load	0x0,0x2
016f 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0170 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0171 0000 0000  |    |		.BLANK	0000[0x7]
0178 ; --------------------------------------------------------------------------------------
0178 ; Debug Table
0178 ; --------------------------------------------------------------------------------------
0178 0003 0013  |    |		.CONST	0x0003,0x0013
017a 000b 0212  |    |		.DEBUG	0x000b,0x0212,0x8000,0x0000,0x0058,0x5af5,0x0000,0x0009
0182 0030 023a  | 0 :|		.DEBUG	0x0030,0x023a,0x8000,0x0000,0x0058,0x5fa5,0x0000,0x0007
018a 005b 025e  | [ ^|		.DEBUG	0x005b,0x025e,0x0001,0x0000,0x0058,0x5af5,0x0000,0x001d
0192 006b 0262  | k b|		.DEBUG	0x006b,0x0262,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0029
019a 007b 0266  | { f|		.DEBUG	0x007b,0x0266,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0035
01a2 008b 026a  |   j|		.DEBUG	0x008b,0x026a,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0041
01aa 009b 0270  |   p|		.DEBUG	0x009b,0x0270,0x0001,0x0000,0x0058,0x5af5,0x0000,0x004d
01b2 00ab 0276  |   v|		.DEBUG	0x00ab,0x0276,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0059
01ba 00bb 027c  |   ||		.DEBUG	0x00bb,0x027c,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0065
01c2 00cb 0282  |    |		.DEBUG	0x00cb,0x0282,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0071
01ca 00db 0286  |    |		.DEBUG	0x00db,0x0286,0x0001,0x0000,0x0058,0x5af5,0x0000,0x008c
01d2 00eb 028a  |    |		.DEBUG	0x00eb,0x028a,0x0001,0x0000,0x0058,0x5af5,0x0000,0x00a7
01da 00fb 028e  |    |		.DEBUG	0x00fb,0x028e,0x0001,0x0000,0x0058,0x5af5,0x0000,0x00c2
01e2 010b 0294  |    |		.DEBUG	0x010b,0x0294,0x0001,0x0000,0x0058,0x5af5,0x0000,0x00dd
01ea 011b 029a  |    |		.DEBUG	0x011b,0x029a,0x0001,0x0000,0x0058,0x5af5,0x0000,0x00f8
01f2 012b 02a0  | +  |		.DEBUG	0x012b,0x02a0,0x0001,0x0000,0x0058,0x5af5,0x0000,0x0113
01fa 013b 02a4  | ;  |		.DEBUG	0x013b,0x02a4,0x0001,0x0000,0x0058,0x5af5,0x0000,0x011f
0202 014b 02a8  | K  |		.DEBUG	0x014b,0x02a8,0x0001,0x0000,0x0058,0x5fa5,0x0000,0x0008
020a 015b 02ae  | [  |		.DEBUG	0x015b,0x02ae,0x0001,0x0000,0x0058,0x5fa5,0x0000,0x0127
0212 ; --------------------------------------------------------------------------------------
0212 ; Debug3 Subtable 0x0
0212 ; --------------------------------------------------------------------------------------
0212 0013 0000  |    |		.DBG3TAB	0x0013,0x0000
0214 000b ffff  |    |		.CONST	0x000b,0xffff
0216 000c fffe  |    |		.CONST	0x000c,0xfffe
0218 000d fffd  |    |		.CONST	0x000d,0xfffd
021a 000e fffc  |    |		.CONST	0x000e,0xfffc
021c 0011 fffb  |    |		.CONST	0x0011,0xfffb
021e 0013 fffa  |    |		.CONST	0x0013,0xfffa
0220 0015 fff9  |    |		.CONST	0x0015,0xfff9
0222 0017 fff8  |    |		.CONST	0x0017,0xfff8
0224 0019 fff7  |    |		.CONST	0x0019,0xfff7
0226 001b fff6  |    |		.CONST	0x001b,0xfff6
0228 001d fff5  |    |		.CONST	0x001d,0xfff5
022a 001f fff4  |    |		.CONST	0x001f,0xfff4
022c 0021 fff3  | !  |		.CONST	0x0021,0xfff3
022e 0023 fff2  | #  |		.CONST	0x0023,0xfff2
0230 0025 fff1  | %  |		.CONST	0x0025,0xfff1
0232 0027 fff0  | '  |		.CONST	0x0027,0xfff0
0234 0029 ffef  | )  |		.CONST	0x0029,0xffef
0236 002b ffee  | +  |		.CONST	0x002b,0xffee
0238 002d ffed  | -  |		.CONST	0x002d,0xffed
023a ; --------------------------------------------------------------------------------------
023a ; Debug3 Subtable 0x1
023a ; --------------------------------------------------------------------------------------
023a 0011 0000  |    |		.DBG3TAB	0x0011,0x0000
023c 0030 ffff  | 0  |		.CONST	0x0030,0xffff
023e 0032 fffe  | 2  |		.CONST	0x0032,0xfffe
0240 0034 fffd  | 4  |		.CONST	0x0034,0xfffd
0242 0036 fffc  | 6  |		.CONST	0x0036,0xfffc
0244 0038 fffb  | 8  |		.CONST	0x0038,0xfffb
0246 003a fffa  | :  |		.CONST	0x003a,0xfffa
0248 003c fff9  | <  |		.CONST	0x003c,0xfff9
024a 003e fff8  | >  |		.CONST	0x003e,0xfff8
024c 0040 fff7  | @  |		.CONST	0x0040,0xfff7
024e 0042 fff6  | B  |		.CONST	0x0042,0xfff6
0250 0044 fff5  | D  |		.CONST	0x0044,0xfff5
0252 0046 fff4  | F  |		.CONST	0x0046,0xfff4
0254 0048 fff3  | H  |		.CONST	0x0048,0xfff3
0256 004a fff2  | J  |		.CONST	0x004a,0xfff2
0258 004c fff1  | L  |		.CONST	0x004c,0xfff1
025a 004e fff0  | N  |		.CONST	0x004e,0xfff0
025c 0050 ffef  | P  |		.CONST	0x0050,0xffef
025e ; --------------------------------------------------------------------------------------
025e ; Debug3 Subtable 0x2
025e ; --------------------------------------------------------------------------------------
025e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0260 005b 0001  | [  |		.CONST	0x005b,0x0001
0262 ; --------------------------------------------------------------------------------------
0262 ; Debug3 Subtable 0x3
0262 ; --------------------------------------------------------------------------------------
0262 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0264 006b 0001  | k  |		.CONST	0x006b,0x0001
0266 ; --------------------------------------------------------------------------------------
0266 ; Debug3 Subtable 0x4
0266 ; --------------------------------------------------------------------------------------
0266 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0268 007b 0001  | {  |		.CONST	0x007b,0x0001
026a ; --------------------------------------------------------------------------------------
026a ; Debug3 Subtable 0x5
026a ; --------------------------------------------------------------------------------------
026a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
026c 008b 0001  |    |		.CONST	0x008b,0x0001
026e 0092 0002  |    |		.CONST	0x0092,0x0002
0270 ; --------------------------------------------------------------------------------------
0270 ; Debug3 Subtable 0x6
0270 ; --------------------------------------------------------------------------------------
0270 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0272 009b 0001  |    |		.CONST	0x009b,0x0001
0274 00a2 0002  |    |		.CONST	0x00a2,0x0002
0276 ; --------------------------------------------------------------------------------------
0276 ; Debug3 Subtable 0x7
0276 ; --------------------------------------------------------------------------------------
0276 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0278 00ab 0001  |    |		.CONST	0x00ab,0x0001
027a 00b2 0002  |    |		.CONST	0x00b2,0x0002
027c ; --------------------------------------------------------------------------------------
027c ; Debug3 Subtable 0x8
027c ; --------------------------------------------------------------------------------------
027c 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
027e 00bb 0001  |    |		.CONST	0x00bb,0x0001
0280 00c2 0002  |    |		.CONST	0x00c2,0x0002
0282 ; --------------------------------------------------------------------------------------
0282 ; Debug3 Subtable 0x9
0282 ; --------------------------------------------------------------------------------------
0282 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0284 00cb 0001  |    |		.CONST	0x00cb,0x0001
0286 ; --------------------------------------------------------------------------------------
0286 ; Debug3 Subtable 0xa
0286 ; --------------------------------------------------------------------------------------
0286 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0288 00db 0001  |    |		.CONST	0x00db,0x0001
028a ; --------------------------------------------------------------------------------------
028a ; Debug3 Subtable 0xb
028a ; --------------------------------------------------------------------------------------
028a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
028c 00eb 0001  |    |		.CONST	0x00eb,0x0001
028e ; --------------------------------------------------------------------------------------
028e ; Debug3 Subtable 0xc
028e ; --------------------------------------------------------------------------------------
028e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0290 00fb 0001  |    |		.CONST	0x00fb,0x0001
0292 0101 0002  |    |		.CONST	0x0101,0x0002
0294 ; --------------------------------------------------------------------------------------
0294 ; Debug3 Subtable 0xd
0294 ; --------------------------------------------------------------------------------------
0294 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0296 010b 0001  |    |		.CONST	0x010b,0x0001
0298 0111 0002  |    |		.CONST	0x0111,0x0002
029a ; --------------------------------------------------------------------------------------
029a ; Debug3 Subtable 0xe
029a ; --------------------------------------------------------------------------------------
029a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
029c 011b 0001  |    |		.CONST	0x011b,0x0001
029e 0121 0002  | !  |		.CONST	0x0121,0x0002
02a0 ; --------------------------------------------------------------------------------------
02a0 ; Debug3 Subtable 0xf
02a0 ; --------------------------------------------------------------------------------------
02a0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
02a2 012b 0001  | +  |		.CONST	0x012b,0x0001
02a4 ; --------------------------------------------------------------------------------------
02a4 ; Debug3 Subtable 0x10
02a4 ; --------------------------------------------------------------------------------------
02a4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
02a6 013b 0001  | ;  |		.CONST	0x013b,0x0001
02a8 ; --------------------------------------------------------------------------------------
02a8 ; Debug3 Subtable 0x11
02a8 ; --------------------------------------------------------------------------------------
02a8 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
02aa 014b 0001  | K  |		.CONST	0x014b,0x0001
02ac 0151 0002  | Q  |		.CONST	0x0151,0x0002
02ae ; --------------------------------------------------------------------------------------
02ae ; Debug3 Subtable 0x12
02ae ; --------------------------------------------------------------------------------------
02ae 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
02b0 015b 0001  | [  |		.CONST	0x015b,0x0001
02b2 015f 0002  | _  |		.CONST	0x015f,0x0002
02b4 0167 0003  | g  |		.CONST	0x0167,0x0003
02b6 0000 0000  |    |		.BLANK	0000[0x14a]