|
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_0900ea
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0078 | x | .CONST 0x0078 ; 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 0027 | ' | .CONST 0x0027 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0013 | | .CONST 0x0013 ; Number of locals
000b INIT_0008:
000b 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated
000d 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
000f 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
0011 00bf | | Action Accept_Activation
0012 029d 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call
0014 a002 | | Store_Unchecked 0x0,0x2
0015 00c6 | | Action Check_Subprogram_Elaborated
0016 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0017 0093 0000 | | push_full_address 0x0
0019 6026 |`& | Indirect_Literal Discrete,0x40,{0x80000000, 0x00010000}
001a 0273 | s | Execute Discrete,Plus
001b e003 | | Load 0x0,0x3
001c 0273 | s | Execute Discrete,Plus
001d e004 | | Load 0x0,0x4
001e 0273 | s | Execute Discrete,Plus
001f 4800 |H | Short_Literal 0x0
0020 0007 | | Action Break_Optional
0021 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0022 00c7 | | Action Elaborate_Subprogram
0023 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0024 00c7 | | Action Elaborate_Subprogram
0025 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0026 00c7 | | Action Elaborate_Subprogram
0027 BODY_0008:
0027 00bc | | Action Signal_Activated
0028 00bb | | Action Signal_Completion
0029 0000 0000 | | .BLANK 0000[0x7]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0033 | 3 | .CONST 0x0033 ; Address of begin
0031 0004 | | .CONST 0x0004 ; Address of exception handler
0032 0001 | | .CONST 0x0001 ; Number of locals
0033 BODY_0030:
0033 INIT_0030:
0033 e005 | | Load 0x0,0x5
0034 0337 | 7 | Declare_Variable Array
0035 00db | | Load_Top At_Offset_3
0036 8006 | | Call 0x0,0x6
0037 4800 |H | Short_Literal 0x0
0038 00da | | Load_Top At_Offset_2
0039 01d6 | | Execute Vector,Field_Write
003a e005 | | Load 0x0,0x5
003b 01c3 | | Execute Vector,Check_In_Type
003c 8007 | | Call 0x0,0x7
003d 4502 |E | Exit_Suprogram New_Top_Offset 0x2
003e 0000 0000 | | .XXX[0x2]
0040 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0044 0000 0000 | | .BLANK 0000[0x4]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b e008 | | Load 0x0,0x8
004c 0337 | 7 | Declare_Variable Array
004d 4801 |H | Short_Literal 0x1
004e 8006 | | Call 0x0,0x6
004f 4800 |H | Short_Literal 0x0
0050 00da | | Load_Top At_Offset_2
0051 01d6 | | Execute Vector,Field_Write
0052 4801 |H | Short_Literal 0x1
0053 8006 | | Call 0x0,0x6
0054 4801 |H | Short_Literal 0x1
0055 00da | | Load_Top At_Offset_2
0056 01d6 | | Execute Vector,Field_Write
0057 4800 |H | Short_Literal 0x0
0058 8009 | | Call 0x0,0x9
0059 4802 |H | Short_Literal 0x2
005a 00da | | Load_Top At_Offset_2
005b 01d6 | | Execute Vector,Field_Write
005c e008 | | Load 0x0,0x8
005d 01c3 | | Execute Vector,Check_In_Type
005e 800a | | Call 0x0,0xa
005f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
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 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0064 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0065 8002 | | Call 0x0,0x2
0066 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0067 0000 | | .XXX[0x1]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 00db | | Load_Top At_Offset_3
006c 00db | | Load_Top At_Offset_3
006d 00d8 | | Load_Top At_Offset_0
006e 00e3 | | Load_Encached Natural_Cache
006f 0260 | ` | Execute Discrete,In_Type
0070 7001 |p | Jump_Nonzero 0x72
0071 0801 | | Execute_Immediate Raise,0x1
0072 800b | | Call 0x0,0xb
0073 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0074 0000 0000 | | .BLANK 0000[0x4]
0078 ; --------------------------------------------------------------------------------------
0078 ; Debug Table
0078 ; --------------------------------------------------------------------------------------
0078 0004 0006 | | .DEBUG4 0x0004,0x0006,0x879f,0x0000,0x0001,0x0006
007e 000b 0096 | | .DBG4T 0x000b,0x0096,0x8000,0x0000
0082 0012 009b | | .DBG4T 0x0012,0x009b,0x8000,0x0000
0086 0033 00a1 | 3 | .DBG4T 0x0033,0x00a1,0x0001,0x0000
008a 004b 00a4 | K | .DBG4T 0x004b,0x00a4,0x0001,0x0000
008e 0063 00a7 | c | .DBG4T 0x0063,0x00a7,0x0001,0x0000
0092 006b 0000 | k | .DBG4T 0x006b,0x0000,0x000b,0x0000
0096 ; --------------------------------------------------------------------------------------
0096 ; Debug chain
0096 ; --------------------------------------------------------------------------------------
0096 0003 0000 | | .DBGLEN 0x0003,0x0000
0098 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f
009b ; --------------------------------------------------------------------------------------
009b ; Debug chain
009b ; --------------------------------------------------------------------------------------
009b 0004 0000 | | .DBGLEN 0x0004,0x0000
009d 0012 0021 | !| .DBGLNO 0x0012,0x0021,0x0023,0x0025
00a1 ; --------------------------------------------------------------------------------------
00a1 ; Debug chain
00a1 ; --------------------------------------------------------------------------------------
00a1 0000 0001 | | .DBGLEN 0x0000,0x0001
00a3 0033 | 3 | .DBGLNO 0x0033
00a4 ; --------------------------------------------------------------------------------------
00a4 ; Debug chain
00a4 ; --------------------------------------------------------------------------------------
00a4 0000 0001 | | .DBGLEN 0x0000,0x0001
00a6 004b | K | .DBGLNO 0x004b
00a7 ; --------------------------------------------------------------------------------------
00a7 ; Debug chain
00a7 ; --------------------------------------------------------------------------------------
00a7 0000 0001 | | .DBGLEN 0x0000,0x0001
00a9 0063 | c | .DBGLNO 0x0063
00aa 0000 0000 | | .BLANK 0000[0x156]