|
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_6a18da
└─⟦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 5800 |X | .CONST 0x5800 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 000b | | .CONST 0x000b ; Address of begin 0009 0004 | | .CONST 0x0004 ; 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 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 000e 01d9 | | Execute Vector,Reverse_Bounds 000f 0263 | c | Execute Discrete,Above_Bound 0010 702d |p- | Jump_Nonzero 0x3e 0011 00d8 | | Load_Top At_Offset_0 0012 e5ff | | Load 0x2,-0x1 0013 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 0014 01d5 | | Execute Vector,Field_Reference 0015 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0016 4604 |F | Jump_Case 0x5 0017 7806 |x | Jump 0x1e ; case 0x0 0018 780f |x | Jump 0x28 ; case 0x1 0019 7815 |x | Jump 0x2f ; case 0x2 001a 781b |x | Jump 0x36 ; case 0x3 001b 7800 |x | Jump 0x1c ; case 0x4 001c 00d2 | | Pop_Control Pop_Count_2 001d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 001e e5fe | | Load 0x2,-0x2 001f 00d9 | | Load_Top At_Offset_1 0020 e5ff | | Load 0x2,-0x1 0021 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 0022 01d5 | | Execute Vector,Field_Reference 0023 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0024 e245 | E | Load 0x1,0x45 0025 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0026 824f | O | Call 0x1,0x4f 0027 7814 |x | Jump 0x3c 0028 00d8 | | Load_Top At_Offset_0 0029 e5ff | | Load 0x2,-0x1 002a 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 002b 01d5 | | Execute Vector,Field_Reference 002c 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 002d 00ba | | Action Initiate_Delay 002e 780d |x | Jump 0x3c 002f e5fe | | Load 0x2,-0x2 0030 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0031 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0032 e00d | | Load 0x0,0xd 0033 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0034 180e | | Execute Package,Field_Execute,Field_Number 0xe 0035 7806 |x | Jump 0x3c 0036 e5fe | | Load 0x2,-0x2 0037 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0038 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0039 e00d | | Load 0x0,0xd 003a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 003b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 003c 00c8 | | Action Pop_Auxiliary_Range 003d 3fd3 |? | Loop_Increasing 0x11 003e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 003f 0000 | | .XXX[0x1] 0040 ; -------------------------------------------------------------------------------------- 0040 ; Debug Table 0040 ; -------------------------------------------------------------------------------------- 0040 0004 000a | | .DEBUG4 0x0004,0x000a,0x7e4b,0x0000,0x0001,0x0000 0046 1000 111e | | .XXX[0x2d] 0048 a42a 0dd0 | * | 004a e400 00b7 | | 004c 55a2 5c04 |U \ | 004e 0020 0027 | '| 0050 4000 0019 |@ | 0052 4b60 0001 |K` | 0054 8000 0003 | | 0056 400a 0000 |@ | 0058 0002 0000 | | 005a 0080 0000 | | 005c 0440 0000 | @ | 005e 0002 0000 | | 0060 0014 8000 | | 0062 0c04 a1ba | | 0064 8000 0c04 | | 0066 a1bc 8000 | | 0068 0c04 a1be | | 006a 8000 0804 | | 006c a166 8000 | f | 006e 0c04 a1c0 | | 0070 8000 0c04 | | 0072 a1c2 | | 0073 0000 0000 | | .BLANK 0000[0xc] 007f 0200 023d | =| .XXX[0x3] 0081 8200 | | 0082 0000 0000 | | .BLANK 0000[0xd] 008f 0801 4000 | @ | .XXX[0xc] 0091 0000 0000 | | 0093 0010 0000 | | 0095 0088 0000 | | 0097 0000 4000 | @ | 0099 0002 8000 | | 009b 0000 0000 | | .BLANK 0000[0x2d] 00c8 0100 2800 | ( | .XXX[0xc] 00ca 0000 0000 | | 00cc 0002 0000 | | 00ce 0011 0000 | | 00d0 0000 0800 | | 00d2 0000 5000 | P | 00d4 0000 0000 | | .BLANK 0000[0x2d] 0101 0020 0500 | | .XXX[0xc] 0103 0000 0000 | | 0105 0000 4000 | @ | 0107 0002 2000 | | 0109 0000 0100 | | 010b 0000 0a00 | | 010d 0000 0000 | | .BLANK 0000[0x2d] 013a 0004 00a0 | | .XXX[0xc] 013c 0000 0000 | | 013e 0000 0800 | | 0140 0000 4400 | D | 0142 0000 0020 | | 0144 0000 0140 | @| 0146 0000 0000 | | .BLANK 0000[0x2e] 0174 8014 0000 | | .XXX[0xb] 0176 0000 0000 | | 0178 0100 0000 | | 017a 0880 0000 | | 017c 0004 0000 | | 017e 0028 | ( | 017f 0000 0000 | | .BLANK 0000[0x2e] 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]