|
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_5c84f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0090 | | .CONST 0x0090 ; 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 0022 | " | .CONST 0x0022 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000b | | .CONST 0x000b ; Number of locals 000b INIT_0008: 000b 029f 0033 | 3| Declare_Subprogram INIT_0030,For_Call 000d e013 | | Load 0x0,0x13 000e 1917 | | Execute Package,Field_Reference,Field_Number 0x17 000f 00c6 | | Action Check_Subprogram_Elaborated 0010 4802 |H | Short_Literal 0x2 0011 4803 |H | Short_Literal 0x3 0012 0099 | | Action Reference_Dynamic 0013 e023 | # | Load 0x0,0x23 0014 e024 | $ | Load 0x0,0x24 0015 4806 |H | Short_Literal 0x6 0016 0007 | | Action Break_Optional 0017 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 0019 1d0f | | Execute_Immediate Reference_Lex_1,0xf 001a 00c6 | | Action Check_Subprogram_Elaborated 001b 4807 |H | Short_Literal 0x7 001c 4803 |H | Short_Literal 0x3 001d 0099 | | Action Reference_Dynamic 001e e025 | % | Load 0x0,0x25 001f e026 | & | Load 0x0,0x26 0020 480b |H | Short_Literal 0xb 0021 0007 | | Action Break_Optional 0022 BODY_0008: 0022 e7ff | | Load 0x3,-0x1 0023 4808 |H | Short_Literal 0x8 0024 4803 |H | Short_Literal 0x3 0025 0099 | | Action Reference_Dynamic 0026 4809 |H | Short_Literal 0x9 0027 4803 |H | Short_Literal 0x3 0028 0099 | | Action Reference_Dynamic 0029 820f | | Call 0x1,0xf 002a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 002b 0000 0000 | | .BLANK 0000[0x5] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0035 | 5 | .CONST 0x0035 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0002 | | .CONST 0x0002 ; Number of locals 0033 INIT_0030: 0033 029f 006b | k| Declare_Subprogram INIT_0068,For_Call 0035 BODY_0030: 0035 00db | | Load_Top At_Offset_3 0036 8802 | | Call 0x4,0x2 0037 701a |p | Jump_Nonzero 0x52 0038 00db | | Load_Top At_Offset_3 0039 8219 | | Call 0x1,0x19 003a 6817 |h | Jump_Zero 0x52 003b e008 | | Load 0x0,0x8 003c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 003d e9ff | | Load 0x4,-0x1 003e 8218 | | Call 0x1,0x18 003f e406 | | Load 0x2,0x6 0040 e214 | | Load 0x1,0x14 0041 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0042 e9fe | | Load 0x4,-0x2 0043 e013 | | Load 0x0,0x13 0044 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0045 e9ff | | Load 0x4,-0x1 0046 8218 | | Call 0x1,0x18 0047 480b |H | Short_Literal 0xb 0048 4802 |H | Short_Literal 0x2 0049 0099 | | Action Reference_Dynamic 004a 480c |H | Short_Literal 0xc 004b 4802 |H | Short_Literal 0x2 004c 0099 | | Action Reference_Dynamic 004d 480d |H | Short_Literal 0xd 004e 4802 |H | Short_Literal 0x2 004f 0099 | | Action Reference_Dynamic 0050 e013 | | Load 0x0,0x13 0051 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0052 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0053 0000 0000 | | .BLANK 0000[0x5] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b 00ea | | Load_Encached Null_String_Cache 005c e9fc | | Load 0x4,-0x4 005d e9fd | | Load 0x4,-0x3 005e 4803 |H | Short_Literal 0x3 005f 4803 |H | Short_Literal 0x3 0060 0099 | | Action Reference_Dynamic 0061 4804 |H | Short_Literal 0x4 0062 4803 |H | Short_Literal 0x3 0063 0099 | | Action Reference_Dynamic 0064 e013 | | Load 0x0,0x13 0065 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0066 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0067 0000 | | .XXX[0x1] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 0072 | r | .CONST 0x0072 ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0003 | | .CONST 0x0003 ; Number of locals 006b INIT_0068: 006b e008 | | Load 0x0,0x8 006c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 006d 02ff | | Declare_Variable Variant_Record 006e 00d8 | | Load_Top At_Offset_0 006f 1c00 | | Execute_Immediate Run_Utility,0x0 0070 e008 | | Load 0x0,0x8 0071 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0072 BODY_0068: 0072 e008 | | Load 0x0,0x8 0073 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0074 00da | | Load_Top At_Offset_2 0075 6012 |` | Indirect_Literal Discrete,0x88,{0x00000000, 0x00004000} 0076 e010 | | Load 0x0,0x10 0077 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0078 4800 |H | Short_Literal 0x0 0079 e9ff | | Load 0x4,-0x1 007a e008 | | Load 0x0,0x8 007b 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 007c 181a | | Execute Package,Field_Execute,Field_Number 0x1a 007d 00d1 | | Pop_Control Pop_Count_1 007e 0059 | Y | Store_Top Discrete,At_Offset_1 007f 00d9 | | Load_Top At_Offset_1 0080 e008 | | Load 0x0,0x8 0081 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0082 7003 |p | Jump_Nonzero 0x86 0083 00d8 | | Load_Top At_Offset_0 0084 0f08 | | Execute_Immediate Equal,0x8 0085 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0086 4801 |H | Short_Literal 0x1 0087 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0088 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 008c 0000 0000 | | .BLANK 0000[0x4] 0090 ; -------------------------------------------------------------------------------------- 0090 ; Debug Table 0090 ; -------------------------------------------------------------------------------------- 0090 0004 000c | | .DEBUG4 0x0004,0x000c,0x422d,0x0000,0x0001,0x0000 0096 0030 6800 | 0h | .XXX[0x3a] 0098 1000 1380 | | 009a 046c bf80 | l | 009c 386c 3780 |8l7 | 009e 246c 380c |$l8 | 00a0 df80 386c | 8l| 00a2 3403 6797 |4 g | 00a4 fc08 5cf0 | \ | 00a6 1380 146c | l| 00a8 4060 3403 |@`4 | 00aa 4401 6920 |D i | 00ac 0520 0402 | | 00ae 4840 eb90 |H@ | 00b0 0f80 2860 | (`| 00b2 3b80 046c |; l| 00b4 bf97 f803 | | 00b6 6a09 8002 |j | 00b8 4840 ef89 |H@ | 00ba 2461 f317 |$a | 00bc f801 6d20 | m | 00be 0520 0402 | | 00c0 4840 f390 |H@ | 00c2 0b80 2860 | (`| 00c4 3d14 0800 |= | 00c6 0031 0c00 | 1 | 00c8 1000 0403 | | 00ca 6808 5cf0 |h \ | 00cc 2808 5c0c |( \ | 00ce d510 0400 | | 00d0 0000 0000 | | .BLANK 0000[0x6] 00d6 0031 9c00 | 1 | .XXX[0x12a] 00d8 1000 1f80 | | 00da 086c d46c | l l| 00dc 600b 1c03 |` | 00de 6070 0380 |`p | 00e0 086c 3c0b | l< | 00e2 1c03 6070 | `p| 00e4 0380 086c | l| 00e6 d46c 3f80 | l? | 00e8 086c 3780 | l7 | 00ea 146c 4c0a | lL | 00ec 7c3f cf97 ||? | 00ee fc07 6da1 | m | 00f0 2780 086c |' l| 00f2 d46c 3f90 | l? | 00f4 098c f780 | | 00f6 0c6c 3b80 | l; | 00f8 3c60 4780 |<`G | 00fa 4060 4520 |@`E | 00fc 0520 0380 | | 00fe 3c60 4780 |<`G | 0100 086c d460 | l `| 0102 5920 a521 |Y !| 0104 6f97 fc07 |o | 0106 2802 4840 |( H@| 0108 f407 3380 | 3 | 010a 446c 3407 |Dl4 | 010c 3007 2f80 |0 / | 010e 086c d460 | l `| 0110 6f10 0b10 |o | 0112 1003 3de0 | = | 0114 6b80 086c |k l| 0116 3790 0c04 |7 | 0118 81a0 0f80 | | 011a 086c 3de0 | l= | 011c 0790 0f90 | | 011e 0b80 086c | l| 0120 d460 8b10 | ` | 0122 0f10 1790 | | 0124 0f80 0860 | `| 0126 45c0 0610 |E | 0128 1f90 0b80 | | 012a 086c d460 | l `| 012c 7710 0803 |w | 012e 2790 0b80 |' | 0130 086c d460 | l `| 0132 79bf 8403 |y | 0134 3b90 0b80 |; | 0136 086c d461 | l a| 0138 4b10 0914 |K | 013a 1000 0000 | | 013c 0000 0000 | | 013e 0032 f434 | 2 4| 0140 2400 0b80 |$ | 0142 386c 3780 |8l7 | 0144 1c6c 3b97 | l; | 0146 fc08 5ce0 | \ | 0148 1920 0397 | | 014a fc08 5ce0 | \ | 014c 1c03 6c08 | l | 014e 5cf0 0797 |\ | 0150 fc08 5cf0 | \ | 0152 0b80 0c60 | `| 0154 5797 fc08 |W | 0156 5ce0 0803 |\ | 0158 6c08 5cf0 |l \ | 015a 0520 0397 | | 015c fc08 5cd0 | \ | 015e 0c07 5f80 | _ | 0160 0c60 5520 | `U | 0162 0397 fc08 | | 0164 5cd0 0c07 |\ | 0166 5803 6c08 |X l | 0168 6780 386c |g 8l| 016a 3780 146c |7 l| 016c 3797 fc08 |7 | 016e 5cf0 0920 |\ | 0170 0397 fc08 | | 0172 5cd0 0c07 |\ | 0174 5f97 fc08 |_ | 0176 5cf0 0380 |\ | 0178 1460 3803 | `8 | 017a 68e0 1001 |h | 017c 6803 4520 |h E | 017e 0520 0402 | | 0180 4840 f803 |H@ | 0182 6f80 2860 |o (`| 0184 3803 6d20 |8 m | 0186 0780 2460 | $`| 0188 5609 8c03 |V | 018a 6d20 0380 |m | 018c 2460 4e09 |$`N | 018e 8d14 098a | | 0190 7804 3da0 |x = | 0192 a397 fc08 | | 0194 6780 386c |g 8l| 0196 3403 64f0 |4 d | 0198 1120 0380 | | 019a 1460 3c03 | `< | 019c 68e0 1001 |h | 019e 6c03 4797 |l G | 01a0 fc08 64f0 | d | 01a2 0d20 0003 | | 01a4 6407 5d20 |d ] | 01a6 0520 0380 | | 01a8 0c60 6120 | `a | 01aa 0003 6807 | h | 01ac 5803 4797 |X G | 01ae fc08 6403 | d | 01b0 60f0 0920 |` | 01b2 0520 0380 | | 01b4 0c60 6003 | `` | 01b6 64e0 0803 |d | 01b8 4403 6004 |D ` | 01ba 0404 0000 | | 01bc 0000 0000 | | 01be 0035 2000 | 5 | 01c0 1000 0f80 | | 01c2 046c bf88 | l | 01c4 ac0c 8b97 | | 01c6 f803 64e0 | d | 01c8 0397 f403 | | 01ca 64e0 0797 |d | 01cc f003 64e0 | d | 01ce 0b97 ecf0 | | 01d0 05a0 a797 | | 01d2 f83c 05a0 | < | 01d4 9b97 f030 | 0| 01d6 09c0 1397 | | 01d8 fc07 6c3c | l<| 01da 01e0 0520 | | 01dc 05a0 7520 | u | 01de 0397 ece0 | | 01e0 0797 ed20 | | 01e2 0520 0520 | | 01e4 0797 ecf0 | | 01e6 1209 8b97 | | 01e8 ecf0 0a09 | | 01ea 7f97 ecf0 | | 01ec 0a09 7b80 | { | 01ee 206c 4460 | lD`| 01f0 3520 0797 |5 | 01f2 ecf0 1008 | | 01f4 5cd0 2780 |\ ' | 01f6 206c 4460 | lD`| 01f8 4209 9403 |B | 01fa 4797 ecf0 |G | 01fc 0028 0797 | ( | 01fe ece0 0397 | |