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

⟦685f08343⟧

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

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 0020       |    |		.CONST	0x0020								; 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 e5fd       |    |		Load	0x2,-0x3
001c e5fe       |    |		Load	0x2,-0x2
001d e5ff       |    |		Load	0x2,-0x1
001e 8001       |    |		Call	0x0,0x1
001f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0020 ; --------------------------------------------------------------------------------------
0020 ; Debug Table
0020 ; --------------------------------------------------------------------------------------
0020 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0x4e64,0x0000,0x0001,0x0000
0026 b8ec 8080  |    |		.XXX[0x3]
0028 2880       |(   |
0029 8080 8080  |    |		.BLANK	8080[0x5]
002e 8159 a5cd  | Y  |		.XXX[0x1e]
0030 d585 b17d  |   }|
0032 0dbd b1bd  |    |
0034 c8b9 09b1  |    |
0036 d594 8080  |    |
0038 e8f4 8149  |   I|
003a 95c0 b905  |    |
003c b1b1 bd8d  |    |
003e 7d39 85b5  |}9  |
0040 9591 7d0d  |  } |
0042 bdb1 bdc8  |    |
0044 b94d 8dc9  | M  |
0046 9595 b97d  |   }|
0048 09b1 d594  |    |
004a ec28 2880  | (( |
004c 8080 8080  |    |		.BLANK	8080[0x5]
0051 8159 a5cd  | Y  |		.XXX[0x1b]
0053 d585 b17d  |   }|
0055 0dbd b1bd  |    |
0057 c8b9 41a5  |  A |
0059 e195 b080  |    |
005b e8f4 8149  |   I|
005d 95c0 b905  |    |
005f b1b1 bd8d  |    |
0061 7d39 85b5  |}9  |
0063 9591 7d0d  |  } |
0065 bdb1 bdc8  |    |
0067 b941 a5e1  | A  |
0069 95b0 ec80  |    |
006b 8028       | (  |
006c 8080 8080  |    |		.BLANK	8080[0x5]
0071 8081 15e1  |    |		.XXX[0x36]
0073 858d d17d  |   }|
0075 0dbd b1bd  |    |
0077 c8b9 41a5  |  A |
0079 e195 b080  |    |
007b 80e8 f481  |    |
007d 4995 c0b9  |I   |
007f 05b1 b1bd  |    |
0081 8d7d 3985  | }9 |
0083 b595 917d  |   }|
0085 0dbd b1bd  |    |
0087 c8b9 41a5  |  A |
0089 e195 b0ec  |    |
008b 2828 b4b4  |((  |
008d b4b5 0d85  |    |
008f d18d a081  |    |
0091 d5b9 95e1  |    |
0093 c195 8dd1  |    |
0095 9590 8195  |    |
0097 e18d 95c1  |    |
0099 d1a5 bdb9  |    |
009b ccb8 2828  |  ((|
009d 8080 8080  |    |
009f 8080 8081  |    |
00a1 95e1 8d95  |    |
00a3 c1d1 a5bd  |    |
00a5 b880 8028  |   (|
00a7 8080 8080  |    |		.BLANK	8080[0x5]
00ac 8081 dda1  |    |		.XXX[0xa]
00ae 95b8 81bd  |    |
00b0 d1a1 95c9  |    |
00b2 cc80 f4f8  |    |
00b4 8080 2880  |  ( |
00b6 8080 8080  |    |		.BLANK	8080[0x7]
00bd 8155 b9b1  | U  |		.XXX[0xf]
00bf bd8d ad7d  |   }|
00c1 11a5 cdc1  |    |
00c3 b185 e480  |    |
00c5 a111 a5cd  |    |
00c7 c1b1 85e4  |    |
00c9 a4ec 8080  |    |
00cb 2880       |(   |
00cc 8080 8080  |    |		.BLANK	8080[0x7]
00d3 81c9 85a5  |    |		.XXX[0x77]
00d5 cd94 ec80  |    |
00d7 8028 8080  | (  |
00d9 8080 8080  |    |
00db 8081 95b9  |    |
00dd 90ec 2828  |  ((|
00df b4b4 b4b5  |    |
00e1 55b9 b1bd  |U   |
00e3 8dac ec81  |    |
00e5 cde5 b98c  |    |
00e7 ec81 c995  |    |
00e9 d1d5 c9b8  |    |
00eb b828 2880  | (( |
00ed 8080 8080  |    |
00ef 8080 8155  |   U|
00f1 b9b1 bd8d  |    |
00f3 ad7d 11a5  | }  |
00f5 cdc1 b185  |    |
00f7 e480 a111  |    |
00f9 a5cd c1b1  |    |
00fb 85e4 a4ec  |    |
00fd 8080 2880  |  ( |
00ff 8080 8080  |    |
0101 8080 814d  |   M|
0103 e5b9 8d7d  |   }|
0105 2185 b991  |!   |
0107 b194 80a1  |    |
0109 11a5 cdc1  |    |
010b b185 e4a4  |    |
010d ec80 8028  |   (|
010f 8080 8080  |    |
0111 8080 8081  |    |
0113 4dd1 85d1  |M   |
0115 d5cc 80e8  |    |
0117 f481 4dd5  |  M |
0119 8d8d 95cd  |    |
011b cd99 d5b0  |    |
011d ec28 2880  | (( |
011f 8080 8195  |    |
0121 b990 8161  |   a|
0123 7d05 b1b1  |}   |
0125 bd8d 7d39  |  }9|
0127 85b5 9591  |    |
0129 7d0d bdb1  |}   |
012b bdc8 ec28  |   (|
012d 28b4 b430  |(  0|
012f 8080 8081  |    |
0131 c1c9 bd8d  |    |
0133 9591 d5c9  |    |
0135 9481 617d  |  a}|
0137 19c9 9595  |    |
0139 7d0d bdb1  |}   |
013b bdc9 cc80  |    |
013d a111 a5cd  |    |
013f c1b1 85e4  |    |
0141 8080 e881  |    |
0143 617d 11a5  |a}  |
0145 cdc1 b185  |    |
0147 e4ec 8080  |    |
0149 2880       |(   |
014a 8080 8080  |    |		.BLANK	8080[0xd]
0157 8081 0dbd  |    |		.XXX[0xe]
0159 b1bd c9b5  |    |
015b 85c0 80e8  |    |
015d 8161 7d0d  | a} |
015f bdb1 bdc9  |    |
0161 b585 c0ec  |    |
0163 8080 2880  |  ( |
0165 8080 8080  |    |		.BLANK	8080[0xd]
0172 8081 41a5  |  A |		.XXX[0xf]
0174 e195 b1cc  |    |
0176 8080 80e8  |    |
0178 8161 7d41  | a}A|
017a a5e1 95b1  |    |
017c 7d05 c9c9  |}   |
017e 85e4 ec80  |    |
0180 8028       | (  |
0181 8080 8080  |    |		.BLANK	8080[0xe]
018f 8141 b185  | A  |		.XXX[0x5d]
0191 b995 cc80  |    |
0193 8080 e881  |    |
0195 617d 41b1  |a}A |
0197 85b9 957d  |   }|
0199 3585 cdac  |5   |
019b a481 a5cc  |    |
019d 8080 2880  |  ( |
019f 8080 8080  |    |
01a1 8080 8139  |   9|
01a3 7d41 a5e1  |}A  |
01a5 95b1 cc80  |    |
01a7 e881 4d7d  |  M}|
01a9 3985 d1d5  |9   |
01ab c985 b080  |    |
01ad e8f4 8141  |   A|
01af a5e1 95b1  |    |
01b1 cc9d 3195  |  1 |
01b3 b99d d1a0  |    |
01b5 ec80 8028  |   (|
01b7 8080 8081  |    |
01b9 8995 9da5  |    |
01bb b828 28b4  | (( |
01bd b4b4 b531  |   1|
01bf bd8d ac81  |    |
01c1 d1a1 9481  |    |
01c3 91a5 cdc1  |    |
01c5 b185 e4b8  |    |
01c7 2828 8080  |((  |
01c9 8080 8080  |    |
01cb 8081 31bd  |  1 |
01cd 8dad 7d11  |  } |
01cf a5cd c1b1  |    |
01d1 85e4 80a1  |    |
01d3 11a5 cdc1  |    |
01d5 b185 e4a4  |    |
01d7 ec80 8028  |   (|
01d9 8080 8080  |    |
01db 8080 8081  |    |
01dd 8995 9da5  |    |
01df b828 28b4  | (( |
01e1 b4b4 b54d  |   M|
01e3 95b9 9081  |    |
01e5 d1a1 9481  |    |
01e7 c995 c5d5  |    |
01e9 95cd d0b8  |    |
01eb 2828       |((  |
01ec 8080 8080  |    |		.BLANK	8080[0x5]
01f1 8081 41d5  |  A |		.XXX[0xf]
01f3 d17d 617d  | }a}|
01f5 19c9 9595  |    |
01f7 7d0d bdb1  |}   |
01f9 bdc9 cd7d  |   }|
01fb 4995 c5d5  |I   |
01fd 95cd d080  |    |
01ff 8028       | (  |