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

⟦b959cb04c⟧

    Length: 1024 (0x400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_191cd7

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 0150       | P  |		.CONST	0x0150								; 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 0000       |    |		.CONST	0x0000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0041       | A  |		.CONST	0x0041								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000e       |    |		.CONST	0x000e								; Number of locals
000b			INIT_0008:
000b 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 4800       |H   |		Short_Literal	0x0
000f 0093 005b  |   [|		push_full_address	INIT_0058
0011 02a0       |    |		Declare_Subprogram	Null_Subprogram
0012 038e       |    |		Declare_Type	Package,Defined
0013 0387       |    |		Declare_Variable	Package
0014 e002       |    |		Load	0x0,0x2
0015 e003       |    |		Load	0x0,0x3
0016 e004       |    |		Load	0x0,0x4
0017 e005       |    |		Load	0x0,0x5
0018 a006       |    |		Store_Unchecked	0x0,0x6
0019 a007       |    |		Store_Unchecked	0x0,0x7
001a a008       |    |		Store_Unchecked	0x0,0x8
001b a009       |    |		Store_Unchecked	0x0,0x9
001c e00a       |    |		Load	0x0,0xa
001d e00b       |    |		Load	0x0,0xb
001e e00c       |    |		Load	0x0,0xc
001f e00d       |    |		Load	0x0,0xd
0020 a00e       |    |		Store_Unchecked	0x0,0xe
0021 a00f       |    |		Store_Unchecked	0x0,0xf
0022 a010       |    |		Store_Unchecked	0x0,0x10
0023 a011       |    |		Store_Unchecked	0x0,0x11
0024 e012       |    |		Load	0x0,0x12
0025 e013       |    |		Load	0x0,0x13
0026 a014       |    |		Store_Unchecked	0x0,0x14
0027 a015       |    |		Store_Unchecked	0x0,0x15
0028 a016       |    |		Store_Unchecked	0x0,0x16
0029 e017       |    |		Load	0x0,0x17
002a e018       |    |		Load	0x0,0x18
002b e019       |    |		Load	0x0,0x19
002c a01a       |    |		Store_Unchecked	0x0,0x1a
002d e01b       |    |		Load	0x0,0x1b
002e e01c       |    |		Load	0x0,0x1c
002f e01d       |    |		Load	0x0,0x1d
0030 a01e       |    |		Store_Unchecked	0x0,0x1e
0031 a01f       |    |		Store_Unchecked	0x0,0x1f
0032 e020       |    |		Load	0x0,0x20
0033 e021       | !  |		Load	0x0,0x21
0034 e022       | "  |		Load	0x0,0x22
0035 e023       | #  |		Load	0x0,0x23
0036 e024       | $  |		Load	0x0,0x24
0037 e025       | %  |		Load	0x0,0x25
0038 a026       | &  |		Store_Unchecked	0x0,0x26
0039 a027       | '  |		Store_Unchecked	0x0,0x27
003a 4826       |H&  |		Short_Literal	0x26
003b e20e       |    |		Load	0x1,0xe
003c 020e       |    |		Execute	Module,Augment_Imports
003d 00d8       |    |		Load_Top	At_Offset_0
003e 020f       |    |		Execute	Module,Activate
003f 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0040 00c7       |    |		Action	Elaborate_Subprogram
0041			BODY_0008:
0041 00bc       |    |		Action	Signal_Activated
0042 00bb       |    |		Action	Signal_Completion
0043 0000 0000  |    |		.BLANK	0000[0x5]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b       | K  |		.CONST	0x004b								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 0001       |    |		.CONST	0x0001								; Number of locals
004b			BODY_0048:
004b			INIT_0048:
004b e20e       |    |		Load	0x1,0xe
004c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
004d 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "Exe_303 is done."
004f 8028       | (  |		Call	0x0,0x28
0050 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0051 0000 0000  |    |		.BLANK	0000[0x7]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 00fa       |    |		.CONST	0x00fa								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0018       |    |		.CONST	0x0018								; Number of locals
005b			INIT_0058:
005b 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated
005d 00bf       |    |		Action	Accept_Activation
005e 4805       |H   |		Short_Literal	0x5
005f e001       |    |		Load	0x0,0x1
0060 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0061 4801       |H   |		Short_Literal	0x1
0062 480a       |H   |		Short_Literal	0xa
0063 00e9       |    |		Load_Encached	String_Cache
0064 035b       | [  |		Declare_Type	Array,Constrained
0065 0337       | 7  |		Declare_Variable	Array
0066 0093 0000  |    |		push_full_address	0x0
0068 60bb       |`   |		Indirect_Literal	Discrete,0x124,{0x80000000, 0x00050000}
0069 0273       | s  |		Execute	Discrete,Plus
006a e002       |    |		Load	0x0,0x2
006b 0273       | s  |		Execute	Discrete,Plus
006c e003       |    |		Load	0x0,0x3
006d 0273       | s  |		Execute	Discrete,Plus
006e 00e6       |    |		Load_Encached	Float_Cache
006f e004       |    |		Load	0x0,0x4
0070 a005       |    |		Store_Unchecked	0x0,0x5
0071 a006       |    |		Store_Unchecked	0x0,0x6
0072 a007       |    |		Store_Unchecked	0x0,0x7
0073 a008       |    |		Store_Unchecked	0x0,0x8
0074 e009       |    |		Load	0x0,0x9
0075 0387       |    |		Declare_Variable	Package
0076 00d8       |    |		Load_Top	At_Offset_0
0077 020f       |    |		Execute	Module,Activate
0078 0093 0000  |    |		push_full_address	0x0
007a 60a5       |`   |		Indirect_Literal	Discrete,0x120,{0x80000000, 0x00040000}
007b 0273       | s  |		Execute	Discrete,Plus
007c e002       |    |		Load	0x0,0x2
007d 0273       | s  |		Execute	Discrete,Plus
007e e00a       |    |		Load	0x0,0xa
007f 0273       | s  |		Execute	Discrete,Plus
0080 e00b       |    |		Load	0x0,0xb
0081 e00c       |    |		Load	0x0,0xc
0082 00e6       |    |		Load_Encached	Float_Cache
0083 a00d       |    |		Store_Unchecked	0x0,0xd
0084 a00e       |    |		Store_Unchecked	0x0,0xe
0085 a005       |    |		Store_Unchecked	0x0,0x5
0086 a00f       |    |		Store_Unchecked	0x0,0xf
0087 a010       |    |		Store_Unchecked	0x0,0x10
0088 a007       |    |		Store_Unchecked	0x0,0x7
0089 e011       |    |		Load	0x0,0x11
008a 0387       |    |		Declare_Variable	Package
008b 00d8       |    |		Load_Top	At_Offset_0
008c 020f       |    |		Execute	Module,Activate
008d 029d 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call
008f 0093 0000  |    |		push_full_address	0x0
0091 608a       |`   |		Indirect_Literal	Discrete,0x11c,{0x80000000, 0x00030000}
0092 0273       | s  |		Execute	Discrete,Plus
0093 e002       |    |		Load	0x0,0x2
0094 0273       | s  |		Execute	Discrete,Plus
0095 e012       |    |		Load	0x0,0x12
0096 0273       | s  |		Execute	Discrete,Plus
0097 00e6       |    |		Load_Encached	Float_Cache
0098 00e7       |    |		Load_Encached	Duration_Cache
0099 00e1       |    |		Load_Encached	Boolean_Cache
009a e004       |    |		Load	0x0,0x4
009b a005       |    |		Store_Unchecked	0x0,0x5
009c a013       |    |		Store_Unchecked	0x0,0x13
009d a014       |    |		Store_Unchecked	0x0,0x14
009e a006       |    |		Store_Unchecked	0x0,0x6
009f a007       |    |		Store_Unchecked	0x0,0x7
00a0 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
00a1 a015       |    |		Store_Unchecked	0x0,0x15
00a2 a008       |    |		Store_Unchecked	0x0,0x8
00a3 e016       |    |		Load	0x0,0x16
00a4 0387       |    |		Declare_Variable	Package
00a5 00d8       |    |		Load_Top	At_Offset_0
00a6 020f       |    |		Execute	Module,Activate
00a7 029d 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call
00a9 029d 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call
00ab 0093 0000  |    |		push_full_address	0x0
00ad 606a       |`j  |		Indirect_Literal	Discrete,0x118,{0x80000000, 0x00020000}
00ae 0273       | s  |		Execute	Discrete,Plus
00af e002       |    |		Load	0x0,0x2
00b0 0273       | s  |		Execute	Discrete,Plus
00b1 e017       |    |		Load	0x0,0x17
00b2 0273       | s  |		Execute	Discrete,Plus
00b3 e00b       |    |		Load	0x0,0xb
00b4 e00c       |    |		Load	0x0,0xc
00b5 00e1       |    |		Load_Encached	Boolean_Cache
00b6 00e7       |    |		Load_Encached	Duration_Cache
00b7 00e6       |    |		Load_Encached	Float_Cache
00b8 e018       |    |		Load	0x0,0x18
00b9 a00d       |    |		Store_Unchecked	0x0,0xd
00ba a00e       |    |		Store_Unchecked	0x0,0xe
00bb a014       |    |		Store_Unchecked	0x0,0x14
00bc a013       |    |		Store_Unchecked	0x0,0x13
00bd a005       |    |		Store_Unchecked	0x0,0x5
00be a019       |    |		Store_Unchecked	0x0,0x19
00bf a00f       |    |		Store_Unchecked	0x0,0xf
00c0 a010       |    |		Store_Unchecked	0x0,0x10
00c1 a015       |    |		Store_Unchecked	0x0,0x15
00c2 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
00c3 a007       |    |		Store_Unchecked	0x0,0x7
00c4 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
00c5 e01a       |    |		Load	0x0,0x1a
00c6 0387       |    |		Declare_Variable	Package
00c7 00d8       |    |		Load_Top	At_Offset_0
00c8 020f       |    |		Execute	Module,Activate
00c9 029d 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call
00cb 0093 0000  |    |		push_full_address	0x0
00cd 6046       |`F  |		Indirect_Literal	Discrete,0x114,{0x80000000, 0x00010000}
00ce 0273       | s  |		Execute	Discrete,Plus
00cf e002       |    |		Load	0x0,0x2
00d0 0273       | s  |		Execute	Discrete,Plus
00d1 e01b       |    |		Load	0x0,0x1b
00d2 0273       | s  |		Execute	Discrete,Plus
00d3 e00b       |    |		Load	0x0,0xb
00d4 e00c       |    |		Load	0x0,0xc
00d5 00e1       |    |		Load_Encached	Boolean_Cache
00d6 00e7       |    |		Load_Encached	Duration_Cache
00d7 00e6       |    |		Load_Encached	Float_Cache
00d8 e01c       |    |		Load	0x0,0x1c
00d9 00e6       |    |		Load_Encached	Float_Cache
00da e00b       |    |		Load	0x0,0xb
00db 00e6       |    |		Load_Encached	Float_Cache
00dc e00c       |    |		Load	0x0,0xc
00dd e004       |    |		Load	0x0,0x4
00de a00d       |    |		Store_Unchecked	0x0,0xd
00df a00e       |    |		Store_Unchecked	0x0,0xe
00e0 a014       |    |		Store_Unchecked	0x0,0x14
00e1 a013       |    |		Store_Unchecked	0x0,0x13
00e2 a005       |    |		Store_Unchecked	0x0,0x5
00e3 a01d       |    |		Store_Unchecked	0x0,0x1d
00e4 a005       |    |		Store_Unchecked	0x0,0x5
00e5 a00d       |    |		Store_Unchecked	0x0,0xd
00e6 a005       |    |		Store_Unchecked	0x0,0x5
00e7 a00e       |    |		Store_Unchecked	0x0,0xe
00e8 a006       |    |		Store_Unchecked	0x0,0x6
00e9 a00f       |    |		Store_Unchecked	0x0,0xf
00ea a010       |    |		Store_Unchecked	0x0,0x10
00eb a015       |    |		Store_Unchecked	0x0,0x15
00ec 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
00ed a007       |    |		Store_Unchecked	0x0,0x7
00ee a01e       |    |		Store_Unchecked	0x0,0x1e
00ef a007       |    |		Store_Unchecked	0x0,0x7
00f0 a00f       |    |		Store_Unchecked	0x0,0xf
00f1 a007       |    |		Store_Unchecked	0x0,0x7
00f2 a010       |    |		Store_Unchecked	0x0,0x10
00f3 a008       |    |		Store_Unchecked	0x0,0x8
00f4 e01f       |    |		Load	0x0,0x1f
00f5 0387       |    |		Declare_Variable	Package
00f6 00d8       |    |		Load_Top	At_Offset_0
00f7 020f       |    |		Execute	Module,Activate
00f8 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
00f9 00c7       |    |		Action	Elaborate_Subprogram
00fa			BODY_0058:
00fa 00bc       |    |		Action	Signal_Activated
00fb 00bb       |    |		Action	Signal_Completion
00fc 0000 0000  |    |		.BLANK	0000[0x4]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103       |    |		.CONST	0x0103								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0001       |    |		.CONST	0x0001								; Number of locals
0103			BODY_0100:
0103			INIT_0100:
0103 e020       |    |		Load	0x0,0x20
0104 e210       |    |		Load	0x1,0x10
0105 0096       |    |		Execute	Package,Entry
0106 e021       | !  |		Load	0x0,0x21
0107 e211       |    |		Load	0x1,0x11
0108 0096       |    |		Execute	Package,Entry
0109 e022       | "  |		Load	0x0,0x22
010a e213       |    |		Load	0x1,0x13
010b 0096       |    |		Execute	Package,Entry
010c e023       | #  |		Load	0x0,0x23
010d e216       |    |		Load	0x1,0x16
010e 0096       |    |		Execute	Package,Entry
010f e024       | $  |		Load	0x0,0x24
0110 e218       |    |		Load	0x1,0x18
0111 0096       |    |		Execute	Package,Entry
0112 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0113 0000       |    |		.XXX[0x1]
0114 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0118 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
011c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
0120 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
0124 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; SUBPROGRAM
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			BODY_0128:
012b			BODY_0128:
012b			INIT_0128:
012b			INIT_0128:
012b			INIT_0128:
012b 00da       |    |		Load_Top	At_Offset_2
012c 00d8       |    |		Load_Top	At_Offset_0
012d 00e7       |    |		Load_Encached	Duration_Cache
012e 0260       | `  |		Execute	Discrete,In_Type
012f 7001       |p   |		Jump_Nonzero	0x131
0130 0801       |    |		Execute_Immediate	Raise,0x1
0131 8025       | %  |		Call	0x0,0x25
0132 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0133 0000 0000  |    |		.BLANK	0000[0x5]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b       | ;  |		.CONST	0x013b								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0001       |    |		.CONST	0x0001								; Number of locals
013b			BODY_0138:
013b			INIT_0138:
013b 00da       |    |		Load_Top	At_Offset_2
013c e018       |    |		Load	0x0,0x18
013d 01c3       |    |		Execute	Vector,Check_In_Type
013e 8026       | &  |		Call	0x0,0x26
013f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0140 ; --------------------------------------------------------------------------------------
0140 ; STRING TABLE
0140 ; --------------------------------------------------------------------------------------
0140 0004       |    |		.STRTAB	0x0004->0x0142							; "Exe_303 is done."
0141 0012       |    |		.STREND 0x0012->0x014a
0142 4578 655f  |Exe_|		.STRTAB_STRINGS
014a 0000 0000  |    |		.BLANK	0000[0x6]
0150 ; --------------------------------------------------------------------------------------
0150 ; Debug Table
0150 ; --------------------------------------------------------------------------------------
0150 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x4c88,0x0000,0x0001,0x0008
0156 000b 0176  |   v|		.DBG4T	0x000b,0x0176,0x8000,0x0000
015a 000e 0179  |   y|		.DBG4T	0x000e,0x0179,0x8000,0x0000
015e 004b 017e  | K ~|		.DBG4T	0x004b,0x017e,0x0001,0x0000
0162 005b 0182  | [  |		.DBG4T	0x005b,0x0182,0x0000,0x0000
0166 005e 0185  | ^  |		.DBG4T	0x005e,0x0185,0x0000,0x0000
016a 0103 018f  |    |		.DBG4T	0x0103,0x018f,0x0001,0x0000
016e 012b 0000  | +  |		.DBG4T	0x012b,0x0000,0x000c,0x0000
0172 013b 0000  | ;  |		.DBG4T	0x013b,0x0000,0x000c,0x0000
0176 ; --------------------------------------------------------------------------------------
0176 ; Debug chain
0176 ; --------------------------------------------------------------------------------------
0176 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0178 000b       |    |		.DBGLNO	0x000b
0179 ; --------------------------------------------------------------------------------------
0179 ; Debug chain
0179 ; --------------------------------------------------------------------------------------
0179 0003 0000  |    |		.DBGLEN	0x0003,0x0000
017b 000e 0014  |    |		.DBGLNO	0x000e,0x0014,0x003f
017e ; --------------------------------------------------------------------------------------
017e ; Debug chain
017e ; --------------------------------------------------------------------------------------
017e 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0180 004b 004d  | K M|		.DBGLNO	0x004b,0x004d
0182 ; --------------------------------------------------------------------------------------
0182 ; Debug chain
0182 ; --------------------------------------------------------------------------------------
0182 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0184 005b       | [  |		.DBGLNO	0x005b
0185 ; --------------------------------------------------------------------------------------
0185 ; Debug chain
0185 ; --------------------------------------------------------------------------------------
0185 0008 0000  |    |		.DBGLEN	0x0008,0x0000
0187 005e 0061  | ^ a|		.DBGLNO	0x005e,0x0061,0x0066,0x0078,0x008d,0x00a7,0x00c9,0x00f8
018f ; --------------------------------------------------------------------------------------
018f ; Debug chain
018f ; --------------------------------------------------------------------------------------
018f 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0191 0103 0106  |    |		.DBGLNO	0x0103,0x0106,0x0109,0x010c,0x010f
0196 0000 0000  |    |		.BLANK	0000[0x6a]