|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0040 | @ | .CONST 0x0040 ; 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 ; SUBPROGRAM 0008 ; See instruction 0x02cf at 0x19, index=0x0 0008 ; -------------------------------------------------------------------------------------- 0008 0021 | ! | .CONST 0x0021 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0011 | | .CONST 0x0011 ; Number of locals 000b INIT_0008: 000b INIT_0008: 000b 4801 |H | Short_Literal 0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x005a,0x0000,0x0000,0x0057,0x2465,0x0000,0x01e4 000c 02cb | | Declare_Variable Entry 000d 00bf | | Action Accept_Activation 000e 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x1 = .DEBUG 0x000e,0x005c,0x0000,0x0000,0x0057,0x2775,0x0000,0x000a ; Debug Table 0x1.0x0 = 0xe,0xffff 000f 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0xf,0xfffe 0010 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x2 = 0x10,0xfffd 0011 180e | | Execute Package,Field_Execute,Field_Number 0xe 0012 00e5 | | Load_Encached Long_Integer_Cache 0013 03f1 | | Declare_Variable Discrete,With_Value 0014 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x3 = 0x14,0xfffc 0015 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0016 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0017 00e5 | | Load_Encached Long_Integer_Cache 0018 03f1 | | Declare_Variable Discrete,With_Value 0019 480d 4806 |H H | Declare_Variable Select 0x000, 0x001, ; Debug Table 0x1.0x4 = 0x19,0xfffb 001b 4800 4801 |H H | [0x000]: 0x001 = 0x0008, 001d 4800 4801 |H H | [0x00d]: 0x006 = 0x0030 001f 02cf | | 0020 00bc | | Action Signal_Activated 0021 BODY_0008: 0021 BODY_0008: 0021 00da | | Load_Top At_Offset_2 ; Debug Table 0x1.0x5 = 0x21,0x1 0022 0910 | | Execute_Immediate Binary_Scale,0x10 0023 00da | | Load_Top At_Offset_2 0024 0273 | s | Execute Discrete,Plus 0025 090f | | Execute_Immediate Binary_Scale,0xf 0026 a20e | | Store_Unchecked 0x1,0xe 0027 00cf | | Action Mark_Auxiliary 0028 0007 | | Action Break_Optional ; Debug Table 0x1.0x6 = 0x28,0x2 0029 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1.0x7 = 0x29,0x3 002a 013f | ? | Execute Select,Rendezvous 002b 00d1 | | Pop_Control Pop_Count_1 002c 00c9 | | Action Pop_Auxiliary_Loop 002d 7ffb | | Jump 0x29 002e 0000 0000 | | .XXX[0x2] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; See instruction 0x02cf at 0x19, index=0xd 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 e20e | | Load 0x1,0xe ; Debug Table 0x2 = .DEBUG 0x0033,0x006e,0x0003,0x0000,0x0057,0x2775,0x0000,0x0064 ; Debug Table 0x2.0x0 = 0x33,0x1 0034 0a01 | | Execute_Immediate Plus,0x1 0035 a20e | | Store_Unchecked 0x1,0xe 0036 e20e | | Load 0x1,0xe ; Debug Table 0x2.0x1 = 0x36,0x2 0037 a5fe | | Store_Unchecked 0x2,-0x2 0038 4101 |A | End_Rendezvous 0x1 0039 0000 0000 | | .BLANK 0000[0x7] 0040 ; -------------------------------------------------------------------------------------- 0040 ; Debug Table 0040 ; -------------------------------------------------------------------------------------- 0040 0003 0003 | | .CONST 0x0003,0x0003 0042 000b 005a | Z| .DEBUG 0x000b,0x005a,0x0000,0x0000,0x0057,0x2465,0x0000,0x01e4 004a 000e 005c | \| .DEBUG 0x000e,0x005c,0x0000,0x0000,0x0057,0x2775,0x0000,0x000a 0052 0033 006e | 3 n| .DEBUG 0x0033,0x006e,0x0003,0x0000,0x0057,0x2775,0x0000,0x0064 005a ; -------------------------------------------------------------------------------------- 005a ; Debug3 Subtable 0x0 005a ; -------------------------------------------------------------------------------------- 005a 0000 0000 | | .DBG3TAB 0x0000,0x0000 005c ; -------------------------------------------------------------------------------------- 005c ; Debug3 Subtable 0x1 005c ; -------------------------------------------------------------------------------------- 005c 0005 0003 | | .DBG3TAB 0x0005,0x0003 005e 000e ffff | | .CONST 0x000e,0xffff 0060 000f fffe | | .CONST 0x000f,0xfffe 0062 0010 fffd | | .CONST 0x0010,0xfffd 0064 0014 fffc | | .CONST 0x0014,0xfffc 0066 0019 fffb | | .CONST 0x0019,0xfffb 0068 0021 0001 | ! | .CONST 0x0021,0x0001 006a 0028 0002 | ( | .CONST 0x0028,0x0002 006c 0029 0003 | ) | .CONST 0x0029,0x0003 006e ; -------------------------------------------------------------------------------------- 006e ; Debug3 Subtable 0x2 006e ; -------------------------------------------------------------------------------------- 006e 0000 0002 | | .DBG3TAB 0x0000,0x0002 0070 0033 0001 | 3 | .CONST 0x0033,0x0001 0072 0036 0002 | 6 | .CONST 0x0036,0x0002 0074 0000 0000 | | .BLANK 0000[0x18c]