|
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: 1024 (0x400)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0ffcbb
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
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 0058 | X | .CONST 0x0058 ; 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 0016 | | .CONST 0x0016 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000d | | .CONST 0x000d ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 0093 0023 | #| push_full_address INIT_0020
000e 00f5 | | Load_Encached Unused21
000f 037e | ~ | Declare_Type Task,Defined,Visible
0010 036e | n | Declare_Variable Task,Visible
0011 00bf | | Action Accept_Activation
0012 e002 | | Load 0x0,0x2
0013 4801 |H | Short_Literal 0x1
0014 00da | | Load_Top At_Offset_2
0015 020e | | Execute Module,Augment_Imports
0016 BODY_0008:
0016 00be | | Action Activate_Tasks
0017 00bc | | Action Signal_Activated
0018 00bb | | Action Signal_Completion
0019 0000 0000 | | .BLANK 0000[0x7]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 002a | * | .CONST 0x002a ; Address of begin
0021 0004 | | .CONST 0x0004 ; Address of exception handler
0022 000e | | .CONST 0x000e ; Number of locals
0023 INIT_0020:
0023 4801 |H | Short_Literal 0x1
0024 02cb | | Declare_Variable Entry
0025 00bf | | Action Accept_Activation
0026 480d |H | Short_Literal 0xd
0027 0299 003b | ;| Declare_Subprogram INIT_0038,For_Accept
0029 00bc | | Action Signal_Activated
002a BODY_0020:
002a 0092 003f | ?| Action Push_String_Extended,0x3f ; "Start of text_manager"
002c e001 | | Load 0x0,0x1
002d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
002e 00cf | | Action Mark_Auxiliary
002f 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0030 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0031 0137 | 7 | Execute Entry,Rendezvous
0032 00c9 | | Action Pop_Auxiliary_Loop
0033 7ffb | | Jump 0x2f
0034 0040 e001 | @ | .XXX[0x4]
0036 184f 00bb | O |
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b | ; | .CONST 0x003b ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0001 | | .CONST 0x0001 ; Number of locals
003b BODY_0038:
003b INIT_0038:
003b 00db | | Load_Top At_Offset_3
003c e001 | | Load 0x0,0x1
003d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
003e 4100 |A | End_Rendezvous 0x0
003f ; --------------------------------------------------------------------------------------
003f ; STRING TABLE
003f ; --------------------------------------------------------------------------------------
003f 0006 | | .STRTAB 0x0006->0x0042 ; "Start of text_manager"
0040 0019 | | .STRTAB 0x0019->0x004c ; "End of text_manager"
0041 002a | * | .STREND 0x002a->0x0056
0042 5374 6172 |Star| .STRTAB_STRINGS
0056 0000 0000 | | .XXX[0x2]
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 000a | | .DEBUG4 0x0004,0x000a,0x3022,0x0000,0x0001,0x0005
005e 000b 0072 | r| .DBG4T 0x000b,0x0072,0x8000,0x0000
0062 0012 0075 | u| .DBG4T 0x0012,0x0075,0x8000,0x0000
0066 0023 0078 | # x| .DBG4T 0x0023,0x0078,0x0000,0x0000
006a 0026 007b | & {| .DBG4T 0x0026,0x007b,0x0000,0x4000
006e 003b 0081 | ; | .DBG4T 0x003b,0x0081,0x0003,0x0000
0072 ; --------------------------------------------------------------------------------------
0072 ; Debug chain
0072 ; --------------------------------------------------------------------------------------
0072 0001 0000 | | .DBGLEN 0x0001,0x0000
0074 000b | | .DBGLNO 0x000b
0075 ; --------------------------------------------------------------------------------------
0075 ; Debug chain
0075 ; --------------------------------------------------------------------------------------
0075 0001 0000 | | .DBGLEN 0x0001,0x0000
0077 0012 | | .DBGLNO 0x0012
0078 ; --------------------------------------------------------------------------------------
0078 ; Debug chain
0078 ; --------------------------------------------------------------------------------------
0078 0001 0000 | | .DBGLEN 0x0001,0x0000
007a 0023 | # | .DBGLNO 0x0023
007b ; --------------------------------------------------------------------------------------
007b ; Debug chain
007b ; --------------------------------------------------------------------------------------
007b 0000 0002 | | .DBGLEN 0x0000,0x0002
007d 002a 002f | * /| .DBGLNO 0x002a,0x002f
007f 0001 0003 | | .XXX[0x2]
0081 ; --------------------------------------------------------------------------------------
0081 ; Debug chain
0081 ; --------------------------------------------------------------------------------------
0081 0000 0001 | | .DBGLEN 0x0000,0x0001
0083 003b | ; | .DBGLNO 0x003b
0084 0000 0000 | | .BLANK 0000[0x17c]