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

⟦620ec35e6⟧

    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 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 0090       |    |		.CONST	0x0090								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0021       | !  |		.CONST	0x0021								; Number of locals
000b			INIT_0008:
000b 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x01e2,0x8000,0x0000,0x0059,0x8a15,0x0000,0x0010
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
													; Debug Table 0x0.0x3 = 0xb,0xfffc
000d 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0xd,0xfffb
000f 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0xf,0xfffa
0011 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x11,0xfff9
0013 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x13,0xfff8
0015 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x15,0xfff7
0017 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x17,0xfff6
0019 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0xa = 0x19,0xfff5
001a 032b       | +  |		Declare_Type	Record,Incomplete,Visible
001b 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x1b,0xfff4
001d 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x1d,0xfff3
001f 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x1f,0xfff2
0021 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x21,0xfff1
0023 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0xf = 0x23,0xfff0
0024 614f       |aO  |		Indirect_Literal	Discrete,0x174,{0x006be00e, 0x000000b0}
0025 02a0       |    |		Declare_Subprogram	Null_Subprogram
0026 038f       |    |		Declare_Type	Package,Defined,Visible
0027 e001       |    |		Load	0x0,0x1
0028 4801       |H   |		Short_Literal	0x1
0029 00da       |    |		Load_Top	At_Offset_2
002a 020e       |    |		Execute	Module,Augment_Imports
002b 0386       |    |		Declare_Variable	Package,Visible
002c 6143       |aC  |		Indirect_Literal	Discrete,0x170,{0x00000000, 0x598a1501}		; Debug Table 0x0.0x10 = 0x2c,0xffef
002d 0129       | )  |		Execute	Any,Make_Visible
002e 613d       |a=  |		Indirect_Literal	Discrete,0x16c,{0x00000000, 0x598a1502}		; Debug Table 0x0.0x11 = 0x2e,0xffee
002f 0129       | )  |		Execute	Any,Make_Visible
0030 6137       |a7  |		Indirect_Literal	Discrete,0x168,{0x00000000, 0x00598a15}		; Debug Table 0x0.0x12 = 0x30,0xffed
													; Debug Table 0x0.0x13 = 0x30,0xffec
													; Debug Table 0x0.0x14 = 0x30,0xffeb
													; Debug Table 0x0.0x15 = 0x30,0xffea
													; Debug Table 0x0.0x16 = 0x30,0xffe9
0031 4977       |Iw  |		Short_Literal	0x177
0032 4865       |He  |		Short_Literal	0x65
0033 e002       |    |		Load	0x0,0x2
0034 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0035 00ec       |    |		Load_Encached	Diana_Tree_Cache
0036 e002       |    |		Load	0x0,0x2
0037 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
0038 e003       |    |		Load	0x0,0x3
0039 0386       |    |		Declare_Variable	Package,Visible
003a 00d8       |    |		Load_Top	At_Offset_0
003b 020f       |    |		Execute	Module,Activate
003c 612b       |a+  |		Indirect_Literal	Discrete,0x168,{0x00000000, 0x00598a15}		; Debug Table 0x0.0x17 = 0x3c,0xffe8
003d 498e       |I   |		Short_Literal	0x18e
003e 4865       |He  |		Short_Literal	0x65
003f 00ec       |    |		Load_Encached	Diana_Tree_Cache
0040 e002       |    |		Load	0x0,0x2
0041 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0042 00eb       |    |		Load_Encached	Diana_Cache
0043 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
0044 e003       |    |		Load	0x0,0x3
0045 0386       |    |		Declare_Variable	Package,Visible
0046 00d8       |    |		Load_Top	At_Offset_0
0047 020f       |    |		Execute	Module,Activate
0048 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x0.0x18 = 0x48,0xffe7
0049 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
004a 02a0       |    |		Declare_Subprogram	Null_Subprogram
004b e214       |    |		Load	0x1,0x14
004c 0326       | &  |		Complete_Type	Record,By_Defining
004d 00bf       |    |		Action	Accept_Activation
004e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1 = .DEBUG	0x004e,0x0216,0x8000,0x0000,0x0059,0x8d45,0x0000,0x0003
													; Debug Table 0x1.0x0 = 0x4e,0xffff
