|
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_0220f2
└─⟦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 e001 | | Load 0x0,0x1 001c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 001d e001 | | Load 0x0,0x1 001e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 001f 00db | | Load_Top At_Offset_3 0020 680a |h | Jump_Zero 0x2b 0021 4801 |H | Short_Literal 0x1 0022 e001 | | Load 0x0,0x1 0023 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0024 0092 0038 | 8| Action Push_String_Extended,0x38 ; "------- End of step: " 0026 00db | | Load_Top At_Offset_3 0027 01cc | | Execute Vector,Catenate 0028 e001 | | Load 0x0,0x1 0029 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 002a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 002b 4801 |H | Short_Literal 0x1 002c e001 | | Load 0x0,0x1 002d 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 002e 0092 0039 | 9| Action Push_String_Extended,0x39 ; "------- Beginning step: " 0030 00db | | Load_Top At_Offset_3 0031 01cc | | Execute Vector,Catenate 0032 e001 | | Load 0x0,0x1 0033 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0034 4801 |H | Short_Literal 0x1 0035 e001 | | Load 0x0,0x1 0036 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0037 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0038 ; -------------------------------------------------------------------------------------- 0038 ; STRING TABLE 0038 ; -------------------------------------------------------------------------------------- 0038 0006 | | .STRTAB 0x0006->0x003b ; "------- End of step: " 0039 001c | | .STRTAB 0x001c->0x0047 ; "------- Beginning step: " 003a 0032 | 2 | .STREND 0x0032->0x0053 003b 2d2d 2d2d |----| .STRTAB_STRINGS 0053 0000 0000 | | .BLANK 0000[0x5] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 000d | | .DEBUG4 0x0004,0x000d,0x7924,0x0000,0x0001,0x0000 005e 0400 1c02 | | .XXX[0x1a2] 0060 4871 5510 |HqU | 0062 0400 0100 | | 0064 9000 0000 | | 0066 0000 00ff | | 0068 8000 0000 | | 006a 0000 0006 | | 006c b806 dc07 | | 006e 0807 3c07 | < | 0070 4807 6c07 |H l | 0072 ac07 e008 | | 0074 0008 2408 | $ | 0076 4408 6408 |D d | 0078 7408 8808 |t | 007a b808 e809 | | 007c 1009 2409 | $ | 007e 5409 7009 |T p | 0080 9c09 c809 | | 0082 ec0a 040a | | 0084 280a 580a |( X | 0086 780a a80a |x | 0088 c40a f40b | | 008a 1c0b 440b | D | 008c 6c0b 900b |l | 008e b80b d80b | | 0090 fc0c 240c | $ | 0092 400c 700c |@ p | 0094 9c0c a80c | | 0096 a80c c00c | | 0098 d80c fc0d | | 009a 140d 2c0d | , | 009c 440d 600d |D ` | 009e 840d 980d | | 00a0 c40d f40e | | 00a2 180e 4c0e | L | 00a4 7c0e a80e || | 00a6 d40e d00f | | 00a8 000f 240f | $ | 00aa 4c0f 780f |L x | 00ac b80f b80f | | 00ae f010 3410 | 4 | 00b0 6810 9810 |h | 00b2 d010 e811 | | 00b4 1411 4811 | H | 00b6 7c11 a011 || | 00b8 c411 f012 | | 00ba 2012 5412 | T | 00bc 9412 d813 | | 00be 1813 3813 | 8 | 00c0 4013 4813 |@ H | 00c2 7c13 a013 || | 00c4 c413 e414 | | 00c6 1c14 5814 | X | 00c8 8414 b014 | | 00ca e815 0c15 | | 00cc 3415 3015 |4 0 | 00ce 5015 6415 |P d | 00d0 8015 b415 | | 00d2 e416 1816 | | 00d4 3816 5c16 |8 \ | 00d6 8416 a416 | | 00d8 cc16 f017 | | 00da 1017 3c17 | < | 00dc 6817 9c17 |h | 00de e018 0818 | | 00e0 3018 4c18 |0 L | 00e2 8018 c018 | | 00e4 ec19 2019 | | 00e6 5419 8c19 |T | 00e8 bc19 ec1a | | 00ea 1c1a 501a | P | 00ec 741a 981a |t | 00ee c81b 041b | | 00f0 201b 341b | 4 | 00f2 441b 6c1b |D l | 00f4 9c1b cc1c | | 00f6 101c 581c | X | 00f8 7c1c d41c || | 00fa f41d 101d | | 00fc 141d 401d | @ | 00fe 701d ac1e |p | 0100 0c1e 581e | X | 0102 8c1e c01e | | 0104 ec1e f41f | | 0106 141f 541f | T | 0108 901f c820 | | 010a 0420 3c20 | < | 010c 7020 9820 |p | 010e d021 0821 | ! !| 0110 3821 6821 |8!h!| 0112 9421 cc21 | ! !| 0114 f022 2822 | "("| 0116 5c22 8822 |\" "| 0118 d023 0c23 | # #| 011a 2423 5023 |$#P#| 011c 6823 8c23 |h# #| 011e b423 f024 | # $| 0120 1424 4c24 | $L$| 0122 5824 6824 |X$h$| 0124 8424 a824 | $ $| 0126 d425 0425 | % %| 0128 4025 7825 |@%x%| 012a 8c25 a425 | % %| 012c a425 e026 | % &| 012e 3026 3426 |0&4&| 0130 3c26 4826 |<&H&| 0132 7426 9826 |t& &| 0134 bc26 dc26 | & &| 0136 d827 0026 | ' &| 0138 fc26 f826 | & &| 013a f426 f427 | & '| 013c 3827 3427 |8'4'| 013e 3427 3027 |4'0'| 0140 2c27 2827 |,'('| 0142 2d51 e5c1 |-Q | 0144 957d 3d99 | }= | 0146 99cd 95d1 | | 0148 51bd 7d09 |Q } | 014a 957d 0589 | } | 014c bdc9 d195 | | 014e 9105 89bd | | 0150 c9d1 7d41 | }A| 0152 c9bd d195 | | 0154 8dd1 9591 | | 0156 4dd1 858d |M | 0158 ad11 85d1 | | 015a 857d 3d99 | }= | 015c 99cd 95d1 | | 015e 09bd d5b9 | | 0160 91cd 7d5d | }]| 0162 a5d1 a17d | }| 0164 3d89 a995 |= | 0166 8dd1 1195 | | 0168 c9a5 d995 | | 016a cd7d 41c9 | }A | 016c a5d9 858d | | 016e e525 cd7d | % }| 0170 41c9 a5d9 |A | 0172 85d1 9525 | %| 0174 cd7d 0dbd | } | 0176 b9cd d185 | | 0178 b9d1 25cd | % | 017a 7d59 a5cd |}Y | 017c a589 b195 | | 017e 4185 d1a1 |A | 0180 7d4d d185 |}M | 0182 8dad 3d99 | = | 0184 99cd 95d1 | | 0186 4d95 9db5 |M | 0188 95b9 d10d | | 018a a1a5 b191 | | 018c c995 b97d | }| 018e 4dd1 85c9 |M | 0190 d10d bdb9 | | 0192 d1c9 bdb1 | | 0194 7d3d 9999 |}= | 0196 cd95 d14d | M| 0198 d589 c1c9 | | 019a bd9d 7d4d | }M| 019c a5d1 953d | =| 019e 997d 2da5 | }- | 01a0 b991 4d8d | M | 01a2 bdc1 957d | }| 01a4 19bd c97d | }| 01a6 4da5 d195 |M | 01a8 3195 e17d |1 }| 01aa 3195 d995 |1 | 01ac b14d d589 | M | 01ae c1c9 bd9d | | 01b0 7d4d d185 |}M | 01b2 c9d1 1195 | | 01b4 8db1 85c9 | | 01b6 957d 19c9 | } | 01b8 85b5 95cd | | 01ba d185 c9d0 | | 01bc 81c1 8c80 | | 01be f480 ec81 | | 01c0 b195 e080 | | 01c2 f481 91a5 | | 01c4 cdd1 c9a5 | | 01c6 89d5 d1bd | | 01c8 c98d bdb9 | | 01ca d1c9 bdb0 | | 01cc 8195 e1d1 | | 01ce 95b9 d189 | | 01d0 c995 85ac | | 01d2 81b5 85cd | | 01d4 ad25 cd7d | % }| 01d6 0d85 d185 | | 01d8 b1bd 9dd5 | | 01da 9590 8125 | %| 01dc cd7d 5da5 | }] | 01de c995 9081 | | 01e0 1195 b185 | | 01e2 e57d 11d5 | } | 01e4 c985 d1a5 | | 01e6 bdb9 51a5 | Q | 01e8 b595 917d | }| 01ea 0da1 bda5 | | 01ec 8d95 3595 | 5 | 01ee b589 95c9 | | 01f0 7d25 b991 |}% | 01f2 95e1 19a5 | | 01f4 c9cd d17d | }| 01f6 3595 b589 |5 | 01f8 95c9 3595 | 5 | 01fa b589 95c9 | | 01fc 7d4d a5d1 |}M | 01fe 9515 b9d1 | |