|
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_02f8e7
└─⟦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 0110 | | .CONST 0x0110 ; 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 0024 | $ | .CONST 0x0024 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0004 | | .CONST 0x0004 ; Number of locals 001b INIT_0018: 001b 0007 | | Action Break_Optional 001c e001 | | Load 0x0,0x1 001d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001e 02c7 | | Declare_Variable Any 001f 00d8 | | Load_Top At_Offset_0 0020 1c00 | | Execute_Immediate Run_Utility,0x0 0021 00e7 | | Load_Encached Duration_Cache 0022 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call 0024 BODY_0018: 0024 0092 0089 | | Action Push_String_Extended,0x89 ; "server" 0026 0092 008a | | Action Push_String_Extended,0x8a ; "kind" 0028 e002 | | Load 0x0,0x2 0029 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 002a e003 | | Load 0x0,0x3 002b 1b15 | | Execute Package,Field_Read,Field_Number 0x15 002c 025b | [ | Execute Discrete,Check_In_Type 002d e004 | | Load 0x0,0x4 002e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 002f e5ff | | Load 0x2,-0x1 0030 e005 | | Load 0x0,0x5 0031 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0032 e005 | | Load 0x0,0x5 0033 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0034 a403 | | Store_Unchecked 0x2,0x3 0035 e403 | | Load 0x2,0x3 0036 00ba | | Action Initiate_Delay 0037 0092 008b | | Action Push_String_Extended,0x8b ; "!machine.error_logs.spr_transfer_log" 0039 8404 | | Call 0x2,0x4 003a 00ea | | Load_Encached Null_String_Cache 003b 00ea | | Load_Encached Null_String_Cache 003c 0092 008c | | Action Push_String_Extended,0x8c ; "!machine.error_logs" 003e 0092 008d | | Action Push_String_Extended,0x8d ; "spr_transfer_server (\x22" 0040 e5ff | | Load 0x2,-0x1 0041 01cc | | Execute Vector,Catenate 0042 0092 008e | | Action Push_String_Extended,0x8e ; "\x22);" 0044 01cc | | Execute Vector,Catenate 0045 0092 0089 | | Action Push_String_Extended,0x89 ; "server" 0047 0092 008f | | Action Push_String_Extended,0x8f ; "!tools.support_tools.sims" 0049 8006 | | Call 0x0,0x6 004a 4801 |H | Short_Literal 0x1 004b 0092 0090 | | Action Push_String_Extended,0x90 ; ":net:curly_joe:udd:csc:sims_receiving" 004d 0092 0091 | | Action Push_String_Extended,0x91 ; "!machine.to_rational.spr.@" 004f 8007 | | Call 0x0,0x7 0050 4801 |H | Short_Literal 0x1 0051 0092 0092 | | Action Push_String_Extended,0x92 ; ":net:moe:tools:ssr:queue" 0053 0092 0093 | | Action Push_String_Extended,0x93 ; "!machine.to_rational.internal_spr.@" 0055 8007 | | Call 0x0,0x7 0056 e402 | | Load 0x2,0x2 0057 e001 | | Load 0x0,0x1 0058 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0059 c402 | | Store 0x2,0x2 005a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 005b 0000 0000 | | .BLANK 0000[0x5] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0065 | e | .CONST 0x0065 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0002 | | .CONST 0x0002 ; Number of locals 0063 INIT_0060: 0063 029f 0073 | s| Declare_Subprogram INIT_0070,For_Call 0065 BODY_0060: 0065 8602 | | Call 0x3,0x2 0066 e402 | | Load 0x2,0x2 0067 e001 | | Load 0x0,0x1 0068 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0069 4502 |E | Exit_Suprogram New_Top_Offset 0x2 006a 0000 0000 | | .BLANK 0000[0x6] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0073 | s | .CONST 0x0073 ; Address of begin 0071 007a | z | .CONST 0x007a ; Address of exception handler 0072 0001 | | .CONST 0x0001 ; Number of locals 0073 BODY_0070: 0073 INIT_0070: 0073 e402 | | Load 0x2,0x2 0074 00ea | | Load_Encached Null_String_Cache 0075 e7ff | | Load 0x3,-0x1 0076 e001 | | Load 0x0,0x1 0077 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0078 c402 | | Store 0x2,0x2 0079 4501 |E | Exit_Suprogram New_Top_Offset 0x1 007a TRAP_0070: 007a 00d8 | | Load_Top At_Offset_0 007b 0107 | | Execute Exception,Get_Name 007c 4920 |I | Short_Literal 0x120 007d 492f |I/ | Short_Literal 0x12f 007e 0262 | b | Execute Discrete,In_Range 007f 6808 |h | Jump_Zero 0x88 0080 e402 | | Load 0x2,0x2 0081 00ea | | Load_Encached Null_String_Cache 0082 e7ff | | Load 0x3,-0x1 0083 4801 |H | Short_Literal 0x1 0084 e001 | | Load 0x0,0x1 0085 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0086 c402 | | Store 0x2,0x2 0087 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0088 0100 | | Execute Exception,Raise 0089 ; -------------------------------------------------------------------------------------- 0089 ; STRING TABLE 0089 ; -------------------------------------------------------------------------------------- 0089 0018 | | .STRTAB 0x0018->0x0095 ; "server" 008a 001c | | .STRTAB 0x001c->0x0098 ; "kind" 008b 001e | | .STRTAB 0x001e->0x009a ; "!machine.error_logs.spr_transfer_log" 008c 0040 | @ | .STRTAB 0x0040->0x00ac ; "!machine.error_logs" 008d 0051 | Q | .STRTAB 0x0051->0x00b5 ; "spr_transfer_server (\x22" 008e 0065 | e | .STRTAB 0x0065->0x00c0 ; "\x22);" 008f 0066 | f | .STRTAB 0x0066->0x00c2 ; "!tools.support_tools.sims" 0090 007d | } | .STRTAB 0x007d->0x00ce ; ":net:curly_joe:udd:csc:sims_receiving" 0091 00a0 | | .STRTAB 0x00a0->0x00e1 ; "!machine.to_rational.spr.@" 0092 00b8 | | .STRTAB 0x00b8->0x00ee ; ":net:moe:tools:ssr:queue" 0093 00ce | | .STRTAB 0x00ce->0x00fa ; "!machine.to_rational.internal_spr.@" 0094 00ef | | .STREND 0x00ef->0x010b 0095 7365 7276 |serv| .STRTAB_STRINGS 010c 0000 0000 | | .BLANK 0000[0x4] 0110 ; -------------------------------------------------------------------------------------- 0110 ; Debug Table 0110 ; -------------------------------------------------------------------------------------- 0110 0004 0000 | | .DEBUG4 0x0004,0x0000,0x1217,0x0000,0x0001,0x0000 0116 8800 0000 | | .XXX[0x3d] 0118 0000 1c68 | h| 011a 8020 09e4 | | 011c 8800 e3be | | 011e 0100 4fc3 | O | 0120 8007 21c0 | ! | 0122 0802 8690 | | 0124 0000 0000 | | 0126 4013 c910 |@ | 0128 0000 0020 | | 012a 0000 0000 | | 012c 0802 7923 | y#| 012e ffff fffe | | 0130 0000 0000 | | 0132 0100 4fc3 | O | 0134 8000 0000 | | 0136 8000 0000 | | 0138 0020 09f8 | | 013a 77ff ffff |w | 013c f000 0000 | | 013e 0004 0143 | C| 0140 4800 0000 |H | 0142 0200 0000 | | 0144 0000 8028 | (| 0146 691f ffff |i | 0148 ffa0 0000 | | 014a 0000 1004 | | 014c e890 0000 | | 014e 000c 0000 | | 0150 0000 0200 | | 0152 9d12 | | 0153 0000 0000 | | .BLANK 0000[0x4] 0157 0040 149e | @ | .XXX[0xa9] 0159 e001 e6e8 | | 015b 0000 0000 | | 015d 000e bd60 | `| 015f 1005 33fc | 3 | 0161 0076 2800 | v( | 0163 802a 12e0 | * | 0165 03b3 2804 | ( | 0167 0154 d100 | T | 0169 0000 0020 | | 016b 0a67 f800 | g | 016d 0000 1000 | | 016f 0000 0004 | | 0171 014c ffff | L | 0173 ffff ff00 | | 0175 0000 0000 | | 0177 802a 12e0 | * | 0179 0000 0040 | @| 017b 0000 0000 | | 017d 1005 425f | B_| 017f ffff fff8 | | 0181 0000 0000 | | 0183 0200 aa68 | h| 0185 8000 0001 | | 0187 0000 0000 | | 0189 0040 154d | @ M| 018b 1fff ffff | | 018d d000 0000 | | 018f 0008 0295 | | 0191 2400 0000 |$ | 0193 0600 00cd | | 0195 0401 0052 | R| 0197 a480 0000 | | 0199 0000 001a | | 019b 2fc0 200a |/ | 019d dbb8 00fc | | 019f 0600 0000 | | 01a1 0000 07a3 | | 01a3 4008 02bd |@ | 01a5 1000 3d38 | =8| 01a7 8040 1622 | @ "| 01a9 0001 eab8 | | 01ab 0200 b32d | -| 01ad 0000 0000 | | 01af 1005 7a20 | z | 01b1 0000 0008 | | 01b3 0000 0000 | | 01b5 0200 af44 | D| 01b7 7fff ffff | | 01b9 8000 0000 | | 01bb 0040 1622 | @ "| 01bd 0000 0000 | | 01bf 2000 0000 | | 01c1 0008 02c4 | | 01c3 41ff ffff |A | 01c5 fc00 0000 | | 01c7 0001 0059 | Y| 01c9 9680 0000 | | 01cb 0080 0000 | | 01cd 0000 200b | | 01cf 32d7 ffff |2 | 01d1 ffe8 0000 | | 01d3 0000 0401 | | 01d5 5c1b 0000 |\ | 01d7 0003 0000 | | 01d9 0000 0080 | | 01db 2b83 6000 |+ ` | 01dd 0000 0000 | | 01df 0000 0010 | | 01e1 05b9 ec00 | | 01e3 824c 0000 | L | 01e5 0000 0003 | | 01e7 f3e8 0401 | | 01e9 718c 001f |q | 01eb ae80 200b | | 01ed a048 00fd | H | 01ef ee01 005e | ^| 01f1 10c0 0000 | | 01f3 0008 02e3 | | 01f5 1800 0000 | | 01f7 0400 00dd | | 01f9 ac01 005c | \| 01fb 633f ffff |c? | 01fd ffc0 001b | | 01ff ce40 | @ |