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

⟦5ae82895a⟧

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

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 e001       |    |		Load	0x0,0x1
001d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
001e e001       |    |		Load	0x0,0x1
001f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0020 700e       |p   |		Jump_Nonzero	0x2f
0021 e002       |    |		Load	0x0,0x2
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 e003       |    |		Load	0x0,0x3
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 000d  |    |		.DEBUG4	0x0004,0x000d,0x9722,0x0000,0x0001,0x0000
005e 0000 00b7  |    |		.XXX[0x30]
0060 f0c0 0212  |    |
0062 c668 0000  | h  |
0064 0000 0024  |   $|
0066 59a8 0000  |Y   |
0068 0000 001a  |    |
006a 1e20 0042  |   B|
006c 58cd 0000  |X   |
006e 0000 0004  |    |
0070 8b35 0000  | 5  |
0072 0000 0003  |    |
0074 1fc5 0008  |    |
0076 4b19 a000  |K   |
0078 0000 0000  |    |
007a 9166 a000  | f  |
007c 0000 0000  |    |
007e 6878 c001  |hx  |
0080 0963 3400  | c4 |
0082 0000 0000  |    |
0084 122c d400  | ,  |
0086 0000 0000  |    |
0088 02ef 1f03  |    |
008a baba 0200  |    |
008c 01f9 3b80  |  ; |
008e 0000 0000  |    |		.BLANK	0000[0x4]
0092 019b e400  |    |		.XXX[0x1b]
0094 0425 8cd0  | %  |
0096 0000 0000  |    |
0098 0048 b350  | H P|
009a 0000 0000  |    |
009c 0033 fc90  | 3  |
009e 0084 b19a  |    |
00a0 0000 0000  |    |
00a2 0009 166a  |   j|
00a4 0000 0000  |    |
00a6 0005 ff95  |    |
00a8 8000 a101  |    |
00aa 4001 00b0  |@   |
00ac 4000       |@   |
00ad 0000 0000  |    |		.BLANK	0000[0x4]
00b1 cef2 c002  |    |		.XXX[0x24]
00b3 12c6 6800  |  h |
00b5 0000 0000  |    |
00b7 2459 a800  |$Y  |
00b9 0000 0000  |    |
00bb 165e 6000  | ^` |
00bd 4258 cd00  |BX  |
00bf 0000 0000  |    |
00c1 048b 3500  |  5 |
00c3 0000 0000  |    |
00c5 0343 cd00  | C  |
00c7 084b 19a0  | K  |
00c9 0000 0000  |    |
00cb 0091 66a0  |  f |
00cd 0000 0000  |    |
00cf 001a f9d8  |    |
00d1 0014 e3e4  |    |
00d3 000f d060  |   `|
00d5 0000 0000  |    |		.BLANK	0000[0x4]
00d9 000b ff3c  |   <|		.XXX[0x5]
00db 0021 2c66  | !,f|
00dd 8000       |    |
00de 0000 0000  |    |		.BLANK	0000[0x5]
00e3 0001 91e8  |    |		.XXX[0x19]
00e5 0004 258c  |  % |
00e7 d000 0000  |    |
00e9 0000 48b3  |  H |
00eb 5000 0000  |P   |
00ed 0000 343d  |  4=|
00ef 1000 84b1  |    |
00f1 9a00 0000  |    |
00f3 0000 0916  |    |
00f5 6a00 0000  |j   |
00f7 0000 0687  |    |
00f9 a400 1096  |    |
00fb 3340       |3@  |
00fc 0000 0000  |    |		.BLANK	0000[0x6]
0102 00d0 f4c0  |    |		.XXX[0x19]
0104 0212 c668  |   h|
0106 0000 0000  |    |
0108 0024 59a8  | $Y |
010a 0000 0000  |    |
010c 001a 1ea0  |    |
010e 0042 58cd  | BX |
0110 0000 0000  |    |
0112 0004 8b35  |   5|
0114 0000 0000  |    |
0116 0003 07d5  |    |
0118 0008 4b19  |  K |
011a a000       |    |
011b 0000 0000  |    |		.BLANK	0000[0x6]
0121 687a c001  |hz  |		.XXX[0xe]
0123 0963 3400  | c4 |
0125 0000 0000  |    |
0127 122c d400  | ,  |
0129 0000 0000  |    |
012b 0d0f 5c00  |  \ |
012d 212c 6680  |!,f |
012f 0000 0000  |    |		.BLANK	0000[0x6]
0135 01a1 ec00  |    |		.XXX[0x37]
0137 0425 8cd0  | %  |
0139 0000 0000  |    |
013b 0048 b350  | H P|
013d 0000 0000  |    |
013f 0030 3d90  | 0= |
0141 0084 b19a  |    |
0143 0000 0000  |    |
0145 0009 166a  |   j|
0147 0000 0000  |    |
0149 0006 77b4  |  w |
014b 0010 9633  |   3|
014d 4000 0000  |@   |
014f 0001 22cd  |  " |
0151 4000 0000  |@   |
0153 0000 c7f6  |    |
0155 c002 12c6  |    |
0157 6800 0000  |h   |
0159 0000 2459  |  $Y|
015b a800 0000  |    |
015d 0000 195e  |   ^|
015f e000 4258  |  BX|
0161 cd00 0000  |    |
0163 0000 048b  |    |
0165 3500 0000  |5   |
0167 0000 0337  |   7|
0169 dd00 084b  |   K|
016b 19a0       |    |
016c 0000 0000  |    |		.BLANK	0000[0x6]
0172 0062 7bc0  | b{ |		.XXX[0x37]
0174 0109 6334  |  c4|
0176 0000 0000  |    |
0178 0012 2cd4  |  , |
017a 0000 0000  |    |
017c 000c 3f7c  |  ?||
017e 0021 2c66  | !,f|
0180 8000 0000  |    |
0182 0002 459a  |  E |
0184 8000 0000  |    |
0186 0001 89f0  |    |
0188 0004 258c  |  % |
018a d000 0000  |    |
018c 0000 48b3  |  H |
018e 5000 0000  |P   |
0190 0000 33be  |  3 |
0192 1000 84b1  |    |
0194 9a00 0000  |    |
0196 0000 0916  |    |
0198 6a00 0000  |j   |
019a 0000 064f  |   O|
019c c400 1096  |    |
019e 3340 0000  |3@  |
01a0 0000 0122  |   "|
01a2 cd40 0000  | @  |
01a4 0000 00c7  |    |
01a6 f8c0 0212  |    |
01a8 c668       | h  |
01a9 0000 0000  |    |		.BLANK	0000[0x6]
01af 0014 1f20  |    |		.XXX[0x19]
01b1 0042 58cd  | BX |
01b3 0000 0000  |    |
01b5 0004 8b35  |   5|
01b7 0000 0000  |    |
01b9 0003 43e5  |  C |
01bb 0008 4b19  |  K |
01bd a000 0000  |    |
01bf 0000 9166  |   f|
01c1 a000 0000  |    |
01c3 0000 64fc  |  d |
01c5 c001 0963  |   c|
01c7 3400       |4   |
01c8 0000 0000  |    |		.BLANK	0000[0x6]
01ce 0c4f 9c00  | O  |		.XXX[0x32]
01d0 212c 6680  |!,f |
01d2 0000 0000  |    |
01d4 0245 9a80  | E  |
01d6 0000 0000  |    |
01d8 01a1 f400  |    |
01da 0425 8cd0  | %  |
01dc 0000 0000  |    |
01de 0048 b350  | H P|
01e0 0000 0000  |    |
01e2 0033 7e90  | 3~ |
01e4 0084 b19a  |    |
01e6 0000 0000  |    |
01e8 0009 166a  |   j|
01ea 0000 0000  |    |
01ec 0006 6fd4  |  o |
01ee 0010 9633  |   3|
01f0 4000 0000  |@   |
01f2 0001 22cd  |  " |
01f4 4000 0000  |@   |
01f6 0000 c6fa  |    |
01f8 c002 12c6  |    |
01fa 6800 0000  |h   |
01fc 0000 2459  |  $Y|
01fe a800 0000  |    |