|
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_6148f2
└─⟦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 0070 | p | .CONST 0x0070 ; 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 000b | | .CONST 0x000b ; Address of begin 0009 004e | N | .CONST 0x004e ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b BODY_0008: 000b INIT_0008: 000b 00cf | | Action Mark_Auxiliary 000c 00db | | Load_Top At_Offset_3 000d 01d9 | | Execute Vector,Reverse_Bounds 000e 0263 | c | Execute Discrete,Above_Bound 000f 7025 |p% | Jump_Nonzero 0x35 0010 00d8 | | Load_Top At_Offset_0 0011 e5ff | | Load 0x2,-0x1 0012 01d7 | | Execute Vector,Field_Read 0013 0f78 | x | Execute_Immediate Equal,0x78 0014 7005 |p | Jump_Nonzero 0x1a 0015 00d8 | | Load_Top At_Offset_0 0016 e5ff | | Load 0x2,-0x1 0017 01d7 | | Execute Vector,Field_Read 0018 0f58 | X | Execute_Immediate Equal,0x58 0019 6819 |h | Jump_Zero 0x33 001a e5ff | | Load 0x2,-0x1 001b 01dd | | Execute Vector,First 001c 00d9 | | Load_Top At_Offset_1 001d 0aff | | Execute_Immediate Plus,-0x1 001e e5ff | | Load 0x2,-0x1 001f 01cf | | Execute Vector,Slice_Read 0020 00e5 | | Load_Encached Long_Integer_Cache 0021 00e0 | | Load_Encached Standard_Cache 0022 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0023 c011 | | Store 0x0,0x11 0024 00d8 | | Load_Top At_Offset_0 0025 0a01 | | Execute_Immediate Plus,0x1 0026 00d8 | | Load_Top At_Offset_0 0027 00e2 | | Load_Encached Integer_Cache 0028 0260 | ` | Execute Discrete,In_Type 0029 7001 |p | Jump_Nonzero 0x2b 002a 0801 | | Execute_Immediate Raise,0x1 002b e5ff | | Load 0x2,-0x1 002c 01dc | | Execute Vector,Last 002d e5ff | | Load 0x2,-0x1 002e 01cf | | Execute Vector,Slice_Read 002f 00e5 | | Load_Encached Long_Integer_Cache 0030 00e0 | | Load_Encached Standard_Cache 0031 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0032 c02c | , | Store 0x0,0x2c 0033 00c8 | | Action Pop_Auxiliary_Range 0034 3fdb |? | Loop_Increasing 0x10 0035 00ce | | Action Pop_Auxiliary 0036 e011 | | Load 0x0,0x11 0037 0d04 | | Execute_Immediate Less,0x4 0038 6802 |h | Jump_Zero 0x3b 0039 4804 |H | Short_Literal 0x4 003a c011 | | Store 0x0,0x11 003b e02c | , | Load 0x0,0x2c 003c 0d04 | | Execute_Immediate Less,0x4 003d 6802 |h | Jump_Zero 0x40 003e 4804 |H | Short_Literal 0x4 003f c02c | , | Store 0x0,0x2c 0040 e011 | | Load 0x0,0x11 0041 4802 |H | Short_Literal 0x2 0042 026f | o | Execute Discrete,Remainder 0043 0f01 | | Execute_Immediate Equal,0x1 0044 6808 |h | Jump_Zero 0x4d 0045 e02c | , | Load 0x0,0x2c 0046 4802 |H | Short_Literal 0x2 0047 026f | o | Execute Discrete,Remainder 0048 0f01 | | Execute_Immediate Equal,0x1 0049 6803 |h | Jump_Zero 0x4d 004a e011 | | Load 0x0,0x11 004b 0a01 | | Execute_Immediate Plus,0x1 004c c011 | | Store 0x0,0x11 004d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 004e TRAP_0008: 004e 0007 | | Action Break_Optional 004f 0092 0057 | W| Action Push_String_Extended,0x57 ; "Error with Size specification: " 0051 e5ff | | Load 0x2,-0x1 0052 01cc | | Execute Vector,Catenate 0053 e017 | | Load 0x0,0x17 0054 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0055 00d8 | | Load_Top At_Offset_0 0056 0101 | | Execute Exception,Reraise 0057 ; -------------------------------------------------------------------------------------- 0057 ; STRING TABLE 0057 ; -------------------------------------------------------------------------------------- 0057 0004 | | .STRTAB 0x0004->0x0059 ; "Error with Size specification: " 0058 0021 | ! | .STREND 0x0021->0x0068 0059 4572 726f |Erro| .STRTAB_STRINGS 0069 0000 0000 | | .BLANK 0000[0x7] 0070 ; -------------------------------------------------------------------------------------- 0070 ; Debug Table 0070 ; -------------------------------------------------------------------------------------- 0070 0004 0000 | | .DEBUG4 0x0004,0x0000,0x688e,0x0000,0x0001,0x0001 0076 000b 007a | z| .DBG4T 0x000b,0x007a,0x0001,0x0000 007a ; -------------------------------------------------------------------------------------- 007a ; Debug chain 007a ; -------------------------------------------------------------------------------------- 007a 0000 000c | | .DBGLEN 0x0000,0x000c 007c 000c 0010 | | .DBGLNO 0x000c,0x0010,0x001a,0x0024,0x0036,0x0039,0x003b,0x003e,0x0040,0x004a,0x004f,0x0055 0088 0000 0000 | | .BLANK 0000[0x178]