|
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 - metrics - download
Length: 1024 (0x400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5e40f2
└─⟦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 0048 | H | .CONST 0x0048 ; 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 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0023 | # | .CONST 0x0023 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0003 | | .CONST 0x0003 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 001d 02c7 | | Declare_Variable Any 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 e001 | | Load 0x0,0x1 0021 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0022 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0023 BODY_0018: 0023 e001 | | Load 0x0,0x1 0024 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0025 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0026 00da | | Load_Top At_Offset_2 0027 0120 | | Execute Any,Is_Value 0028 6803 |h | Jump_Zero 0x2c 0029 e001 | | Load 0x0,0x1 002a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 002b 7801 |x | Jump 0x2d 002c 00da | | Load_Top At_Offset_2 002d 6012 |` | Indirect_Literal Discrete,0x40,{0x00000000, 0x00004000} 002e e002 | | Load 0x0,0x2 002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0030 e003 | | Load 0x0,0x3 0031 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0032 e001 | | Load 0x0,0x1 0033 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0034 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0035 e5ff | | Load 0x2,-0x1 0036 e001 | | Load 0x0,0x1 0037 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0038 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0039 c402 | | Store 0x2,0x2 003a 0059 | Y | Store_Top Discrete,At_Offset_1 003b 00d8 | | Load_Top At_Offset_0 003c 0f00 | | Execute_Immediate Equal,0x0 003d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 003e 0000 0000 | | .XXX[0x2] 0040 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; Debug Table 0048 ; -------------------------------------------------------------------------------------- 0048 0004 000d | | .DEBUG4 0x0004,0x000d,0x9710,0x0000,0x0001,0x0000 004e 014c 0369 | L i| .XXX[0x21] 0050 c009 2005 | | 0052 1007 900f | | 0054 800c 6070 | `p| 0056 0168 036b | h k| 0058 9010 09cc | | 005a 0368 09f9 | h | 005c a009 2001 | | 005e 1004 036c | l| 0060 036c 09cf | l | 0062 1013 9008 | | 0064 03ac 616a | aj| 0066 9008 0327 | '| 0068 9008 03ac | | 006a 6161 bf6c |aa l| 006c 0339 2005 | 9 | 006e 1004 | | 006f 0000 0000 | | .BLANK 0000[0x4] 0073 1538 0010 | 8 | .XXX[0x7c] 0075 0018 03b8 | | 0077 036c 03ac | l | 0079 6340 03ac |c@ | 007b 6224 00c4 |b$ | 007d 03b3 97ff | | 007f 8050 6040 | P`@| 0081 038c 0fc4 | | 0083 0360 036d | ` m| 0085 25d4 03ac |% | 0087 0260 604c | ``L| 0089 09c0 038c | | 008b 0fb1 2007 | | 008d 8008 60b0 | ` | 008f 038c 0fb0 | | 0091 0369 c009 | i | 0093 2005 1004 | | 0095 033d e057 | = W| 0097 9008 03ac | | 0099 6166 900f |af | 009b 9008 03ac | | 009d 616a 9008 |aj | 009f 0364 036c | d l| 00a1 09cc 0168 | h| 00a3 0367 900f | g | 00a5 800c 6070 | `p| 00a7 09f9 a009 | | 00a9 2001 1004 | | 00ab 0327 9008 | ' | 00ad 03ac 6161 | aa| 00af bf9c 0339 | 9| 00b1 2005 1004 | | 00b3 15fc 0010 | | 00b5 0014 03b0 | | 00b7 036c 03ac | l | 00b9 633c 00c5 |c< | 00bb 2007 8008 | | 00bd 60b0 038c |` | 00bf 0fb0 038c | | 00c1 038c 036f | o| 00c3 800c 62a9 | b | 00c5 a009 2005 | | 00c7 1004 036c | l| 00c9 03ac 6050 | `P| 00cb 3cb5 c034 |< 4| 00cd 036f 8014 | o | 00cf 607d a024 |`} $| 00d1 036d 242c | m$,| 00d3 03ac 025b | [| 00d5 800c 62a9 | b | 00d7 c009 2005 | | 00d9 1007 97ff | | 00db 8050 6040 | P`@| 00dd 0148 0364 | H d| 00df 3005 a030 |0 0| 00e1 036f 8050 | o P| 00e3 609f 800c |` | 00e5 6070 0164 |`p d| 00e7 0364 036c | d l| 00e9 09cc 0364 | d| 00eb 09fd 1005 | | 00ed 2005 1004 | | 00ef 0000 0000 | | .BLANK 0000[0x4] 00f3 16f8 0010 | | .XXX[0x10d] 00f5 0010 03b0 | | 00f7 036c 03ac | l | 00f9 633c 00c4 |c< | 00fb 036f 8050 | o P| 00fd 6040 038c |`@ | 00ff 0fc4 038c | | 0101 0365 c009 | e | 0103 2005 1004 | | 0105 036b 800c | k | 0107 6070 0165 |`p e| 0109 2007 8008 | | 010b 60b0 0368 |` h| 010d 09cc 0364 | d| 010f 09fd 1004 | | 0111 0000 0000 | | 0113 177c 0010 | | | 0115 0014 03b0 | | 0117 036c 03ac | l | 0119 62fc 00c4 |b | 011b 038f 97ff | | 011d 8050 6040 | P`@| 011f 038c 0fc4 | | 0121 03b0 0365 | e| 0123 c009 2005 | | 0125 1007 97fe | | 0127 0841 a014 | A | 0129 036f 800c | o | 012b 6070 016d |`p m| 012d e0e8 036f | o| 012f 8010 6045 | `E| 0131 a0c8 036f | o| 0133 800c 6119 | a | 0135 25d4 03ac |% | 0137 0260 60b8 | `` | 0139 03ac 6194 | a | 013b 00c4 036d | m| 013d 242c 03ac |$, | 013f 025a 9008 | Z | 0141 036c 03ac | l | 0143 6050 3c89 |`P< | 0145 a02c 0363 | , c| 0147 800c 6073 | `s| 0149 900b 8010 | | 014b 6090 09cc |` | 014d 0920 2bfc | + | 014f 016d e05c | m \| 0151 0363 800c | c | 0153 6073 9008 |`s | 0155 03ac 63e0 | c | 0157 03ac 6351 | cQ| 0159 25d8 03ac |% | 015b 0260 604f | ``O| 015d 8010 6090 | ` | 015f 09cc 0920 | | 0161 2bfc 016d |+ m| 0163 e010 036f | o| 0165 800c 6070 | `p| 0167 016d 2007 | m | 0169 8008 60b0 | ` | 016b 0368 09cc | h | 016d 036c 09fd | l | 016f 1004 0000 | | 0171 0000 0000 | | 0173 18d4 0010 | | 0175 0008 0384 | | 0177 1804 036c | l| 0179 03ac 6050 | `P| 017b 2ce5 c098 |, | 017d 2ce1 c090 |, | 017f 2c09 c088 |, | 0181 2ce9 c090 |, | 0183 2ced c094 |, | 0185 2cf1 c08c |, | 0187 2cf9 c094 |, | 0189 2cfd c08c |, | 018b 2d05 c084 |- | 018d 2cf5 c08c |, | 018f 2d01 c094 |- | 0191 2cdd c098 |, | 0193 2d15 c0a0 |- | 0195 2d11 c0a4 |- | 0197 2d0d c09c |- | 0199 2d09 c094 |- | 019b 2ead c09b |. | 019d 97fc 0248 | H| 019f 286f 8038 |(o 8| 01a1 6065 e08b |`e | 01a3 97fe 0884 | | 01a5 0149 e079 | I y| 01a7 2004 0149 | I| 01a9 e06f 97fe | o | 01ab 088c 0149 | I| 01ad e05f 97fe | _ | 01af 0890 0149 | I| 01b1 e04f 97fe | O | 01b3 0894 0149 | I| 01b5 e03d 2004 | = | 01b7 0149 e033 | I 3| 01b9 97fe 0888 | | 01bb 0149 e021 | I !| 01bd 2004 0149 | I| 01bf e015 2004 | | 01c1 0149 e009 | I | 01c3 2004 0148 | H| 01c5 0344 0361 | D a| 01c7 c020 036f | o| 01c9 8010 60a1 | ` | 01cb a010 0248 | H| 01cd 2873 8038 |(s 8| 01cf 6078 0361 |`x a| 01d1 1004 0000 | | 01d3 1a78 0010 | x | 01d5 000c 036b | k| 01d7 800c 6168 | ah| 01d9 2bfc 038c |+ | 01db 0fb1 2007 | | 01dd 8008 60b0 | ` | 01df 038c 0fb0 | | 01e1 033c 0368 | < h| 01e3 0368 09c8 | h | 01e5 0921 2004 | ! | 01e7 098d c019 | | 01e9 3ffd 2043 |? C| 01eb 8004 6118 | a | 01ed 0320 ffe9 | | 01ef 1408 0000 | | 01f1 0000 0000 | | 01f3 1acc 0010 | | 01f5 0005 2001 | | 01f7 2005 204b | K| 01f9 97fd 2007 | | 01fb 8008 60af | ` | 01fd 8004 60a1 | ` | 01ff 1408 | |