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

⟦2072f084d⟧

    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 00b0       |    |		.CONST	0x00b0								; 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 0017       |    |		.CONST	0x0017								; Address of begin
0009 0026       | &  |		.CONST	0x0026								; Address of exception handler
000a 000f       |    |		.CONST	0x000f								; Number of locals
000b			INIT_0008:
000b 4802       |H   |		Short_Literal	0x2
000c 02cb       |    |		Declare_Variable	Entry
000d 00bf       |    |		Action	Accept_Activation
000e e001       |    |		Load	0x0,0x1
000f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0010 02c7       |    |		Declare_Variable	Any
0011 e001       |    |		Load	0x0,0x1
0012 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0013 a20e       |    |		Store_Unchecked	0x1,0xe
0014 029f 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Call
0016 00bc       |    |		Action	Signal_Activated
0017			BODY_0008:
0017 6040       |`@  |		Indirect_Literal	Discrete,0x58,{0x00000000, 0x000f0000}
0018 00ba       |    |		Action	Initiate_Delay
0019 00d9       |    |		Load_Top	At_Offset_1
001a 4800       |H   |		Short_Literal	0x0
001b 0092 0069  |   i|		Action	Push_String_Extended,0x69					; "Logging messages for REMOTE_OPERATIONS CONTEXT CACHE "
001d e002       |    |		Load	0x0,0x2
001e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
001f 00d9       |    |		Load_Top	At_Offset_1
0020 e002       |    |		Load	0x0,0x2
0021 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0022 00cf       |    |		Action	Mark_Auxiliary
0023 820f       |    |		Call	0x1,0xf
0024 00c9       |    |		Action	Pop_Auxiliary_Loop
0025 7ffd       |    |		Jump	0x23
0026			TRAP_0008:
0026 0007       |    |		Action	Break_Optional
0027 00da       |    |		Load_Top	At_Offset_2
0028 4808       |H   |		Short_Literal	0x8
0029 0092 006a  |   j|		Action	Push_String_Extended,0x6a					; "Unexpected exception "
002b 8003       |    |		Call	0x0,0x3
002c 01cc       |    |		Execute	Vector,Catenate
002d 0092 006b  |   k|		Action	Push_String_Extended,0x6b					; " causing death of the Logger"
002f 01cc       |    |		Execute	Vector,Catenate
0030 e002       |    |		Load	0x0,0x2
0031 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0032 00da       |    |		Load_Top	At_Offset_2
0033 e002       |    |		Load	0x0,0x2
0034 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0035 00bb       |    |		Action	Signal_Completion
0036 0000 0000  |    |		.XXX[0x2]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003e       | >  |		.CONST	0x003e								; Address of begin
0039 0047       | G  |		.CONST	0x0047								; Address of exception handler
003a 0002       |    |		.CONST	0x0002								; Number of locals
003b			INIT_0038:
003b 480d       |H   |		Short_Literal	0xd
003c 0299 0063  |   c|		Declare_Subprogram	INIT_0060,For_Accept
003e			BODY_0038:
003e 4802       |H   |		Short_Literal	0x2
003f 4802       |H   |		Short_Literal	0x2
0040 0099       |    |		Action	Reference_Dynamic
0041 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0042 0137       | 7  |		Execute	Entry,Rendezvous
0043 e20e       |    |		Load	0x1,0xe
0044 e002       |    |		Load	0x0,0x2
0045 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0046 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0047			TRAP_0038:
0047 0007       |    |		Action	Break_Optional
0048 e20e       |    |		Load	0x1,0xe
0049 4808       |H   |		Short_Literal	0x8
004a 0092 006a  |   j|		Action	Push_String_Extended,0x6a					; "Unexpected exception "
004c 8003       |    |		Call	0x0,0x3
004d 01cc       |    |		Execute	Vector,Catenate
004e 0092 006c  |   l|		Action	Push_String_Extended,0x6c					; " in main loop of Logger"
0050 01cc       |    |		Execute	Vector,Catenate
0051 e002       |    |		Load	0x0,0x2
0052 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0053 e20e       |    |		Load	0x1,0xe
0054 e002       |    |		Load	0x0,0x2
0055 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0056 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0057 0000       |    |		.XXX[0x1]
0058 0000 0000  |    |		.LITERAL	{0x00000000, 0x000f0000}
005c 0000 0000  |    |		.BLANK	0000[0x4]
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 e20e       |    |		Load	0x1,0xe
0064 e7fd       |    |		Load	0x3,-0x3
0065 e7fe       |    |		Load	0x3,-0x2
0066 e002       |    |		Load	0x0,0x2
0067 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0068 4100       |A   |		End_Rendezvous	0x0
0069 ; --------------------------------------------------------------------------------------
0069 ; STRING TABLE
0069 ; --------------------------------------------------------------------------------------
0069 000a       |    |		.STRTAB	0x000a->0x006e							; "Logging messages for REMOTE_OPERATIONS CONTEXT CACHE "
006a 003d       | =  |		.STRTAB	0x003d->0x0088							; "Unexpected exception "
006b 0050       | P  |		.STRTAB	0x0050->0x0093							; " causing death of the Logger"
006c 006a       | j  |		.STRTAB	0x006a->0x00a1							; " in main loop of Logger"
006d 007f       |    |		.STREND 0x007f->0x00ac
006e 4c6f 6767  |Logg|		.STRTAB_STRINGS
00ad 0000 0000  |    |		.XXX[0x3]
00af 0000       |    |
00b0 ; --------------------------------------------------------------------------------------
00b0 ; Debug Table
00b0 ; --------------------------------------------------------------------------------------
00b0 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0xf45e,0x0000,0x0001,0x0000
00b6 000e 1bd1  |    |		.XXX[0x6]
00b8 000e 1404  |    |
00ba 0800 0100  |    |
00bc 0000 0000  |    |		.BLANK	0000[0x4]
00c0 000e 5004  |  P |		.XXX[0x8]
00c2 0000 0100  |    |
00c4 0000 0000  |    |
00c6 000e 1bd1  |    |
00c8 0000 0000  |    |		.BLANK	0000[0x7]
00cf 0001       |    |		.XXX[0x1]
00d0 0000 0000  |    |		.BLANK	0000[0x7]
00d7 0001 000e  |    |		.XXX[0x5]
00d9 5004 0000  |P   |
00db 0100       |    |
00dc 0000 0000  |    |		.BLANK	0000[0x4]
00e0 000e 1804  |    |		.XXX[0x58]
00e2 0000 007f  |    |
00e4 000b c413  |    |
00e6 0000 1792  |    |
00e8 000f d004  |    |
00ea 0800 01cc  |    |
00ec 002e 5cb2  | .\ |
00ee 0000 3e8f  |  > |
00f0 09a9 f404  |    |
00f2 0000 007f  |    |
00f4 000b c413  |    |
00f6 0000 16e2  |    |
00f8 09a9 f404  |    |
00fa 0000 003f  |   ?|
00fc 0019 3073  |  0s|
00fe 0000 7082  |  p |
0100 0001 0404  |    |
0102 0800 0100  |    |
0104 0000 0000  |    |
0106 0000 0001  |    |
0108 000f d004  |    |
010a 0800 01cc  |    |
010c 002e 5cb2  | .\ |
010e 0000 7082  |  p |
0110 09a9 f004  |    |
0112 0000 07c4  |    |
0114 002e 5cb2  | .\ |
0116 0000 70e1  |  p |
0118 09a9 f404  |    |
011a 0000 0644  |   D|
011c 09a9 f404  |    |
011e 0000 1929  |   )|
0120 09a9 f004  |    |
0122 0000 07c4  |    |
0124 002e 5cb2  | .\ |
0126 0000 70e1  |  p |
0128 000e 5004  |  P |
012a 0000 0100  |    |
012c 0000 0000  |    |
012e 000e 1bd1  |    |
0130 000f d004  |    |
0132 0800 01cc  |    |
0134 002e 5cb2  | .\ |
0136 0000 7082  |  p |
0138 0000 0000  |    |		.BLANK	0000[0x7]
013f 0005       |    |		.XXX[0x1]
0140 0000 0000  |    |		.BLANK	0000[0x7]
0147 0005 09a9  |    |		.XXX[0x11]
0149 f404 0000  |    |
014b 0a98 09a9  |    |
014d f804 0000  |    |
014f 0000 000e  |    |
0151 5004 0000  |P   |
0153 0100 0000  |    |
0155 0000 000e  |    |
0157 1bd1       |    |
0158 0000 0000  |    |		.BLANK	0000[0x7]
015f 0001       |    |		.XXX[0x1]
0160 0000 0000  |    |		.BLANK	0000[0x7]
0167 0001 000e  |    |		.XXX[0x5]
0169 5004 0000  |P   |
016b 0100       |    |
016c 0000 0000  |    |		.BLANK	0000[0x4]
0170 000e 1804  |    |		.XXX[0x58]
0172 0000 007f  |    |
0174 000b c413  |    |
0176 0000 1792  |    |
0178 000f d004  |    |
017a 0800 01cc  |    |
017c 002e 5cb2  | .\ |
017e 0000 3e8f  |  > |
0180 09a9 f404  |    |
0182 0000 007f  |    |
0184 000b c413  |    |
0186 0000 16e2  |    |
0188 09a9 f404  |    |
018a 0000 003f  |   ?|
018c 001a 5073  |  Ps|
018e 0000 7082  |  p |
0190 0001 0404  |    |
0192 0800 0100  |    |
0194 0000 0000  |    |
0196 0000 0001  |    |
0198 000f d004  |    |
019a 0800 01cc  |    |
019c 002e 5cb2  | .\ |
019e 0000 7082  |  p |
01a0 09a9 f004  |    |
01a2 0000 07c4  |    |
01a4 002e 5cb2  | .\ |
01a6 0000 70e1  |  p |
01a8 09a9 f404  |    |
01aa 0000 0644  |   D|
01ac 09a9 f404  |    |
01ae 0000 1929  |   )|
01b0 09a9 f004  |    |
01b2 0000 07c4  |    |
01b4 002e 5cb2  | .\ |
01b6 0000 70e1  |  p |
01b8 000e 5004  |  P |
01ba 0000 0100  |    |
01bc 0000 0000  |    |
01be 000e 1bd1  |    |
01c0 000f d004  |    |
01c2 0800 01cc  |    |
01c4 002e 5cb2  | .\ |
01c6 0000 7082  |  p |
01c8 0000 0000  |    |		.BLANK	0000[0x7]
01cf 0005       |    |		.XXX[0x1]
01d0 0000 0000  |    |		.BLANK	0000[0x7]
01d7 0005 09a9  |    |		.XXX[0x29]
01d9 f404 0000  |    |
01db 0a98 09a9  |    |
01dd f804 0000  |    |
01df 0000 000e  |    |
01e1 5004 0000  |P   |
01e3 2a44 002e  |*D .|
01e5 5cb2 0000  |\   |
01e7 894b 000e  | K  |
01e9 1c04 0000  |    |
01eb 034c 002e  | L .|
01ed 5cb2 0000  |\   |
01ef 8990 0001  |    |
01f1 0404 0800  |    |
01f3 0100 0000  |    |
01f5 0000 0000  |    |
01f7 0001 000f  |    |
01f9 f804 0800  |    |
01fb 05cc 002e  |   .|
01fd 5cb2 0000  |\   |
01ff 4a79       |Jy  |