|
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_0698fd
└─⟦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 00f8 | | .CONST 0x00f8 ; 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 0019 | | .CONST 0x0019 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000f | | .CONST 0x000f ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4807 |H | Short_Literal 0x7 000d 029f 0023 | #| Declare_Subprogram INIT_0020,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 0012 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated 0014 00bf | | Action Accept_Activation 0015 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0016 00c7 | | Action Elaborate_Subprogram 0017 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0018 00c7 | | Action Elaborate_Subprogram 0019 BODY_0008: 0019 00bc | | Action Signal_Activated 001a 00bb | | Action Signal_Completion 001b 0000 0000 | | .BLANK 0000[0x5] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 0023 | # | .CONST 0x0023 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0001 | | .CONST 0x0001 ; Number of locals 0023 BODY_0020: 0023 INIT_0020: 0023 4607 |F | Jump_Case 0x8 0024 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0025 7806 |x | Jump 0x2c ; case 0x1 0026 7809 |x | Jump 0x30 ; case 0x2 0027 780d |x | Jump 0x35 ; case 0x3 0028 7810 |x | Jump 0x39 ; case 0x4 0029 7811 |x | Jump 0x3b ; case 0x5 002a 7812 |x | Jump 0x3d ; case 0x6 002b 7815 |x | Jump 0x41 ; case 0x7 002c 00da | | Load_Top At_Offset_2 002d 0091 0095 | | Action Push_String_Extended_Indexed,0x95 ; "MAINTAINANCE_MODE" 002f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0030 00db | | Load_Top At_Offset_3 0031 00db | | Load_Top At_Offset_3 0032 00e0 | | Load_Encached Standard_Cache 0033 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0034 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0035 00da | | Load_Top At_Offset_2 0036 00e0 | | Load_Encached Standard_Cache 0037 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0038 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0039 00db | | Load_Top At_Offset_3 003a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 003b 00db | | Load_Top At_Offset_3 003c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 003d e20d | | Load 0x1,0xd 003e 00dc | | Load_Top At_Offset_4 003f 0267 | g | Execute Discrete,Predecessor 0040 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0041 e20d | | Load 0x1,0xd 0042 00dc | | Load_Top At_Offset_4 0043 0268 | h | Execute Discrete,Successor 0044 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0045 0000 0000 | | .XXX[0x3] 0047 0000 | | 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b e5ff | | Load 0x2,-0x1 004c 4607 |F | Jump_Case 0x8 004d 780b |x | Jump 0x59 ; case 0x0 004e 780e |x | Jump 0x5d ; case 0x1 004f 7811 |x | Jump 0x61 ; case 0x2 0050 7814 |x | Jump 0x65 ; case 0x3 0051 7817 |x | Jump 0x69 ; case 0x4 0052 781a |x | Jump 0x6d ; case 0x5 0053 781d |x | Jump 0x71 ; case 0x6 0054 7800 |x | Jump 0x55 ; case 0x7 0055 480f |H | Short_Literal 0xf 0056 e001 | | Load 0x0,0x1 0057 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0058 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0059 4808 |H | Short_Literal 0x8 005a e001 | | Load 0x0,0x1 005b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 005c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 005d 4809 |H | Short_Literal 0x9 005e e001 | | Load 0x0,0x1 005f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0060 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0061 480a |H | Short_Literal 0xa 0062 e001 | | Load 0x0,0x1 0063 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0064 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0065 480b |H | Short_Literal 0xb 0066 e001 | | Load 0x0,0x1 0067 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0068 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0069 480c |H | Short_Literal 0xc 006a e001 | | Load 0x0,0x1 006b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 006c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 006d 480d |H | Short_Literal 0xd 006e e001 | | Load 0x0,0x1 006f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0070 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0071 480e |H | Short_Literal 0xe 0072 e001 | | Load 0x0,0x1 0073 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0074 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0075 0000 0000 | | .XXX[0x3] 0077 0000 | | 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 007b | { | .CONST 0x007b ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0001 | | .CONST 0x0001 ; Number of locals 007b BODY_0078: 007b INIT_0078: 007b 00cf | | Action Mark_Auxiliary 007c e20d | | Load 0x1,0xd 007d 0265 | e | Execute Discrete,Reverse_Bounds 007e 0007 | | Action Break_Optional 007f 00d8 | | Load_Top At_Offset_0 0080 e20d | | Load 0x1,0xd 0081 011c | | Execute Any,Convert_Unchecked 0082 1c01 | | Execute_Immediate Run_Utility,0x1 0083 e002 | | Load 0x0,0x2 0084 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0085 0092 009d | | Action Push_String_Extended,0x9d ; " => " 0087 01cc | | Execute Vector,Catenate 0088 e404 | | Load 0x2,0x4 0089 820e | | Call 0x1,0xe 008a 00e1 | | Load_Encached Boolean_Cache 008b 011c | | Execute Any,Convert_Unchecked 008c 1c01 | | Execute_Immediate Run_Utility,0x1 008d e002 | | Load 0x0,0x2 008e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 008f 01cc | | Execute Vector,Catenate 0090 e003 | | Load 0x0,0x3 0091 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0092 00c8 | | Action Pop_Auxiliary_Range 0093 3feb |? | Loop_Increasing 0x7f 0094 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0095 ; -------------------------------------------------------------------------------------- 0095 ; STRING TABLE 0095 ; -------------------------------------------------------------------------------------- 0095 0014 | | .STRTAB 0x0014->0x009f ; "MAINTAINANCE_MODE" 0096 0023 | # | .STRTAB 0x0023->0x00a7 ; "KERNEL_DEBUGGER_AUTO_BOOT" 0097 003a | : | .STRTAB 0x003a->0x00b4 ; "KERNEL_DEBUGGER_WAIT_ON_CRASH" 0098 0055 | U | .STRTAB 0x0055->0x00c2 ; "KERNEL_DEBUGGER_DIALOUT_ON_CRASH" 0099 0073 | s | .STRTAB 0x0073->0x00d2 ; "MODEM_CAN_DIALOUT" 009a 0082 | | .STRTAB 0x0082->0x00db ; "MODEM_CAN_ANSWER" 009b 0090 | | .STRTAB 0x0090->0x00e3 ; "EEDB_AUTO_BOOT" 009c 009c | | .STRTAB 0x009c->0x00ea ; "KERNEL_AUTO_BOOT" 009d 00aa | | .STRTAB 0x00aa->0x00f2 ; " => " 009e 00ac | | .STREND 0x00ac->0x00f4 009f 4d41 494e |MAIN| .STRTAB_STRINGS 00f4 0000 0000 | | .BLANK 0000[0x4] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; Debug Table 00f8 ; -------------------------------------------------------------------------------------- 00f8 0004 000d | | .DEBUG4 0x0004,0x000d,0x4037,0x0000,0x0001,0x0000 00fe ca40 c6de | @ | .XXX[0xc4] 0100 dada c2dc | | 0102 c840 d2e6 | @ | 0104 40e6 e8d2 |@ | 0106 d8d8 40d2 | @ | 0108 dc40 e0e4 | @ | 010a dece e4ca | | 010c e6e6 5840 | X@| 010e e8d0 d2e6 | | 0110 40c6 deda |@ | 0112 dac2 dcc8 | | 0114 40c4 d8de |@ | 0116 c6d6 e640 | @| 0118 eadc e8d2 | | 011a d840 e8d0 | @ | 011c ca00 0000 | | 011e a400 0000 | | 0120 7cc6 deda || | 0122 dac2 dcc8 | | 0124 40c6 deda |@ | 0126 e0d8 cae8 | | 0128 cae6 5c40 | \@| 012a 4082 d8e6 |@ | 012c de58 40c2 | X@ | 012e d8d8 40e4 | @ | 0130 cada c2d2 | | 0132 dcd2 dcce | | 0134 40e4 cae6 |@ | 0136 e0de dce6 | | 0138 cae6 40c2 | @ | 013a e4ca 40d2 | @ | 013c cedc dee4 | | 013e cac8 5c00 | \ | 0140 0000 a000 | | 0142 0000 8040 | @| 0144 40c6 deda |@ | 0146 dac2 dcc8 | | 0148 40c6 deda |@ | 014a e0d8 cae8 | | 014c cae6 5c40 | \@| 014e 4082 d8e6 |@ | 0150 de58 40c2 | X@ | 0152 d8d8 40e4 | @ | 0154 cada c2d2 | | 0156 dcd2 dcce | | 0158 40e4 cae6 |@ | 015a e0de dce6 | | 015c cae6 40c2 | @ | 015e e4ca 40d2 | @ | 0160 cedc dee4 | | 0162 cac8 5c00 | \ | 0164 0000 a000 | | 0166 0000 8040 | @| 0168 40c6 deda |@ | 016a dac2 dcc8 | | 016c 40c6 deda |@ | 016e e0d8 cae8 | | 0170 cae6 5c40 | \@| 0172 4082 d8e6 |@ | 0174 de58 40c2 | X@ | 0176 d8d8 40e4 | @ | 0178 cada c2d2 | | 017a dcd2 dcce | | 017c 40e4 cae6 |@ | 017e e0de dce6 | | 0180 cae6 40c2 | @ | 0182 e4ca 40d2 | @ | 0184 cedc dee4 | | 0186 cac8 5c00 | \ | 0188 0000 2600 | & | 018a 0000 5a80 | Z | 018c dcde c8ca | | 018e 4042 a8de |@B | 0190 ded8 e65c | \| 0192 9cca e8ee | | 0194 dee4 d6d2 | | 0196 dcce 5c8c | \ | 0198 d2d8 cabe | | 019a a8e4 c2dc | | 019c e6cc cae4 | | 019e 5c86 dedc |\ | 01a0 dcca c6e8 | | 01a2 0000 0028 | (| 01a4 0000 0008 | | 01a6 dcde c8ca | | 01a8 0000 0032 | 2| 01aa 0000 004e | N| 01ac 42a8 dede |B | 01ae d8e6 5c9c | \ | 01b0 cae8 eede | | 01b2 e4d6 d2dc | | 01b4 ce5c 8cd2 | \ | 01b6 d8ca bea8 | | 01b8 e4c2 dce6 | | 01ba ccca e45c | \| 01bc 86de dcdc | | 01be cac6 e800 | | 01c0 0000 0200 | | 01c2 0000 0000 | | .BLANK 0000[0x5] 01c7 8200 0000 | | .XXX[0x39] 01c9 0000 0000 | | 01cb 8000 0000 | | 01cd 8800 0000 | | 01cf 5ee0 e4de |^ | 01d1 c6ca c8ea | | 01d3 e4ca 4086 | @ | 01d5 dedc dcca | | 01d7 c6e8 4050 | @P| 01d9 86de dcdc | | 01db cac6 e8d2 | | 01dd dedc 4040 | @@| 01df 4040 4074 |@@@t| 01e1 4086 dedc |@ | 01e3 dcca c6e8 | | 01e5 be92 c876 | v| 01e7 0000 0084 | | 01e9 0000 0062 | b| 01eb 4040 e0e4 |@@ | 01ed dec6 cac8 | | 01ef eae4 ca40 | @| 01f1 86de dcdc | | 01f3 cac6 e840 | @| 01f5 5086 dedc |P | 01f7 dcca c6e8 | | 01f9 d2de dc40 | @| 01fb 4040 4040 |@@@@| 01fd 7440 86de |t@ | 01ff dcdc | |