|
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 4905 5915 |I Y | .XXX[0x1a2] 0060 494d 0530 |IM 0| 0062 0090 0031 | 1| 0064 513d 3509 |Q=5 | 0066 4d51 3d39 |MQ=9| 0068 157d 253c | }%<| 006a 0068 0021 | h !| 006c 093d 3d51 | ==Q| 006e 2539 193c |%9 <| 0070 0078 0079 | x y| 0072 4d51 0549 |MQ I| 0074 517d 1115 |Q} | 0076 0511 7d35 | }5| 0078 050d 2125 | !%| 007a 3915 7d25 |9 }%| 007c 3919 3d49 |9 =I| 007e 3505 5125 |5 Q%| 0080 3d38 00e4 |=8 | 0082 0015 5115 | Q | 0084 4d50 c800 |MP | 0086 3400 1d11 |4 | 0088 194d 7d39 | M}9| 008a 155c 0060 | \ `| 008c 0011 5551 | UQ| 008e 2530 001c |%0 | 0090 0019 5919 | Y | 0092 4d31 3d1c |M1= | 0094 0080 001d | | 0096 5d0d 4d7d |] M}| 0098 3505 4000 |5 @ | 009a 1800 0d09 | | 009c 194c 010c | L | 009e 003d 4d21 | =M!| 00a0 3d5d 7d25 |=]}%| 00a2 3d41 7d2d |=A}-| 00a4 1549 3915 | I9 | 00a6 3000 a800 |0 | 00a8 2135 517d |!5Q}| 00aa 2535 051d |%5 | 00ac 1400 3c00 | < | 00ae 4505 3905 |E 9 | 00b0 3165 6915 |1ei | 00b2 7d51 3d35 |}Q=5| 00b4 094d 513d | MQ=| 00b6 3914 00b4 |9 | 00b8 0021 5105 | !Q | 00ba 0955 3105 | U1 | 00bc 5114 008c |Q | 00be 0025 513d | %Q=| 00c0 3509 4d51 |5 MQ| 00c2 3d39 1400 |=9 | 00c4 dc00 1151 | Q| 00c6 154d 5000 | MP | 00c8 4c00 2535 |L %5| 00ca 250d 493d |% I=| 00cc 0d3d 1114 | = | 00ce 00e0 0015 | | 00d0 5115 4d50 |Q MP| 00d2 c400 a000 | | 00d4 3149 5539 |1IU9| 00d6 7d11 3511 |} 5 | 00d8 7d25 3919 |}%9 | 00da 3c00 1000 |< | 00dc 2519 4d1d |% M | 00de 313d 0905 |1= | 00e0 314c 00c4 |1L | 00e2 004d 1125 | M %| 00e4 4d41 3105 |MA1 | 00e6 657d 0965 |e} e| 00e8 5115 7d4d |Q }M| 00ea 5149 2539 |QI%9| 00ec 1c00 2c00 | , | 00ee 5111 254d |Q %M| 00f0 4131 0565 |A1 e| 00f2 7d59 3d31 |}Y=1| 00f4 5535 157d |U5 }| 00f6 3105 0915 |1 | 00f8 3000 0800 |0 | 00fa 2109 054d |! M| 00fc 1551 6541 | QeA| 00fe 1400 cc00 | | 0100 1519 4d3d | M=| 0102 414c 0040 |AL @| 0104 0049 313d | I1=| 0106 1d7d 4149 | }AI| 0108 1559 253d | Y%=| 010a 554d 7d0d |UM} | 010c 4905 4d20 |I M | 010e 0044 0025 | D %| 0110 0d3d 3911 | =9 | 0112 2551 253d |%Q%=| 0114 3800 0c00 |8 | 0116 2119 4d31 |! M1| 0118 0509 1531 | 1| 011a 4c00 fc00 |L | 011c 5511 194d |U M| 011e 7d11 254d |} %M| 0120 2d7d 253d |-}%=| 0122 7d25 3951 |}%9Q| 0124 1549 1905 | I | 0126 0d14 00ec | | 0128 0025 1119 | % | 012a 4d7d 4d51 |M}MQ| 012c 0551 4c00 | QL | 012e 9c00 3551 | 5Q| 0130 4905 0d15 |I | 0132 7d15 6105 |} a | 0134 3525 3914 |5%9 | 0136 00c8 0009 | | 0138 194c 007c | L || 013a 0015 5149 | QI| 013c 050d 1400 | | 013e 3000 2d11 |0 - | 0140 254d 4131 |%MA1| 0142 0565 7d11 | e} | 0144 194c 0098 | L | 0146 003d 513d | =Q=| 0148 3509 7d55 |5 }U| 014a 0d3d 1115 | = | 014c 7d25 3919 |}%9 | 014e 3c00 5800 |< X | 0150 155d 3d49 | ]=I| 0152 114c 0020 | L | 0154 0019 0935 | 5| 0156 0551 0d20 | Q | 0158 00b0 0025 | %| 015a 3551 7d49 |5Q}I| 015c 1535 3d51 | 5=Q| 015e 1400 c000 | | 0160 3d51 0541 |=Q A| 0162 157d 3d41 | }=A| 0164 1549 0551 | I Q| 0166 253d 394c |%=9L| 0168 0070 003d | p =| 016a 1155 3541 | U5A| 016c 7d55 0d3d |}U =| 016e 1115 7d25 | }%| 0170 3919 3c00 |9 < | 0172 5400 113d |T =| 0174 4115 3800 |A 8 | 0176 1400 0d11 | | 0178 194c 00ac | L | 017a 0021 3551 | !5Q| 017c 7d19 2531 |} %1| 017e 154c 0110 | L | 0180 0021 1d15 | ! | 0182 517d 2539 |Q}%9| 0184 193c 006c | < l| 0186 0029 0d49 | ) I| 0188 054d 217d | M!}| 018a 5105 4114 |Q A | 018c 0074 0031 | t 1| 018e 4d21 3d5d |M!=]| 0190 7d0d 3d39 |} =9| 0192 4d3d 3114 |M=1 | 0194 00d0 0015 | | 0196 5151 6525 |QQe%| 0198 3c00 b800 |< | 019a 2549 1535 |%I 5| 019c 3d51 157d |=Q }| 019e 253c 00f8 |%< | 01a0 0025 1115 | % | 01a2 0955 1d7d | U }| 01a4 3d55 5001 |=UP | 01a6 0400 510d | Q | 01a8 2115 0d2d |! -| 01aa 7d2d 1549 |}- I| 01ac 3915 317d |9 1}| 01ae 5915 494d |Y IM| 01b0 253d 3800 |%=8 | 01b2 8400 6951 | iQ| 01b4 3d35 094d |=5 M| 01b6 513d 3915 |Q=9 | 01b8 7d4d 0559 |}M Y| 01ba 1511 7d4d | }M| 01bc 5105 5115 |Q Q | 01be 7d49 1558 |}I X| 01c0 c400 6400 | d | 01c2 2d4d 0559 |-M Y| 01c4 1511 7d4d | }M| 01c6 5105 5114 |Q Q | 01c8 0050 0055 | P U| 01ca 3525 0d49 |5% I| 01cc 3d0d 3d11 |= = | 01ce 157d 2539 | }%9| 01d0 193d 4935 | =I5| 01d2 0551 253d | Q%=| 01d4 3800 a400 |8 | 01d6 2135 517d |!5Q}| 01d8 5105 4115 |Q A | 01da 4c00 3800 |L 8 | 01dc 4505 3905 |E 9 | 01de 3165 6915 |1ei | 01e0 7d0d 4905 |} I | 01e2 4d21 1155 |M! U| 01e4 3540 0000 |5@ | 01e6 0001 a941 | A| 01e8 4925 3505 |I%5 | 01ea 4964 80f4 |Id | 01ec f881 1905 | | 01ee 314d 14b0 |1M | 01f0 814d 5509 | MU | 01f2 4d65 4d51 |MeMQ| 01f4 1534 80f4 | 4 | 01f6 f880 80c8 | | 01f8 c0e0 e0cc | | 01fa d0d8 c8d4 | | 01fc c8d4 d0c4 | | 01fe e4d4 dcb0 | |