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

⟦0fb813c48⟧

    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 7d31 95d9  |}1  |		.XXX[0x11d]
0060 95b1 ccf5  |    |
0062 51bd 8d7d  |Q  }|
0064 41c9 a5b9  |A   |
0066 d17d 05b1  | }  |
0068 b17d 3195  | }1 |
006a d995 b1cd  |    |
006c 09b1 bd8d  |    |
006e ad7d 05b1  | }  |
0070 a59d b97d  |   }|
0072 4d95 8dd1  |M   |
0074 a5bd b9cc  |    |
0076 b8b9 51bd  |  Q |
0078 8d7d 3195  | }1 |
007a d995 b17d  |   }|
007c 21bd c9a5  |!   |
007e e9bd b9d1  |    |
0080 85b1 7d4d  |  }M|
0082 c185 8da5  |    |
0084 b99c f509  |    |
0086 bdbd b195  |    |
0088 85b9 bdd1  |    |
008a a195 c9cc  |    |
008c 80f4 f881  |    |
008e 55b9 cdc1  |U   |
0090 958d a599  |    |
0092 a595 9141  |   A|
0094 95c9 8d95  |    |
0096 b9d1 859d  |    |
0098 957d 4da5  | }M |
009a e995 ccb8  |    |
009c b919 b1bd  |    |
009e 85d0 f509  |    |
00a0 bdbd b195  |    |
00a2 85b9 4d8d  |  M |
00a4 85b1 94b8  |    |
00a6 b949 bdd1  | I  |
00a8 85d1 a5bd  |    |
00aa b8f5 25b9  |  % |
00ac d195 9d95  |    |
00ae c8b1 41c9  |  A |
00b0 a5b9 d17d  |   }|
00b2 0d85 c1d1  |    |
00b4 a5bd b8b8  |    |
00b6 b90d b1a5  |    |
00b8 c0f5 09bd  |    |
00ba bdb1 9585  |    |
00bc b931 9585  | 1  |
00be 9195 c995  |    |
00c0 90f5 09bd  |    |
00c2 bdb1 9585  |    |
00c4 b8b1 3195  |  1 |
00c6 8591 95c9  |    |
00c8 7d55 b9a5  |}U  |
00ca d17d 4da5  | }M |
00cc e994 f525  |   %|
00ce b9d1 959d  |    |
00d0 95c9 3195  |  1 |
00d2 d995 b0f4  |    |
00d4 f925 b9d1  | %  |
00d6 959d 95c8  |    |
00d8 b139 d5b5  | 9  |
00da 8995 c995  |    |
00dc 90b8 b941  |   A|
00de c9a5 b9d0  |    |
00e0 f509 bdbd  |    |
00e2 b195 85b9  |    |
00e4 51a5 d1b1  |Q   |
00e6 94f5 2195  |  ! |
00e8 8591 a5b9  |    |
00ea 9d4d 958d  | M  |
00ec d1a5 bdb9  |    |
00ee 7d51 bd8c  |}Q  |
00f0 b8b9 3995  |  9 |
00f2 ddc1 859d  |    |
00f4 957d 51bd  | }Q |
00f6 7d49 a59d  |}I  |
00f8 a1d0 f509  |    |
00fa bdbd b195  |    |
00fc 85b9 3195  |  1 |
00fe d995 b0f5  |    |
0100 25b9 d195  |%   |
0102 9d95 c8b1  |    |
0104 4da5 b99d  |M   |
0106 b195 7d31  |  }1|
0108 95d9 95b1  |    |
010a 7d3d b9b1  |}=  |
010c e4f5 09bd  |    |
010e bdb1 9585  |    |
0110 b94d 958d  | M  |
0112 d1a5 bdb9  |    |
0114 7d51 bd8c  |}Q  |
0116 b8b9 25b9  |  % |
0118 9195 e0f5  |    |
011a 09bd bdb1  |    |
011c 9585 b919  |    |
011e bdc9 b585  |    |
0120 d1d1 a5b9  |    |
0122 9c81 95b9  |    |
0124 d9a5 c9bd  |    |
0126 b9b5 95b9  |    |
0128 d1cc 8185  |    |
012a c994 81b9  |    |
012c 95cd d195  |    |
012e 9081 d1bd  |    |
0130 bc81 9195  |    |
0132 95c1 b1e5  |    |
0134 19bd c9b5  |    |
0136 85d1 d1a5  |    |
0138 b99c 8195  |    |
013a b9d9 a5c9  |    |
013c bdb9 b595  |    |
013e b9d0 81dd  |    |
0140 85cc 81b1  |    |
0142 85cd d081  |    |
0144 cd85 d995  |    |
0146 9081 89e4  |    |
0148 80b8 8081  |    |
014a 4995 cdd1  |I   |
014c bdc9 85d1  |    |
014e a5bd b881  |    |
0150 bd98 8199  |    |
0152 bdc9 b585  |    |
0154 d1d1 a5b9  |    |
0156 9c81 95b9  |    |
0158 d9a5 c9bd  |    |
015a b9b5 95b9  |    |
015c d081 89e4  |    |
015e 8081 a5cc  |    |
0160 81b5 a5cd  |    |
0162 b585 d18d  |    |
0164 a195 9119  |    |
0166 bdc9 b585  |    |
0168 d1d1 a5b9  |    |
016a 9c81 95b9  |    |
016c d9a5 c9bd  |    |
016e b9b5 95b9  |    |
0170 d081 cdd1  |    |
0172 858d ac81  |    |
0174 d5b9 9195  |    |
0176 c999 b1bd  |    |
0178 dd95 917d  |   }|
017a 2d5c       |-\  |
017b 0000 0000  |    |		.BLANK	0000[0x6]
0181 0010 003d  |   =|		.XXX[0x1c]
0183 1fc8 0000  |    |
0185 0004 0000  |    |
0187 0000 0010  |    |
0189 d0c9 090c  |    |
018b 0000 0018  |    |
018d c8d4 d0c4  |    |
018f c114 0000  |    |
0191 7b30 003d  |{0 =|
0193 6000 0000  |`   |
0195 3d80 0400  |=   |
0197 02ec 0002  |    |
0199 0020 013c  |   <|
019b 0010 0070  |   p|
019d 0310 0310  |    |		.BLANK	0310[0xb]
01a8 0248 2dd4  | H- |		.XXX[0x3b]
01aa 04a7 0848  |   H|
01ac 0248 2dd8  | H- |
01ae 04a7 084c  |   L|
01b0 0a68 016f  | h o|
01b2 085c 0a68  | \ h|
01b4 01cf 0850  |   P|
01b6 0a68 022f  | h /|
01b8 0854 0a68  | T h|
01ba 02af 0858  |   X|
01bc 0a68 034f  | h O|
01be 0840 02ff  | @  |
01c0 8004 6450  |  dP|
01c2 001f 8004  |    |
01c4 6458 001f  |dX  |
01c6 8008 6cc0  |  l |
01c8 0384 0a81  |    |
01ca 2008 0cb7  |    |
01cc 800f 8011  |    |
01ce 24cf 8869  |$  i|
01d0 2007 8014  |    |
01d2 0e1c 0360  |   `|
01d4 083c 0360  | < `|
01d6 6c48 745c  |lHt\|
01d8 031c 7450  |  tP|
01da 031c 7454  |  tT|
01dc 031c 7458  |  tX|
01de 031c 7440  |  t@|
01e0 031c 02f0  |    |
01e2 02ec       |    |
01e3 0000 0000  |    |		.BLANK	0000[0x7]
01ea 0198 0010  |    |		.XXX[0x16]
01ec 0015 2005  |    |
01ee 2140 03a4  |!@  |
01f0 0d6c 0cdc  | l  |
01f2 0390 1804  |    |
01f4 0a7c 290c  | |) |
01f6 0a7c 29ef  | |) |
01f8 97fd 2007  |    |
01fa 9008 075a  |   Z|
01fc 1012 1015  |    |
01fe 1404 0000  |    |