|
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_0a7cf5
└─⟦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 0059 | Y | .CONST 0x0059 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0021 | ! | .CONST 0x0021 ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000e 0129 | ) | Execute Any,Make_Visible 000f e001 | | Load 0x0,0x1 0010 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0011 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0012 0129 | ) | Execute Any,Make_Visible 0013 00e9 | | Load_Encached String_Cache 0014 0129 | ) | Execute Any,Make_Visible 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 e002 | | Load 0x0,0x2 0028 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0029 0129 | ) | Execute Any,Make_Visible 002a c216 | | Store 0x1,0x16 002b e001 | | Load 0x0,0x1 002c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002d 192a | * | Execute Package,Field_Reference,Field_Number 0x2a 002e 0129 | ) | Execute Any,Make_Visible 002f c217 | | Store 0x1,0x17 0030 e001 | | Load 0x0,0x1 0031 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0032 1924 | $ | Execute Package,Field_Reference,Field_Number 0x24 0033 0129 | ) | Execute Any,Make_Visible 0034 c220 | | Store 0x1,0x20 0035 e001 | | Load 0x0,0x1 0036 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0037 1925 | % | Execute Package,Field_Reference,Field_Number 0x25 0038 0129 | ) | Execute Any,Make_Visible 0039 c221 | ! | Store 0x1,0x21 003a e001 | | Load 0x0,0x1 003b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 003c 1929 | ) | Execute Package,Field_Reference,Field_Number 0x29 003d 0129 | ) | Execute Any,Make_Visible 003e c218 | | Store 0x1,0x18 003f e001 | | Load 0x0,0x1 0040 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0041 1912 | | Execute Package,Field_Reference,Field_Number 0x12 0042 0129 | ) | Execute Any,Make_Visible 0043 c212 | | Store 0x1,0x12 0044 e001 | | Load 0x0,0x1 0045 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0046 192a | * | Execute Package,Field_Reference,Field_Number 0x2a 0047 0129 | ) | Execute Any,Make_Visible 0048 c213 | | Store 0x1,0x13 0049 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated 004b c21c | | Store 0x1,0x1c 004c 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 004e c21e | | Store 0x1,0x1e 004f 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated 0051 c21f | | Store 0x1,0x1f 0052 00bf | | Action Accept_Activation 0053 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0054 00c7 | | Action Elaborate_Subprogram 0055 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0056 00c7 | | Action Elaborate_Subprogram 0057 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0058 00c7 | | Action Elaborate_Subprogram 0059 BODY_0008: 0059 00bc | | Action Signal_Activated 005a 00bb | | Action Signal_Completion 005b 0000 0000 | | .BLANK 0000[0x5] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0063 | c | .CONST 0x0063 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0001 | | .CONST 0x0001 ; Number of locals 0063 BODY_0060: 0063 INIT_0060: 0063 00da | | Load_Top At_Offset_2 0064 e001 | | Load 0x0,0x1 0065 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0066 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0067 e003 | | Load 0x0,0x3 0068 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0069 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 006a 0000 0000 | | .BLANK 0000[0x6] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0073 | s | .CONST 0x0073 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0001 | | .CONST 0x0001 ; Number of locals 0073 BODY_0070: 0073 INIT_0070: 0073 00da | | Load_Top At_Offset_2 0074 e001 | | Load 0x0,0x1 0075 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0076 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0077 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 007b | { | .CONST 0x007b ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0001 | | .CONST 0x0001 ; Number of locals 007b BODY_0078: 007b INIT_0078: 007b 4800 |H | Short_Literal 0x0 007c 00ea | | Load_Encached Null_String_Cache 007d 6006 |` | Indirect_Literal Discrete,0x84,{0x00000000, 0x7fffffff} 007e e5ff | | Load 0x2,-0x1 007f 8212 | | Call 0x1,0x12 0080 e001 | | Load 0x0,0x1 0081 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0082 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0083 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0084 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0088 ; -------------------------------------------------------------------------------------- 0088 ; Debug Table 0088 ; -------------------------------------------------------------------------------------- 0088 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0e56,0x0000,0x0001,0x0000 008e 21aa 08db |! | .XXX[0x172] 0090 2011 03b6 | | 0092 a442 9418 | B | 0094 6270 a209 |bp | 0096 3d84 e044 |= D| 0098 0ae7 904b | K| 009a ea40 4ff0 | @O | 009c 0179 0028 | y (| 009e c48d 440b | D | 00a0 6346 4a09 |cFJ | 00a2 3544 728f |5Dr | 00a4 04c5 f732 | 2| 00a6 f08e 4f92 | O | 00a8 5358 0172 |SX r| 00aa 9799 7281 | r | 00ac 2a23 5973 |*#Ys| 00ae 83a4 ac07 | | 00b0 92a8 b308 | | 00b2 ff73 53aa | sS | 00b4 a851 c365 | Q e| 00b6 7803 a348 |x H| 00b8 dd62 e7e7 | b | 00ba 97e1 1063 | c| 00bc 9535 e70f | 5 | 00be d403 1126 | &| 00c0 d692 8001 | | 00c2 1d3d fc56 | = V| 00c4 d7e9 7eb4 | ~ | 00c6 8a99 c896 | | 00c8 85a0 8484 | | 00ca ad06 5f23 | _#| 00cc eae4 31cf | 1 | 00ce 4419 f403 |D | 00d0 14a0 96af | | 00d2 93c5 d2e5 | | 00d4 1fe0 04e3 | | 00d6 2092 e9d4 | | 00d8 8039 7e62 | 9~b| 00da e643 e022 | C "| 00dc 810c 703c | p<| 00de c002 d304 | | 00e0 7100 0c94 |q | 00e2 1bc0 20c1 | | 00e4 72a0 7bc4 |r { | 00e6 3d56 05e0 |=V | 00e8 a60e 039a | | 00ea 7002 8115 |p | 00ec 2023 7033 | #p3| 00ee e14b b00f | K | 00f0 3de4 61f3 |= a | 00f2 bc4e ba90 | N | 00f4 1190 01f3 | | 00f6 69fa 7fff |i | 00f8 837f 5c48 | \H| 00fa a0f8 a90d | | 00fc 8456 7602 | Vv | 00fe 6dba 7e57 |m ~W| 0100 04cc 5482 | T | 0102 1d5b 4812 | [H | 0104 b788 380b | 8 | 0106 0084 021e | | 0108 99a7 60fb | ` | 010a f80c b807 | | 010c a439 15af | 9 | 010e 1abf cfd0 | | 0110 3380 8885 |3 | 0112 d4c6 d60a | | 0114 0696 ba49 | I| 0116 41fd 41cd |A A | 0118 3ad2 5276 |: Rv| 011a 5483 dc0e |T | 011c dd2c 0786 | , | 011e 9884 3e00 | > | 0120 0642 cee2 | B | 0122 12b0 079e | | 0124 57f8 4707 |W G | 0126 49b0 e125 |I %| 0128 381b c01f |8 | 012a 84fe 7b7e | {~| 012c 1a01 f900 | | 012e 1400 84c5 | | 0130 36b4 98ba |6 | 0132 002d 7405 | -t | 0134 85da c46a | j| 0136 204d a964 | M d| 0138 f41c dac1 | | 013a cc5c 3a03 | \: | 013c 96e4 a780 | | 013e e4fc 45fb | E | 0140 3954 064e |9T N| 0142 0f42 e799 | B | 0144 30c1 647e |0 d~| 0146 4067 329b |@g2 | 0148 884e 7acc | Nz | 014a 5e04 0145 |^ E| 014c cd98 178c | | 014e e379 4306 | yC | 0150 22af 144a |" J| 0152 039d f32b | +| 0154 015c a070 | \ p| 0156 08b6 9a0a | | 0158 e07c 588e | |X | 015a 3064 fca0 |0d | 015c 80b1 a2a0 | | 015e b278 0c74 | x t| 0160 259c 85ea |% | 0162 c22a 807f | * | 0164 000a 28af | ( | 0166 ae90 e721 | !| 0168 9d5c 514c | \QL| 016a a522 1ae0 | " | 016c 01a9 d1ba | | 016e 1823 0326 | # &| 0170 879b 71fd | q | 0172 824b 5270 | KRp| 0174 0440 8b19 | @ | 0176 6784 6393 |g c | 0178 32a6 5ba4 |2 [ | 017a 37e1 66d8 |7 f | 017c 0dba 1b32 | 2| 017e 7ec5 15e2 |~ | 0180 0099 e0a4 | | 0182 1569 180c | i | 0184 2402 600c |$ ` | 0186 9ed8 a940 | @| 0188 3421 18d0 |4! | 018a 3e20 17d0 |> | 018c 0e26 2df5 | &- | 018e 0246 80fd | F | 0190 4079 7170 |@yqp| 0192 78b5 d604 |x | 0194 802c 7684 | ,v | 0196 1501 ed08 | | 0198 f52c 14c0 | , | 019a 16e9 15ad | | 019c 1329 9429 | ) )| 019e 8750 20f4 | P | 01a0 fc08 5001 | P | 01a2 4a15 dc04 |J | 01a4 6c18 d841 |l A| 01a6 1503 fc24 | $| 01a8 3fb0 3dca |? = | 01aa 20de 0259 | Y| 01ac 1400 c9fc | | 01ae 1b3a f408 | : | 01b0 e12e 3007 | .0 | 01b2 ea4a d483 | J | 01b4 f971 37e4 | q7 | 01b6 fd2d 1c7b | - {| 01b8 4082 0a56 |@ V| 01ba 1c0a 6a3d | j=| 01bc a80f 6120 | a | 01be 4516 be62 |E b| 01c0 c406 419a | A | 01c2 97de bcc0 | | 01c4 5c94 1d40 |\ @| 01c6 b620 034b | K| 01c8 0906 9b78 | x| 01ca 017a a220 | z | 01cc a03b 2171 | ;!q| 01ce a6d9 680a | h | 01d0 6826 614c |h&aL| 01d2 79c1 8a64 |y d| 01d4 58a0 0288 |X | 01d6 63fd 9d66 |c f| 01d8 2f2c c3f8 |/, | 01da f093 e0ff | | 01dc 7df8 1416 |} | 01de d802 e204 | | 01e0 096b 8004 | k | 01e2 3ec0 05b3 |> | 01e4 1c98 0e8c | | 01e6 47f8 bb7e |G ~| 01e8 e74b 6e01 | Kn | 01ea c6e9 a90a | | 01ec d218 c5a2 | | 01ee 4e9c 0b68 |N h| 01f0 39b0 d584 |9 | 01f2 07d1 447b | D{| 01f4 41b6 0c1e |A | 01f6 d220 05b7 | | 01f8 e033 62d9 | 3b | 01fa 802e c0cd | . | 01fc 23a1 5294 |# R | 01fe 1968 0743 | h C|