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

⟦75400c609⟧

    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 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 0014       |    |		.CONST	0x0014								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0004       |    |		.CONST	0x0004								; 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 00db       |    |		Load_Top	At_Offset_3
0010 808d       |    |		Call	0x0,0x8d
0011 00e3       |    |		Load_Encached	Natural_Cache
0012 03f1       |    |		Declare_Variable	Discrete,With_Value
0013 00e3       |    |		Load_Encached	Natural_Cache
0014			BODY_0008:
0014 e7ff       |    |		Load	0x3,-0x1
0015 00db       |    |		Load_Top	At_Offset_3
0016 017d       | }  |		Execute	Record,Structure_Write
0017 e7ff       |    |		Load	0x3,-0x1
0018 8007       |    |		Call	0x0,0x7
0019 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
001a 00d9       |    |		Load_Top	At_Offset_1
001b 8036       | 6  |		Call	0x0,0x36
001c 6814       |h   |		Jump_Zero	0x31
001d 00da       |    |		Load_Top	At_Offset_2
001e 4805       |H   |		Short_Literal	0x5
001f 8017       |    |		Call	0x0,0x17
0020 00d1       |    |		Pop_Control	Pop_Count_1
0021 00d9       |    |		Load_Top	At_Offset_1
0022 00d9       |    |		Load_Top	At_Offset_1
0023 027f       |    |		Execute	Discrete,Equal
0024 6806       |h   |		Jump_Zero	0x2b
0025 e7ff       |    |		Load	0x3,-0x1
0026 8007       |    |		Call	0x0,0x7
0027 00db       |    |		Load_Top	At_Offset_3
0028 800d       |    |		Call	0x0,0xd
0029 820f       |    |		Call	0x1,0xf
002a 7803       |x   |		Jump	0x2e
002b 00d8       |    |		Load_Top	At_Offset_0
002c 00db       |    |		Load_Top	At_Offset_3
002d 8214       |    |		Call	0x1,0x14
002e 00d9       |    |		Load_Top	At_Offset_1
002f 8212       |    |		Call	0x1,0x12
0030 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0031 00da       |    |		Load_Top	At_Offset_2
0032 4803       |H   |		Short_Literal	0x3
0033 8017       |    |		Call	0x0,0x17
0034 00d1       |    |		Pop_Control	Pop_Count_1
0035 00d8       |    |		Load_Top	At_Offset_0
0036 00db       |    |		Load_Top	At_Offset_3
0037 8214       |    |		Call	0x1,0x14
0038 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0039 0000 0000  |    |		.BLANK	0000[0x7]
0040 ; --------------------------------------------------------------------------------------
0040 ; Debug Table
0040 ; --------------------------------------------------------------------------------------
0040 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0xd1d3,0x0000,0x0001,0x0000
0046 0000 0100  |    |		.XXX[0x18]
0048 0000 0000  |    |
004a 0000 0300  |    |
004c 08c1 9900  |    |
004e 0000 0000  |    |
0050 0000 0001  |    |
0052 ec12 cd00  |    |
0054 0000 0000  |    |
0056 0000 0100  |    |
0058 0000 0000  |    |
005a 020a 0ec0  |    |
005c 013f 4300  | ?C |
005e 0000 0000  |    |		.BLANK	0000[0x4]
0062 f609 a6c0  |    |		.XXX[0xc]
0064 0000 0000  |    |
0066 0000 0080  |    |
0068 0000 0000  |    |
006a 0000 0180  |    |
006c 0460 cc80  | `  |
006e 0000 0000  |    |		.BLANK	0000[0x5]
0073 0240 0093  | @  |		.XXX[0x19]
0075 3100 f608  |1   |
0077 3c00 0000  |<   |
0079 0000 f60b  |    |
007b 3920 7b04  |9 { |
007d ffc0 00dd  |    |
007f 37a4 0f60  |7  `|
0081 a0f8 0f60  |   `|
0083 a644 0016  | D  |
0085 1048 1e75  | H u|
0087 ad38 0000  | 8  |
0089 0000 1ec1  |    |
008b 5720       |W   |
008c 0000 0000  |    |		.BLANK	0000[0x4]
0090 0099 4470  |  Dp|		.XXX[0x11]
0092 0800 160e  |    |
0094 9021 0217  | !  |
0096 0002 0002  |    |
0098 c1d2 0002  |    |
009a c209 03ce  |    |
009c b5a7 0000  |    |
009e 0000 03d8  |    |
00a0 2be4       |+   |
00a1 0000 0000  |    |		.BLANK	0000[0x4]
00a5 0013 288e  |  ( |		.XXX[0x26]
00a7 0100 02c1  |    |
00a9 d204 2042  |   B|
00ab e000 3000  |  0 |
00ad 583a 403d  |X:@=|
00af 82b6 5000  |  P |
00b1 0000 0000  |    |
00b3 0000 2000  |    |
00b5 0000 0000  |    |
00b7 0000 1001  |    |
00b9 3288 e000  |2   |
00bb 0000 0000  |    |
00bd 0000 003d  |   =|
00bf 82c6 5000  |  P |
00c1 0000 0000  |    |
00c3 0000 2000  |    |
00c5 0000 0000  |    |
00c7 0000 1001  |    |
00c9 3288 e000  |2   |
00cb 0000 0000  |    |		.BLANK	0000[0x5]
00d0 9000 2c20  |  , |		.XXX[0x2e]
00d2 903d 827b  | = {|
00d4 b000 0000  |    |
00d6 0000 0000  |    |
00d8 001e c16e  |   n|
00da 4000 0042  |@  B|
00dc 1703 d82e  |   .|
00de 0803 d82f  |   /|
00e0 5b00 0053  |[  S|
00e2 0607 a474  |   t|
00e4 5a00 0000  |Z   |
00e6 0007 b061  |   a|
00e8 5c00 0000  |\   |
00ea 0007 b063  |   c|
00ec 5c00 10bc  |\   |
00ee 1c02 0000  |    |
00f0 52ba 0838  |R  8|
00f2 8540 0080  | @  |
00f4 000a 5740  |  W@|
00f6 000a 60c0  |  ` |
00f8 f48e 8b40  |   @|
00fa 0000 0000  |    |
00fc f60c abc0  |    |
00fe 0000 0000  |    |		.BLANK	0000[0x4]
0102 0217 8380  |    |		.XXX[0x15]
0104 4000 0a57  |@  W|
0106 4107 10a8  |A   |
0108 000c 0001  |    |
010a 4ae8 0f60  |J  `|
010c c4bc 0000  |    |
010e 0000 0000  |    |
0110 0008 0000  |    |
0112 0000 0000  |    |
0114 0004 0021  |   !|
0116 7838       |x8  |
0117 0000 0000  |    |		.BLANK	0000[0x4]
011b 0f60 c8bc  | `  |		.XXX[0xc]
011d 0000 0000  |    |
011f 0000 0008  |    |
0121 0000 0000  |    |
0123 0010 5076  |  Pv|
0125 0005 17e8  |    |
0127 0000 0000  |    |		.BLANK	0000[0x4]
012b 07b0 6660  |  f`|		.XXX[0xc]
012d 0000 0000  |    |
012f 0000 0004  |    |
0131 0000 0000  |    |
0133 0000 0002  |    |
0135 0010 bc1c  |    |
0137 0000 0000  |    |		.BLANK	0000[0x5]
013c 0012 0000  |    |		.XXX[0x5]
013e 5306 07b0  |S   |
0140 5b0a       |[   |
0141 0000 0000  |    |		.BLANK	0000[0x4]
0145 03d8 3493  |  4 |		.XXX[0x11]
0147 0001 86ce  |    |
0149 c07b 069a  | {  |
014b 607b 06c4  |`{  |
014d c000 1dec  |    |
014f 400e 3004  |@ 0 |
0151 c000 0000  |    |
0153 00f6 0dde  |    |
0155 4000       |@   |
0156 0000 0000  |    |		.BLANK	0000[0x4]
015a b215 8040  |   @|		.XXX[0x11]
015c 001d e701  |    |
015e 0350 a000  | P  |
0160 1000 03bc  |    |
0162 e000 03bd  |    |
0164 8801 c600  |    |
0166 9800 0000  |    |
0168 001e c1c3  |    |
016a c800       |    |
016b 0000 0000  |    |		.BLANK	0000[0x4]
016f 1642 b008  | B  |		.XXX[0x25]
0171 0003 bce0  |    |
0173 206a 1400  | j  |
0175 0180 0077  |   w|
0177 9c01 ec1b  |    |
0179 fd00 0000  |    |
017b 0000 0000  |    |
017d 0100 0000  |    |
017f 0000 0000  |    |
0181 0080 0164  |   d|
0183 2b00 0000  |+   |
0185 0000 0000  |    |
0187 0001 ec1c  |    |
0189 7d00 0000  |}   |
018b 0000 0000  |    |
018d 0100 0000  |    |
018f 0000 0000  |    |
0191 0080 0164  |   d|
0193 2b00       |+   |
0194 0000 0000  |    |		.BLANK	0000[0x5]
0199 0480 003b  |   ;|		.XXX[0x2e]
019b d881 ec1a  |    |
019d 2801 ec19  |(   |
019f d781 ec20  |    |
01a1 2200 f60e  |"   |
01a3 9740 00b9  | @  |
01a5 97b8 1ec1  |    |
01a7 d4e8 1ec1  |    |
01a9 df80 0009  |    |
01ab ec80 2c78  |  ,x|
01ad 0480 0000  |    |
01af 0000 3d83  |  = |
01b1 d430 0000  | 0  |
01b3 0000 3d83  |  = |
01b5 e430 003a  | 0 :|
01b7 fa40 1000  | @  |
01b9 09e8 d042  |   B|
01bb 042a 001c  | *  |
01bd 0001 3d1a  |  = |
01bf 0001 3d90  |  = |
01c1 058f 0090  |    |
01c3 0000 0000  |    |
01c5 07b0 7e88  |  ~ |
01c7 0000 0000  |    |		.BLANK	0000[0x4]
01cb 0007 5f48  |  _H|		.XXX[0x35]
01cd 0200 013d  |   =|
01cf 1a08 4085  |  @ |
01d1 4003 6000  |@ ` |
01d3 27a3 407b  |' @{|
01d5 07b8 8000  |    |
01d7 0000 0000  |    |
01d9 0000 4000  |  @ |
01db 0000 0000  |    |
01dd 0000 2000  |    |
01df 75f4 8000  |u   |
01e1 0000 0000  |    |
01e3 0000 007b  |   {|
01e5 07d8 8000  |    |
01e7 0000 0000  |    |
01e9 0000 4000  |  @ |
01eb 0000 0000  |    |
01ed 8283 b000  |    |
01ef 13db a000  |    |
01f1 0000 0000  |    |
01f3 0000 003d  |   =|
01f5 83fc 5000  |  P |
01f7 0000 0000  |    |
01f9 0000 2000  |    |
01fb 0000 0000  |    |
01fd 0000 1000  |    |
01ff 3afa       |:   |