004f 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0050 03be       |    |		Declare_Variable	Access,Visible
0051 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x1 = 0x51,0xfffe
0052 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0053 03be       |    |		Declare_Variable	Access,Visible
0054 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x2 = 0x54,0xfffd
0055 483f       |H?  |		Short_Literal	0x3f
0056 00e1       |    |		Load_Encached	Boolean_Cache
0057 02a0       |    |		Declare_Subprogram	Null_Subprogram
0058 4801       |H   |		Short_Literal	0x1
0059 035e       | ^  |		Declare_Type	Array,Defined,Visible
005a 00d8       |    |		Load_Top	At_Offset_0
005b 0336       | 6  |		Declare_Variable	Array,Visible
005c 00d8       |    |		Load_Top	At_Offset_0
005d 0337       | 7  |		Declare_Variable	Array
005e 483f       |H?  |		Short_Literal	0x3f
005f 4800       |H   |		Short_Literal	0x0
0060 4800       |H   |		Short_Literal	0x0
0061 00d9       |    |		Load_Top	At_Offset_1
0062 e222       | "  |		Load	0x1,0x22
0063 01d6       |    |		Execute	Vector,Field_Write
0064 3ffb       |?   |		Loop_Increasing	0x60
0065 00d9       |    |		Load_Top	At_Offset_1
0066 01d4       |    |		Execute	Vector,Structure_Write
0067 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x3 = 0x67,0xfffc
0068 00c7       |    |		Action	Elaborate_Subprogram
0069 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x4 = 0x69,0xfffb
006a 00c7       |    |		Action	Elaborate_Subprogram
006b 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x5 = 0x6b,0xfffa
006c 00c7       |    |		Action	Elaborate_Subprogram
006d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x6 = 0x6d,0xfff9
006e 00c7       |    |		Action	Elaborate_Subprogram
006f 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x7 = 0x6f,0xfff8
0070 00c7       |    |		Action	Elaborate_Subprogram
0071 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x8 = 0x71,0xfff7
0072 00c7       |    |		Action	Elaborate_Subprogram
0073 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x9 = 0x73,0xfff6
0074 00c7       |    |		Action	Elaborate_Subprogram
0075 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xa = 0x75,0xfff5
0076 00c7       |    |		Action	Elaborate_Subprogram
0077 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xb = 0x77,0xfff4
0078 00c7       |    |		Action	Elaborate_Subprogram
0079 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xc = 0x79,0xfff3
007a 00c7       |    |		Action	Elaborate_Subprogram
007b 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xd = 0x7b,0xfff2
007c 00c7       |    |		Action	Elaborate_Subprogram
007d e004       |    |		Load	0x0,0x4								; Debug Table 0x1.0xe = 0x7d,0xfff1
007e e005       |    |		Load	0x0,0x5
007f e006       |    |		Load	0x0,0x6
0080 e007       |    |		Load	0x0,0x7
0081 e008       |    |		Load	0x0,0x8
0082 e009       |    |		Load	0x0,0x9
0083 e00a       |    |		Load	0x0,0xa
0084 e00b       |    |		Load	0x0,0xb
0085 e00c       |    |		Load	0x0,0xc
0086 e00d       |    |		Load	0x0,0xd
0087 e00e       |    |		Load	0x0,0xe
0088 e00f       |    |		Load	0x0,0xf
0089 e010       |    |		Load	0x0,0x10
008a e011       |    |		Load	0x0,0x11
008b 480e       |H   |		Short_Literal	0xe
008c e219       |    |		Load	0x1,0x19
008d 020e       |    |		Execute	Module,Augment_Imports
008e e219       |    |		Load	0x1,0x19
008f 020f       |    |		Execute	Module,Activate
0090			BODY_0008:
0090 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x1.0xf = 0x90,0x1
0091 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0092 4865       |He  |		Short_Literal	0x65
0093 e21c       |    |		Load	0x1,0x1c
0094 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0095 c21e       |    |		Store	0x1,0x1e
0096 e21d       |    |		Load	0x1,0x1d							; Debug Table 0x1.0x10 = 0x96,0x2
0097 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0098 4865       |He  |		Short_Literal	0x65
0099 e21d       |    |		Load	0x1,0x1d
009a 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
009b 003b       | ;  |		Store_Top	Access,At_Offset_3
009c 00bc       |    |		Action	Signal_Activated
009d 00bb       |    |		Action	Signal_Completion
009e 0000 0000  |    |		.XXX[0x2]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3       |    |		.CONST	0x00a3								; Address of begin
00a1 00bb       |    |		.CONST	0x00bb								; Address of exception handler
00a2 0001       |    |		.CONST	0x0001								; Number of locals
00a3			BODY_00a0:
00a3			INIT_00a0:
00a3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x00a3,0x023a,0x0002,0x0000,0x0059,0x8a15,0x0000,0x0022
													; Debug Table 0x2.0x0 = 0xa3,0x1
