|
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_0bf8df
└─⟦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 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 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b 4801 |H | Short_Literal 0x1 001c e002 | | Load 0x0,0x2 001d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 001e e002 | | Load 0x0,0x2 001f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0020 700e |p | Jump_Nonzero 0x2f 0021 e003 | | Load 0x0,0x3 0022 180e | | Execute Package,Field_Execute,Field_Number 0xe 0023 4805 |H | Short_Literal 0x5 0024 e5ff | | Load 0x2,-0x1 0025 0092 0031 | 1| Action Push_String_Extended,0x31 ; " will not continue because PRIVILEGED" 0027 01cc | | Execute Vector,Catenate 0028 0092 0032 | 2| Action Push_String_Extended,0x32 ; " MODE cannot be established." 002a 01cc | | Execute Vector,Catenate 002b e004 | | Load 0x0,0x4 002c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 002d 4800 |H | Short_Literal 0x0 002e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 002f 4801 |H | Short_Literal 0x1 0030 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0031 ; -------------------------------------------------------------------------------------- 0031 ; STRING TABLE 0031 ; -------------------------------------------------------------------------------------- 0031 0006 | | .STRTAB 0x0006->0x0034 ; " will not continue because PRIVILEGED" 0032 0029 | ) | .STRTAB 0x0029->0x0046 ; " MODE cannot be established." 0033 0043 | C | .STREND 0x0043->0x0054 0034 2077 696c | wil| .STRTAB_STRINGS 0055 0000 0000 | | .XXX[0x3] 0057 0000 | | 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b97,0x0000,0x0001,0x0000 005e 5165 4114 |QeA | .XXX[0x1a2] 0060 0000 0000 | | 0062 0058 01e0 | X | 0064 00a5 4d55 | MU| 0066 397d 4941 |9}IA| 0068 0d7d 0d31 | } 1| 006a 2515 3950 |% 9P| 006c b961 1149 | a I| 006e 7d3d 414c |}=AL| 0070 b941 5551 | AUQ| 0072 7d0d 3d55 |} =U| 0074 3951 1511 |9Q | 0076 7d4d 5149 |}MQI| 0078 2539 1cf5 |%9 | 007a ee51 fa40 | Q @| 007c 8c00 1125 | %| 007e 3951 3c5c |9Q<\| 0080 0081 4d55 | MU| 0082 397d 4941 |9}IA| 0084 0d7d 0d31 | } 1| 0086 2515 3950 |% 9P| 0088 b961 1149 | a I| 008a 7d3d 414c |}=AL| 008c b94d 5149 | MQI| 008e 1505 357d | 5}| 0090 2510 01fa |% | 0092 408c 0011 |@ | 0094 1105 5104 | Q | 0096 5c00 3d4d |\ =M| 0098 5105 3911 |Q 9 | 009a 0549 10b9 | I | 009c 4d51 4925 |MQI%| 009e 391c 0000 |9 | 00a0 0000 0014 | | 00a2 01a4 0059 | Y| 00a4 4d55 397d |MU9}| 00a6 4941 0d7d |IA }| 00a8 0d31 2515 | 1% | 00aa 3950 b961 |9P a| 00ac 1149 7d3d | I}=| 00ae 414c f8d8 |AL | 00b0 5c00 3961 |\ 9a| 00b2 1148 b93d | H =| 00b4 4115 4905 |A I | 00b6 5125 3d39 |Q%=9| 00b8 4e38 5c00 |N8\ | 00ba 614d 5539 |aMU9| 00bc 7d49 410d |}IA | 00be 7d0d 3125 |} 1%| 00c0 1539 50b9 | 9P | 00c2 4d51 4915 |MQI | 00c4 0535 7d25 | 5}%| 00c6 105c 0039 | \ 9| 00c8 4941 0d7d |IA }| 00ca 4d51 4915 |MQI | 00cc 0534 b941 | 4 A| 00ce 5550 5c00 |UP\ | 00d0 3949 410d |9IA | 00d2 7d4d 5149 |}MQI| 00d4 1505 34b9 | 4 | 00d6 1d15 5000 | P | 00d8 0001 1402 | | 00da c000 b94d | M| 00dc 5539 7d49 |U9}I| 00de 410d 7d0d |A } | 00e0 3125 1539 |1% 9| 00e2 50b9 6111 |P a | 00e4 497d 3d41 |I}=A| 00e6 4cb9 1d15 |L | 00e8 517d 0d3d |Q} =| 00ea 5539 5115 |U9Q | 00ec 117d 0965 | } e| 00ee 5115 7d4d |Q }M| 00f0 5149 2539 |QI%9| 00f2 1cf5 ea51 | Q| 00f4 fa40 8c00 | @ | 00f6 1119 493d | I=| 00f8 345c 0081 |4\ | 00fa 4d55 397d |MU9}| 00fc 4941 0d7d |IA }| 00fe 0d31 2515 | 1% | 0100 3950 b961 |9P a| 0102 1149 7d3d | I}=| 0104 414c b94d |AL M| 0106 5149 1505 |QI | 0108 357d 2510 |5}% | 010a 01fa 408c | @ | 010c 0035 5d05 | 5] | 010e 2551 7d19 |%Q} | 0110 3d49 7d15 |=I} | 0112 5915 485c |Y H\| 0114 0041 4d51 | AMQ| 0116 0539 1105 | 9 | 0118 4910 b909 |I | 011a 3d3d 3115 |==1 | 011c 0538 5800 | 8X | 011e 554d 5105 |UMQ | 0120 3911 0549 |9 I| 0122 10b9 093d | =| 0124 3d31 1505 |=1 | 0126 38b9 5149 |8 QI| 0128 5514 5c00 |U \ | 012a 3d61 1148 |=a H| 012c b909 6551 | eQ| 012e 157d 4d51 | }MQ| 0130 4925 391c |I%9 | 0132 0000 0001 | | 0134 4002 9000 |@ | 0136 494d 5539 |IMU9| 0138 7d49 410d |}IA | 013a 7d0d 3125 |} 1%| 013c 1539 50b9 | 9P | 013e 1d15 50f5 | P | 0140 ee51 fa40 | Q @| 0142 8c00 1119 | | 0144 493d 345c |I=4\| 0146 0061 4d55 | aMU| 0148 397d 4941 |9}IA| 014a 0d7d 0d31 | } 1| 014c 2515 3950 |% 9P| 014e b94d 5149 | MQI| 0150 1505 357d | 5}| 0152 2510 01fa |% | 0154 408c 0035 |@ 5| 0156 5d05 2551 |] %Q| 0158 7d19 3d49 |} =I| 015a 7d15 5915 |} Y | 015c 485c 0041 |H\ A| 015e 4d51 0539 |MQ 9| 0160 1105 4910 | I | 0162 b909 3d3d | ==| 0164 3115 0538 |1 8| 0166 5800 554d |X UM| 0168 5105 3911 |Q 9 | 016a 0549 10b9 | I | 016c 093d 3d31 | ==1| 016e 1505 38b9 | 8 | 0170 5149 5515 |QIU | 0172 f640 9400 | @ | 0174 1549 1541 | I A| 0176 3164 5c00 |1d\ | 0178 714d 5539 |qMU9| 017a 7d49 410d |}IA | 017c 7d0d 3125 |} 1%| 017e 1539 50b9 | 9P | 0180 4915 4131 |I A1| 0182 657d 3515 |e}5 | 0184 4d4d 051d |MM | 0186 1400 0000 | | 0188 0000 4001 | @ | 018a c000 854d | M| 018c 5539 7d49 |U9}I| 018e 410d 7d0d |A } | 0190 3125 1539 |1% 9| 0192 50b9 6111 |P a | 0194 497d 3d41 |I}=A| 0196 4cb9 4155 |L AU| 0198 517d 4d51 |Q}MQ| 019a 4925 391c |I%9 | 019c f5ee 51fa | Q | 019e 408c 0011 |@ | 01a0 2539 513c |%9Q<| 01a2 5c00 814d |\ M| 01a4 5539 7d49 |U9}I| 01a6 410d 7d0d |A } | 01a8 3125 1539 |1% 9| 01aa 50b9 6111 |P a | 01ac 497d 3d41 |I}=A| 01ae 4cb9 4d51 |L MQ| 01b0 4915 0535 |I 5| 01b2 7d25 1001 |}% | 01b4 fa40 8c00 | @ | 01b6 1111 0551 | Q| 01b8 045c 003d | \ =| 01ba 4d51 0539 |MQ 9| 01bc 1105 4910 | I | 01be b94d 5149 | MQI| 01c0 2539 1c00 |%9 | 01c2 0000 0001 | | 01c4 3402 9000 |4 | 01c6 494d 5539 |IMU9| 01c8 7d49 410d |}IA | 01ca 7d0d 3125 |} 1%| 01cc 1539 50b9 | 9P | 01ce 1d15 50f5 | P | 01d0 ee51 fe40 | Q @| 01d2 9000 1119 | | 01d4 493d 345c |I=4\| 01d6 0061 4d55 | aMU| 01d8 397d 4941 |9}IA| 01da 0d7d 0d31 | } 1| 01dc 2515 3950 |% 9P| 01de b94d 5149 | MQI| 01e0 1505 357d | 5}| 01e2 2510 01fa |% | 01e4 408c 0035 |@ 5| 01e6 5d05 2551 |] %Q| 01e8 7d19 3d49 |} =I| 01ea 7d15 5915 |} Y | 01ec 485c 0041 |H\ A| 01ee 4d51 0539 |MQ 9| 01f0 1105 4910 | I | 01f2 b909 3d3d | ==| 01f4 3115 0538 |1 8| 01f6 5800 554d |X UM| 01f8 5105 3911 |Q 9 | 01fa 0549 10b9 | I | 01fc 093d 3d31 | ==1| 01fe 1505 38b9 | 8 |