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

⟦7da70b61f⟧

    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 0000  |    |		.XXX[0x10]
0060 8a30 a800  | 0  |
0062 1142 7700  | Bw |
0064 0000 0004  |    |
0066 51bb c000  |Q   |
0068 0000 0004  |    |
006a 51ac 8000  |Q   |
006c 89ff d000  |    |
006e 0000 0000  |    |		.BLANK	0000[0x5]
0073 0022 8e9e  | "  |		.XXX[0x2e]
0075 0004 4f5f  |  O_|
0077 4000 0009  |@   |
0079 d8b8 2278  |  "x|
007b aa00 0000  |    |
007d 004f 0100  | O  |
007f 42e2 f018  |B   |
0081 0044 eb08  | D  |
0083 0000 0004  |    |
0085 5218 a762  |R  b|
0087 e08a 4018  |  @ |
0089 0000 0000  |    |
008b 3c00 040c  |<   |
008d 6bc0 0000  |k   |
008f 0044 eb0a  | D  |
0091 1918 0000  |    |
0093 0002 2933  |  )3|
0095 c08a 46c8  |  F |
0097 0000 0000  |    |
0099 0002 0200  |    |
009b 8200 0000  |    |
009d 0000 82fb  |    |
009f 18ec 6800  |  h |
00a1 0000 0000  |    |		.BLANK	0000[0x6]
00a7 0008 4a75  |  Ju|		.XXX[0x5]
00a9 0000 0023  |   #|
00ab b1a0       |    |
00ac 0000 0000  |    |		.BLANK	0000[0x4]
00b0 0002 294d  |  )M|		.XXX[0x8]
00b2 a000 212e  |  !.|
00b4 ac00 0000  |    |
00b6 8ec6 8000  |    |
00b8 0000 0000  |    |		.BLANK	0000[0x4]
00bc 08a5 9180  |    |		.XXX[0x7]
00be 0084 eee0  |    |
00c0 0000 023b  |   ;|
00c2 1a00       |    |
00c3 0000 0000  |    |		.BLANK	0000[0x4]
00c7 0022 97b2  | "  |		.XXX[0x7]
00c9 0002 1409  |    |
00cb 0000 0008  |    |
00cd ec68       | h  |
00ce 0000 0000  |    |		.BLANK	0000[0x5]
00d3 8a64 7800  | dx |		.XXX[0x7]
00d5 0853 6700  | Sg |
00d7 0000 23b1  |  # |
00d9 a000       |    |
00da 0000 0000  |    |		.BLANK	0000[0x4]
00de 0229 a8a0  | )  |		.XXX[0x7]
00e0 0021 5274  | !Rt|
00e2 0000 008e  |    |
00e4 c680       |    |
00e5 0000 0000  |    |		.BLANK	0000[0x4]
00e9 0008 a6fd  |    |		.XXX[0x4]
00eb c763 4000  | c@ |
00ed 0000 0000  |    |		.BLANK	0000[0x6]
00f3 0043 1828  | C (|		.XXX[0x5]
00f5 0000 011d  |    |
00f7 8d00       |    |
00f8 0000 0000  |    |		.BLANK	0000[0x4]
00fc 0011 4f2a  |  O*|		.XXX[0x26]
00fe 98b0 8000  |    |
0100 0000 8a8b  |    |
0102 d022 a0f8  | "  |
0104 08a8 7d81  |  } |
0106 400c 21f9  |@ ! |
0108 7040 229f  |p@" |
010a c000 0000  |    |
010c 0078 0280  | x  |
010e 1843 ff72  | C r|
0110 e080 453f  |  E?|
0112 8000 0000  |    |
0114 00f0 0500  |    |
0116 3087 c6e0  |0   |
0118 2008 2000  |    |
011a 0000 0008  |    |
011c 6305 0001  |c   |
011e 0cfb 0000  |    |
0120 0004 7634  |  v4|
0122 0000 0000  |    |		.BLANK	0000[0x5]
0127 4547 4000  |EG@ |		.XXX[0x7]
0129 0434 8700  | 4  |
012b 0000 11d8  |    |
012d d000       |    |
012e 0000 0000  |    |		.BLANK	0000[0x4]
0132 0115 2860  |  (`|		.XXX[0x13]
0134 0010 d6be  |    |
0136 08a9 bc80  |    |
0138 0086 c360  |   `|
013a 454e d800  |EN  |
013c 0437 2b02  | 7+ |
013e 2a7e 6000  |*~` |
0140 21c1 d800  |!   |
0142 0000 8ec6  |    |
0144 8000       |    |
0145 0000 0000  |    |		.BLANK	0000[0x4]
0149 08a9 9e47  |   G|		.XXX[0x3]
014b 6340       |c@  |
014c 0000 0000  |    |		.BLANK	0000[0x6]
0152 23b1 a000  |#   |		.XXX[0x2]
0154 0000 0000  |    |		.BLANK	0000[0x5]
0159 0011 d8d0  |    |		.XXX[0x2]
015b 0000 0000  |    |		.BLANK	0000[0x7]
0162 10eb 2c00  |  , |		.XXX[0x5]
0164 0000 4763  |  Gc|
0166 4000       |@   |
0167 0000 0000  |    |		.BLANK	0000[0x4]
016b 0455 8500  | U  |		.XXX[0x7]
016d 0043 cb00  | C  |
016f 0000 011d  |    |
0171 8d00       |    |
0172 0000 0000  |    |		.BLANK	0000[0x4]
0176 0011 56ca  |  V |		.XXX[0x8a]
0178 823e 0000  | >  |
017a 0000 8da5  |    |
017c e023 4020  | #@ |
017e 08d9 0900  |    |
0180 0000 8adc  |    |
0182 fc18 ec11  |    |
0184 a010 0000  |    |
0186 0001 158c  |    |
0188 9045 67e0  | Eg |
018a 115a 5700  | ZW |
018c 004a 0a81  | J  |
018e 1582 5045  |  PE|
0190 6694 0340  |f  @|
0192 0011 a902  |    |
0194 0003 0100  |    |
0196 1c00 0000  |    |
0198 0000 44ae  |  D |
019a cc18 c11c  |    |
019c 1159 4f00  | YO |
019e 0000 7a84  |  z |
01a0 4c82 2b04  |L + |
01a2 a000 0000  |    |
01a4 0000 0127  |   '|
01a6 7104 5609  |q V |
01a8 4115 b520  |A   |
01aa 0022 b3f1  | "  |
01ac 0100 1c00  |    |
01ae 0000 0000  |    |
01b0 44ae c800  |D   |
01b2 11b5 1200  |    |
01b4 0000 2042  |   B|
01b6 03e0 8ad5  |    |
01b8 f822 b62a  | " *|
01ba 045b f5a0  | [  |
01bc 8040 8d00  | @  |
01be 8000 0000  |    |
01c0 08ae ee02  |    |
01c2 2bc7 6000  |+ ` |
01c4 0898 e822  |   "|
01c6 bbb8 08ae  |    |
01c8 aa00 b404  |    |
01ca 6bbf 011b  |k   |
01cc 0550 0022  | P "|
01ce b888 000e  |    |
01d0 0200 3800  |  8 |
01d2 0000 0000  |    |
01d4 895d 9831  | ] 1|
01d6 8238 22b9  | 8" |
01d8 fc00 0000  |    |
01da f700 0000  |    |
01dc 0115 c448  |   H|
01de 4480 22b7  |D " |
01e0 7400 0000  |t   |
01e2 022b b4f3  | +  |
01e4 b170 456e  | pEn|
01e6 e800 0000  |    |
01e8 00d0 0004  |    |
01ea 5632 60c7  |V2` |
01ec a08d 0080  |    |
01ee 0000 0008  |    |
01f0 afab 022c  |   ,|
01f2 1dc0 0000  |    |
01f4 0000 0230  |   0|
01f6 4208 af59  |B  Y|
01f8 022c 1360  | , `|
01fa 23c0 008b  |#   |
01fc 0770 0000  | p  |
01fe 0000 0000  |    |