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

⟦fc79eafae⟧

    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 0048       | H  |		.CONST	0x0048								; 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 0032       | 2  |		.CONST	0x0032								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002c       | ,  |		.CONST	0x002c								; Number of locals
000b			INIT_0008:
000b 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e e001       |    |		Load	0x0,0x1
000f e002       |    |		Load	0x0,0x2
0010 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0011 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0012 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0013 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0014 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0015 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0016 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0017 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0018 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0019 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
001a 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
001b 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
001c 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
001d 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
001e 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
001f 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0020 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0021 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0022 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0023 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0024 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0025 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0026 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0027 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0028 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0029 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
002a 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
002b e003       |    |		Load	0x0,0x3
002c 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
002d 0387       |    |		Declare_Variable	Package
002e 00d8       |    |		Load_Top	At_Offset_0
002f 020f       |    |		Execute	Module,Activate
0030 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
0031 00c7       |    |		Action	Elaborate_Subprogram
0032			BODY_0008:
0032 00bc       |    |		Action	Signal_Activated
0033 00bb       |    |		Action	Signal_Completion
0034 0000 0000  |    |		.BLANK	0000[0x4]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0041       | A  |		.CONST	0x0041								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0002       |    |		.CONST	0x0002								; Number of locals
003b			INIT_0038:
003b e003       |    |		Load	0x0,0x3
003c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003d 02c7       |    |		Declare_Variable	Any
003e e22c       | ,  |		Load	0x1,0x2c
003f 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0040 a402       |    |		Store_Unchecked	0x2,0x2
0041			BODY_0038:
0041 00db       |    |		Load_Top	At_Offset_3
0042 00d9       |    |		Load_Top	At_Offset_1
0043 e003       |    |		Load	0x0,0x3
0044 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0045 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0046 0000 0000  |    |		.XXX[0x2]
0048 ; --------------------------------------------------------------------------------------
0048 ; Debug Table
0048 ; --------------------------------------------------------------------------------------
0048 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0xc462,0x0000,0x0001,0x0000
004e 0000 0000  |    |		.BLANK	0000[0xa]
0058 01a3 1ba8  |    |		.XXX[0xd]
005a 01a3 2de8  |  - |
005c 0800 42c0  |  B |
005e 2479 0000  |$y  |
0060 0040 0000  | @  |
0062 001e 8091  |    |
0064 e450       | P  |
0065 0000 0000  |    |		.BLANK	0000[0x5]
006a 001a 324c  |  2L|		.XXX[0x2c]
006c 801a 3490  |  4 |
006e 8e2e f485  | .  |
0070 8001 4522  |  E"|
0072 8000 0001  |    |
0074 0000 0000  |    |
0076 0000 0006  |    |
0078 8014 30a6  |  0 |
007a 0e2e f485  | .  |
007c 8001 4522  |  E"|
007e 8000 0001  |    |
0080 8000 0000  |    |
0082 0000 0007  |    |
0084 0000 0000  |    |
0086 0e2e f485  | .  |
0088 8001 4522  |  E"|
008a 8000 0002  |    |
008c 0000 0000  |    |
008e 0000 0007  |    |
0090 8014 3106  |  1 |
0092 0080 0290  |    |
0094 0228 d000  | (  |
0096 0000 0000  |    |		.BLANK	0000[0xa]
00a0 0001 a32d  |   -|		.XXX[0xe]
00a2 e801 a352  |   R|
00a4 2808 0042  |(  B|
00a6 c024 7b00  | ${ |
00a8 0000 4000  |  @ |
00aa 0000 1e80  |    |
00ac 91ec 3400  |  4 |
00ae 0000 0000  |    |		.BLANK	0000[0x5]
00b3 1a34 9080  | 4  |		.XXX[0x7]
00b5 1a35 b480  | 5  |
00b7 8002 9002  |    |
00b9 21d0       |!   |
00ba 0000 0000  |    |		.BLANK	0000[0xb]
00c5 01a3 5228  |  R(|		.XXX[0xd]
00c7 01a3 6468  |  dh|
00c9 0800 42c0  |  B |
00cb 2479 0000  |$y  |
00cd 0040 0000  | @  |
00cf 001e 8091  |    |
00d1 e438       | 8  |
00d2 0000 0000  |    |		.BLANK	0000[0x5]
00d7 001a 35b4  |  5 |		.XXX[0x7]
00d9 801a 36d8  |  6 |
00db 8080 0290  |    |
00dd 0225       | %  |
00de 0000 0000  |    |		.BLANK	0000[0xb]
00e9 0001 a364  |   d|		.XXX[0xe]
00eb 6801 a376  |h  v|
00ed a808 0042  |   B|
00ef c024 7900  | $y |
00f1 0000 4000  |  @ |
00f3 0000 1e80  |    |
00f5 91e4 3c00  |  < |
00f7 0000 0000  |    |		.BLANK	0000[0x5]
00fc 1a36 d880  | 6  |		.XXX[0xd]
00fe 1a37 fc80  | 7  |
0100 8004 2c02  |  , |
0102 47b0 0000  |G   |
0104 0400 0000  |    |
0106 01e8 091e  |    |
0108 c500       |    |
0109 0000 0000  |    |		.BLANK	0000[0x5]
010e 01a3 76a8  |  v |		.XXX[0x7]
0110 01a3 88e8  |    |
0112 0800 2900  |  ) |
0114 2250       |"P  |
0115 0000 0000  |    |		.BLANK	0000[0xb]
0120 001a 37fc  |  7 |		.XXX[0xe]
0122 801a 3920  |  9 |
0124 8080 042c  |   ,|
0126 0247 9000  | G  |
0128 0004 0000  |    |
012a 0001 e809  |    |
012c 1e43 c000  | C  |
012e 0000 0000  |    |		.BLANK	0000[0x4]
0132 0001 a388  |    |		.XXX[0xe]
0134 e801 a39b  |    |
0136 2808 0042  |(  B|
0138 c024 7b00  | ${ |
013a 0000 4000  |  @ |
013c 0000 1e80  |    |
013e 91ec 4400  |  D |
0140 0000 0000  |    |		.BLANK	0000[0x5]
0145 1a39 2080  | 9  |		.XXX[0x7]
0147 1a3a 4480  | :D |
0149 8002 9002  |    |
014b 2300       |#   |
014c 0000 0000  |    |		.BLANK	0000[0xb]
0157 01a3 9b28  |   (|		.XXX[0xd]
0159 01a3 ad68  |   h|
015b 0800 42c0  |  B |
015d 247b 0000  |${  |
015f 0040 0000  | @  |
0161 001e 8091  |    |
0163 ec50       | P  |
0164 0000 0000  |    |		.BLANK	0000[0x5]
0169 001a 3a44  |  :D|		.XXX[0x8]
016b 801a 3b68  |  ;h|
016d 8080 0290  |    |
016f 0221 6000  | !` |
0171 0000 0000  |    |		.BLANK	0000[0xa]
017b 0001 a3ad  |    |		.XXX[0xe]
017d 6801 a3bf  |h   |
017f a808 0042  |   B|
0181 c024 7900  | $y |
0183 0000 4000  |  @ |
0185 0000 1e80  |    |
0187 91e5 3400  |  4 |
0189 0000 0000  |    |		.BLANK	0000[0x5]
018e 1a3b 6880  | ;h |		.XXX[0x4f]
0190 1a3e cc8e  | >  |
0192 2ef4 8580  |.   |
0194 015a c100  | Z  |
0196 0000 0100  |    |
0198 0000 0000  |    |
019a 0000 0680  |    |
019c 0000 000e  |    |
019e 2ef4 8580  |.   |
01a0 015a c100  | Z  |
01a2 0000 0180  |    |
01a4 0000 0000  |    |
01a6 0000 0700  |    |
01a8 0000 000e  |    |
01aa 2ef4 8580  |.   |
01ac 015a c100  | Z  |
01ae 0000 0200  |    |
01b0 0000 0000  |    |
01b2 0000 0780  |    |
01b4 0000 000e  |    |
01b6 2ef4 8580  |.   |
01b8 015a c100  | Z  |
01ba 0000 0280  |    |
01bc 0000 0000  |    |
01be 0000 0800  |    |
01c0 0000 000e  |    |
01c2 2ef4 8580  |.   |
01c4 015a c100  | Z  |
01c6 0000 0300  |    |
01c8 0000 0000  |    |
01ca 0000 0880  |    |
01cc 0000 000e  |    |
01ce 2ef4 8580  |.   |
01d0 015a c100  | Z  |
01d2 0000 0380  |    |
01d4 0000 0000  |    |
01d6 0000 0900  |    |
01d8 0000 0000  |    |
01da 8002 9002  |    |
01dc 2670       |&p  |
01dd 0000 0000  |    |		.BLANK	0000[0xb]
01e8 01a3 bfa8  |    |		.XXX[0xd]
01ea 01a3 f5e8  |    |
01ec 0800 42c0  |  B |
01ee 247b 0000  |${  |
01f0 0040 0000  | @  |
01f2 001e 8091  |    |
01f4 ec44       | D  |
01f5 0000 0000  |    |		.BLANK	0000[0x5]
01fa 001a 3ecc  |  > |		.XXX[0x6]
01fc 801a 3ff0  |  ? |
01fe 8080 0290  |    |