|
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_4b04d9
└─⟦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 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 002c | , | .CONST 0x002c ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0005 | | .CONST 0x0005 ; Number of locals
001b INIT_0018:
001b 029f 004b | K| Declare_Subprogram INIT_0048,For_Call
001d a002 | | Store_Unchecked 0x0,0x2
001e 00c6 | | Action Check_Subprogram_Elaborated
001f 4802 |H | Short_Literal 0x2
0020 4802 |H | Short_Literal 0x2
0021 0099 | | Action Reference_Dynamic
0022 0093 0000 | | push_full_address 0x0
0024 601f |` | Indirect_Literal Discrete,0x44,{0x80000000, 0x00010000}
0025 0273 | s | Execute Discrete,Plus
0026 e003 | | Load 0x0,0x3
0027 0273 | s | Execute Discrete,Plus
0028 e004 | | Load 0x0,0x4
0029 0273 | s | Execute Discrete,Plus
002a 4805 |H | Short_Literal 0x5
002b 0007 | | Action Break_Optional
002c BODY_0018:
002c 8005 | | Call 0x0,0x5
002d 8006 | | Call 0x0,0x6
002e 00cf | | Action Mark_Auxiliary
002f 8007 | | Call 0x0,0x7
0030 4801 |H | Short_Literal 0x1
0031 0263 | c | Execute Discrete,Above_Bound
0032 7005 |p | Jump_Nonzero 0x38
0033 8008 | | Call 0x0,0x8
0034 00d9 | | Load_Top At_Offset_1
0035 8009 | | Call 0x0,0x9
0036 00c8 | | Action Pop_Auxiliary_Range
0037 3ffb |? | Loop_Increasing 0x33
0038 00ce | | Action Pop_Auxiliary
0039 4803 |H | Short_Literal 0x3
003a 4802 |H | Short_Literal 0x2
003b 0099 | | Action Reference_Dynamic
003c 4804 |H | Short_Literal 0x4
003d 4802 |H | Short_Literal 0x2
003e 0099 | | Action Reference_Dynamic
003f 8002 | | Call 0x0,0x2
0040 8006 | | Call 0x0,0x6
0041 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0042 0000 0000 | | .XXX[0x2]
0044 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
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 00db | | Load_Top At_Offset_3
004c 00db | | Load_Top At_Offset_3
004d 00d8 | | Load_Top At_Offset_0
004e 00e3 | | Load_Encached Natural_Cache
004f 0260 | ` | Execute Discrete,In_Type
0050 7001 |p | Jump_Nonzero 0x52
0051 0801 | | Execute_Immediate Raise,0x1
0052 800a | | Call 0x0,0xa
0053 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0054 0000 0000 | | .BLANK 0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 0006 | | .DEBUG4 0x0004,0x0006,0xb087,0x0000,0x0001,0x0003
005e 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
0062 001b 006a | j| .DBG4T 0x001b,0x006a,0x8001,0x0000
0066 004b 0000 | K | .DBG4T 0x004b,0x0000,0x000b,0x0000
006a ; --------------------------------------------------------------------------------------
006a ; Debug chain
006a ; --------------------------------------------------------------------------------------
006a 0001 0006 | | .DBGLEN 0x0001,0x0006
006c 001b 002c | ,| .DBGLNO 0x001b,0x002c,0x002d,0x002f,0x0033,0x0039,0x0040
0073 0000 0000 | | .BLANK 0000[0x18d]