|
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 0088 | | .CONST 0x0088 ; 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 002a | * | .CONST 0x002a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000e | | .CONST 0x000e ; Number of locals
000b INIT_0008:
000b e214 | | Load 0x1,0x14
000c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
000d e214 | | Load 0x1,0x14
000e 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
000f e214 | | Load 0x1,0x14
0010 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0011 00e1 | | Load_Encached Boolean_Cache
0012 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0013 0007 | | Action Break_Optional
0014 0007 | | Action Break_Optional
0015 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call
0017 029f 005b | [| Declare_Subprogram INIT_0058,For_Call
0019 e013 | | Load 0x0,0x13
001a 1916 | | Execute Package,Field_Reference,Field_Number 0x16
001b 00c6 | | Action Check_Subprogram_Elaborated
001c 4806 |H | Short_Literal 0x6
001d 4802 |H | Short_Literal 0x2
001e 0099 | | Action Reference_Dynamic
001f 4807 |H | Short_Literal 0x7
0020 4802 |H | Short_Literal 0x2
0021 0099 | | Action Reference_Dynamic
0022 e019 | | Load 0x0,0x19
0023 e01a | | Load 0x0,0x1a
0024 480c |H | Short_Literal 0xc
0025 0007 | | Action Break_Optional
0026 e01b | | Load 0x0,0x1b
0027 02ab | | Declare_Subprogram For_Call,With_Address
0028 e01c | | Load 0x0,0x1c
0029 02ab | | Declare_Subprogram For_Call,With_Address
002a BODY_0008:
002a e214 | | Load 0x1,0x14
002b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
002c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
002d e011 | | Load 0x0,0x11
002e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
002f e018 | | Load 0x0,0x18
0030 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0031 e214 | | Load 0x1,0x14
0032 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0033 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0034 c402 | | Store 0x2,0x2
0035 e214 | | Load 0x1,0x14
0036 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0037 e214 | | Load 0x1,0x14
0038 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0039 c403 | | Store 0x2,0x3
003a e5ff | | Load 0x2,-0x1
003b 840d | | Call 0x2,0xd
003c e214 | | Load 0x1,0x14
003d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
003e e403 | | Load 0x2,0x3
003f e214 | | Load 0x1,0x14
0040 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0041 c404 | | Store 0x2,0x4
0042 e5fb | | Load 0x2,-0x5
0043 e5fc | | Load 0x2,-0x4
0044 e5fd | | Load 0x2,-0x3
0045 e5fe | | Load 0x2,-0x2
0046 e404 | | Load 0x2,0x4
0047 840e | | Call 0x2,0xe
0048 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0049 0000 0000 | | .BLANK 0000[0x7]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053 | S | .CONST 0x0053 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0001 | | .CONST 0x0001 ; Number of locals
0053 BODY_0050:
0053 INIT_0050:
0053 00da | | Load_Top At_Offset_2
0054 e402 | | Load 0x2,0x2
0055 e214 | | Load 0x1,0x14
0056 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0057 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
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 00da | | Load_Top At_Offset_2
005c 8213 | | Call 0x1,0x13
005d e405 | | Load 0x2,0x5
005e 6811 |h | Jump_Zero 0x70
005f e00e | | Load 0x0,0xe
0060 180e | | Execute Package,Field_Execute,Field_Number 0xe
0061 4800 |H | Short_Literal 0x0
0062 e7fe | | Load 0x3,-0x2
0063 e008 | | Load 0x0,0x8
0064 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0065 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
0066 0092 007b | {| Action Push_String_Extended,0x7b ; " depends upon "
0068 01cc | | Execute Vector,Catenate
0069 e7ff | | Load 0x3,-0x1
006a e008 | | Load 0x0,0x8
006b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
006c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
006d 01cc | | Execute Vector,Catenate
006e e00f | | Load 0x0,0xf
006f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0070 00db | | Load_Top At_Offset_3
0071 00db | | Load_Top At_Offset_3
0072 e403 | | Load 0x2,0x3
0073 e214 | | Load 0x1,0x14
0074 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0075 e402 | | Load 0x2,0x2
0076 00db | | Load_Top At_Offset_3
0077 e214 | | Load 0x1,0x14
0078 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0079 c402 | | Store 0x2,0x2
007a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
007b ; --------------------------------------------------------------------------------------
007b ; STRING TABLE
007b ; --------------------------------------------------------------------------------------
007b 0004 | | .STRTAB 0x0004->0x007d ; " depends upon "
007c 0010 | | .STREND 0x0010->0x0084
007d 2064 6570 | dep| .STRTAB_STRINGS
0084 0000 0000 | | .BLANK 0000[0x4]
0088 ; --------------------------------------------------------------------------------------
0088 ; Debug Table
0088 ; --------------------------------------------------------------------------------------
0088 0004 000c | | .DEBUG4 0x0004,0x000c,0x4229,0x0000,0x0001,0x0000
008e 4fff fc23 |O #| .XXX[0x126]
0090 57ff f823 |W #|
0092 5fff f423 |_ #|
0094 67ff f023 |g #|
0096 6c00 0423 |l #|
0098 7800 0823 |x #|
009a 8400 0c23 | #|
009c 9400 1423 | #|
009e a800 1823 | #|
00a0 d000 1c23 | #|
00a2 e400 2023 | #|
00a4 ec00 2423 | $#|
00a6 f800 2824 | ($|
00a8 0800 2c24 | ,$|
00aa 1000 3024 | 0$|
00ac 2400 1024 |$ $|
00ae 3000 3400 |0 4 |
00b0 1800 0c24 | $|
00b2 4fff fc24 |O $|
00b4 57ff f824 |W $|
00b6 5fff f424 |_ $|
00b8 67ff f024 |g $|
00ba 7bff ec24 |{ $|
00bc 8fff e824 | $|
00be 9c00 0424 | $|
00c0 b000 0824 | $|
00c2 e000 0c00 | |
00c4 0400 0825 | %|
00c6 0fff fc25 | %|
00c8 1c00 0425 | %|
00ca 3000 0800 |0 |
00cc 0800 2425 | $%|
00ce 4fff fc25 |O %|
00d0 67ff f825 |g %|
00d2 7800 0425 |x %|
00d4 8800 0825 | %|
00d6 9800 0c25 | %|
00d8 b800 1025 | %|
00da dc00 1425 | %|
00dc fc00 1826 | &|
00de 1800 1c26 | &|
00e0 3400 2026 |4 &|
00e2 5000 2400 |P $ |
00e4 0400 0826 | &|
00e6 6fff fc26 |o &|
00e8 7c00 0426 || &|
00ea a000 0800 | |
00ec 0400 0826 | &|
00ee cfff fc26 | &|
00f0 d400 0427 | '|
00f2 3000 0800 |0 |
00f4 0400 c827 | '|
00f6 8fff fc27 | '|
00f8 9800 0427 | '|
00fa c800 0827 | '|
00fc d800 0c27 | '|
00fe e800 1028 | (|
0100 1000 1428 | (|
0102 3800 1828 |8 (|
0104 6400 1c28 |d (|
0106 7800 2028 |x (|
0108 a000 2428 | $(|
010a bc00 2828 | ((|
010c d800 2c28 | ,(|
010e f400 3029 | 0)|
0110 0400 3429 | 4)|
0112 1400 3829 | 8)|
0114 2c00 3c29 |, <)|
0116 4000 4029 |@ @)|
0118 5800 4429 |X D)|
011a 6400 4829 |d H)|
011c 7c00 4c29 || L)|
011e a400 5029 | P)|
0120 b000 5429 | T)|
0122 d000 5829 | X)|
0124 d800 5c2a | \*|
0126 2c00 602a |, `*|
0128 4000 642a |@ d*|
012a 6400 682a |d h*|
012c 8000 6c2a | l*|
012e 9000 702a | p*|
0130 b000 742a | t*|
0132 c000 782a | x*|
0134 d400 7c2a | |*|
0136 e800 802a | *|
0138 f800 842b | +|
013a 0800 882b | +|
013c 1c00 8c2b | +|
013e 2c00 902b |, +|
0140 4400 942b |D +|
0142 5800 982b |X +|
0144 6800 9c2b |h +|
0146 7800 a02b |x +|
0148 8800 a42b | +|
014a a000 a82b | +|
014c b000 ac2b | +|
014e c800 b02b | +|
0150 d400 b42b | +|
0152 f400 b82b | +|
0154 fc00 bc2c | ,|
0156 5000 c02c |P ,|
0158 6400 c42c |d ,|
015a 8800 c800 | |
015c 0400 082c | ,|
015e cfff fc2c | ,|
0160 e000 042d | -|
0162 1000 0800 | |
0164 0000 082d | -|
0166 2c00 042d |, -|
0168 a000 0800 | |
016a 0000 082d | -|
016c cc00 042e | .|
016e 4400 0800 |D |
0170 0400 002e | .|
0172 6fff fc00 |o |
0174 2000 042e | .|
0176 7bff fc2e |{ .|
0178 9bff f82e | .|
017a a3ff f42e | .|
017c abff f02e | .|
017e b3ff ec2e | .|
0180 bbff e82e | .|
0182 c3ff e42e | .|
0184 e7ff e02e | .|
0186 ec00 0400 | |
0188 0000 042f | /|
018a 2c00 0400 |, |
018c 0000 182f | /|
018e 6c00 042f |l /|
0190 8000 082f | /|
0192 9400 0c2f | /|
0194 9c00 102f | /|
0196 ac00 142f | /|
0198 c400 1800 | |
019a 0400 142f | /|
019c efff fc2f | /|
019e f400 0430 | 0|
01a0 0400 0c30 | 0|
01a2 1400 1030 | 0|
01a4 2400 1430 |$ 0|
01a6 3800 0800 |8 |
01a8 0400 1030 | 0|
01aa 6fff fc30 |o 0|
01ac 7400 0430 |t 0|
01ae 8400 0830 | 0|
01b0 8c00 0c30 | 0|
01b2 d400 1000 | |
01b4 0000 0000 | | .BLANK 0000[0x4c]