00a4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00a5 e221       | !  |		Load	0x1,0x21
00a6 01d7       |    |		Execute	Vector,Field_Read
00a7 680e       |h   |		Jump_Zero	0xb6
00a8 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x1 = 0xa8,0x2
00a9 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00aa 0322       | "  |		Declare_Variable	Record
00ab 00db       |    |		Load_Top	At_Offset_3
00ac 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ad 00d9       |    |		Load_Top	At_Offset_1
00ae 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00af 4800       |H   |		Short_Literal	0x0
00b0 00d9       |    |		Load_Top	At_Offset_1
00b1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00b2 e21e       |    |		Load	0x1,0x1e
00b3 e21c       |    |		Load	0x1,0x1c
00b4 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00b5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x2 = 0xb6,0x3
00b7 e21e       |    |		Load	0x1,0x1e
00b8 e21c       |    |		Load	0x1,0x1c
00b9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00ba 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00bb			TRAP_00a0:
00bb e21c       |    |		Load	0x1,0x1c
00bc 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
00bd 010f       |    |		Execute	Exception,Equal
00be 6802       |h   |		Jump_Zero	0xc1
00bf e21a       |    |		Load	0x1,0x1a							; Debug Table 0x2.0x3 = 0xbf,0x4
00c0 0257       | W  |		Execute	Discrete,Raise
00c1 0100       |    |		Execute	Exception,Raise
00c2 0000 0000  |    |		.BLANK	0000[0x6]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 00d0       |    |		.CONST	0x00d0								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00cb,0x0244,0x0002,0x0000,0x0059,0x8a15,0x0000,0x002f
													; Debug Table 0x3.0x0 = 0xcb,0x1
00cc e21f       |    |		Load	0x1,0x1f
00cd e21d       |    |		Load	0x1,0x1d
00ce 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00cf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d0			TRAP_00c8:
00d0 e21d       |    |		Load	0x1,0x1d
00d1 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
00d2 010f       |    |		Execute	Exception,Equal
00d3 6802       |h   |		Jump_Zero	0xd6
00d4 e21a       |    |		Load	0x1,0x1a							; Debug Table 0x3.0x1 = 0xd4,0x2
00d5 0257       | W  |		Execute	Discrete,Raise
00d6 0100       |    |		Execute	Exception,Raise
00d7 0000       |    |		.XXX[0x1]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 00ea       |    |		.CONST	0x00ea								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db e21e       |    |		Load	0x1,0x1e							; Debug Table 0x4 = .DEBUG	0x00db,0x024a,0x0001,0x0000,0x0059,0x8a15,0x0000,0x003c
													; Debug Table 0x4.0x0 = 0xdb,0x1
