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

⟦7f19ee1e1⟧

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

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 0090       |    |		.CONST	0x0090								; 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 0020       |    |		.CONST	0x0020								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0011       |    |		.CONST	0x0011								; Number of locals
000b			INIT_0008:
000b 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated
000d 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated
000f 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated
0011 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated
0013 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated
0015 00bf       |    |		Action	Accept_Activation
0016 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0017 00c7       |    |		Action	Elaborate_Subprogram
0018 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0019 00c7       |    |		Action	Elaborate_Subprogram
001a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
001b 00c7       |    |		Action	Elaborate_Subprogram
001c 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
001d 00c7       |    |		Action	Elaborate_Subprogram
001e 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
001f 00c7       |    |		Action	Elaborate_Subprogram
0020			BODY_0008:
0020 00bc       |    |		Action	Signal_Activated
0021 00bb       |    |		Action	Signal_Completion
0022 0000 0000  |    |		.BLANK	0000[0x6]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 0030       | 0  |		.CONST	0x0030								; Address of begin
0029 0004       |    |		.CONST	0x0004								; Address of exception handler
002a 0002       |    |		.CONST	0x0002								; Number of locals
002b			INIT_0028:
002b 4801       |H   |		Short_Literal	0x1
002c 4806       |H   |		Short_Literal	0x6
002d 00e9       |    |		Load_Encached	String_Cache
002e 0334       | 4  |		Declare_Variable	Array,With_Constraint
002f 501c       |P   |		Indirect_Literal	Any,0x4c,{0x5443502f, 0x49502020}
0030			BODY_0028:
0030 00d8       |    |		Load_Top	At_Offset_0
0031 e002       |    |		Load	0x0,0x2
0032 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0033 e003       |    |		Load	0x0,0x3
0034 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0035 8004       |    |		Call	0x0,0x4
0036 e5fe       |    |		Load	0x2,-0x2
0037 016d       | m  |		Execute	Variant_Record,Structure_Write
0038 00d8       |    |		Load_Top	At_Offset_0
0039 e002       |    |		Load	0x0,0x2
003a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
003b e005       |    |		Load	0x0,0x5
003c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
003d 8004       |    |		Call	0x0,0x4
003e e5fd       |    |		Load	0x2,-0x3
003f 016d       | m  |		Execute	Variant_Record,Structure_Write
0040 00e1       |    |		Load_Encached	Boolean_Cache
0041 e006       |    |		Load	0x0,0x6
0042 4802       |H   |		Short_Literal	0x2
0043 e007       |    |		Load	0x0,0x7
0044 e008       |    |		Load	0x0,0x8
0045 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0046 c5ff       |    |		Store	0x2,-0x1
0047 c5fc       |    |		Store	0x2,-0x4
0048 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0049 0000 0000  |    |		.XXX[0x3]
004b 0000       |    |
004c 5443 502f  |TCP/|		.LITERAL	{0x5443502f, 0x49502020}
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 00da       |    |		Load_Top	At_Offset_2
0054 4801       |H   |		Short_Literal	0x1
0055 e007       |    |		Load	0x0,0x7
0056 e009       |    |		Load	0x0,0x9
0057 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0058 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0059 0000 0000  |    |		.BLANK	0000[0x7]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063       | c  |		.CONST	0x0063								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0001       |    |		.CONST	0x0001								; Number of locals
0063			BODY_0060:
0063			INIT_0060:
0063 e5fc       |    |		Load	0x2,-0x4
0064 00db       |    |		Load_Top	At_Offset_3
0065 e5fe       |    |		Load	0x2,-0x2
0066 800a       |    |		Call	0x0,0xa
0067 e003       |    |		Load	0x0,0x3
0068 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0069 e5fd       |    |		Load	0x2,-0x3
006a 4804       |H   |		Short_Literal	0x4
006b e00b       |    |		Load	0x0,0xb
006c e00c       |    |		Load	0x0,0xc
006d 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
006e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
006f 0000       |    |		.XXX[0x1]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073       | s  |		.CONST	0x0073								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0001       |    |		.CONST	0x0001								; Number of locals
0073			BODY_0070:
0073			INIT_0070:
0073 00e1       |    |		Load_Encached	Boolean_Cache
0074 e5fe       |    |		Load	0x2,-0x2
0075 e5ff       |    |		Load	0x2,-0x1
0076 4803       |H   |		Short_Literal	0x3
0077 e007       |    |		Load	0x0,0x7
0078 e00d       |    |		Load	0x0,0xd
0079 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
007a 00d1       |    |		Pop_Control	Pop_Count_1
007b c5fd       |    |		Store	0x2,-0x3
007c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
007d 0000 0000  |    |		.XXX[0x3]
007f 0000       |    |
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083       |    |		.CONST	0x0083								; Address of begin
0081 0004       |    |		.CONST	0x0004								; Address of exception handler
0082 0001       |    |		.CONST	0x0001								; Number of locals
0083			BODY_0080:
0083			INIT_0080:
0083 00db       |    |		Load_Top	At_Offset_3
0084 00db       |    |		Load_Top	At_Offset_3
0085 4802       |H   |		Short_Literal	0x2
0086 e007       |    |		Load	0x0,0x7
0087 e00e       |    |		Load	0x0,0xe
0088 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0089 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
008a 0000 0000  |    |		.BLANK	0000[0x6]
0090 ; --------------------------------------------------------------------------------------
0090 ; Debug Table
0090 ; --------------------------------------------------------------------------------------
0090 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0x3fc7,0x0000,0x0001,0x0007
0096 000b 00b2  |    |		.DBG4T	0x000b,0x00b2,0x8000,0x0000
009a 0016 00b9  |    |		.DBG4T	0x0016,0x00b9,0x8000,0x0000
009e 002b 00c0  | +  |		.DBG4T	0x002b,0x00c0,0x0001,0x0000
00a2 0053 00c6  | S  |		.DBG4T	0x0053,0x00c6,0x0001,0x0000
00a6 0063 00c9  | c  |		.DBG4T	0x0063,0x00c9,0x0001,0x0000
00aa 0073 00cc  | s  |		.DBG4T	0x0073,0x00cc,0x0001,0x0000
00ae 0083 00cf  |    |		.DBG4T	0x0083,0x00cf,0x0001,0x0000
00b2 ; --------------------------------------------------------------------------------------
00b2 ; Debug chain
00b2 ; --------------------------------------------------------------------------------------
00b2 0005 0000  |    |		.DBGLEN	0x0005,0x0000
00b4 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013
00b9 ; --------------------------------------------------------------------------------------
00b9 ; Debug chain
00b9 ; --------------------------------------------------------------------------------------
00b9 0005 0000  |    |		.DBGLEN	0x0005,0x0000
00bb 0016 0018  |    |		.DBGLNO	0x0016,0x0018,0x001a,0x001c,0x001e
00c0 ; --------------------------------------------------------------------------------------
00c0 ; Debug chain
00c0 ; --------------------------------------------------------------------------------------
00c0 0001 0003  |    |		.DBGLEN	0x0001,0x0003
00c2 002b 0030  | + 0|		.DBGLNO	0x002b,0x0030,0x0038,0x0040
00c6 ; --------------------------------------------------------------------------------------
00c6 ; Debug chain
00c6 ; --------------------------------------------------------------------------------------
00c6 0000 0001  |    |		.DBGLEN	0x0000,0x0001
00c8 0053       | S  |		.DBGLNO	0x0053
00c9 ; --------------------------------------------------------------------------------------
00c9 ; Debug chain
00c9 ; --------------------------------------------------------------------------------------
00c9 0000 0001  |    |		.DBGLEN	0x0000,0x0001
00cb 0063       | c  |		.DBGLNO	0x0063
00cc ; --------------------------------------------------------------------------------------
00cc ; Debug chain
00cc ; --------------------------------------------------------------------------------------
00cc 0000 0001  |    |		.DBGLEN	0x0000,0x0001
00ce 0073       | s  |		.DBGLNO	0x0073
00cf ; --------------------------------------------------------------------------------------
00cf ; Debug chain
00cf ; --------------------------------------------------------------------------------------
00cf 0000 0001  |    |		.DBGLEN	0x0000,0x0001
00d1 0083       |    |		.DBGLNO	0x0083
00d2 0000 0000  |    |		.BLANK	0000[0x12e]