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

⟦e6cb15fc4⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0058       | X  |		.CONST	0x0058								; 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 8000       |    |		.CONST	0x8000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001b       |    |		.CONST	0x001b								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0001       |    |		.CONST	0x0001								; Number of locals
001b			BODY_0018:
001b			INIT_0018:
001b 4801       |H   |		Short_Literal	0x1
001c e002       |    |		Load	0x0,0x2
001d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
001e e002       |    |		Load	0x0,0x2
001f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0020 700e       |p   |		Jump_Nonzero	0x2f
0021 e003       |    |		Load	0x0,0x3
0022 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0023 4805       |H   |		Short_Literal	0x5
0024 e5ff       |    |		Load	0x2,-0x1
0025 0092 0031  |   1|		Action	Push_String_Extended,0x31					; " will not continue because PRIVILEGED"
0027 01cc       |    |		Execute	Vector,Catenate
0028 0092 0032  |   2|		Action	Push_String_Extended,0x32					; " MODE cannot be established."
002a 01cc       |    |		Execute	Vector,Catenate
002b e004       |    |		Load	0x0,0x4
002c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
002d 4800       |H   |		Short_Literal	0x0
002e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
002f 4801       |H   |		Short_Literal	0x1
0030 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0031 ; --------------------------------------------------------------------------------------
0031 ; STRING TABLE
0031 ; --------------------------------------------------------------------------------------
0031 0006       |    |		.STRTAB	0x0006->0x0034							; " will not continue because PRIVILEGED"
0032 0029       | )  |		.STRTAB	0x0029->0x0046							; " MODE cannot be established."
0033 0043       | C  |		.STREND 0x0043->0x0054
0034 2077 696c  | wil|		.STRTAB_STRINGS
0055 0000 0000  |    |		.XXX[0x3]
0057 0000       |    |
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0x0b97,0x0000,0x0001,0x0000
005e a599 a595  |    |		.XXX[0x1a2]
0060 90b9 51a1  |  Q |
0062 a5cc 81d1  |    |
0064 e5c1 9481  |    |
0066 bd98 818d  |    |
0068 bdb9 d195  |    |
006a e1d0 818d  |    |
006c 85b9 b9bd  |    |
006e d081 8994  |    |
0070 81b5 bd91  |    |
0072 a599 a595  |    |
0074 90b9 35bd  |  5 |
0076 91a5 99e4  |    |
0078 81bd b994  |    |
007a 8195 b195  |    |
007c b595 b9d0  |    |
007e 8185 d081  |    |
0080 8481 d1a5  |    |
0082 b594 b904  |    |
0084 818d bdb9  |    |
0086 cdd1 85b9  |    |
0088 d081 8d85  |    |
008a b9b9 bdd0  |    |
008c 8189 9481  |    |
008e b5bd 91a5  |    |
0090 99a5 9590  |    |
0092 b904 81d1  |    |
0094 85cd ac81  |    |
0096 8d85 b9b9  |    |
0098 bdd0 8189  |    |
009a 9481 b5bd  |    |
009c 91a5 99a5  |    |
009e 9590 b904  |    |
00a0 81cd d589  |    |
00a2 c1c9 bd9d  |    |
00a4 c985 b481  |    |
00a6 8d85 b9b9  |    |
00a8 bdd0 8189  |    |
00aa 9481 b5bd  |    |
00ac 91a5 99a5  |    |
00ae 9590 b925  |   %|
00b0 b9d9 85b1  |    |
00b2 a590 81a5  |    |
00b4 b9d1 959d  |    |
00b6 95c8 81d9  |    |
00b8 85b1 d594  |    |
00ba 81a5 cc81  |    |
00bc b9bd d081  |    |
00be 8481 d985  |    |
00c0 b1a5 9081  |    |
00c2 b9d5 b595  |    |
00c4 c9a5 8c81  |    |
00c6 d985 b1d5  |    |
00c8 94b9 3955  |  9U|
00ca 3131 0d85  |11  |
00cc b881 bdb9  |    |
00ce b1e4 81b5  |    |
00d0 bd91 a599  |    |
00d2 e481 85b8  |    |
00d4 8185 8d8d  |    |
00d6 95cd cc81  |    |
00d8 d985 b1d5  |    |
00da 9481 d1bc  |    |
00dc 81b9 d5b1  |    |
00de b151 a1a5  | Q  |
00e0 cc81 d1e5  |    |
00e2 c194 81bd  |    |
00e4 9881 bd89  |    |
00e6 a995 8dd0  |    |
00e8 818d 85b9  |    |
00ea b9bd d081  |    |
00ec 8994 81b5  |    |
00ee bd91 a599  |    |
00f0 a595 9081  |    |
00f2 45d5 85b1  |E   |
00f4 a599 a595  |    |
00f6 9081 b985  |    |
00f8 b595 cc81  |    |
00fa 85c9 9481  |    |
00fc b9bd d081  |    |
00fe 85b1 b1bd  |    |
0100 dd95 90b8  |    |
0102 8088 8881  |    |
0104 a5cc 81a5  |    |
0106 9db9 bdc9  |    |
0108 9590 b881  |    |
010a a5cc 81b9  |    |
010c bdd0 8184  |    |
010e 81d9 85b1  |    |
0110 a590 81a5  |    |
0112 9195 b9d1  |    |
0114 a599 a595  |    |
0116 c881 99bd  |    |
0118 c881 d1a1  |    |
011a 9481 95b9  |    |
011c d5b5 95c9  |    |
011e 85d1 a5bd  |    |
0120 b881 d1e5  |    |
0122 c194 b935  |   5|
0124 d5cd d081  |    |
0126 8994 8185  |    |
0128 b881 a5b9  |    |
012a d195 9d95  |    |
012c c8b0 8184  |    |
012e 8199 b1bd  |    |
0130 85d1 a5b9  |    |
0132 9c81 c1bd  |    |
0134 a5b9 d081  |    |
0136 d985 b1d5  |    |
0138 94b0 8184  |    |
013a 818d a185  |    |
013c c985 8dd1  |    |
013e 95c8 8189  |    |
0140 95d1 dd95  |    |
0142 95b8 81cd  |    |
0144 a5b9 9db1  |    |
0146 9481 c5d5  |    |
0148 bdd1 95cc  |    |
014a b081 bdc8  |    |
014c 8089 3955  |  9U|
014e 3130 8935  |10 5|
0150 d5cd d081  |    |
0152 8994 81b9  |    |
0154 bdb8 b595  |    |
0156 b5c1 d1e5  |    |
0158 1905 314d  |  1M|
015a 1551 4955  | QIU|
015c 1481 a5cc  |    |
015e 81b9 bdd0  |    |
0160 8184 81d9  |    |
0162 85b1 a590  |    |
0164 81d9 85b1  |    |
0166 d594 8199  |    |
0168 bdc8 81d1  |    |
016a a194 81bd  |    |
016c 89a9 958d  |    |
016e d09d cc81  |    |
0170 d1e5 c194  |    |
0172 81a5 cc81  |    |
0174 b9bd d081  |    |
0176 a5b8 81d1  |    |
0178 a194 81c9  |    |
017a 85b9 9d94  |    |
017c 81bd 9881  |    |
017e d985 b1d5  |    |
0180 95cc 8199  |    |
0182 bdc8 81d1  |    |
0184 a194 81bd  |    |
0186 89a9 958d  |    |
0188 d09d cc81  |    |
018a d1e5 c195  |    |
018c 25b8 81c1  |%   |
018e 85c9 85b5  |    |
0190 95d1 95c9  |    |
0192 cc81 dda1  |    |
0194 bdcd 9481  |    |
0196 d985 b1d5  |    |
0198 95cc 8185  |    |
019a c994 818d  |    |
019c bdb9 cdd1  |    |
019e 85b9 d1cc  |    |
01a0 81bd c881  |    |
01a2 95e1 c1c9  |    |
01a4 95cd cda5  |    |
01a6 bdb9 cc81  |    |
01a8 8d85 b9b9  |    |
01aa bdd0 8189  |    |
01ac 9481 b5bd  |    |
01ae 91a5 99a5  |    |
01b0 9591 3db1  |  = |
01b2 9081 d985  |    |
01b4 b1d5 94e8  |    |
01b6 813d 4115  | =A |
01b8 4905 3911  |I 9 |
01ba 3955 3515  |9U5 |
01bc 4925 0d25  |I% %|
01be b1b1 959d  |    |
01c0 85b1 7d49  |  }I|
01c2 9599 95c9  |    |
01c4 95b9 8d95  |    |
01c6 41c9 bd89  |A   |
01c8 b195 b481  |    |
01ca 95b9 8dbd  |    |
01cc d5b9 d195  |    |
01ce c995 9081  |    |
01d0 b5bd 91a5  |    |
01d2 99e5 a5b9  |    |
01d4 9c81 d985  |    |
01d6 b1d5 94e8  |    |
01d8 2939 95dc  |)9  |
01da 81d9 85b1  |    |
01dc d594 e880  |    |
01de 80f4 f881  |    |
01e0 15e1 8d95  |    |
01e2 c1d1 a5bd  |    |
01e4 b880 81c9  |    |
01e6 85a5 cd95  |    |
01e8 9081 dda1  |    |
01ea 95b8 818d  |    |
01ec bdb9 d995  |    |
01ee c9d1 a5b9  |    |
01f0 9c81 d985  |    |
01f2 b1d5 9481  |    |
01f4 d1bc 8199  |    |
01f6 a5e1 9590  |    |
01f8 81c1 bda5  |    |
01fa b9d0 81b9  |    |
01fc d5b5 8995  |    |
01fe c90d bdb9  |    |