|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c8f4
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 00b8 | | .CONST 0x00b8 ; 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 001f | | .CONST 0x001f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000a | | .CONST 0x000a ; Number of locals 000b INIT_0008: 000b e039 | 9 | Load 0x0,0x39 000c 0322 | " | Declare_Variable Record 000d e00e | | Load 0x0,0xe 000e 0322 | " | Declare_Variable Record 000f 00d8 | | Load_Top At_Offset_0 0010 1c00 | | Execute_Immediate Run_Utility,0x0 0011 00e3 | | Load_Encached Natural_Cache 0012 e7ff | | Load 0x3,-0x1 0013 803a | : | Call 0x0,0x3a 0014 4801 |H | Short_Literal 0x1 0015 e7ff | | Load 0x3,-0x1 0016 803b | ; | Call 0x0,0x3b 0017 4801 |H | Short_Literal 0x1 0018 e7ff | | Load 0x3,-0x1 0019 803c | < | Call 0x0,0x3c 001a 4801 |H | Short_Literal 0x1 001b e7ff | | Load 0x3,-0x1 001c 803d | = | Call 0x0,0x3d 001d 00e3 | | Load_Encached Natural_Cache 001e 00e3 | | Load_Encached Natural_Cache 001f BODY_0008: 001f e7ff | | Load 0x3,-0x1 0020 e603 | | Load 0x3,0x3 0021 017d | } | Execute Record,Structure_Write 0022 e7ff | | Load 0x3,-0x1 0023 803e | > | Call 0x0,0x3e 0024 a604 | | Store_Unchecked 0x3,0x4 0025 e604 | | Load 0x3,0x4 0026 0c01 | | Execute_Immediate Greater_Equal,0x1 0027 687a |hz | Jump_Zero 0xa2 0028 4800 |H | Short_Literal 0x0 0029 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 002a 00da | | Load_Top At_Offset_2 002b e606 | | Load 0x3,0x6 002c e607 | | Load 0x3,0x7 002d e605 | | Load 0x3,0x5 002e 803f | ? | Call 0x0,0x3f 002f e602 | | Load 0x3,0x2 0030 017d | } | Execute Record,Structure_Write 0031 00da | | Load_Top At_Offset_2 0032 e606 | | Load 0x3,0x6 0033 e607 | | Load 0x3,0x7 0034 e605 | | Load 0x3,0x5 0035 e602 | | Load 0x3,0x2 0036 8040 | @ | Call 0x0,0x40 0037 705f |p_ | Jump_Nonzero 0x97 0038 e604 | | Load 0x3,0x4 0039 0f01 | | Execute_Immediate Equal,0x1 003a 6808 |h | Jump_Zero 0x43 003b 00da | | Load_Top At_Offset_2 003c e606 | | Load 0x3,0x6 003d e607 | | Load 0x3,0x7 003e e605 | | Load 0x3,0x5 003f e602 | | Load 0x3,0x2 0040 8041 | A | Call 0x0,0x41 0041 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0042 7854 |xT | Jump 0x97 0043 00cf | | Action Mark_Auxiliary 0044 00db | | Load_Top At_Offset_3 0045 e606 | | Load 0x3,0x6 0046 e607 | | Load 0x3,0x7 0047 e605 | | Load 0x3,0x5 0048 e602 | | Load 0x3,0x2 0049 8041 | A | Call 0x0,0x41 004a 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 004b 0092 00ab | | Action Push_String_Extended,0xab ; "behavior_id : " 004d 00db | | Load_Top At_Offset_3 004e 00e0 | | Load_Encached Standard_Cache 004f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0050 01cc | | Execute Vector,Catenate 0051 e031 | 1 | Load 0x0,0x31 0052 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0053 00cf | | Action Mark_Auxiliary 0054 e604 | | Load 0x3,0x4 0055 4802 |H | Short_Literal 0x2 0056 0263 | c | Execute Discrete,Above_Bound 0057 703b |p; | Jump_Nonzero 0x93 0058 e609 | | Load 0x3,0x9 0059 00d9 | | Load_Top At_Offset_1 005a 00d8 | | Load_Top At_Offset_0 005b e042 | B | Load 0x0,0x42 005c 0260 | ` | Execute Discrete,In_Type 005d 7001 |p | Jump_Nonzero 0x5f 005e 0801 | | Execute_Immediate Raise,0x1 005f e7ff | | Load 0x3,-0x1 0060 803d | = | Call 0x0,0x3d 0061 00da | | Load_Top At_Offset_2 0062 00d8 | | Load_Top At_Offset_0 0063 e042 | B | Load 0x0,0x42 0064 0260 | ` | Execute Discrete,In_Type 0065 7001 |p | Jump_Nonzero 0x67 0066 0801 | | Execute_Immediate Raise,0x1 0067 e7ff | | Load 0x3,-0x1 0068 803b | ; | Call 0x0,0x3b 0069 00db | | Load_Top At_Offset_3 006a 00d8 | | Load_Top At_Offset_0 006b e042 | B | Load 0x0,0x42 006c 0260 | ` | Execute Discrete,In_Type 006d 7001 |p | Jump_Nonzero 0x6f 006e 0801 | | Execute_Immediate Raise,0x1 006f e7ff | | Load 0x3,-0x1 0070 803c | < | Call 0x0,0x3c 0071 e605 | | Load 0x3,0x5 0072 8043 | C | Call 0x0,0x43 0073 6809 |h | Jump_Zero 0x7d 0074 00d8 | | Load_Top At_Offset_0 0075 e604 | | Load 0x3,0x4 0076 027f | | Execute Discrete,Equal 0077 6819 |h | Jump_Zero 0x91 0078 e609 | | Load 0x3,0x9 0079 a60a | | Store_Unchecked 0x3,0xa 007a 00d2 | | Pop_Control Pop_Count_2 007b 00ce | | Action Pop_Auxiliary 007c 7819 |x | Jump 0x96 007d e608 | | Load 0x3,0x8 007e e606 | | Load 0x3,0x6 007f e607 | | Load 0x3,0x7 0080 e605 | | Load 0x3,0x5 0081 e602 | | Load 0x3,0x2 0082 8044 | D | Call 0x0,0x44 0083 e602 | | Load 0x3,0x2 0084 017d | } | Execute Record,Structure_Write 0085 e608 | | Load 0x3,0x8 0086 e606 | | Load 0x3,0x6 0087 e607 | | Load 0x3,0x7 0088 e605 | | Load 0x3,0x5 0089 e602 | | Load 0x3,0x2 008a 8040 | @ | Call 0x0,0x40 008b 6803 |h | Jump_Zero 0x8f 008c 00d2 | | Pop_Control Pop_Count_2 008d 00ce | | Action Pop_Auxiliary 008e 7807 |x | Jump 0x96 008f 00d2 | | Pop_Control Pop_Count_2 0090 7802 |x | Jump 0x93 0091 00c8 | | Action Pop_Auxiliary_Range 0092 3fc5 |? | Loop_Increasing 0x58 0093 00ce | | Action Pop_Auxiliary 0094 00c9 | | Action Pop_Auxiliary_Loop 0095 7fae | | Jump 0x44 0096 00ce | | Action Pop_Auxiliary 0097 00d8 | | Load_Top At_Offset_0 0098 e7ff | | Load 0x3,-0x1 0099 8011 | | Call 0x0,0x11 009a e7ff | | Load 0x3,-0x1 009b 8007 | | Call 0x0,0x7 009c e7ff | | Load 0x3,-0x1 009d 8045 | E | Call 0x0,0x45 009e 8046 | F | Call 0x0,0x46 009f e603 | | Load 0x3,0x3 00a0 017d | } | Execute Record,Structure_Write 00a1 7804 |x | Jump 0xa6 00a2 e603 | | Load 0x3,0x3 00a3 4803 |H | Short_Literal 0x3 00a4 8017 | | Call 0x0,0x17 00a5 00d1 | | Pop_Control Pop_Count_1 00a6 e7ff | | Load 0x3,-0x1 00a7 8007 | | Call 0x0,0x7 00a8 e603 | | Load 0x3,0x3 00a9 8214 | | Call 0x1,0x14 00aa 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00ab ; -------------------------------------------------------------------------------------- 00ab ; STRING TABLE 00ab ; -------------------------------------------------------------------------------------- 00ab 0004 | | .STRTAB 0x0004->0x00ad ; "behavior_id : " 00ac 0010 | | .STREND 0x0010->0x00b4 00ad 6265 6861 |beha| .STRTAB_STRINGS 00b4 0000 0000 | | .BLANK 0000[0x4] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; Debug Table 00b8 ; -------------------------------------------------------------------------------------- 00b8 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd4d1,0x0000,0x0001,0x0000 00be c9e0 | | .XXX[0x1] 00bf 0000 0000 | | .BLANK 0000[0x5] 00c4 0090 0002 | | .XXX[0x68] 00c6 9a10 3dd2 | = | 00c8 8030 3dd2 | 0= | 00ca 7620 3dd3 |v = | 00cc 7c18 1ee9 || | 00ce 6880 001e |h | 00d0 a5c2 03dd | | 00d2 2d50 03dd |-P | 00d4 2ea3 0001 |. | 00d6 da28 0131 | ( 1| 00d8 307a 0000 |0z | 00da 0000 07ba | | 00dc 5fec 0000 |_ | 00de 0000 07ba | | 00e0 61ec 000c |a | 00e2 bdc0 0200 | | 00e4 01da 2408 | $ | 00e6 4085 c000 |@ | 00e8 8000 3b44 | ;D| 00ea 8000 3b45 | ;E| 00ec 0026 260f | && | 00ee 4000 0000 |@ | 00f0 00f7 4c7d | L}| 00f2 c000 0000 | | 00f4 0000 0000 | | 00f6 0001 97b8 | | 00f8 0040 003b | @ ;| 00fa 4481 0810 |D | 00fc b800 0c00 | | 00fe 0768 900f | h | 0100 74c1 dc00 |t | 0102 0000 0000 | | 0104 0000 0800 | | 0106 0000 0000 | | 0108 0000 0400 | | 010a 197b 8000 | { | 010c 0000 0000 | | 010e 0000 000f | | 0110 74c5 dc00 |t | 0112 0000 0000 | | 0114 0000 0800 | | 0116 0000 0000 | | 0118 1050 7600 | Pv | 011a 03b7 e000 | | 011c 0000 0000 | | 011e 0000 0007 | | 0120 ba64 f000 | d | 0122 0000 0000 | | 0124 0000 0400 | | 0126 0000 0000 | | 0128 0000 0200 | | 012a 0cbd c000 | | 012c 0000 0000 | | .BLANK 0000[0x5] 0131 1200 01da | | .XXX[0x19] 0133 2807 ba59 |( Y| 0135 9a00 0000 | | 0137 0000 0000 | | 0139 0003 dd33 | 3| 013b db00 03eb | | 013d 5d60 7ba6 |]`{ | 013f 8360 7ba6 | `{ | 0141 adc0 009c | | 0143 fe80 020a | | 0145 0ec0 0000 | | 0147 0000 f74d | M| 0149 b040 | @ | 014a 0000 0000 | | .BLANK 0000[0x4] 014e 00ae e780 | | .XXX[0x9] 0150 4000 9cc5 |@ | 0152 4b00 10a8 |K | 0154 001c 0013 | | 0156 9568 | h | 0157 0000 0000 | | .BLANK 0000[0xe] 0165 0800 0000 | | .XXX[0xd] 0167 0000 0000 | | 0169 0003 8000 | | 016b 0000 01ee | | 016d 9ba1 0000 | | 016f 0000 0000 | | 0171 0001 | | 0172 0000 0000 | | .BLANK 0000[0x4] 0176 8001 5dcf | ] | .XXX[0x2] 0178 0000 0000 | | .BLANK 0000[0x5] 017d 0004 8001 | | .XXX[0x2f] 017f 39fd 01ee |9 | 0181 99cc 01ee | | 0183 997b 81ee | { | 0185 9ec5 80f7 | | 0187 4e29 4002 |N)@ | 0189 20cc 081e | | 018b e9c7 281e | ( | 018d e9d1 c000 | | 018f 2c22 801d |," | 0191 5c8e c000 |\ | 0193 0000 003d | =| 0195 d3b8 b000 | | 0197 0000 0000 | | 0199 0000 0001 | | 019b 328e 8010 |2 | 019d 002c 1d20 | , | 019f 4204 2e00 |B . | 01a1 0400 0583 | | 01a3 a400 0584 | | 01a5 5003 ab91 |P | 01a7 d800 0000 | | 01a9 0007 ba79 | y| 01ab 1600 | | 01ac 0000 0000 | | .BLANK 0000[0x4] 01b0 2651 d002 |&Q | .XXX[0x15] 01b2 0005 83a4 | | 01b4 0840 85c0 | @ | 01b6 0060 00b0 | ` | 01b8 7480 7ba7 |t { | 01ba 8180 0000 | | 01bc 0000 0000 | | 01be 0040 0000 | @ | 01c0 0000 0000 | | 01c2 0020 0265 | e| 01c4 1d00 | | 01c5 0000 0000 | | .BLANK 0000[0x4] 01c9 7ba7 a180 |{ | .XXX[0xc] 01cb 0000 0000 | | 01cd 0000 0040 | @| 01cf 0000 0000 | | 01d1 0000 0020 | | 01d3 0265 1d00 | e | 01d5 0000 0000 | | .BLANK 0000[0x5] 01da 0120 0058 | X| .XXX[0x5] 01dc 4500 7ba7 |E { | 01de 0c40 | @ | 01df 0000 0000 | | .BLANK 0000[0x4] 01e3 3dd3 e6f0 |= | .XXX[0x10] 01e5 0000 7fe0 | | 01e7 07ba 7d5e | }^| 01e9 07ba 8004 | | 01eb 0000 0a2c | ,| 01ed 00eb 863c | <| 01ef 0000 0000 | | 01f1 0f75 0554 | u T| 01f3 0000 0000 | | .BLANK 0000[0x5] 01f8 02d0 0400 | | .XXX[0x8] 01fa 0000 a8b0 | | 01fc 0100 0001 | | 01fe c000 000c | |