|
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_b5ccd9
└─⟦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 0024 | $ | .CONST 0x0024 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0012 | | .CONST 0x0012 ; Number of locals 000b INIT_0008: 000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated 000d 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 000f 00bf | | Action Accept_Activation 0010 4801 |H | Short_Literal 0x1 0011 4864 |Hd | Short_Literal 0x64 0012 00e2 | | Load_Encached Integer_Cache 0013 03f8 | | Declare_Type Discrete,Constrained 0014 00e9 | | Load_Encached String_Cache 0015 02a0 | | Declare_Subprogram Null_Subprogram 0016 4818 |H | Short_Literal 0x18 0017 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0018 4801 |H | Short_Literal 0x1 0019 4864 |Hd | Short_Literal 0x64 001a 00da | | Load_Top At_Offset_2 001b 02a0 | | Declare_Subprogram Null_Subprogram 001c 4801 |H | Short_Literal 0x1 001d 035d | ] | Declare_Type Array,Defined 001e 00d8 | | Load_Top At_Offset_0 001f 0337 | 7 | Declare_Variable Array 0020 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0021 00c7 | | Action Elaborate_Subprogram 0022 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0023 00c7 | | Action Elaborate_Subprogram 0024 BODY_0008: 0024 00bc | | Action Signal_Activated 0025 00bb | | Action Signal_Completion 0026 0000 0000 | | .XXX[0x2] 0028 ; -------------------------------------------------------------------------------------- 0028 ; SUBPROGRAM 0028 ; -------------------------------------------------------------------------------------- 0028 002b | + | .CONST 0x002b ; Address of begin 0029 0004 | | .CONST 0x0004 ; Address of exception handler 002a 0001 | | .CONST 0x0001 ; Number of locals 002b BODY_0028: 002b INIT_0028: 002b 00cf | | Action Mark_Auxiliary 002c e212 | | Load 0x1,0x12 002d 01d9 | | Execute Vector,Reverse_Bounds 002e 0007 | | Action Break_Optional 002f 00d8 | | Load_Top At_Offset_0 0030 e212 | | Load 0x1,0x12 0031 01d7 | | Execute Vector,Field_Read 0032 7008 |p | Jump_Nonzero 0x3b 0033 e5ff | | Load 0x2,-0x1 0034 e210 | | Load 0x1,0x10 0035 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0036 00d9 | | Load_Top At_Offset_1 0037 e212 | | Load 0x1,0x12 0038 01d6 | | Execute Vector,Field_Write 0039 00d8 | | Load_Top At_Offset_0 003a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 003b 00d8 | | Load_Top At_Offset_0 003c e212 | | Load 0x1,0x12 003d 01d7 | | Execute Vector,Field_Read 003e 0227 | ' | Execute Access,All_Reference 003f e5ff | | Load 0x2,-0x1 0040 01df | | Execute Vector,Equal 0041 6802 |h | Jump_Zero 0x44 0042 00d8 | | Load_Top At_Offset_0 0043 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0044 00c8 | | Action Pop_Auxiliary_Range 0045 3fe9 |? | Loop_Increasing 0x2f 0046 00ce | | Action Pop_Auxiliary 0047 0831 | 1 | Execute_Immediate Raise,0x31 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 00da | | Load_Top At_Offset_2 004c e212 | | Load 0x1,0x12 004d 01d7 | | Execute Vector,Field_Read 004e 0227 | ' | Execute Access,All_Reference 004f 0335 | 5 | Declare_Variable Array,Duplicate 0050 00cd | | Action Spare6_Action 0051 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0052 0000 0000 | | .BLANK 0000[0x6] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0004 | | .DEBUG4 0x0004,0x0004,0x6526,0x0000,0x0001,0x0004 005e 000b 006e | n| .DBG4T 0x000b,0x006e,0x8000,0x0000 0062 0010 0072 | r| .DBG4T 0x0010,0x0072,0x8000,0x8000 0066 002b 007e | + ~| .DBG4T 0x002b,0x007e,0x0002,0x0000 006a 004b 0086 | K | .DBG4T 0x004b,0x0086,0x0002,0x0000 006e ; -------------------------------------------------------------------------------------- 006e ; Debug chain 006e ; -------------------------------------------------------------------------------------- 006e 0002 0000 | | .DBGLEN 0x0002,0x0000 0070 000b 000d | | .DBGLNO 0x000b,0x000d 0072 ; -------------------------------------------------------------------------------------- 0072 ; Debug chain 0072 ; -------------------------------------------------------------------------------------- 0072 0005 0000 | | .DBGLEN 0x0005,0x0000 0074 0010 0014 | | .DBGLNO 0x0010,0x0014,0x0018,0x0020,0x0022 0079 0002 0003 | | .XXX[0x5] 007b 0004 0005 | | 007d 0006 | | 007e ; -------------------------------------------------------------------------------------- 007e ; Debug chain 007e ; -------------------------------------------------------------------------------------- 007e 0000 0006 | | .DBGLEN 0x0000,0x0006 0080 002c 002f | , /| .DBGLNO 0x002c,0x002f,0x0033,0x0039,0x003b,0x0042 0086 ; -------------------------------------------------------------------------------------- 0086 ; Debug chain 0086 ; -------------------------------------------------------------------------------------- 0086 0000 0001 | | .DBGLEN 0x0000,0x0001 0088 004b | K | .DBGLNO 0x004b 0089 0000 0000 | | .BLANK 0000[0x177]