|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c8f4
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0080 | | .CONST 0x0080 ; 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 001c | | .CONST 0x001c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0007 | | .CONST 0x0007 ; Number of locals 000b INIT_0008: 000b 00e3 | | Load_Encached Natural_Cache 000c 00e3 | | Load_Encached Natural_Cache 000d 00e3 | | Load_Encached Natural_Cache 000e e00e | | Load 0x0,0xe 000f 0322 | " | Declare_Variable Record 0010 00d8 | | Load_Top At_Offset_0 0011 1c00 | | Execute_Immediate Run_Utility,0x0 0012 e5ff | | Load 0x2,-0x1 0013 800f | | Call 0x0,0xf 0014 8010 | | Call 0x0,0x10 0015 480b |H | Short_Literal 0xb 0016 e001 | | Load 0x0,0x1 0017 01d7 | | Execute Vector,Field_Read 0018 0a01 | | Execute_Immediate Plus,0x1 0019 e001 | | Load 0x0,0x1 001a 01d7 | | Execute Vector,Field_Read 001b 02ab | | Declare_Subprogram For_Call,With_Address 001c BODY_0008: 001c e5ff | | Load 0x2,-0x1 001d 8215 | | Call 0x1,0x15 001e e5ff | | Load 0x2,-0x1 001f 8011 | | Call 0x0,0x11 0020 a403 | | Store_Unchecked 0x2,0x3 0021 e5ff | | Load 0x2,-0x1 0022 8007 | | Call 0x0,0x7 0023 a402 | | Store_Unchecked 0x2,0x2 0024 e403 | | Load 0x2,0x3 0025 e012 | | Load 0x0,0x12 0026 027f | | Execute Discrete,Equal 0027 6809 |h | Jump_Zero 0x31 0028 00d9 | | Load_Top At_Offset_1 0029 8013 | | Call 0x0,0x13 002a 6806 |h | Jump_Zero 0x31 002b 00d9 | | Load_Top At_Offset_1 002c 8014 | | Call 0x0,0x14 002d a403 | | Store_Unchecked 0x2,0x3 002e e403 | | Load 0x2,0x3 002f 00da | | Load_Top At_Offset_2 0030 8015 | | Call 0x0,0x15 0031 e5ff | | Load 0x2,-0x1 0032 00db | | Load_Top At_Offset_3 0033 017d | } | Execute Record,Structure_Write 0034 00da | | Load_Top At_Offset_2 0035 e403 | | Load 0x2,0x3 0036 8016 | | Call 0x0,0x16 0037 00d1 | | Pop_Control Pop_Count_1 0038 e403 | | Load 0x2,0x3 0039 e012 | | Load 0x0,0x12 003a 027f | | Execute Discrete,Equal 003b 6808 |h | Jump_Zero 0x44 003c 00da | | Load_Top At_Offset_2 003d 4803 |H | Short_Literal 0x3 003e 8017 | | Call 0x0,0x17 003f 00d1 | | Pop_Control Pop_Count_1 0040 e402 | | Load 0x2,0x2 0041 00db | | Load_Top At_Offset_3 0042 8214 | | Call 0x1,0x14 0043 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0044 00da | | Load_Top At_Offset_2 0045 8005 | | Call 0x0,0x5 0046 6803 |h | Jump_Zero 0x4a 0047 00da | | Load_Top At_Offset_2 0048 8407 | | Call 0x2,0x7 0049 4502 |E | Exit_Suprogram New_Top_Offset 0x2 004a e402 | | Load 0x2,0x2 004b 8018 | | Call 0x0,0x18 004c 680f |h | Jump_Zero 0x5c 004d e402 | | Load 0x2,0x2 004e 8019 | | Call 0x0,0x19 004f a404 | | Store_Unchecked 0x2,0x4 0050 e402 | | Load 0x2,0x2 0051 e404 | | Load 0x2,0x4 0052 e402 | | Load 0x2,0x2 0053 e403 | | Load 0x2,0x3 0054 e405 | | Load 0x2,0x5 0055 801a | | Call 0x0,0x1a 0056 00db | | Load_Top At_Offset_3 0057 017d | } | Execute Record,Structure_Write 0058 00db | | Load_Top At_Offset_3 0059 00db | | Load_Top At_Offset_3 005a 8214 | | Call 0x1,0x14 005b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 005c e403 | | Load 0x2,0x3 005d 8018 | | Call 0x0,0x18 005e 6819 |h | Jump_Zero 0x78 005f e403 | | Load 0x2,0x3 0060 8019 | | Call 0x0,0x19 0061 a404 | | Store_Unchecked 0x2,0x4 0062 00cf | | Action Mark_Auxiliary 0063 7804 |x | Jump 0x68 0064 e404 | | Load 0x2,0x4 0065 8019 | | Call 0x0,0x19 0066 a404 | | Store_Unchecked 0x2,0x4 0067 00c9 | | Action Pop_Auxiliary_Loop 0068 e404 | | Load 0x2,0x4 0069 8018 | | Call 0x0,0x18 006a 77f9 |w | Jump_Nonzero 0x64 006b 00ce | | Action Pop_Auxiliary 006c e403 | | Load 0x2,0x3 006d e404 | | Load 0x2,0x4 006e e402 | | Load 0x2,0x2 006f e403 | | Load 0x2,0x3 0070 e405 | | Load 0x2,0x5 0071 801a | | Call 0x0,0x1a 0072 00db | | Load_Top At_Offset_3 0073 017d | } | Execute Record,Structure_Write 0074 00db | | Load_Top At_Offset_3 0075 00db | | Load_Top At_Offset_3 0076 8214 | | Call 0x1,0x14 0077 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0078 e403 | | Load 0x2,0x3 0079 00db | | Load_Top At_Offset_3 007a 8214 | | Call 0x1,0x14 007b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 007c 0000 0000 | | .BLANK 0000[0x4] 0080 ; -------------------------------------------------------------------------------------- 0080 ; Debug Table 0080 ; -------------------------------------------------------------------------------------- 0080 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd1c8,0x0000,0x0001,0x0000 0086 0000 800a | | .XXX[0x18] 0088 0008 9000 | | 008a 0000 40c2 | @ | 008c 0000 1000 | | 008e 0000 2801 | ( | 0090 4000 0000 |@ | 0092 4000 0010 |@ | 0094 0000 0088 | | 0096 0000 0000 | | 0098 4000 0002 |@ | 009a 9000 0082 | | 009c 28cc 4000 |( @ | 009e 0000 0000 | | .BLANK 0000[0x8] 00a6 1000 0082 | | .XXX[0x4] 00a8 3221 4000 |2!@ | 00aa 0000 0000 | | .BLANK 0000[0x10] 00ba 000e d800 | | .XXX[0x1d] 00bc 18f0 0021 | !| 00be 9ba9 0000 | | 00c0 1001 4001 | @ | 00c2 1200 0000 | | 00c4 07ed c000 | | 00c6 0200 0000 | | 00c8 0500 2800 | ( | 00ca 0000 0800 | | 00cc 0002 0000 | | 00ce 0011 0000 | | 00d0 0000 0800 | | 00d2 0000 5200 | R | 00d4 0010 43dc | C | 00d6 2000 | | 00d7 0000 0000 | | .BLANK 0000[0x8] 00df 0200 0010 | | .XXX[0x4] 00e1 4517 6800 |E h | 00e3 0000 0000 | | .BLANK 0000[0x10] 00f3 0001 db00 | | .XXX[0x1d] 00f5 032e 0004 | . | 00f7 3375 2000 |3u | 00f9 0200 2800 | ( | 00fb 2240 0000 |"@ | 00fd 0101 e800 | | 00ff 0040 0000 | @ | 0101 0060 0500 | ` | 0103 0000 0100 | | 0105 0000 4000 | @ | 0107 0002 2000 | | 0109 0000 0100 | | 010b 0000 0a40 | @| 010d 0002 0895 | | 010f 6400 |d | 0110 0000 0000 | | .BLANK 0000[0x2a] 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]