|
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_03bcfe
└─⟦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 00b8 | | .CONST 0x00b8 ; 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 0014 | | .CONST 0x0014 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0004 | | .CONST 0x0004 ; Number of locals 000b INIT_0008: 000b e011 | | Load 0x0,0x11 000c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 000d e0b9 | | Load 0x0,0xb9 000e 0007 | | Action Break_Optional 000f e033 | 3 | Load 0x0,0x33 0010 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0011 0322 | " | Declare_Variable Record 0012 00d8 | | Load_Top At_Offset_0 0013 1c00 | | Execute_Immediate Run_Utility,0x0 0014 BODY_0008: 0014 e0ba | | Load 0x0,0xba 0015 0d01 | | Execute_Immediate Less,0x1 0016 6805 |h | Jump_Zero 0x1c 0017 0092 00a4 | | Action Push_String_Extended,0xa4 ; "Table of Contents has no entries" 0019 e01c | | Load 0x0,0x1c 001a 180f | | Execute Package,Field_Execute,Field_Number 0xf 001b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 001c 00cf | | Action Mark_Auxiliary 001d e0ba | | Load 0x0,0xba 001e 4801 |H | Short_Literal 0x1 001f 0263 | c | Execute Discrete,Above_Bound 0020 7082 |p | Jump_Nonzero 0xa3 0021 00d8 | | Load_Top At_Offset_0 0022 80bb | | Call 0x0,0xbb 0023 a603 | | Store_Unchecked 0x3,0x3 0024 e603 | | Load 0x3,0x3 0025 0217 | | Execute Heap_Access,All_Reference 0026 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0027 e408 | | Load 0x2,0x8 0028 01d7 | | Execute Vector,Field_Read 0029 6877 |hw | Jump_Zero 0xa1 002a 480a |H | Short_Literal 0xa 002b 4800 |H | Short_Literal 0x0 002c e603 | | Load 0x3,0x3 002d 0217 | | Execute Heap_Access,All_Reference 002e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 002f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0030 e404 | | Load 0x2,0x4 0031 e028 | ( | Load 0x0,0x28 0032 186b | k | Execute Package,Field_Execute,Field_Number 0x6b 0033 483b |H; | Short_Literal 0x3b 0034 e404 | | Load 0x2,0x4 0035 e028 | ( | Load 0x0,0x28 0036 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 0037 e603 | | Load 0x3,0x3 0038 0217 | | Execute Heap_Access,All_Reference 0039 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 003a 701e |p | Jump_Nonzero 0x59 003b e603 | | Load 0x3,0x3 003c 0219 | | Execute Heap_Access,All_Read 003d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 003e e602 | | Load 0x3,0x2 003f e608 | | Load 0x3,0x8 0040 e033 | 3 | Load 0x0,0x33 0041 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0042 00d1 | | Pop_Control Pop_Count_1 0043 c602 | | Store 0x3,0x2 0044 00d1 | | Pop_Control Pop_Count_1 0045 e602 | | Load 0x3,0x2 0046 e011 | | Load 0x0,0x11 0047 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0048 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0049 0c01 | | Execute_Immediate Greater_Equal,0x1 004a 6809 |h | Jump_Zero 0x54 004b 4801 |H | Short_Literal 0x1 004c e602 | | Load 0x3,0x2 004d e011 | | Load 0x0,0x11 004e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 004f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0050 8264 | d | Call 0x1,0x64 0051 e404 | | Load 0x2,0x4 0052 e028 | ( | Load 0x0,0x28 0053 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 0054 e602 | | Load 0x3,0x2 0055 e011 | | Load 0x0,0x11 0056 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0057 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0058 c602 | | Store 0x3,0x2 0059 483b |H; | Short_Literal 0x3b 005a e404 | | Load 0x2,0x4 005b e028 | ( | Load 0x0,0x28 005c 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 005d 483b |H; | Short_Literal 0x3b 005e 4801 |H | Short_Literal 0x1 005f e603 | | Load 0x3,0x3 0060 0217 | | Execute Heap_Access,All_Reference 0061 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0062 0227 | ' | Execute Access,All_Reference 0063 8264 | d | Call 0x1,0x64 0064 01cb | | Execute Vector,Append 0065 e404 | | Load 0x2,0x4 0066 e028 | ( | Load 0x0,0x28 0067 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 0068 e603 | | Load 0x3,0x3 0069 0217 | | Execute Heap_Access,All_Reference 006a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 006b 6812 |h | Jump_Zero 0x7e 006c e603 | | Load 0x3,0x3 006d 0217 | | Execute Heap_Access,All_Reference 006e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 006f 4801 |H | Short_Literal 0x1 0070 e604 | | Load 0x3,0x4 0071 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0072 01d6 | | Execute Vector,Field_Write 0073 e603 | | Load 0x3,0x3 0074 0217 | | Execute Heap_Access,All_Reference 0075 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0076 4802 |H | Short_Literal 0x2 0077 e604 | | Load 0x3,0x4 0078 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0079 01d6 | | Execute Vector,Field_Write 007a 4802 |H | Short_Literal 0x2 007b e604 | | Load 0x3,0x4 007c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 007d 780a |x | Jump 0x88 007e e603 | | Load 0x3,0x3 007f 0217 | | Execute Heap_Access,All_Reference 0080 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0081 4801 |H | Short_Literal 0x1 0082 e604 | | Load 0x3,0x4 0083 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0084 01d6 | | Execute Vector,Field_Write 0085 4801 |H | Short_Literal 0x1 0086 e604 | | Load 0x3,0x4 0087 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0088 e603 | | Load 0x3,0x3 0089 0217 | | Execute Heap_Access,All_Reference 008a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 008b e604 | | Load 0x3,0x4 008c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 008d e602 | | Load 0x3,0x2 008e e604 | | Load 0x3,0x4 008f e033 | 3 | Load 0x0,0x33 0090 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0091 00d1 | | Pop_Control Pop_Count_1 0092 c602 | | Store 0x3,0x2 0093 4801 |H | Short_Literal 0x1 0094 e602 | | Load 0x3,0x2 0095 e011 | | Load 0x0,0x11 0096 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0097 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0098 8264 | d | Call 0x1,0x64 0099 e404 | | Load 0x2,0x4 009a e028 | ( | Load 0x0,0x28 009b 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 009c e602 | | Load 0x3,0x2 009d e011 | | Load 0x0,0x11 009e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00a0 c602 | | Store 0x3,0x2 00a1 00c8 | | Action Pop_Auxiliary_Range 00a2 3f7e |?~ | Loop_Increasing 0x21 00a3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00a4 ; -------------------------------------------------------------------------------------- 00a4 ; STRING TABLE 00a4 ; -------------------------------------------------------------------------------------- 00a4 0004 | | .STRTAB 0x0004->0x00a6 ; "Table of Contents has no entries" 00a5 0022 | " | .STREND 0x0022->0x00b6 00a6 5461 626c |Tabl| .STRTAB_STRINGS 00b6 0000 0000 | | .XXX[0x2] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; Debug Table 00b8 ; -------------------------------------------------------------------------------------- 00b8 0004 000f | | .DEBUG4 0x0004,0x000f,0x4811,0x0000,0x0001,0x0000 00be c476 c990 | v | .XXX[0x19] 00c0 1000 8000 | | 00c2 ae00 0000 | | 00c4 083d 4000 | =@ | 00c6 0200 0000 | | 00c8 0300 2800 | ( | 00ca 0000 0800 | | 00cc 0002 0000 | | 00ce 0011 0000 | | 00d0 0000 0800 | | 00d2 0000 5200 | R | 00d4 0010 310a | 1 | 00d6 f800 | | 00d7 0000 0000 | | .BLANK 0000[0x1a] 00f1 0018 0009 | | .XXX[0x1f] 00f3 708a 150d |p | 00f5 a752 0000 | R | 00f7 d88e d132 | 2| 00f9 0200 1000 | | 00fb 15c0 0000 | | 00fd 0107 a800 | | 00ff 0080 0000 | | 0101 0060 0500 | ` | 0103 0000 0100 | | 0105 0000 4000 | @ | 0107 0002 2000 | | 0109 0000 0100 | | 010b 0000 0a40 | @| 010d 0002 0621 | !| 010f 5f00 |_ | 0110 0000 0000 | | .BLANK 0000[0x1a] 012a 0003 0001 | | .XXX[0x28] 012c 2e12 42a1 |. B | 012e b4ea 8000 | | 0130 1b11 da26 | &| 0132 4040 0200 |@@ | 0134 02b8 0000 | | 0136 0020 f500 | | 0138 0010 0000 | | 013a 0024 00a0 | $ | 013c 0000 0020 | | 013e 0000 0800 | | 0140 0000 4400 | D | 0142 0000 0020 | | 0144 0000 0148 | H| 0146 0000 80c4 | | 0148 2c88 0000 |, | 014a 80c4 2ca8 | , | 014c 0000 80c4 | | 014e 2cc8 0000 |, | 0150 80c4 2ce0 | , | 0152 0000 0000 | | .BLANK 0000[0x12] 0164 6000 25c2 |` % | .XXX[0x1e] 0166 2854 369d |(T6 | 0168 5800 0362 |X b| 016a 32a4 b808 |2 | 016c 0040 0057 | @ W| 016e 0000 0003 | | 0170 9d00 0026 | &| 0172 8000 000b | | 0174 8014 0000 | | 0176 0288 0000 | | 0178 0100 0000 | | 017a 0880 0000 | | 017c 0004 0000 | | 017e 0029 0001 | ) | 0180 3018 85a8 |0 | 0182 0000 0000 | | .BLANK 0000[0x1b] 019d 0400 07c1 | | .XXX[0x1f] 019f 310a 86d5 |1 | 01a1 8c00 006c | l| 01a3 4768 a201 |Gh | 01a5 0008 000a | | 01a7 e000 0000 | | 01a9 7764 0007 |wd | 01ab 8000 0003 | | 01ad 5002 8000 |P | 01af 0051 0000 | Q | 01b1 0020 0000 | | 01b3 0110 0000 | | 01b5 0000 8000 | | 01b7 0005 2000 | | 01b9 3c03 1897 |< | 01bb 8000 | | 01bc 0000 0000 | | .BLANK 0000[0x1a] 01d6 0600 0001 | | .XXX[0x3] 01d8 bf80 | | 01d9 0000 0000 | | .BLANK 0000[0x27]