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

⟦6fd230cfe⟧

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

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0100       |    |		.CONST	0x0100								; 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 0026       | &  |		.CONST	0x0026								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0011       |    |		.CONST	0x0011								; Number of locals
000b			INIT_0008:
000b a003       |    |		Store_Unchecked	0x0,0x3
000c 00c6       |    |		Action	Check_Subprogram_Elaborated
000d a004       |    |		Store_Unchecked	0x0,0x4
000e 0129       | )  |		Execute	Any,Make_Visible
000f 0093 0000  |    |		push_full_address	0x0
0011 6022       |`"  |		Indirect_Literal	Discrete,0x34,{0x80000000, 0x00020000}
0012 0273       | s  |		Execute	Discrete,Plus
0013 e005       |    |		Load	0x0,0x5
0014 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0015 601a       |`   |		Indirect_Literal	Discrete,0x30,{0x00000000, 0x0000ffff}
0016 0279       | y  |		Execute	Discrete,And
0017 0273       | s  |		Execute	Discrete,Plus
0018 e006       |    |		Load	0x0,0x6
0019 0273       | s  |		Execute	Discrete,Plus
001a 0129       | )  |		Execute	Any,Make_Visible
001b 4800       |H   |		Short_Literal	0x0
001c 0129       | )  |		Execute	Any,Make_Visible
001d 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated
001f 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated
0021 00bf       |    |		Action	Accept_Activation
0022 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0023 00c7       |    |		Action	Elaborate_Subprogram
0024 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0025 00c7       |    |		Action	Elaborate_Subprogram
0026			BODY_0008:
0026 00bc       |    |		Action	Signal_Activated
0027 00bb       |    |		Action	Signal_Completion
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002b       | +  |		.CONST	0x002b								; Address of begin
0029 0004       |    |		.CONST	0x0004								; Address of exception handler
002a 0001       |    |		.CONST	0x0001								; Number of locals
002b			BODY_0028:
002b			INIT_0028:
002b 8007       |    |		Call	0x0,0x7
002c 8008       |    |		Call	0x0,0x8
002d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
002e 0000 0000  |    |		.XXX[0x2]
0030 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0034 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0043       | C  |		.CONST	0x0043								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0004       |    |		.CONST	0x0004								; Number of locals
003b			INIT_0038:
003b e009       |    |		Load	0x0,0x9
003c 02ff       |    |		Declare_Variable	Variant_Record
003d 00d8       |    |		Load_Top	At_Offset_0
003e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
003f 00e2       |    |		Load_Encached	Integer_Cache
0040 0623       | #  |		Execute_Immediate	Set_Value_Unchecked,0x23
0041 00e2       |    |		Load_Encached	Integer_Cache
0042 0620       |    |		Execute_Immediate	Set_Value_Unchecked,0x20
0043			BODY_0038:
0043 e00a       |    |		Load	0x0,0xa
0044 0337       | 7  |		Declare_Variable	Array
0045 e00b       |    |		Load	0x0,0xb
0046 4800       |H   |		Short_Literal	0x0
0047 00da       |    |		Load_Top	At_Offset_2
0048 01d6       |    |		Execute	Vector,Field_Write
0049 e00a       |    |		Load	0x0,0xa
004a 01c3       |    |		Execute	Vector,Check_In_Type
004b 800c       |    |		Call	0x0,0xc
004c e00b       |    |		Load	0x0,0xb
004d e00d       |    |		Load	0x0,0xd
004e 800e       |    |		Call	0x0,0xe
004f e00f       |    |		Load	0x0,0xf
0050 0337       | 7  |		Declare_Variable	Array
0051 e5ff       |    |		Load	0x2,-0x1
0052 8010       |    |		Call	0x0,0x10
0053 4800       |H   |		Short_Literal	0x0
0054 00da       |    |		Load_Top	At_Offset_2
0055 01d6       |    |		Execute	Vector,Field_Write
0056 e00f       |    |		Load	0x0,0xf
0057 01c3       |    |		Execute	Vector,Check_In_Type
0058 8011       |    |		Call	0x0,0x11
0059 e012       |    |		Load	0x0,0x12
005a 0337       | 7  |		Declare_Variable	Array
005b e00b       |    |		Load	0x0,0xb
005c 4800       |H   |		Short_Literal	0x0
005d 00da       |    |		Load_Top	At_Offset_2
005e 01d6       |    |		Execute	Vector,Field_Write
005f e012       |    |		Load	0x0,0x12
0060 01c3       |    |		Execute	Vector,Check_In_Type
0061 8013       |    |		Call	0x0,0x13
0062 e014       |    |		Load	0x0,0x14
0063 0337       | 7  |		Declare_Variable	Array
0064 e00b       |    |		Load	0x0,0xb
0065 4800       |H   |		Short_Literal	0x0
0066 00da       |    |		Load_Top	At_Offset_2
0067 01d6       |    |		Execute	Vector,Field_Write
0068 e014       |    |		Load	0x0,0x14
0069 01c3       |    |		Execute	Vector,Check_In_Type
006a 8015       |    |		Call	0x0,0x15
006b e016       |    |		Load	0x0,0x16
006c 0337       | 7  |		Declare_Variable	Array
006d e00b       |    |		Load	0x0,0xb
006e 4800       |H   |		Short_Literal	0x0
006f 00da       |    |		Load_Top	At_Offset_2
0070 01d6       |    |		Execute	Vector,Field_Write
0071 e016       |    |		Load	0x0,0x16
0072 01c3       |    |		Execute	Vector,Check_In_Type
0073 8017       |    |		Call	0x0,0x17
0074 e018       |    |		Load	0x0,0x18
0075 0337       | 7  |		Declare_Variable	Array
0076 e00b       |    |		Load	0x0,0xb
0077 4800       |H   |		Short_Literal	0x0
0078 00da       |    |		Load_Top	At_Offset_2
0079 01d6       |    |		Execute	Vector,Field_Write
007a e018       |    |		Load	0x0,0x18
007b 01c3       |    |		Execute	Vector,Check_In_Type
007c 8019       |    |		Call	0x0,0x19
007d e01a       |    |		Load	0x0,0x1a
007e 0337       | 7  |		Declare_Variable	Array
007f e01b       |    |		Load	0x0,0x1b
0080 4800       |H   |		Short_Literal	0x0
0081 00da       |    |		Load_Top	At_Offset_2
0082 01d6       |    |		Execute	Vector,Field_Write
0083 e01a       |    |		Load	0x0,0x1a
0084 01c3       |    |		Execute	Vector,Check_In_Type
0085 801c       |    |		Call	0x0,0x1c
0086 e01d       |    |		Load	0x0,0x1d
0087 0337       | 7  |		Declare_Variable	Array
0088 e01b       |    |		Load	0x0,0x1b
0089 4800       |H   |		Short_Literal	0x0
008a 00da       |    |		Load_Top	At_Offset_2
008b 01d6       |    |		Execute	Vector,Field_Write
008c e01d       |    |		Load	0x0,0x1d
008d 01c3       |    |		Execute	Vector,Check_In_Type
008e 801e       |    |		Call	0x0,0x1e
008f e01f       |    |		Load	0x0,0x1f
0090 0337       | 7  |		Declare_Variable	Array
0091 e020       |    |		Load	0x0,0x20
0092 4800       |H   |		Short_Literal	0x0
0093 00da       |    |		Load_Top	At_Offset_2
0094 01d6       |    |		Execute	Vector,Field_Write
0095 e01f       |    |		Load	0x0,0x1f
0096 01c3       |    |		Execute	Vector,Check_In_Type
0097 8021       | !  |		Call	0x0,0x21
0098 e022       | "  |		Load	0x0,0x22
0099 0337       | 7  |		Declare_Variable	Array
009a e00b       |    |		Load	0x0,0xb
009b 4800       |H   |		Short_Literal	0x0
009c 00da       |    |		Load_Top	At_Offset_2
009d 01d6       |    |		Execute	Vector,Field_Write
009e e022       | "  |		Load	0x0,0x22
009f 01c3       |    |		Execute	Vector,Check_In_Type
00a0 8023       | #  |		Call	0x0,0x23
00a1 e5ff       |    |		Load	0x2,-0x1
00a2 0275       | u  |		Execute	Discrete,Unary_Minus
00a3 8010       |    |		Call	0x0,0x10
00a4 00db       |    |		Load_Top	At_Offset_3
00a5 016d       | m  |		Execute	Variant_Record,Structure_Write
00a6 e024       | $  |		Load	0x0,0x24
00a7 0337       | 7  |		Declare_Variable	Array
00a8 00db       |    |		Load_Top	At_Offset_3
00a9 4800       |H   |		Short_Literal	0x0
00aa 00da       |    |		Load_Top	At_Offset_2
00ab 01d6       |    |		Execute	Vector,Field_Write
00ac e024       | $  |		Load	0x0,0x24
00ad 01c3       |    |		Execute	Vector,Check_In_Type
00ae 8025       | %  |		Call	0x0,0x25
00af e026       | &  |		Load	0x0,0x26
00b0 0337       | 7  |		Declare_Variable	Array
00b1 e00b       |    |		Load	0x0,0xb
00b2 4800       |H   |		Short_Literal	0x0
00b3 00da       |    |		Load_Top	At_Offset_2
00b4 01d6       |    |		Execute	Vector,Field_Write
00b5 e026       | &  |		Load	0x0,0x26
00b6 01c3       |    |		Execute	Vector,Check_In_Type
00b7 8027       | '  |		Call	0x0,0x27
00b8 e028       | (  |		Load	0x0,0x28
00b9 0337       | 7  |		Declare_Variable	Array
00ba e00b       |    |		Load	0x0,0xb
00bb 4800       |H   |		Short_Literal	0x0
00bc 00da       |    |		Load_Top	At_Offset_2
00bd 01d6       |    |		Execute	Vector,Field_Write
00be e028       | (  |		Load	0x0,0x28
00bf 01c3       |    |		Execute	Vector,Check_In_Type
00c0 8029       | )  |		Call	0x0,0x29
00c1 e02a       | *  |		Load	0x0,0x2a
00c2 0337       | 7  |		Declare_Variable	Array
00c3 4828       |H(  |		Short_Literal	0x28
00c4 8010       |    |		Call	0x0,0x10
00c5 4800       |H   |		Short_Literal	0x0
00c6 00da       |    |		Load_Top	At_Offset_2
00c7 01d6       |    |		Execute	Vector,Field_Write
00c8 e02a       | *  |		Load	0x0,0x2a
00c9 01c3       |    |		Execute	Vector,Check_In_Type
00ca 802b       | +  |		Call	0x0,0x2b
00cb e02c       | ,  |		Load	0x0,0x2c
00cc 0337       | 7  |		Declare_Variable	Array
00cd 00da       |    |		Load_Top	At_Offset_2
00ce 8010       |    |		Call	0x0,0x10
00cf 4800       |H   |		Short_Literal	0x0
00d0 00da       |    |		Load_Top	At_Offset_2
00d1 01d6       |    |		Execute	Vector,Field_Write
00d2 e02c       | ,  |		Load	0x0,0x2c
00d3 01c3       |    |		Execute	Vector,Check_In_Type
00d4 802d       | -  |		Call	0x0,0x2d
00d5 e02e       | .  |		Load	0x0,0x2e
00d6 0337       | 7  |		Declare_Variable	Array
00d7 00da       |    |		Load_Top	At_Offset_2
00d8 0275       | u  |		Execute	Discrete,Unary_Minus
00d9 8010       |    |		Call	0x0,0x10
00da 4800       |H   |		Short_Literal	0x0
00db 00da       |    |		Load_Top	At_Offset_2
00dc 01d6       |    |		Execute	Vector,Field_Write
00dd e02e       | .  |		Load	0x0,0x2e
00de 01c3       |    |		Execute	Vector,Check_In_Type
00df 802f       | /  |		Call	0x0,0x2f
00e0 e030       | 0  |		Load	0x0,0x30
00e1 0337       | 7  |		Declare_Variable	Array
00e2 00d9       |    |		Load_Top	At_Offset_1
00e3 8010       |    |		Call	0x0,0x10
00e4 4800       |H   |		Short_Literal	0x0
00e5 00da       |    |		Load_Top	At_Offset_2
00e6 01d6       |    |		Execute	Vector,Field_Write
00e7 e030       | 0  |		Load	0x0,0x30
00e8 01c3       |    |		Execute	Vector,Check_In_Type
00e9 8031       | 1  |		Call	0x0,0x31
00ea e032       | 2  |		Load	0x0,0x32
00eb 0337       | 7  |		Declare_Variable	Array
00ec 00d9       |    |		Load_Top	At_Offset_1
00ed 0275       | u  |		Execute	Discrete,Unary_Minus
00ee 8010       |    |		Call	0x0,0x10
00ef 4800       |H   |		Short_Literal	0x0
00f0 00da       |    |		Load_Top	At_Offset_2
00f1 01d6       |    |		Execute	Vector,Field_Write
00f2 e032       | 2  |		Load	0x0,0x32
00f3 01c3       |    |		Execute	Vector,Check_In_Type
00f4 8033       | 3  |		Call	0x0,0x33
00f5 e034       | 4  |		Load	0x0,0x34
00f6 0337       | 7  |		Declare_Variable	Array
00f7 e00b       |    |		Load	0x0,0xb
00f8 4800       |H   |		Short_Literal	0x0
00f9 00da       |    |		Load_Top	At_Offset_2
00fa 01d6       |    |		Execute	Vector,Field_Write
00fb e034       | 4  |		Load	0x0,0x34
00fc 01c3       |    |		Execute	Vector,Check_In_Type
00fd 8035       | 5  |		Call	0x0,0x35
00fe 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00ff 0000       |    |		.XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; Debug Table
0100 ; --------------------------------------------------------------------------------------
0100 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x512d,0x0000,0x0001,0x0004
0106 000b 0116  |    |		.DBG4T	0x000b,0x0116,0x0000,0x0000
010a 0022 011b  | "  |		.DBG4T	0x0022,0x011b,0x0000,0x0000
010e 002b 011f  | +  |		.DBG4T	0x002b,0x011f,0x0001,0x0000
0112 003b 0122  | ; "|		.DBG4T	0x003b,0x0122,0x0001,0x0000
0116 ; --------------------------------------------------------------------------------------
0116 ; Debug chain
0116 ; --------------------------------------------------------------------------------------
0116 0003 0000  |    |		.DBGLEN	0x0003,0x0000
0118 000b 001d  |    |		.DBGLNO	0x000b,0x001d,0x001f
011b ; --------------------------------------------------------------------------------------
011b ; Debug chain
011b ; --------------------------------------------------------------------------------------
011b 0002 0000  |    |		.DBGLEN	0x0002,0x0000
011d 0022 0024  | " $|		.DBGLNO	0x0022,0x0024
011f ; --------------------------------------------------------------------------------------
011f ; Debug chain
011f ; --------------------------------------------------------------------------------------
011f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0121 002b       | +  |		.DBGLNO	0x002b
0122 ; --------------------------------------------------------------------------------------
0122 ; Debug chain
0122 ; --------------------------------------------------------------------------------------
0122 0003 0015  |    |		.DBGLEN	0x0003,0x0015
0124 003b 003f  | ; ?|		.DBGLNO	0x003b,0x003f,0x0041,0x0043,0x004c,0x004f,0x0059,0x0062,0x006b,0x0074,0x007d,0x0086,0x008f,0x0098,0x00a1,0x00a6,0x00af,0x00b8,0x00c1,0x00cb,0x00d5,0x00e0,0x00ea,0x00f5
013c 0000 0000  |    |		.BLANK	0000[0xc4]