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

⟦c261ead61⟧

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

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 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 000d       |    |		.CONST	0x000d								; 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 e5fb       |    |		Load	0x2,-0x5
001c e002       |    |		Load	0x0,0x2
001d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
001e e002       |    |		Load	0x0,0x2
001f 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0020 e5fe       |    |		Load	0x2,-0x2
0021 0120       |    |		Execute	Any,Is_Value
0022 6803       |h   |		Jump_Zero	0x26
0023 e002       |    |		Load	0x0,0x2
0024 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0025 7801       |x   |		Jump	0x27
0026 e5fe       |    |		Load	0x2,-0x2
0027 e5ff       |    |		Load	0x2,-0x1
0028 8003       |    |		Call	0x0,0x3
0029 c5fe       |    |		Store	0x2,-0x2
002a c5fd       |    |		Store	0x2,-0x3
002b c5fc       |    |		Store	0x2,-0x4
002c c5fb       |    |		Store	0x2,-0x5
002d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
002e 0000 0000  |    |		.XXX[0x2]
0030 ; --------------------------------------------------------------------------------------
0030 ; Debug Table
0030 ; --------------------------------------------------------------------------------------
0030 0004 0006  |    |		.DEBUG4	0x0004,0x0006,0x9a83,0x0000,0x0001,0x0000
0036 0023 8012  | #  |		.XXX[0x20]
0038 a0a8 2fa1  |  / |
003a a7a6 a6a7  |    |
003c a72f a120  | /  |
003e a9a2 9720  |    |
0040 a82f a922  | / "|
0042 a1a2 a4ab  |    |
0044 24a7 23af  |$ # |
0046 a820 aa24  |   $|
0048 2fa9 a4ad  |/   |
004a 229c b30b  |"   |
004c 8008 29aa  |  ) |
004e 20a7 2220  |  " |
0050 a922 1724  | " $|
0052 a72a 22a3  | *" |
0054 a2a9 0004  |    |
0056 0000 0000  |    |		.BLANK	0000[0x5]
005b 00af 3a80  |  : |		.XXX[0x114]
005d 0000 0b00  |    |
005f 0000 0100  |    |
0061 0001 5300  |  S |
0063 2041 505f  | AP_|
0065 434f 4d4d  |COMM|
0067 4f4e 5f42  |ON_B|
0069 4153 452e  |ASE.|
006b 4150 5f44  |AP_D|
006d 4953 504c  |ISPL|
006f 4159 5f53  |AY_S|
0071 4352 4545  |CREE|
0073 4e3d 7b94  |N={ |
0075 7e90 2300  |~ # |
0077 0653 4352  | SCR|
0079 4545 4e17  |EEN |
007b 0023 4150  | #AP|
007d 5f43 4f4d  |_COM|
007f 4d4f 4e5f  |MON_|
0081 4241 5345  |BASE|
0083 2e41 505f  |.AP_|
0085 5343 5245  |SCRE|
0087 454e 5f41  |EN_A|
0089 5252 4159  |RRAY|
008b 5f54 5950  |_TYP|
008d 4500 7e90  |E ~ |
008f 2300 0942  |#  B|
0091 4c41 4e4b  |LANK|
0093 5f31 5354  |_1ST|
0095 1700 1841  |   A|
0097 505f 434f  |P_CO|
0099 4d4d 4f4e  |MMON|
009b 5f42 4153  |_BAS|
009d 452e 4150  |E.AP|
009f 5f53 5749  |_SWI|
00a1 5443 4816  |TCH |
00a3 001c 4150  |  AP|
00a5 5f43 4f4d  |_COM|
00a7 4d4f 4e5f  |MON_|
00a9 4241 5345  |BASE|
00ab 2e41 505f  |.AP_|
00ad 5357 4954  |SWIT|
00af 4348 2e4f  |CH.O|
00b1 4646 7e90  |FF~ |
00b3 2300 0545  |#  E|
00b5 5241 5345  |RASE|
00b7 1700 1841  |   A|
00b9 505f 434f  |P_CO|
00bb 4d4d 4f4e  |MMON|
00bd 5f42 4153  |_BAS|
00bf 452e 4150  |E.AP|
00c1 5f53 5749  |_SWI|
00c3 5443 4816  |TCH |
00c5 001c 4150  |  AP|
00c7 5f43 4f4d  |_COM|
00c9 4d4f 4e5f  |MON_|
00cb 4241 5345  |BASE|
00cd 2e41 505f  |.AP_|
00cf 5357 4954  |SWIT|
00d1 4348 2e4f  |CH.O|
00d3 4646 7e90  |FF~ |
00d5 2300 0646  |#  F|
00d7 524f 4d5f  |ROM_|
00d9 5817 0010  |X   |
00db 5354 414e  |STAN|
00dd 4441 5244  |DARD|
00df 2e49 4e54  |.INT|
00e1 4547 4552  |EGER|
00e3 0800 0000  |    |
00e5 0000 0000  |    |
00e7 0001 7e90  |  ~ |
00e9 2300 0654  |#  T|
00eb 4852 555f  |HRU_|
00ed 5817 0010  |X   |
00ef 5354 414e  |STAN|
00f1 4441 5244  |DARD|
00f3 2e49 4e54  |.INT|
00f5 4547 4552  |EGER|
00f7 1600 2641  |  &A|
00f9 505f 434f  |P_CO|
00fb 4d4d 4f4e  |MMON|
00fd 5f42 4153  |_BAS|
00ff 452e 4150  |E.AP|
0101 5f53 4352  |_SCR|
0103 4545 4e5f  |EEN_|
0105 4449 5350  |DISP|
0107 4c41 595f  |LAY_|
0109 434f 554e  |COUN|
010b 5400 0000  |T   |
010d 0000 0000  |    |
010f 0136 0000  | 6  |
0111 0002 0000  |    |
0113 00e6 006a  |   j|
0115 82a0 be86  |    |
0117 9e9a 9a9e  |    |
0119 9cbe 8482  |    |
011b a68a 5c82  |  \ |
011d a0be a690  |    |
011f 9eae be8a  |    |
0121 8892 a8be  |    |
0123 929c a0aa  |    |
0125 a8be 8c92  |    |
0127 8a98 88be  |    |
0129 9882 848a  |    |
012b 98be aaa6  |    |
012d 8aa4 bea6  |    |
012f ae72 cc2e  | r .|
0131 0030 82a0  | 0  |
0133 be86 9e9a  |    |
0135 9a9e 9cbe  |    |
0137 8482 a68a  |    |
0139 5c82 a0be  |\   |
013b a6ae 92a8  |    |
013d 8690 002c  |   ,|
013f 0036 82a0  | 6  |
0141 be86 9e9a  |    |
0143 9a9e 9cbe  |    |
0145 8482 a68a  |    |
0147 5c82 a0be  |\   |
0149 a6ae 92a8  |    |
014b 8690 5c9e  |  \ |
014d 9c00 02ca  |    |
014f c600 0000  |    |
0151 8000 0000  |    |
0153 0400 0001  |    |
0155 dc00 6905  |  i |
0157 417d 0d3d  |A} =|
0159 3535 3d39  |55=9|
015b 7d09 054d  |}  M|
015d 14b9 554d  |  UM|
015f 1549 7d0d  | I} |
0161 2105 48c9  |! H |
0163 08e5 985c  |   \|
0165 003d 4d51  | =MQ|
0167 0539 1105  | 9  |
0169 4910 b94d  |I  M|
016b 5149 2539  |QI%9|
016d 1d8d 8420  |    |
016f 0000 0000  |    |		.BLANK	0000[0x4]
0173 0420       |    |		.XXX[0x1]
0174 0000 0000  |    |		.BLANK	0000[0x4]
0178 0806 9e29  |   )|		.XXX[0x3]
017a 8420       |    |
017b 0000 0000  |    |		.BLANK	0000[0x4]
017f 0420       |    |		.XXX[0x1]
0180 0000 0000  |    |		.BLANK	0000[0x4]
0184 0830 0059  | 0 Y|		.XXX[0x32]
0186 4d51 0539  |MQ 9|
0188 1105 4910  |  I |
018a b90d 2105  |  ! |
018c 4905 0d51  |I  Q|
018e 1548 b89c  | H  |
0190 809c 0000  |    |
0192 0000 0000  |    |
0194 0318 0000  |    |
0196 0008 0000  |    |
0198 0210 0102  |    |
019a 0a82 fa1a  |    |
019c 7a6a 6a7a  |zjjz|
019e 72fa 120a  |r   |
01a0 9a29 720a  | )r |
01a2 82fa 9a4a  |   J|
01a4 6a9a fa0a  |j   |
01a6 922a 0afa  | *  |
01a8 9a4a d229  | J )|
01aa cb30 b800  | 0  |
01ac 829a a20a  |    |
01ae 7222 0a92  |r"  |
01b0 2172 4a72  |!rJr|
01b2 a22a 3a2a  | *:*|
01b4 9000 4000  |  @ |
01b6 0000 0000  |    |		.BLANK	0000[0x7]
01bd 0a70 0000  | p  |		.XXX[0x43]
01bf 0010 0000  |    |
01c1 0330 01b4  | 0  |
01c3 1505 f434  |   4|
01c5 f4d4 d4f4  |    |
01c7 e5f4 2415  |  $ |
01c9 3452 e415  |4R  |
01cb 05f5 3495  |  4 |
01cd a455 f545  | U E|
01cf 9504 53c6  |  S |
01d1 6170 0105  |ap  |
01d3 3544 14e4  |5D  |
01d5 4415 2442  |D $B|
01d7 e494 e544  |   D|
01d9 5474 5520  |TtU |
01db 0000 0000  |    |
01dd 0000 0008  |    |
01df 0000 0000  |    |
01e1 2000 000c  |    |
01e3 8005 882a  |   *|
01e5 0be8 69e9  |  i |
01e7 a9a9 e9cb  |    |
01e9 e848 2a68  | H*h|
01eb a5c8 2a0b  |  * |
01ed e889 2a6a  |  *j|
01ef 0988 2b2b  |  ++|
01f1 e9a8 a9ca  |    |
01f3 abe8 aa4a  |   J|
01f5 49ea 4be9  |I K |
01f7 a8aa 6a68  |  jh|
01f9 28e8 a7af  |(   |
01fb 728f d204  |r   |
01fd 6000 ca68  |`  h|
01ff 6a48       |jH  |