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

⟦b2105a860⟧

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

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 0368       | h  |		.CONST	0x0368								; 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 8002       |    |		.CONST	0x8002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0136       | 6  |		.CONST	0x0136								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0026       | &  |		.CONST	0x0026								; Number of locals
000b			INIT_0008:
000b 4801       |H   |		Short_Literal	0x1
000c 4802       |H   |		Short_Literal	0x2
000d e002       |    |		Load	0x0,0x2
000e 02a0       |    |		Declare_Subprogram	Null_Subprogram
000f 4801       |H   |		Short_Literal	0x1
0010 035e       | ^  |		Declare_Type	Array,Defined,Visible
0011 4801       |H   |		Short_Literal	0x1
0012 4804       |H   |		Short_Literal	0x4
0013 e002       |    |		Load	0x0,0x2
0014 02a0       |    |		Declare_Subprogram	Null_Subprogram
0015 4801       |H   |		Short_Literal	0x1
0016 035e       | ^  |		Declare_Type	Array,Defined,Visible
0017 4801       |H   |		Short_Literal	0x1
0018 4806       |H   |		Short_Literal	0x6
0019 e002       |    |		Load	0x0,0x2
001a 02a0       |    |		Declare_Subprogram	Null_Subprogram
001b 4801       |H   |		Short_Literal	0x1
001c 035e       | ^  |		Declare_Type	Array,Defined,Visible
001d 4801       |H   |		Short_Literal	0x1
001e 480d       |H   |		Short_Literal	0xd
001f e003       |    |		Load	0x0,0x3
0020 02a0       |    |		Declare_Subprogram	Null_Subprogram
0021 4801       |H   |		Short_Literal	0x1
0022 035e       | ^  |		Declare_Type	Array,Defined,Visible
0023 4801       |H   |		Short_Literal	0x1
0024 480e       |H   |		Short_Literal	0xe
0025 e003       |    |		Load	0x0,0x3
0026 02a0       |    |		Declare_Subprogram	Null_Subprogram
0027 4801       |H   |		Short_Literal	0x1
0028 035e       | ^  |		Declare_Type	Array,Defined,Visible
0029 4801       |H   |		Short_Literal	0x1
002a 4810       |H   |		Short_Literal	0x10
002b e003       |    |		Load	0x0,0x3
002c 02a0       |    |		Declare_Subprogram	Null_Subprogram
002d 4801       |H   |		Short_Literal	0x1
002e 035e       | ^  |		Declare_Type	Array,Defined,Visible
002f 4801       |H   |		Short_Literal	0x1
0030 4818       |H   |		Short_Literal	0x18
0031 e003       |    |		Load	0x0,0x3
0032 02a0       |    |		Declare_Subprogram	Null_Subprogram
0033 4801       |H   |		Short_Literal	0x1
0034 035e       | ^  |		Declare_Type	Array,Defined,Visible
0035 4801       |H   |		Short_Literal	0x1
0036 481c       |H   |		Short_Literal	0x1c
0037 e003       |    |		Load	0x0,0x3
0038 02a0       |    |		Declare_Subprogram	Null_Subprogram
0039 4801       |H   |		Short_Literal	0x1
003a 035e       | ^  |		Declare_Type	Array,Defined,Visible
003b 4801       |H   |		Short_Literal	0x1
003c 481e       |H   |		Short_Literal	0x1e
003d e003       |    |		Load	0x0,0x3
003e 02a0       |    |		Declare_Subprogram	Null_Subprogram
003f 4801       |H   |		Short_Literal	0x1
0040 035e       | ^  |		Declare_Type	Array,Defined,Visible
0041 4801       |H   |		Short_Literal	0x1
0042 4820       |H   |		Short_Literal	0x20
0043 e003       |    |		Load	0x0,0x3
0044 02a0       |    |		Declare_Subprogram	Null_Subprogram
0045 4801       |H   |		Short_Literal	0x1
0046 035e       | ^  |		Declare_Type	Array,Defined,Visible
0047 4800       |H   |		Short_Literal	0x0
0048 0093 02d3  |    |		push_full_address	INIT_02d0
004a 02a0       |    |		Declare_Subprogram	Null_Subprogram
004b 038f       |    |		Declare_Type	Package,Defined,Visible
004c e004       |    |		Load	0x0,0x4
004d e20f       |    |		Load	0x1,0xf
004e e002       |    |		Load	0x0,0x2
004f e005       |    |		Load	0x0,0x5
0050 e003       |    |		Load	0x0,0x3
0051 e20e       |    |		Load	0x1,0xe
0052 e213       |    |		Load	0x1,0x13
0053 e216       |    |		Load	0x1,0x16
0054 e006       |    |		Load	0x0,0x6
0055 4809       |H   |		Short_Literal	0x9
0056 e217       |    |		Load	0x1,0x17
0057 020e       |    |		Execute	Module,Augment_Imports
0058 0386       |    |		Declare_Variable	Package,Visible
0059 4800       |H   |		Short_Literal	0x0
005a 0093 02b3  |    |		push_full_address	INIT_02b0
005c 02a0       |    |		Declare_Subprogram	Null_Subprogram
005d 038f       |    |		Declare_Type	Package,Defined,Visible
005e e004       |    |		Load	0x0,0x4
005f e20f       |    |		Load	0x1,0xf
0060 e005       |    |		Load	0x0,0x5
0061 e007       |    |		Load	0x0,0x7
0062 e003       |    |		Load	0x0,0x3
0063 e214       |    |		Load	0x1,0x14
0064 e216       |    |		Load	0x1,0x16
0065 e006       |    |		Load	0x0,0x6
0066 4808       |H   |		Short_Literal	0x8
0067 e218       |    |		Load	0x1,0x18
0068 020e       |    |		Execute	Module,Augment_Imports
0069 0386       |    |		Declare_Variable	Package,Visible
006a 4800       |H   |		Short_Literal	0x0
006b 0093 028b  |    |		push_full_address	INIT_0288
006d 02a0       |    |		Declare_Subprogram	Null_Subprogram
006e 038f       |    |		Declare_Type	Package,Defined,Visible
006f e004       |    |		Load	0x0,0x4
0070 e20d       |    |		Load	0x1,0xd
0071 e007       |    |		Load	0x0,0x7
0072 e005       |    |		Load	0x0,0x5
0073 e008       |    |		Load	0x0,0x8
0074 e009       |    |		Load	0x0,0x9
0075 e003       |    |		Load	0x0,0x3
0076 e00a       |    |		Load	0x0,0xa
0077 e00b       |    |		Load	0x0,0xb
0078 e00c       |    |		Load	0x0,0xc
0079 e00d       |    |		Load	0x0,0xd
007a e00e       |    |		Load	0x0,0xe
007b e00f       |    |		Load	0x0,0xf
007c e212       |    |		Load	0x1,0x12
007d e216       |    |		Load	0x1,0x16
007e e006       |    |		Load	0x0,0x6
007f 4810       |H   |		Short_Literal	0x10
0080 e219       |    |		Load	0x1,0x19
0081 020e       |    |		Execute	Module,Augment_Imports
0082 0386       |    |		Declare_Variable	Package,Visible
0083 00e5       |    |		Load_Encached	Long_Integer_Cache
0084 00e5       |    |		Load_Encached	Long_Integer_Cache
0085 02a0       |    |		Declare_Subprogram	Null_Subprogram
0086 4802       |H   |		Short_Literal	0x2
0087 032e       | .  |		Declare_Type	Record,Defined,Visible
0088 4800       |H   |		Short_Literal	0x0
0089 480f       |H   |		Short_Literal	0xf
008a 00da       |    |		Load_Top	At_Offset_2
008b 02a0       |    |		Declare_Subprogram	Null_Subprogram
008c 4801       |H   |		Short_Literal	0x1
008d 035e       | ^  |		Declare_Type	Array,Defined,Visible
008e 4800       |H   |		Short_Literal	0x0
008f 0093 026b  |   k|		push_full_address	INIT_0268
0091 02a0       |    |		Declare_Subprogram	Null_Subprogram
0092 038f       |    |		Declare_Type	Package,Defined,Visible
0093 e004       |    |		Load	0x0,0x4
0094 e20f       |    |		Load	0x1,0xf
0095 e005       |    |		Load	0x0,0x5
0096 e007       |    |		Load	0x0,0x7
0097 e20d       |    |		Load	0x1,0xd
0098 e211       |    |		Load	0x1,0x11
0099 e21b       |    |		Load	0x1,0x1b
009a e216       |    |		Load	0x1,0x16
009b e006       |    |		Load	0x0,0x6
009c 4809       |H   |		Short_Literal	0x9
009d e21c       |    |		Load	0x1,0x1c
009e 020e       |    |		Execute	Module,Augment_Imports
009f 0386       |    |		Declare_Variable	Package,Visible
00a0 4800       |H   |		Short_Literal	0x0
00a1 0093 024b  |   K|		push_full_address	INIT_0248
00a3 02a0       |    |		Declare_Subprogram	Null_Subprogram
00a4 038f       |    |		Declare_Type	Package,Defined,Visible
00a5 e004       |    |		Load	0x0,0x4
00a6 e20f       |    |		Load	0x1,0xf
00a7 e005       |    |		Load	0x0,0x5
00a8 e007       |    |		Load	0x0,0x7
00a9 e211       |    |		Load	0x1,0x11
00aa e21b       |    |		Load	0x1,0x1b
00ab e216       |    |		Load	0x1,0x16
00ac e006       |    |		Load	0x0,0x6
00ad 4808       |H   |		Short_Literal	0x8
00ae e21d       |    |		Load	0x1,0x1d
00af 020e       |    |		Execute	Module,Augment_Imports
00b0 0386       |    |		Declare_Variable	Package,Visible
00b1 4800       |H   |		Short_Literal	0x0
00b2 0093 0233  |   3|		push_full_address	INIT_0230
00b4 02a0       |    |		Declare_Subprogram	Null_Subprogram
00b5 038f       |    |		Declare_Type	Package,Defined,Visible
00b6 e004       |    |		Load	0x0,0x4
00b7 e20f       |    |		Load	0x1,0xf
00b8 e005       |    |		Load	0x0,0x5
00b9 e010       |    |		Load	0x0,0x10
00ba e003       |    |		Load	0x0,0x3
00bb e215       |    |		Load	0x1,0x15
00bc e216       |    |		Load	0x1,0x16
00bd e006       |    |		Load	0x0,0x6
00be 4808       |H   |		Short_Literal	0x8
00bf e21e       |    |		Load	0x1,0x1e
00c0 020e       |    |		Execute	Module,Augment_Imports
00c1 0386       |    |		Declare_Variable	Package,Visible
00c2 4800       |H   |		Short_Literal	0x0
00c3 0093 021b  |    |		push_full_address	INIT_0218
00c5 02a0       |    |		Declare_Subprogram	Null_Subprogram
00c6 038f       |    |		Declare_Type	Package,Defined,Visible
00c7 e002       |    |		Load	0x0,0x2
00c8 e006       |    |		Load	0x0,0x6
00c9 4802       |H   |		Short_Literal	0x2
00ca 00db       |    |		Load_Top	At_Offset_3
00cb 020e       |    |		Execute	Module,Augment_Imports
00cc 0386       |    |		Declare_Variable	Package,Visible
00cd 4800       |H   |		Short_Literal	0x0
00ce 480f       |H   |		Short_Literal	0xf
00cf e003       |    |		Load	0x0,0x3
00d0 02a0       |    |		Declare_Subprogram	Null_Subprogram
00d1 4801       |H   |		Short_Literal	0x1
00d2 035e       | ^  |		Declare_Type	Array,Defined,Visible
00d3 4800       |H   |		Short_Literal	0x0
00d4 480f       |H   |		Short_Literal	0xf
00d5 e003       |    |		Load	0x0,0x3
00d6 02a0       |    |		Declare_Subprogram	Null_Subprogram
00d7 4801       |H   |		Short_Literal	0x1
00d8 035e       | ^  |		Declare_Type	Array,Defined,Visible
00d9 4800       |H   |		Short_Literal	0x0
00da 0093 01eb  |    |		push_full_address	INIT_01e8
00dc 02a0       |    |		Declare_Subprogram	Null_Subprogram
00dd 038f       |    |		Declare_Type	Package,Defined,Visible
00de e20d       |    |		Load	0x1,0xd
00df e005       |    |		Load	0x0,0x5
00e0 e008       |    |		Load	0x0,0x8
00e1 e00a       |    |		Load	0x0,0xa
00e2 e00b       |    |		Load	0x0,0xb
00e3 e00c       |    |		Load	0x0,0xc
00e4 e00d       |    |		Load	0x0,0xd
00e5 e00e       |    |		Load	0x0,0xe
00e6 e00f       |    |		Load	0x0,0xf
00e7 e003       |    |		Load	0x0,0x3
00e8 e220       |    |		Load	0x1,0x20
00e9 e221       | !  |		Load	0x1,0x21
00ea e210       |    |		Load	0x1,0x10
00eb e006       |    |		Load	0x0,0x6
00ec 480e       |H   |		Short_Literal	0xe
00ed e222       | "  |		Load	0x1,0x22
00ee 020e       |    |		Execute	Module,Augment_Imports
00ef 0386       |    |		Declare_Variable	Package,Visible
00f0 4800       |H   |		Short_Literal	0x0
00f1 0093 01cb  |    |		push_full_address	INIT_01c8
00f3 02a0       |    |		Declare_Subprogram	Null_Subprogram
00f4 038f       |    |		Declare_Type	Package,Defined,Visible
00f5 e009       |    |		Load	0x0,0x9
00f6 e006       |    |		Load	0x0,0x6
00f7 4802       |H   |		Short_Literal	0x2
00f8 00db       |    |		Load_Top	At_Offset_3
00f9 020e       |    |		Execute	Module,Augment_Imports
00fa 0386       |    |		Declare_Variable	Package,Visible
00fb 4800       |H   |		Short_Literal	0x0
00fc 0093 0163  |   c|		push_full_address	INIT_0160
00fe 02a0       |    |		Declare_Subprogram	Null_Subprogram
00ff 038f       |    |		Declare_Type	Package,Defined,Visible
0100 e002       |    |		Load	0x0,0x2
0101 e004       |    |		Load	0x0,0x4
0102 4802       |H   |		Short_Literal	0x2
0103 00db       |    |		Load_Top	At_Offset_3
0104 020e       |    |		Execute	Module,Augment_Imports
0105 0386       |    |		Declare_Variable	Package,Visible
0106 e217       |    |		Load	0x1,0x17
0107 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0108 e218       |    |		Load	0x1,0x18
0109 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
010a e219       |    |		Load	0x1,0x19
010b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
010c e21c       |    |		Load	0x1,0x1c
010d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
010e e21d       |    |		Load	0x1,0x1d
010f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0110 e21e       |    |		Load	0x1,0x1e
0111 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0112 e21f       |    |		Load	0x1,0x1f
0113 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0114 e222       | "  |		Load	0x1,0x22
0115 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0116 e223       | #  |		Load	0x1,0x23
0117 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0118 e224       | $  |		Load	0x1,0x24
0119 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
011a 02a0       |    |		Declare_Subprogram	Null_Subprogram
011b 480a       |H   |		Short_Literal	0xa
011c 032e       | .  |		Declare_Type	Record,Defined,Visible
011d 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated
011f 00bf       |    |		Action	Accept_Activation
0120 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0121 00c7       |    |		Action	Elaborate_Subprogram
0122 e217       |    |		Load	0x1,0x17
0123 020f       |    |		Execute	Module,Activate
0124 e218       |    |		Load	0x1,0x18
0125 020f       |    |		Execute	Module,Activate
0126 e219       |    |		Load	0x1,0x19
0127 020f       |    |		Execute	Module,Activate
0128 e21c       |    |		Load	0x1,0x1c
0129 020f       |    |		Execute	Module,Activate
012a e21d       |    |		Load	0x1,0x1d
012b 020f       |    |		Execute	Module,Activate
012c e21e       |    |		Load	0x1,0x1e
012d 020f       |    |		Execute	Module,Activate
012e e21f       |    |		Load	0x1,0x1f
012f 020f       |    |		Execute	Module,Activate
0130 e222       | "  |		Load	0x1,0x22
0131 020f       |    |		Execute	Module,Activate
0132 00db       |    |		Load_Top	At_Offset_3
0133 020f       |    |		Execute	Module,Activate
0134 00da       |    |		Load_Top	At_Offset_2
0135 020f       |    |		Execute	Module,Activate
0136			BODY_0008:
0136 00bc       |    |		Action	Signal_Activated
0137 00bb       |    |		Action	Signal_Completion
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 014b       | K  |		.CONST	0x014b								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0005       |    |		.CONST	0x0005								; Number of locals
013b			INIT_0138:
013b e011       |    |		Load	0x0,0x11
013c e012       |    |		Load	0x0,0x12
013d e225       | %  |		Load	0x1,0x25
013e e013       |    |		Load	0x0,0x13
013f 0387       |    |		Declare_Variable	Package
0140 00d8       |    |		Load_Top	At_Offset_0
0141 020f       |    |		Execute	Module,Activate
0142 0092 0311  |    |		Action	Push_String_Extended,0x311					; ".saved_state"
0144 00d9       |    |		Load_Top	At_Offset_1
0145 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0146 02c7       |    |		Declare_Variable	Any
0147 00d8       |    |		Load_Top	At_Offset_0
0148 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0149 e225       | %  |		Load	0x1,0x25
014a 0322       | "  |		Declare_Variable	Record
014b			BODY_0138:
014b 00d9       |    |		Load_Top	At_Offset_1
014c 00ea       |    |		Load_Encached	Null_String_Cache
014d e5ff       |    |		Load	0x2,-0x1
014e e403       |    |		Load	0x2,0x3
014f 01cc       |    |		Execute	Vector,Catenate
0150 4800       |H   |		Short_Literal	0x0
0151 e402       |    |		Load	0x2,0x2
0152 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0153 c404       |    |		Store	0x2,0x4
0154 00d8       |    |		Load_Top	At_Offset_0
0155 00da       |    |		Load_Top	At_Offset_2
0156 e402       |    |		Load	0x2,0x2
0157 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0158 00d1       |    |		Pop_Control	Pop_Count_1
0159 00d9       |    |		Load_Top	At_Offset_1
015a e402       |    |		Load	0x2,0x2
015b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
015c c404       |    |		Store	0x2,0x4
015d 00d8       |    |		Load_Top	At_Offset_0
015e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
015f 0000       |    |		.XXX[0x1]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 019d       |    |		.CONST	0x019d								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0015       |    |		.CONST	0x0015								; Number of locals
0163			INIT_0160:
0163 4800       |H   |		Short_Literal	0x0
0164 480a       |H   |		Short_Literal	0xa
0165 029f 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Call
0167 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0168 4801       |H   |		Short_Literal	0x1
0169 480a       |H   |		Short_Literal	0xa
016a 00da       |    |		Load_Top	At_Offset_2
016b 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
016c 4801       |H   |		Short_Literal	0x1
016d 481e       |H   |		Short_Literal	0x1e
016e 00e9       |    |		Load_Encached	String_Cache
016f 035c       | \  |		Declare_Type	Array,Constrained,Visible
0170 e001       |    |		Load	0x0,0x1
0171 00d8       |    |		Load_Top	At_Offset_0
0172 e001       |    |		Load	0x0,0x1
0173 00d8       |    |		Load_Top	At_Offset_0
0174 02a0       |    |		Declare_Subprogram	Null_Subprogram
0175 4804       |H   |		Short_Literal	0x4
0176 032e       | .  |		Declare_Type	Record,Defined,Visible
0177 e001       |    |		Load	0x0,0x1
0178 00d8       |    |		Load_Top	At_Offset_0
0179 00db       |    |		Load_Top	At_Offset_3
017a 02a0       |    |		Declare_Subprogram	Null_Subprogram
017b 4803       |H   |		Short_Literal	0x3
017c 032e       | .  |		Declare_Type	Record,Defined,Visible
017d e001       |    |		Load	0x0,0x1
017e 00d9       |    |		Load_Top	At_Offset_1
017f e002       |    |		Load	0x0,0x2
0180 02a0       |    |		Declare_Subprogram	Null_Subprogram
0181 4803       |H   |		Short_Literal	0x3
0182 032e       | .  |		Declare_Type	Record,Defined,Visible
0183 e001       |    |		Load	0x0,0x1
0184 00d8       |    |		Load_Top	At_Offset_0
0185 e001       |    |		Load	0x0,0x1
0186 00d8       |    |		Load_Top	At_Offset_0
0187 e001       |    |		Load	0x0,0x1
0188 00d8       |    |		Load_Top	At_Offset_0
0189 e001       |    |		Load	0x0,0x1
018a 02a0       |    |		Declare_Subprogram	Null_Subprogram
018b 4807       |H   |		Short_Literal	0x7
018c 032e       | .  |		Declare_Type	Record,Defined,Visible
018d 4801       |H   |		Short_Literal	0x1
018e 480a       |H   |		Short_Literal	0xa
018f e211       |    |		Load	0x1,0x11
0190 02a0       |    |		Declare_Subprogram	Null_Subprogram
0191 4801       |H   |		Short_Literal	0x1
0192 035e       | ^  |		Declare_Type	Array,Defined,Visible
0193 e002       |    |		Load	0x0,0x2
0194 e210       |    |		Load	0x1,0x10
0195 e212       |    |		Load	0x1,0x12
0196 e213       |    |		Load	0x1,0x13
0197 e211       |    |		Load	0x1,0x11
0198 e214       |    |		Load	0x1,0x14
0199 02a0       |    |		Declare_Subprogram	Null_Subprogram
019a 4806       |H   |		Short_Literal	0x6
019b 032e       | .  |		Declare_Type	Record,Defined,Visible
019c 00bf       |    |		Action	Accept_Activation
019d			BODY_0160:
019d 00bc       |    |		Action	Signal_Activated
019e 00bb       |    |		Action	Signal_Completion
019f 0000       |    |		.XXX[0x1]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 4607       |F   |		Jump_Case	0x8
01a4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
01a5 7807       |x   |		Jump	0x1ad								; case 0x1
01a6 780a       |x   |		Jump	0x1b1								; case 0x2
01a7 780e       |x   |		Jump	0x1b6								; case 0x3
01a8 7811       |x   |		Jump	0x1ba								; case 0x4
01a9 7812       |x   |		Jump	0x1bc								; case 0x5
01aa 7813       |x   |		Jump	0x1be								; case 0x6
01ab 7816       |x   |		Jump	0x1c2								; case 0x7
01ac 4302       |C   |		.XXX[0x1]
01ad 00da       |    |		Load_Top	At_Offset_2
01ae 0091 0306  |    |		Action	Push_String_Extended_Indexed,0x306				; "MICROCODE"
01b0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01b1 00db       |    |		Load_Top	At_Offset_3
01b2 00db       |    |		Load_Top	At_Offset_3
01b3 00e0       |    |		Load_Encached	Standard_Cache
01b4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01b5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01b6 00da       |    |		Load_Top	At_Offset_2
01b7 00e0       |    |		Load_Encached	Standard_Cache
01b8 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01b9 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01ba 00db       |    |		Load_Top	At_Offset_3
01bb 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01bc 00db       |    |		Load_Top	At_Offset_3
01bd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01be e20d       |    |		Load	0x1,0xd
01bf 00dc       |    |		Load_Top	At_Offset_4
01c0 0267       | g  |		Execute	Discrete,Predecessor
01c1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01c2 e20d       |    |		Load	0x1,0xd
01c3 00dc       |    |		Load_Top	At_Offset_4
01c4 0268       | h  |		Execute	Discrete,Successor
01c5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01c6 0000 0000  |    |		.XXX[0x2]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01df       |    |		.CONST	0x01df								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 000d       |    |		.CONST	0x000d								; Number of locals
01cb			INIT_01c8:
01cb e001       |    |		Load	0x0,0x1
01cc 012c       | ,  |		Execute	Any,Size
01cd 0f10       |    |		Execute_Immediate	Equal,0x10
01ce 7001       |p   |		Jump_Nonzero	0x1d0
01cf 0887       |    |		Execute_Immediate	Raise,0x87
01d0 4800       |H   |		Short_Literal	0x0
01d1 4bff       |K   |		Short_Literal	0x3ff
01d2 e001       |    |		Load	0x0,0x1
01d3 02a0       |    |		Declare_Subprogram	Null_Subprogram
01d4 4801       |H   |		Short_Literal	0x1
01d5 035e       | ^  |		Declare_Type	Array,Defined,Visible
01d6 00d8       |    |		Load_Top	At_Offset_0
01d7 012c       | ,  |		Execute	Any,Size
01d8 e002       |    |		Load	0x0,0x2
01d9 012c       | ,  |		Execute	Any,Size
01da 0901       |    |		Execute_Immediate	Binary_Scale,0x1
01db 027f       |    |		Execute	Discrete,Equal
01dc 7001       |p   |		Jump_Nonzero	0x1de
01dd 0887       |    |		Execute_Immediate	Raise,0x87
01de 00bf       |    |		Action	Accept_Activation
01df			BODY_01c8:
01df 00bc       |    |		Action	Signal_Activated
01e0 00bb       |    |		Action	Signal_Completion
01e1 0000 0000  |    |		.BLANK	0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 0211       |    |		.CONST	0x0211								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 000d       |    |		.CONST	0x000d								; Number of locals
01eb			INIT_01e8:
01eb e001       |    |		Load	0x0,0x1
01ec e002       |    |		Load	0x0,0x2
01ed 00d8       |    |		Load_Top	At_Offset_0
01ee e002       |    |		Load	0x0,0x2
01ef 00d8       |    |		Load_Top	At_Offset_0
01f0 e002       |    |		Load	0x0,0x2
01f1 00d8       |    |		Load_Top	At_Offset_0
01f2 e003       |    |		Load	0x0,0x3
01f3 e004       |    |		Load	0x0,0x4
01f4 e005       |    |		Load	0x0,0x5
01f5 e006       |    |		Load	0x0,0x6
01f6 00d8       |    |		Load_Top	At_Offset_0
01f7 e006       |    |		Load	0x0,0x6
01f8 e007       |    |		Load	0x0,0x7
01f9 00d8       |    |		Load_Top	At_Offset_0
01fa e008       |    |		Load	0x0,0x8
01fb e009       |    |		Load	0x0,0x9
01fc e00a       |    |		Load	0x0,0xa
01fd 00e5       |    |		Load_Encached	Long_Integer_Cache
01fe 00e5       |    |		Load_Encached	Long_Integer_Cache
01ff 00e5       |    |		Load_Encached	Long_Integer_Cache
0200 00e5       |    |		Load_Encached	Long_Integer_Cache
0201 e00a       |    |		Load	0x0,0xa
0202 00d8       |    |		Load_Top	At_Offset_0
0203 e00b       |    |		Load	0x0,0xb
0204 e00c       |    |		Load	0x0,0xc
0205 e00d       |    |		Load	0x0,0xd
0206 02a0       |    |		Declare_Subprogram	Null_Subprogram
0207 481b       |H   |		Short_Literal	0x1b
0208 032e       | .  |		Declare_Type	Record,Defined,Visible
0209 00d8       |    |		Load_Top	At_Offset_0
020a 012c       | ,  |		Execute	Any,Size
020b e00e       |    |		Load	0x0,0xe
020c 012c       | ,  |		Execute	Any,Size
020d 027f       |    |		Execute	Discrete,Equal
020e 7001       |p   |		Jump_Nonzero	0x210
020f 0887       |    |		Execute_Immediate	Raise,0x87
0210 00bf       |    |		Action	Accept_Activation
0211			BODY_01e8:
0211 00bc       |    |		Action	Signal_Activated
0212 00bb       |    |		Action	Signal_Completion
0213 0000 0000  |    |		.BLANK	0000[0x5]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0229       | )  |		.CONST	0x0229								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 000d       |    |		.CONST	0x000d								; Number of locals
021b			INIT_0218:
021b 4801       |H   |		Short_Literal	0x1
021c 600f       |`   |		Indirect_Literal	Discrete,0x22c,{0x00000000, 0x00000400}
021d e001       |    |		Load	0x0,0x1
021e 02a0       |    |		Declare_Subprogram	Null_Subprogram
021f 4801       |H   |		Short_Literal	0x1
0220 035e       | ^  |		Declare_Type	Array,Defined,Visible
0221 00d8       |    |		Load_Top	At_Offset_0
0222 012c       | ,  |		Execute	Any,Size
0223 e002       |    |		Load	0x0,0x2
0224 012c       | ,  |		Execute	Any,Size
0225 027f       |    |		Execute	Discrete,Equal
0226 7001       |p   |		Jump_Nonzero	0x228
0227 0887       |    |		Execute_Immediate	Raise,0x87
0228 00bf       |    |		Action	Accept_Activation
0229			BODY_0218:
0229 00bc       |    |		Action	Signal_Activated
022a 00bb       |    |		Action	Signal_Completion
022b 0000       |    |		.XXX[0x1]
022c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000400}
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0246       | F  |		.CONST	0x0246								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 000d       |    |		.CONST	0x000d								; Number of locals
0233			INIT_0230:
0233 e001       |    |		Load	0x0,0x1
0234 e002       |    |		Load	0x0,0x2
0235 e003       |    |		Load	0x0,0x3
0236 00d8       |    |		Load_Top	At_Offset_0
0237 e004       |    |		Load	0x0,0x4
0238 e005       |    |		Load	0x0,0x5
0239 e006       |    |		Load	0x0,0x6
023a e007       |    |		Load	0x0,0x7
023b 02a0       |    |		Declare_Subprogram	Null_Subprogram
023c 4808       |H   |		Short_Literal	0x8
023d 032e       | .  |		Declare_Type	Record,Defined,Visible
023e 00d8       |    |		Load_Top	At_Offset_0
023f 012c       | ,  |		Execute	Any,Size
0240 e008       |    |		Load	0x0,0x8
0241 012c       | ,  |		Execute	Any,Size
0242 027f       |    |		Execute	Discrete,Equal
0243 7001       |p   |		Jump_Nonzero	0x245
0244 0887       |    |		Execute_Immediate	Raise,0x87
0245 00bf       |    |		Action	Accept_Activation
0246			BODY_0230:
0246 00bc       |    |		Action	Signal_Activated
0247 00bb       |    |		Action	Signal_Completion
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0262       | b  |		.CONST	0x0262								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 000d       |    |		.CONST	0x000d								; Number of locals
024b			INIT_0248:
024b e001       |    |		Load	0x0,0x1
024c e002       |    |		Load	0x0,0x2
024d e003       |    |		Load	0x0,0x3
024e e004       |    |		Load	0x0,0x4
024f e003       |    |		Load	0x0,0x3
0250 00d8       |    |		Load_Top	At_Offset_0
0251 e003       |    |		Load	0x0,0x3
0252 00d8       |    |		Load_Top	At_Offset_0
0253 00e5       |    |		Load_Encached	Long_Integer_Cache
0254 e005       |    |		Load	0x0,0x5
0255 e006       |    |		Load	0x0,0x6
0256 e007       |    |		Load	0x0,0x7
0257 02a0       |    |		Declare_Subprogram	Null_Subprogram
0258 480c       |H   |		Short_Literal	0xc
0259 032e       | .  |		Declare_Type	Record,Defined,Visible
025a 00d8       |    |		Load_Top	At_Offset_0
025b 012c       | ,  |		Execute	Any,Size
025c e008       |    |		Load	0x0,0x8
025d 012c       | ,  |		Execute	Any,Size
025e 027f       |    |		Execute	Discrete,Equal
025f 7001       |p   |		Jump_Nonzero	0x261
0260 0887       |    |		Execute_Immediate	Raise,0x87
0261 00bf       |    |		Action	Accept_Activation
0262			BODY_0248:
0262 00bc       |    |		Action	Signal_Activated
0263 00bb       |    |		Action	Signal_Completion
0264 0000 0000  |    |		.BLANK	0000[0x4]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0282       |    |		.CONST	0x0282								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 000d       |    |		.CONST	0x000d								; Number of locals
026b			INIT_0268:
026b e001       |    |		Load	0x0,0x1
026c e002       |    |		Load	0x0,0x2
026d e003       |    |		Load	0x0,0x3
026e e004       |    |		Load	0x0,0x4
026f e003       |    |		Load	0x0,0x3
0270 00d8       |    |		Load_Top	At_Offset_0
0271 e005       |    |		Load	0x0,0x5
0272 e003       |    |		Load	0x0,0x3
0273 00e5       |    |		Load_Encached	Long_Integer_Cache
0274 e006       |    |		Load	0x0,0x6
0275 e007       |    |		Load	0x0,0x7
0276 e008       |    |		Load	0x0,0x8
0277 02a0       |    |		Declare_Subprogram	Null_Subprogram
0278 480c       |H   |		Short_Literal	0xc
0279 032e       | .  |		Declare_Type	Record,Defined,Visible
027a 00d8       |    |		Load_Top	At_Offset_0
027b 012c       | ,  |		Execute	Any,Size
027c e009       |    |		Load	0x0,0x9
027d 012c       | ,  |		Execute	Any,Size
027e 027f       |    |		Execute	Discrete,Equal
027f 7001       |p   |		Jump_Nonzero	0x281
0280 0887       |    |		Execute_Immediate	Raise,0x87
0281 00bf       |    |		Action	Accept_Activation
0282			BODY_0268:
0282 00bc       |    |		Action	Signal_Activated
0283 00bb       |    |		Action	Signal_Completion
0284 0000 0000  |    |		.BLANK	0000[0x4]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 02ab       |    |		.CONST	0x02ab								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 000d       |    |		.CONST	0x000d								; Number of locals
028b			INIT_0288:
028b e001       |    |		Load	0x0,0x1
028c e002       |    |		Load	0x0,0x2
028d e003       |    |		Load	0x0,0x3
028e 00d8       |    |		Load_Top	At_Offset_0
028f e004       |    |		Load	0x0,0x4
0290 00d8       |    |		Load_Top	At_Offset_0
0291 e005       |    |		Load	0x0,0x5
0292 e006       |    |		Load	0x0,0x6
0293 00e5       |    |		Load_Encached	Long_Integer_Cache
0294 e007       |    |		Load	0x0,0x7
0295 e008       |    |		Load	0x0,0x8
0296 e009       |    |		Load	0x0,0x9
0297 e00a       |    |		Load	0x0,0xa
0298 00d8       |    |		Load_Top	At_Offset_0
0299 e00a       |    |		Load	0x0,0xa
029a e00b       |    |		Load	0x0,0xb
029b 00d8       |    |		Load_Top	At_Offset_0
029c e00c       |    |		Load	0x0,0xc
029d e00d       |    |		Load	0x0,0xd
029e e00e       |    |		Load	0x0,0xe
029f e00f       |    |		Load	0x0,0xf
02a0 02a0       |    |		Declare_Subprogram	Null_Subprogram
02a1 4815       |H   |		Short_Literal	0x15
02a2 032e       | .  |		Declare_Type	Record,Defined,Visible
02a3 00d8       |    |		Load_Top	At_Offset_0
02a4 012c       | ,  |		Execute	Any,Size
02a5 e010       |    |		Load	0x0,0x10
02a6 012c       | ,  |		Execute	Any,Size
02a7 027f       |    |		Execute	Discrete,Equal
02a8 7001       |p   |		Jump_Nonzero	0x2aa
02a9 0887       |    |		Execute_Immediate	Raise,0x87
02aa 00bf       |    |		Action	Accept_Activation
02ab			BODY_0288:
02ab 00bc       |    |		Action	Signal_Activated
02ac 00bb       |    |		Action	Signal_Completion
02ad 0000 0000  |    |		.XXX[0x3]
02af 0000       |    |
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c9       |    |		.CONST	0x02c9								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 000d       |    |		.CONST	0x000d								; Number of locals
02b3			INIT_02b0:
02b3 e001       |    |		Load	0x0,0x1
02b4 e002       |    |		Load	0x0,0x2
02b5 e003       |    |		Load	0x0,0x3
02b6 e004       |    |		Load	0x0,0x4
02b7 e005       |    |		Load	0x0,0x5
02b8 00e5       |    |		Load_Encached	Long_Integer_Cache
02b9 00e5       |    |		Load_Encached	Long_Integer_Cache
02ba 00e5       |    |		Load_Encached	Long_Integer_Cache
02bb 00e5       |    |		Load_Encached	Long_Integer_Cache
02bc e006       |    |		Load	0x0,0x6
02bd e007       |    |		Load	0x0,0x7
02be 02a0       |    |		Declare_Subprogram	Null_Subprogram
02bf 480b       |H   |		Short_Literal	0xb
02c0 032e       | .  |		Declare_Type	Record,Defined,Visible
02c1 00d8       |    |		Load_Top	At_Offset_0
02c2 012c       | ,  |		Execute	Any,Size
02c3 e008       |    |		Load	0x0,0x8
02c4 012c       | ,  |		Execute	Any,Size
02c5 027f       |    |		Execute	Discrete,Equal
02c6 7001       |p   |		Jump_Nonzero	0x2c8
02c7 0887       |    |		Execute_Immediate	Raise,0x87
02c8 00bf       |    |		Action	Accept_Activation
02c9			BODY_02b0:
02c9 00bc       |    |		Action	Signal_Activated
02ca 00bb       |    |		Action	Signal_Completion
02cb 0000 0000  |    |		.BLANK	0000[0x5]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 0304       |    |		.CONST	0x0304								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 000f       |    |		.CONST	0x000f								; Number of locals
02d3			INIT_02d0:
02d3 4800       |H   |		Short_Literal	0x0
02d4 4803       |H   |		Short_Literal	0x3
02d5 00e5       |    |		Load_Encached	Long_Integer_Cache
02d6 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
02d7 e001       |    |		Load	0x0,0x1
02d8 e002       |    |		Load	0x0,0x2
02d9 e001       |    |		Load	0x0,0x1
02da e003       |    |		Load	0x0,0x3
02db 00d8       |    |		Load_Top	At_Offset_0
02dc e003       |    |		Load	0x0,0x3
02dd 00d8       |    |		Load_Top	At_Offset_0
02de e004       |    |		Load	0x0,0x4
02df e005       |    |		Load	0x0,0x5
02e0 00e5       |    |		Load_Encached	Long_Integer_Cache
02e1 e004       |    |		Load	0x0,0x4
02e2 00d8       |    |		Load_Top	At_Offset_0
02e3 e003       |    |		Load	0x0,0x3
02e4 00d8       |    |		Load_Top	At_Offset_0
02e5 e003       |    |		Load	0x0,0x3
02e6 00d8       |    |		Load_Top	At_Offset_0
02e7 00e5       |    |		Load_Encached	Long_Integer_Cache
02e8 00e5       |    |		Load_Encached	Long_Integer_Cache
02e9 e005       |    |		Load	0x0,0x5
02ea 00d8       |    |		Load_Top	At_Offset_0
02eb e006       |    |		Load	0x0,0x6
02ec e004       |    |		Load	0x0,0x4
02ed e003       |    |		Load	0x0,0x3
02ee 00d8       |    |		Load_Top	At_Offset_0
02ef 00e5       |    |		Load_Encached	Long_Integer_Cache
02f0 e005       |    |		Load	0x0,0x5
02f1 e007       |    |		Load	0x0,0x7
02f2 e008       |    |		Load	0x0,0x8
02f3 02a0       |    |		Declare_Subprogram	Null_Subprogram
02f4 481c       |H   |		Short_Literal	0x1c
02f5 032e       | .  |		Declare_Type	Record,Defined,Visible
02f6 00d8       |    |		Load_Top	At_Offset_0
02f7 012c       | ,  |		Execute	Any,Size
02f8 e009       |    |		Load	0x0,0x9
02f9 012c       | ,  |		Execute	Any,Size
02fa 027f       |    |		Execute	Discrete,Equal
02fb 7001       |p   |		Jump_Nonzero	0x2fd
02fc 0887       |    |		Execute_Immediate	Raise,0x87
02fd 4800       |H   |		Short_Literal	0x0
02fe 4803       |H   |		Short_Literal	0x3
02ff 00da       |    |		Load_Top	At_Offset_2
0300 02a0       |    |		Declare_Subprogram	Null_Subprogram
0301 4801       |H   |		Short_Literal	0x1
0302 035e       | ^  |		Declare_Type	Array,Defined,Visible
0303 00bf       |    |		Action	Accept_Activation
0304			BODY_02d0:
0304 00bc       |    |		Action	Signal_Activated
0305 00bb       |    |		Action	Signal_Completion
0306 ; --------------------------------------------------------------------------------------
0306 ; STRING TABLE
0306 ; --------------------------------------------------------------------------------------
0306 001a       |    |		.STRTAB	0x001a->0x0313							; "MICROCODE"
0307 0021       | !  |		.STRTAB	0x0021->0x0317							; "ADA_BASE"
0308 0027       | '  |		.STRTAB	0x0027->0x031b							; "MACHINE_INTERFACE"
0309 0036       | 6  |		.STRTAB	0x0036->0x0324							; "KERNEL_DEBUGGER_IO"
030a 0046       | F  |		.STRTAB	0x0046->0x032d							; "KERNEL_DEBUGGER"
030b 0053       | S  |		.STRTAB	0x0053->0x0334							; "KERNEL"
030c 0057       | W  |		.STRTAB	0x0057->0x0337							; "ENVIRONMENT_DEBUGGER"
030d 0069       | i  |		.STRTAB	0x0069->0x0341							; "ABSTRACT_TYPES"
030e 0075       | u  |		.STRTAB	0x0075->0x0348							; "MISCELLANEOUS"
030f 0080       |    |		.STRTAB	0x0080->0x034f							; "OS_UTILITIES"
0310 008a       |    |		.STRTAB	0x008a->0x0355							; "ELABORATOR_DATABASE"
0311 009b       |    |		.STRTAB	0x009b->0x035e							; ".saved_state"
0312 00a5       |    |		.STREND 0x00a5->0x0364
0313 4d49 4352  |MICR|		.STRTAB_STRINGS
0365 0000 0000  |    |		.XXX[0x3]
0367 0000       |    |
0368 ; --------------------------------------------------------------------------------------
0368 ; Debug Table
0368 ; --------------------------------------------------------------------------------------
0368 0004 0011  |    |		.DEBUG4	0x0004,0x0011,0xf1f2,0x0000,0x0001,0x0000
036e 0000 0000  |    |		.BLANK	0000[0x92]