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

⟦eed93b671⟧

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

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 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 0000  |    |		.DEBUG4	0x0004,0x0000,0x787a,0x0000,0x0001,0x0000
005e 0000 0000  |    |		.BLANK	0000[0x7]
0065 8000 0000  |    |		.XXX[0x13]
0067 0000 0000  |    |
0069 0038 0000  | 8  |
006b 0000 00d1  |    |
006d 39f0 0000  |9   |
006f 0000 0000  |    |
0071 0010 0000  |    |
0073 0000 0000  |    |
0075 0008 0000  |    |
0077 0810       |    |
0078 0000 0000  |    |		.BLANK	0000[0x5]
007d 0048 0001  | H  |		.XXX[0x5]
007f c000 00d1  |    |
0081 1ca0       |    |
0082 0000 0000  |    |		.BLANK	0000[0x4]
0086 0068 a284  | h  |		.XXX[0x10]
0088 0001 36e3  |  6 |
008a 800d 1470  |   p|
008c 800d 151a  |    |
008e 0000 3808  |  8 |
0090 0018 5847  |  XG|
0092 0000 0000  |    |
0094 001a 2b87  |  + |
0096 0000 0000  |    |		.BLANK	0000[0x5]
009b b754 0100  | T  |		.XXX[0x9]
009d 0037 e50c  | 7  |
009f 2f42 c000  |/B  |
00a1 7000 06fc  |p   |
00a3 a000       |    |
00a4 0000 0000  |    |		.BLANK	0000[0xd]
00b1 0020       |    |		.XXX[0x1]
00b2 0000 0000  |    |		.BLANK	0000[0x4]
00b6 0e00 0000  |    |		.XXX[0xf]
00b8 0000 3458  |  4X|
00ba 1000 0000  |    |
00bc 0000 0000  |    |
00be 0400 0000  |    |
00c0 0000 0000  |    |
00c2 0200 016e  |   n|
00c4 a800       |    |
00c5 0000 0000  |    |		.BLANK	0000[0x5]
00ca 1200 0070  |   p|		.XXX[0x5]
00cc 1000 3450  |  4P|
00ce bc00       |    |
00cf 0000 0000  |    |		.BLANK	0000[0x4]
00d3 1a2d 6b00  | -k |		.XXX[0x10]
00d5 0050 4f00  | PO |
00d7 0345 b560  | E `|
00d9 0345 dfc0  | E  |
00db 000e 0240  |   @|
00dd 066d b4c0  | m  |
00df 0000 0000  |    |
00e1 068c 1440  |   @|
00e3 0000 0000  |    |		.BLANK	0000[0x4]
00e7 002d d700  | -  |		.XXX[0x11]
00e9 4000 0df9  |@   |
00eb 430a 90b0  |C   |
00ed 001c 0001  |    |
00ef bf28 0001  | (  |
00f1 c048 00cd  | H  |
00f3 b698 0000  |    |
00f5 0000 00d1  |    |
00f7 8a88       |    |
00f8 0000 0000  |    |		.BLANK	0000[0x4]
00fc 0005 bad0  |    |		.XXX[0x15]
00fe 0800 01bf  |    |
0100 2861 5216  |(aR |
0102 0003 8000  |    |
0104 37e5 000d  |7   |
0106 1869 0000  | i  |
0108 0000 0000  |    |
010a 0001 0000  |    |
010c 0000 0000  |    |
010e 0001 0000  |    |
0110 5bae       |[   |
0111 0000 0000  |    |		.BLANK	0000[0x4]
0115 000d 18e9  |    |		.XXX[0x6]
0117 0000 0000  |    |
0119 0000 0001  |    |
011b 0000 0000  |    |		.BLANK	0000[0x4]
011f 8000 5bad  |  [ |		.XXX[0x2]
0121 0000 0000  |    |		.BLANK	0000[0x5]
0126 0004 8000  |    |		.XXX[0x5]
0128 1c04 800d  |    |
012a 1694       |    |
012b 0000 0000  |    |		.BLANK	0000[0x4]
012f 0006 8ccd  |    |		.XXX[0x11]
0131 4000 865f  |@  _|
0133 1800 d19b  |    |
0135 a800 d1a6  |    |
0137 4000 0863  |@  c|
0139 9001 a367  |   g|
013b b000 0000  |    |
013d 0001 a377  |   w|
013f b000       |    |
0140 0000 0000  |    |		.BLANK	0000[0x4]
0144 1cd8 e010  |    |		.XXX[0x9]
0146 0000 00b0  |    |
0148 c004 0000  |    |
014a 0700 0000  |    |
014c 1600       |    |
014d 0000 0000  |    |		.BLANK	0000[0xd]
015a 0002       |    |		.XXX[0x1]
015b 0000 0000  |    |		.BLANK	0000[0x4]
015f 00e0       |    |		.XXX[0x1]
0160 0000 0000  |    |		.BLANK	0000[0x4]
0164 0346 cf60  | F `|		.XXX[0x20]
0166 0000 0000  |    |
0168 0000 0020  |    |
016a 0000 0309  |    |
016c 89e8 ebe7  |    |
016e 264b e606  |&K  |
0170 6be6 26eb  |k & |
0172 e82a 8be6  | *  |
0174 068b e606  |    |
0176 ebe6 4640  |  F@|
0178 0346 ff80  | F  |
017a 0000 0000  |    |
017c 0000 0040  |   @|
017e 0000 0000  |    |
0180 0000 0020  |    |
0182 0039 b1c0  | 9  |
0184 0000 0000  |    |		.BLANK	0000[0x5]
0189 0120 0010  |    |		.XXX[0x5]
018b c720 0346  |   F|
018d 5e40       |^@  |
018e 0000 0000  |    |		.BLANK	0000[0x4]
0192 01a3 95f0  |    |		.XXX[0x25]
0194 0025 3f12  | %? |
0196 0034 733e  | 4s>|
0198 0034 75e4  | 4u |
019a 0002 18e8  |    |
019c 0068 f294  | h  |
019e 0000 0000  |    |
01a0 0068 f554  | h T|
01a2 0000 0000  |    |
01a4 0068 f954  | h T|
01a6 000c ebf8  |    |
01a8 0400 01ee  |    |
01aa 5810 810a  |X   |
01ac 0001 0000  |    |
01ae 3dcb 0000  |=   |
01b0 431d 000d  |C   |
01b2 1e52 8000  | R  |
01b4 0000 000d  |    |
01b6 1fab       |    |
01b7 0000 0000  |    |		.BLANK	0000[0x4]
01bb 0001 9d7f  |    |		.XXX[0x27]
01bd 0080 003d  |   =|
01bf cb02 1021  |   !|
01c1 4000 1800  |@   |
01c3 07b9 6000  |  ` |
01c5 0000 0000  |    |
01c7 d1e5 2800  |  ( |
01c9 0000 0000  |    |
01cb 0000 0800  |    |
01cd 0000 720a  |  r |
01cf 62aa f9c2  |b   |
01d1 fa12 4aa1  |  J |
01d3 3a12 7a22  |: z"|
01d5 c800 d1ee  |    |
01d7 b000 0000  |    |
01d9 0000 0000  |    |
01db 1000 0000  |    |
01dd 0000 0000  |    |
01df 4800 19d7  |H   |
01e1 f000       |    |
01e2 0000 0000  |    |		.BLANK	0000[0x4]
01e6 d1f6 b000  |    |		.XXX[0xc]
01e8 0000 0000  |    |
01ea 0000 1000  |    |
01ec 0000 0000  |    |
01ee 25c4 0000  |%   |
01f0 044d 8000  | M  |
01f2 0000 0000  |    |		.BLANK	0000[0x4]
01f6 68ff 5c00  |h \ |		.XXX[0xa]
01f8 0000 0000  |    |
01fa 0000 0800  |    |
01fc 0000 0000  |    |
01fe 0000 2400  |  $ |