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

⟦b3ade2d9a⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦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 0128       | (  |		.CONST	0x0128								; 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 0000       |    |		.CONST	0x0000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0027       | '  |		.CONST	0x0027								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000f       |    |		.CONST	0x000f								; Number of locals
000b			INIT_0008:
000b e007       |    |		Load	0x0,0x7
000c 0007       |    |		Action	Break_Optional
000d e007       |    |		Load	0x0,0x7
000e 0007       |    |		Action	Break_Optional
000f e007       |    |		Load	0x0,0x7
0010 0007       |    |		Action	Break_Optional
0011 e007       |    |		Load	0x0,0x7
0012 0007       |    |		Action	Break_Optional
0013 e007       |    |		Load	0x0,0x7
0014 0007       |    |		Action	Break_Optional
0015 e007       |    |		Load	0x0,0x7
0016 0007       |    |		Action	Break_Optional
0017 e007       |    |		Load	0x0,0x7
0018 0007       |    |		Action	Break_Optional
0019 e007       |    |		Load	0x0,0x7
001a 0007       |    |		Action	Break_Optional
001b e007       |    |		Load	0x0,0x7
001c 0007       |    |		Action	Break_Optional
001d e007       |    |		Load	0x0,0x7
001e 0007       |    |		Action	Break_Optional
001f e007       |    |		Load	0x0,0x7
0020 0007       |    |		Action	Break_Optional
0021 e007       |    |		Load	0x0,0x7
0022 0007       |    |		Action	Break_Optional
0023 e007       |    |		Load	0x0,0x7
0024 0007       |    |		Action	Break_Optional
0025 e007       |    |		Load	0x0,0x7
0026 0007       |    |		Action	Break_Optional
0027			BODY_0008:
0027 e5fd       |    |		Load	0x2,-0x3
0028 e5ff       |    |		Load	0x2,-0x1
0029 8246       | F  |		Call	0x1,0x46
002a a404       |    |		Store_Unchecked	0x2,0x4
002b e5fd       |    |		Load	0x2,-0x3
002c e5ff       |    |		Load	0x2,-0x1
002d 8247       | G  |		Call	0x1,0x47
002e a402       |    |		Store_Unchecked	0x2,0x2
002f e5fc       |    |		Load	0x2,-0x4
0030 e5fe       |    |		Load	0x2,-0x2
0031 8246       | F  |		Call	0x1,0x46
0032 a405       |    |		Store_Unchecked	0x2,0x5
0033 e5fc       |    |		Load	0x2,-0x4
0034 e5fe       |    |		Load	0x2,-0x2
0035 8247       | G  |		Call	0x1,0x47
0036 a403       |    |		Store_Unchecked	0x2,0x3
0037 4800       |H   |		Short_Literal	0x0
0038 e402       |    |		Load	0x2,0x2
0039 823e       | >  |		Call	0x1,0x3e
003a a406       |    |		Store_Unchecked	0x2,0x6
003b e403       |    |		Load	0x2,0x3
003c 4800       |H   |		Short_Literal	0x0
003d 8242       | B  |		Call	0x1,0x42
003e a407       |    |		Store_Unchecked	0x2,0x7
003f e404       |    |		Load	0x2,0x4
0040 e402       |    |		Load	0x2,0x2
0041 0272       | r  |		Execute	Discrete,Minus
0042 0a01       |    |		Execute_Immediate	Plus,0x1
0043 e221       | !  |		Load	0x1,0x21
0044 0271       | q  |		Execute	Discrete,Times
0045 c408       |    |		Store	0x2,0x8
0046 e405       |    |		Load	0x2,0x5
0047 e403       |    |		Load	0x2,0x3
0048 0272       | r  |		Execute	Discrete,Minus
0049 0a01       |    |		Execute_Immediate	Plus,0x1
004a e220       |    |		Load	0x1,0x20
004b 0271       | q  |		Execute	Discrete,Times
004c c409       |    |		Store	0x2,0x9
004d e406       |    |		Load	0x2,0x6
004e a40a       |    |		Store_Unchecked	0x2,0xa
004f e407       |    |		Load	0x2,0x7
0050 a40b       |    |		Store_Unchecked	0x2,0xb
0051 e406       |    |		Load	0x2,0x6
0052 a40c       |    |		Store_Unchecked	0x2,0xc
0053 e407       |    |		Load	0x2,0x7
0054 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0055 e5fb       |    |		Load	0x2,-0x5
0056 4604       |F   |		Jump_Case	0x5
0057 7868       |xh  |		Jump	0xc0								; case 0x0
0058 7899       |x   |		Jump	0xf2								; case 0x1
0059 7803       |x   |		Jump	0x5d								; case 0x2
005a 7834       |x4  |		Jump	0x8f								; case 0x3
005b 7800       |x   |		Jump	0x5c								; case 0x4
005c 08e2       |    |		Execute_Immediate	Raise,0xe2
005d 4800       |H   |		Short_Literal	0x0
005e e404       |    |		Load	0x2,0x4
005f 823f       | ?  |		Call	0x1,0x3f
0060 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0061 e405       |    |		Load	0x2,0x5
0062 4800       |H   |		Short_Literal	0x0
0063 8244       | D  |		Call	0x1,0x44
0064 0a01       |    |		Execute_Immediate	Plus,0x1
0065 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0066 00cf       |    |		Action	Mark_Auxiliary
0067 e237       | 7  |		Load	0x1,0x37
0068 0aff       |    |		Execute_Immediate	Plus,-0x1
0069 4800       |H   |		Short_Literal	0x0
006a 0263       | c  |		Execute	Discrete,Above_Bound
006b 7021       |p!  |		Jump_Nonzero	0x8d
006c 00d8       |    |		Load_Top	At_Offset_0
006d e238       | 8  |		Load	0x1,0x38
006e 01d7       |    |		Execute	Vector,Field_Read
006f a40b       |    |		Store_Unchecked	0x2,0xb
0070 e407       |    |		Load	0x2,0x7
0071 e40b       |    |		Load	0x2,0xb
0072 0272       | r  |		Execute	Discrete,Minus
0073 c40d       |    |		Store	0x2,0xd
0074 00db       |    |		Load_Top	At_Offset_3
0075 e40b       |    |		Load	0x2,0xb
0076 0272       | r  |		Execute	Discrete,Minus
0077 c40f       |    |		Store	0x2,0xf
0078 e409       |    |		Load	0x2,0x9
0079 e408       |    |		Load	0x2,0x8
007a e40d       |    |		Load	0x2,0xd
007b e40c       |    |		Load	0x2,0xc
007c e407       |    |		Load	0x2,0x7
007d e406       |    |		Load	0x2,0x6
007e e22c       | ,  |		Load	0x1,0x2c
007f 824b       | K  |		Call	0x1,0x4b
0080 e226       | &  |		Load	0x1,0x26
0081 e40b       |    |		Load	0x2,0xb
0082 e221       | !  |		Load	0x1,0x21
0083 e40f       |    |		Load	0x2,0xf
0084 e40e       |    |		Load	0x2,0xe
0085 e22c       | ,  |		Load	0x1,0x2c
0086 824a       | J  |		Call	0x1,0x4a
0087 e407       |    |		Load	0x2,0x7
0088 e40b       |    |		Load	0x2,0xb
0089 0272       | r  |		Execute	Discrete,Minus
008a c407       |    |		Store	0x2,0x7
008b 00c8       |    |		Action	Pop_Auxiliary_Range
008c 3fdf       |?   |		Loop_Increasing	0x6c
008d 00ce       |    |		Action	Pop_Auxiliary
008e 7893       |x   |		Jump	0x122
008f 4800       |H   |		Short_Literal	0x0
0090 e404       |    |		Load	0x2,0x4
0091 823f       | ?  |		Call	0x1,0x3f
0092 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0093 e403       |    |		Load	0x2,0x3
0094 4800       |H   |		Short_Literal	0x0
0095 8242       | B  |		Call	0x1,0x42
0096 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0097 00cf       |    |		Action	Mark_Auxiliary
0098 e237       | 7  |		Load	0x1,0x37
0099 0aff       |    |		Execute_Immediate	Plus,-0x1
009a 4800       |H   |		Short_Literal	0x0
009b 0263       | c  |		Execute	Discrete,Above_Bound
009c 7021       |p!  |		Jump_Nonzero	0xbe
009d 00d8       |    |		Load_Top	At_Offset_0
009e e238       | 8  |		Load	0x1,0x38
009f 01d7       |    |		Execute	Vector,Field_Read
00a0 a40b       |    |		Store_Unchecked	0x2,0xb
00a1 e407       |    |		Load	0x2,0x7
00a2 e40b       |    |		Load	0x2,0xb
00a3 0273       | s  |		Execute	Discrete,Plus
00a4 c40d       |    |		Store	0x2,0xd
00a5 e409       |    |		Load	0x2,0x9
00a6 e408       |    |		Load	0x2,0x8
00a7 e40d       |    |		Load	0x2,0xd
00a8 e40c       |    |		Load	0x2,0xc
00a9 e407       |    |		Load	0x2,0x7
00aa e406       |    |		Load	0x2,0x6
00ab e22c       | ,  |		Load	0x1,0x2c
00ac 824b       | K  |		Call	0x1,0x4b
00ad e226       | &  |		Load	0x1,0x26
00ae e40b       |    |		Load	0x2,0xb
00af e221       | !  |		Load	0x1,0x21
00b0 e40f       |    |		Load	0x2,0xf
00b1 e40e       |    |		Load	0x2,0xe
00b2 e22c       | ,  |		Load	0x1,0x2c
00b3 824a       | J  |		Call	0x1,0x4a
00b4 e407       |    |		Load	0x2,0x7
00b5 e40b       |    |		Load	0x2,0xb
00b6 0273       | s  |		Execute	Discrete,Plus
00b7 c407       |    |		Store	0x2,0x7
00b8 00db       |    |		Load_Top	At_Offset_3
00b9 e40b       |    |		Load	0x2,0xb
00ba 0273       | s  |		Execute	Discrete,Plus
00bb c40f       |    |		Store	0x2,0xf
00bc 00c8       |    |		Action	Pop_Auxiliary_Range
00bd 3fdf       |?   |		Loop_Increasing	0x9d
00be 00ce       |    |		Action	Pop_Auxiliary
00bf 7862       |xb  |		Jump	0x122
00c0 4800       |H   |		Short_Literal	0x0
00c1 e404       |    |		Load	0x2,0x4
00c2 8240       | @  |		Call	0x1,0x40
00c3 0a01       |    |		Execute_Immediate	Plus,0x1
00c4 005a       | Z  |		Store_Top	Discrete,At_Offset_2
00c5 e405       |    |		Load	0x2,0x5
00c6 4800       |H   |		Short_Literal	0x0
00c7 8243       | C  |		Call	0x1,0x43
00c8 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
00c9 00cf       |    |		Action	Mark_Auxiliary
00ca e237       | 7  |		Load	0x1,0x37
00cb 0aff       |    |		Execute_Immediate	Plus,-0x1
00cc 4800       |H   |		Short_Literal	0x0
00cd 0263       | c  |		Execute	Discrete,Above_Bound
00ce 7021       |p!  |		Jump_Nonzero	0xf0
00cf 00d8       |    |		Load_Top	At_Offset_0
00d0 e239       | 9  |		Load	0x1,0x39
00d1 01d7       |    |		Execute	Vector,Field_Read
00d2 a40a       |    |		Store_Unchecked	0x2,0xa
00d3 e406       |    |		Load	0x2,0x6
00d4 e40a       |    |		Load	0x2,0xa
00d5 0272       | r  |		Execute	Discrete,Minus
00d6 c40c       |    |		Store	0x2,0xc
00d7 e40e       |    |		Load	0x2,0xe
00d8 e40a       |    |		Load	0x2,0xa
00d9 0272       | r  |		Execute	Discrete,Minus
00da c40e       |    |		Store	0x2,0xe
00db e409       |    |		Load	0x2,0x9
00dc e408       |    |		Load	0x2,0x8
00dd e40d       |    |		Load	0x2,0xd
00de e40c       |    |		Load	0x2,0xc
00df e407       |    |		Load	0x2,0x7
00e0 e406       |    |		Load	0x2,0x6
00e1 e22c       | ,  |		Load	0x1,0x2c
00e2 824b       | K  |		Call	0x1,0x4b
00e3 e226       | &  |		Load	0x1,0x26
00e4 e220       |    |		Load	0x1,0x20
00e5 e40a       |    |		Load	0x2,0xa
00e6 e40f       |    |		Load	0x2,0xf
00e7 e40e       |    |		Load	0x2,0xe
00e8 e22c       | ,  |		Load	0x1,0x2c
00e9 824a       | J  |		Call	0x1,0x4a
00ea e406       |    |		Load	0x2,0x6
00eb e40a       |    |		Load	0x2,0xa
00ec 0272       | r  |		Execute	Discrete,Minus
00ed c406       |    |		Store	0x2,0x6
00ee 00c8       |    |		Action	Pop_Auxiliary_Range
00ef 3fdf       |?   |		Loop_Increasing	0xcf
00f0 00ce       |    |		Action	Pop_Auxiliary
00f1 7830       |x0  |		Jump	0x122
00f2 4800       |H   |		Short_Literal	0x0
00f3 e402       |    |		Load	0x2,0x2
00f4 823e       | >  |		Call	0x1,0x3e
00f5 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00f6 e405       |    |		Load	0x2,0x5
00f7 4800       |H   |		Short_Literal	0x0
00f8 8242       | B  |		Call	0x1,0x42
00f9 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
00fa 00cf       |    |		Action	Mark_Auxiliary
00fb e237       | 7  |		Load	0x1,0x37
00fc 0aff       |    |		Execute_Immediate	Plus,-0x1
00fd 4800       |H   |		Short_Literal	0x0
00fe 0263       | c  |		Execute	Discrete,Above_Bound
00ff 7021       |p!  |		Jump_Nonzero	0x121
0100 00d8       |    |		Load_Top	At_Offset_0
0101 e239       | 9  |		Load	0x1,0x39
0102 01d7       |    |		Execute	Vector,Field_Read
0103 a40a       |    |		Store_Unchecked	0x2,0xa
0104 e406       |    |		Load	0x2,0x6
0105 e40a       |    |		Load	0x2,0xa
0106 0273       | s  |		Execute	Discrete,Plus
0107 c40c       |    |		Store	0x2,0xc
0108 e409       |    |		Load	0x2,0x9
0109 e408       |    |		Load	0x2,0x8
010a e40d       |    |		Load	0x2,0xd
010b e40c       |    |		Load	0x2,0xc
010c e407       |    |		Load	0x2,0x7
010d e406       |    |		Load	0x2,0x6
010e e22c       | ,  |		Load	0x1,0x2c
010f 824b       | K  |		Call	0x1,0x4b
0110 e226       | &  |		Load	0x1,0x26
0111 e220       |    |		Load	0x1,0x20
0112 e40a       |    |		Load	0x2,0xa
0113 e40f       |    |		Load	0x2,0xf
0114 e40e       |    |		Load	0x2,0xe
0115 e22c       | ,  |		Load	0x1,0x2c
0116 824a       | J  |		Call	0x1,0x4a
0117 e406       |    |		Load	0x2,0x6
0118 e40a       |    |		Load	0x2,0xa
0119 0273       | s  |		Execute	Discrete,Plus
011a c406       |    |		Store	0x2,0x6
011b e40e       |    |		Load	0x2,0xe
011c e40a       |    |		Load	0x2,0xa
011d 0273       | s  |		Execute	Discrete,Plus
011e c40e       |    |		Store	0x2,0xe
011f 00c8       |    |		Action	Pop_Auxiliary_Range
0120 3fdf       |?   |		Loop_Increasing	0x100
0121 00ce       |    |		Action	Pop_Auxiliary
0122 e20d       |    |		Load	0x1,0xd
0123 802b       | +  |		Call	0x0,0x2b
0124 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0125 0000 0000  |    |		.XXX[0x3]
0127 0000       |    |
0128 ; --------------------------------------------------------------------------------------
0128 ; Debug Table
0128 ; --------------------------------------------------------------------------------------
0128 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x688d,0x0000,0x0001,0x0001
012e 000b 0132  |   2|		.DBG4T	0x000b,0x0132,0x0001,0x4000
0132 ; --------------------------------------------------------------------------------------
0132 ; Debug chain
0132 ; --------------------------------------------------------------------------------------
0132 000e 0033  |   3|		.DBGLEN	0x000e,0x0033
0134 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x002b,0x002f,0x0033,0x0037,0x003b,0x003f,0x0046,0x004d,0x004f,0x0051,0x0053,0x0055,0x005c,0x005d,0x0061,0x0067,0x006c,0x0070,0x0074,0x0078,0x0080,0x0087,0x008f,0x0093,0x0098,0x009d,0x00a1,0x00a5,0x00ad,0x00b4,0x00b8,0x00c0,0x00c5,0x00ca,0x00cf,0x00d3,0x00d7,0x00db,0x00e3,0x00ea,0x00f2,0x00f6,0x00fb,0x0100,0x0104,0x0108,0x0110,0x0117,0x011b,0x0122
0175 0001 0002  |    |		.XXX[0x33]
0177 0003 0004  |    |
0179 0005 0006  |    |
017b 0007 0008  |    |
017d 0009 000a  |    |
017f 000b 000c  |    |
0181 000d 0032  |   2|
0183 000e 000f  |    |
0185 0010 0011  |    |
0187 0012 0013  |    |
0189 0014 0015  |    |
018b 0016 0017  |    |
018d 0018 0019  |    |
018f 001a 001b  |    |
0191 001c 001d  |    |
0193 001e 001f  |    |
0195 0020 0021  |   !|
0197 0022 0023  | " #|
0199 0024 0025  | $ %|
019b 0026 0027  | & '|
019d 0028 0029  | ( )|
019f 002a 002b  | * +|
01a1 002c 002d  | , -|
01a3 002e 002f  | . /|
01a5 0030 0031  | 0 1|
01a7 0033       | 3  |
01a8 0000 0000  |    |		.BLANK	0000[0x58]