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

⟦20593f11c⟧

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

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0038       | 8  |		.CONST	0x0038								; 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 0014       |    |		.CONST	0x0014								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0005       |    |		.CONST	0x0005								; Number of locals
000b			INIT_0008:
000b e00e       |    |		Load	0x0,0xe
000c 0322       | "  |		Declare_Variable	Record
000d 00d8       |    |		Load_Top	At_Offset_0
000e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
000f 00e3       |    |		Load_Encached	Natural_Cache
0010 e7ff       |    |		Load	0x3,-0x1
0011 8049       | I  |		Call	0x0,0x49
0012 e7ff       |    |		Load	0x3,-0x1
0013 8048       | H  |		Call	0x0,0x48
0014			BODY_0008:
0014 e7ff       |    |		Load	0x3,-0x1
0015 8047       | G  |		Call	0x0,0x47
0016 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0017 e7ff       |    |		Load	0x3,-0x1
0018 e602       |    |		Load	0x3,0x2
0019 017d       | }  |		Execute	Record,Structure_Write
001a 00da       |    |		Load_Top	At_Offset_2
001b 8036       | 6  |		Call	0x0,0x36
001c 680e       |h   |		Jump_Zero	0x2b
001d 00da       |    |		Load_Top	At_Offset_2
001e 00d9       |    |		Load_Top	At_Offset_1
001f 00db       |    |		Load_Top	At_Offset_3
0020 804b       | K  |		Call	0x0,0x4b
0021 7004       |p   |		Jump_Nonzero	0x26
0022 00da       |    |		Load_Top	At_Offset_2
0023 00d9       |    |		Load_Top	At_Offset_1
0024 00db       |    |		Load_Top	At_Offset_3
0025 804c       | L  |		Call	0x0,0x4c
0026 00db       |    |		Load_Top	At_Offset_3
0027 4805       |H   |		Short_Literal	0x5
0028 8017       |    |		Call	0x0,0x17
0029 00d1       |    |		Pop_Control	Pop_Count_1
002a 7804       |x   |		Jump	0x2f
002b 00db       |    |		Load_Top	At_Offset_3
002c 4803       |H   |		Short_Literal	0x3
002d 8017       |    |		Call	0x0,0x17
002e 00d1       |    |		Pop_Control	Pop_Count_1
002f e7ff       |    |		Load	0x3,-0x1
0030 8007       |    |		Call	0x0,0x7
0031 e602       |    |		Load	0x3,0x2
0032 8214       |    |		Call	0x1,0x14
0033 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0034 0000 0000  |    |		.BLANK	0000[0x4]
0038 ; --------------------------------------------------------------------------------------
0038 ; Debug Table
0038 ; --------------------------------------------------------------------------------------
0038 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0xd1db,0x0000,0x0001,0x0000
003e 34fc 01b3  |4   |		.XXX[0x49]
0040 2000 0000  |    |
0042 001b 2b50  |  +P|
0044 06cb 9200  |    |
0046 0000 2284  |  " |
0048 601b 2b50  |` +P|
004a 0000 0000  |    |
004c 0800 007c  |   ||
004e 3800 0000  |8   |
0050 0000 0d91  |    |
0052 c800 0400  |    |
0054 0000 00d9  |    |
0056 1ca1 1200  |    |
0058 1b1e f000  |    |
005a 0000 01b2  |    |
005c 9ace c5c0  |    |
005e 363d e000  |6=  |
0060 0000 03c8  |    |
0062 0000 f712  |    |
0064 864a 006c  | J l|
0066 6940 0000  |i@  |
0068 0006 c786  |    |
006a 0000 0000  |    |
006c 0000 9d8b  |    |
006e 806c 6940  | li@|
0070 0000 0007  |    |
0072 9000 01ee  |    |
0074 2501 002f  |%  /|
0076 0000 0000  |    |
0078 0007 c384  |    |
007a 0401 0403  |    |
007c 6747 0000  |gG  |
007e 6c2d 9183  |l-  |
0080 3000 0000  |0   |
0082 0369 7b01  | i{ |
0084 3a00 00da  |:   |
0086 7440       |t@  |
0087 0000 0000  |    |		.BLANK	0000[0x5]
008c 6cfe 6004  |l ` |		.XXX[0x73]
008e a020 0380  |    |
0090 0000 0018  |    |
0092 00ad 1283  |    |
0094 b024 006d  | $ m|
0096 1c40 2930  | @)0|
0098 1002 f00d  |    |
009a a4e0 0000  |    |
009c 7c38 40de  ||8@ |
009e 8000 0000  |    |
00a0 0dbc 7003  |  p |
00a2 6dbf 00db  |m   |
00a4 93c0 0000  |    |
00a6 0469 f803  | i  |
00a8 6dbf 0000  |m   |
00aa 0000 36ce  |  6 |
00ac 900d b520  |    |
00ae 0000 0045  |   E|
00b0 08c0 36ce  |  6 |
00b2 9000 0000  |    |
00b4 04f0 0000  |    |
00b6 f870 0000  | p  |
00b8 0000 001b  |    |
00ba 57c8 0008  |W   |
00bc 06d9 6801  |  h |
00be b57c c508  | |  |
00c0 c036 ce90  | 6  |
00c2 0000 0000  |    |
00c4 1000 00f8  |    |
00c6 7000 0000  |p   |
00c8 0000 1b5f  |   _|
00ca 8800 0800  |    |
00cc 0000 01b5  |    |
00ce f8c2 2400  |  $ |
00d0 36a6 5000  |6 P |
00d2 0000 036b  |   k|
00d4 bc9d 8b80  |    |
00d6 6d4c a000  |mL  |
00d8 0000 0790  |    |
00da 0001 ee25  |   %|
00dc 0c94 00da  |    |
00de 7440 0000  |t@  |
00e0 000d a928  |   (|
00e2 0000 0000  |    |
00e4 0001 3b17  |  ; |
00e6 00da 7440  |  t@|
00e8 0000 000f  |    |
00ea 2000 03dc  |    |
00ec 4a02 005e  |J  ^|
00ee 0000 0000  |    |
00f0 000f 8708  |    |
00f2 0802 0806  |    |
00f4 dd8c 0000  |    |
00f6 d9fc e306  |    |
00f8 6000 0000  |`   |
00fa 06e1 f400  |    |
00fc ec00 01b8  |    |
00fe a800       |    |
00ff 0000 0000  |    |		.BLANK	0000[0x5]
0104 dbdc 8007  |    |		.XXX[0x73]
0106 4040 0700  |@@  |
0108 0000 0030  |   0|
010a 015a 2507  | Z% |
010c 6048 00dc  |`H  |
010e 1840 5120  | @Q |
0110 2005 e01b  |    |
0112 85b8 0000  |    |
0114 f870 81bd  | p  |
0116 0000 0000  |    |
0118 1bb4 d806  |    |
011a ea7c 01ba  | |  |
011c e700 0000  |    |
011e 08d3 f006  |    |
0120 ea7c 0000  | |  |
0122 0000 6e8d  |  n |
0124 001b a638  |   8|
0126 0000 008a  |    |
0128 1180 6e8d  |  n |
012a 0000 0000  |    |
012c 09e0 0001  |    |
012e f0e0 0000  |    |
0130 0000 0037  |   7|
0132 2780 0010  |'   |
0134 0dd0 cc03  |    |
0136 7278 8a11  |rx  |
0138 806e 8d00  | n  |
013a 0000 0000  |    |
013c 2000 01f0  |    |
013e e000 0000  |    |
0140 0000 3737  |  77|
0142 0000 1000  |    |
0144 0000 0373  |   s|
0146 7084 4800  |p H |
0148 6e3c 8000  |n<  |
014a 0000 06e6  |    |
014c 773b 1700  |w;  |
014e dc79 0000  | y  |
0150 0000 0f20  |    |
0152 0003 dc4a  |   J|
0154 1928 01b8  | (  |
0156 a800 0000  |    |
0158 001b 8e48  |   H|
015a 0000 0000  |    |
015c 0002 762e  |  v.|
015e 01b8 a800  |    |
0160 0000 0002  |    |
0162 00c0 05f3  |    |
0164 1c04 00bc  |    |
0166 0000 0000  |    |
0168 001f 0e10  |    |
016a 1004 100d  |    |
016c d914 0001  |    |
016e b7b9 460c  |  F |
0170 c000 0000  |    |
0172 0de1 e401  |    |
0174 d800 0378  |   x|
0176 cf00       |    |
0177 0000 0000  |    |		.BLANK	0000[0x4]
017b 0001 bb78  |   x|		.XXX[0x74]
017d 8002 8080  |    |
017f 0e00 0000  |    |
0181 0060 02b4  | `  |
0183 4a0e c090  |J   |
0185 01bb f000  |    |
0187 a240 400b  | @@ |
0189 c037 8360  | 7 `|
018b 0001 d2fb  |    |
018d 037a 0000  | z  |
018f 0000 37e1  |  7 |
0191 a00d f2f4  |    |
0193 037d 4d00  | }M |
0195 0000 11a7  |    |
0197 e00d f2f4  |    |
0199 0000 0000  |    |
019b def9 c037  |   7|
019d c460 0000  | `  |
019f 0114 2300  |  # |
01a1 def9 c000  |    |
01a3 0000 13c0  |    |
01a5 0003 a5f4  |    |
01a7 0000 0000  |    |
01a9 006f 3ee0  | o> |
01ab 0020 1bdd  |    |
01ad 9006 f3ef  |    |
01af 1423 00de  | #  |
01b1 f9c0 0000  |    |
01b3 0000 4000  |  @ |
01b5 03a5 f400  |    |
01b7 0000 0000  |    |
01b9 6f5d e000  |o]  |
01bb 2000 0000  |    |
01bd 06f5 df08  |    |
01bf 9000 de58  |   X|
01c1 c000 0000  |    |
01c3 0dea ea76  |   v|
01c5 2e01 bcb1  |.   |
01c7 8000 0000  |    |
01c9 0a00 0007  |    |
01cb 40fc 3250  |@ 2P|
01cd 0378 cf00  | x  |
01cf 0000 0037  |   7|
01d1 9480 0000  |    |
01d3 0000 0004  |    |
01d5 ec5c 0378  | \ x|
01d7 cf00 0000  |    |
01d9 0004 0180  |    |
01db 0be6 3808  |  8 |
01dd 0178 0000  | x  |
01df 0000 003a  |   :|
01e1 5f60 2008  |_`  |
01e3 201b ee20  |    |
01e5 0003 76f1  |  v |
01e7 8c19 8000  |    |
01e9 0000 1bff  |    |
01eb c009 f000  |    |
01ed 0700 9c00  |    |
01ef 0000 0000  |    |		.BLANK	0000[0x4]
01f3 0003 7e70  |  ~p|		.XXX[0xd]
01f5 0065 0100  | e  |
01f7 1c00 0000  |    |
01f9 00c0 0568  |   h|
01fb 941d 8120  |    |
01fd 037f 5f01  |  _ |
01ff 6680       |f   |