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

⟦1717144d5⟧

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

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 0038       | 8  |		.CONST	0x0038								; 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 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,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 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001b       |    |		.CONST	0x001b								; Address of begin
0019 0028       | (  |		.CONST	0x0028								; Address of exception handler
001a 0001       |    |		.CONST	0x0001								; Number of locals
001b			BODY_0018:
001b			INIT_0018:
001b 00da       |    |		Load_Top	At_Offset_2
001c e001       |    |		Load	0x0,0x1
001d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
001e a5fe       |    |		Store_Unchecked	0x2,-0x2
001f 00da       |    |		Load_Top	At_Offset_2
0020 e001       |    |		Load	0x0,0x1
0021 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0022 a5fd       |    |		Store_Unchecked	0x2,-0x3
0023 00da       |    |		Load_Top	At_Offset_2
0024 e001       |    |		Load	0x0,0x1
0025 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0026 a5fc       |    |		Store_Unchecked	0x2,-0x4
0027 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0028			TRAP_0018:
0028 010e       |    |		Execute	Exception,Is_Constraint_Error
0029 6807       |h   |		Jump_Zero	0x31
002a 4800       |H   |		Short_Literal	0x0
002b a5fe       |    |		Store_Unchecked	0x2,-0x2
002c 4800       |H   |		Short_Literal	0x0
002d a5fd       |    |		Store_Unchecked	0x2,-0x3
002e 4800       |H   |		Short_Literal	0x0
002f a5fc       |    |		Store_Unchecked	0x2,-0x4
0030 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0031 0100       |    |		Execute	Exception,Raise
0032 0000 0000  |    |		.BLANK	0000[0x6]
0038 ; --------------------------------------------------------------------------------------
0038 ; Debug Table
0038 ; --------------------------------------------------------------------------------------
0038 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0x4a64,0x0000,0x0001,0x0000
003e 0000 658e  |  e |		.XXX[0x2e]
0040 003d 9804  | =  |
0042 0000 007f  |    |
0044 0045 9c0e  | E  |
0046 0000 30c2  |  0 |
0048 003d 9804  | =  |
004a 0800 02b8  |    |
004c 1da2 dd0a  |    |
004e 0000 5e96  |  ^ |
0050 003d 9804  | =  |
0052 0800 02b8  |    |
0054 0075 6900  | ui |
0056 0000 65a6  |  e |
0058 003d 9804  | =  |
005a 0800 0400  |    |
005c 0000 0000  |    |
005e 0000 001b  |    |
0060 003d 9804  | =  |
0062 0000 007f  |    |
0064 0046 300e  | F0 |
0066 0002 6ea2  |  n |
0068 0011 3c04  |  < |
006a 0800 04b8  |    |
006c 0000 0000  |    |		.BLANK	0000[0x4]
0070 0001 0804  |    |		.XXX[0xc]
0072 0800 0d80  |    |
0074 0000 0000  |    |
0076 0000 0080  |    |
0078 001a 9404  |    |
007a 0800 0100  |    |
007c 0000 0000  |    |		.BLANK	0000[0x4]
0080 000f d004  |    |		.XXX[0xc]
0082 0000 0ac4  |    |
0084 002d 28db  | -( |
0086 0000 129e  |    |
0088 000e 1404  |    |
008a 0800 0100  |    |
008c 0000 0000  |    |		.BLANK	0000[0x4]
0090 000e 7c04  |  | |		.XXX[0x10]
0092 0000 09ec  |    |
0094 002d 28db  | -( |
0096 0000 11dd  |    |
0098 000e 5004  |  P |
009a 0000 0100  |    |
009c 0000 0000  |    |
009e 0003 3e97  |  > |
00a0 0000 0000  |    |		.BLANK	0000[0x8]
00a8 000e 1c04  |    |		.XXX[0x1c]
00aa 0000 034c  |   L|
00ac 002d 28db  | -( |
00ae 0000 0d7e  |   ~|
00b0 0011 3c04  |  < |
00b2 0000 007f  |    |
00b4 0047 580e  | GX |
00b6 0000 4102  |  A |
00b8 0011 3c04  |  < |
00ba 0000 003f  |   ?|
00bc 0010 a121  |   !|
00be 0000 14c2  |    |
00c0 000e 1404  |    |
00c2 0800 0100  |    |
00c4 0000 0000  |    |		.BLANK	0000[0x4]
00c8 000e 1c04  |    |		.XXX[0xc]
00ca 0000 034c  |   L|
00cc 002d 28db  | -( |
00ce 0000 14c2  |    |
00d0 000e 1404  |    |
00d2 0800 0100  |    |
00d4 0000 0000  |    |		.BLANK	0000[0x4]
00d8 000e 7c04  |  | |		.XXX[0x10]
00da 0000 09ec  |    |
00dc 002d 28db  | -( |
00de 0000 11dd  |    |
00e0 000e 5004  |  P |
00e2 0000 0100  |    |
00e4 0000 0000  |    |
00e6 0003 3e97  |  > |
00e8 0000 0000  |    |		.BLANK	0000[0x8]
00f0 000e 1c04  |    |		.XXX[0x24]
00f2 0000 034c  |   L|
00f4 002d 28db  | -( |
00f6 0000 14c2  |    |
00f8 000f a404  |    |
00fa 0000 007f  |    |
00fc 0045 d80e  | E  |
00fe 0000 9302  |    |
0100 000f a404  |    |
0102 0000 003f  |   ?|
0104 0011 608b  |  ` |
0106 0000 1521  |   !|
0108 000f a404  |    |
010a 0000 1544  |   D|
010c 002d 28db  | -( |
010e 0000 1521  |   !|
0110 000e 1404  |    |
0112 0800 0100  |    |
0114 0000 0000  |    |		.BLANK	0000[0x4]
0118 000f a404  |    |		.XXX[0x10]
011a 0000 1544  |   D|
011c 002d 28db  | -( |
011e 0000 1521  |   !|
0120 000e 5004  |  P |
0122 0000 0100  |    |
0124 0000 0000  |    |
0126 0003 3e97  |  > |
0128 0000 0000  |    |		.BLANK	0000[0x10]
0138 000e 1c04  |    |		.XXX[0x24]
013a 0000 034c  |   L|
013c 002d 28db  | -( |
013e 0000 14c2  |    |
0140 09a8 8804  |    |
0142 0000 007f  |    |
0144 0004 4413  |  D |
0146 0000 4692  |  F |
0148 09a8 8804  |    |
014a 0000 003f  |   ?|
014c 0011 f058  |   X|
014e 0000 1585  |    |
0150 09a8 8804  |    |
0152 0000 1644  |   D|
0154 002d 28db  | -( |
0156 0000 1585  |    |
0158 000e 1404  |    |
015a 0800 0100  |    |
015c 0000 0000  |    |		.BLANK	0000[0x4]
0160 09a8 8804  |    |		.XXX[0x10]
0162 0000 1644  |   D|
0164 002d 28db  | -( |
0166 0000 1585  |    |
0168 000e 5004  |  P |
016a 0000 0100  |    |
016c 0000 0000  |    |
016e 0003 3e97  |  > |
0170 0000 0000  |    |		.BLANK	0000[0x8]
0178 000e 1c04  |    |		.XXX[0x1c]
017a 0000 034c  |   L|
017c 002d 28db  | -( |
017e 0000 14c2  |    |
0180 09a8 a004  |    |
0182 0000 007f  |    |
0184 000b dc13  |    |
0186 0000 2dc2  |  - |
0188 09a8 a004  |    |
018a 0000 003f  |   ?|
018c 0012 802a  |   *|
018e 0000 1c4e  |   N|
0190 000e 5004  |  P |
0192 0800 0280  |    |
0194 0000 0000  |    |		.BLANK	0000[0x4]
0198 000e 5004  |  P |		.XXX[0x14]
019a 0000 0100  |    |
019c 0000 0000  |    |
019e 0003 3e97  |  > |
01a0 000e 1404  |    |
01a2 0800 0100  |    |
01a4 8000 0000  |    |
01a6 0000 0000  |    |
01a8 000e 1404  |    |
01aa 0800 0100  |    |
01ac 0000 0000  |    |		.BLANK	0000[0x4]
01b0 09a8 8804  |    |		.XXX[0xc]
01b2 0000 1644  |   D|
01b4 002d 28db  | -( |
01b6 0000 1585  |    |
01b8 000e 5004  |  P |
01ba 0800 0280  |    |
01bc 0000 0000  |    |		.BLANK	0000[0x4]
01c0 000e 5004  |  P |		.XXX[0x8]
01c2 0000 0100  |    |
01c4 0000 0000  |    |
01c6 0003 3e97  |  > |
01c8 0000 0000  |    |		.BLANK	0000[0x8]
01d0 000e 1c04  |    |		.XXX[0x30]
01d2 0000 034c  |   L|
01d4 002d 28db  | -( |
01d6 0000 14c2  |    |
01d8 09a8 a004  |    |
01da 0000 007f  |    |
01dc 000b c413  |    |
01de 0000 16e2  |    |
01e0 09a8 a004  |    |
01e2 0000 003f  |   ?|
01e4 0013 0073  |   s|
01e6 0000 1c4e  |   N|
01e8 0001 0404  |    |
01ea 0800 0100  |    |
01ec 0000 0000  |    |
01ee 0000 0001  |    |
01f0 000e 1c04  |    |
01f2 0000 034c  |   L|
01f4 002d 28db  | -( |
01f6 0000 1c4e  |   N|
01f8 09a8 8804  |    |
01fa 0000 1644  |   D|
01fc 002d 28db  | -( |
01fe 0000 1cad  |    |