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

⟦3242d5ad2⟧

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

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 0158       | X  |		.CONST	0x0158								; 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 0106       |    |		.CONST	0x0106								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0011       |    |		.CONST	0x0011								; Number of locals
000b			INIT_0008:
000b 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 4800       |H   |		Short_Literal	0x0
000f 4802       |H   |		Short_Literal	0x2
0010 029f 011b  |    |		Declare_Subprogram	INIT_0118,For_Call
0012 03fd       |    |		Declare_Type	Discrete,Defined
0013 4800       |H   |		Short_Literal	0x0
0014 4804       |H   |		Short_Literal	0x4
0015 e001       |    |		Load	0x0,0x1
0016 01d7       |    |		Execute	Vector,Field_Read
0017 02a0       |    |		Declare_Subprogram	Null_Subprogram
0018 038e       |    |		Declare_Type	Package,Defined
0019 e001       |    |		Load	0x0,0x1
001a 4803       |H   |		Short_Literal	0x3
001b e001       |    |		Load	0x0,0x1
001c 01d7       |    |		Execute	Vector,Field_Read
001d 4802       |H   |		Short_Literal	0x2
001e 00db       |    |		Load_Top	At_Offset_3
001f 020e       |    |		Execute	Module,Augment_Imports
0020 0387       |    |		Declare_Variable	Package
0021 e002       |    |		Load	0x0,0x2
0022 e003       |    |		Load	0x0,0x3
0023 e004       |    |		Load	0x0,0x4
0024 a005       |    |		Store_Unchecked	0x0,0x5
0025 a006       |    |		Store_Unchecked	0x0,0x6
0026 a007       |    |		Store_Unchecked	0x0,0x7
0027 e008       |    |		Load	0x0,0x8
0028 e009       |    |		Load	0x0,0x9
0029 a00a       |    |		Store_Unchecked	0x0,0xa
002a e00b       |    |		Load	0x0,0xb
002b e00c       |    |		Load	0x0,0xc
002c a00d       |    |		Store_Unchecked	0x0,0xd
002d e00e       |    |		Load	0x0,0xe
002e e00f       |    |		Load	0x0,0xf
002f e010       |    |		Load	0x0,0x10
0030 e011       |    |		Load	0x0,0x11
0031 e012       |    |		Load	0x0,0x12
0032 e013       |    |		Load	0x0,0x13
0033 e014       |    |		Load	0x0,0x14
0034 a015       |    |		Store_Unchecked	0x0,0x15
0035 e016       |    |		Load	0x0,0x16
0036 e017       |    |		Load	0x0,0x17
0037 e018       |    |		Load	0x0,0x18
0038 a019       |    |		Store_Unchecked	0x0,0x19
0039 a01a       |    |		Store_Unchecked	0x0,0x1a
003a 4819       |H   |		Short_Literal	0x19
003b e20f       |    |		Load	0x1,0xf
003c 020e       |    |		Execute	Module,Augment_Imports
003d 00d8       |    |		Load_Top	At_Offset_0
003e 020f       |    |		Execute	Module,Activate
003f 4800       |H   |		Short_Literal	0x0
0040 4802       |H   |		Short_Literal	0x2
0041 e001       |    |		Load	0x0,0x1
0042 01d7       |    |		Execute	Vector,Field_Read
0043 02a0       |    |		Declare_Subprogram	Null_Subprogram
0044 038e       |    |		Declare_Type	Package,Defined
0045 e001       |    |		Load	0x0,0x1
0046 4801       |H   |		Short_Literal	0x1
0047 e001       |    |		Load	0x0,0x1
0048 01d7       |    |		Execute	Vector,Field_Read
0049 4802       |H   |		Short_Literal	0x2
004a 00db       |    |		Load_Top	At_Offset_3
004b 020e       |    |		Execute	Module,Augment_Imports
004c 0387       |    |		Declare_Variable	Package
004d e002       |    |		Load	0x0,0x2
004e e003       |    |		Load	0x0,0x3
004f e004       |    |		Load	0x0,0x4
0050 a005       |    |		Store_Unchecked	0x0,0x5
0051 a006       |    |		Store_Unchecked	0x0,0x6
0052 a007       |    |		Store_Unchecked	0x0,0x7
0053 e014       |    |		Load	0x0,0x14
0054 e011       |    |		Load	0x0,0x11
0055 a00a       |    |		Store_Unchecked	0x0,0xa
0056 e013       |    |		Load	0x0,0x13
0057 a015       |    |		Store_Unchecked	0x0,0x15
0058 e008       |    |		Load	0x0,0x8
0059 e009       |    |		Load	0x0,0x9
005a e00b       |    |		Load	0x0,0xb
005b e00c       |    |		Load	0x0,0xc
005c a00d       |    |		Store_Unchecked	0x0,0xd
005d e010       |    |		Load	0x0,0x10
005e e012       |    |		Load	0x0,0x12
005f e016       |    |		Load	0x0,0x16
0060 e017       |    |		Load	0x0,0x17
0061 e018       |    |		Load	0x0,0x18
0062 a019       |    |		Store_Unchecked	0x0,0x19
0063 a01a       |    |		Store_Unchecked	0x0,0x1a
0064 4817       |H   |		Short_Literal	0x17
0065 e210       |    |		Load	0x1,0x10
0066 020e       |    |		Execute	Module,Augment_Imports
0067 00d8       |    |		Load_Top	At_Offset_0
0068 020f       |    |		Execute	Module,Activate
0069 0093 0000  |    |		push_full_address	0x0
006b 60a8       |`   |		Indirect_Literal	Discrete,0x114,{0x80000000, 0x00010000}
006c 0273       | s  |		Execute	Discrete,Plus
006d e01b       |    |		Load	0x0,0x1b
006e 0273       | s  |		Execute	Discrete,Plus
006f e01c       |    |		Load	0x0,0x1c
0070 0273       | s  |		Execute	Discrete,Plus
0071 4804       |H   |		Short_Literal	0x4
0072 e20e       |    |		Load	0x1,0xe
0073 4802       |H   |		Short_Literal	0x2
0074 4800       |H   |		Short_Literal	0x0
0075 0092 013e  |   >|		Action	Push_String_Extended,0x13e					; "GENERAL_START"
0077 e20f       |    |		Load	0x1,0xf
0078 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0079 e20f       |    |		Load	0x1,0xf
007a 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
007b 4801       |H   |		Short_Literal	0x1
007c 0092 013f  |   ?|		Action	Push_String_Extended,0x13f					; "GENERAL_ON_LADDER"
007e e210       |    |		Load	0x1,0x10
007f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0080 e210       |    |		Load	0x1,0x10
0081 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
0082 4802       |H   |		Short_Literal	0x2
0083 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
0085 00c4       |    |		Action	Make_Default
0086 a01d       |    |		Store_Unchecked	0x0,0x1d
0087 4802       |H   |		Short_Literal	0x2
0088 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
008a 00c4       |    |		Action	Make_Default
008b a01d       |    |		Store_Unchecked	0x0,0x1d
008c 4802       |H   |		Short_Literal	0x2
008d 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
008f 00c4       |    |		Action	Make_Default
0090 a01d       |    |		Store_Unchecked	0x0,0x1d
0091 4802       |H   |		Short_Literal	0x2
0092 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
0094 00c4       |    |		Action	Make_Default
0095 a01d       |    |		Store_Unchecked	0x0,0x1d
0096 4802       |H   |		Short_Literal	0x2
0097 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
0099 00c4       |    |		Action	Make_Default
009a a01d       |    |		Store_Unchecked	0x0,0x1d
009b 4802       |H   |		Short_Literal	0x2
009c 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
009e 00c4       |    |		Action	Make_Default
009f a01d       |    |		Store_Unchecked	0x0,0x1d
00a0 4802       |H   |		Short_Literal	0x2
00a1 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00a3 00c4       |    |		Action	Make_Default
00a4 a01d       |    |		Store_Unchecked	0x0,0x1d
00a5 4802       |H   |		Short_Literal	0x2
00a6 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00a8 00c4       |    |		Action	Make_Default
00a9 a01d       |    |		Store_Unchecked	0x0,0x1d
00aa 4802       |H   |		Short_Literal	0x2
00ab 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00ad 00c4       |    |		Action	Make_Default
00ae a01d       |    |		Store_Unchecked	0x0,0x1d
00af 4802       |H   |		Short_Literal	0x2
00b0 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00b2 00c4       |    |		Action	Make_Default
00b3 a01d       |    |		Store_Unchecked	0x0,0x1d
00b4 4802       |H   |		Short_Literal	0x2
00b5 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00b7 00c4       |    |		Action	Make_Default
00b8 a01d       |    |		Store_Unchecked	0x0,0x1d
00b9 4802       |H   |		Short_Literal	0x2
00ba 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00bc 00c4       |    |		Action	Make_Default
00bd a01d       |    |		Store_Unchecked	0x0,0x1d
00be 4802       |H   |		Short_Literal	0x2
00bf 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00c1 00c4       |    |		Action	Make_Default
00c2 a01d       |    |		Store_Unchecked	0x0,0x1d
00c3 4802       |H   |		Short_Literal	0x2
00c4 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00c6 00c4       |    |		Action	Make_Default
00c7 a01d       |    |		Store_Unchecked	0x0,0x1d
00c8 4802       |H   |		Short_Literal	0x2
00c9 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00cb 00c4       |    |		Action	Make_Default
00cc a01d       |    |		Store_Unchecked	0x0,0x1d
00cd 4802       |H   |		Short_Literal	0x2
00ce 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00d0 00c4       |    |		Action	Make_Default
00d1 a01d       |    |		Store_Unchecked	0x0,0x1d
00d2 4802       |H   |		Short_Literal	0x2
00d3 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00d5 00c4       |    |		Action	Make_Default
00d6 a01d       |    |		Store_Unchecked	0x0,0x1d
00d7 4802       |H   |		Short_Literal	0x2
00d8 0092 0140  |   @|		Action	Push_String_Extended,0x140					; "NO_MORE"
00da 00c4       |    |		Action	Make_Default
00db a01d       |    |		Store_Unchecked	0x0,0x1d
00dc e01e       |    |		Load	0x0,0x1e
00dd c21f       |    |		Store	0x1,0x1f
00de e01e       |    |		Load	0x0,0x1e
00df c223       | #  |		Store	0x1,0x23
00e0 e01e       |    |		Load	0x0,0x1e
00e1 c227       | '  |		Store	0x1,0x27
00e2 e01e       |    |		Load	0x0,0x1e
00e3 c22b       | +  |		Store	0x1,0x2b
00e4 e01e       |    |		Load	0x0,0x1e
00e5 c22f       | /  |		Store	0x1,0x2f
00e6 e01e       |    |		Load	0x0,0x1e
00e7 c233       | 3  |		Store	0x1,0x33
00e8 e01e       |    |		Load	0x0,0x1e
00e9 c237       | 7  |		Store	0x1,0x37
00ea e01e       |    |		Load	0x0,0x1e
00eb c23b       | ;  |		Store	0x1,0x3b
00ec e01e       |    |		Load	0x0,0x1e
00ed c23f       | ?  |		Store	0x1,0x3f
00ee e01e       |    |		Load	0x0,0x1e
00ef c243       | C  |		Store	0x1,0x43
00f0 e01e       |    |		Load	0x0,0x1e
00f1 c247       | G  |		Store	0x1,0x47
00f2 e01e       |    |		Load	0x0,0x1e
00f3 c24b       | K  |		Store	0x1,0x4b
00f4 e01e       |    |		Load	0x0,0x1e
00f5 c24f       | O  |		Store	0x1,0x4f
00f6 e01e       |    |		Load	0x0,0x1e
00f7 c253       | S  |		Store	0x1,0x53
00f8 e01e       |    |		Load	0x0,0x1e
00f9 c257       | W  |		Store	0x1,0x57
00fa e01e       |    |		Load	0x0,0x1e
00fb c25b       | [  |		Store	0x1,0x5b
00fc e01e       |    |		Load	0x0,0x1e
00fd c25f       | _  |		Store	0x1,0x5f
00fe e01e       |    |		Load	0x0,0x1e
00ff c263       | c  |		Store	0x1,0x63
0100 e01f       |    |		Load	0x0,0x1f
0101 0387       |    |		Declare_Variable	Package
0102 00d8       |    |		Load_Top	At_Offset_0
0103 020f       |    |		Execute	Module,Activate
0104 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0105 00c7       |    |		Action	Elaborate_Subprogram
0106			BODY_0008:
0106 00bc       |    |		Action	Signal_Activated
0107 00bb       |    |		Action	Signal_Completion
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 00db       |    |		Load_Top	At_Offset_3
010c 00db       |    |		Load_Top	At_Offset_3
010d e020       |    |		Load	0x0,0x20
010e e211       |    |		Load	0x1,0x11
010f 0096       |    |		Execute	Package,Entry
0110 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0111 0000 0000  |    |		.XXX[0x3]
0113 0000       |    |
0114 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b       |    |		.CONST	0x011b								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0001       |    |		.CONST	0x0001								; Number of locals
011b			BODY_0118:
011b			INIT_0118:
011b 4607       |F   |		Jump_Case	0x8
011c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
011d 7807       |x   |		Jump	0x125								; case 0x1
011e 780a       |x   |		Jump	0x129								; case 0x2
011f 780e       |x   |		Jump	0x12e								; case 0x3
0120 7811       |x   |		Jump	0x132								; case 0x4
0121 7812       |x   |		Jump	0x134								; case 0x5
0122 7813       |x   |		Jump	0x136								; case 0x6
0123 7816       |x   |		Jump	0x13a								; case 0x7
0124 4302       |C   |		.XXX[0x1]
0125 00da       |    |		Load_Top	At_Offset_2
0126 0091 013e  |   >|		Action	Push_String_Extended_Indexed,0x13e				; "GENERAL_START"
0128 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0129 00db       |    |		Load_Top	At_Offset_3
012a 00db       |    |		Load_Top	At_Offset_3
012b 00e0       |    |		Load_Encached	Standard_Cache
012c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
012d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
012e 00da       |    |		Load_Top	At_Offset_2
012f 00e0       |    |		Load_Encached	Standard_Cache
0130 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0131 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0132 00db       |    |		Load_Top	At_Offset_3
0133 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0134 00db       |    |		Load_Top	At_Offset_3
0135 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0136 e20e       |    |		Load	0x1,0xe
0137 00dc       |    |		Load_Top	At_Offset_4
0138 0267       | g  |		Execute	Discrete,Predecessor
0139 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
013a e20e       |    |		Load	0x1,0xe
013b 00dc       |    |		Load_Top	At_Offset_4
013c 0268       | h  |		Execute	Discrete,Successor
013d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
013e ; --------------------------------------------------------------------------------------
013e ; STRING TABLE
013e ; --------------------------------------------------------------------------------------
013e 0008       |    |		.STRTAB	0x0008->0x0142							; "GENERAL_START"
013f 0013       |    |		.STRTAB	0x0013->0x0148							; "GENERAL_ON_LADDER"
0140 0022       | "  |		.STRTAB	0x0022->0x0151							; "NO_MORE"
0141 0027       | '  |		.STREND 0x0027->0x0154
0142 4745 4e45  |GENE|		.STRTAB_STRINGS
0155 0000 0000  |    |		.XXX[0x3]
0157 0000       |    |
0158 ; --------------------------------------------------------------------------------------
0158 ; Debug Table
0158 ; --------------------------------------------------------------------------------------
0158 0004 0006  |    |		.DEBUG4	0x0004,0x0006,0xb2dc,0x0000,0x0001,0x0004
015e 000b 016e  |   n|		.DBG4T	0x000b,0x016e,0x8000,0x0000
0162 000e 0171  |   q|		.DBG4T	0x000e,0x0171,0x8000,0x0000
0166 010b 017a  |   z|		.DBG4T	0x010b,0x017a,0x0001,0x0000
016a 011b 0000  |    |		.DBG4T	0x011b,0x0000,0x0005,0x0000
016e ; --------------------------------------------------------------------------------------
016e ; Debug chain
016e ; --------------------------------------------------------------------------------------
016e 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0170 000b       |    |		.DBGLNO	0x000b
0171 ; --------------------------------------------------------------------------------------
0171 ; Debug chain
0171 ; --------------------------------------------------------------------------------------
0171 0007 0000  |    |		.DBGLEN	0x0007,0x0000
0173 000e 0013  |    |		.DBGLNO	0x000e,0x0013,0x0021,0x003f,0x004d,0x0069,0x0104
017a ; --------------------------------------------------------------------------------------
017a ; Debug chain
017a ; --------------------------------------------------------------------------------------
017a 0000 0001  |    |		.DBGLEN	0x0000,0x0001
017c 010b       |    |		.DBGLNO	0x010b
017d 0000 0000  |    |		.BLANK	0000[0x83]