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

⟦d09d4d412⟧

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

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0108       |    |		.CONST	0x0108								; 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 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 001f       |    |		.CONST	0x001f								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0003       |    |		.CONST	0x0003								; Number of locals
001b			INIT_0018:
001b 029f 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Call
001d 029f 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Call
001f			BODY_0018:
001f 8402       |    |		Call	0x2,0x2
0020 8002       |    |		Call	0x0,0x2
0021 8003       |    |		Call	0x0,0x3
0022 4801       |H   |		Short_Literal	0x1
0023 8002       |    |		Call	0x0,0x2
0024 8004       |    |		Call	0x0,0x4
0025 00cf       |    |		Action	Mark_Auxiliary
0026 8005       |    |		Call	0x0,0x5
0027 4801       |H   |		Short_Literal	0x1
0028 0263       | c  |		Execute	Discrete,Above_Bound
0029 7005       |p   |		Jump_Nonzero	0x2f
002a 8002       |    |		Call	0x0,0x2
002b 00d9       |    |		Load_Top	At_Offset_1
002c 8006       |    |		Call	0x0,0x6
002d 00c8       |    |		Action	Pop_Auxiliary_Range
002e 3ffb       |?   |		Loop_Increasing	0x2a
002f 00c9       |    |		Action	Pop_Auxiliary_Loop
0030 8403       |    |		Call	0x2,0x3
0031 00c9       |    |		Action	Pop_Auxiliary_Loop
0032 7ffd       |    |		Jump	0x30
0033 0000 0000  |    |		.BLANK	0000[0x5]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b       | ;  |		.CONST	0x003b								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0001       |    |		.CONST	0x0001								; Number of locals
003b			BODY_0038:
003b			INIT_0038:
003b e007       |    |		Load	0x0,0x7
003c 0337       | 7  |		Declare_Variable	Array
003d 4809       |H   |		Short_Literal	0x9
003e 4800       |H   |		Short_Literal	0x0
003f 00da       |    |		Load_Top	At_Offset_2
0040 01d6       |    |		Execute	Vector,Field_Write
0041 4805       |H   |		Short_Literal	0x5
0042 4801       |H   |		Short_Literal	0x1
0043 00da       |    |		Load_Top	At_Offset_2
0044 01d6       |    |		Execute	Vector,Field_Write
0045 e007       |    |		Load	0x0,0x7
0046 01c3       |    |		Execute	Vector,Check_In_Type
0047 8008       |    |		Call	0x0,0x8
0048 e007       |    |		Load	0x0,0x7
0049 0337       | 7  |		Declare_Variable	Array
004a 480a       |H   |		Short_Literal	0xa
004b 4800       |H   |		Short_Literal	0x0
004c 00da       |    |		Load_Top	At_Offset_2
004d 01d6       |    |		Execute	Vector,Field_Write
004e 4804       |H   |		Short_Literal	0x4
004f 4801       |H   |		Short_Literal	0x1
0050 00da       |    |		Load_Top	At_Offset_2
0051 01d6       |    |		Execute	Vector,Field_Write
0052 e007       |    |		Load	0x0,0x7
0053 01c3       |    |		Execute	Vector,Check_In_Type
0054 8008       |    |		Call	0x0,0x8
0055 e007       |    |		Load	0x0,0x7
0056 0337       | 7  |		Declare_Variable	Array
0057 480a       |H   |		Short_Literal	0xa
0058 4800       |H   |		Short_Literal	0x0
0059 00da       |    |		Load_Top	At_Offset_2
005a 01d6       |    |		Execute	Vector,Field_Write
005b 4805       |H   |		Short_Literal	0x5
005c 4801       |H   |		Short_Literal	0x1
005d 00da       |    |		Load_Top	At_Offset_2
005e 01d6       |    |		Execute	Vector,Field_Write
005f e007       |    |		Load	0x0,0x7
0060 01c3       |    |		Execute	Vector,Check_In_Type
0061 8008       |    |		Call	0x0,0x8
0062 e007       |    |		Load	0x0,0x7
0063 0337       | 7  |		Declare_Variable	Array
0064 4808       |H   |		Short_Literal	0x8
0065 4800       |H   |		Short_Literal	0x0
0066 00da       |    |		Load_Top	At_Offset_2
0067 01d6       |    |		Execute	Vector,Field_Write
0068 4805       |H   |		Short_Literal	0x5
0069 4801       |H   |		Short_Literal	0x1
006a 00da       |    |		Load_Top	At_Offset_2
006b 01d6       |    |		Execute	Vector,Field_Write
006c e007       |    |		Load	0x0,0x7
006d 01c3       |    |		Execute	Vector,Check_In_Type
006e 8008       |    |		Call	0x0,0x8
006f e007       |    |		Load	0x0,0x7
0070 0337       | 7  |		Declare_Variable	Array
0071 4809       |H   |		Short_Literal	0x9
0072 4800       |H   |		Short_Literal	0x0
0073 00da       |    |		Load_Top	At_Offset_2
0074 01d6       |    |		Execute	Vector,Field_Write
0075 4804       |H   |		Short_Literal	0x4
0076 4801       |H   |		Short_Literal	0x1
0077 00da       |    |		Load_Top	At_Offset_2
0078 01d6       |    |		Execute	Vector,Field_Write
0079 e007       |    |		Load	0x0,0x7
007a 01c3       |    |		Execute	Vector,Check_In_Type
007b 8008       |    |		Call	0x0,0x8
007c e009       |    |		Load	0x0,0x9
007d 0337       | 7  |		Declare_Variable	Array
007e 4832       |H2  |		Short_Literal	0x32
007f 4801       |H   |		Short_Literal	0x1
0080 00da       |    |		Load_Top	At_Offset_2
0081 01d6       |    |		Execute	Vector,Field_Write
0082 4808       |H   |		Short_Literal	0x8
0083 4800       |H   |		Short_Literal	0x0
0084 00da       |    |		Load_Top	At_Offset_2
0085 01d6       |    |		Execute	Vector,Field_Write
0086 4806       |H   |		Short_Literal	0x6
0087 4802       |H   |		Short_Literal	0x2
0088 00da       |    |		Load_Top	At_Offset_2
0089 01d6       |    |		Execute	Vector,Field_Write
008a e009       |    |		Load	0x0,0x9
008b 01c3       |    |		Execute	Vector,Check_In_Type
008c 800a       |    |		Call	0x0,0xa
008d e009       |    |		Load	0x0,0x9
008e 0337       | 7  |		Declare_Variable	Array
008f 484b       |HK  |		Short_Literal	0x4b
0090 4801       |H   |		Short_Literal	0x1
0091 00da       |    |		Load_Top	At_Offset_2
0092 01d6       |    |		Execute	Vector,Field_Write
0093 4809       |H   |		Short_Literal	0x9
0094 4800       |H   |		Short_Literal	0x0
0095 00da       |    |		Load_Top	At_Offset_2
0096 01d6       |    |		Execute	Vector,Field_Write
0097 4806       |H   |		Short_Literal	0x6
0098 4802       |H   |		Short_Literal	0x2
0099 00da       |    |		Load_Top	At_Offset_2
009a 01d6       |    |		Execute	Vector,Field_Write
009b e009       |    |		Load	0x0,0x9
009c 01c3       |    |		Execute	Vector,Check_In_Type
009d 800a       |    |		Call	0x0,0xa
009e e009       |    |		Load	0x0,0x9
009f 0337       | 7  |		Declare_Variable	Array
00a0 485f       |H_  |		Short_Literal	0x5f
00a1 4801       |H   |		Short_Literal	0x1
00a2 00da       |    |		Load_Top	At_Offset_2
00a3 01d6       |    |		Execute	Vector,Field_Write
00a4 480a       |H   |		Short_Literal	0xa
00a5 4800       |H   |		Short_Literal	0x0
00a6 00da       |    |		Load_Top	At_Offset_2
00a7 01d6       |    |		Execute	Vector,Field_Write
00a8 4806       |H   |		Short_Literal	0x6
00a9 4802       |H   |		Short_Literal	0x2
00aa 00da       |    |		Load_Top	At_Offset_2
00ab 01d6       |    |		Execute	Vector,Field_Write
00ac e009       |    |		Load	0x0,0x9
00ad 01c3       |    |		Execute	Vector,Check_In_Type
00ae 800a       |    |		Call	0x0,0xa
00af e009       |    |		Load	0x0,0x9
00b0 0337       | 7  |		Declare_Variable	Array
00b1 4864       |Hd  |		Short_Literal	0x64
00b2 4801       |H   |		Short_Literal	0x1
00b3 00da       |    |		Load_Top	At_Offset_2
00b4 01d6       |    |		Execute	Vector,Field_Write
00b5 4808       |H   |		Short_Literal	0x8
00b6 4800       |H   |		Short_Literal	0x0
00b7 00da       |    |		Load_Top	At_Offset_2
00b8 01d6       |    |		Execute	Vector,Field_Write
00b9 4806       |H   |		Short_Literal	0x6
00ba 4802       |H   |		Short_Literal	0x2
00bb 00da       |    |		Load_Top	At_Offset_2
00bc 01d6       |    |		Execute	Vector,Field_Write
00bd e009       |    |		Load	0x0,0x9
00be 01c3       |    |		Execute	Vector,Check_In_Type
00bf 800a       |    |		Call	0x0,0xa
00c0 e00b       |    |		Load	0x0,0xb
00c1 0337       | 7  |		Declare_Variable	Array
00c2 4aee       |J   |		Short_Literal	0x2ee
00c3 4801       |H   |		Short_Literal	0x1
00c4 00da       |    |		Load_Top	At_Offset_2
00c5 01d6       |    |		Execute	Vector,Field_Write
00c6 480a       |H   |		Short_Literal	0xa
00c7 4800       |H   |		Short_Literal	0x0
00c8 00da       |    |		Load_Top	At_Offset_2
00c9 01d6       |    |		Execute	Vector,Field_Write
00ca 4805       |H   |		Short_Literal	0x5
00cb 4802       |H   |		Short_Literal	0x2
00cc 00da       |    |		Load_Top	At_Offset_2
00cd 01d6       |    |		Execute	Vector,Field_Write
00ce e00b       |    |		Load	0x0,0xb
00cf 01c3       |    |		Execute	Vector,Check_In_Type
00d0 800c       |    |		Call	0x0,0xc
00d1 e00b       |    |		Load	0x0,0xb
00d2 0337       | 7  |		Declare_Variable	Array
00d3 6020       |`   |		Indirect_Literal	Discrete,0xf4,{0x00000000, 0x00002710}
00d4 4801       |H   |		Short_Literal	0x1
00d5 00da       |    |		Load_Top	At_Offset_2
00d6 01d6       |    |		Execute	Vector,Field_Write
00d7 4809       |H   |		Short_Literal	0x9
00d8 4800       |H   |		Short_Literal	0x0
00d9 00da       |    |		Load_Top	At_Offset_2
00da 01d6       |    |		Execute	Vector,Field_Write
00db 4805       |H   |		Short_Literal	0x5
00dc 4802       |H   |		Short_Literal	0x2
00dd 00da       |    |		Load_Top	At_Offset_2
00de 01d6       |    |		Execute	Vector,Field_Write
00df e00b       |    |		Load	0x0,0xb
00e0 01c3       |    |		Execute	Vector,Check_In_Type
00e1 800c       |    |		Call	0x0,0xc
00e2 e00b       |    |		Load	0x0,0xb
00e3 0337       | 7  |		Declare_Variable	Array
00e4 4896       |H   |		Short_Literal	0x96
00e5 4801       |H   |		Short_Literal	0x1
00e6 00da       |    |		Load_Top	At_Offset_2
00e7 01d6       |    |		Execute	Vector,Field_Write
00e8 480a       |H   |		Short_Literal	0xa
00e9 4800       |H   |		Short_Literal	0x0
00ea 00da       |    |		Load_Top	At_Offset_2
00eb 01d6       |    |		Execute	Vector,Field_Write
00ec 4804       |H   |		Short_Literal	0x4
00ed 4802       |H   |		Short_Literal	0x2
00ee 00da       |    |		Load_Top	At_Offset_2
00ef 01d6       |    |		Execute	Vector,Field_Write
00f0 e00b       |    |		Load	0x0,0xb
00f1 01c3       |    |		Execute	Vector,Check_In_Type
00f2 800c       |    |		Call	0x0,0xc
00f3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00f4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00002710}
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fc       |    |		.CONST	0x00fc								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0002       |    |		.CONST	0x0002								; Number of locals
00fb			INIT_00f8:
00fb 800d       |    |		Call	0x0,0xd
00fc			BODY_00f8:
00fc 00d8       |    |		Load_Top	At_Offset_0
00fd 800e       |    |		Call	0x0,0xe
00fe 01de       |    |		Execute	Vector,Not_Equal
00ff 6804       |h   |		Jump_Zero	0x104
0100 00d8       |    |		Load_Top	At_Offset_0
0101 800f       |    |		Call	0x0,0xf
0102 8010       |    |		Call	0x0,0x10
0103 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0104 00cc       |    |		Action	Pop_Block
0105 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0106 0000 0000  |    |		.XXX[0x2]
0108 ; --------------------------------------------------------------------------------------
0108 ; Debug Table
0108 ; --------------------------------------------------------------------------------------
0108 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0x6215,0x0000,0x0001,0x0004
010e 000b 0000  |    |		.DBG4T	0x000b,0x0000,0x8000,0x0000
0112 001b 011e  |    |		.DBG4T	0x001b,0x011e,0x8001,0xc000
0116 003b 012e  | ; .|		.DBG4T	0x003b,0x012e,0x0001,0x0000
011a 00fb 013c  |   <|		.DBG4T	0x00fb,0x013c,0x0004,0x0000
011e ; --------------------------------------------------------------------------------------
011e ; Debug chain
011e ; --------------------------------------------------------------------------------------
011e 0001 0006  |    |		.DBGLEN	0x0001,0x0006
0120 001b 001f  |    |		.DBGLNO	0x001b,0x001f,0x0020,0x0022,0x0026,0x002a,0x0030
0127 0003 0001  |    |		.XXX[0x7]
0129 0002 0003  |    |
012b 0004 0005  |    |
012d 0007       |    |
012e ; --------------------------------------------------------------------------------------
012e ; Debug chain
012e ; --------------------------------------------------------------------------------------
012e 0000 000c  |    |		.DBGLEN	0x0000,0x000c
0130 003b 0048  | ; H|		.DBGLNO	0x003b,0x0048,0x0055,0x0062,0x006f,0x007c,0x008d,0x009e,0x00af,0x00c0,0x00d1,0x00e2
013c ; --------------------------------------------------------------------------------------
013c ; Debug chain
013c ; --------------------------------------------------------------------------------------
013c 0001 0003  |    |		.DBGLEN	0x0001,0x0003
013e 00fb 00fc  |    |		.DBGLNO	0x00fb,0x00fc,0x0100,0x0104
0142 0000 0000  |    |		.BLANK	0000[0xbe]