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

⟦f3bed172c⟧

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

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 00f0       |    |		.CONST	0x00f0								; 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 003d       | =  |		.CONST	0x003d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000e       |    |		.CONST	0x000e								; Number of locals
000b			INIT_0008:
000b 029a 0043  |   C|		Declare_Subprogram	INIT_0040,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 4800       |H   |		Short_Literal	0x0
000f 0093 0053  |   S|		push_full_address	INIT_0050
0011 02a0       |    |		Declare_Subprogram	Null_Subprogram
0012 038e       |    |		Declare_Type	Package,Defined
0013 0387       |    |		Declare_Variable	Package
0014 e002       |    |		Load	0x0,0x2
0015 e003       |    |		Load	0x0,0x3
0016 e004       |    |		Load	0x0,0x4
0017 e005       |    |		Load	0x0,0x5
0018 e006       |    |		Load	0x0,0x6
0019 e007       |    |		Load	0x0,0x7
001a e008       |    |		Load	0x0,0x8
001b a009       |    |		Store_Unchecked	0x0,0x9
001c a00a       |    |		Store_Unchecked	0x0,0xa
001d a00b       |    |		Store_Unchecked	0x0,0xb
001e a00c       |    |		Store_Unchecked	0x0,0xc
001f a00d       |    |		Store_Unchecked	0x0,0xd
0020 a00e       |    |		Store_Unchecked	0x0,0xe
0021 a00f       |    |		Store_Unchecked	0x0,0xf
0022 a010       |    |		Store_Unchecked	0x0,0x10
0023 a011       |    |		Store_Unchecked	0x0,0x11
0024 a012       |    |		Store_Unchecked	0x0,0x12
0025 a013       |    |		Store_Unchecked	0x0,0x13
0026 a014       |    |		Store_Unchecked	0x0,0x14
0027 a015       |    |		Store_Unchecked	0x0,0x15
0028 a016       |    |		Store_Unchecked	0x0,0x16
0029 a017       |    |		Store_Unchecked	0x0,0x17
002a a018       |    |		Store_Unchecked	0x0,0x18
002b e019       |    |		Load	0x0,0x19
002c e01a       |    |		Load	0x0,0x1a
002d a01b       |    |		Store_Unchecked	0x0,0x1b
002e a01c       |    |		Store_Unchecked	0x0,0x1c
002f a01d       |    |		Store_Unchecked	0x0,0x1d
0030 a01e       |    |		Store_Unchecked	0x0,0x1e
0031 e01f       |    |		Load	0x0,0x1f
0032 e020       |    |		Load	0x0,0x20
0033 e021       | !  |		Load	0x0,0x21
0034 a022       | "  |		Store_Unchecked	0x0,0x22
0035 a023       | #  |		Store_Unchecked	0x0,0x23
0036 4822       |H"  |		Short_Literal	0x22
0037 e20e       |    |		Load	0x1,0xe
0038 020e       |    |		Execute	Module,Augment_Imports
0039 00d8       |    |		Load_Top	At_Offset_0
003a 020f       |    |		Execute	Module,Activate
003b 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
003c 00c7       |    |		Action	Elaborate_Subprogram
003d			BODY_0008:
003d 00bc       |    |		Action	Signal_Activated
003e 00bb       |    |		Action	Signal_Completion
003f 0000       |    |		.XXX[0x1]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043       | C  |		.CONST	0x0043								; Address of begin
0041 0004       |    |		.CONST	0x0004								; Address of exception handler
0042 0001       |    |		.CONST	0x0001								; Number of locals
0043			BODY_0040:
0043			INIT_0040:
0043 e20e       |    |		Load	0x1,0xe
0044 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0045 0092 00e0  |    |		Action	Push_String_Extended,0xe0					; "Exe_110 is done."
0047 8024       | $  |		Call	0x0,0x24
0048 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0049 0000 0000  |    |		.BLANK	0000[0x7]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 00ad       |    |		.CONST	0x00ad								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0013       |    |		.CONST	0x0013								; Number of locals
0053			INIT_0050:
0053 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated
0055 00bf       |    |		Action	Accept_Activation
0056 029d 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call
0058 029d 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call
005a 0093 0000  |    |		push_full_address	0x0
005c 6063       |`c  |		Indirect_Literal	Discrete,0xc0,{0x80000000, 0x00020000}
005d 0273       | s  |		Execute	Discrete,Plus
005e e001       |    |		Load	0x0,0x1
005f 0273       | s  |		Execute	Discrete,Plus
0060 e002       |    |		Load	0x0,0x2
0061 0273       | s  |		Execute	Discrete,Plus
0062 e003       |    |		Load	0x0,0x3
0063 e004       |    |		Load	0x0,0x4
0064 00e1       |    |		Load_Encached	Boolean_Cache
0065 00e7       |    |		Load_Encached	Duration_Cache
0066 00e6       |    |		Load_Encached	Float_Cache
0067 00e6       |    |		Load_Encached	Float_Cache
0068 e005       |    |		Load	0x0,0x5
0069 e006       |    |		Load	0x0,0x6
006a e007       |    |		Load	0x0,0x7
006b 00e9       |    |		Load_Encached	String_Cache
006c a008       |    |		Store_Unchecked	0x0,0x8
006d a009       |    |		Store_Unchecked	0x0,0x9
006e a00a       |    |		Store_Unchecked	0x0,0xa
006f a00b       |    |		Store_Unchecked	0x0,0xb
0070 a00c       |    |		Store_Unchecked	0x0,0xc
0071 a00c       |    |		Store_Unchecked	0x0,0xc
0072 a00d       |    |		Store_Unchecked	0x0,0xd
0073 a00e       |    |		Store_Unchecked	0x0,0xe
0074 a00f       |    |		Store_Unchecked	0x0,0xf
0075 a010       |    |		Store_Unchecked	0x0,0x10
0076 a011       |    |		Store_Unchecked	0x0,0x11
0077 a012       |    |		Store_Unchecked	0x0,0x12
0078 a013       |    |		Store_Unchecked	0x0,0x13
0079 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
007a a014       |    |		Store_Unchecked	0x0,0x14
007b a014       |    |		Store_Unchecked	0x0,0x14
007c a015       |    |		Store_Unchecked	0x0,0x15
007d a016       |    |		Store_Unchecked	0x0,0x16
007e 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
007f a017       |    |		Store_Unchecked	0x0,0x17
0080 e018       |    |		Load	0x0,0x18
0081 0387       |    |		Declare_Variable	Package
0082 00d8       |    |		Load_Top	At_Offset_0
0083 020f       |    |		Execute	Module,Activate
0084 480a       |H   |		Short_Literal	0xa
0085 e006       |    |		Load	0x0,0x6
0086 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0087 4801       |H   |		Short_Literal	0x1
0088 480a       |H   |		Short_Literal	0xa
0089 00e9       |    |		Load_Encached	String_Cache
008a 035b       | [  |		Declare_Type	Array,Constrained
008b 0337       | 7  |		Declare_Variable	Array
008c 0093 0000  |    |		push_full_address	0x0
008e 602d       |`-  |		Indirect_Literal	Discrete,0xbc,{0x80000000, 0x00010000}
008f 0273       | s  |		Execute	Discrete,Plus
0090 e001       |    |		Load	0x0,0x1
0091 0273       | s  |		Execute	Discrete,Plus
0092 e019       |    |		Load	0x0,0x19
0093 0273       | s  |		Execute	Discrete,Plus
0094 e003       |    |		Load	0x0,0x3
0095 e006       |    |		Load	0x0,0x6
0096 00e9       |    |		Load_Encached	String_Cache
0097 e006       |    |		Load	0x0,0x6
0098 00e9       |    |		Load_Encached	String_Cache
0099 e211       |    |		Load	0x1,0x11
009a e212       |    |		Load	0x1,0x12
009b a008       |    |		Store_Unchecked	0x0,0x8
009c a00e       |    |		Store_Unchecked	0x0,0xe
009d a010       |    |		Store_Unchecked	0x0,0x10
009e a00e       |    |		Store_Unchecked	0x0,0xe
009f a010       |    |		Store_Unchecked	0x0,0x10
00a0 a01a       |    |		Store_Unchecked	0x0,0x1a
00a1 a01b       |    |		Store_Unchecked	0x0,0x1b
00a2 a011       |    |		Store_Unchecked	0x0,0x11
00a3 a016       |    |		Store_Unchecked	0x0,0x16
00a4 a017       |    |		Store_Unchecked	0x0,0x17
00a5 a01c       |    |		Store_Unchecked	0x0,0x1c
00a6 a01d       |    |		Store_Unchecked	0x0,0x1d
00a7 e01e       |    |		Load	0x0,0x1e
00a8 0387       |    |		Declare_Variable	Package
00a9 00d8       |    |		Load_Top	At_Offset_0
00aa 020f       |    |		Execute	Module,Activate
00ab 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
00ac 00c7       |    |		Action	Elaborate_Subprogram
00ad			BODY_0050:
00ad 00bc       |    |		Action	Signal_Activated
00ae 00bb       |    |		Action	Signal_Completion
00af 0000       |    |		.XXX[0x1]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 e01f       |    |		Load	0x0,0x1f
00b4 e210       |    |		Load	0x1,0x10
00b5 0096       |    |		Execute	Package,Entry
00b6 e020       |    |		Load	0x0,0x20
00b7 e213       |    |		Load	0x1,0x13
00b8 0096       |    |		Execute	Package,Entry
00b9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00ba 0000 0000  |    |		.XXX[0x2]
00bc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
00c0 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
00c4 0000 0000  |    |		.BLANK	0000[0x4]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2
00cc 00d8       |    |		Load_Top	At_Offset_0
00cd 00e7       |    |		Load_Encached	Duration_Cache
00ce 0260       | `  |		Execute	Discrete,In_Type
00cf 7001       |p   |		Jump_Nonzero	0xd1
00d0 0801       |    |		Execute_Immediate	Raise,0x1
00d1 8021       | !  |		Call	0x0,0x21
00d2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d3 0000 0000  |    |		.BLANK	0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 00da       |    |		Load_Top	At_Offset_2
00dc e007       |    |		Load	0x0,0x7
00dd 01c3       |    |		Execute	Vector,Check_In_Type
00de 8022       | "  |		Call	0x0,0x22
00df 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e0 ; --------------------------------------------------------------------------------------
00e0 ; STRING TABLE
00e0 ; --------------------------------------------------------------------------------------
00e0 0004       |    |		.STRTAB	0x0004->0x00e2							; "Exe_110 is done."
00e1 0012       |    |		.STREND 0x0012->0x00ea
00e2 4578 655f  |Exe_|		.STRTAB_STRINGS
00ea 0000 0000  |    |		.BLANK	0000[0x6]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; Debug Table
00f0 ; --------------------------------------------------------------------------------------
00f0 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x4c7d,0x0000,0x0001,0x0008
00f6 000b 0116  |    |		.DBG4T	0x000b,0x0116,0x8000,0x0000
00fa 000e 0119  |    |		.DBG4T	0x000e,0x0119,0x8000,0x0000
00fe 0043 011e  | C  |		.DBG4T	0x0043,0x011e,0x0001,0x0000
0102 0053 0122  | S "|		.DBG4T	0x0053,0x0122,0x0000,0x0000
0106 0056 0125  | V %|		.DBG4T	0x0056,0x0125,0x0000,0x0000
010a 00b3 012c  |   ,|		.DBG4T	0x00b3,0x012c,0x0001,0x0000
010e 00cb 0000  |    |		.DBG4T	0x00cb,0x0000,0x000c,0x0000
0112 00db 0000  |    |		.DBG4T	0x00db,0x0000,0x000c,0x0000
0116 ; --------------------------------------------------------------------------------------
0116 ; Debug chain
0116 ; --------------------------------------------------------------------------------------
0116 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0118 000b       |    |		.DBGLNO	0x000b
0119 ; --------------------------------------------------------------------------------------
0119 ; Debug chain
0119 ; --------------------------------------------------------------------------------------
0119 0003 0000  |    |		.DBGLEN	0x0003,0x0000
011b 000e 0014  |    |		.DBGLNO	0x000e,0x0014,0x003b
011e ; --------------------------------------------------------------------------------------
011e ; Debug chain
011e ; --------------------------------------------------------------------------------------
011e 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0120 0043 0045  | C E|		.DBGLNO	0x0043,0x0045
0122 ; --------------------------------------------------------------------------------------
0122 ; Debug chain
0122 ; --------------------------------------------------------------------------------------
0122 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0124 0053       | S  |		.DBGLNO	0x0053
0125 ; --------------------------------------------------------------------------------------
0125 ; Debug chain
0125 ; --------------------------------------------------------------------------------------
0125 0005 0000  |    |		.DBGLEN	0x0005,0x0000
0127 0056 0084  | V  |		.DBGLNO	0x0056,0x0084,0x0087,0x008c,0x00ab
012c ; --------------------------------------------------------------------------------------
012c ; Debug chain
012c ; --------------------------------------------------------------------------------------
012c 0000 0002  |    |		.DBGLEN	0x0000,0x0002
012e 00b3 00b6  |    |		.DBGLNO	0x00b3,0x00b6
0130 0000 0000  |    |		.BLANK	0000[0xd0]