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

⟦bb2e7e6d1⟧

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

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 0058       | X  |		.CONST	0x0058								; 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 0023  |   #|		Declare_Subprogram	INIT_0020,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 0092 0024  |   $|		Action	Push_String_Extended,0x24					; "!Machine.Error_Logs.Rci_Compiler_Log"
0012 e001       |    |		Load	0x0,0x1
0013 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0014 e002       |    |		Load	0x0,0x2
0015 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0016 4802       |H   |		Short_Literal	0x2
0017 0092 0025  |   %|		Action	Push_String_Extended,0x25					; "Setting Program_Library_Manager.Force_Destroy := False"
0019 e001       |    |		Load	0x0,0x1
001a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
001b 4800       |H   |		Short_Literal	0x0
001c e003       |    |		Load	0x0,0x3
001d 1a20       |    |		Execute	Package,Field_Write,Field_Number 0x20
001e 00bc       |    |		Action	Signal_Activated
001f 00bb       |    |		Action	Signal_Completion
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 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0024 ; --------------------------------------------------------------------------------------
0024 ; STRING TABLE
0024 ; --------------------------------------------------------------------------------------
0024 0006       |    |		.STRTAB	0x0006->0x0027							; "!Machine.Error_Logs.Rci_Compiler_Log"
0025 0028       | (  |		.STRTAB	0x0028->0x0039							; "Setting Program_Library_Manager.Force_Destroy := False"
0026 005c       | \  |		.STREND 0x005c->0x0054
0027 214d 6163  |!Mac|		.STRTAB_STRINGS
0054 0000 0000  |    |		.BLANK	0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0x18a2,0x0000,0x0001,0x0000
005e 1115 3951  |  9Q|		.XXX[0x1a2]
0060 7d0d 2105  |} ! |
0062 4905 0d51  |I  Q|
0064 1549 254d  | I%M|
0066 5125 0d4c  |Q% L|
0068 b951 0549  | Q I|
006a 1d15 517d  |  Q}|
006c 0d3d 3541  | =5A|
006e 2531 1548  |%1 H|
0070 0000 0001  |    |
0072 4402 1c00  |D   |
0074 b951 0549  | Q I|
0076 1d15 517d  |  Q}|
0078 1115 4115  |  A |
007a 3911 1539  |9  9|
007c 517d 0d21  |Q} !|
007e 0549 050d  | I  |
0080 5115 4925  |Q I%|
0082 4d51 250d  |MQ% |
0084 4cb9 3955  |L 9U|
0086 3131 7d2d  |11}-|
0088 1565 7d11  | e} |
008a 0551 04e1  | Q  |
008c 985c 0065  | \ e|
008e 5105 491d  |Q I |
0090 1551 7d11  | Q} |
0092 1541 1539  | A 9|
0094 1115 3950  |  9P|
0096 b92d 1565  | - e|
0098 7d11 0551  |}  Q|
009a 0400 069e  |    |
009c 285c 0029  |(\ )|
009e 5105 491d  |Q I |
00a0 1551 7d2d  | Q}-|
00a2 1564 5c00  | d\ |
00a4 1d39 2531  | 9%1|
00a6 7d2d 1566  |}- f|
00a8 9e28 5c00  | (\ |
00aa 3551 0955  |5Q U|
00ac 7d0d 3d35  |} =5|
00ae 413d 3915  |A=9 |
00b0 3950 5c00  |9P\ |
00b2 2539 5531  |%9U1|
00b4 317d 2539  |1}%9|
00b6 193c 0000  | <  |
00b8 0184 0274  |   t|
00ba 00bd 5105  |  Q |
00bc 491d 1551  |I  Q|
00be 7d11 1541  |}  A|
00c0 1539 1115  | 9  |
00c2 3951 7d0d  |9Q} |
00c4 2105 4905  |! I |
00c6 0d51 1549  | Q I|
00c8 254d 5125  |%MQ%|
00ca 0d4c b949  | L I|
00cc 1535 3d51  | 5=Q|
00ce 157d 3505  | }5 |
00d0 0d21 2539  | !%9|
00d2 14f5 ea51  |   Q|
00d4 fa40 8c00  | @  |
00d6 0d2d 1564  | - d|
00d8 5c00 212d  |\ !-|
00da 1565 7d11  | e} |
00dc 0551 0401  | Q  |
00de fa40 8c00  | @  |
00e0 1159 2515  | Y% |
00e2 5c5c 0041  |\\ A|
00e4 1125 4915  | %I |
00e6 0d51 3d49  | Q=I|
00e8 64b9 3d09  |d = |
00ea 2915 0d50  |)  P|
00ec 01fa 408c  |  @ |
00ee 0011 4915  |  I |
00f0 4d40 5c00  |M@\ |
00f2 6141 493d  |aAI=|
00f4 1925 3114  | %1 |
00f6 b949 154d  | I M|
00f8 413d 394d  |A=9M|
00fa 157d 4149  | }AI|
00fc 3d19 2531  |= %1|
00fe 1400 5c00  |  \ |
0100 3d4d 5105  |=MQ |
0102 3911 0549  |9  I|
0104 10b9 4d51  |  MQ|
0106 4925 391c  |I%9 |
0108 0000 0000  |    |
010a 6c03 4000  |l @ |
010c c551 0549  | Q I|
010e 1d15 517d  |  Q}|
0110 1115 4115  |  A |
0112 3911 1539  |9  9|
0114 517d 0d21  |Q} !|
0116 0549 050d  | I  |
0118 5115 4925  |Q I%|
011a 4d51 250d  |MQ% |
011c 4cb9 1955  |L  U|
011e 3131 7d51  |11}Q|
0120 0549 1d15  | I  |
0122 517d 3905  |Q}9 |
0124 3514 f5ea  |5   |
0126 51fa 408c  |Q @ |
0128 000d 2d15  |  - |
012a 645c 00a5  |d\  |
012c 5105 491d  |Q I |
012e 1551 7d11  | Q} |
0130 1541 1539  | A 9|
0132 1115 3951  |  9Q|
0134 7d0d 2105  |} ! |
0136 4905 0d51  |I  Q|
0138 1549 254d  | I%M|
013a 5125 0d4c  |Q% L|
013c b92d 1565  | - e|
013e 7d11 0551  |}  Q|
0140 0401 fa40  |   @|
0142 8c00 494d  |  IM|
0144 2535 4131  |%5A1|
0146 157d 5105  | }Q |
0148 491d 1551  |I  Q|
014a 7d39 0535  |}9 5|
014c 145c 003d  | \ =|
014e 4d51 0539  |MQ 9|
0150 1105 4910  |  I |
0152 b94d 5149  | MQI|
0154 2539 1c01  |%9  |
0156 fa40 8c00  | @  |
0158 4149 1535  |AI 5|
015a 3d51 157d  |=Q }|
015c 1125 4915  | %I |
015e 0d51 3d49  | Q=I|
0160 645c 003d  |d\ =|
0162 4d51 0539  |MQ 9|
0164 1105 4910  |  I |
0166 b94d 5149  | MQI|
0168 2539 1c00  |%9  |
016a 5c00 3d4d  |\ =M|
016c 5105 3911  |Q 9 |
016e 0549 10b9  | I  |
0170 4d51 4925  |MQI%|
0172 391c 0000  |9   |
0174 0001 6401  |  d |
0176 7800 b151  |x  Q|
0178 0549 1d15  | I  |
017a 517d 1115  |Q}  |
017c 4115 3911  |A 9 |
017e 1539 517d  | 9Q}|
0180 0d21 0549  | ! I|
0182 050d 5115  |  Q |
0184 4925 4d51  |I%MQ|
0186 250d 4cb9  |% L |
0188 4d55 1919  |MU  |
018a 2561 7d51  |%a}Q|
018c 6541 14ee  |eA  |
018e 65b8 c400  |e   |
0190 2105 1105  |!   |
0192 7d4d 4115  |}MA |
0194 0cc4 0021  |   !|
0196 0511 057d  |   }|
0198 093d 1164  | = d|
019a c400 254d  |  %M|
019c 150d 3d39  |  =9|
019e 1105 4964  |  Id|
01a0 c400 1d55  |   U|
01a2 392d 393d  |9-9=|
01a4 5d38 0000  |]8  |
01a6 0001 0802  |    |
01a8 2400 b951  |$  Q|
01aa 0549 1d15  | I  |
01ac 517d 1115  |Q}  |
01ae 4115 3911  |A 9 |
01b0 1539 517d  | 9Q}|
01b2 0d21 0549  | ! I|
01b4 050d 5115  |  Q |
01b6 4925 4d51  |I%MQ|
01b8 250d 4cb9  |% L |
01ba 3505 0d21  |5  !|
01bc 2539 157d  |%9 }|
01be 2535 051d  |%5  |
01c0 14f5 ea51  |   Q|
01c2 fa40 8c00  | @  |
01c4 2d19 3d49  |- =I|
01c6 7d35 050d  |}5  |
01c8 2125 3914  |!%9 |
01ca 5c00 bd51  |\  Q|
01cc 0549 1d15  | I  |
01ce 517d 1115  |Q}  |
01d0 4115 3911  |A 9 |
01d2 1539 517d  | 9Q}|
01d4 0d21 0549  | ! I|
01d6 050d 5115  |  Q |
01d8 4925 4d51  |I%MQ|
01da 250d 4cb9  |% L |
01dc 5105 491d  |Q I |
01de 1551 7d35  | Q}5|
01e0 050d 2125  |  !%|
01e2 3914 005c  |9  \|
01e4 003d 4d51  | =MQ|
01e6 0539 1105  | 9  |
01e8 4910 b94d  |I  M|
01ea 5149 2539  |QI%9|
01ec 1c00 0000  |    |
01ee 00c0 0210  |    |
01f0 00dd 5105  |  Q |
01f2 491d 1551  |I  Q|
01f4 7d11 1541  |}  A|
01f6 1539 1115  | 9  |
01f8 3951 7d0d  |9Q} |
01fa 2105 4905  |! I |
01fc 0d51 1549  | Q I|
01fe 254d 5125  |%MQ%|