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

⟦caea78bd5⟧

    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
    └─ ⟦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 001e       |    |		.CONST	0x001e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0011       |    |		.CONST	0x0011								; Number of locals
000b			INIT_0008:
000b 00e3       |    |		Load_Encached	Natural_Cache
000c 0129       | )  |		Execute	Any,Make_Visible
000d 029a 0023  |   #|		Declare_Subprogram	INIT_0020,For_Outer_Call,Visible,Unelaborated
000f 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated
0011 029a 0043  |   C|		Declare_Subprogram	INIT_0040,For_Outer_Call,Visible,Unelaborated
0013 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated
0015 00bf       |    |		Action	Accept_Activation
0016 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0017 00c7       |    |		Action	Elaborate_Subprogram
0018 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0019 00c7       |    |		Action	Elaborate_Subprogram
001a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
001b 00c7       |    |		Action	Elaborate_Subprogram
001c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
001d 00c7       |    |		Action	Elaborate_Subprogram
001e			BODY_0008:
001e 00bc       |    |		Action	Signal_Activated
001f 00bb       |    |		Action	Signal_Completion
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0023       | #  |		.CONST	0x0023								; Address of begin
0021 0027       | '  |		.CONST	0x0027								; Address of exception handler
0022 0001       |    |		.CONST	0x0001								; Number of locals
0023			BODY_0020:
0023			INIT_0020:
0023 e5ff       |    |		Load	0x2,-0x1
0024 e001       |    |		Load	0x0,0x1
0025 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0026 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0027			TRAP_0020:
0027 4884       |H   |		Short_Literal	0x84
0028 010f       |    |		Execute	Exception,Equal
0029 6802       |h   |		Jump_Zero	0x2c
002a 4800       |H   |		Short_Literal	0x0
002b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
002c 0100       |    |		Execute	Exception,Raise
002d 0000 0000  |    |		.XXX[0x3]
002f 0000       |    |
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0033       | 3  |		.CONST	0x0033								; Address of begin
0031 0039       | 9  |		.CONST	0x0039								; Address of exception handler
0032 0001       |    |		.CONST	0x0001								; Number of locals
0033			BODY_0030:
0033			INIT_0030:
0033 e5fd       |    |		Load	0x2,-0x3
0034 e5fe       |    |		Load	0x2,-0x2
0035 e5ff       |    |		Load	0x2,-0x1
0036 e001       |    |		Load	0x0,0x1
0037 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0038 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0039			TRAP_0030:
0039 4884       |H   |		Short_Literal	0x84
003a 010f       |    |		Execute	Exception,Equal
003b 6802       |h   |		Jump_Zero	0x3e
003c 4801       |H   |		Short_Literal	0x1
003d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
003e 0100       |    |		Execute	Exception,Raise
003f 0000       |    |		.XXX[0x1]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043       | C  |		.CONST	0x0043								; Address of begin
0041 0047       | G  |		.CONST	0x0047								; Address of exception handler
0042 0001       |    |		.CONST	0x0001								; Number of locals
0043			BODY_0040:
0043			INIT_0040:
0043 e5ff       |    |		Load	0x2,-0x1
0044 e001       |    |		Load	0x0,0x1
0045 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0046 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0047			TRAP_0040:
0047 4884       |H   |		Short_Literal	0x84
0048 010f       |    |		Execute	Exception,Equal
0049 6802       |h   |		Jump_Zero	0x4c
004a 4801       |H   |		Short_Literal	0x1
004b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
004c 0100       |    |		Execute	Exception,Raise
004d 0000 0000  |    |		.XXX[0x3]
004f 0000       |    |
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0058       | X  |		.CONST	0x0058								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 e5fe       |    |		Load	0x2,-0x2
0054 e5ff       |    |		Load	0x2,-0x1
0055 e001       |    |		Load	0x0,0x1
0056 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0057 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0058			TRAP_0050:
0058 4884       |H   |		Short_Literal	0x84
0059 010f       |    |		Execute	Exception,Equal
005a 6801       |h   |		Jump_Zero	0x5c
005b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
005c 0100       |    |		Execute	Exception,Raise
005d 0000 0000  |    |		.XXX[0x3]
005f 0000       |    |
0060 ; --------------------------------------------------------------------------------------
0060 ; Debug Table
0060 ; --------------------------------------------------------------------------------------
0060 0004 000c  |    |		.DEBUG4	0x0004,0x000c,0xa51c,0x0000,0x0001,0x0000
0066 d09b 1bd8  |    |		.XXX[0x19a]
0068 dadc c000  |    |
006a 001c 4000  |  @ |
006c 0005 5cde  |  \ |
006e 5cdd 195b  |\  [|
0070 57dd 5d1a  |W ] |
0072 5b1a 5d1a  |[ ] |
0074 595c cb9d  |Y\  |
0076 185c 1940  | \ @|
0078 0000 0080  |    |
007a 0000 3500  |  5 |
007c 0000 0e10  |    |
007e aa37 b7b6  | 7  |
0080 3997 29bc  |9 ) |
0082 b9ba 32b6  |  2 |
0084 afaa ba34  |   4|
0086 b634 ba34  | 4 4|
0088 b2b9 972a  |   *|
008a 30b8 3280  |0 2 |
008c 0000 3380  |  3 |
008e 0000 10ba  |    |
0090 32b9 36b4  |2 6 |
0092 b730 b617  | 0  |
0094 39b2 ba2f  |9  /|
0096 b232 ba30  | 2 0|
0098 b1b4 2fb7  |  / |
009a b72f b234  | / 4|
009c b9b1 b7b7  |    |
009e 3732 b1ba  |72  |
00a0 0000 0001  |    |
00a2 0000 005d  |   ]|
00a4 0000 002b  |   +|
00a6 2143 6f6d  |!Com|
00a8 6d61 6e64  |mand|
00aa 732e 5465  |s.Te|
00ac 726d 696e  |rmin|
00ae 616c 2e53  |al.S|
00b0 6574 5f44  |et_D|
00b2 6574 6163  |etac|
00b4 685f 4f6e  |h_On|
00b6 5f44 6973  |_Dis|
00b8 636f 6e6e  |conn|
00ba 6563 7400  |ect |
00bc 0000 1000  |    |
00be 0000 1774  |   t|
00c0 6162 6c65  |able|
00c2 5f66 6f72  |_for|
00c4 6d61 7474  |matt|
00c6 6572 2e64  |er.d|
00c8 6973 706c  |ispl|
00ca 6179 0000  |ay  |
00cc 0002 0000  |    |
00ce 0012 0000  |    |
00d0 003c 42a8  | <B |
00d2 dede d8e6  |    |
00d4 5ca8 c2c4  |\   |
00d6 d8ca be8c  |    |
00d8 dee4 dac2  |    |
00da e8e8 cae4  |    |
00dc 5c88 d2e6  |\   |
00de e0d8 c2f2  |    |
00e0 0000 00e6  |    |
00e2 0000 0044  |   D|
00e4 e6f2 e6e8  |    |
00e6 cada beea  |    |
00e8 e8d2 d8d2  |    |
00ea e8d2 cae6  |    |
00ec 5ce8 cae4  |\   |
00ee dad2 dcc2  |    |
00f0 d8be d2e8  |    |
00f2 cae4 c2e8  |    |
00f4 dee4 0000  |    |
00f6 0004 0000  |    |
00f8 01b0 0000  |    |
00fa 00a4 8551  |   Q|
00fc bdbd b1cc  |    |
00fe b94d e5cd  | M  |
0100 d195 b57d  |   }|
0102 55d1 a5b1  |U   |
0104 a5d1 a595  |    |
0106 ccb9 5195  |  Q |
0108 c9b5 a5b9  |    |
010a 85b1 7d25  |  }%|
010c d195 c985  |    |
010e d1bd c800  |    |
0110 0002 0800  |    |
0112 0000 51d1  |  Q |
0114 95c9 b5a5  |    |
0116 b985 b0b9  |    |
0118 c185 c9a5  |    |
011a d1e5 7dad  |  } |
011c a5b9 9000  |    |
011e 0000 0800  |    |
0120 0003 c000  |    |
0122 0000 f10a  |    |
0124 1b7b 6b6b  | {kk|
0126 0b73 2399  | s# |
0128 72a3 2b93  |r + |
012a 6b4b 730b  |kKs |
012c 6172 830b  |ar  |
012e 934b a3ca  | K  |
0130 fa5b 4b73  | [Ks|
0132 2000 0000  |    |
0134 8000 0001  |    |
0136 2ba3 0b13  |+   |
0138 632a fb9b  |c*  |
013a 7b93 a2fb  |{   |
013c 3b2b 732b  |;+s+|
013e 934b 1973  | K s|
0140 a30b 1363  |   c|
0142 2afb 9b7b  |*  {|
0144 93a2 fb3b  |   ;|
0146 2b73 2b93  |+s+ |
0148 4b18 0000  |K   |
014a 0010 0000  |    |
014c 0090 0000  |    |
014e 02c2 1546  |   F|
0150 f6f6 c732  |   2|
0152 e546 1626  | F &|
0154 c655 f536  | U 6|
0156 f727 45f4  | 'E |
0158 7656 e657  |vV W|
015a 2696 32e5  |& 2 |
015c 4616 26c6  |F & |
015e 55f5 36f7  |U 6 |
0160 2745 f476  |'E v|
0162 56e6 5726  |V W&|
0164 9630 0000  | 0  |
0166 0130 0000  | 0  |
0168 0117 4656  |  FV|
016a c6e6 5742  |  WB|
016c e736 56e6  | 6V |
016e 45f6 2726  |E '&|
0170 5616 b000  |V   |
0172 0000 2000  |    |
0174 0001 2000  |    |
0176 0003 6428  |  d(|
0178 6ded adac  |m   |
017a 2dcc 8e65  |-  e|
017c ca8c ad8d  |    |
017e ccae 85ca  |    |
0180 6cad cc8b  |l   |
0182 e84e 4cac  | NL |
0184 2d60 0000  |-`  |
0186 1120 0000  |    |
0188 036e 8cae  | n  |
018a 4dad 2dcc  |M - |
018c 2d85 ce6c  |-  l|
018e ae8b ec6d  |   m|
0190 0c2e 4c2c  | .L,|
0192 6e8c ae4b  |n  K|
0194 ee6d 2f4c  | m/L|
0196 a000 0000  |    |
0198 4000 001f  |@   |
019a c000 0009  |    |
019c 4850 dbdb  |HP  |
019e 5b58 5b99  |[X[ |
01a0 1ccb 9519  |    |
01a2 5c9b 5a5b  |\ Z[|
01a4 985b 0b94  | [  |
01a6 d95d 17d0  | ]  |
01a8 da18 5c98  |  \ |
01aa 58dd 195c  |X  \|
01ac 97d4 da5e  |   ^|
01ae 9940 0000  | @  |
01b0 1780 0000  |    |
01b2 059d 195c  |   \|
01b4 9b5a 5b98  | Z[ |
01b6 5b0b 9cd9  |[   |
01b8 5d17 dcdd  |]   |
01ba 1bdc 17d8  |    |
01bc 9a5d 1cc0  | ]  |
01be 0000 0080  |    |
01c0 0000 2a00  |  * |
01c2 0000 1010  |    |
01c4 a1b7 b6b6  |    |
01c6 b0b7 3239  |  29|
01c8 972a 32b9  | *2 |
01ca 36b4 b730  |6  0|
01cc b617 29b2  |  ) |
01ce ba2f a9ba  | /  |
01d0 37b8 2fa1  |7 / |
01d2 34ba 3980  |4 9 |
01d4 0000 2180  |  ! |
01d6 0000 10ba  |    |
01d8 32b9 36b4  |2 6 |
01da b730 b617  | 0  |
01dc 39b2 ba2f  |9  /|
01de b637 b3b7  | 7  |
01e0 b333 2fb7  | 3/ |
01e2 b72f b234  | / 4|
01e4 b9b1 b7b7  |    |
01e6 3732 b1ba  |72  |
01e8 0000 0001  |    |
01ea 0000 0039  |   9|
01ec 0000 002b  |   +|
01ee 2143 6f6d  |!Com|
01f0 6d61 6e64  |mand|
01f2 732e 5465  |s.Te|
01f4 726d 696e  |rmin|
01f6 616c 2e53  |al.S|
01f8 6574 5f4c  |et_L|
01fa 6f67 6f66  |ogof|
01fc 665f 4f6e  |f_On|
01fe 5f44 6973  |_Dis|