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

⟦7ba8454ca⟧

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

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 0088       |    |		.CONST	0x0088								; 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 005e       | ^  |		.CONST	0x005e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0016       |    |		.CONST	0x0016								; Number of locals
000b			INIT_0008:
000b e002       |    |		Load	0x0,0x2
000c 00d8       |    |		Load_Top	At_Offset_0
000d e003       |    |		Load	0x0,0x3
000e e002       |    |		Load	0x0,0x2
000f 00d8       |    |		Load_Top	At_Offset_0
0010 e004       |    |		Load	0x0,0x4
0011 e005       |    |		Load	0x0,0x5
0012 e006       |    |		Load	0x0,0x6
0013 e007       |    |		Load	0x0,0x7
0014 02a0       |    |		Declare_Subprogram	Null_Subprogram
0015 4809       |H   |		Short_Literal	0x9
0016 032e       | .  |		Declare_Type	Record,Defined,Visible
0017 00e1       |    |		Load_Encached	Boolean_Cache
0018 00e1       |    |		Load_Encached	Boolean_Cache
0019 e002       |    |		Load	0x0,0x2
001a 02a0       |    |		Declare_Subprogram	Null_Subprogram
001b 4803       |H   |		Short_Literal	0x3
001c 032e       | .  |		Declare_Type	Record,Defined,Visible
001d 4800       |H   |		Short_Literal	0x0
001e 481f       |H   |		Short_Literal	0x1f
001f 00da       |    |		Load_Top	At_Offset_2
0020 02a0       |    |		Declare_Subprogram	Null_Subprogram
0021 4801       |H   |		Short_Literal	0x1
0022 035e       | ^  |		Declare_Type	Array,Defined,Visible
0023 00e1       |    |		Load_Encached	Boolean_Cache
0024 00e1       |    |		Load_Encached	Boolean_Cache
0025 e002       |    |		Load	0x0,0x2
0026 00d8       |    |		Load_Top	At_Offset_0
0027 e20f       |    |		Load	0x1,0xf
0028 02a0       |    |		Declare_Subprogram	Null_Subprogram
0029 4805       |H   |		Short_Literal	0x5
002a 032e       | .  |		Declare_Type	Record,Defined,Visible
002b 00e1       |    |		Load_Encached	Boolean_Cache
002c 00e1       |    |		Load_Encached	Boolean_Cache
002d 02a0       |    |		Declare_Subprogram	Null_Subprogram
002e 4802       |H   |		Short_Literal	0x2
002f 032e       | .  |		Declare_Type	Record,Defined,Visible
0030 e006       |    |		Load	0x0,0x6
0031 00e1       |    |		Load_Encached	Boolean_Cache
0032 00e1       |    |		Load_Encached	Boolean_Cache
0033 02a0       |    |		Declare_Subprogram	Null_Subprogram
0034 4803       |H   |		Short_Literal	0x3
0035 032e       | .  |		Declare_Type	Record,Defined,Visible
0036 4850       |HP  |		Short_Literal	0x50
0037 e008       |    |		Load	0x0,0x8
0038 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0039 1c07       |    |		Execute_Immediate	Run_Utility,0x7
003a 0129       | )  |		Execute	Any,Make_Visible
003b e009       |    |		Load	0x0,0x9
003c 00e1       |    |		Load_Encached	Boolean_Cache
003d 00e1       |    |		Load_Encached	Boolean_Cache
003e 00e2       |    |		Load_Encached	Integer_Cache
003f 00e2       |    |		Load_Encached	Integer_Cache
0040 e002       |    |		Load	0x0,0x2
0041 00d8       |    |		Load_Top	At_Offset_0
0042 029f 0063  |   c|		Declare_Subprogram	INIT_0060,For_Call
0044 4808       |H   |		Short_Literal	0x8
0045 032e       | .  |		Declare_Type	Record,Defined,Visible
0046 e002       |    |		Load	0x0,0x2
0047 00d8       |    |		Load_Top	At_Offset_0
0048 e002       |    |		Load	0x0,0x2
0049 00d8       |    |		Load_Top	At_Offset_0
004a e002       |    |		Load	0x0,0x2
004b 00d8       |    |		Load_Top	At_Offset_0
004c e002       |    |		Load	0x0,0x2
004d 00d8       |    |		Load_Top	At_Offset_0
004e e006       |    |		Load	0x0,0x6
004f e210       |    |		Load	0x1,0x10
0050 e212       |    |		Load	0x1,0x12
0051 e213       |    |		Load	0x1,0x13
0052 e211       |    |		Load	0x1,0x11
0053 029f 007b  |   {|		Declare_Subprogram	INIT_0078,For_Call
0055 480d       |H   |		Short_Literal	0xd
0056 032e       | .  |		Declare_Type	Record,Defined,Visible
0057 00d8       |    |		Load_Top	At_Offset_0
0058 0321       | !  |		Declare_Variable	Record,Visible
0059 00d8       |    |		Load_Top	At_Offset_0
005a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
005b e20d       |    |		Load	0x1,0xd
005c 0321       | !  |		Declare_Variable	Record,Visible
005d 00bf       |    |		Action	Accept_Activation
005e			BODY_0008:
005e 00bc       |    |		Action	Signal_Activated
005f 00bb       |    |		Action	Signal_Completion
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063       | c  |		.CONST	0x0063								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0001       |    |		.CONST	0x0001								; Number of locals
0063			BODY_0060:
0063			INIT_0060:
0063 4601       |F   |		Jump_Case	0x2
0064 7801       |x   |		Jump	0x66								; case 0x0
0065 7807       |x   |		Jump	0x6d								; case 0x1
0066 00da       |    |		Load_Top	At_Offset_2
0067 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0068 0125       | %  |		Execute	Any,Set_Constraint
0069 00da       |    |		Load_Top	At_Offset_2
006a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
006b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
006c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
006d 00da       |    |		Load_Top	At_Offset_2
006e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
006f 0125       | %  |		Execute	Any,Set_Constraint
0070 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0071 0000 0000  |    |		.BLANK	0000[0x7]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b       | {  |		.CONST	0x007b								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 0001       |    |		.CONST	0x0001								; Number of locals
007b			BODY_0078:
007b			INIT_0078:
007b 4601       |F   |		Jump_Case	0x2
007c 7801       |x   |		Jump	0x7e								; case 0x0
007d 7804       |x   |		Jump	0x82								; case 0x1
007e 00da       |    |		Load_Top	At_Offset_2
007f 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
0080 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0081 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0082 00da       |    |		Load_Top	At_Offset_2
0083 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
0084 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0085 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0086 0000 0000  |    |		.XXX[0x2]
0088 ; --------------------------------------------------------------------------------------
0088 ; Debug Table
0088 ; --------------------------------------------------------------------------------------
0088 0004 0011  |    |		.DEBUG4	0x0004,0x0011,0x345d,0x0000,0x0001,0x0000
008e abea 49e9  |  I |		.XXX[0x39]
0090 ea8b e9e8  |    |
0092 cbe8 2bea  |  + |
0094 c928 aae0  | (  |
0096 0000 07c0  |    |
0098 0000 0249  |   I|
009a c8aa 8ae9  |    |
009c ea49 6bea  | Ik |
009e 0aa8 4989  |  I |
00a0 2867 a7ca  |(g  |
00a2 4ae0 0000  |J   |
00a4 0080 0000  |    |
00a6 0000 0d9a  |    |
00a8 a280 0000  |    |
00aa 0040 0000  | @  |
00ac 0040 0000  | @  |
00ae 0080 0000  |    |
00b0 0180 012a  |   *|
00b2 9900 0000  |    |
00b4 01c0 0000  |    |
00b6 00c0 0095  |    |
00b8 4c80 0000  |L   |
00ba 0080 0000  |    |
00bc 0180 012a  |   *|
00be 9900 0000  |    |
00c0 011c c34d  |   M|
00c2 0b00 0000  |    |
00c4 8080 0003  |    |
00c6 63c0       |c   |
00c7 0000 0000  |    |		.BLANK	0000[0x4]
00cb 0003 63e0  |  c |		.XXX[0x135]
00cd 0000 0420  |    |
00cf 0000 00c0  |    |
00d1 0000 0000  |    |
00d3 0d9b 5280  |  R |
00d5 0000 0040  |   @|
00d7 0000 0080  |    |
00d9 0000 0100  |    |
00db 0000 0180  |    |
00dd 012a 9900  | *  |
00df 0000 0100  |    |
00e1 0000 0200  |    |
00e3 0000 0600  |    |
00e5 04aa 6800  |  h |
00e7 0000 0400  |    |
00e9 0000 0800  |    |
00eb 0000 0001  |    |
00ed b377 2800  | w( |
00ef 0000 0800  |    |
00f1 0000 0800  |    |
00f3 0000 2000  |    |
00f5 0000 3000  |  0 |
00f7 2553 2000  |%S  |
00f9 0000 3ff3  |  ? |
00fb e000 0000  |    |
00fd 0000 0000  |    |
00ff 1000 0001  |    |
0101 2000 2a73  |  *s|
0103 c000 0000  |    |
0105 6000 0000  |`   |
0107 0006 cd2b  |   +|
0109 73f0 cb91  |s   |
010b 8000 0400  |    |
010d 0000 0000  |    |
010f d996 0000  |    |
0111 0001 4800  |  H |
0113 0000 f085  |    |
0115 513d 3d31  |Q==1|
0117 4cb9 1151  |L  Q|
0119 2505 7d49  |% }I|
011b 410d 7d35  |A }5|
011d 150d 2105  |  ! |
011f 3925 4d35  |9%M5|
0121 4cb9 4915  |L I |
0123 58c4 c57c  |X  ||
0125 d17d 4d41  | }MA|
0127 150c b94d  |   M|
0129 5105 5114  |Q Q |
012b b905 0d0d  |    |
012d 154d 4d7d  | MM}|
012f 0d3d 3951  | =9Q|
0131 493d 3000  |I=0 |
0133 0001 0800  |    |
0135 0000 4939  |  I9|
0137 1551 5d3d  | Q]=|
0139 492d 7d41  |I-}A|
013b 5509 3125  |U 1%|
013d 0cf4 f949  |   I|
013f 5c00 0001  |\   |
0141 5800 0000  |X   |
0143 fc85 513d  |  Q=|
0145 3d31 4cb9  |=1L |
0147 1151 2505  | Q% |
0149 7d49 410d  |}IA |
014b 7d35 150d  |}5  |
014d 2105 3925  |! 9%|
014f 4d35 4cb9  |M5L |
0151 4915 58c4  |I X |
0153 c57c d17d  | | }|
0155 4d41 150c  |MA  |
0157 b94d 5105  | MQ |
0159 5114 b90d  |Q   |
015b 3d35 4125  |=5A%|
015d 3115 497d  |1 I}|
015f 4d5d 2551  |M]%Q|
0161 0d21 154c  | ! L|
0163 0000 00e0  |    |
0165 0000 0049  |   I|
0167 3915 515d  |9 Q]|
0169 3d49 2d7d  |=I-}|
016b 4155 0931  |AU 1|
016d 250c f4f9  |%   |
016f 495c 0000  |I\  |
0171 0034 0000  | 4  |
0173 00d4 8551  |   Q|
0175 3d3d 314c  |==1L|
0177 b911 5125  |  Q%|
0179 057d 4941  | }IA|
017b 0d7d 3515  | }5 |
017d 0d21 0539  | ! 9|
017f 254d 354c  |%M5L|
0181 b949 1558  | I X|
0183 c4c5 7cd1  |  | |
0185 7d4d 4115  |}MA |
0187 0cb9 4d51  |  MQ|
0189 0551 14b9  | Q  |
018b 1561 413d  | aA=|
018d 4951 4c00  |IQL |
018f 0001 a400  |    |
0191 0000 4939  |  I9|
0193 1551 5d3d  | Q]=|
0195 492d 7d41  |I-}A|
0197 5509 3125  |U 1%|
0199 0cf4 f949  |   I|
019b 5c00 0001  |\   |
019d f400 0000  |    |
019f d485 513d  |  Q=|
01a1 3d31 4cb9  |=1L |
01a3 1151 2505  | Q% |
01a5 7d49 410d  |}IA |
01a7 7d35 150d  |}5  |
01a9 2105 3925  |! 9%|
01ab 4d35 4cb9  |M5L |
01ad 4915 58c4  |I X |
01af c57c d17d  | | }|
01b1 4d41 150c  |MA  |
01b3 b94d 5105  | MQ |
01b5 5114 b925  |Q  %|
01b7 3541 3d49  |5A=I|
01b9 514c 0000  |QL  |
01bb 016c 0000  | l  |
01bd 0049 3915  | I9 |
01bf 515d 3d49  |Q]=I|
01c1 2d7d 4155  |-}AU|
01c3 0931 250c  | 1% |
01c5 f4f9 495c  |  I\|
01c7 0000 01c0  |    |
01c9 0000 00ec  |    |
01cb 8551 3d3d  | Q==|
01cd 314c b911  |1L  |
01cf 5125 057d  |Q% }|
01d1 4941 0d7d  |IA }|
01d3 3515 0d21  |5  !|
01d5 0539 254d  | 9%M|
01d7 354c b949  |5L I|
01d9 1558 c4c5  | X  |
01db 7cd1 7d4d  || }M|
01dd 4115 0cb9  |A   |
01df 4d51 0551  |MQ Q|
01e1 14b9 2535  |  %5|
01e3 413d 4951  |A=IQ|
01e5 4d7d 2535  |M}%5|
01e7 051d 1400  |    |
01e9 0001 4800  |  H |
01eb 0000 4939  |  I9|
01ed 1551 5d3d  | Q]=|
01ef 492d 7d41  |I-}A|
01f1 5509 3125  |U 1%|
01f3 0cf4 f949  |   I|
01f5 5c00 0001  |\   |
01f7 9800 0000  |    |
01f9 fc85 513d  |  Q=|
01fb 3d31 4cb9  |=1L |
01fd 1151 2505  | Q% |
01ff 7d49       |}I  |