|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_191cd7
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
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 0220 | | .CONST 0x0220 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001b | | .CONST 0x001b ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0001 | | .CONST 0x0001 ; Number of locals
001b BODY_0018:
001b INIT_0018:
001b 0092 006d | m| Action Push_String_Extended,0x6d ; "<PROFILE>"
001d e5fd | | Load 0x2,-0x3
001e e5fe | | Load 0x2,-0x2
001f 0092 006e | n| Action Push_String_Extended,0x6e ; "Debug => True,"
0021 01cc | | Execute Vector,Catenate
0022 0092 006f | o| Action Push_String_Extended,0x6f ; "R1000 => False,"
0024 01cc | | Execute Vector,Catenate
0025 0092 0070 | p| Action Push_String_Extended,0x70 ; "TeleGen2 => False,"
0027 01cc | | Execute Vector,Catenate
0028 0092 0071 | q| Action Push_String_Extended,0x71 ; "Cdf_Hpux => True,"
002a 01cc | | Execute Vector,Catenate
002b 0092 0072 | r| Action Push_String_Extended,0x72 ; "Unix => True,"
002d 01cc | | Execute Vector,Catenate
002e 0092 0073 | s| Action Push_String_Extended,0x73 ; "SysV => True,"
0030 01cc | | Execute Vector,Catenate
0031 0092 0074 | t| Action Push_String_Extended,0x74 ; "Multitask_Locking => True,"
0033 01cc | | Execute Vector,Catenate
0034 0092 0075 | u| Action Push_String_Extended,0x75 ; "Enable_Deallocation => False,"
0036 01cc | | Execute Vector,Catenate
0037 0092 0076 | v| Action Push_String_Extended,0x76 ; "Inline => True,"
0039 01cc | | Execute Vector,Catenate
003a 0092 0077 | w| Action Push_String_Extended,0x77 ; "Length_Clauses => True,"
003c 01cc | | Execute Vector,Catenate
003d 0092 0078 | x| Action Push_String_Extended,0x78 ; "Pack => True,"
003f 01cc | | Execute Vector,Catenate
0040 0092 0079 | y| Action Push_String_Extended,0x79 ; "Record_Rep_Clauses => True,"
0042 01cc | | Execute Vector,Catenate
0043 0092 007a | z| Action Push_String_Extended,0x7a ; "Bit0_Sign_Bit => True,"
0045 01cc | | Execute Vector,Catenate
0046 0092 007b | {| Action Push_String_Extended,0x7b ; "Byte0_Sign_Bit => True,"
0048 01cc | | Execute Vector,Catenate
0049 0092 007c | || Action Push_String_Extended,0x7c ; "Positive_Is_Large => True,"
004b 01cc | | Execute Vector,Catenate
004c 0092 007d | }| Action Push_String_Extended,0x7d ; "Record_Rep_Storage_Unit_8 => True,"
004e 01cc | | Execute Vector,Catenate
004f 0092 007e | ~| Action Push_String_Extended,0x7e ; "Record_Rep_Storage_Unit_16 => False,"
0051 01cc | | Execute Vector,Catenate
0052 0092 007f | | Action Push_String_Extended,0x7f ; "Record_Rep_Storage_Unit_32 => False,"
0054 01cc | | Execute Vector,Catenate
0055 0092 0080 | | Action Push_String_Extended,0x80 ; "Row_Major_Order => True,"
0057 01cc | | Execute Vector,Catenate
0058 0092 0081 | | Action Push_String_Extended,0x81 ; "Raw_Is_Unsigned => True,"
005a 01cc | | Execute Vector,Catenate
005b 0092 0082 | | Action Push_String_Extended,0x82 ; "R1000_Size_Bug => False,"
005d 01cc | | Execute Vector,Catenate
005e 0092 0083 | | Action Push_String_Extended,0x83 ; "TeleGen2_Derive_Bug => False,"
0060 01cc | | Execute Vector,Catenate
0061 0092 0084 | | Action Push_String_Extended,0x84 ; "TeleGen2_Length_Bug => False,"
0063 01cc | | Execute Vector,Catenate
0064 0092 0085 | | Action Push_String_Extended,0x85 ; "TeleGen2_Pack_Bug => False,"
0066 01cc | | Execute Vector,Catenate
0067 0092 0086 | | Action Push_String_Extended,0x86 ; "TeleGen2_2d_Bug => False"
0069 01cc | | Execute Vector,Catenate
006a e5ff | | Load 0x2,-0x1
006b 8002 | | Call 0x0,0x2
006c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
006d ; --------------------------------------------------------------------------------------
006d ; STRING TABLE
006d ; --------------------------------------------------------------------------------------
006d 0036 | 6 | .STRTAB 0x0036->0x0088 ; "<PROFILE>"
006e 003d | = | .STRTAB 0x003d->0x008c ; "Debug => True,"
006f 005a | Z | .STRTAB 0x005a->0x009c ; "R1000 => False,"
0070 0078 | x | .STRTAB 0x0078->0x00ac ; "TeleGen2 => False,"
0071 0096 | | .STRTAB 0x0096->0x00bc ; "Cdf_Hpux => True,"
0072 00b3 | | .STRTAB 0x00b3->0x00cb ; "Unix => True,"
0073 00d0 | | .STRTAB 0x00d0->0x00db ; "SysV => True,"
0074 00ed | | .STRTAB 0x00ed->0x00ea ; "Multitask_Locking => True,"
0075 010a | | .STRTAB 0x010a->0x00fa ; "Enable_Deallocation => False,"
0076 0128 | ( | .STRTAB 0x0128->0x010a ; "Inline => True,"
0077 0145 | E | .STRTAB 0x0145->0x0119 ; "Length_Clauses => True,"
0078 0162 | b | .STRTAB 0x0162->0x0129 ; "Pack => True,"
0079 017f | | .STRTAB 0x017f->0x0138 ; "Record_Rep_Clauses => True,"
007a 019c | | .STRTAB 0x019c->0x0148 ; "Bit0_Sign_Bit => True,"
007b 01b9 | | .STRTAB 0x01b9->0x0157 ; "Byte0_Sign_Bit => True,"
007c 01d6 | | .STRTAB 0x01d6->0x0167 ; "Positive_Is_Large => True,"
007d 01f3 | | .STRTAB 0x01f3->0x0176 ; "Record_Rep_Storage_Unit_8 => True,"
007e 0214 | | .STRTAB 0x0214->0x0188 ; "Record_Rep_Storage_Unit_16 => False,"
007f 0236 | 6 | .STRTAB 0x0236->0x019a ; "Record_Rep_Storage_Unit_32 => False,"
0080 0258 | X | .STRTAB 0x0258->0x01ac ; "Row_Major_Order => True,"
0081 0275 | u | .STRTAB 0x0275->0x01bb ; "Raw_Is_Unsigned => True,"
0082 0292 | | .STRTAB 0x0292->0x01cb ; "R1000_Size_Bug => False,"
0083 02b0 | | .STRTAB 0x02b0->0x01db ; "TeleGen2_Derive_Bug => False,"
0084 02ce | | .STRTAB 0x02ce->0x01eb ; "TeleGen2_Length_Bug => False,"
0085 02ec | | .STRTAB 0x02ec->0x01fb ; "TeleGen2_Pack_Bug => False,"
0086 030a | | .STRTAB 0x030a->0x020b ; "TeleGen2_2d_Bug => False"
0087 0327 | ' | .STREND 0x0327->0x021a
0088 3c50 524f |<PRO| .STRTAB_STRINGS
021b 0000 0000 | | .BLANK 0000[0x5]
0220 ; --------------------------------------------------------------------------------------
0220 ; Debug Table
0220 ; --------------------------------------------------------------------------------------
0220 0004 0000 | | .DEBUG4 0x0004,0x0000,0x4d2f,0x0000,0x0001,0x0002
0226 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
022a 001b 022e | .| .DBG4T 0x001b,0x022e,0x8001,0x0000
022e ; --------------------------------------------------------------------------------------
022e ; Debug chain
022e ; --------------------------------------------------------------------------------------
022e 0000 0001 | | .DBGLEN 0x0000,0x0001
0230 001b | | .DBGLNO 0x001b
0231 0000 0000 | | .BLANK 0000[0x1cf]