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

⟦8ad819f28⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, ELAB_segment_table, NULL, R1k_Segment, seg_0bf8df

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0248       | H  |		.CONST	0x0248								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0238       | 8  |		.CONST	0x0238								; Offset to segment table (only in elab segments)
0007 8001       |    |		.CONST	0x8001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 000e       |    |		.CONST	0x000e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029c 0013  |    |		Declare_Subprogram	INIT_0010,For_Outer_Call,Visible
000d 00bf       |    |		Action	Accept_Activation
000e			BODY_0008:
000e 00bc       |    |		Action	Signal_Activated
000f 00bb       |    |		Action	Signal_Completion
0010 ; --------------------------------------------------------------------------------------
0010 ; SUBPROGRAM
0010 ; --------------------------------------------------------------------------------------
0010 0015       |    |		.CONST	0x0015								; Address of begin
0011 001a       |    |		.CONST	0x001a								; Address of exception handler
0012 0002       |    |		.CONST	0x0002								; Number of locals
0013			INIT_0010:
0013 029f 0023  |   #|		Declare_Subprogram	INIT_0020,For_Call
0015			BODY_0010:
0015 8402       |    |		Call	0x2,0x2
0016 7801       |x   |		Jump	0x18
0017 0003       |    |		.XXX[0x1]
0018 006f       | o  |		Action	Break_Unconditional
0019 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
001a			TRAP_0010:
001a 7801       |x   |		Jump	0x1c
001b 0003       |    |		.XXX[0x1]
001c 006f       | o  |		Action	Break_Unconditional
001d 00d8       |    |		Load_Top	At_Offset_0
001e 0100       |    |		Execute	Exception,Raise
001f 0000       |    |		.XXX[0x1]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0188       |    |		.CONST	0x0188								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 001c       |    |		.CONST	0x001c								; Number of locals
0023			INIT_0020:
0023 7801       |x   |		Jump	0x25
0024 0002       |    |		.XXX[0x1]
0025 006f       | o  |		Action	Break_Unconditional
0026 795a       |yZ  |		Jump	0x181
0027 4800       |H   |		Short_Literal	0x0
0028 620b       |b   |		Indirect_Literal	Discrete,0x234,{0x00507d0a, 0x000000b0}
0029 02a0       |    |		Declare_Subprogram	Null_Subprogram
002a 038e       |    |		Declare_Type	Package,Defined
002b 0387       |    |		Declare_Variable	Package
002c 00d8       |    |		Load_Top	At_Offset_0
002d 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
002e 6201       |b   |		Indirect_Literal	Discrete,0x230,{0x00000000, 0x003b6804}
002f e002       |    |		Load	0x0,0x2
0030 e001       |    |		Load	0x0,0x1
0031 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0032 61f9       |a   |		Indirect_Literal	Discrete,0x22c,{0x00000000, 0x00324804}
0033 e002       |    |		Load	0x0,0x2
0034 e001       |    |		Load	0x0,0x1
0035 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0036 61f1       |a   |		Indirect_Literal	Discrete,0x228,{0x00000000, 0x000e1804}
0037 e002       |    |		Load	0x0,0x2
0038 e001       |    |		Load	0x0,0x1
0039 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003a 61e9       |a   |		Indirect_Literal	Discrete,0x224,{0x00000000, 0x001a9404}
003b e002       |    |		Load	0x0,0x2
003c e001       |    |		Load	0x0,0x1
003d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003e 4800       |H   |		Short_Literal	0x0
003f 61e0       |a   |		Indirect_Literal	Discrete,0x220,{0x0050510a, 0x000000b0}
0040 02a0       |    |		Declare_Subprogram	Null_Subprogram
0041 038e       |    |		Declare_Type	Package,Defined
0042 4801       |H   |		Short_Literal	0x1
0043 4812       |H   |		Short_Literal	0x12
0044 00e5       |    |		Load_Encached	Long_Integer_Cache
0045 02a0       |    |		Declare_Subprogram	Null_Subprogram
0046 4801       |H   |		Short_Literal	0x1
0047 035d       | ]  |		Declare_Type	Array,Defined
0048 0337       | 7  |		Declare_Variable	Array
0049 480b       |H   |		Short_Literal	0xb
004a 4801       |H   |		Short_Literal	0x1
004b 00da       |    |		Load_Top	At_Offset_2
004c 01d6       |    |		Execute	Vector,Field_Write
004d 61ce       |a   |		Indirect_Literal	Discrete,0x21c,{0x0050610a, 0x000000b0}
004e 4802       |H   |		Short_Literal	0x2
004f 00da       |    |		Load_Top	At_Offset_2
0050 01d6       |    |		Execute	Vector,Field_Write
0051 480f       |H   |		Short_Literal	0xf
0052 4803       |H   |		Short_Literal	0x3
0053 00da       |    |		Load_Top	At_Offset_2
0054 01d6       |    |		Execute	Vector,Field_Write
0055 61c2       |a   |		Indirect_Literal	Discrete,0x218,{0x00505d0a, 0x000000b0}
0056 4804       |H   |		Short_Literal	0x4
0057 00da       |    |		Load_Top	At_Offset_2
0058 01d6       |    |		Execute	Vector,Field_Write
0059 480f       |H   |		Short_Literal	0xf
005a 4805       |H   |		Short_Literal	0x5
005b 00da       |    |		Load_Top	At_Offset_2
005c 01d6       |    |		Execute	Vector,Field_Write
005d 61b6       |a   |		Indirect_Literal	Discrete,0x214,{0x00506d0a, 0x000000b0}
005e 4806       |H   |		Short_Literal	0x6
005f 00da       |    |		Load_Top	At_Offset_2
0060 01d6       |    |		Execute	Vector,Field_Write
0061 4813       |H   |		Short_Literal	0x13
0062 4807       |H   |		Short_Literal	0x7
0063 00da       |    |		Load_Top	At_Offset_2
0064 01d6       |    |		Execute	Vector,Field_Write
0065 61aa       |a   |		Indirect_Literal	Discrete,0x210,{0x0050590a, 0x000000b0}
0066 4808       |H   |		Short_Literal	0x8
0067 00da       |    |		Load_Top	At_Offset_2
0068 01d6       |    |		Execute	Vector,Field_Write
0069 4813       |H   |		Short_Literal	0x13
006a 4809       |H   |		Short_Literal	0x9
006b 00da       |    |		Load_Top	At_Offset_2
006c 01d6       |    |		Execute	Vector,Field_Write
006d 619e       |a   |		Indirect_Literal	Discrete,0x20c,{0x0050550a, 0x000000b0}
006e 480a       |H   |		Short_Literal	0xa
006f 00da       |    |		Load_Top	At_Offset_2
0070 01d6       |    |		Execute	Vector,Field_Write
0071 480f       |H   |		Short_Literal	0xf
0072 480b       |H   |		Short_Literal	0xb
0073 00da       |    |		Load_Top	At_Offset_2
0074 01d6       |    |		Execute	Vector,Field_Write
0075 6192       |a   |		Indirect_Literal	Discrete,0x208,{0x0050650a, 0x000000b0}
0076 480c       |H   |		Short_Literal	0xc
0077 00da       |    |		Load_Top	At_Offset_2
0078 01d6       |    |		Execute	Vector,Field_Write
0079 480f       |H   |		Short_Literal	0xf
007a 480d       |H   |		Short_Literal	0xd
007b 00da       |    |		Load_Top	At_Offset_2
007c 01d6       |    |		Execute	Vector,Field_Write
007d 6186       |a   |		Indirect_Literal	Discrete,0x204,{0x0050690a, 0x000000b0}
007e 480e       |H   |		Short_Literal	0xe
007f 00da       |    |		Load_Top	At_Offset_2
0080 01d6       |    |		Execute	Vector,Field_Write
0081 4813       |H   |		Short_Literal	0x13
0082 480f       |H   |		Short_Literal	0xf
0083 00da       |    |		Load_Top	At_Offset_2
0084 01d6       |    |		Execute	Vector,Field_Write
0085 617a       |az  |		Indirect_Literal	Discrete,0x200,{0x0050710a, 0x000000b0}
0086 4810       |H   |		Short_Literal	0x10
0087 00da       |    |		Load_Top	At_Offset_2
0088 01d6       |    |		Execute	Vector,Field_Write
0089 4813       |H   |		Short_Literal	0x13
008a 4811       |H   |		Short_Literal	0x11
008b 00da       |    |		Load_Top	At_Offset_2
008c 01d6       |    |		Execute	Vector,Field_Write
008d 616e       |an  |		Indirect_Literal	Discrete,0x1fc,{0x0050750a, 0x000000b0}
008e 4812       |H   |		Short_Literal	0x12
008f 00da       |    |		Load_Top	At_Offset_2
0090 01d6       |    |		Execute	Vector,Field_Write
0091 4801       |H   |		Short_Literal	0x1
0092 00da       |    |		Load_Top	At_Offset_2
0093 020e       |    |		Execute	Module,Augment_Imports
0094 0387       |    |		Declare_Variable	Package
0095 6162       |ab  |		Indirect_Literal	Discrete,0x1f8,{0x00000000, 0x002d7404}
0096 e002       |    |		Load	0x0,0x2
0097 e001       |    |		Load	0x0,0x1
0098 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0099 615a       |aZ  |		Indirect_Literal	Discrete,0x1f4,{0x00000000, 0x00114804}
009a e002       |    |		Load	0x0,0x2
009b e001       |    |		Load	0x0,0x1
009c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
009d 6152       |aR  |		Indirect_Literal	Discrete,0x1f0,{0x00000000, 0x003cf004}
009e e002       |    |		Load	0x0,0x2
009f e001       |    |		Load	0x0,0x1
00a0 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a1 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00a2 4800       |H   |		Short_Literal	0x0
00a3 6148       |aH  |		Indirect_Literal	Discrete,0x1ec,{0x0050490a, 0x000000b0}
00a4 02a0       |    |		Declare_Subprogram	Null_Subprogram
00a5 038e       |    |		Declare_Type	Package,Defined
00a6 4801       |H   |		Short_Literal	0x1
00a7 4800       |H   |		Short_Literal	0x0
00a8 00e5       |    |		Load_Encached	Long_Integer_Cache
00a9 02a0       |    |		Declare_Subprogram	Null_Subprogram
00aa 4801       |H   |		Short_Literal	0x1
00ab 035d       | ]  |		Declare_Type	Array,Defined
00ac 0337       | 7  |		Declare_Variable	Array
00ad 613a       |a:  |		Indirect_Literal	Discrete,0x1e8,{0x00000001, 0x00020af5}
00ae 4801       |H   |		Short_Literal	0x1
00af e607       |    |		Load	0x3,0x7
00b0 e60b       |    |		Load	0x3,0xb
00b1 4805       |H   |		Short_Literal	0x5
00b2 e60c       |    |		Load	0x3,0xc
00b3 020e       |    |		Execute	Module,Augment_Imports
00b4 0387       |    |		Declare_Variable	Package
00b5 612e       |a.  |		Indirect_Literal	Discrete,0x1e4,{0x00000000, 0x0036fc04}
00b6 e002       |    |		Load	0x0,0x2
00b7 e001       |    |		Load	0x0,0x1
00b8 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00b9 6126       |a&  |		Indirect_Literal	Discrete,0x1e0,{0x00000000, 0x00115804}
00ba e002       |    |		Load	0x0,0x2
00bb e001       |    |		Load	0x0,0x1
00bc 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00bd 611e       |a   |		Indirect_Literal	Discrete,0x1dc,{0x00000000, 0x000e4804}
00be e002       |    |		Load	0x0,0x2
00bf e001       |    |		Load	0x0,0x1
00c0 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00c1 6116       |a   |		Indirect_Literal	Discrete,0x1d8,{0x00000000, 0x001aec04}
00c2 e002       |    |		Load	0x0,0x2
00c3 e001       |    |		Load	0x0,0x1
00c4 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00c5 4800       |H   |		Short_Literal	0x0
00c6 610d       |a   |		Indirect_Literal	Discrete,0x1d4,{0x0050450a, 0x000000b0}
00c7 02a0       |    |		Declare_Subprogram	Null_Subprogram
00c8 038e       |    |		Declare_Type	Package,Defined
00c9 4801       |H   |		Short_Literal	0x1
00ca 4800       |H   |		Short_Literal	0x0
00cb 00e5       |    |		Load_Encached	Long_Integer_Cache
00cc 02a0       |    |		Declare_Subprogram	Null_Subprogram
00cd 4801       |H   |		Short_Literal	0x1
00ce 035d       | ]  |		Declare_Type	Array,Defined
00cf 0337       | 7  |		Declare_Variable	Array
00d0 4801       |H   |		Short_Literal	0x1
00d1 00da       |    |		Load_Top	At_Offset_2
00d2 020e       |    |		Execute	Module,Augment_Imports
00d3 0387       |    |		Declare_Variable	Package
00d4 60fb       |`   |		Indirect_Literal	Discrete,0x1d0,{0x00000000, 0x0036c804}
00d5 e002       |    |		Load	0x0,0x2
00d6 e001       |    |		Load	0x0,0x1
00d7 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00d8 60f3       |`   |		Indirect_Literal	Discrete,0x1cc,{0x00000000, 0x00324c04}
00d9 e002       |    |		Load	0x0,0x2
00da e001       |    |		Load	0x0,0x1
00db 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00dc 60eb       |`   |		Indirect_Literal	Discrete,0x1c8,{0x00000000, 0x000e3804}
00dd e002       |    |		Load	0x0,0x2
00de e001       |    |		Load	0x0,0x1
00df 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00e0 60e3       |`   |		Indirect_Literal	Discrete,0x1c4,{0x00000001, 0x00020b6c}
00e1 4801       |H   |		Short_Literal	0x1
00e2 e612       |    |		Load	0x3,0x12
00e3 e613       |    |		Load	0x3,0x13
00e4 e605       |    |		Load	0x3,0x5
00e5 e607       |    |		Load	0x3,0x7
00e6 e606       |    |		Load	0x3,0x6
00e7 e614       |    |		Load	0x3,0x14
00e8 4808       |H   |		Short_Literal	0x8
00e9 e611       |    |		Load	0x3,0x11
00ea 020e       |    |		Execute	Module,Augment_Imports
00eb 00db       |    |		Load_Top	At_Offset_3
00ec 020f       |    |		Execute	Module,Activate
00ed 60d2       |`   |		Indirect_Literal	Discrete,0x1c0,{0x00000000, 0x0001ac04}
00ee e002       |    |		Load	0x0,0x2
00ef e001       |    |		Load	0x0,0x1
00f0 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00f1 60ca       |`   |		Indirect_Literal	Discrete,0x1bc,{0x00000000, 0x00010804}
00f2 e002       |    |		Load	0x0,0x2
00f3 e001       |    |		Load	0x0,0x1
00f4 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00f5 60c2       |`   |		Indirect_Literal	Discrete,0x1b8,{0x00000000, 0x000ce004}
00f6 e002       |    |		Load	0x0,0x2
00f7 e001       |    |		Load	0x0,0x1
00f8 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00f9 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00fa 60b9       |`   |		Indirect_Literal	Discrete,0x1b4,{0x00000000, 0x000e5004}
00fb e002       |    |		Load	0x0,0x2
00fc e001       |    |		Load	0x0,0x1
00fd 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00fe 60b1       |`   |		Indirect_Literal	Discrete,0x1b0,{0x00000001, 0x00020b69}
00ff 4804       |H   |		Short_Literal	0x4
0100 e60d       |    |		Load	0x3,0xd
0101 e615       |    |		Load	0x3,0x15
0102 e617       |    |		Load	0x3,0x17
0103 60ac       |`   |		Indirect_Literal	Discrete,0x1b0,{0x00000001, 0x00020b69}
0104 4803       |H   |		Short_Literal	0x3
0105 4801       |H   |		Short_Literal	0x1
0106 4800       |H   |		Short_Literal	0x0
0107 e610       |    |		Load	0x3,0x10
0108 e613       |    |		Load	0x3,0x13
0109 e605       |    |		Load	0x3,0x5
010a e606       |    |		Load	0x3,0x6
010b e616       |    |		Load	0x3,0x16
010c e618       |    |		Load	0x3,0x18
010d e60a       |    |		Load	0x3,0xa
010e e614       |    |		Load	0x3,0x14
010f e60f       |    |		Load	0x3,0xf
0110 4812       |H   |		Short_Literal	0x12
0111 e60c       |    |		Load	0x3,0xc
0112 020e       |    |		Execute	Module,Augment_Imports
0113 e60c       |    |		Load	0x3,0xc
0114 020f       |    |		Execute	Module,Activate
0115 6096       |`   |		Indirect_Literal	Discrete,0x1ac,{0x00000000, 0x003e2404}
0116 e002       |    |		Load	0x0,0x2
0117 e001       |    |		Load	0x0,0x1
0118 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0119 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
011a 4804       |H   |		Short_Literal	0x4
011b 608c       |`   |		Indirect_Literal	Discrete,0x1a8,{0x00504d0a, 0x000000b0}
011c 02a0       |    |		Declare_Subprogram	Null_Subprogram
011d 038c       |    |		Declare_Type	Package,Defined,Not_Elaborated
011e 4801       |H   |		Short_Literal	0x1
011f 4800       |H   |		Short_Literal	0x0
0120 00e5       |    |		Load_Encached	Long_Integer_Cache
0121 02a0       |    |		Declare_Subprogram	Null_Subprogram
0122 4801       |H   |		Short_Literal	0x1
0123 035d       | ]  |		Declare_Type	Array,Defined
0124 0337       | 7  |		Declare_Variable	Array
0125 607e       |`~  |		Indirect_Literal	Discrete,0x1a4,{0x00000001, 0x00020af7}
0126 4802       |H   |		Short_Literal	0x2
0127 e60b       |    |		Load	0x3,0xb
0128 607b       |`{  |		Indirect_Literal	Discrete,0x1a4,{0x00000001, 0x00020af7}
0129 4801       |H   |		Short_Literal	0x1
012a e619       |    |		Load	0x3,0x19
012b 4807       |H   |		Short_Literal	0x7
012c e61a       |    |		Load	0x3,0x1a
012d 020e       |    |		Execute	Module,Augment_Imports
012e e614       |    |		Load	0x3,0x14
012f e60f       |    |		Load	0x3,0xf
0130 4802       |H   |		Short_Literal	0x2
0131 00db       |    |		Load_Top	At_Offset_3
0132 020e       |    |		Execute	Module,Augment_Imports
0133 00d8       |    |		Load_Top	At_Offset_0
0134 020d       |    |		Execute	Module,Elaborate
0135 606a       |`j  |		Indirect_Literal	Discrete,0x1a0,{0x00000000, 0x00115404}
0136 e002       |    |		Load	0x0,0x2
0137 e001       |    |		Load	0x0,0x1
0138 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0139 6062       |`b  |		Indirect_Literal	Discrete,0x19c,{0x00000000, 0x0004bc04}
013a e002       |    |		Load	0x0,0x2
013b e001       |    |		Load	0x0,0x1
013c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
013d 4801       |H   |		Short_Literal	0x1
013e 4801       |H   |		Short_Literal	0x1
013f e607       |    |		Load	0x3,0x7
0140 e61a       |    |		Load	0x3,0x1a
0141 6056       |`V  |		Indirect_Literal	Discrete,0x198,{0x00000001, 0x00020b6b}
0142 4801       |H   |		Short_Literal	0x1
0143 e619       |    |		Load	0x3,0x19
0144 e613       |    |		Load	0x3,0x13
0145 e605       |    |		Load	0x3,0x5
0146 e606       |    |		Load	0x3,0x6
0147 e614       |    |		Load	0x3,0x14
0148 e609       |    |		Load	0x3,0x9
0149 e60f       |    |		Load	0x3,0xf
014a e604       |    |		Load	0x3,0x4
014b e612       |    |		Load	0x3,0x12
014c 4811       |H   |		Short_Literal	0x11
014d e61c       |    |		Load	0x3,0x1c
014e 4814       |H   |		Short_Literal	0x14
014f e60c       |    |		Load	0x3,0xc
0150 1914       |    |		Execute	Package,Field_Reference,Field_Number 0x14
0151 4801       |H   |		Short_Literal	0x1
0152 4816       |H   |		Short_Literal	0x16
0153 4818       |H   |		Short_Literal	0x18
0154 e611       |    |		Load	0x3,0x11
0155 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
0156 4817       |H   |		Short_Literal	0x17
0157 e618       |    |		Load	0x3,0x18
0158 e60c       |    |		Load	0x3,0xc
0159 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
015a e60c       |    |		Load	0x3,0xc
015b 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
015c 4801       |H   |		Short_Literal	0x1
015d 4801       |H   |		Short_Literal	0x1
015e e611       |    |		Load	0x3,0x11
015f 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
0160 e611       |    |		Load	0x3,0x11
0161 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
0162 e611       |    |		Load	0x3,0x11
0163 1910       |    |		Execute	Package,Field_Reference,Field_Number 0x10
0164 4801       |H   |		Short_Literal	0x1
0165 4801       |H   |		Short_Literal	0x1
0166 e60c       |    |		Load	0x3,0xc
0167 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0168 4801       |H   |		Short_Literal	0x1
0169 4801       |H   |		Short_Literal	0x1
016a 4825       |H%  |		Short_Literal	0x25
016b e608       |    |		Load	0x3,0x8
016c 020e       |    |		Execute	Module,Augment_Imports
016d e608       |    |		Load	0x3,0x8
016e 020f       |    |		Execute	Module,Activate
016f 4801       |H   |		Short_Literal	0x1
0170 4800       |H   |		Short_Literal	0x0
0171 00e5       |    |		Load_Encached	Long_Integer_Cache
0172 02a0       |    |		Declare_Subprogram	Null_Subprogram
0173 4801       |H   |		Short_Literal	0x1
0174 035d       | ]  |		Declare_Type	Array,Defined
0175 0337       | 7  |		Declare_Variable	Array
0176 e613       |    |		Load	0x3,0x13
0177 e608       |    |		Load	0x3,0x8
0178 1910       |    |		Execute	Package,Field_Reference,Field_Number 0x10
0179 e604       |    |		Load	0x3,0x4
017a e605       |    |		Load	0x3,0x5
017b 4805       |H   |		Short_Literal	0x5
017c e602       |    |		Load	0x3,0x2
017d 020e       |    |		Execute	Module,Augment_Imports
017e e602       |    |		Load	0x3,0x2
017f 020f       |    |		Execute	Module,Activate
0180 7807       |x   |		Jump	BODY_0020
0181 6012       |`   |		Indirect_Literal	Discrete,0x194,{0x00000000, 0x00001f40}
0182 600d       |`   |		Indirect_Literal	Discrete,0x190,{0x00000000, 0x00190c04}
0183 e002       |    |		Load	0x0,0x2
0184 e001       |    |		Load	0x0,0x1
0185 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0186 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0187 7e9f       |~   |		Jump	0x27
0188			BODY_0020:
0188 e5fa       |    |		Load	0x2,-0x6
0189 e5fb       |    |		Load	0x2,-0x5
018a e5fc       |    |		Load	0x2,-0x4
018b e5fd       |    |		Load	0x2,-0x3
018c e5fe       |    |		Load	0x2,-0x2
018d e5ff       |    |		Load	0x2,-0x1
018e 8603       |    |		Call	0x3,0x3
018f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0190 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
0194 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
0198 0000 0001  |    |		.LITERAL	{0x00000001, 0x00020b6b}
019c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
01a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00115404}
01a4 0000 0001  |    |		.LITERAL	{0x00000001, 0x00020af7}
01a8 0050 4d0a  | PM |		.LITERAL	{0x00504d0a, 0x000000b0}
01ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x003e2404}
01b0 0000 0001  |    |		.LITERAL	{0x00000001, 0x00020b69}
01b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e5004}
01b8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ce004}
01bc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00010804}
01c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0001ac04}
01c4 0000 0001  |    |		.LITERAL	{0x00000001, 0x00020b6c}
01c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3804}
01cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324c04}
01d0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
01d4 0050 450a  | PE |		.LITERAL	{0x0050450a, 0x000000b0}
01d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x001aec04}
01dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e4804}
01e0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00115804}
01e4 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036fc04}
01e8 0000 0001  |    |		.LITERAL	{0x00000001, 0x00020af5}
01ec 0050 490a  | PI |		.LITERAL	{0x0050490a, 0x000000b0}
01f0 0000 0000  |    |		.LITERAL	{0x00000000, 0x003cf004}
01f4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00114804}
01f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x002d7404}
01fc 0050 750a  | Pu |		.LITERAL	{0x0050750a, 0x000000b0}
0200 0050 710a  | Pq |		.LITERAL	{0x0050710a, 0x000000b0}
0204 0050 690a  | Pi |		.LITERAL	{0x0050690a, 0x000000b0}
0208 0050 650a  | Pe |		.LITERAL	{0x0050650a, 0x000000b0}
020c 0050 550a  | PU |		.LITERAL	{0x0050550a, 0x000000b0}
0210 0050 590a  | PY |		.LITERAL	{0x0050590a, 0x000000b0}
0214 0050 6d0a  | Pm |		.LITERAL	{0x00506d0a, 0x000000b0}
0218 0050 5d0a  | P] |		.LITERAL	{0x00505d0a, 0x000000b0}
021c 0050 610a  | Pa |		.LITERAL	{0x0050610a, 0x000000b0}
0220 0050 510a  | PQ |		.LITERAL	{0x0050510a, 0x000000b0}
0224 0000 0000  |    |		.LITERAL	{0x00000000, 0x001a9404}
0228 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e1804}
022c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324804}
0230 0000 0000  |    |		.LITERAL	{0x00000000, 0x003b6804}
0234 0050 7d0a  | P} |		.LITERAL	{0x00507d0a, 0x000000b0}
0238 ; --------------------------------------------------------------------------------------
0238 ; Segment Table
0238 ; --------------------------------------------------------------------------------------
0238 0028 003f  | ( ?|		.XXX[0x10]
023a 004d 0055  | M U|
023c 005d 0065  | ] e|
023e 006d 0075  | m u|
0240 007d 0085  | }  |
0242 008d 00a3  |    |
0244 00c6 011b  |    |
0246 0000 0000  |    |
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug Table
0248 ; --------------------------------------------------------------------------------------
0248 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0x0b70,0x0000,0x0001,0x0000
024e 7da0 0920  |}   |		.XXX[0x95]
0250 5510 0403  |U   |
0252 6802 484f  |h HO|
0254 5807 7da2  |X } |
0256 2d20 6910  |- i |
0258 0403 6802  |  h |
025a 484f 5c07  |HO\ |
025c 7da0 0920  |}   |
025e 0910 0403  |    |
0260 6802 484f  |h HO|
0262 6007 7da1  |` } |
0264 f520 2d10  |  - |
0266 0403 6802  |  h |
0268 484f 6407  |HOd |
026a 7da0 0920  |}   |
026c 1d10 0403  |    |
026e 6802 484f  |h HO|
0270 6807 7da1  |h } |
0272 bd20 5910  |  Y |
0274 0403 6802  |  h |
0276 484f 6c07  |HOl |
0278 7da0 0920  |}   |
027a 2910 0403  |)   |
027c 6802 484f  |h HO|
027e 7007 7da0  |p } |
0280 0920 5110  |  Q |
0282 0403 6802  |  h |
0284 484f 7407  |HOt |
0286 7da1 6920  |} i |
0288 1110 0520  |    |
028a 4110 0403  |A   |
028c 6802 484f  |h HO|
028e 7807 7da0  |x } |
0290 0920 2110  |  ! |
0292 0403 6802  |  h |
0294 484f 7c07  |HO| |
0296 7da1 2920  |} ) |
0298 3510 0403  |5   |
029a 6802 484f  |h HO|
029c 8007 7da0  |  } |
029e 0920 6d10  |  m |
02a0 0403 6802  |  h |
02a2 484f 8407  |HO  |
02a4 7da0 f120  |}   |
02a6 0d10 0403  |    |
02a8 6802 484f  |h HO|
02aa 8807 7da0  |  } |
02ac 0920 3d10  |  = |
02ae 0403 6802  |  h |
02b0 484f 8c07  |HO  |
02b2 7da0 0920  |}   |
02b4 1510 0403  |    |
02b6 6802 484f  |h HO|
02b8 9007 7da0  |  } |
02ba 9d20 1910  |    |
02bc 0403 6802  |  h |
02be 484f 9407  |HO  |
02c0 7da0 0920  |}   |
02c2 2510 0403  |%   |
02c4 6802 484f  |h HO|
02c6 9807 7da0  |  } |
02c8 6520 5d10  |e ] |
02ca 0403 6802  |  h |
02cc 484f 9c07  |HO  |
02ce 7da0 0920  |}   |
02d0 3110 0403  |1   |
02d2 6802 484f  |h HO|
02d4 a007 7da0  |  } |
02d6 0920 3910  |  9 |
02d8 0403 6802  |  h |
02da 484f a407  |HO  |
02dc 7da0 1120  |}   |
02de 6110 0520  |a   |
02e0 0110 0420  |    |
02e2 c400       |    |
02e3 0000 0000  |    |		.BLANK	0000[0x6]
02e9 003b 2c00  | ;, |		.XXX[0x117]
02eb 1000 0403  |    |
02ed 6807 6c30  |h l0|
02ef 09a0 0423  |   #|
02f1 8120 0403  |    |
02f3 6c07 5c2d  |l \-|
02f5 51c0 0c3d  |Q  =|
02f7 19c0 1023  |   #|
02f9 8003 4520  |  E |
02fb 0510 0520  |    |
02fd 0110 0400  |    |
02ff 0000 0000  |    |
0301 003c 4000  | <@ |
0303 1000 6b89  |  k |
0305 600c 8803  |`   |
0307 6070 0388  |`p  |
0309 3400 1c03  |4   |
030b 8c03 8789  |    |
030d 7400 1c03  |t   |
030f 840f a780  |    |
0311 140c 8803  |    |
0313 8c03 840f  |    |
0315 a403 8c0f  |    |
0317 a40f a403  |    |
0319 8c03 8c0f  |    |
031b a403 8780  |    |
031d 086c 8f80  | l  |
031f 086c 5403  | lT |
0321 8f80 106c  |   l|
0323 a00b 1c03  |    |
0325 6070 0003  |`p  |
0327 8f97 ff80  |    |
0329 6460 9780  |d`  |
032b 686c 3470  |hl4p|
032d 2003 6070  |  `p|
032f 000a 7c4d  |  |M|
0331 cc03 6494  |  d |
0333 0f97 ff80  |    |
0335 6460 4f80  |d`O |
0337 6460 4003  |d`@ |
0339 4520 0403  |E   |
033b 68a0 0a10  |h   |
033d 6a09 7a90  |j z |
033f 0e10 6803  |  h |
0341 8803 8060  |   `|
0343 6710 1390  |g   |
0345 0d18 6de0  |  m |
0347 9de0 b5e0  |    |
0349 c5e4 39e2  |  9 |
034b bde4 31e2  |  1 |
034d 31e2 49e2  |1 I |
034f 79e4 21e4  |y ! |
0351 1de4 19e4  |    |
0353 15e4 11e4  |    |
0355 0de4 09e2  |    |
0357 e5e3 35e3  |  5 |
0359 69e0 35e3  |i 5 |
035b cde3 95e0  |    |
035d b5e0 c5e0  |    |
035f d5e1 49e1  |  I |
0361 91e0 0390  |    |
0363 1208 bb90  |    |
0365 0805 f5e6  |    |
0367 1a10 6a09  |  j |
0369 7f90 1208  |    |
036b b790 0805  |    |
036d f5e5 fe10  |    |
036f 6a09 7f90  |j   |
0371 1208 6790  |  g |
0373 0805 f5e5  |    |
0375 e390 1208  |    |
0377 6b90 0805  |k   |
0379 f5e5 ce10  |    |
037b 6a09 7e90  |j ~ |
037d 1e10 6a09  |  j |
037f 7e90 2210  |~ " |
0381 6a00 6e90  |j n |
0383 5790 2390  |W # |
0385 5790 1208  |W   |
0387 7390 0805  |s   |
0389 f5e5 8f90  |    |
038b 1208 bf90  |    |
038d 0805 f5e5  |    |
038f 7b90 1208  |{   |
0391 c390 0805  |    |
0393 f5e5 6610  |  f |
0395 6a09 7e90  |j ~ |
0397 1e10 6a09  |  j |
0399 7e90 2210  |~ " |
039b 6803 8803  |h   |
039d 8060 6710  | `g |
039f 3610 6803  |6 h |
03a1 8803 8060  |   `|
03a3 6710 3a10  |g : |
03a5 6803 8803  |h   |
03a7 8060 6710  | `g |
03a9 3f90 2390  |? # |
03ab 3f90 3b90  |? ; |
03ad 3790 1208  |7   |
03af c790 0805  |    |
03b1 f5e4 ee10  |    |
03b3 6a09 7e90  |j ~ |
03b5 1e10 6a09  |  j |
03b7 7e90 2210  |~ " |
03b9 6803 8803  |h   |
03bb 8060 6710  | `g |
03bd 4390 1f90  |C   |
03bf 2390 4390  |# C |
03c1 1208 cb90  |    |
03c3 0805 f5e4  |    |
03c5 a210 6a09  |  j |
03c7 7e90 1e10  |~   |
03c9 6a09 7e90  |j ~ |
03cb 2210 6803  |" h |
03cd 8803 8060  |   `|
03cf 6710 4790  |g G |
03d1 4f90 4b90  |O K |
03d3 5390 4790  |S G |
03d5 1208 cf90  |    |
03d7 0805 f5e4  |    |
03d9 5210 6a09  |R j |
03db 7f90 1208  |    |
03dd 7f90 0805  |    |
03df f5e4 3610  |  6 |
03e1 6a09 7e90  |j ~ |
03e3 1e10 6a09  |  j |
03e5 7e90 2390  |~ # |
03e7 2390 1f90  |#   |
03e9 1208 8390  |    |
03eb 0805 f5e4  |    |
03ed 0210 6a09  |  j |
03ef 7e90 1e10  |~   |
03f1 6a09 7e90  |j ~ |
03f3 2390 2390  |# # |
03f5 1f90 1208  |    |
03f7 8790 0805  |    |
03f9 f5e3 ce10  |    |
03fb 6a09 7e90  |j ~ |
03fd 1e10 6a09  |  j |
03ff 7e90       |~   |