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

⟦241d56898⟧

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

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 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
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 017d       | }  |		.CONST	0x017d								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0032       | 2  |		.CONST	0x0032								; Number of locals
0023			INIT_0020:
0023 7801       |x   |		Jump	0x25
0024 0002       |    |		.XXX[0x1]
0025 006f       | o  |		Action	Break_Unconditional
0026 794f       |yO  |		Jump	0x176
0027 4800       |H   |		Short_Literal	0x0
0028 620b       |b   |		Indirect_Literal	Discrete,0x234,{0x0001d90a, 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, 0x0036c804}
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, 0x00324c04}
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, 0x003d4404}
003b e002       |    |		Load	0x0,0x2
003c e001       |    |		Load	0x0,0x1
003d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003e 61e1       |a   |		Indirect_Literal	Discrete,0x220,{0x00000000, 0x003d8804}
003f e002       |    |		Load	0x0,0x2
0040 e001       |    |		Load	0x0,0x1
0041 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0042 61d9       |a   |		Indirect_Literal	Discrete,0x21c,{0x00000000, 0x003d5804}
0043 e002       |    |		Load	0x0,0x2
0044 e001       |    |		Load	0x0,0x1
0045 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0046 61d1       |a   |		Indirect_Literal	Discrete,0x218,{0x00000000, 0x001a9404}
0047 e002       |    |		Load	0x0,0x2
0048 e001       |    |		Load	0x0,0x1
0049 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004a 61c9       |a   |		Indirect_Literal	Discrete,0x214,{0x00000000, 0x003d8004}
004b e002       |    |		Load	0x0,0x2
004c e001       |    |		Load	0x0,0x1
004d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004e 61c1       |a   |		Indirect_Literal	Discrete,0x210,{0x00000000, 0x003b6804}
004f e002       |    |		Load	0x0,0x2
0050 e001       |    |		Load	0x0,0x1
0051 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0052 61b9       |a   |		Indirect_Literal	Discrete,0x20c,{0x00000000, 0x000ca404}
0053 e002       |    |		Load	0x0,0x2
0054 e001       |    |		Load	0x0,0x1
0055 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0056 61b1       |a   |		Indirect_Literal	Discrete,0x208,{0x00000000, 0x003e1004}
0057 e002       |    |		Load	0x0,0x2
0058 e001       |    |		Load	0x0,0x1
0059 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
005a 61a9       |a   |		Indirect_Literal	Discrete,0x204,{0x00000000, 0x003d6404}
005b e002       |    |		Load	0x0,0x2
005c e001       |    |		Load	0x0,0x1
005d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
005e 61a1       |a   |		Indirect_Literal	Discrete,0x200,{0x00000000, 0x0004bc04}
005f e002       |    |		Load	0x0,0x2
0060 e001       |    |		Load	0x0,0x1
0061 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0062 6199       |a   |		Indirect_Literal	Discrete,0x1fc,{0x00000000, 0x00372004}
0063 e002       |    |		Load	0x0,0x2
0064 e001       |    |		Load	0x0,0x1
0065 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0066 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0067 6190       |a   |		Indirect_Literal	Discrete,0x1f8,{0x00000000, 0x003e1404}
0068 e002       |    |		Load	0x0,0x2
0069 e001       |    |		Load	0x0,0x1
006a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
006b 6188       |a   |		Indirect_Literal	Discrete,0x1f4,{0x00000000, 0x0037b404}
006c e002       |    |		Load	0x0,0x2
006d e001       |    |		Load	0x0,0x1
006e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
006f 4800       |H   |		Short_Literal	0x0
0070 617f       |a   |		Indirect_Literal	Discrete,0x1f0,{0x0002050a, 0x000000b0}
0071 02a0       |    |		Declare_Subprogram	Null_Subprogram
0072 038e       |    |		Declare_Type	Package,Defined
0073 0387       |    |		Declare_Variable	Package
0074 00d8       |    |		Load_Top	At_Offset_0
0075 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0076 e604       |    |		Load	0x3,0x4
0077 4801       |H   |		Short_Literal	0x1
0078 00db       |    |		Load_Top	At_Offset_3
0079 020e       |    |		Execute	Module,Augment_Imports
007a 00d9       |    |		Load_Top	At_Offset_1
007b 020f       |    |		Execute	Module,Activate
007c 4800       |H   |		Short_Literal	0x0
007d 616e       |an  |		Indirect_Literal	Discrete,0x1ec,{0x0002010a, 0x000000b0}
007e 02a0       |    |		Declare_Subprogram	Null_Subprogram
007f 038e       |    |		Declare_Type	Package,Defined
0080 0387       |    |		Declare_Variable	Package
0081 00d8       |    |		Load_Top	At_Offset_0
0082 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0083 6164       |ad  |		Indirect_Literal	Discrete,0x1e8,{0x00000000, 0x000e3804}
0084 e002       |    |		Load	0x0,0x2
0085 e001       |    |		Load	0x0,0x1
0086 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0087 615c       |a\  |		Indirect_Literal	Discrete,0x1e4,{0x00000000, 0x000e1804}
0088 e002       |    |		Load	0x0,0x2
0089 e001       |    |		Load	0x0,0x1
008a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
008b e604       |    |		Load	0x3,0x4
008c e60a       |    |		Load	0x3,0xa
008d 00da       |    |		Load_Top	At_Offset_2
008e e618       |    |		Load	0x3,0x18
008f 4804       |H   |		Short_Literal	0x4
0090 e616       |    |		Load	0x3,0x16
0091 020e       |    |		Execute	Module,Augment_Imports
0092 00db       |    |		Load_Top	At_Offset_3
0093 020f       |    |		Execute	Module,Activate
0094 4800       |H   |		Short_Literal	0x0
0095 614a       |aJ  |		Indirect_Literal	Discrete,0x1e0,{0x0001fd0a, 0x000000b0}
0096 02a0       |    |		Declare_Subprogram	Null_Subprogram
0097 038e       |    |		Declare_Type	Package,Defined
0098 0387       |    |		Declare_Variable	Package
0099 00d8       |    |		Load_Top	At_Offset_0
009a 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
009b e604       |    |		Load	0x3,0x4
009c 4801       |H   |		Short_Literal	0x1
009d 00db       |    |		Load_Top	At_Offset_3
009e 020e       |    |		Execute	Module,Augment_Imports
009f 00d9       |    |		Load_Top	At_Offset_1
00a0 020f       |    |		Execute	Module,Activate
00a1 4800       |H   |		Short_Literal	0x0
00a2 6139       |a9  |		Indirect_Literal	Discrete,0x1dc,{0x0001f90a, 0x000000b0}
00a3 02a0       |    |		Declare_Subprogram	Null_Subprogram
00a4 038e       |    |		Declare_Type	Package,Defined
00a5 0387       |    |		Declare_Variable	Package
00a6 00d8       |    |		Load_Top	At_Offset_0
00a7 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00a8 e60a       |    |		Load	0x3,0xa
00a9 e619       |    |		Load	0x3,0x19
00aa e618       |    |		Load	0x3,0x18
00ab 4803       |H   |		Short_Literal	0x3
00ac e61c       |    |		Load	0x3,0x1c
00ad 020e       |    |		Execute	Module,Augment_Imports
00ae 00d9       |    |		Load_Top	At_Offset_1
00af 020f       |    |		Execute	Module,Activate
00b0 4800       |H   |		Short_Literal	0x0
00b1 6126       |a&  |		Indirect_Literal	Discrete,0x1d8,{0x0001f50a, 0x000000b0}
00b2 02a0       |    |		Declare_Subprogram	Null_Subprogram
00b3 038e       |    |		Declare_Type	Package,Defined
00b4 0387       |    |		Declare_Variable	Package
00b5 00d8       |    |		Load_Top	At_Offset_0
00b6 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00b7 e607       |    |		Load	0x3,0x7
00b8 e619       |    |		Load	0x3,0x19
00b9 e618       |    |		Load	0x3,0x18
00ba e60a       |    |		Load	0x3,0xa
00bb 4804       |H   |		Short_Literal	0x4
00bc e61e       |    |		Load	0x3,0x1e
00bd 020e       |    |		Execute	Module,Augment_Imports
00be 00d9       |    |		Load_Top	At_Offset_1
00bf 020f       |    |		Execute	Module,Activate
00c0 4800       |H   |		Short_Literal	0x0
00c1 6112       |a   |		Indirect_Literal	Discrete,0x1d4,{0x0001ed0a, 0x000000b0}
00c2 02a0       |    |		Declare_Subprogram	Null_Subprogram
00c3 038e       |    |		Declare_Type	Package,Defined
00c4 0387       |    |		Declare_Variable	Package
00c5 00d8       |    |		Load_Top	At_Offset_0
00c6 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00c7 4800       |H   |		Short_Literal	0x0
00c8 6107       |a   |		Indirect_Literal	Discrete,0x1d0,{0x0001f10a, 0x000000b0}
00c9 02a0       |    |		Declare_Subprogram	Null_Subprogram
00ca 038e       |    |		Declare_Type	Package,Defined
00cb 0387       |    |		Declare_Variable	Package
00cc 60ff       |`   |		Indirect_Literal	Discrete,0x1cc,{0x00000000, 0x00115804}
00cd e002       |    |		Load	0x0,0x2
00ce e001       |    |		Load	0x0,0x1
00cf 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00d0 60f7       |`   |		Indirect_Literal	Discrete,0x1c8,{0x00000000, 0x00118404}
00d1 e002       |    |		Load	0x0,0x2
00d2 e001       |    |		Load	0x0,0x1
00d3 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00d4 60ef       |`   |		Indirect_Literal	Discrete,0x1c4,{0x00000000, 0x0001b004}
00d5 e002       |    |		Load	0x0,0x2
00d6 e001       |    |		Load	0x0,0x1
00d7 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00d8 e60a       |    |		Load	0x3,0xa
00d9 e610       |    |		Load	0x3,0x10
00da e604       |    |		Load	0x3,0x4
00db e624       | $  |		Load	0x3,0x24
00dc e619       |    |		Load	0x3,0x19
00dd e625       | %  |		Load	0x3,0x25
00de e618       |    |		Load	0x3,0x18
00df e606       |    |		Load	0x3,0x6
00e0 e605       |    |		Load	0x3,0x5
00e1 4809       |H   |		Short_Literal	0x9
00e2 e622       | "  |		Load	0x3,0x22
00e3 020e       |    |		Execute	Module,Augment_Imports
00e4 00db       |    |		Load_Top	At_Offset_3
00e5 020f       |    |		Execute	Module,Activate
00e6 e61d       |    |		Load	0x3,0x1d
00e7 e622       | "  |		Load	0x3,0x22
00e8 4802       |H   |		Short_Literal	0x2
00e9 e620       |    |		Load	0x3,0x20
00ea 020e       |    |		Execute	Module,Augment_Imports
00eb e620       |    |		Load	0x3,0x20
00ec 020f       |    |		Execute	Module,Activate
00ed 4800       |H   |		Short_Literal	0x0
00ee 60d1       |`   |		Indirect_Literal	Discrete,0x1c0,{0x0001e90a, 0x000000b0}
00ef 02a0       |    |		Declare_Subprogram	Null_Subprogram
00f0 038e       |    |		Declare_Type	Package,Defined
00f1 0387       |    |		Declare_Variable	Package
00f2 00d8       |    |		Load_Top	At_Offset_0
00f3 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00f4 e605       |    |		Load	0x3,0x5
00f5 4801       |H   |		Short_Literal	0x1
00f6 00db       |    |		Load_Top	At_Offset_3
00f7 020e       |    |		Execute	Module,Augment_Imports
00f8 00d9       |    |		Load_Top	At_Offset_1
00f9 020f       |    |		Execute	Module,Activate
00fa 4800       |H   |		Short_Literal	0x0
00fb 60c0       |`   |		Indirect_Literal	Discrete,0x1bc,{0x0001e10a, 0x000000b0}
00fc 02a0       |    |		Declare_Subprogram	Null_Subprogram
00fd 038e       |    |		Declare_Type	Package,Defined
00fe 0387       |    |		Declare_Variable	Package
00ff 00d8       |    |		Load_Top	At_Offset_0
0100 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0101 60b6       |`   |		Indirect_Literal	Discrete,0x1b8,{0x00000000, 0x00010804}
0102 e002       |    |		Load	0x0,0x2
0103 e001       |    |		Load	0x0,0x1
0104 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0105 60ae       |`   |		Indirect_Literal	Discrete,0x1b4,{0x00000000, 0x00323c04}
0106 e002       |    |		Load	0x0,0x2
0107 e001       |    |		Load	0x0,0x1
0108 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0109 60a6       |`   |		Indirect_Literal	Discrete,0x1b0,{0x00000000, 0x00272804}
010a e002       |    |		Load	0x0,0x2
010b e001       |    |		Load	0x0,0x1
010c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
010d 60ea       |`   |		Indirect_Literal	Discrete,0x1f8,{0x00000000, 0x003e1404}
010e e002       |    |		Load	0x0,0x2
010f e001       |    |		Load	0x0,0x1
0110 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0111 4800       |H   |		Short_Literal	0x0
0112 6099       |`   |		Indirect_Literal	Discrete,0x1ac,{0x0001e50a, 0x000000b0}
0113 02a0       |    |		Declare_Subprogram	Null_Subprogram
0114 038e       |    |		Declare_Type	Package,Defined
0115 00d9       |    |		Load_Top	At_Offset_1
0116 e62b       | +  |		Load	0x3,0x2b
0117 6090       |`   |		Indirect_Literal	Discrete,0x1a8,{0x00004780, 0x09020182}
0118 608b       |`   |		Indirect_Literal	Discrete,0x1a4,{0x00004780, 0x09020181}
0119 4804       |H   |		Short_Literal	0x4
011a e62e       | .  |		Load	0x3,0x2e
011b 020e       |    |		Execute	Module,Augment_Imports
011c 0387       |    |		Declare_Variable	Package
011d 6082       |`   |		Indirect_Literal	Discrete,0x1a0,{0x00000000, 0x000fbc04}
011e e002       |    |		Load	0x0,0x2
011f e001       |    |		Load	0x0,0x1
0120 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0121 607a       |`z  |		Indirect_Literal	Discrete,0x19c,{0x00000000, 0x00276404}
0122 e002       |    |		Load	0x0,0x2
0123 e001       |    |		Load	0x0,0x1
0124 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0125 6072       |`r  |		Indirect_Literal	Discrete,0x198,{0x00000000, 0x00322004}
0126 e002       |    |		Load	0x0,0x2
0127 e001       |    |		Load	0x0,0x1
0128 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0129 00d9       |    |		Load_Top	At_Offset_1
012a e62c       | ,  |		Load	0x3,0x2c
012b 00da       |    |		Load_Top	At_Offset_2
012c e62f       | /  |		Load	0x3,0x2f
012d 4804       |H   |		Short_Literal	0x4
012e e62e       | .  |		Load	0x3,0x2e
012f 020e       |    |		Execute	Module,Augment_Imports
0130 00db       |    |		Load_Top	At_Offset_3
0131 020f       |    |		Execute	Module,Activate
0132 e612       |    |		Load	0x3,0x12
0133 e604       |    |		Load	0x3,0x4
0134 605f       |`_  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
0135 480a       |H   |		Short_Literal	0xa
0136 605d       |`]  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
0137 4809       |H   |		Short_Literal	0x9
0138 605b       |`[  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
0139 4808       |H   |		Short_Literal	0x8
013a 6059       |`Y  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
013b 4807       |H   |		Short_Literal	0x7
013c 6057       |`W  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
013d 4806       |H   |		Short_Literal	0x6
013e 6055       |`U  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
013f 4805       |H   |		Short_Literal	0x5
0140 6053       |`S  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
0141 4804       |H   |		Short_Literal	0x4
0142 6051       |`Q  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
0143 4803       |H   |		Short_Literal	0x3
0144 604f       |`O  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
0145 4802       |H   |		Short_Literal	0x2
0146 604d       |`M  |		Indirect_Literal	Discrete,0x194,{0x00000001, 0x000eb3ae}
0147 4801       |H   |		Short_Literal	0x1
0148 e606       |    |		Load	0x3,0x6
0149 e605       |    |		Load	0x3,0x5
014a e62e       | .  |		Load	0x3,0x2e
014b e610       |    |		Load	0x3,0x10
014c 481a       |H   |		Short_Literal	0x1a
014d e628       | (  |		Load	0x3,0x28
014e 020e       |    |		Execute	Module,Augment_Imports
014f e628       | (  |		Load	0x3,0x28
0150 020f       |    |		Execute	Module,Activate
0151 603e       |`>  |		Indirect_Literal	Discrete,0x190,{0x00000000, 0x000e4804}
0152 e002       |    |		Load	0x0,0x2
0153 e001       |    |		Load	0x0,0x1
0154 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0155 e60e       |    |		Load	0x3,0xe
0156 e61f       |    |		Load	0x3,0x1f
0157 e606       |    |		Load	0x3,0x6
0158 e609       |    |		Load	0x3,0x9
0159 6032       |`2  |		Indirect_Literal	Discrete,0x18c,{0x00000001, 0x000ec397}
015a 4801       |H   |		Short_Literal	0x1
015b e611       |    |		Load	0x3,0x11
015c e604       |    |		Load	0x3,0x4
015d e605       |    |		Load	0x3,0x5
015e e61d       |    |		Load	0x3,0x1d
015f e619       |    |		Load	0x3,0x19
0160 e618       |    |		Load	0x3,0x18
0161 e60a       |    |		Load	0x3,0xa
0162 e607       |    |		Load	0x3,0x7
0163 e612       |    |		Load	0x3,0x12
0164 e615       |    |		Load	0x3,0x15
0165 e608       |    |		Load	0x3,0x8
0166 e60b       |    |		Load	0x3,0xb
0167 e613       |    |		Load	0x3,0x13
0168 e617       |    |		Load	0x3,0x17
0169 e610       |    |		Load	0x3,0x10
016a e621       | !  |		Load	0x3,0x21
016b e629       | )  |		Load	0x3,0x29
016c e627       | '  |		Load	0x3,0x27
016d e60c       |    |		Load	0x3,0xc
016e e632       | 2  |		Load	0x3,0x32
016f e61b       |    |		Load	0x3,0x1b
0170 481b       |H   |		Short_Literal	0x1b
0171 e602       |    |		Load	0x3,0x2
0172 020e       |    |		Execute	Module,Augment_Imports
0173 e602       |    |		Load	0x3,0x2
0174 020f       |    |		Execute	Module,Activate
0175 7807       |x   |		Jump	BODY_0020
0176 6011       |`   |		Indirect_Literal	Discrete,0x188,{0x00000000, 0x00001f40}
0177 600c       |`   |		Indirect_Literal	Discrete,0x184,{0x00000000, 0x00190c04}
0178 e002       |    |		Load	0x0,0x2
0179 e001       |    |		Load	0x0,0x1
017a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
017b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
017c 7eaa       |~   |		Jump	0x27
017d			BODY_0020:
017d e5fd       |    |		Load	0x2,-0x3
017e e5fe       |    |		Load	0x2,-0x2
017f e5ff       |    |		Load	0x2,-0x1
0180 8603       |    |		Call	0x3,0x3
0181 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0182 0000 0000  |    |		.XXX[0x2]
0184 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
0188 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
018c 0000 0001  |    |		.LITERAL	{0x00000001, 0x000ec397}
0190 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e4804}
0194 0000 0001  |    |		.LITERAL	{0x00000001, 0x000eb3ae}
0198 0000 0000  |    |		.LITERAL	{0x00000000, 0x00322004}
019c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00276404}
01a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x000fbc04}
01a4 0000 4780  |  G |		.LITERAL	{0x00004780, 0x09020181}
01a8 0000 4780  |  G |		.LITERAL	{0x00004780, 0x09020182}
01ac 0001 e50a  |    |		.LITERAL	{0x0001e50a, 0x000000b0}
01b0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00272804}
01b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00323c04}
01b8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00010804}
01bc 0001 e10a  |    |		.LITERAL	{0x0001e10a, 0x000000b0}
01c0 0001 e90a  |    |		.LITERAL	{0x0001e90a, 0x000000b0}
01c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x0001b004}
01c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00118404}
01cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00115804}
01d0 0001 f10a  |    |		.LITERAL	{0x0001f10a, 0x000000b0}
01d4 0001 ed0a  |    |		.LITERAL	{0x0001ed0a, 0x000000b0}
01d8 0001 f50a  |    |		.LITERAL	{0x0001f50a, 0x000000b0}
01dc 0001 f90a  |    |		.LITERAL	{0x0001f90a, 0x000000b0}
01e0 0001 fd0a  |    |		.LITERAL	{0x0001fd0a, 0x000000b0}
01e4 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e1804}
01e8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3804}
01ec 0002 010a  |    |		.LITERAL	{0x0002010a, 0x000000b0}
01f0 0002 050a  |    |		.LITERAL	{0x0002050a, 0x000000b0}
01f4 0000 0000  |    |		.LITERAL	{0x00000000, 0x0037b404}
01f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x003e1404}
01fc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00372004}
0200 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
0204 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d6404}
0208 0000 0000  |    |		.LITERAL	{0x00000000, 0x003e1004}
020c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca404}
0210 0000 0000  |    |		.LITERAL	{0x00000000, 0x003b6804}
0214 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d8004}
0218 0000 0000  |    |		.LITERAL	{0x00000000, 0x001a9404}
021c 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d5804}
0220 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d8804}
0224 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d4404}
0228 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324c04}
022c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324804}
0230 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
0234 0001 d90a  |    |		.LITERAL	{0x0001d90a, 0x000000b0}
0238 ; --------------------------------------------------------------------------------------
0238 ; Segment Table
0238 ; --------------------------------------------------------------------------------------
0238 0028 0070  | ( p|		.XXX[0xb]
023a 007d 0095  | }  |
023c 00a2 00b1  |    |
023e 00c1 00c8  |    |
0240 00ee 00fb  |    |
0242 0112       |    |
0243 0000 0000  |    |		.BLANK	0000[0x5]
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug Table
0248 ; --------------------------------------------------------------------------------------
0248 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0xc397,0x0000,0x0001,0x0000
024e a4ec 2880  |  ( |		.XXX[0x1b2]
0250 8080 8199  |    |
0252 d5b9 8dd1  |    |
0254 a5bd b880  |    |
0256 8131 e17d  | 1 }|
0258 15c9 c9bd  |    |
025a c97d 3195  | }1 |
025c d995 b080  |    |
025e 8080 8080  |    |
0260 a150 80e8  | P  |
0262 8111 a585  |    |
0264 b984 b951  |   Q|
0266 c995 94a4  |    |
0268 81c9 95d1  |    |
026a d5c9 b881  |    |
026c 4de5 b9d1  |M   |
026e 85e1 7d15  |  } |
0270 c9c9 bdc9  |    |
0272 7d31 95d9  |}1  |
0274 95b0 ec28  |   (|
0276 8080 8081  |    |
0278 99d5 b98d  |    |
027a d1a5 bdb8  |    |
027c 8081 2185  |  ! |
027e cd7d 31e1  | }1 |
0280 7d15 c9c9  |}   |
0282 bdc9 7d31  |  }1|
0284 95d9 95b0  |    |
0286 80a1 5080  |  P |
0288 e881 11a5  |    |
028a 85b9 84b9  |    |
028c 51c9 9594  |Q   |
028e a481 c995  |    |
0290 d1d5 c9b8  |    |
0292 8109 bdbd  |    |
0294 b195 85b8  |    |
0296 ec28 2880  | (( |
0298 8080 81c1  |    |
029a c9bd 8d95  |    |
029c 91d5 c994  |    |
029e 814d b57d  | M }|
02a0 21a5 9191  |!   |
02a2 95b9 7d3d  |  }=|
02a4 c1cc 8080  |    |
02a6 8080 80a1  |    |
02a8 5080 e881  |P   |
02aa 11a5 85b9  |    |
02ac 84b9 51c9  |  Q |
02ae 9594 ec81  |    |
02b0 5880 e881  |X   |
02b2 11a5 85b9  |    |
02b4 84b9 4d95  |  M |
02b6 c5d5 95b9  |    |
02b8 8d94 a4ec  |    |
02ba 2880 8080  |(   |
02bc 8199 d5b9  |    |
02be 8dd1 a5bd  |    |
02c0 b880 814d  |   M|
02c2 b57d 21a5  | }! |
02c4 9191 95b9  |    |
02c6 7d3d c1cc  |}=  |
02c8 8080 8080  |    |
02ca 80a1 5080  |  P |
02cc e881 11a5  |    |
02ce 85b9 84b9  |    |
02d0 51c9 9594  |Q   |
02d2 a481 c995  |    |
02d4 d1d5 c9b8  |    |
02d6 8111 a585  |    |
02d8 b984 b94d  |   M|
02da 95c5 d595  |    |
02dc b98d 94ec  |    |
02de 2880 8080  |(   |
02e0 8199 d5b9  |    |
02e2 8dd1 a5bd  |    |
02e4 b880 8121  |   !|
02e6 85cd 7d4d  |  }M|
02e8 b57d 21a5  | }! |
02ea 9191 95b9  |    |
02ec 7d3d c1cc  |}=  |
02ee 80a1 5080  |  P |
02f0 e881 11a5  |    |
02f2 85b9 84b9  |    |
02f4 51c9 9594  |Q   |
02f6 a481 c995  |    |
02f8 d1d5 c9b8  |    |
02fa 8109 bdbd  |    |
02fc b195 85b8  |    |
02fe ec28 2880  | (( |
0300 8080 81c1  |    |
0302 c9bd 8d95  |    |
0304 91d5 c994  |    |
0306 814d b57d  | M }|
0308 4995 8591  |I   |
030a 7d3d b9b1  |}=  |
030c e480 8080  |    |
030e 8080 a150  |   P|
0310 80e8 8111  |    |
0312 a585 b984  |    |
0314 b951 c995  | Q  |
0316 94ec 8158  |   X|
0318 80e8 8109  |    |
031a bdbd b195  |    |
031c 85b8 a4ec  |    |
031e 2880 8080  |(   |
0320 8199 d5b9  |    |
0322 8dd1 a5bd  |    |
0324 b880 814d  |   M|
0326 b57d 4995  | }I |
0328 8591 7d3d  |  }=|
032a b9b1 e480  |    |
032c 8080 8080  |    |
032e a150 80e8  | P  |
0330 8111 a585  |    |
0332 b984 b951  |   Q|
0334 c995 94a4  |    |
0336 81c9 95d1  |    |
0338 d5c9 b881  |    |
033a 09bd bdb1  |    |
033c 9585 b8ec  |    |
033e 2880 8080  |(   |
0340 8199 d5b9  |    |
0342 8dd1 a5bd  |    |
0344 b880 8121  |   !|
0346 85cd 7d4d  |  }M|
0348 b57d 4995  | }I |
034a 8591 7d3d  |  }=|
034c b9b1 e480  |    |
034e a150 80e8  | P  |
0350 8111 a585  |    |
0352 b984 b951  |   Q|
0354 c995 94a4  |    |
0356 81c9 95d1  |    |
0358 d5c9 b881  |    |
035a 09bd bdb1  |    |
035c 9585 b8ec  |    |
035e 2828 8080  |((  |
0360 8081 c1c9  |    |
0362 bd8d 9591  |    |
0364 d5c9 9481  |    |
0366 4db5 7d3d  |M }=|
0368 c9a5 9da5  |    |
036a b985 b17d  |   }|
036c 39bd 9194  |9   |
036e 8080 8080  |    |
0370 80a1 5080  |  P |
0372 e881 11a5  |    |
0374 85b9 84b9  |    |
0376 51c9 9594  |Q   |
0378 ec81 5880  |  X |
037a e881 11a5  |    |
037c 85b9 84b9  |    |
037e 51c9 9594  |Q   |
0380 a4ec 2880  |  ( |
0382 8080 8199  |    |
0384 d5b9 8dd1  |    |
0386 a5bd b880  |    |
0388 814d b57d  | M }|
038a 3dc9 a59d  |=   |
038c a5b9 85b1  |    |
038e 7d39 bd91  |}9  |
0390 9480 8080  |    |
0392 8080 a150  |   P|
0394 80e8 8111  |    |
0396 a585 b984  |    |
0398 b951 c995  | Q  |
039a 94a4 81c9  |    |
039c 95d1 d5c9  |    |
039e b881 11a5  |    |
03a0 85b9 84b9  |    |
03a2 51c9 9594  |Q   |
03a4 ec28 8080  | (  |
03a6 8081 99d5  |    |
03a8 b98d d1a5  |    |
03aa bdb8 8081  |    |
03ac 2185 cd7d  |!  }|
03ae 4db5 7d3d  |M }=|
03b0 c9a5 9da5  |    |
03b2 b985 b17d  |   }|
03b4 39bd 9194  |9   |
03b6 80a1 5080  |  P |
03b8 e881 11a5  |    |
03ba 85b9 84b9  |    |
03bc 51c9 9594  |Q   |
03be a481 c995  |    |
03c0 d1d5 c9b8  |    |
03c2 8109 bdbd  |    |
03c4 b195 85b8  |    |
03c6 ec28 2880  | (( |
03c8 8080 81c1  |    |
03ca c9bd 8d95  |    |
03cc 91d5 c994  |    |
03ce 814d b57d  | M }|
03d0 41c9 9591  |A   |
03d2 9599 a5b9  |    |
03d4 9590 8080  |    |
03d6 8080 80a1  |    |
03d8 5080 e881  |P   |
03da 11a5 85b9  |    |
03dc 84b9 51c9  |  Q |
03de 9594 ec81  |    |
03e0 5880 e881  |X   |
03e2 09bd bdb1  |    |
03e4 9585 b8a4  |    |
03e6 ec28 8080  | (  |
03e8 8081 99d5  |    |
03ea b98d d1a5  |    |
03ec bdb8 8081  |    |
03ee 4db5 7d41  |M }A|
03f0 c995 9195  |    |
03f2 99a5 b995  |    |
03f4 9080 8080  |    |
03f6 8080 a150  |   P|
03f8 80e8 8111  |    |
03fa a585 b984  |    |
03fc b951 c995  | Q  |
03fe 94a4 81c9  |    |