|
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, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 00f0 | | .CONST 0x00f0 ; 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 0000 | | .CONST 0x0000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0040 | @ | .CONST 0x0040 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0019 | | .CONST 0x0019 ; Number of locals 000b INIT_0008: 000b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0 = .DEBUG 0x000b,0x011a,0x8000,0x0000,0x0025,0x6e34,0x0000,0x0003 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0129 | ) | Execute Any,Make_Visible 000d 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 00c4 | | Action Make_Default ; Debug Table 0x0.0x3 = 0x11,0xfffc 0012 00c4 | | Action Make_Default ; Debug Table 0x0.0x4 = 0x12,0xfffb 0013 00c4 | | Action Make_Default ; Debug Table 0x0.0x5 = 0x13,0xfffa 0014 00c4 | | Action Make_Default ; Debug Table 0x0.0x6 = 0x14,0xfff9 0015 00c4 | | Action Make_Default ; Debug Table 0x0.0x7 = 0x15,0xfff8 0016 00c4 | | Action Make_Default ; Debug Table 0x0.0x8 = 0x16,0xfff7 0017 00c4 | | Action Make_Default ; Debug Table 0x0.0x9 = 0x17,0xfff6 0018 00c4 | | Action Make_Default ; Debug Table 0x0.0xa = 0x18,0xfff5 0019 00c4 | | Action Make_Default ; Debug Table 0x0.0xb = 0x19,0xfff4 001a 0007 | | Action Break_Optional ; Debug Table 0x0.0xc = 0x1a,0xfff3 001b 0007 | | Action Break_Optional ; Debug Table 0x0.0xd = 0x1b,0xfff2 001c 0007 | | Action Break_Optional ; Debug Table 0x0.0xe = 0x1c,0xfff1 001d 0007 | | Action Break_Optional ; Debug Table 0x0.0xf = 0x1d,0xfff0 001e e20d | | Load 0x1,0xd ; Debug Table 0x0.0x10 = 0x1e,0xffef 001f 0400 | | Execute_Immediate Set_Value_Visible_Unchecked,0x0 0020 c210 | | Store 0x1,0x10 0021 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x11 = 0x21,0xffee 0022 0401 | | Execute_Immediate Set_Value_Visible_Unchecked,0x1 0023 c211 | | Store 0x1,0x11 0024 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x12 = 0x24,0xffed 0025 0402 | | Execute_Immediate Set_Value_Visible_Unchecked,0x2 0026 c212 | | Store 0x1,0x12 0027 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x13 = 0x27,0xffec 0028 0403 | | Execute_Immediate Set_Value_Visible_Unchecked,0x3 0029 c213 | | Store 0x1,0x13 002a e20d | | Load 0x1,0xd ; Debug Table 0x0.0x14 = 0x2a,0xffeb 002b 0404 | | Execute_Immediate Set_Value_Visible_Unchecked,0x4 002c c214 | | Store 0x1,0x14 002d e20d | | Load 0x1,0xd ; Debug Table 0x0.0x15 = 0x2d,0xffea 002e 0405 | | Execute_Immediate Set_Value_Visible_Unchecked,0x5 002f c215 | | Store 0x1,0x15 0030 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x16 = 0x30,0xffe9 0031 0406 | | Execute_Immediate Set_Value_Visible_Unchecked,0x6 0032 c216 | | Store 0x1,0x16 0033 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x17 = 0x33,0xffe8 0034 0407 | | Execute_Immediate Set_Value_Visible_Unchecked,0x7 0035 c217 | | Store 0x1,0x17 0036 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x18 = 0x36,0xffe7 0037 0408 | | Execute_Immediate Set_Value_Visible_Unchecked,0x8 0038 c218 | | Store 0x1,0x18 0039 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x19 = 0x39,0xffe6 003a 0608 | | Execute_Immediate Set_Value_Unchecked,0x8 003b 00bf | | Action Accept_Activation 003c 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1 = .DEBUG 0x003c,0x0150,0x8000,0x0000,0x0036,0xfc44,0x0000,0x0005 ; Debug Table 0x1.0x0 = 0x3c,0xffff 003d 00c7 | | Action Elaborate_Subprogram 003e 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x1 = 0x3e,0xfffe 003f 00c7 | | Action Elaborate_Subprogram 0040 BODY_0008: 0040 00bc | | Action Signal_Activated 0041 00bb | | Action Signal_Completion 0042 0000 0000 | | .BLANK 0000[0x6] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 0051 | Q | .CONST 0x0051 ; Address of begin 0049 006b | k | .CONST 0x006b ; Address of exception handler 004a 0002 | | .CONST 0x0002 ; Number of locals 004b INIT_0048: 004b 4be8 |K | Short_Literal 0x3e8 ; Debug Table 0x2 = .DEBUG 0x004b,0x0156,0x0002,0x0000,0x0025,0x6e34,0x0000,0x0008 ; Debug Table 0x2.0x0 = 0x4b,0xffff 004c e001 | | Load 0x0,0x1 004d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 004e 1c08 | | Execute_Immediate Run_Utility,0x8 004f e402 | | Load 0x2,0x2 0050 1c00 | | Execute_Immediate Run_Utility,0x0 0051 BODY_0048: 0051 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x1 = 0x51,0x1 0052 4820 |H | Short_Literal 0x20 0053 4800 |H | Short_Literal 0x0 0054 e001 | | Load 0x0,0x1 0055 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0056 00d1 | | Pop_Control Pop_Count_1 0057 4808 |H | Short_Literal 0x8 ; Debug Table 0x2.0x2 = 0x57,0x2 0058 4801 |H | Short_Literal 0x1 0059 0007 | | Action Break_Optional 005a e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x3 = 0x5a,0x3 005b e404 | | Load 0x2,0x4 005c 820f | | Call 0x1,0xf 005d e001 | | Load 0x0,0x1 005e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 005f 00d1 | | Pop_Control Pop_Count_1 0060 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x4 = 0x60,0x4 0061 0092 00b4 | | Action Push_String_Extended,0xb4 ; " " 0063 e001 | | Load 0x0,0x1 0064 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0065 00d1 | | Pop_Control Pop_Count_1 0066 3ff3 |? | Loop_Increasing 0x5a 0067 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x5 = 0x67,0x5 0068 e001 | | Load 0x0,0x1 0069 1813 | | Execute Package,Field_Execute,Field_Number 0x13 006a 00ca | | Action Exit_Nullary_Function 006b TRAP_0048: 006b 0007 | | Action Break_Optional 006c e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x6 = 0x6c,0x6 006d e001 | | Load 0x0,0x1 006e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 006f 00ca | | Action Exit_Nullary_Function 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0075 | u | .CONST 0x0075 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0002 | | .CONST 0x0002 ; Number of locals 0073 INIT_0070: 0073 029f 00ab | | Declare_Subprogram INIT_00a8,For_Call ; Debug Table 0x3 = .DEBUG 0x0073,0x0166,0x0002,0x0000,0x0025,0x6e34,0x0000,0x000d ; Debug Table 0x3.0x0 = 0x73,0xffff 0075 BODY_0070: 0075 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x1 = 0x75,0x1 0076 0b01 | | Execute_Immediate Case_Compare,0x1 0077 7010 |p | Jump_Nonzero 0x88 0078 0b02 | | Execute_Immediate Case_Compare,0x2 0079 7012 |p | Jump_Nonzero 0x8c 007a 0b03 | | Execute_Immediate Case_Compare,0x3 007b 7014 |p | Jump_Nonzero 0x90 007c 0b04 | | Execute_Immediate Case_Compare,0x4 007d 7016 |p | Jump_Nonzero 0x94 007e 0b05 | | Execute_Immediate Case_Compare,0x5 007f 7018 |p | Jump_Nonzero 0x98 0080 0b06 | | Execute_Immediate Case_Compare,0x6 0081 701a |p | Jump_Nonzero 0x9c 0082 0b07 | | Execute_Immediate Case_Compare,0x7 0083 701c |p | Jump_Nonzero 0xa0 0084 0b08 | | Execute_Immediate Case_Compare,0x8 0085 701e |p | Jump_Nonzero 0xa4 0086 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x3.0x2 = 0x86,0xa 0087 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0088 0092 00b5 | | Action Push_String_Extended,0xb5 ; "Breaker" ; Debug Table 0x3.0x3 = 0x88,0x2 008a 8402 | | Call 0x2,0x2 008b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 008c 0092 00b6 | | Action Push_String_Extended,0xb6 ; "Stepper" ; Debug Table 0x3.0x4 = 0x8c,0x3 008e 8402 | | Call 0x2,0x2 008f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0090 0092 00b7 | | Action Push_String_Extended,0xb7 ; "Tracer" ; Debug Table 0x3.0x5 = 0x90,0x4 0092 8402 | | Call 0x2,0x2 0093 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0094 0092 00b8 | | Action Push_String_Extended,0xb8 ; "Exception_Handler" ; Debug Table 0x3.0x6 = 0x94,0x5 0096 8402 | | Call 0x2,0x2 0097 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0098 0092 00b9 | | Action Push_String_Extended,0xb9 ; "History" ; Debug Table 0x3.0x7 = 0x98,0x6 009a 8402 | | Call 0x2,0x2 009b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 009c 0092 00ba | | Action Push_String_Extended,0xba ; "Profiler" ; Debug Table 0x3.0x8 = 0x9c,0x7 009e 8402 | | Call 0x2,0x2 009f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a0 0092 00bb | | Action Push_String_Extended,0xbb ; "Temporary_Stopper" ; Debug Table 0x3.0x9 = 0xa0,0x8 00a2 8402 | | Call 0x2,0x2 00a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a4 0092 00bc | | Action Push_String_Extended,0xbc ; "Task_Controller" ; Debug Table 0x3.0xa = 0xa4,0x9 00a6 8402 | | Call 0x2,0x2 00a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab e7ff | | Load 0x3,-0x1 ; Debug Table 0x4 = .DEBUG 0x00ab,0x017e,0x0002,0x0000,0x0036,0xfc44,0x0000,0x0055 ; Debug Table 0x4.0x0 = 0xab,0x1 00ac 0092 00bd | | Action Push_String_Extended,0xbd ; " => " 00ae 01cc | | Execute Vector,Catenate 00af e5ff | | Load 0x2,-0x1 00b0 00e0 | | Load_Encached Standard_Cache 00b1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00b2 01cc | | Execute Vector,Catenate 00b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b4 ; -------------------------------------------------------------------------------------- 00b4 ; STRING TABLE 00b4 ; -------------------------------------------------------------------------------------- 00b4 0016 | | .STRTAB 0x0016->0x00bf ; " " 00b5 0016 | | .STRTAB 0x0016->0x00c0 ; "Breaker" 00b6 001b | | .STRTAB 0x001b->0x00c3 ; "Stepper" 00b7 0020 | | .STRTAB 0x0020->0x00c7 ; "Tracer" 00b8 0024 | $ | .STRTAB 0x0024->0x00ca ; "Exception_Handler" 00b9 0033 | 3 | .STRTAB 0x0033->0x00d2 ; "History" 00ba 0038 | 8 | .STRTAB 0x0038->0x00d6 ; "Profiler" 00bb 003e | > | .STRTAB 0x003e->0x00da ; "Temporary_Stopper" 00bc 004d | M | .STRTAB 0x004d->0x00e2 ; "Task_Controller" 00bd 005a | Z | .STRTAB 0x005a->0x00ea ; " => " 00be 005c | \ | .STREND 0x005c->0x00ec 00bf 2020 4272 | Br| .STRTAB_STRINGS 00ec 0000 0000 | | .BLANK 0000[0x4] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; Debug Table 00f0 ; -------------------------------------------------------------------------------------- 00f0 0003 0005 | | .CONST 0x0003,0x0005 00f2 000b 011a | | .DEBUG 0x000b,0x011a,0x8000,0x0000,0x0025,0x6e34,0x0000,0x0003 00fa 003c 0150 | < P| .DEBUG 0x003c,0x0150,0x8000,0x0000,0x0036,0xfc44,0x0000,0x0005 0102 004b 0156 | K V| .DEBUG 0x004b,0x0156,0x0002,0x0000,0x0025,0x6e34,0x0000,0x0008 010a 0073 0166 | s f| .DEBUG 0x0073,0x0166,0x0002,0x0000,0x0025,0x6e34,0x0000,0x000d 0112 00ab 017e | ~| .DEBUG 0x00ab,0x017e,0x0002,0x0000,0x0036,0xfc44,0x0000,0x0055 011a ; -------------------------------------------------------------------------------------- 011a ; Debug3 Subtable 0x0 011a ; -------------------------------------------------------------------------------------- 011a 001a 0000 | | .DBG3TAB 0x001a,0x0000 011c 000b ffff | | .CONST 0x000b,0xffff 011e 000d fffe | | .CONST 0x000d,0xfffe 0120 000f fffd | | .CONST 0x000f,0xfffd 0122 0011 fffc | | .CONST 0x0011,0xfffc 0124 0012 fffb | | .CONST 0x0012,0xfffb 0126 0013 fffa | | .CONST 0x0013,0xfffa 0128 0014 fff9 | | .CONST 0x0014,0xfff9 012a 0015 fff8 | | .CONST 0x0015,0xfff8 012c 0016 fff7 | | .CONST 0x0016,0xfff7 012e 0017 fff6 | | .CONST 0x0017,0xfff6 0130 0018 fff5 | | .CONST 0x0018,0xfff5 0132 0019 fff4 | | .CONST 0x0019,0xfff4 0134 001a fff3 | | .CONST 0x001a,0xfff3 0136 001b fff2 | | .CONST 0x001b,0xfff2 0138 001c fff1 | | .CONST 0x001c,0xfff1 013a 001d fff0 | | .CONST 0x001d,0xfff0 013c 001e ffef | | .CONST 0x001e,0xffef 013e 0021 ffee | ! | .CONST 0x0021,0xffee 0140 0024 ffed | $ | .CONST 0x0024,0xffed 0142 0027 ffec | ' | .CONST 0x0027,0xffec 0144 002a ffeb | * | .CONST 0x002a,0xffeb 0146 002d ffea | - | .CONST 0x002d,0xffea 0148 0030 ffe9 | 0 | .CONST 0x0030,0xffe9 014a 0033 ffe8 | 3 | .CONST 0x0033,0xffe8 014c 0036 ffe7 | 6 | .CONST 0x0036,0xffe7 014e 0039 ffe6 | 9 | .CONST 0x0039,0xffe6 0150 ; -------------------------------------------------------------------------------------- 0150 ; Debug3 Subtable 0x1 0150 ; -------------------------------------------------------------------------------------- 0150 0002 0000 | | .DBG3TAB 0x0002,0x0000 0152 003c ffff | < | .CONST 0x003c,0xffff 0154 003e fffe | > | .CONST 0x003e,0xfffe 0156 ; -------------------------------------------------------------------------------------- 0156 ; Debug3 Subtable 0x2 0156 ; -------------------------------------------------------------------------------------- 0156 0001 0006 | | .DBG3TAB 0x0001,0x0006 0158 004b ffff | K | .CONST 0x004b,0xffff 015a 0051 0001 | Q | .CONST 0x0051,0x0001 015c 0057 0002 | W | .CONST 0x0057,0x0002 015e 005a 0003 | Z | .CONST 0x005a,0x0003 0160 0060 0004 | ` | .CONST 0x0060,0x0004 0162 0067 0005 | g | .CONST 0x0067,0x0005 0164 006c 0006 | l | .CONST 0x006c,0x0006 0166 ; -------------------------------------------------------------------------------------- 0166 ; Debug3 Subtable 0x3 0166 ; -------------------------------------------------------------------------------------- 0166 0001 000a | | .DBG3TAB 0x0001,0x000a 0168 0073 ffff | s | .CONST 0x0073,0xffff 016a 0075 0001 | u | .CONST 0x0075,0x0001 016c 0086 000a | | .CONST 0x0086,0x000a 016e 0088 0002 | | .CONST 0x0088,0x0002 0170 008c 0003 | | .CONST 0x008c,0x0003 0172 0090 0004 | | .CONST 0x0090,0x0004 0174 0094 0005 | | .CONST 0x0094,0x0005 0176 0098 0006 | | .CONST 0x0098,0x0006 0178 009c 0007 | | .CONST 0x009c,0x0007 017a 00a0 0008 | | .CONST 0x00a0,0x0008 017c 00a4 0009 | | .CONST 0x00a4,0x0009 017e ; -------------------------------------------------------------------------------------- 017e ; Debug3 Subtable 0x4 017e ; -------------------------------------------------------------------------------------- 017e 0000 0001 | | .DBG3TAB 0x0000,0x0001 0180 00ab 0001 | | .CONST 0x00ab,0x0001 0182 0000 0000 | | .BLANK 0000[0x7e]