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

⟦824fb3e6f⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0298       |    |		.CONST	0x0298								; 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 8001       |    |		.CONST	0x8001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00e8       |    |		.CONST	0x00e8								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0039       | 9  |		.CONST	0x0039								; Number of locals
000b			INIT_0008:
000b 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated
000d 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated
000f 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated
0011 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated
0013 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
0015 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated
0017 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated
0019 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated
001b 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated
001d 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated
001f 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated
0021 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated
0023 029a 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible,Unelaborated
0025 0093 0000  |    |		push_full_address	0x0
0027 60dc       |`   |		Indirect_Literal	Discrete,0x104,{0x80000000, 0x00010000}
0028 0273       | s  |		Execute	Discrete,Plus
0029 e20d       |    |		Load	0x1,0xd
002a 60d5       |`   |		Indirect_Literal	Discrete,0x100,{0x00000000, 0x0000ffff}
002b 0279       | y  |		Execute	Discrete,And
002c 0273       | s  |		Execute	Discrete,Plus
002d 0129       | )  |		Execute	Any,Make_Visible
002e 4800       |H   |		Short_Literal	0x0
002f 0093 01f3  |    |		push_full_address	INIT_01f0
0031 02a0       |    |		Declare_Subprogram	Null_Subprogram
0032 038f       |    |		Declare_Type	Package,Defined,Visible
0033 0386       |    |		Declare_Variable	Package,Visible
0034 0093 0000  |    |		push_full_address	0x0
0036 60c5       |`   |		Indirect_Literal	Discrete,0xfc,{0x80000000, 0x00020000}
0037 0273       | s  |		Execute	Discrete,Plus
0038 e20d       |    |		Load	0x1,0xd
0039 60c6       |`   |		Indirect_Literal	Discrete,0x100,{0x00000000, 0x0000ffff}
003a 0279       | y  |		Execute	Discrete,And
003b 0273       | s  |		Execute	Discrete,Plus
003c e002       |    |		Load	0x0,0x2
003d 0273       | s  |		Execute	Discrete,Plus
003e e20e       |    |		Load	0x1,0xe
003f e20f       |    |		Load	0x1,0xf
0040 e210       |    |		Load	0x1,0x10
0041 e211       |    |		Load	0x1,0x11
0042 e212       |    |		Load	0x1,0x12
0043 e213       |    |		Load	0x1,0x13
0044 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0045 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0046 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0047 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0048 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0049 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
004a 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
004b 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
004c 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
004d 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
004e 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
004f 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0050 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0051 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0052 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0053 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0054 e003       |    |		Load	0x0,0x3
0055 0386       |    |		Declare_Variable	Package,Visible
0056 00d8       |    |		Load_Top	At_Offset_0
0057 020f       |    |		Execute	Module,Activate
0058 0093 0000  |    |		push_full_address	0x0
005a 609d       |`   |		Indirect_Literal	Discrete,0xf8,{0x80000000, 0x00010000}
005b 0273       | s  |		Execute	Discrete,Plus
005c e20d       |    |		Load	0x1,0xd
005d 60a2       |`   |		Indirect_Literal	Discrete,0x100,{0x00000000, 0x0000ffff}
005e 0279       | y  |		Execute	Discrete,And
005f 0273       | s  |		Execute	Discrete,Plus
0060 e004       |    |		Load	0x0,0x4
0061 0273       | s  |		Execute	Discrete,Plus
0062 e005       |    |		Load	0x0,0x5
0063 00da       |    |		Load_Top	At_Offset_2
0064 0098       |    |		Execute	Package,Field_Read_Dynamic
0065 e006       |    |		Load	0x0,0x6
0066 00db       |    |		Load_Top	At_Offset_3
0067 0098       |    |		Execute	Package,Field_Read_Dynamic
0068 4801       |H   |		Short_Literal	0x1
0069 e007       |    |		Load	0x0,0x7
006a e236       | 6  |		Load	0x1,0x36
006b 0095       |    |		Execute	Package,Field_Reference_Dynamic
006c e008       |    |		Load	0x0,0x8
006d e236       | 6  |		Load	0x1,0x36
006e 0095       |    |		Execute	Package,Field_Reference_Dynamic
006f e009       |    |		Load	0x0,0x9
0070 e236       | 6  |		Load	0x1,0x36
0071 0095       |    |		Execute	Package,Field_Reference_Dynamic
0072 e00a       |    |		Load	0x0,0xa
0073 e236       | 6  |		Load	0x1,0x36
0074 0095       |    |		Execute	Package,Field_Reference_Dynamic
0075 e00b       |    |		Load	0x0,0xb
0076 e236       | 6  |		Load	0x1,0x36
0077 0095       |    |		Execute	Package,Field_Reference_Dynamic
0078 e00c       |    |		Load	0x0,0xc
0079 e236       | 6  |		Load	0x1,0x36
007a 0095       |    |		Execute	Package,Field_Reference_Dynamic
007b e00d       |    |		Load	0x0,0xd
007c e236       | 6  |		Load	0x1,0x36
007d 0095       |    |		Execute	Package,Field_Reference_Dynamic
007e e00e       |    |		Load	0x0,0xe
007f e236       | 6  |		Load	0x1,0x36
0080 0095       |    |		Execute	Package,Field_Reference_Dynamic
0081 e00f       |    |		Load	0x0,0xf
0082 e236       | 6  |		Load	0x1,0x36
0083 0095       |    |		Execute	Package,Field_Reference_Dynamic
0084 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0085 e224       | $  |		Load	0x1,0x24
0086 e225       | %  |		Load	0x1,0x25
0087 00d8       |    |		Load_Top	At_Offset_0
0088 e224       | $  |		Load	0x1,0x24
0089 0260       | `  |		Execute	Discrete,In_Type
008a 7001       |p   |		Jump_Nonzero	0x8c
008b 0801       |    |		Execute_Immediate	Raise,0x1
008c e010       |    |		Load	0x0,0x10
008d 0386       |    |		Declare_Variable	Package,Visible
008e 00d8       |    |		Load_Top	At_Offset_0
008f 020f       |    |		Execute	Module,Activate
0090 e011       |    |		Load	0x0,0x11
0091 00d9       |    |		Load_Top	At_Offset_1
0092 0098       |    |		Execute	Package,Field_Read_Dynamic
0093 0129       | )  |		Execute	Any,Make_Visible
0094 e012       |    |		Load	0x0,0x12
0095 00db       |    |		Load_Top	At_Offset_3
0096 0098       |    |		Execute	Package,Field_Read_Dynamic
0097 0129       | )  |		Execute	Any,Make_Visible
0098 00bf       |    |		Action	Accept_Activation
0099 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
009a 00c7       |    |		Action	Elaborate_Subprogram
009b 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
009c 00c7       |    |		Action	Elaborate_Subprogram
009d 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
009e 00c7       |    |		Action	Elaborate_Subprogram
009f 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
00a0 00c7       |    |		Action	Elaborate_Subprogram
00a1 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
00a2 00c7       |    |		Action	Elaborate_Subprogram
00a3 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
00a4 00c7       |    |		Action	Elaborate_Subprogram
00a5 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
00a6 00c7       |    |		Action	Elaborate_Subprogram
00a7 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
00a8 00c7       |    |		Action	Elaborate_Subprogram
00a9 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
00aa 00c7       |    |		Action	Elaborate_Subprogram
00ab 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
00ac 00c7       |    |		Action	Elaborate_Subprogram
00ad 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
00ae 00c7       |    |		Action	Elaborate_Subprogram
00af 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
00b0 00c7       |    |		Action	Elaborate_Subprogram
00b1 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
00b2 00c7       |    |		Action	Elaborate_Subprogram
00b3 e013       |    |		Load	0x0,0x13
00b4 e014       |    |		Load	0x0,0x14
00b5 e237       | 7  |		Load	0x1,0x37
00b6 0098       |    |		Execute	Package,Field_Read_Dynamic
00b7 0095       |    |		Execute	Package,Field_Reference_Dynamic
00b8 e011       |    |		Load	0x0,0x11
00b9 e237       | 7  |		Load	0x1,0x37
00ba 0098       |    |		Execute	Package,Field_Read_Dynamic
00bb e015       |    |		Load	0x0,0x15
00bc e014       |    |		Load	0x0,0x14
00bd e237       | 7  |		Load	0x1,0x37
00be 0098       |    |		Execute	Package,Field_Read_Dynamic
00bf 0095       |    |		Execute	Package,Field_Reference_Dynamic
00c0 e016       |    |		Load	0x0,0x16
00c1 e014       |    |		Load	0x0,0x14
00c2 e237       | 7  |		Load	0x1,0x37
00c3 0098       |    |		Execute	Package,Field_Read_Dynamic
00c4 0095       |    |		Execute	Package,Field_Reference_Dynamic
00c5 e017       |    |		Load	0x0,0x17
00c6 e014       |    |		Load	0x0,0x14
00c7 e237       | 7  |		Load	0x1,0x37
00c8 0098       |    |		Execute	Package,Field_Read_Dynamic
00c9 0095       |    |		Execute	Package,Field_Reference_Dynamic
00ca e018       |    |		Load	0x0,0x18
00cb e014       |    |		Load	0x0,0x14
00cc e237       | 7  |		Load	0x1,0x37
00cd 0098       |    |		Execute	Package,Field_Read_Dynamic
00ce 0095       |    |		Execute	Package,Field_Reference_Dynamic
00cf e019       |    |		Load	0x0,0x19
00d0 e014       |    |		Load	0x0,0x14
00d1 e237       | 7  |		Load	0x1,0x37
00d2 0098       |    |		Execute	Package,Field_Read_Dynamic
00d3 0095       |    |		Execute	Package,Field_Reference_Dynamic
00d4 e01a       |    |		Load	0x0,0x1a
00d5 e014       |    |		Load	0x0,0x14
00d6 e237       | 7  |		Load	0x1,0x37
00d7 0098       |    |		Execute	Package,Field_Read_Dynamic
00d8 0095       |    |		Execute	Package,Field_Reference_Dynamic
00d9 e01b       |    |		Load	0x0,0x1b
00da e014       |    |		Load	0x0,0x14
00db e237       | 7  |		Load	0x1,0x37
00dc 0098       |    |		Execute	Package,Field_Read_Dynamic
00dd 0095       |    |		Execute	Package,Field_Reference_Dynamic
00de e01c       |    |		Load	0x0,0x1c
00df e014       |    |		Load	0x0,0x14
00e0 e237       | 7  |		Load	0x1,0x37
00e1 0098       |    |		Execute	Package,Field_Read_Dynamic
00e2 0095       |    |		Execute	Package,Field_Reference_Dynamic
00e3 480a       |H   |		Short_Literal	0xa
00e4 e235       | 5  |		Load	0x1,0x35
00e5 020e       |    |		Execute	Module,Augment_Imports
00e6 e235       | 5  |		Load	0x1,0x35
00e7 020f       |    |		Execute	Module,Activate
00e8			BODY_0008:
00e8 00bc       |    |		Action	Signal_Activated
00e9 00bb       |    |		Action	Signal_Completion
00ea 0000 0000  |    |		.BLANK	0000[0x6]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 00da       |    |		Load_Top	At_Offset_2
00f4 e01d       |    |		Load	0x0,0x1d
00f5 e237       | 7  |		Load	0x1,0x37
00f6 0096       |    |		Execute	Package,Entry
00f7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00f8 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
00fc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
0100 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0104 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 00da       |    |		Load_Top	At_Offset_2
010c e011       |    |		Load	0x0,0x11
010d e237       | 7  |		Load	0x1,0x37
010e 0098       |    |		Execute	Package,Field_Read_Dynamic
010f 0216       |    |		Execute	Heap_Access,Convert
0110 e01e       |    |		Load	0x0,0x1e
0111 e237       | 7  |		Load	0x1,0x37
0112 0096       |    |		Execute	Package,Entry
0113 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0114 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0115 0000 0000  |    |		.XXX[0x3]
0117 0000       |    |
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b       |    |		.CONST	0x011b								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0001       |    |		.CONST	0x0001								; Number of locals
011b			BODY_0118:
011b			INIT_0118:
011b 00db       |    |		Load_Top	At_Offset_3
011c e210       |    |		Load	0x1,0x10
011d 0119       |    |		Execute	Any,Check_In_Formal_Type
011e 00db       |    |		Load_Top	At_Offset_3
011f e01f       |    |		Load	0x0,0x1f
0120 e237       | 7  |		Load	0x1,0x37
0121 0096       |    |		Execute	Package,Entry
0122 e020       |    |		Load	0x0,0x20
0123 e236       | 6  |		Load	0x1,0x36
0124 0096       |    |		Execute	Package,Entry
0125 e20f       |    |		Load	0x1,0xf
0126 0119       |    |		Execute	Any,Check_In_Formal_Type
0127 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 00e1       |    |		Load_Encached	Boolean_Cache
012c e5fd       |    |		Load	0x2,-0x3
012d 00d8       |    |		Load_Top	At_Offset_0
012e 0120       |    |		Execute	Any,Is_Value
012f 6804       |h   |		Jump_Zero	0x134
0130 e236       | 6  |		Load	0x1,0x36
0131 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0132 011e       |    |		Execute	Any,Convert
0133 7802       |x   |		Jump	0x136
0134 e20f       |    |		Load	0x1,0xf
0135 0119       |    |		Execute	Any,Check_In_Formal_Type
0136 e5fe       |    |		Load	0x2,-0x2
0137 e210       |    |		Load	0x1,0x10
0138 0119       |    |		Execute	Any,Check_In_Formal_Type
0139 e5ff       |    |		Load	0x2,-0x1
013a e01f       |    |		Load	0x0,0x1f
013b e237       | 7  |		Load	0x1,0x37
013c 0096       |    |		Execute	Package,Entry
013d e021       | !  |		Load	0x0,0x21
013e e236       | 6  |		Load	0x1,0x36
013f 0096       |    |		Execute	Package,Entry
0140 c5fd       |    |		Store	0x2,-0x3
0141 c5fc       |    |		Store	0x2,-0x4
0142 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0143 0000 0000  |    |		.BLANK	0000[0x5]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014f       | O  |		.CONST	0x014f								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0002       |    |		.CONST	0x0002								; Number of locals
014b			INIT_0148:
014b e5fd       |    |		Load	0x2,-0x3
014c e01f       |    |		Load	0x0,0x1f
014d e237       | 7  |		Load	0x1,0x37
014e 0096       |    |		Execute	Package,Entry
014f			BODY_0148:
014f 00d8       |    |		Load_Top	At_Offset_0
0150 e5fe       |    |		Load	0x2,-0x2
0151 e20f       |    |		Load	0x1,0xf
0152 0119       |    |		Execute	Any,Check_In_Formal_Type
0153 e5ff       |    |		Load	0x2,-0x1
0154 e210       |    |		Load	0x1,0x10
0155 0119       |    |		Execute	Any,Check_In_Formal_Type
0156 e022       | "  |		Load	0x0,0x22
0157 e236       | 6  |		Load	0x1,0x36
0158 0096       |    |		Execute	Package,Entry
0159 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
015a e5fd       |    |		Load	0x2,-0x3
015b e011       |    |		Load	0x0,0x11
015c e237       | 7  |		Load	0x1,0x37
015d 0098       |    |		Execute	Package,Field_Read_Dynamic
015e 0216       |    |		Execute	Heap_Access,Convert
015f 00d9       |    |		Load_Top	At_Offset_1
0160 e023       | #  |		Load	0x0,0x23
0161 e237       | 7  |		Load	0x1,0x37
0162 0096       |    |		Execute	Package,Entry
0163 c5fd       |    |		Store	0x2,-0x3
0164 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0165 0000 0000  |    |		.XXX[0x3]
0167 0000       |    |
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016f       | o  |		.CONST	0x016f								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0002       |    |		.CONST	0x0002								; Number of locals
016b			INIT_0168:
016b 00db       |    |		Load_Top	At_Offset_3
016c e01f       |    |		Load	0x0,0x1f
016d e237       | 7  |		Load	0x1,0x37
016e 0096       |    |		Execute	Package,Entry
016f			BODY_0168:
016f 00d8       |    |		Load_Top	At_Offset_0
0170 e5ff       |    |		Load	0x2,-0x1
0171 e210       |    |		Load	0x1,0x10
0172 0119       |    |		Execute	Any,Check_In_Formal_Type
0173 e024       | $  |		Load	0x0,0x24
0174 e236       | 6  |		Load	0x1,0x36
0175 0096       |    |		Execute	Package,Entry
0176 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0177 e5fe       |    |		Load	0x2,-0x2
0178 e011       |    |		Load	0x0,0x11
0179 e237       | 7  |		Load	0x1,0x37
017a 0098       |    |		Execute	Package,Field_Read_Dynamic
017b 0216       |    |		Execute	Heap_Access,Convert
017c 00d9       |    |		Load_Top	At_Offset_1
017d e023       | #  |		Load	0x0,0x23
017e e237       | 7  |		Load	0x1,0x37
017f 0096       |    |		Execute	Package,Entry
0180 c5fe       |    |		Store	0x2,-0x2
0181 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0182 0000 0000  |    |		.BLANK	0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b       |    |		.CONST	0x018b								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0001       |    |		.CONST	0x0001								; Number of locals
018b			BODY_0188:
018b			INIT_0188:
018b 00da       |    |		Load_Top	At_Offset_2
018c e01f       |    |		Load	0x0,0x1f
018d e237       | 7  |		Load	0x1,0x37
018e 0096       |    |		Execute	Package,Entry
018f e025       | %  |		Load	0x0,0x25
0190 e236       | 6  |		Load	0x1,0x36
0191 0096       |    |		Execute	Package,Entry
0192 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0193 0000 0000  |    |		.BLANK	0000[0x5]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019f       |    |		.CONST	0x019f								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0002       |    |		.CONST	0x0002								; Number of locals
019b			INIT_0198:
019b 00da       |    |		Load_Top	At_Offset_2
019c e01f       |    |		Load	0x0,0x1f
019d e237       | 7  |		Load	0x1,0x37
019e 0096       |    |		Execute	Package,Entry
019f			BODY_0198:
019f 00d8       |    |		Load_Top	At_Offset_0
01a0 e026       | &  |		Load	0x0,0x26
01a1 e236       | 6  |		Load	0x1,0x36
01a2 0096       |    |		Execute	Package,Entry
01a3 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01a4 00db       |    |		Load_Top	At_Offset_3
01a5 e011       |    |		Load	0x0,0x11
01a6 e237       | 7  |		Load	0x1,0x37
01a7 0098       |    |		Execute	Package,Field_Read_Dynamic
01a8 0216       |    |		Execute	Heap_Access,Convert
01a9 00d9       |    |		Load_Top	At_Offset_1
01aa e023       | #  |		Load	0x0,0x23
01ab e237       | 7  |		Load	0x1,0x37
01ac 0096       |    |		Execute	Package,Entry
01ad c5ff       |    |		Store	0x2,-0x1
01ae 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01af 0000       |    |		.XXX[0x1]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 00da       |    |		Load_Top	At_Offset_2
01b4 a5fd       |    |		Store_Unchecked	0x2,-0x3
01b5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01b6 0000 0000  |    |		.XXX[0x2]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb e012       |    |		Load	0x0,0x12
01bc e236       | 6  |		Load	0x1,0x36
01bd 0098       |    |		Execute	Package,Field_Read_Dynamic
01be 00db       |    |		Load_Top	At_Offset_3
01bf e01f       |    |		Load	0x0,0x1f
01c0 e237       | 7  |		Load	0x1,0x37
01c1 0096       |    |		Execute	Package,Entry
01c2 e027       | '  |		Load	0x0,0x27
01c3 e236       | 6  |		Load	0x1,0x36
01c4 0096       |    |		Execute	Package,Entry
01c5 c5fe       |    |		Store	0x2,-0x2
01c6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01c7 0000       |    |		.XXX[0x1]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb       |    |		.CONST	0x01cb								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0001       |    |		.CONST	0x0001								; Number of locals
01cb			BODY_01c8:
01cb			INIT_01c8:
01cb 00da       |    |		Load_Top	At_Offset_2
01cc e012       |    |		Load	0x0,0x12
01cd e236       | 6  |		Load	0x1,0x36
01ce 0098       |    |		Execute	Package,Field_Read_Dynamic
01cf 0226       | &  |		Execute	Access,Convert
01d0 e028       | (  |		Load	0x0,0x28
01d1 e236       | 6  |		Load	0x1,0x36
01d2 0096       |    |		Execute	Package,Entry
01d3 003b       | ;  |		Store_Top	Access,At_Offset_3
01d4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01d5 0000 0000  |    |		.XXX[0x3]
01d7 0000       |    |
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db       |    |		.CONST	0x01db								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0001       |    |		.CONST	0x0001								; Number of locals
01db			BODY_01d8:
01db			INIT_01d8:
01db 00da       |    |		Load_Top	At_Offset_2
01dc e029       | )  |		Load	0x0,0x29
01dd e236       | 6  |		Load	0x1,0x36
01de 0096       |    |		Execute	Package,Entry
01df e210       |    |		Load	0x1,0x10
01e0 0119       |    |		Execute	Any,Check_In_Formal_Type
01e1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01e2 0000 0000  |    |		.BLANK	0000[0x6]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb 00da       |    |		Load_Top	At_Offset_2
01ec e02a       | *  |		Load	0x0,0x2a
01ed e236       | 6  |		Load	0x1,0x36
01ee 0096       |    |		Execute	Package,Entry
01ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 0218       |    |		.CONST	0x0218								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0015       |    |		.CONST	0x0015								; Number of locals
01f3			INIT_01f0:
01f3 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
01f5 029a 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call,Visible,Unelaborated
01f7 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated
01f9 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated
01fb 029a 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call,Visible,Unelaborated
01fd 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated
01ff 029a 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call,Visible,Unelaborated
0201 029a 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Visible,Unelaborated
0203 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
0205 00bf       |    |		Action	Accept_Activation
0206 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0207 00c7       |    |		Action	Elaborate_Subprogram
0208 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0209 00c7       |    |		Action	Elaborate_Subprogram
020a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
020b 00c7       |    |		Action	Elaborate_Subprogram
020c 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
020d 00c7       |    |		Action	Elaborate_Subprogram
020e 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
020f 00c7       |    |		Action	Elaborate_Subprogram
0210 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0211 00c7       |    |		Action	Elaborate_Subprogram
0212 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0213 00c7       |    |		Action	Elaborate_Subprogram
0214 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0215 00c7       |    |		Action	Elaborate_Subprogram
0216 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0217 00c7       |    |		Action	Elaborate_Subprogram
0218			BODY_01f0:
0218 00bc       |    |		Action	Signal_Activated
0219 00bb       |    |		Action	Signal_Completion
021a 0000 0000  |    |		.BLANK	0000[0x6]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 00db       |    |		Load_Top	At_Offset_3
0224 00db       |    |		Load_Top	At_Offset_3
0225 8001       |    |		Call	0x0,0x1
0226 c5fe       |    |		Store	0x2,-0x2
0227 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b e5fd       |    |		Load	0x2,-0x3
022c e002       |    |		Load	0x0,0x2
022d 0216       |    |		Execute	Heap_Access,Convert
022e e5fe       |    |		Load	0x2,-0x2
022f e5ff       |    |		Load	0x2,-0x1
0230 8003       |    |		Call	0x0,0x3
0231 c5fd       |    |		Store	0x2,-0x3
0232 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0233 0000 0000  |    |		.BLANK	0000[0x5]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 00db       |    |		Load_Top	At_Offset_3
023c e002       |    |		Load	0x0,0x2
023d 0216       |    |		Execute	Heap_Access,Convert
023e 00db       |    |		Load_Top	At_Offset_3
023f 8004       |    |		Call	0x0,0x4
0240 c5fe       |    |		Store	0x2,-0x2
0241 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0242 0000 0000  |    |		.BLANK	0000[0x6]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b 00da       |    |		Load_Top	At_Offset_2
024c 8005       |    |		Call	0x0,0x5
024d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
024e 0000 0000  |    |		.XXX[0x2]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 00da       |    |		Load_Top	At_Offset_2
0254 e002       |    |		Load	0x0,0x2
0255 0216       |    |		Execute	Heap_Access,Convert
0256 8006       |    |		Call	0x0,0x6
0257 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0258 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0259 0000 0000  |    |		.BLANK	0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263       | c  |		.CONST	0x0263								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0001       |    |		.CONST	0x0001								; Number of locals
0263			BODY_0260:
0263			INIT_0260:
0263 00db       |    |		Load_Top	At_Offset_3
0264 e002       |    |		Load	0x0,0x2
0265 0216       |    |		Execute	Heap_Access,Convert
0266 00db       |    |		Load_Top	At_Offset_3
0267 8007       |    |		Call	0x0,0x7
0268 c5fe       |    |		Store	0x2,-0x2
0269 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
026a 0000 0000  |    |		.BLANK	0000[0x6]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 00db       |    |		Load_Top	At_Offset_3
0274 e002       |    |		Load	0x0,0x2
0275 0216       |    |		Execute	Heap_Access,Convert
0276 00db       |    |		Load_Top	At_Offset_3
0277 8008       |    |		Call	0x0,0x8
0278 c5fe       |    |		Store	0x2,-0x2
0279 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
027a 0000 0000  |    |		.BLANK	0000[0x6]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283       |    |		.CONST	0x0283								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0001       |    |		.CONST	0x0001								; Number of locals
0283			BODY_0280:
0283			INIT_0280:
0283 00da       |    |		Load_Top	At_Offset_2
0284 8009       |    |		Call	0x0,0x9
0285 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0286 0000 0000  |    |		.XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b 00db       |    |		Load_Top	At_Offset_3
028c e002       |    |		Load	0x0,0x2
028d 0216       |    |		Execute	Heap_Access,Convert
028e 00db       |    |		Load_Top	At_Offset_3
028f 800a       |    |		Call	0x0,0xa
0290 c5fe       |    |		Store	0x2,-0x2
0291 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0292 0000 0000  |    |		.BLANK	0000[0x6]
0298 ; --------------------------------------------------------------------------------------
0298 ; Debug Table
0298 ; --------------------------------------------------------------------------------------
0298 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0xefb4,0x0000,0x0001,0x0000
029e 0000 0000  |    |		.BLANK	0000[0x162]