|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0698fd
└─⟦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 00b0 | | .CONST 0x00b0 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0017 | | .CONST 0x0017 ; Address of begin
0009 0026 | & | .CONST 0x0026 ; Address of exception handler
000a 000f | | .CONST 0x000f ; Number of locals
000b INIT_0008:
000b 4802 |H | Short_Literal 0x2
000c 02cb | | Declare_Variable Entry
000d 00bf | | Action Accept_Activation
000e e001 | | Load 0x0,0x1
000f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0010 02c7 | | Declare_Variable Any
0011 e001 | | Load 0x0,0x1
0012 180e | | Execute Package,Field_Execute,Field_Number 0xe
0013 a20e | | Store_Unchecked 0x1,0xe
0014 029f 003b | ;| Declare_Subprogram INIT_0038,For_Call
0016 00bc | | Action Signal_Activated
0017 BODY_0008:
0017 6040 |`@ | Indirect_Literal Discrete,0x58,{0x00000000, 0x000f0000}
0018 00ba | | Action Initiate_Delay
0019 00d9 | | Load_Top At_Offset_1
001a 4800 |H | Short_Literal 0x0
001b 0092 0069 | i| Action Push_String_Extended,0x69 ; "Logging messages for REMOTE_OPERATIONS CONTEXT CACHE "
001d e002 | | Load 0x0,0x2
001e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
001f 00d9 | | Load_Top At_Offset_1
0020 e002 | | Load 0x0,0x2
0021 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0022 00cf | | Action Mark_Auxiliary
0023 820f | | Call 0x1,0xf
0024 00c9 | | Action Pop_Auxiliary_Loop
0025 7ffd | | Jump 0x23
0026 TRAP_0008:
0026 0007 | | Action Break_Optional
0027 00da | | Load_Top At_Offset_2
0028 4808 |H | Short_Literal 0x8
0029 0092 006a | j| Action Push_String_Extended,0x6a ; "Unexpected exception "
002b 8003 | | Call 0x0,0x3
002c 01cc | | Execute Vector,Catenate
002d 0092 006b | k| Action Push_String_Extended,0x6b ; " causing death of the Logger"
002f 01cc | | Execute Vector,Catenate
0030 e002 | | Load 0x0,0x2
0031 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0032 00da | | Load_Top At_Offset_2
0033 e002 | | Load 0x0,0x2
0034 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0035 00bb | | Action Signal_Completion
0036 0000 0000 | | .XXX[0x2]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003e | > | .CONST 0x003e ; Address of begin
0039 0047 | G | .CONST 0x0047 ; Address of exception handler
003a 0002 | | .CONST 0x0002 ; Number of locals
003b INIT_0038:
003b 480d |H | Short_Literal 0xd
003c 0299 0063 | c| Declare_Subprogram INIT_0060,For_Accept
003e BODY_0038:
003e 4802 |H | Short_Literal 0x2
003f 4802 |H | Short_Literal 0x2
0040 0099 | | Action Reference_Dynamic
0041 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0042 0137 | 7 | Execute Entry,Rendezvous
0043 e20e | | Load 0x1,0xe
0044 e002 | | Load 0x0,0x2
0045 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0046 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0047 TRAP_0038:
0047 0007 | | Action Break_Optional
0048 e20e | | Load 0x1,0xe
0049 4808 |H | Short_Literal 0x8
004a 0092 006a | j| Action Push_String_Extended,0x6a ; "Unexpected exception "
004c 8003 | | Call 0x0,0x3
004d 01cc | | Execute Vector,Catenate
004e 0092 006c | l| Action Push_String_Extended,0x6c ; " in main loop of Logger"
0050 01cc | | Execute Vector,Catenate
0051 e002 | | Load 0x0,0x2
0052 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0053 e20e | | Load 0x1,0xe
0054 e002 | | Load 0x0,0x2
0055 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0056 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0057 0000 | | .XXX[0x1]
0058 0000 0000 | | .LITERAL {0x00000000, 0x000f0000}
005c 0000 0000 | | .BLANK 0000[0x4]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 e20e | | Load 0x1,0xe
0064 e7fd | | Load 0x3,-0x3
0065 e7fe | | Load 0x3,-0x2
0066 e002 | | Load 0x0,0x2
0067 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0068 4100 |A | End_Rendezvous 0x0
0069 ; --------------------------------------------------------------------------------------
0069 ; STRING TABLE
0069 ; --------------------------------------------------------------------------------------
0069 000a | | .STRTAB 0x000a->0x006e ; "Logging messages for REMOTE_OPERATIONS CONTEXT CACHE "
006a 003d | = | .STRTAB 0x003d->0x0088 ; "Unexpected exception "
006b 0050 | P | .STRTAB 0x0050->0x0093 ; " causing death of the Logger"
006c 006a | j | .STRTAB 0x006a->0x00a1 ; " in main loop of Logger"
006d 007f | | .STREND 0x007f->0x00ac
006e 4c6f 6767 |Logg| .STRTAB_STRINGS
00ad 0000 0000 | | .XXX[0x3]
00af 0000 | |
00b0 ; --------------------------------------------------------------------------------------
00b0 ; Debug Table
00b0 ; --------------------------------------------------------------------------------------
00b0 0004 0001 | | .DEBUG4 0x0004,0x0001,0xc8aa,0x0000,0x0001,0x0000
00b6 0000 0000 | | .BLANK 0000[0x14a]