|
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_02f8e7
└─⟦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 0088 | | .CONST 0x0088 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 001a | | .CONST 0x001a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0006 | | .CONST 0x0006 ; Number of locals 000b INIT_0008: 000b 00e4 | | Load_Encached Positive_Cache 000c 061a | | Execute_Immediate Set_Value_Unchecked,0x1a 000d 4800 |H | Short_Literal 0x0 000e 4802 |H | Short_Literal 0x2 000f 00e3 | | Load_Encached Natural_Cache 0010 03f8 | | Declare_Type Discrete,Constrained 0011 e602 | | Load 0x3,0x2 0012 4803 |H | Short_Literal 0x3 0013 0270 | p | Execute Discrete,Divide 0014 00e2 | | Load_Encached Integer_Cache 0015 03f1 | | Declare_Variable Discrete,With_Value 0016 029f 0033 | 3| Declare_Subprogram INIT_0030,For_Call 0018 029f 004b | K| Declare_Subprogram INIT_0048,For_Call 001a BODY_0008: 001a 00cf | | Action Mark_Auxiliary 001b e604 | | Load 0x3,0x4 001c 4800 |H | Short_Literal 0x0 001d 0263 | c | Execute Discrete,Above_Bound 001e 700c |p | Jump_Nonzero 0x2b 001f 00cf | | Action Mark_Auxiliary 0020 4802 |H | Short_Literal 0x2 0021 4800 |H | Short_Literal 0x0 0022 0007 | | Action Break_Optional 0023 00d8 | | Load_Top At_Offset_0 0024 e609 | | Load 0x3,0x9 0025 8606 | | Call 0x3,0x6 0026 00c8 | | Action Pop_Auxiliary_Range 0027 3ffb |? | Loop_Increasing 0x23 0028 00ce | | Action Pop_Auxiliary 0029 00c8 | | Action Pop_Auxiliary_Range 002a 3ff4 |? | Loop_Increasing 0x1f 002b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 002c 0000 0000 | | .BLANK 0000[0x4] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0035 | 5 | .CONST 0x0035 ; Address of begin 0031 003f | ? | .CONST 0x003f ; Address of exception handler 0032 0002 | | .CONST 0x0002 ; Number of locals 0033 INIT_0030: 0033 e40b | | Load 0x2,0xb 0034 0007 | | Action Break_Optional 0035 BODY_0030: 0035 e9ff | | Load 0x4,-0x1 0036 00d8 | | Load_Top At_Offset_0 0037 e40b | | Load 0x2,0xb 0038 0260 | ` | Execute Discrete,In_Type 0039 7002 |p | Jump_Nonzero 0x3c 003a 48e0 |H | Short_Literal 0xe0 003b 0257 | W | Execute Discrete,Raise 003c a802 | | Store_Unchecked 0x4,0x2 003d 4801 |H | Short_Literal 0x1 003e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 003f TRAP_0030: 003f 010e | | Execute Exception,Is_Constraint_Error 0040 6802 |h | Jump_Zero 0x43 0041 4800 |H | Short_Literal 0x0 0042 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0043 0100 | | Execute Exception,Raise 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 005e | ^ | .CONST 0x005e ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0004 | | .CONST 0x0004 ; Number of locals 004b INIT_0048: 004b e40b | | Load 0x2,0xb 004c 0007 | | Action Break_Optional 004d e9ff | | Load 0x4,-0x1 004e e9fe | | Load 0x4,-0x2 004f e604 | | Load 0x3,0x4 0050 0a01 | | Execute_Immediate Plus,0x1 0051 0248 | H | Execute Discrete,Check_In_Integer 0052 0271 | q | Execute Discrete,Times 0053 0273 | s | Execute Discrete,Plus 0054 0248 | H | Execute Discrete,Check_In_Integer 0055 00e2 | | Load_Encached Integer_Cache 0056 03f1 | | Declare_Variable Discrete,With_Value 0057 e9fe | | Load 0x4,-0x2 0058 481b |H | Short_Literal 0x1b 0059 0271 | q | Execute Discrete,Times 005a 0248 | H | Execute Discrete,Check_In_Integer 005b 0a02 | | Execute_Immediate Plus,0x2 005c 00e4 | | Load_Encached Positive_Cache 005d 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 005e BODY_0048: 005e e803 | | Load 0x4,0x3 005f 8605 | | Call 0x3,0x5 0060 6822 |h" | Jump_Zero 0x83 0061 e803 | | Load 0x4,0x3 0062 00d8 | | Load_Top At_Offset_0 0063 e40b | | Load 0x2,0xb 0064 0260 | ` | Execute Discrete,In_Type 0065 7002 |p | Jump_Nonzero 0x68 0066 48e0 |H | Short_Literal 0xe0 0067 0257 | W | Execute Discrete,Raise 0068 a802 | | Store_Unchecked 0x4,0x2 0069 00d8 | | Load_Top At_Offset_0 006a e01a | | Load 0x0,0x1a 006b 1b10 | | Execute Package,Field_Read,Field_Number 0x10 006c 025b | [ | Execute Discrete,Check_In_Type 006d e01a | | Load 0x0,0x1a 006e 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 006f e803 | | Load 0x4,0x3 0070 0a01 | | Execute_Immediate Plus,0x1 0071 0248 | H | Execute Discrete,Check_In_Integer 0072 00e0 | | Load_Encached Standard_Cache 0073 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0074 e01a | | Load 0x0,0x1a 0075 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0076 00d8 | | Load_Top At_Offset_0 0077 0a04 | | Execute_Immediate Plus,0x4 0078 e01a | | Load 0x0,0x1a 0079 1b10 | | Execute Package,Field_Read,Field_Number 0x10 007a 025b | [ | Execute Discrete,Check_In_Type 007b e01a | | Load 0x0,0x1a 007c 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 007d e802 | | Load 0x4,0x2 007e e40b | | Load 0x2,0xb 007f 025e | ^ | Execute Discrete,Convert 0080 1c01 | | Execute_Immediate Run_Utility,0x1 0081 e01a | | Load 0x0,0x1a 0082 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0083 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0084 0000 0000 | | .BLANK 0000[0x4] 0088 ; -------------------------------------------------------------------------------------- 0088 ; Debug Table 0088 ; -------------------------------------------------------------------------------------- 0088 0004 0000 | | .DEBUG4 0x0004,0x0000,0x11f9,0x0000,0x0001,0x0000 008e 0000 1801 | | .XXX[0x10] 0090 4000 0000 |@ | 0092 4000 0010 |@ | 0094 0000 0088 | | 0096 0000 0000 | | 0098 4000 0002 |@ | 009a 9000 0080 | | 009c 3e15 8000 |> | 009e 0000 0000 | | .BLANK 0000[0x1d] 00bb 482e 4070 |H.@p| .XXX[0x1c] 00bd 0000 0129 | )| 00bf 0000 1000 | | 00c1 c000 0800 | | 00c3 0000 02c5 | | 00c5 8000 0200 | | 00c7 0000 0300 | | 00c9 2800 0000 |( | 00cb 0800 0002 | | 00cd 0000 0011 | | 00cf 0000 0000 | | 00d1 0800 0000 | | 00d3 5200 0010 |R | 00d5 0799 b000 | | 00d7 0000 0000 | | .BLANK 0000[0x1d] 00f4 0905 c810 | | .XXX[0x1c] 00f6 0000 0025 | %| 00f8 2000 0200 | | 00fa 1800 0100 | | 00fc 0000 0065 | e| 00fe e000 0040 | @| 0100 0000 00a0 | | 0102 0500 0000 | | 0104 0100 0000 | | 0106 4000 0002 |@ | 0108 2000 0000 | | 010a 0100 0000 | | 010c 0a40 0002 | @ | 010e 00f9 6d00 | m | 0110 0000 0000 | | .BLANK 0000[0x8] 0118 0040 0002 | @ | .XXX[0x4] 011a 00f9 6e00 | n | 011c 0000 0000 | | .BLANK 0000[0x11] 012d 0120 b902 | | .XXX[0x1c] 012f 4000 0004 |@ | 0131 2400 0040 |$ @| 0133 0300 0020 | | 0135 0000 0006 | | 0137 4a00 0008 |J | 0139 0000 001c | | 013b 00a0 0000 | | 013d 0020 0000 | | 013f 0800 0000 | | 0141 4400 0000 |D | 0143 0020 0000 | | 0145 0148 0000 | H | 0147 401d 30c0 |@ 0 | 0149 0000 0000 | | .BLANK 0000[0x8] 0151 0008 0000 | | .XXX[0x4] 0153 401d 3ac0 |@ : | 0155 0000 0000 | | .BLANK 0000[0x5] 015a 0008 0000 | | .XXX[0x4] 015c 401c ce80 |@ | 015e 0000 0000 | | .BLANK 0000[0x8] 0166 0024 1720 | $ | .XXX[0x1c] 0168 5000 0000 |P | 016a a480 0008 | | 016c 0060 0004 | ` | 016e 0000 0001 | | 0170 c3c0 0001 | | 0172 0000 0001 | | 0174 8014 0000 | | 0176 0004 0000 | | 0178 0100 0000 | | 017a 0880 0000 | | 017c 0004 0000 | | 017e 0029 0000 | ) | 0180 0804 014c | L| 0182 0000 0000 | | .BLANK 0000[0x2b] 01ad 1002 8000 | | .XXX[0xb] 01af 0000 0000 | | 01b1 0020 0000 | | 01b3 0110 0000 | | 01b5 0000 8000 | | 01b7 0005 | | 01b8 0000 0000 | | .BLANK 0000[0x48]