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

⟦692aab0f7⟧

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

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 0030       | 0  |		.CONST	0x0030								; 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 0002       |    |		.CONST	0x0002								; Number of locals
000b			INIT_0008:
000b e009       |    |		Load	0x0,0x9
000c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
000d 02c7       |    |		Declare_Variable	Any
000e 00d8       |    |		Load_Top	At_Offset_0
000f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0010			BODY_0008:
0010 00db       |    |		Load_Top	At_Offset_3
0011 e21e       |    |		Load	0x1,0x1e
0012 016f       | o  |		Execute	Variant_Record,Equal
0013 6802       |h   |		Jump_Zero	0x16
0014 e290       |    |		Load	0x1,0x90
0015 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0016 00db       |    |		Load_Top	At_Offset_3
0017 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0018 e005       |    |		Load	0x0,0x5
0019 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
001a c402       |    |		Store	0x2,0x2
001b 00d8       |    |		Load_Top	At_Offset_0
001c e02d       | -  |		Load	0x0,0x2d
001d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
001e 0b08       |    |		Execute_Immediate	Case_Compare,0x8
001f 7006       |p   |		Jump_Nonzero	0x26
0020 0f13       |    |		Execute_Immediate	Equal,0x13
0021 7005       |p   |		Jump_Nonzero	0x27
0022 482c       |H,  |		Short_Literal	0x2c
0023 e5ff       |    |		Load	0x2,-0x1
0024 8229       | )  |		Call	0x1,0x29
0025 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0026 00d1       |    |		Pop_Control	Pop_Count_1
0027 00d8       |    |		Load_Top	At_Offset_0
0028 8298       |    |		Call	0x1,0x98
0029 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
002a 0000 0000  |    |		.BLANK	0000[0x6]
0030 ; --------------------------------------------------------------------------------------
0030 ; Debug Table
0030 ; --------------------------------------------------------------------------------------
0030 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xfc71,0x0000,0x0001,0x0000
0036 0c2c a5f4  | ,  |		.XXX[0x1ca]
0038 0e6f b0dc  | o  |
003a 0297 a9eb  |    |
003c 7f01 f3e8  |    |
003e 3532 a083  |52  |
0040 00dc 8237  |   7|
0042 5ace 30b2  |Z 0 |
0044 c7d0 37a2  |  7 |
0046 a77e 005b  | ~ [|
0048 ec34 72c3  | 4r |
004a d6b1 8aab  |    |
004c acd4 3e8c  |  > |
004e 78e0 02fa  |x   |
0050 0803 8100  |    |
0052 14ef 41d9  |  A |
0054 ff82 00c2  |    |
0056 2f41 dac0  |/A  |
0058 847c e101  | |  |
005a 1848 9782  | H  |
005c 0020 ef42  |   B|
005e 8a9b 1349  |   I|
0060 c8d3 aa14  |    |
0062 0cb2 b2ac  |    |
0064 5c38 6293  |\8b |
0066 8601 092e  |   .|
0068 5210 0efc  |R   |
006a b290 5038  |  P8|
006c b2a0 857c  |   ||
006e e383 3608  |  6 |
0070 0386 0321  |   !|
0072 ab4b fa4a  | K J|
0074 e978 e181  | x  |
0076 4628 0ec0  |F(  |
0078 a690 9039  |   9|
007a d273 8802  | s  |
007c 3563 d224  |5c $|
007e 0ee2 aeac  |    |
0080 9c3a 122e  | : .|
0082 ea78 e283  | x  |
0084 1628 0e82  | (  |
0086 82b8 dc38  |   8|
0088 028b 1348  |   H|
008a e002 ee08  |    |
008c 038c 0024  |   $|
008e e439 02ab  | 9  |
0090 8d02 d72b  |   +|
0092 520a c243  |R  C|
0094 48e1 c2e0  |H   |
0096 9ad7 61ad  |  a |
0098 48ae b848  |H  H|
009a 9791 011c  |    |
009c 2ca6 440c  |, D |
009e 18a4 e5c3  |    |
00a0 35fa d774  |5  t|
00a2 7ce7 c1c6  ||   |
00a4 e9e8 831e  |    |
00a6 a11c 3942  |  9B|
00a8 d480 00e4  |    |
00aa 4280 492f  |B I/|
00ac 9001 1aaf  |    |
00ae ae54 0ed4  | T  |
00b0 b021 4039  | !@9|
00b2 1224 857c  | $ ||
00b4 e500 e658  |   X|
00b6 0ce0 aec5  |    |
00b8 5038 e2be  |P8  |
00ba 4148 e742  |AH B|
00bc fc59 f796  | Y  |
00be 008f af5c  |   \|
00c0 ca2e b978  | . x|
00c2 e742 e208  | B  |
00c4 011f 6aa1  |  j |
00c6 9c38 a257  | 8 W|
00c8 9b02 efab  |    |
00ca aa64 0f0a  | d  |
00cc 88e6 80f5  |    |
00ce 3ad8 ecb2  |:   |
00d0 c590 38c2  |  8 |
00d2 464d b789  |FM  |
00d4 2252 600e  |"R` |
00d6 5ab2 addc  |Z   |
00d8 39b2 cb9c  |9   |
00da 00b1 e839  |   9|
00dc a238 877c  | 8 ||
00de e503 3278  |  2x|
00e0 0ffe aa9d  |    |
00e2 dc38 729f  | 8r |
00e4 a003 c6ab  |    |
00e6 ae84 0cb5  |    |
00e8 ab22 1c3b  | " ;|
00ea c2ca ccb6  |    |
00ec de20 39b2  |  9 |
00ee a710 48e9  |  H |
00f0 42ac 4897  |B H |
00f2 a300 256b  |  %k|
00f4 a684 0eca  |    |
00f6 b2ae 5c39  |  \9|
00f8 02b4 8100  |    |
00fa e9c2 dc6a  |   j|
00fc df24 ad45  | $ E|
00fe c936 31eb  | 61 |
0100 a701 642c  |  d,|
0102 a694 0de8  |    |
0104 a2c6 5038  |  P8|
0106 62da e978  |b  x|
0108 e9c3 559a  |  U |
010a dc01 b4eb  |    |
010c 42d3 a9eb  |B   |
010e a802 d89b  |    |
0110 a6a4 0fc2  |    |
0112 a4e9 82a8  |    |
0114 4897 a801  |H   |
0116 292c b2a4  |),  |
0118 0c59 8722  | Y "|
011a 9c3a c2d7  | :  |
011c a800 dbab  |    |
011e aaa4 0e50  |   P|
0120 b2c6 d038  |   8|
0122 82df ad01  |    |
0124 b5af 7cda  |  | |
0126 debb 78e9  |  x |
0128 030f a9eb  |    |
012a af03 f9ab  |    |
012c 7f0a c7f7  |    |
012e b4c5 6fd2  |  o |
0130 b40f 6ca9  |  l |
0132 46c8 3a62  |F :b|
0134 c278 78ef  | xx |
0136 81ce c80c  |    |
0138 18a4 ef02  |    |
013a d7a9 ebb0  |    |
013c 02df 2039  |   9|
013e 52dc 52b8  |R R |
0140 c52b 866a  | + j|
0142 cc84 7cee  |  | |
0144 031e 19f3  |    |
0146 b703 f3ab  |    |
0148 a915 b28d  |    |
014a 78ec c384  |x   |
014c 0403 3101  |  1 |
014e 7d00 05d0  |}   |
0150 0590 46ae  |  F |
0152 2401 30e5  |$ 0 |
0154 e697 b304  |    |
0156 3122 657d  |1"e}|
0158 0255 6441  | UdA|
015a 2410 1602  |$   |
015c d440 1e30  | @ 0|
015e 0ab5 24f3  |  $ |
0160 0333 100c  | 3  |
0162 5ea5 8aa5  |^   |
0164 ce00 03b4  |    |
0166 0148 8000  | H  |
0168 312b 9c95  |1+  |
016a 47dc 1431  |G  1|
016c 11e7 764a  |  vJ|
016e 0566 1911  | f  |
0170 4b73 4345  |KsCE|
0172 9849 2fb6  | I/ |
0174 0259 0803  | Y  |
0176 1266 9395  | f  |
0178 2d51 d742  |-Q B|
017a 6550 b8c9  |eP  |
017c 0401 0258  |   X|
017e 749a 442f  |t D/|
0180 3b02 591c  |; Y |
0182 4655 6ee3  |FUn |
0184 5259 1124  |RY $|
0186 ef42 ef92  | B  |
0188 59ca 1c71  |Y  q|
018a 9ddf 41c7  |  A |
018c 4f1d bfe5  |O   |
018e df81 1c3a  |   :|
0190 1cf2 c310  |    |
0192 765d 51b9  |v]Q |
0194 0104 02d2  |    |
0196 6d20 224b  |m "K|
0198 e571 3a59  | q:Y|
019a 9702 74ef  |  t |
019c 2b24 222c  |+$",|
019e 4a29 2c92  |J), |
01a0 b2e0 b6ba  |    |
01a2 54a4 4690  |T F |
01a4 7aa3 00f8  |z   |
01a6 443e 6059  |D>`Y|
01a8 03b9 e2e5  |    |
01aa 62d8 0e91  |b   |
01ac 364a ef8a  |6J  |
01ae 5a6b 5e49  |Zk^I|
01b0 1303 a6d2  |    |
01b2 5fb8 0269  |_  i|
01b4 45a6 e9eb  |E   |
01b6 b801 fa49  |   I|
01b8 a60a eb2c  |   ,|
01ba 169d a62d  |   -|
01bc e26a 5e45  | j^E|
01be 729c 67b6  |r g |
01c0 5e4d 945e  |^M ^|
01c2 8323 95d6  | #  |
01c4 9473 eb04  | s  |
01c6 3200 44ad  |2 D |
01c8 ba14 01a1  |    |
01ca d886 a003  |    |
01cc ec4c 3c81  | L< |
01ce 0a46 ba0c  | F  |
01d0 e792 e80f  |    |
01d2 721e 10a5  |r   |
01d4 6479 c976  |dy v|
01d6 0178 821e  | x  |
01d8 50f2 71ba  |P q |
01da 34db 97a9  |4   |
01dc ebba 00d8  |    |
01de 459c 492f  |E I/|
01e0 ba01 910d  |    |
01e2 9e3a 6974  | :it|
01e4 03e6 475c  |  G\|
01e6 05c6 c8b8  |    |
01e8 2b5c 15a2  |+\  |
01ea 5e2b ba2f  |^+ /|
01ec 11c6 800a  |    |
01ee a114 f240  |   @|
01f0 07d6 e97b  |   {|
01f2 9abf aebe  |    |
01f4 d5d1 6f76  |  ov|
01f6 1127 b2aa  | '  |
01f8 5e66 b90a  |^f  |
01fa 02d1 c2eb  |    |
01fc be94 0c08  |    |
01fe 0ae0 0fca  |    |