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

⟦3843f4f77⟧

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

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0120       |    |		.CONST	0x0120								; 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 0015       |    |		.CONST	0x0015								; Number of locals
000b			INIT_0008:
000b 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 0092 0075  |   u|		Action	Push_String_Extended,0x75					; "Rs6000_Aix_Ibm"
0010 e001       |    |		Load	0x0,0x1
0011 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
0012 e002       |    |		Load	0x0,0x2
0013 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
0014 e003       |    |		Load	0x0,0x3
0015 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
0016 e004       |    |		Load	0x0,0x4
0017 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
0018 e005       |    |		Load	0x0,0x5
0019 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
001a e006       |    |		Load	0x0,0x6
001b 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
001c e007       |    |		Load	0x0,0x7
001d 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
001e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
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 006c       | l  |		.CONST	0x006c								; Address of exception handler
002a 0002       |    |		.CONST	0x0002								; Number of locals
002b			INIT_0028:
002b e008       |    |		Load	0x0,0x8
002c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
002d 02c7       |    |		Declare_Variable	Any
002e 00d8       |    |		Load_Top	At_Offset_0
002f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0030			BODY_0028:
0030 00d8       |    |		Load_Top	At_Offset_0
0031 e20e       |    |		Load	0x1,0xe
0032 e009       |    |		Load	0x0,0x9
0033 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0034 c402       |    |		Store	0x2,0x2
0035 00d8       |    |		Load_Top	At_Offset_0
0036 e008       |    |		Load	0x0,0x8
0037 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0038 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0039 680e       |h   |		Jump_Zero	0x48
003a e00a       |    |		Load	0x0,0xa
003b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
003c 4806       |H   |		Short_Literal	0x6
003d 00da       |    |		Load_Top	At_Offset_2
003e e008       |    |		Load	0x0,0x8
003f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0040 e00b       |    |		Load	0x0,0xb
0041 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0042 00d8       |    |		Load_Top	At_Offset_0
0043 e008       |    |		Load	0x0,0x8
0044 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0045 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0046 6801       |h   |		Jump_Zero	0x48
0047 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0048 8215       |    |		Call	0x1,0x15
0049 8211       |    |		Call	0x1,0x11
004a 8213       |    |		Call	0x1,0x13
004b 8210       |    |		Call	0x1,0x10
004c 8212       |    |		Call	0x1,0x12
004d 8214       |    |		Call	0x1,0x14
004e e20e       |    |		Load	0x1,0xe
004f e00c       |    |		Load	0x0,0xc
0050 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0051 0092 0076  |   v|		Action	Push_String_Extended,0x76					; "<PROFILE>"
0053 0092 0077  |   w|		Action	Push_String_Extended,0x77					; "Name => Rcf_Rev1_1_0_Rs6000_Aix_Ibm_"
0055 820f       |    |		Call	0x1,0xf
0056 e00d       |    |		Load	0x0,0xd
0057 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0058 011c       |    |		Execute	Any,Convert_Unchecked
0059 1c01       |    |		Execute_Immediate	Run_Utility,0x1
005a 01cc       |    |		Execute	Vector,Catenate
005b 0092 0078  |   x|		Action	Push_String_Extended,0x78					; ", output => !machine.error_logs."
005d 01cc       |    |		Execute	Vector,Catenate
005e e20e       |    |		Load	0x1,0xe
005f 01cc       |    |		Execute	Vector,Catenate
0060 0092 0079  |   y|		Action	Push_String_Extended,0x79					; "_extensions_log"
0062 01cc       |    |		Execute	Vector,Catenate
0063 4800       |H   |		Short_Literal	0x0
0064 0092 007a  |   z|		Action	Push_String_Extended,0x7a					; "!targets.implementation.rcf_customization.rs6000_aix_ibm'view"
0066 4800       |H   |		Short_Literal	0x0
0067 0092 007b  |   {|		Action	Push_String_Extended,0x7b					; "\x22!targets.implementation.rcf_customization.rs6000_aix_ibm'view.units\x22.register_all_extensions(\x22Rs6000_Aix_Ibm\x22);"
0069 e00e       |    |		Load	0x0,0xe
006a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
006b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
006c			TRAP_0028:
006c 0007       |    |		Action	Break_Optional
006d e00a       |    |		Load	0x0,0xa
006e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
006f 4807       |H   |		Short_Literal	0x7
0070 0092 007c  |   ||		Action	Push_String_Extended,0x7c					; "Register completed with Errors."
0072 e00b       |    |		Load	0x0,0xb
0073 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0074 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0075 ; --------------------------------------------------------------------------------------
0075 ; STRING TABLE
0075 ; --------------------------------------------------------------------------------------
0075 0012       |    |		.STRTAB	0x0012->0x007e							; "Rs6000_Aix_Ibm"
0076 001e       |    |		.STRTAB	0x001e->0x0085							; "<PROFILE>"
0077 0025       | %  |		.STRTAB	0x0025->0x0089							; "Name => Rcf_Rev1_1_0_Rs6000_Aix_Ibm_"
0078 0047       | G  |		.STRTAB	0x0047->0x009b							; ", output => !machine.error_logs."
0079 0065       | e  |		.STRTAB	0x0065->0x00ab							; "_extensions_log"
007a 0072       | r  |		.STRTAB	0x0072->0x00b3							; "!targets.implementation.rcf_customization.rs6000_aix_ibm'view"
007b 00ad       |    |		.STRTAB	0x00ad->0x00d1							; "\x22!targets.implementation.rcf_customization.rs6000_aix_ibm'view.units\x22.register_all_extensions(\x22Rs6000_Aix_Ibm\x22);"
007c 011b       |    |		.STRTAB	0x011b->0x0109							; "Register completed with Errors."
007d 0138       | 8  |		.STREND 0x0138->0x0119
007e 5273 3630  |Rs60|		.STRTAB_STRINGS
0119 0000 0000  |    |		.BLANK	0000[0x7]
0120 ; --------------------------------------------------------------------------------------
0120 ; Debug Table
0120 ; --------------------------------------------------------------------------------------
0120 0004 0002  |    |		.DEBUG4	0x0004,0x0002,0x1983,0x0000,0x0001,0x0003
0126 000b 0132  |   2|		.DBG4T	0x000b,0x0132,0x8000,0x0000
012a 000e 0135  |   5|		.DBG4T	0x000e,0x0135,0x8000,0x8000
012e 002b 0149  | + I|		.DBG4T	0x002b,0x0149,0x0001,0x0000
0132 ; --------------------------------------------------------------------------------------
0132 ; Debug chain
0132 ; --------------------------------------------------------------------------------------
0132 0001 0000  |    |		.DBGLEN	0x0001,0x0000
0134 000b       |    |		.DBGLNO	0x000b
0135 ; --------------------------------------------------------------------------------------
0135 ; Debug chain
0135 ; --------------------------------------------------------------------------------------
0135 0009 0000  |    |		.DBGLEN	0x0009,0x0000
0137 000e 0010  |    |		.DBGLNO	0x000e,0x0010,0x0012,0x0014,0x0016,0x0018,0x001a,0x001c,0x001e
0140 000c 000d  |    |		.XXX[0x9]
0142 000e 000f  |    |
0144 0010 0011  |    |
0146 0012 0013  |    |
0148 0014       |    |
0149 ; --------------------------------------------------------------------------------------
0149 ; Debug chain
0149 ; --------------------------------------------------------------------------------------
0149 0001 0008  |    |		.DBGLEN	0x0001,0x0008
014b 002b 0030  | + 0|		.DBGLNO	0x002b,0x0030,0x0035,0x003a,0x0042,0x0047,0x0048,0x0051,0x006d
0154 0000 0000  |    |		.BLANK	0000[0xac]