00dc e5fd       |    |		Load	0x2,-0x3
00dd e5fe       |    |		Load	0x2,-0x2
00de e5ff       |    |		Load	0x2,-0x1
00df e21c       |    |		Load	0x1,0x1c
00e0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00e1 c21e       |    |		Store	0x1,0x1e
00e2 e21f       |    |		Load	0x1,0x1f							; Debug Table 0x4.0x1 = 0xe2,0x2
00e3 e5fd       |    |		Load	0x2,-0x3
00e4 e5ff       |    |		Load	0x2,-0x1
00e5 e5fe       |    |		Load	0x2,-0x2
00e6 e21d       |    |		Load	0x1,0x1d
00e7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00e8 c21f       |    |		Store	0x1,0x1f
00e9 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00ea			TRAP_00d8:
00ea 0007       |    |		Action	Break_Optional
00eb e21b       |    |		Load	0x1,0x1b							; Debug Table 0x4.0x2 = 0xeb,0x3
00ec 0257       | W  |		Execute	Discrete,Raise
00ed 0000 0000  |    |		.XXX[0x3]
00ef 0000       |    |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00fc       |    |		.CONST	0x00fc								; Address of begin
00f1 010f       |    |		.CONST	0x010f								; Address of exception handler
00f2 0002       |    |		.CONST	0x0002								; Number of locals
00f3			INIT_00f0:
00f3 e002       |    |		Load	0x0,0x2								; Debug Table 0x5 = .DEBUG	0x00f3,0x0252,0x0001,0x0000,0x0059,0x8a15,0x0000,0x0051
													; Debug Table 0x5.0x0 = 0xf3,0xffff
00f4 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00f5 0322       | "  |		Declare_Variable	Record
00f6 00db       |    |		Load_Top	At_Offset_3
00f7 00d9       |    |		Load_Top	At_Offset_1
00f8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f9 4800       |H   |		Short_Literal	0x0
00fa 00d9       |    |		Load_Top	At_Offset_1
00fb 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fc			BODY_00f0:
00fc 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x1 = 0xfc,0x1
00fd e5ff       |    |		Load	0x2,-0x1
00fe e221       | !  |		Load	0x1,0x21
00ff 01d6       |    |		Execute	Vector,Field_Write
0100 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x5.0x2 = 0x100,0x2
0101 e5fd       |    |		Load	0x2,-0x3
0102 e5fe       |    |		Load	0x2,-0x2
0103 00db       |    |		Load_Top	At_Offset_3
0104 e21c       |    |		Load	0x1,0x1c
0105 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0106 c21e       |    |		Store	0x1,0x1e
0107 e21f       |    |		Load	0x1,0x1f							; Debug Table 0x5.0x3 = 0x107,0x3
0108 e5fd       |    |		Load	0x2,-0x3
0109 00da       |    |		Load_Top	At_Offset_2
010a e5fe       |    |		Load	0x2,-0x2
010b e21d       |    |		Load	0x1,0x1d
010c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
010d c21f       |    |		Store	0x1,0x1f
010e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
010f			TRAP_00f0:
010f 0007       |    |		Action	Break_Optional
0110 e21b       |    |		Load	0x1,0x1b							; Debug Table 0x5.0x4 = 0x110,0x4
0111 0257       | W  |		Execute	Discrete,Raise
0112 0000 0000  |    |		.BLANK	0000[0x6]
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 0x6 = .DEBUG	0x011b,0x025e,0x0002,0x0000,0x0059,0x8a15,0x0000,0x0066
													; Debug Table 0x6.0x0 = 0x11b,0x1
011c e221       | !  |		Load	0x1,0x21
011d 01d7       |    |		Execute	Vector,Field_Read
011e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
011f 0000       |    |		.XXX[0x1]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 e21f       |    |		Load	0x1,0x1f							; Debug Table 0x7 = .DEBUG	0x0123,0x0262,0x0001,0x0000,0x0059,0x8a15,0x0000,0x0071
													; Debug Table 0x7.0x0 = 0x123,0x1
