|
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_0d2ce3
└─⟦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 0058 | X | .CONST 0x0058 ; 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 0029 | ) | .CONST 0x0029 ; Address of begin 0019 0047 | G | .CONST 0x0047 ; Address of exception handler 001a 0007 | | .CONST 0x0007 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 02c7 | | Declare_Variable Any 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 4801 |H | Short_Literal 0x1 0021 4801 |H | Short_Literal 0x1 0022 00e9 | | Load_Encached String_Cache 0023 035b | [ | Declare_Type Array,Constrained 0024 0337 | 7 | Declare_Variable Array 0025 00e3 | | Load_Encached Natural_Cache 0026 00e1 | | Load_Encached Boolean_Cache 0027 03e9 | | Declare_Variable Discrete,Duplicate 0028 03e9 | | Declare_Variable Discrete,Duplicate 0029 BODY_0018: 0029 e402 | | Load 0x2,0x2 002a 00ea | | Load_Encached Null_String_Cache 002b e5ff | | Load 0x2,-0x1 002c 4800 |H | Short_Literal 0x0 002d e001 | | Load 0x0,0x1 002e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 002f c402 | | Store 0x2,0x2 0030 00e1 | | Load_Encached Boolean_Cache 0031 00e1 | | Load_Encached Boolean_Cache 0032 00e1 | | Load_Encached Boolean_Cache 0033 00e3 | | Load_Encached Natural_Cache 0034 e403 | | Load 0x2,0x3 0035 e402 | | Load 0x2,0x2 0036 e001 | | Load 0x0,0x1 0037 1868 | h | Execute Package,Field_Execute,Field_Number 0x68 0038 00d1 | | Pop_Control Pop_Count_1 0039 c404 | | Store 0x2,0x4 003a c405 | | Store 0x2,0x5 003b 005b | [ | Store_Top Discrete,At_Offset_3 003c 0059 | Y | Store_Top Discrete,At_Offset_1 003d e402 | | Load 0x2,0x2 003e e001 | | Load 0x0,0x1 003f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0040 c402 | | Store 0x2,0x2 0041 00db | | Load_Top At_Offset_3 0042 7002 |p | Jump_Nonzero 0x45 0043 00d8 | | Load_Top At_Offset_0 0044 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0045 4800 |H | Short_Literal 0x0 0046 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0047 TRAP_0018: 0047 0007 | | Action Break_Optional 0048 e402 | | Load 0x2,0x2 0049 e001 | | Load 0x0,0x1 004a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 004b 6804 |h | Jump_Zero 0x50 004c e402 | | Load 0x2,0x2 004d e001 | | Load 0x0,0x1 004e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 004f c402 | | Store 0x2,0x2 0050 4801 |H | Short_Literal 0x1 0051 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0052 0000 0000 | | .BLANK 0000[0x6] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0000 | | .DEBUG4 0x0004,0x0000,0x7818,0x0000,0x0001,0x0000 005e 1155 4905 | UI | .XXX[0x20] 0060 5125 3d38 |Q%=8| 0062 0040 0454 | @ T| 0064 004d 4d25 | MM%| 0066 1d39 0551 | 9 Q| 0068 5549 157d |UI }| 006a 5115 4d51 |Q MQ| 006c 0915 10b8 | | 006e ae4e a45c | N \| 0070 0011 3115 | 1 | 0072 1950 2004 | P | 0074 ffc0 0000 | | 0076 0000 0002 | | 0078 a45c 0015 | \ | 007a 4925 1d21 |I% !| 007c 5020 0500 |P | 007e 0000 0000 | | .BLANK 0000[0x5] 0083 2400 8800 |$ | .XXX[0x60] 0085 4d4d 251d |MM% | 0087 3905 5155 |9 QU| 0089 4915 7d51 |I }Q| 008b 154d 5109 | MQ | 008d 1510 b94c | L| 008f fa00 5c00 | \ | 0091 214d 5105 |!MQ | 0093 3911 0549 |9 I| 0095 1000 0000 | | 0097 0400 5400 | T | 0099 454d 251d |EM% | 009b 3905 5155 |9 QU| 009d 4915 7d51 |I }Q| 009f 154d 5109 | MQ | 00a1 1510 f9f0 | | 00a3 0000 0014 | | 00a5 00f4 004d | M| 00a7 4d25 1d39 |M% 9| 00a9 0551 5549 | QUI| 00ab 157d 5115 | }Q | 00ad 4d51 0915 |MQ | 00af 10b9 04e1 | | 00b1 985c 003d | \ =| 00b3 4d51 0539 |MQ 9| 00b5 1105 4910 | I | 00b7 b94d 5149 | MQI| 00b9 2539 1c00 |%9 | 00bb 2c00 4104 |, A | 00bd 81b1 a5d1 | | 00bf 95c9 85b0 | | 00c1 81cd d1c9 | | 00c3 a5b9 9c00 | | 00c5 0000 4001 | @ | 00c7 3400 514d |4 QM| 00c9 251d 3905 |% 9 | 00cb 5155 4915 |QUI | 00cd 7d51 154d |}Q M| 00cf 5109 1510 |Q | 00d1 b941 48ee | AH | 00d3 65b4 0000 |e | 00d5 0000 0000 | | 00d7 0001 985c | \| 00d9 0041 4d51 | AMQ| 00db 0539 1105 | 9 | 00dd 4910 b925 |I %| 00df 3951 151d |9Q | 00e1 1549 8420 | I | 00e3 0000 0000 | | .BLANK 0000[0x4] 00e7 0420 | | .XXX[0x1] 00e8 0000 0000 | | .BLANK 0000[0x4] 00ec 5000 0000 |P | .XXX[0x114] 00ee 0800 0021 | !| 00f0 8c00 3155 | 1U| 00f2 3925 517d |9%Q}| 00f4 0d21 150d | ! | 00f6 2d15 4808 |- H | 00f8 0000 0030 | 0| 00fa 000c 0000 | | 00fc 0040 0021 | @ !| 00fe 27a8 0064 |' d| 0100 0040 0000 | @ | 0102 0030 0314 | 0 | 0104 0061 5539 | aU9| 0106 2551 7d0d |%Q} | 0108 2115 0d2d |! -| 010a 1548 b90d | H | 010c 2115 0d2d |! -| 010e 7d55 3925 |}U9%| 0110 514c f5ee |QL | 0112 51fa 408c |Q @ | 0114 0025 313d | %1=| 0116 0511 7d55 | }U| 0118 3925 505c |9%P\| 011a 0075 0d1d | u | 011c 7d41 493d |}AI=| 011e 1d49 0535 | I 5| 0120 7d31 2509 |}1% | 0122 4905 4965 |I Ie| 0124 7d51 6541 |}QeA| 0126 154c b955 | L U| 0128 3925 5001 |9%P | 012a fa40 8c00 | @ | 012c 254d 4115 |%MA | 012e 0d7d 5539 | }U9| 0130 2550 5c00 |%P\ | 0132 2911 2505 |) % | 0134 3904 b951 |9 Q| 0136 4915 1401 |I | 0138 f640 9400 | @ | 013a 1949 154d | I M| 013c 5531 505c |U1P\| 013e 0031 0d21 | 1 !| 0140 150d 2cb9 | , | 0142 4d51 0551 |MQ Q| 0144 554c 01fe |UL | 0146 4090 0035 |@ 5| 0148 4149 3d09 |AI= | 014a 3115 357d |1 5}| 014c 5539 2551 |U9%Q| 014e 4c5c 00ad |L\ | 0150 1549 493d | II=| 0152 497d 4d51 |I}MQ| 0154 3d49 051d |=I | 0156 157d 5551 | }UQ| 0158 2531 2551 |%1%Q| 015a 2515 4cb9 |% L | 015c 4149 3d09 |AI= | 015e 3115 357d |1 5}| 0160 4d51 3d49 |MQ=I| 0162 051d 157d | }| 0164 4d15 5000 |M P | 0166 0000 0000 | | 0168 4002 fc00 |@ | 016a 6155 3925 |aU9%| 016c 517d 0d21 |Q} !| 016e 150d 2d15 | - | 0170 48b9 0d21 |H !| 0172 150d 2d7d | -}| 0174 5539 2551 |U9%Q| 0176 4cf5 ee51 |L Q| 0178 fa40 8c00 | @ | 017a 2531 3d05 |%1= | 017c 117d 5539 | }U9| 017e 2550 5c00 |%P\ | 0180 5d0d 1d7d |] }| 0182 4149 3d1d |AI= | 0184 4905 357d |I 5}| 0186 3125 0949 |1% I| 0188 0549 64b9 | Id | 018a 5539 2550 |U9%P| 018c 01fa 408c | @ | 018e 0025 4d41 | %MA| 0190 150d 7d55 | }U| 0192 3925 505c |9%P\| 0194 0029 1125 | ) %| 0196 0539 04b9 | 9 | 0198 5149 1514 |QI | 019a 01f6 4094 | @ | 019c 0019 4915 | I | 019e 4d55 3150 |MU1P| 01a0 5c00 310d |\ 1 | 01a2 2115 0d2c |! ,| 01a4 b94d 5105 | MQ | 01a6 5155 4c01 |QUL | 01a8 fe40 9000 | @ | 01aa 3541 493d |5AI=| 01ac 0931 1535 | 1 5| 01ae 7d55 3925 |}U9%| 01b0 514c 5c00 |QL\ | 01b2 ad15 4949 | II| 01b4 3d49 7d4d |=I}M| 01b6 513d 4905 |Q=I | 01b8 1d15 7d55 | }U| 01ba 5125 3125 |Q%1%| 01bc 5125 154c |Q% L| 01be b941 493d | AI=| 01c0 0931 1535 | 1 5| 01c2 7d4d 513d |}MQ=| 01c4 4905 1d15 |I | 01c6 7d4d 1550 |}M P| 01c8 0000 0000 | | 01ca 000c 029c | | 01cc 0061 5539 | aU9| 01ce 2551 7d0d |%Q} | 01d0 2115 0d2d |! -| 01d2 1548 b90d | H | 01d4 2115 0d2d |! -| 01d6 7d55 3925 |}U9%| 01d8 514c f5ee |QL | 01da 51fa 408c |Q @ | 01dc 0025 313d | %1=| 01de 0511 7d55 | }U| 01e0 3925 505c |9%P\| 01e2 0029 1125 | ) %| 01e4 0539 04b9 | 9 | 01e6 5149 1514 |QI | 01e8 01fa 408c | @ | 01ea 0025 4d41 | %MA| 01ec 150d 7d55 | }U| 01ee 3925 505c |9%P\| 01f0 0029 1125 | ) %| 01f2 0539 04b9 | 9 | 01f4 5149 1514 |QI | 01f6 01f6 4094 | @ | 01f8 0019 4915 | I | 01fa 4d55 3150 |MU1P| 01fc 5c00 7155 |\ qU| 01fe 3925 517d |9%Q}|