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

⟦29d2034e3⟧

    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
    └─ ⟦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 0050       | P  |		.CONST	0x0050								; 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 004d       | M  |		.CONST	0x004d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0020       |    |		.CONST	0x0020								; Number of locals
000b			INIT_0008:
000b e002       |    |		Load	0x0,0x2
000c 0129       | )  |		Execute	Any,Make_Visible
000d e003       |    |		Load	0x0,0x3
000e 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
000f 0129       | )  |		Execute	Any,Make_Visible
0010 e004       |    |		Load	0x0,0x4
0011 1b4e       | N  |		Execute	Package,Field_Read,Field_Number 0x4e
0012 0129       | )  |		Execute	Any,Make_Visible
0013 e005       |    |		Load	0x0,0x5
0014 1b2d       | -  |		Execute	Package,Field_Read,Field_Number 0x2d
0015 0129       | )  |		Execute	Any,Make_Visible
0016 e006       |    |		Load	0x0,0x6
0017 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
0018 0129       | )  |		Execute	Any,Make_Visible
0019 e007       |    |		Load	0x0,0x7
001a 1b57       | W  |		Execute	Package,Field_Read,Field_Number 0x57
001b 0129       | )  |		Execute	Any,Make_Visible
001c e008       |    |		Load	0x0,0x8
001d 1b4b       | K  |		Execute	Package,Field_Read,Field_Number 0x4b
001e 0129       | )  |		Execute	Any,Make_Visible
001f e009       |    |		Load	0x0,0x9
0020 0129       | )  |		Execute	Any,Make_Visible
0021 e00a       |    |		Load	0x0,0xa
0022 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0023 02c6       |    |		Declare_Variable	Any,Visible
0024 e00a       |    |		Load	0x0,0xa
0025 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0026 a215       |    |		Store_Unchecked	0x1,0x15
0027 e00b       |    |		Load	0x0,0xb
0028 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0029 0129       | )  |		Execute	Any,Make_Visible
002a e00c       |    |		Load	0x0,0xc
002b 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
002c 0129       | )  |		Execute	Any,Make_Visible
002d e00d       |    |		Load	0x0,0xd
002e 1b30       | 0  |		Execute	Package,Field_Read,Field_Number 0x30
002f 0129       | )  |		Execute	Any,Make_Visible
0030 00e1       |    |		Load_Encached	Boolean_Cache
0031 0129       | )  |		Execute	Any,Make_Visible
0032 e00e       |    |		Load	0x0,0xe
0033 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0034 02c6       |    |		Declare_Variable	Any,Visible
0035 00d8       |    |		Load_Top	At_Offset_0
0036 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0037 e00f       |    |		Load	0x0,0xf
0038 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0039 0129       | )  |		Execute	Any,Make_Visible
003a e00f       |    |		Load	0x0,0xf
003b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
003c 0129       | )  |		Execute	Any,Make_Visible
003d e010       |    |		Load	0x0,0x10
003e 02c6       |    |		Declare_Variable	Any,Visible
003f 00d8       |    |		Load_Top	At_Offset_0
0040 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0041 e00f       |    |		Load	0x0,0xf
0042 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0043 0129       | )  |		Execute	Any,Make_Visible
0044 e011       |    |		Load	0x0,0x11
0045 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0046 02c6       |    |		Declare_Variable	Any,Visible
0047 00d8       |    |		Load_Top	At_Offset_0
0048 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0049 e00c       |    |		Load	0x0,0xc
004a 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
004b 0129       | )  |		Execute	Any,Make_Visible
004c 00bf       |    |		Action	Accept_Activation
004d			BODY_0008:
004d 00bc       |    |		Action	Signal_Activated
004e 00bb       |    |		Action	Signal_Completion
004f 0000       |    |		.XXX[0x1]
0050 ; --------------------------------------------------------------------------------------
0050 ; Debug Table
0050 ; --------------------------------------------------------------------------------------
0050 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0x2bd1,0x0000,0x0001,0x0000
0056 c00a 0000  |    |		.XXX[0xe]
0058 0002 0000  |    |
005a 0080 0000  |    |
005c 0440 0000  | @  |
005e 0002 0000  |    |
0060 0014 8000  |    |
0062 0808 3432  |  42|
0064 0000 0000  |    |		.BLANK	0000[0x1b]
007f 0600 00d0  |    |		.XXX[0x58]
0081 1685 4059  |  @Y|
0083 7c00 000e  ||   |
0085 dd2a 4b80  | *K |
0087 8004 0004  |    |
0089 d000 0000  |    |
008b 36c8 0001  |6   |
008d a800 0000  |    |
008f 9801 4000  |  @ |
0091 0000 4000  |  @ |
0093 0010 0000  |    |
0095 0088 0000  |    |
0097 0000 4000  |  @ |
0099 0002 9000  |    |
009b 0d01 068a  |    |
009d 1000 0d01  |    |
009f 068a 5000  |  P |
00a1 0501 061d  |    |
00a3 5000 0d01  |P   |
00a5 068a 8000  |    |
00a7 0000 0000  |    |
00a9 1000 0d01  |    |
00ab 068a d000  |    |
00ad 0d01 068b  |    |
00af 1000 0581  |    |
00b1 0622 5000  | "P |
00b3 0981 065e  |   ^|
00b5 5000 0d01  |P   |
00b7 068b 4040  |  @@|
00b9 001a c910  |    |
00bb a80b 2f90  |  / |
00bd 0001 dbb6  |    |
00bf c990 1000  |    |
00c1 8000 9a00  |    |
00c3 0000 07c4  |    |
00c5 0000 0200  |    |
00c7 0000 0300  |    |
00c9 2800 0000  |(   |
00cb 0800 0002  |    |
00cd 0000 0011  |    |
00cf 0000 0000  |    |
00d1 0800 0000  |    |
00d3 5200 0010  |R   |
00d5 20d1 9800  |    |
00d7 0000 0000  |    |		.BLANK	0000[0x1a]
00f1 0018 0003  |    |		.XXX[0x1f]
00f3 406a 1501  |@j  |
00f5 65f4 0000  |e   |
00f7 3b76 d932  |;v 2|
00f9 0200 1000  |    |
00fb 1340 0000  | @  |
00fd 00f8 8000  |    |
00ff 0080 0000  |    |
0101 0060 0500  | `  |
0103 0000 0100  |    |
0105 0000 4000  |  @ |
0107 0002 2000  |    |
0109 0000 0100  |    |
010b 0000 0a40  |   @|
010d 0002 041a  |    |
010f 3300       |3   |
0110 0000 0000  |    |		.BLANK	0000[0x1a]
012a 0003 0000  |    |		.XXX[0x22]
012c 680e 42a0  |h B |
012e 2cbe c000  |,   |
0130 076e da26  | n &|
0132 4040 0200  |@@  |
0134 0268 0000  | h  |
0136 001f 1000  |    |
0138 0010 0000  |    |
013a 0014 00a0  |    |
013c 0000 0020  |    |
013e 0000 0800  |    |
0140 0000 4400  |  D |
0142 0000 0020  |    |
0144 0000 0148  |   H|
0146 0000 8083  |    |
0148 4888 0000  |H   |
014a 8083 48a0  |  H |
014c 0000 0000  |    |		.BLANK	0000[0x18]
0164 6000 0d01  |`   |		.XXX[0x1e]
0166 a854 0597  | T  |
0168 e000 00ed  |    |
016a d2a4 b808  |    |
016c 0040 004d  | @ M|
016e 0000 0003  |    |
0170 6c80 001b  |l   |
0172 8000 000a  |    |
0174 8014 0000  |    |
0176 0288 0000  |    |
0178 0100 0000  |    |
017a 0880 0000  |    |
017c 0004 0000  |    |
017e 0029 0000  | )  |
0180 d810 6980  |  i |
0182 0000 0000  |    |		.BLANK	0000[0x1b]
019d 0400 01ac  |    |		.XXX[0x1e]
019f 910a 80b2  |    |
01a1 fd00 001d  |    |
01a3 bb6c 9901  | l  |
01a5 0008 0009  |    |
01a7 a000 0000  |    |
01a9 7c4c 0000  ||L  |
01ab 2000 0000  |    |
01ad 3002 8000  |0   |
01af 0000 8000  |    |
01b1 0020 0000  |    |
01b3 0110 0000  |    |
01b5 0000 8000  |    |
01b7 0005 2000  |    |
01b9 0102 0d33  |   3|
01bb 0000 0000  |    |		.BLANK	0000[0x1b]
01d6 0180 0034  |   4|		.XXX[0x3]
01d8 0780       |    |
01d9 0000 0000  |    |		.BLANK	0000[0x27]