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

⟦b8e83dbaf⟧

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

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0060       | `  |		.CONST	0x0060								; 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 001b       |    |		.CONST	0x001b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0010       |    |		.CONST	0x0010								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1
000c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
000d 0129       | )  |		Execute	Any,Make_Visible
000e 029a 0023  |   #|		Declare_Subprogram	INIT_0020,For_Outer_Call,Visible,Unelaborated
0010 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated
0012 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated
0014 00bf       |    |		Action	Accept_Activation
0015 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0016 00c7       |    |		Action	Elaborate_Subprogram
0017 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0018 00c7       |    |		Action	Elaborate_Subprogram
0019 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
001a 00c7       |    |		Action	Elaborate_Subprogram
001b			BODY_0008:
001b 00bc       |    |		Action	Signal_Activated
001c 00bb       |    |		Action	Signal_Completion
001d 0000 0000  |    |		.XXX[0x3]
001f 0000       |    |
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0023       | #  |		.CONST	0x0023								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0001       |    |		.CONST	0x0001								; Number of locals
0023			BODY_0020:
0023			INIT_0020:
0023 4802       |H   |		Short_Literal	0x2
0024 e001       |    |		Load	0x0,0x1
0025 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0026 e5ff       |    |		Load	0x2,-0x1
0027 e5fe       |    |		Load	0x2,-0x2
0028 e001       |    |		Load	0x0,0x1
0029 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
002a 4801       |H   |		Short_Literal	0x1
002b e5fe       |    |		Load	0x2,-0x2
002c e001       |    |		Load	0x0,0x1
002d 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
002e 4800       |H   |		Short_Literal	0x0
002f 4800       |H   |		Short_Literal	0x0
0030 4800       |H   |		Short_Literal	0x0
0031 e5fe       |    |		Load	0x2,-0x2
0032 e001       |    |		Load	0x0,0x1
0033 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0034 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0035 0000 0000  |    |		.XXX[0x3]
0037 0000       |    |
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b       | ;  |		.CONST	0x003b								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0001       |    |		.CONST	0x0001								; Number of locals
003b			BODY_0038:
003b			INIT_0038:
003b 4802       |H   |		Short_Literal	0x2
003c e001       |    |		Load	0x0,0x1
003d 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
003e e5ff       |    |		Load	0x2,-0x1
003f e5fe       |    |		Load	0x2,-0x2
0040 e001       |    |		Load	0x0,0x1
0041 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0042 4800       |H   |		Short_Literal	0x0
0043 4800       |H   |		Short_Literal	0x0
0044 4800       |H   |		Short_Literal	0x0
0045 e5fe       |    |		Load	0x2,-0x2
0046 e001       |    |		Load	0x0,0x1
0047 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0048 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0049 0000 0000  |    |		.BLANK	0000[0x7]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 00da       |    |		Load_Top	At_Offset_2
0054 e001       |    |		Load	0x0,0x1
0055 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0056 6804       |h   |		Jump_Zero	0x5b
0057 00da       |    |		Load_Top	At_Offset_2
0058 e001       |    |		Load	0x0,0x1
0059 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
005a c5ff       |    |		Store	0x2,-0x1
005b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
005c 0000 0000  |    |		.BLANK	0000[0x4]
0060 ; --------------------------------------------------------------------------------------
0060 ; Debug Table
0060 ; --------------------------------------------------------------------------------------
0060 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0x91c7,0x0000,0x0001,0x0000
0066 5339 0ebd  |S9  |		.XXX[0x19a]
0068 832d f027  | - '|
006a 49c7 b13e  |I  >|
006c a50a ae8b  |    |
006e 1629 d1b7  | )  |
0070 6edd bf72  |n  r|
0072 e0a7 8f41  |   A|
0074 bb52 8151  | R Q|
0076 745b 96ae  |t[  |
0078 54b7 5c86  |T \ |
007a 041c ed30  |   0|
007c 4fe0 8b22  |O  "|
007e 9ddc 467d  |  F}|
0080 75f2 d3c7  |u   |
0082 7eba 4427  |~ D'|
0084 4e87 b31b  |N   |
0086 c914 e996  |    |
0088 4b48 a5a2  |KH  |
008a e1b1 7b15  |  { |
008c 5cef ef95  |\   |
008e 2893 3670  |( 6p|
0090 c684 2d8c  |  - |
0092 f9b1 58bd  |  X |
0094 9ed5 6f76  |  ov|
0096 e880 4963  |  Ic|
0098 b1bb 5e26  |  ^&|
009a b69b b46f  |   o|
009c f384 4605  |  F |
009e 7e7b 7064  |~{pd|
00a0 b29c d77b  |   {|
00a2 91ed 94dd  |    |
00a4 de04 9330  |   0|
00a6 70d3 58d7  |p X |
00a8 ee38 3772  | 87r|
00aa c5c2 31a6  |  1 |
00ac 73eb 93f5  |s   |
00ae 68e7 8f67  |h  g|
00b0 9c95 0858  |   X|
00b2 b3e9 8fe3  |    |
00b4 7ac2 5def  |z ] |
00b6 986b c72d  | k -|
00b8 f326 8f24  | & $|
00ba d35d 91d8  | ]  |
00bc 62dc 79ca  |b y |
00be 6e47 1e71  |nG q|
00c0 e43f d7de  | ?  |
00c2 7da1 1887  |}   |
00c4 9374 71a4  | tq |
00c6 51e1 7def  |Q } |
00c8 6657 dd65  |fW e|
00ca fd3f 0146  | ? F|
00cc 186c 5d8b  | l] |
00ce df6e 0a7c  | n ||
00d0 c7c7 1860  |   `|
00d2 71f6 0411  |q   |
00d4 63aa 45d5  |c E |
00d6 760b eb07  |v   |
00d8 de42 24a2  | B$ |
00da cbc7 1450  |   P|
00dc 9eb8 8542  |   B|
00de 20c2 fadd  |    |
00e0 7608 f238  |v  8|
00e2 5f8e 3f8d  |_ ? |
00e4 3451 186d  |4Q m|
00e6 c896 0669  |   i|
00e8 aab0 77de  |  w |
00ea 8a40 f8c9  | @  |
00ec 2054 78b5  | Tx |
00ee 9a1a 7def  |  } |
00f0 6927 a510  |i'  |
00f2 7477 e65f  |tw _|
00f4 6da2 5495  |m T |
00f6 c766 053f  | f ?|
00f8 985f 959c  | _  |
00fa 75f8 6292  |u b |
00fc 6565 f898  |ee  |
00fe 1585 9551  |   Q|
0100 a282 2f8a  |  / |
0102 c6a4 855d  |   ]|
0104 bed9 4645  |  FE|
0106 70ad aad0  |p   |
0108 9a59 dc2a  | Y *|
010a 5f9e 78df  |_ x |
010c 9ae2 8e4d  |   M|
010e d409 2889  |  ( |
0110 5d4d 009c  |]M  |
0112 75d5 fd9a  |u   |
0114 e2a1 c02e  |   .|
0116 da45 7a90  | Ez |
0118 8fb8 9e70  |   p|
011a 5473 54c6  |TsT |
011c 9e54 6198  | Ta |
011e ab8c 5d12  |  ] |
0120 5187 1872  |Q  r|
0122 60aa a2a5  |`   |
0124 1696 7b2a  |  {*|
0126 75df 8085  |u   |
0128 ea96 92ae  |    |
012a 49ab a929  |I  )|
012c f568 919a  | h  |
012e a90c c9a2  |    |
0130 aead 26d0  |  & |
0132 4718 667e  |G f~|
0134 c89e 8aaa  |    |
0136 8ed8 6ba9  |  k |
0138 0538 7164  | 8qd|
013a b209 42db  |  B |
013c 6752 bd08  |gR  |
013e 5490 b06d  |T  m|
0140 a7a3 c5b2  |    |
0142 662b 5aa8  |f+Z |
0144 b12d 736a  | -sj|
0146 62ad 96f2  |b   |
0148 78e7 b6dd  |x   |
014a 6dda 6682  |m f |
014c 4522 58ae  |E"X |
014e b56f 520b  | oR |
0150 6c96 398f  |l 9 |
0152 a2a3 ae61  |   a|
0154 d338 a9a9  | 8  |
0156 cfc7 49ac  |  I |
0158 bee6 c8bb  |    |
015a 6fad 7ff5  |o   |
015c b911 1c77  |   w|
015e c8b6 d1b6  |    |
0160 8ad2 3b69  |  ;i|
0162 b2ec 047c  |   ||
0164 efc2 d03e  |   >|
0166 5cc5 71c7  |\ q |
0168 b819 a947  |   G|
016a 1772 c5a3  | r  |
016c 6924 aaca  |i$  |
016e 63c6 906c  |c  l|
0170 ef6e c51a  | n  |
0172 9e94 5b19  |  [ |
0174 ab55 1773  | U s|
0176 8eec 948d  |    |
0178 e6c9 1482  |    |
017a 3eee af2f  |>  /|
017c 45ab 32bb  |E 2 |
017e 178e 0b71  |   q|
0180 1061 8e80  | a  |
0182 464d 7153  |FMqS|
0184 9387 8722  |   "|
0186 d5cb 73cc  |  s |
0188 6c4c 5564  |lLUd|
018a c748 3a6e  | H:n|
018c 317a 571a  |1zW |
018e fab0 cf1c  |    |
0190 d298 e3bb  |    |
0192 4ce3 6d27  |L m'|
0194 cb39 4d48  | 9MH|
0196 36b7 5d26  |6 ]&|
0198 6d72 146d  |mr m|
019a 9260 e8d2  | `  |
019c fa81 29b0  |  ) |
019e baf0 71cf  |  q |
01a0 2a1a 9e19  |*   |
01a2 075a 1ac1  | Z  |
01a4 a2bf d2d4  |    |
01a6 51bf 5205  |Q R |
01a8 6b75 bf72  |ku r|
01aa b450 65eb  | Pe |
01ac 5f2a df7c  |_* ||
01ae 5adc e8d3  |Z   |
01b0 820b 9eb7  |    |
01b2 cf86 a2e5  |    |
01b4 8188 61b2  |  a |
01b6 1d80 df7a  |   z|
01b8 10ff 79df  |  y |
01ba 914e 83c7  | N  |
01bc 1876 318d  | v1 |
01be 7be2 a241  |{  A|
01c0 6df1 db69  |m  i|
01c2 98b1 fb44  |   D|
01c4 6f82 da84  |o   |
01c6 0055 24f1  | U$ |
01c8 4548 4ab1  |EHJ |
01ca 4d44 1a56  |MD V|
01cc aeed 8110  |    |
01ce 69e1 f250  |i  P|
01d0 ec51 fafc  | Q  |
01d2 7bef b2d7  |{   |
01d4 7eb8 afae  |~   |
01d6 efdd 3b1b  |  ; |
01d8 bf07 0cb9  |    |
01da ec22 d34d  | " M|
01dc 91f3 b919  |    |
01de f2d7 cbab  |    |
01e0 08fc 7ef7  |  ~ |
01e2 b6e1 1d7f  |    |
01e4 f46f 5d1f  | o] |
01e6 7da8 6171  |} aq|
01e8 6852 1064  |hR d|
01ea f0e5 3ef3  |  > |
01ec d374 8dbf  | t  |
01ee f7c7 0e65  |   e|
01f0 28f8 6c58  |( lX|
01f2 5604 1c73  |V  s|
01f4 66bf 3cf7  |f < |
01f6 f37e 1f3f  | ~ ?|
01f8 ebe3 97ee  |    |
01fa 0844 2888  | D( |
01fc 5bd5 06bd  |[   |
01fe e3b7 4f77  |  Ow|