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

⟦b5571e2bb⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0040       | @  |		.CONST	0x0040								; 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 000b       |    |		.CONST	0x000b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			BODY_0008:
000b			INIT_0008:
000b 00cf       |    |		Action	Mark_Auxiliary
000c 00db       |    |		Load_Top	At_Offset_3
000d 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
000e 01d9       |    |		Execute	Vector,Reverse_Bounds
000f 0263       | c  |		Execute	Discrete,Above_Bound
0010 702d       |p-  |		Jump_Nonzero	0x3e
0011 00d8       |    |		Load_Top	At_Offset_0
0012 e5ff       |    |		Load	0x2,-0x1
0013 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0014 01d5       |    |		Execute	Vector,Field_Reference
0015 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0016 4604       |F   |		Jump_Case	0x5
0017 7806       |x   |		Jump	0x1e								; case 0x0
0018 780f       |x   |		Jump	0x28								; case 0x1
0019 7815       |x   |		Jump	0x2f								; case 0x2
001a 781b       |x   |		Jump	0x36								; case 0x3
001b 7800       |x   |		Jump	0x1c								; case 0x4
001c 00d2       |    |		Pop_Control	Pop_Count_2
001d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
001e e5fe       |    |		Load	0x2,-0x2
001f 00d9       |    |		Load_Top	At_Offset_1
0020 e5ff       |    |		Load	0x2,-0x1
0021 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
0022 01d5       |    |		Execute	Vector,Field_Reference
0023 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0024 e245       | E  |		Load	0x1,0x45
0025 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0026 824f       | O  |		Call	0x1,0x4f
0027 7814       |x   |		Jump	0x3c
0028 00d8       |    |		Load_Top	At_Offset_0
0029 e5ff       |    |		Load	0x2,-0x1
002a 2502       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x2
002b 01d5       |    |		Execute	Vector,Field_Reference
002c 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
002d 00ba       |    |		Action	Initiate_Delay
002e 780d       |x   |		Jump	0x3c
002f e5fe       |    |		Load	0x2,-0x2
0030 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0031 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0032 e00d       |    |		Load	0x0,0xd
0033 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0034 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0035 7806       |x   |		Jump	0x3c
0036 e5fe       |    |		Load	0x2,-0x2
0037 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0038 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0039 e00d       |    |		Load	0x0,0xd
003a 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
003b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
003c 00c8       |    |		Action	Pop_Auxiliary_Range
003d 3fd3       |?   |		Loop_Increasing	0x11
003e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
003f 0000       |    |		.XXX[0x1]
0040 ; --------------------------------------------------------------------------------------
0040 ; Debug Table
0040 ; --------------------------------------------------------------------------------------
0040 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0x7e4b,0x0000,0x0001,0x0000
0046 d185 b9d0  |    |		.XXX[0xef]
0048 9cb0 8195  |    |
004a e1c1 958d  |    |
004c d195 9081  |    |
004e 1561 4149  | aAI|
0050 154d 4d25  | MM%|
0052 3d38 81bd  |=8  |
0054 d5d0 81a5  |    |
0056 b802 0019  |    |
0058 1925 3151  | %1Q|
005a 4914 01f4  |I   |
005c 1145 553d  | EU=|
005e 2401 9c11  |$   |
0060 0d31 1518  | 1  |
0062 0044 153d  | D =|
0064 0929 1550  | ) P|
0066 0020 1d09  |    |
0068 3d3d 3115  |==1 |
006a 0538 0034  | 8 4|
006c 0d4d 050c  | M  |
006e 00a4 2d35  |  -5|
0070 0561 7d15  | a} |
0072 3115 3515  |1 5 |
0074 3950 01ac  |9P  |
0076 2951 7d41  |)Q}A|
0078 4915 4d15  |I M |
007a 390d 1401  |9   |
007c 3031 dda5  |01  |
007e d1a0 810d  |    |
0080 a185 a5b9  |    |
0082 94ec 015c  |   \|
0084 1d9d 95b9  |    |
0086 95c9 a58c  |    |
0088 00e4 7080  |  p |
008a 8080 81d1  |    |
008c e5c1 9481  |    |
008e 15b1 95b5  |    |
0090 95b9 d081  |    |
0092 a5cc 81c1  |    |
0094 c9a5 d985  |    |
0096 d194 ec01  |    |
0098 3c84 8080  |<   |
009a 8081 3585  |  5 |
009c e17d 95b1  | }  |
009e 95b5 95b9  |    |
00a0 d080 e881  |    |
00a2 3985 d1d5  |9   |
00a4 c985 b080  |    |
00a6 e8f4 80c4  |    |
00a8 c0c0 ec02  |    |
00aa 0538 8080  | 8  |
00ac 8081 dda5  |    |
00ae d1a0 8199  |    |
00b0 d5b9 8dd1  |    |
00b2 a5bd b881  |    |
00b4 19a5 b1d1  |    |
00b6 c994 80a1  |    |
00b8 45d5 bda4  |E   |
00ba 80e8 8115  |    |
00bc b195 b595  |    |
00be b9d0 ec81  |    |
00c0 0db1 9598  |    |
00c2 80e8 810d  |    |
00c4 a185 a5b9  |    |
00c6 94b9 3d89  |  = |
00c8 a995 d0a4  |    |
00ca 81c9 95d1  |    |
00cc d5c9 b881  |    |
00ce 09bd bdb1  |    |
00d0 9585 b8ec  |    |
00d2 01c4 39c1  |  9 |
00d4 858d ad85  |    |
00d6 9d94 814d  |   M|
00d8 858c 81a5  |    |
00da cc01 60dc  |  ` |
00dc 8080 8081  |    |
00de d1e5 c194  |    |
00e0 813d 89a9  | =  |
00e2 95d0 80a1  |    |
00e4 3585 e080  |5   |
00e6 e881 b985  |    |
00e8 d1d5 c985  |    |
00ea b0e8 f5b5  |    |
00ec 85e1 7d95  |  } |
00ee b195 b595  |    |
00f0 b9d0 a481  |    |
00f2 a5cc 81c1  |    |
00f4 c9a5 d985  |    |
00f6 d194 ec02  |    |
00f8 0825 c1c9  | %  |
00fa a5d9 85d1  |    |
00fc 9480 8001  |    |
00fe 395c 81d1  |9\  |
0100 e5c1 9481  |    |
0102 d17d c1c9  | }  |
0104 95cd 95b9  |    |
0106 8d94 81a5  |    |
0108 cc81 85c9  |    |
010a c985 e4a0  |    |
010c f0f8 a481  |    |
010e bd98 8189  |    |
0110 bdbd b195  |    |
0112 85b8 ec80  |    |
0114 8081 d1e5  |    |
0116 c194 813d  |   =|
0118 89a9 95d0  |    |
011a 80a1 3585  |  5 |
011c e080 e880  |    |
011e 81b9 85d1  |    |
0120 d5c9 85b0  |    |
0122 e8f5 b585  |    |
0124 e17d 95b1  | }  |
0126 95b5 95b9  |    |
0128 d0a4 81a5  |    |
012a cc00 f838  |   8|
012c 8080 8080  |    |
012e 8080 8081  |    |
0130 c995 8dbd  |    |
0132 c990 020c  |    |
0134 a080       |    |
0135 8080 8080  |    |		.BLANK	8080[0x5]
013a 816d a591  | m  |		.XXX[0xc6]
013c 95b9 d1a5  |    |
013e 99a5 95c9  |    |
0140 7480 e881  |t   |
0142 6d95 e1c1  |m   |
0144 c995 cdcd  |    |
0146 a5bd b974  |   t|
0148 ec01 2c4c  |  ,L|
014a 8080 8080  |    |
014c 8080 8081  |    |
014e 95b9 9081  |    |
0150 c995 8dbd  |    |
0152 c990 ec01  |    |
0154 0421 95b9  | !  |
0156 9081 4d85  |  M |
0158 8cec 001c  |    |
015a 754d 85dc  |uM  |
015c 809c f0f8  |    |
015e 9cb0 8195  |    |
0160 e1c1 958d  |    |
0162 d195 9081  |    |
0164 1561 4149  | aAI|
0166 154d 4d25  | MM%|
0168 3d38 00f0  |=8  |
016a 1d25 3951  | %9Q|
016c 151d 1548  |   H|
016e 0188 2551  |  %Q|
0170 7d0d 1531  |}  1|
0172 3155 3114  |1U1 |
0174 0098 2141  |  !A|
0176 4915 4d15  |I M |
0178 390d 1402  |9   |
017a 1004 c400  |    |
017c 801d 0d15  |    |
017e 3131 5531  |11U1|
0180 1402 1419  |    |
0182 393d 3509  |9=5 |
0184 4914 0010  |I   |
0186 04c0 0218  |    |
0188 1131 1519  | 1  |
018a 5000 0815  |P   |
018c 4925 1d21  |I% !|
018e 5000 d404  |P   |
0190 f401 1c4c  |   L|
0192 a955 3925  | U9%|
0194 5915 494d  |Y IM|
0196 0531 7d25  | 1}%|
0198 3951 151d  |9Q  |
019a 1548 a801  | H  |
019c c808 f8f4  |    |
019e 021c 08f0  |    |
01a0 f400 bc04  |    |
01a2 f800 ec04  |    |
01a4 f002 200d  |    |
01a6 b9bd d001  |    |
01a8 d00d e1bd  |    |
01aa c801 a409  |    |
01ac bdc8 00c4  |    |
01ae 0d85 b990  |    |
01b0 0100 0498  |    |
01b2 01d4 20c4  |    |
01b4 c0b8 c480  |    |
01b6 a0cc a401  |    |
01b8 24cc 81a1  |$   |
01ba 85cc 81d1  |    |
01bc a194 81cd  |    |
01be 85b5 9481  |    |
01c0 b985 b594  |    |
01c2 8185 cc81  |    |
01c4 85b9 bdd1  |    |
01c6 a195 c881  |    |
01c8 bd89 a995  |    |
01ca 8dd0 81a5  |    |
01cc b881 d1a1  |    |
01ce 9481 b1a5  |    |
01d0 89c9 85c9  |    |
01d2 e401 f811  |    |
01d4 5925 1114  |Y%  |
01d6 0224 1931  | $ 1|
01d8 157d 4d05  | }M |
01da 0c00 e815  |    |
01dc 4131 1525  |A1 %|
01de 3802 2819  |8 ( |
01e0 1561 254d  | a%M|
01e2 5114 022c  |Q  ,|
01e4 0d39 3d34  | 9=4|
01e6 0230 253d  | 0%=|
01e8 0d0d 5549  |  UI|
01ea 1539 0d14  | 9  |
01ec 0074 210d  | t! |
01ee 0549 1125  | I %|
01f0 3905 3002  |9 0 |
01f2 341d 0529  |4  )|
01f4 3d55 5115  |=UQ |
01f6 4802 3809  |H 8 |
01f8 a5b8 014c  |   L|
01fa 254d 5541  |%MUA|
01fc 4149 2535  |AI%5|
01fe 1548 023c  | H <|