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

⟦f72e95475⟧

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

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 00e0       |    |		.CONST	0x00e0								; 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 0054       | T  |		.CONST	0x0054								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0016       |    |		.CONST	0x0016								; Number of locals
000b			INIT_0008:
000b 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated
000d 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated
000f 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated
0011 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated
0013 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated
0015 00bf       |    |		Action	Accept_Activation
0016 00e4       |    |		Load_Encached	Positive_Cache
0017 0093 0000  |    |		push_full_address	0x0
0019 604a       |`J  |		Indirect_Literal	Discrete,0x64,{0x80000000, 0x00010000}
001a 0273       | s  |		Execute	Discrete,Plus
001b e20d       |    |		Load	0x1,0xd
001c 6043       |`C  |		Indirect_Literal	Discrete,0x60,{0x00000000, 0x0000ffff}
001d 0279       | y  |		Execute	Discrete,And
001e 0273       | s  |		Execute	Discrete,Plus
001f e002       |    |		Load	0x0,0x2
0020 0273       | s  |		Execute	Discrete,Plus
0021 e003       |    |		Load	0x0,0x3
0022 0387       |    |		Declare_Variable	Package
0023 00d8       |    |		Load_Top	At_Offset_0
0024 020f       |    |		Execute	Module,Activate
0025 4800       |H   |		Short_Literal	0x0
0026 0093 009b  |    |		push_full_address	INIT_0098
0028 00f5       |    |		Load_Encached	Unused21
0029 037d       | }  |		Declare_Type	Task,Defined
002a 036f       | o  |		Declare_Variable	Task
002b e004       |    |		Load	0x0,0x4
002c e005       |    |		Load	0x0,0x5
002d 00db       |    |		Load_Top	At_Offset_3
002e 0095       |    |		Execute	Package,Field_Reference_Dynamic
002f e006       |    |		Load	0x0,0x6
0030 e215       |    |		Load	0x1,0x15
0031 0095       |    |		Execute	Package,Field_Reference_Dynamic
0032 e007       |    |		Load	0x0,0x7
0033 e215       |    |		Load	0x1,0x15
0034 0095       |    |		Execute	Package,Field_Reference_Dynamic
0035 e008       |    |		Load	0x0,0x8
0036 e215       |    |		Load	0x1,0x15
0037 0095       |    |		Execute	Package,Field_Reference_Dynamic
0038 e009       |    |		Load	0x0,0x9
0039 e215       |    |		Load	0x1,0x15
003a 0095       |    |		Execute	Package,Field_Reference_Dynamic
003b a00a       |    |		Store_Unchecked	0x0,0xa
003c 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
003d e00b       |    |		Load	0x0,0xb
003e e215       |    |		Load	0x1,0x15
003f 0095       |    |		Execute	Package,Field_Reference_Dynamic
0040 e00c       |    |		Load	0x0,0xc
0041 e215       |    |		Load	0x1,0x15
0042 0095       |    |		Execute	Package,Field_Reference_Dynamic
0043 e00d       |    |		Load	0x0,0xd
0044 e215       |    |		Load	0x1,0x15
0045 0095       |    |		Execute	Package,Field_Reference_Dynamic
0046 480b       |H   |		Short_Literal	0xb
0047 e216       |    |		Load	0x1,0x16
0048 020e       |    |		Execute	Module,Augment_Imports
0049 0007       |    |		Action	Break_Optional
004a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0051 00c7       |    |		Action	Elaborate_Subprogram
0052 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0053 00c7       |    |		Action	Elaborate_Subprogram
0054			BODY_0008:
0054 00be       |    |		Action	Activate_Tasks
0055 00bc       |    |		Action	Signal_Activated
0056 00bb       |    |		Action	Signal_Completion
0057 0000       |    |		.XXX[0x1]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b       | [  |		.CONST	0x005b								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0001       |    |		.CONST	0x0001								; Number of locals
005b			BODY_0058:
005b			INIT_0058:
005b 00da       |    |		Load_Top	At_Offset_2
005c e00e       |    |		Load	0x0,0xe
005d e215       |    |		Load	0x1,0x15
005e 0096       |    |		Execute	Package,Entry
005f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0060 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0064 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b 00da       |    |		Load_Top	At_Offset_2
006c e00f       |    |		Load	0x0,0xf
006d e215       |    |		Load	0x1,0x15
006e 0096       |    |		Execute	Package,Entry
006f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
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 00e4       |    |		Load_Encached	Positive_Cache
0074 00db       |    |		Load_Top	At_Offset_3
0075 e010       |    |		Load	0x0,0x10
0076 e215       |    |		Load	0x1,0x15
0077 0096       |    |		Execute	Package,Entry
0078 c5fe       |    |		Store	0x2,-0x2
0079 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
007a 0000 0000  |    |		.BLANK	0000[0x6]
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 e011       |    |		Load	0x0,0x11
0086 e215       |    |		Load	0x1,0x15
0087 0096       |    |		Execute	Package,Entry
0088 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0089 0000 0000  |    |		.BLANK	0000[0x7]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 00da       |    |		Load_Top	At_Offset_2
0094 e012       |    |		Load	0x0,0x12
0095 e215       |    |		Load	0x1,0x15
0096 0096       |    |		Execute	Package,Entry
0097 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00ab       |    |		.CONST	0x00ab								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0011       |    |		.CONST	0x0011								; Number of locals
009b			INIT_0098:
009b 00bf       |    |		Action	Accept_Activation
009c 00e2       |    |		Load_Encached	Integer_Cache
009d 4801       |H   |		Short_Literal	0x1
009e 480a       |H   |		Short_Literal	0xa
009f 00e9       |    |		Load_Encached	String_Cache
00a0 035b       | [  |		Declare_Type	Array,Constrained
00a1 0337       | 7  |		Declare_Variable	Array
00a2 4801       |H   |		Short_Literal	0x1
00a3 6038       |`8  |		Indirect_Literal	Discrete,0xdc,{0x00000000, 0x00000400}
00a4 e001       |    |		Load	0x0,0x1
00a5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00a6 035b       | [  |		Declare_Type	Array,Constrained
00a7 0337       | 7  |		Declare_Variable	Array
00a8 00e4       |    |		Load_Encached	Positive_Cache
00a9 00e2       |    |		Load_Encached	Integer_Cache
00aa 00bc       |    |		Action	Signal_Activated
00ab			BODY_0098:
00ab 00e4       |    |		Load_Encached	Positive_Cache
00ac 8002       |    |		Call	0x0,0x2
00ad 005a       | Z  |		Store_Top	Discrete,At_Offset_2
00ae 8003       |    |		Call	0x0,0x3
00af 8004       |    |		Call	0x0,0x4
00b0 00cf       |    |		Action	Mark_Auxiliary
00b1 00cf       |    |		Action	Mark_Auxiliary
00b2 00db       |    |		Load_Top	At_Offset_3
00b3 4801       |H   |		Short_Literal	0x1
00b4 0263       | c  |		Execute	Discrete,Above_Bound
00b5 7023       |p#  |		Jump_Nonzero	0xd9
00b6 e211       |    |		Load	0x1,0x11
00b7 4804       |H   |		Short_Literal	0x4
00b8 00da       |    |		Load_Top	At_Offset_2
00b9 8005       |    |		Call	0x0,0x5
00ba c211       |    |		Store	0x1,0x11
00bb e211       |    |		Load	0x1,0x11
00bc 701a       |p   |		Jump_Nonzero	0xd7
00bd e211       |    |		Load	0x1,0x11
00be 4801       |H   |		Short_Literal	0x1
00bf 00da       |    |		Load_Top	At_Offset_2
00c0 8005       |    |		Call	0x0,0x5
00c1 c211       |    |		Store	0x1,0x11
00c2 e211       |    |		Load	0x1,0x11
00c3 0f01       |    |		Execute_Immediate	Equal,0x1
00c4 6812       |h   |		Jump_Zero	0xd7
00c5 e20f       |    |		Load	0x1,0xf
00c6 00d9       |    |		Load_Top	At_Offset_1
00c7 8006       |    |		Call	0x0,0x6
00c8 00d1       |    |		Pop_Control	Pop_Count_1
00c9 4805       |H   |		Short_Literal	0x5
00ca e20f       |    |		Load	0x1,0xf
00cb 8007       |    |		Call	0x0,0x7
00cc 8008       |    |		Call	0x0,0x8
00cd 00d9       |    |		Load_Top	At_Offset_1
00ce 8009       |    |		Call	0x0,0x9
00cf e20f       |    |		Load	0x1,0xf
00d0 00d9       |    |		Load_Top	At_Offset_1
00d1 8006       |    |		Call	0x0,0x6
00d2 00d1       |    |		Pop_Control	Pop_Count_1
00d3 e20f       |    |		Load	0x1,0xf
00d4 800a       |    |		Call	0x0,0xa
00d5 00d8       |    |		Load_Top	At_Offset_0
00d6 800b       |    |		Call	0x0,0xb
00d7 00c8       |    |		Action	Pop_Auxiliary_Range
00d8 3fdd       |?   |		Loop_Increasing	0xb6
00d9 00ce       |    |		Action	Pop_Auxiliary
00da 00c9       |    |		Action	Pop_Auxiliary_Loop
00db 7fd5       |    |		Jump	0xb1
00dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000400}
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Debug Table
00e0 ; --------------------------------------------------------------------------------------
00e0 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0x7595,0x0000,0x0001,0x0009
00e6 000b 010a  |    |		.DBG4T	0x000b,0x010a,0xc000,0x0000
00ea 0016 0111  |    |		.DBG4T	0x0016,0x0111,0xc000,0x0000
00ee 005b 011c  | [  |		.DBG4T	0x005b,0x011c,0x1001,0x0000
00f2 006b 011f  | k  |		.DBG4T	0x006b,0x011f,0x1001,0x0000
00f6 0073 0122  | s "|		.DBG4T	0x0073,0x0122,0x1001,0x0000
00fa 0083 0125  |   %|		.DBG4T	0x0083,0x0125,0x1002,0x0000
00fe 0093 0128  |   (|		.DBG4T	0x0093,0x0128,0x1001,0x0000
0102 009b 0000  |    |		.DBG4T	0x009b,0x0000,0x0000,0x0000
0106 009c 012b  |   +|		.DBG4T	0x009c,0x012b,0x0000,0x0000
010a ; --------------------------------------------------------------------------------------
010a ; Debug chain
010a ; --------------------------------------------------------------------------------------
010a 0005 0000  |    |		.DBGLEN	0x0005,0x0000
010c 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013
0111 ; --------------------------------------------------------------------------------------
0111 ; Debug chain
0111 ; --------------------------------------------------------------------------------------
0111 0009 0000  |    |		.DBGLEN	0x0009,0x0000
0113 0016 0017  |    |		.DBGLNO	0x0016,0x0017,0x0025,0x002b,0x004a,0x004c,0x004e,0x0050,0x0052
011c ; --------------------------------------------------------------------------------------
011c ; Debug chain
011c ; --------------------------------------------------------------------------------------
011c 0000 0001  |    |		.DBGLEN	0x0000,0x0001
011e 005b       | [  |		.DBGLNO	0x005b
011f ; --------------------------------------------------------------------------------------
011f ; Debug chain
011f ; --------------------------------------------------------------------------------------
011f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0121 006b       | k  |		.DBGLNO	0x006b
0122 ; --------------------------------------------------------------------------------------
0122 ; Debug chain
0122 ; --------------------------------------------------------------------------------------
0122 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0124 0073       | s  |		.DBGLNO	0x0073
0125 ; --------------------------------------------------------------------------------------
0125 ; Debug chain
0125 ; --------------------------------------------------------------------------------------
0125 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0127 0083       |    |		.DBGLNO	0x0083
0128 ; --------------------------------------------------------------------------------------
0128 ; Debug chain
0128 ; --------------------------------------------------------------------------------------
0128 0000 0001  |    |		.DBGLEN	0x0000,0x0001
012a 0093       |    |		.DBGLNO	0x0093
012b ; --------------------------------------------------------------------------------------
012b ; Debug chain
012b ; --------------------------------------------------------------------------------------
012b 0005 000e  |    |		.DBGLEN	0x0005,0x000e
012d 009c 009d  |    |		.DBGLNO	0x009c,0x009d,0x00a2,0x00a8,0x00a9,0x00ab,0x00ae,0x00af,0x00b1,0x00b2,0x00b6,0x00bb,0x00bd,0x00c2,0x00c5,0x00c9,0x00cf,0x00d3,0x00d5
0140 0000 0000  |    |		.BLANK	0000[0xc0]