0124 00db       |    |		Load_Top	At_Offset_3
0125 820d       |    |		Call	0x1,0xd
0126 e21d       |    |		Load	0x1,0x1d
0127 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0128 c21f       |    |		Store	0x1,0x1f
0129 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x7.0x1 = 0x129,0x2
012a 00db       |    |		Load_Top	At_Offset_3
012b e21c       |    |		Load	0x1,0x1c
012c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
012d c21e       |    |		Store	0x1,0x1e
012e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
012f 0000       |    |		.XXX[0x1]
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 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x8 = .DEBUG	0x0133,0x0268,0x0001,0x0000,0x0059,0x8a15,0x0000,0x007b
													; Debug Table 0x8.0x0 = 0x133,0x1
0134 00db       |    |		Load_Top	At_Offset_3
0135 820e       |    |		Call	0x1,0xe
0136 e21c       |    |		Load	0x1,0x1c
0137 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0138 c21e       |    |		Store	0x1,0x1e
0139 e21f       |    |		Load	0x1,0x1f							; Debug Table 0x8.0x1 = 0x139,0x2
013a 00db       |    |		Load_Top	At_Offset_3
013b e21d       |    |		Load	0x1,0x1d
013c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
013d c21f       |    |		Store	0x1,0x1f
013e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
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 0x9 = .DEBUG	0x0143,0x026e,0x0001,0x0000,0x0059,0x8a15,0x0000,0x0089
													; Debug Table 0x9.0x0 = 0x143,0x1
0144 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0145 e21e       |    |		Load	0x1,0x1e
0146 e21c       |    |		Load	0x1,0x1c
0147 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0148 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0149 0000 0000  |    |		.BLANK	0000[0x7]
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x0153,0x0272,0x0001,0x0000,0x0059,0x8a15,0x0000,0x0091
													; Debug Table 0xa.0x0 = 0x153,0x1
0154 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0155 e21c       |    |		Load	0x1,0x1c
0156 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0157 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x015b,0x0276,0x0002,0x0000,0x0059,0x8a15,0x0000,0x0099
													; Debug Table 0xb.0x0 = 0x15b,0x1
015c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
015d e21c       |    |		Load	0x1,0x1c
015e 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
015f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x0163,0x027a,0x0002,0x0000,0x0059,0x8a15,0x0000,0x00a4
													; Debug Table 0xc.0x0 = 0x163,0x1
