|
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_03bcfe
└─⟦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 0040 | @ | .CONST 0x0040 ; 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 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b e5ff | | Load 0x2,-0x1 001c 7010 |p | Jump_Nonzero 0x2d 001d e5fe | | Load 0x2,-0x2 001e 6807 |h | Jump_Zero 0x26 001f 4800 |H | Short_Literal 0x0 0020 4800 |H | Short_Literal 0x0 0021 e002 | | Load 0x0,0x2 0022 180e | | Execute Package,Field_Execute,Field_Number 0xe 0023 e003 | | Load 0x0,0x3 0024 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0025 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0026 4801 |H | Short_Literal 0x1 0027 4800 |H | Short_Literal 0x0 0028 e002 | | Load 0x0,0x2 0029 180e | | Execute Package,Field_Execute,Field_Number 0xe 002a e003 | | Load 0x0,0x3 002b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 002c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 002d 4801 |H | Short_Literal 0x1 002e 4800 |H | Short_Literal 0x0 002f e5ff | | Load 0x2,-0x1 0030 00d8 | | Load_Top At_Offset_0 0031 e004 | | Load 0x0,0x4 0032 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0033 0260 | ` | Execute Discrete,In_Type 0034 7001 |p | Jump_Nonzero 0x36 0035 0801 | | Execute_Immediate Raise,0x1 0036 e002 | | Load 0x0,0x2 0037 180d | | Execute Package,Field_Execute,Field_Number 0xd 0038 e003 | | Load 0x0,0x3 0039 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 003a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 003b 0000 0000 | | .BLANK 0000[0x5] 0040 ; -------------------------------------------------------------------------------------- 0040 ; Debug Table 0040 ; -------------------------------------------------------------------------------------- 0040 0004 0010 | | .DEBUG4 0x0004,0x0010,0xd9b2,0x0000,0x0001,0x0000 0046 01cc 80e0 | | .XXX[0x1b6] 0048 005a 324a | Z2J| 004a c22a 22fa | *" | 004c 1a7a aa72 | z r| 004e a330 b801 | 0 | 0050 126a 4a1a | jJ | 0052 927a 1a7a | z z| 0054 222a faa2 |"* | 0056 ca82 2a99 | * | 0058 7292 2a1a |r * | 005a 7a92 22fa |z " | 005c 324a 2a62 |2J*b| 005e 22fa 4a72 |" Jr| 0060 222a c000 |"* | 0062 01cc 80e0 | | 0064 006a b20a | j | 0066 924a 0a72 | J r| 0068 a2fa 1a7a | z| 006a aa72 a330 | r 0| 006c b801 126a | j| 006e 4a1a 927a |J z| 0070 1a7a 222a | z"*| 0072 faa2 ca82 | | 0074 2a99 7292 |* r | 0076 2a1a 7a92 |* z | 0078 22fa 324a |" 2J| 007a 2a62 22fa |*b" | 007c 4a72 222a |Jr"*| 007e c000 01cc | | 0080 80e0 0052 | R| 0082 324a c22a |2J *| 0084 22fa 9a4a |" J| 0086 d22b 30b8 | +0 | 0088 00ca 6a4a | jJ| 008a 1a92 7a1a | z | 008c 7a22 2afa |z"* | 008e a2ca 822a | *| 0090 9972 124a | r J| 0092 a2fa 1a7a | z| 0094 aa72 a000 | r | 0096 0000 0000 | | 0098 1244 0800 | D | 009a 0015 a000 | | 009c 0000 1000 | | 009e 0022 e002 | " | 00a0 84d4 9435 | 5| 00a2 24f4 34f4 |$ 4 | 00a4 4455 f545 |DU E| 00a6 9504 5532 | U2| 00a8 e4d4 9534 | 4| 00aa 3454 c4c4 |4T | 00ac 14e4 54f5 | T | 00ae 5535 f535 |U5 5| 00b0 4415 4455 |D DU| 00b2 f545 9504 | E | 00b4 53b9 9723 |S #| 00b6 9901 c000 | | 00b8 e545 f4c4 | E | 00ba f4f5 05f4 | | 00bc 34f5 54e5 |4 T | 00be 4455 2661 |DU&a| 00c0 7002 34d4 |p 4 | 00c2 9435 24f4 | 5$ | 00c4 34f4 4455 |4 DU| 00c6 f545 9504 | E | 00c8 5532 e4e4 |U2 | 00ca 1545 5524 | EU$| 00cc 14c5 32e4 | 2 | 00ce e415 4555 | EU| 00d0 2414 c5f3 |$ | 00d2 1300 0003 | | 00d4 9901 c000 | | 00d6 e565 f4c4 | e | 00d8 f4f5 05f4 | | 00da 34f5 54e5 |4 T | 00dc 4455 2661 |DU&a| 00de 7002 34d4 |p 4 | 00e0 9435 24f4 | 5$ | 00e2 34f4 4455 |4 DU| 00e4 f545 9504 | E | 00e6 5532 e4e4 |U2 | 00e8 1545 5524 | EU$| 00ea 14c5 32e4 | 2 | 00ec e415 4555 | EU| 00ee 2414 c5f3 |$ | 00f0 1300 0003 | | 00f2 9901 c001 | | 00f4 3435 5525 |45U%| 00f6 2454 e545 |$T E| 00f8 f494 e535 | 5| 00fa 4525 5435 |E%T5| 00fc 4494 f4e6 |D | 00fe 6170 0214 |ap | 0100 d494 3524 | 5$| 0102 f434 f444 | 4 D| 0104 55f5 4595 |U E | 0106 0455 32e4 | U2 | 0108 94e5 3545 | 5E| 010a 2554 3544 |%T5D| 010c 94f4 e5f5 | | 010e 6414 c554 |d T| 0110 5000 0399 |P | 0112 01c0 00c4 | | 0114 6494 c4c4 |d | 0116 5525 f333 |U% 3| 0118 65f3 3366 |e 3f| 011a 6170 0224 |ap $| 011c d494 3524 | 5$| 011e f434 f444 | 4 D| 0120 55f5 4595 |U E | 0122 0455 32e4 | U2 | 0124 e415 4555 | EU| 0126 2414 c532 |$ 2| 0128 e4e4 1545 | E| 012a 5524 14c5 |U$ | 012c f310 0003 | | 012e 9901 c000 | | 0130 f534 5515 | 4U | 0132 f534 1564 | 4 d| 0134 55f4 f464 |U d| 0136 6534 5546 |e4UF| 0138 6170 0244 |ap D| 013a d494 3524 | 5$| 013c f434 f444 | 4 D| 013e 55f5 4595 |U E | 0140 0455 32e4 | U2 | 0142 34f4 e545 |4 E| 0144 24f4 c5f4 |$ | 0146 4495 3504 |D 5 | 0148 c414 3454 | 4T| 014a d454 e540 | T @| 014c 0003 9901 | | 014e c000 c464 | d| 0150 94c4 c455 | U| 0152 25f3 5375 |% Su| 0154 f353 7661 | Sva| 0156 7002 24d4 |p $ | 0158 9435 24f4 | 5$ | 015a 34f4 4455 |4 DU| 015c f545 9504 | E | 015e 5532 e4e4 |U2 | 0160 1545 5524 | EU$| 0162 14c5 32e4 | 2 | 0164 e415 4555 | EU| 0166 2414 c5f3 |$ | 0168 1000 0399 | | 016a 01c0 0134 | 4| 016c 3555 2524 |5U%$| 016e 54e5 45f4 |T E | 0170 c455 85f4 | U | 0172 94e5 6414 | d | 0174 c494 4661 | Fa| 0176 7001 0535 |p 5| 0178 4414 e444 |D D| 017a 1524 42e4 | $B | 017c 24f4 f4c4 |$ | 017e 5414 e000 |T | 0180 0399 01c0 | | 0182 0154 54e4 | TT | 0184 34c4 f534 |4 4| 0186 94e4 75f4 | u | 0188 c455 85f4 | U | 018a 94e5 6414 | d | 018c c494 4661 | Fa| 018e 7001 0535 |p 5| 0190 4414 e444 |D D| 0192 1524 42e4 | $B | 0194 24f4 f4c4 |$ | 0196 5414 e000 |T | 0198 0399 01c0 | | 019a 00d4 e554 | T| 019c d424 5525 | $U%| 019e f494 e5f4 | | 01a0 3534 1661 |54 a| 01a2 7002 24d4 |p $ | 01a4 9435 24f4 | 5$ | 01a6 34f4 4455 |4 DU| 01a8 f545 9504 | E | 01aa 5532 e4e4 |U2 | 01ac 1545 5524 | EU$| 01ae 14c5 32e4 | 2 | 01b0 e415 4555 | EU| 01b2 2414 c5f3 |$ | 01b4 4000 0000 |@ | 01b6 0000 24f1 | $ | 01b8 8000 002d | -| 01ba 2000 0000 | | 01bc 2000 000f | | 01be e002 89a9 | | 01c0 286a 49e8 |(jI | 01c2 69e8 88ab |i | 01c4 ea8b 2a08 | * | 01c6 aa65 c8c9 | e | 01c8 ea49 a773 | I s| 01ca 2e47 3203 |.G2 | 01cc 8001 0a8b | | 01ce 2a0b ea08 |* | 01d0 2a4a 8cc2 |*J | 01d2 e004 09a9 | | 01d4 286a 49e8 |(jI | 01d6 69e8 88ab |i | 01d8 ea8b 2a08 | * | 01da aa65 ca88 | e | 01dc 28e8 e8a8 |( | 01de 8bea 8b2a | *| 01e0 08ab e989 | | 01e2 29c9 6000 |) ` | 01e4 0732 0380 | 2 | 01e6 010a c829 | )| 01e8 8bea 082a | *| 01ea 4a8c c2e0 |J | 01ec 03c9 a928 | (| 01ee 6a49 e869 |jI i| 01f0 e888 abea | | 01f2 8b2a 08aa | * | 01f4 65c8 892a |e *| 01f6 686a 48aa |hjH | 01f8 88ab eac8 | | 01fa 298a a8a0 |) | 01fc 0000 0000 | | .BLANK 0000[0x4]