0164 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0165 e21c       |    |		Load	0x1,0x1c
0166 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0167 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0168 0000 0000  |    |		.LITERAL	{0x00000000, 0x00598a15}
016c 0000 0000  |    |		.LITERAL	{0x00000000, 0x598a1502}
0170 0000 0000  |    |		.LITERAL	{0x00000000, 0x598a1501}
0174 006b e00e  | k  |		.LITERAL	{0x006be00e, 0x000000b0}
0178 ; --------------------------------------------------------------------------------------
0178 ; Debug Table
0178 ; --------------------------------------------------------------------------------------
0178 0003 000d  |    |		.CONST	0x0003,0x000d
017a 000b 01e2  |    |		.DEBUG	0x000b,0x01e2,0x8000,0x0000,0x0059,0x8a15,0x0000,0x0010
0182 004e 0216  | N  |		.DEBUG	0x004e,0x0216,0x8000,0x0000,0x0059,0x8d45,0x0000,0x0003
018a 00a3 023a  |   :|		.DEBUG	0x00a3,0x023a,0x0002,0x0000,0x0059,0x8a15,0x0000,0x0022
0192 00cb 0244  |   D|		.DEBUG	0x00cb,0x0244,0x0002,0x0000,0x0059,0x8a15,0x0000,0x002f
019a 00db 024a  |   J|		.DEBUG	0x00db,0x024a,0x0001,0x0000,0x0059,0x8a15,0x0000,0x003c
01a2 00f3 0252  |   R|		.DEBUG	0x00f3,0x0252,0x0001,0x0000,0x0059,0x8a15,0x0000,0x0051
01aa 011b 025e  |   ^|		.DEBUG	0x011b,0x025e,0x0002,0x0000,0x0059,0x8a15,0x0000,0x0066
01b2 0123 0262  | # b|		.DEBUG	0x0123,0x0262,0x0001,0x0000,0x0059,0x8a15,0x0000,0x0071
01ba 0133 0268  | 3 h|		.DEBUG	0x0133,0x0268,0x0001,0x0000,0x0059,0x8a15,0x0000,0x007b
01c2 0143 026e  | C n|		.DEBUG	0x0143,0x026e,0x0001,0x0000,0x0059,0x8a15,0x0000,0x0089
01ca 0153 0272  | S r|		.DEBUG	0x0153,0x0272,0x0001,0x0000,0x0059,0x8a15,0x0000,0x0091
01d2 015b 0276  | [ v|		.DEBUG	0x015b,0x0276,0x0002,0x0000,0x0059,0x8a15,0x0000,0x0099
01da 0163 027a  | c z|		.DEBUG	0x0163,0x027a,0x0002,0x0000,0x0059,0x8a15,0x0000,0x00a4
01e2 ; --------------------------------------------------------------------------------------
01e2 ; Debug3 Subtable 0x0
01e2 ; --------------------------------------------------------------------------------------
01e2 0019 0000  |    |		.DBG3TAB	0x0019,0x0000
01e4 000b ffff  |    |		.CONST	0x000b,0xffff
01e6 000b fffe  |    |		.CONST	0x000b,0xfffe
01e8 000b fffd  |    |		.CONST	0x000b,0xfffd
01ea 000b fffc  |    |		.CONST	0x000b,0xfffc
01ec 000d fffb  |    |		.CONST	0x000d,0xfffb
01ee 000f fffa  |    |		.CONST	0x000f,0xfffa
01f0 0011 fff9  |    |		.CONST	0x0011,0xfff9
01f2 0013 fff8  |    |		.CONST	0x0013,0xfff8
01f4 0015 fff7  |    |		.CONST	0x0015,0xfff7
01f6 0017 fff6  |    |		.CONST	0x0017,0xfff6
01f8 0019 fff5  |    |		.CONST	0x0019,0xfff5
01fa 001b fff4  |    |		.CONST	0x001b,0xfff4
01fc 001d fff3  |    |		.CONST	0x001d,0xfff3
01fe 001f fff2  |    |		.CONST	0x001f,0xfff2
0200 0021 fff1  | !  |		.CONST	0x0021,0xfff1
0202 0023 fff0  | #  |		.CONST	0x0023,0xfff0
0204 002c ffef  | ,  |		.CONST	0x002c,0xffef
0206 002e ffee  | .  |		.CONST	0x002e,0xffee
0208 0030 ffed  | 0  |		.CONST	0x0030,0xffed
020a 0030 ffec  | 0  |		.CONST	0x0030,0xffec
020c 0030 ffeb  | 0  |		.CONST	0x0030,0xffeb
020e 0030 ffea  | 0  |		.CONST	0x0030,0xffea
0210 0030 ffe9  | 0  |		.CONST	0x0030,0xffe9
0212 003c ffe8  | <  |		.CONST	0x003c,0xffe8
0214 0048 ffe7  | H  |		.CONST	0x0048,0xffe7
0216 ; --------------------------------------------------------------------------------------
0216 ; Debug3 Subtable 0x1
0216 ; --------------------------------------------------------------------------------------
0216 000f 0002  |    |		.DBG3TAB	0x000f,0x0002
0218 004e ffff  | N  |		.CONST	0x004e,0xffff
021a 0051 fffe  | Q  |		.CONST	0x0051,0xfffe
021c 0054 fffd  | T  |		.CONST	0x0054,0xfffd
021e 0067 fffc  | g  |		.CONST	0x0067,0xfffc
0220 0069 fffb  | i  |		.CONST	0x0069,0xfffb
0222 006b fffa  | k  |		.CONST	0x006b,0xfffa
0224 006d fff9  | m  |		.CONST	0x006d,0xfff9
0226 006f fff8  | o  |		.CONST	0x006f,0xfff8
0228 0071 fff7  | q  |		.CONST	0x0071,0xfff7
022a 0073 fff6  | s  |		.CONST	0x0073,0xfff6
022c 0075 fff5  | u  |		.CONST	0x0075,0xfff5
022e 0077 fff4  | w  |		.CONST	0x0077,0xfff4
0230 0079 fff3  | y  |		.CONST	0x0079,0xfff3
0232 007b fff2  | {  |		.CONST	0x007b,0xfff2
0234 007d fff1  | }  |		.CONST	0x007d,0xfff1
0236 0090 0001  |    |		.CONST	0x0090,0x0001
0238 0096 0002  |    |		.CONST	0x0096,0x0002
023a ; --------------------------------------------------------------------------------------
023a ; Debug3 Subtable 0x2
023a ; --------------------------------------------------------------------------------------
023a 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
023c 00a3 0001  |    |		.CONST	0x00a3,0x0001
023e 00a8 0002  |    |		.CONST	0x00a8,0x0002
0240 00b6 0003  |    |		.CONST	0x00b6,0x0003
0242 00bf 0004  |    |		.CONST	0x00bf,0x0004
0244 ; --------------------------------------------------------------------------------------
0244 ; Debug3 Subtable 0x3
0244 ; --------------------------------------------------------------------------------------
0244 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0246 00cb 0001  |    |		.CONST	0x00cb,0x0001
0248 00d4 0002  |    |		.CONST	0x00d4,0x0002
024a ; --------------------------------------------------------------------------------------
024a ; Debug3 Subtable 0x4
024a ; --------------------------------------------------------------------------------------
024a 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
024c 00db 0001  |    |		.CONST	0x00db,0x0001
024e 00e2 0002  |    |		.CONST	0x00e2,0x0002
0250 00eb 0003  |    |		.CONST	0x00eb,0x0003
0252 ; --------------------------------------------------------------------------------------
0252 ; Debug3 Subtable 0x5
0252 ; --------------------------------------------------------------------------------------
0252 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0254 00f3 ffff  |    |		.CONST	0x00f3,0xffff
0256 00fc 0001  |    |		.CONST	0x00fc,0x0001
0258 0100 0002  |    |		.CONST	0x0100,0x0002
025a 0107 0003  |    |		.CONST	0x0107,0x0003
025c 0110 0004  |    |		.CONST	0x0110,0x0004
025e ; --------------------------------------------------------------------------------------
025e ; Debug3 Subtable 0x6
025e ; --------------------------------------------------------------------------------------
025e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0260 011b 0001  |    |		.CONST	0x011b,0x0001
0262 ; --------------------------------------------------------------------------------------
0262 ; Debug3 Subtable 0x7
0262 ; --------------------------------------------------------------------------------------
0262 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0264 0123 0001  | #  |		.CONST	0x0123,0x0001
0266 0129 0002  | )  |		.CONST	0x0129,0x0002
0268 ; --------------------------------------------------------------------------------------
0268 ; Debug3 Subtable 0x8
0268 ; --------------------------------------------------------------------------------------
0268 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
026a 0133 0001  | 3  |		.CONST	0x0133,0x0001
026c 0139 0002  | 9  |		.CONST	0x0139,0x0002
026e ; --------------------------------------------------------------------------------------
026e ; Debug3 Subtable 0x9
026e ; --------------------------------------------------------------------------------------
026e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0270 0143 0001  | C  |		.CONST	0x0143,0x0001
0272 ; --------------------------------------------------------------------------------------
0272 ; Debug3 Subtable 0xa
0272 ; --------------------------------------------------------------------------------------
0272 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0274 0153 0001  | S  |		.CONST	0x0153,0x0001
0276 ; --------------------------------------------------------------------------------------
0276 ; Debug3 Subtable 0xb
0276 ; --------------------------------------------------------------------------------------
0276 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0278 015b 0001  | [  |		.CONST	0x015b,0x0001
027a ; --------------------------------------------------------------------------------------
027a ; Debug3 Subtable 0xc
027a ; --------------------------------------------------------------------------------------
027a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
027c 0163 0001  | c  |		.CONST	0x0163,0x0001
027e 0000 0000  |    |		.BLANK	0000[0x182]