|
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 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 0015 | | .CONST 0x0015 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0008 | | .CONST 0x0008 ; Number of locals
000b INIT_0008:
000b 00e3 | | Load_Encached Natural_Cache
000c 00e3 | | Load_Encached Natural_Cache
000d 00e3 | | Load_Encached Natural_Cache
000e 00e3 | | Load_Encached Natural_Cache
000f 00e3 | | Load_Encached Natural_Cache
0010 00e3 | | Load_Encached Natural_Cache
0011 e00e | | Load 0x0,0xe
0012 0322 | " | Declare_Variable Record
0013 00d8 | | Load_Top At_Offset_0
0014 1c00 | | Execute_Immediate Run_Utility,0x0
0015 BODY_0008:
0015 e7ff | | Load 0x3,-0x1
0016 801b | | Call 0x0,0x1b
0017 a602 | | Store_Unchecked 0x3,0x2
0018 e7ff | | Load 0x3,-0x1
0019 801c | | Call 0x0,0x1c
001a a603 | | Store_Unchecked 0x3,0x3
001b e7ff | | Load 0x3,-0x1
001c 8006 | | Call 0x0,0x6
001d a604 | | Store_Unchecked 0x3,0x4
001e e7ff | | Load 0x3,-0x1
001f 801d | | Call 0x0,0x1d
0020 a605 | | Store_Unchecked 0x3,0x5
0021 e7ff | | Load 0x3,-0x1
0022 00d9 | | Load_Top At_Offset_1
0023 017d | } | Execute Record,Structure_Write
0024 00d8 | | Load_Top At_Offset_0
0025 e603 | | Load 0x3,0x3
0026 801e | | Call 0x0,0x1e
0027 00d1 | | Pop_Control Pop_Count_1
0028 00d8 | | Load_Top At_Offset_0
0029 e602 | | Load 0x3,0x2
002a 8016 | | Call 0x0,0x16
002b 00d1 | | Pop_Control Pop_Count_1
002c 00db | | Load_Top At_Offset_3
002d e603 | | Load 0x3,0x3
002e 027f | | Execute Discrete,Equal
002f 6832 |h2 | Jump_Zero 0x62
0030 e604 | | Load 0x3,0x4
0031 8018 | | Call 0x0,0x18
0032 680d |h | Jump_Zero 0x40
0033 e604 | | Load 0x3,0x4
0034 8019 | | Call 0x0,0x19
0035 a604 | | Store_Unchecked 0x3,0x4
0036 e603 | | Load 0x3,0x3
0037 e604 | | Load 0x3,0x4
0038 00da | | Load_Top At_Offset_2
0039 801f | | Call 0x0,0x1f
003a 00d9 | | Load_Top At_Offset_1
003b 017d | } | Execute Record,Structure_Write
003c e604 | | Load 0x3,0x4
003d 00d9 | | Load_Top At_Offset_1
003e 8214 | | Call 0x1,0x14
003f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0040 e602 | | Load 0x3,0x2
0041 8018 | | Call 0x0,0x18
0042 6817 |h | Jump_Zero 0x5a
0043 e602 | | Load 0x3,0x2
0044 8019 | | Call 0x0,0x19
0045 a604 | | Store_Unchecked 0x3,0x4
0046 00cf | | Action Mark_Auxiliary
0047 7804 |x | Jump 0x4c
0048 e604 | | Load 0x3,0x4
0049 8019 | | Call 0x0,0x19
004a a604 | | Store_Unchecked 0x3,0x4
004b 00c9 | | Action Pop_Auxiliary_Loop
004c e604 | | Load 0x3,0x4
004d 8018 | | Call 0x0,0x18
004e 77f9 |w | Jump_Nonzero 0x48
004f 00ce | | Action Pop_Auxiliary
0050 e602 | | Load 0x3,0x2
0051 e604 | | Load 0x3,0x4
0052 00da | | Load_Top At_Offset_2
0053 801f | | Call 0x0,0x1f
0054 00d9 | | Load_Top At_Offset_1
0055 017d | } | Execute Record,Structure_Write
0056 e604 | | Load 0x3,0x4
0057 00d9 | | Load_Top At_Offset_1
0058 8214 | | Call 0x1,0x14
0059 4502 |E | Exit_Suprogram New_Top_Offset 0x2
005a 00d8 | | Load_Top At_Offset_0
005b 8020 | | Call 0x0,0x20
005c 00d9 | | Load_Top At_Offset_1
005d 017d | } | Execute Record,Structure_Write
005e e602 | | Load 0x3,0x2
005f 00d9 | | Load_Top At_Offset_1
0060 8214 | | Call 0x1,0x14
0061 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0062 e602 | | Load 0x3,0x2
0063 8019 | | Call 0x0,0x19
0064 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0065 00da | | Load_Top At_Offset_2
0066 e604 | | Load 0x3,0x4
0067 027f | | Execute Discrete,Equal
0068 6808 |h | Jump_Zero 0x71
0069 00d8 | | Load_Top At_Offset_0
006a 8020 | | Call 0x0,0x20
006b 00d9 | | Load_Top At_Offset_1
006c 017d | } | Execute Record,Structure_Write
006d e602 | | Load 0x3,0x2
006e 00d9 | | Load_Top At_Offset_1
006f 8214 | | Call 0x1,0x14
0070 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0071 00da | | Load_Top At_Offset_2
0072 8019 | | Call 0x0,0x19
0073 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0074 00cf | | Action Mark_Auxiliary
0075 7806 |x | Jump 0x7c
0076 00da | | Load_Top At_Offset_2
0077 a606 | | Store_Unchecked 0x3,0x6
0078 00db | | Load_Top At_Offset_3
0079 8019 | | Call 0x0,0x19
007a 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
007b 00c9 | | Action Pop_Auxiliary_Loop
007c 00da | | Load_Top At_Offset_2
007d e604 | | Load 0x3,0x4
007e 027e | ~ | Execute Discrete,Not_Equal
007f 77f6 |w | Jump_Nonzero 0x76
0080 00ce | | Action Pop_Auxiliary
0081 e602 | | Load 0x3,0x2
0082 00db | | Load_Top At_Offset_3
0083 00da | | Load_Top At_Offset_2
0084 801f | | Call 0x0,0x1f
0085 00d9 | | Load_Top At_Offset_1
0086 017d | } | Execute Record,Structure_Write
0087 00da | | Load_Top At_Offset_2
0088 00d9 | | Load_Top At_Offset_1
0089 8214 | | Call 0x1,0x14
008a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
008b 0000 0000 | | .BLANK 0000[0x5]
0090 ; --------------------------------------------------------------------------------------
0090 ; Debug Table
0090 ; --------------------------------------------------------------------------------------
0090 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd1e1,0x0000,0x0001,0x0000
0096 482d 4000 |H-@ | .XXX[0x6]
0098 0000 4000 | @ |
009a 0000 4000 | @ |
009c 0000 0000 | | .BLANK 0000[0x6]
00a2 041c 2000 | | .XXX[0x2]
00a4 0000 0000 | | .BLANK 0000[0x7]
00ab 0008 0000 | | .XXX[0x3a]
00ad 0000 0000 | |
00af 0008 001d | |
00b1 a810 0ef9 | |
00b3 3760 0ef9 |7` |
00b5 3258 0ef9 |2X |
00b7 7b78 077c |{x ||
00b9 af04 0016 | |
00bb 2745 20e3 |'E |
00bd 5b0e 4262 |[ Bb|
00bf c000 0490 | |
00c1 fe63 0677 | c w|
00c3 1a20 0000 | |
00c5 2400 0000 |$ |
00c7 0000 0000 | |
00c9 001c b338 | 8|
00cb 8500 0000 | |
00cd 401c b33e |@ >|
00cf 8500 0000 | |
00d1 4000 0021 |@ !|
00d3 1bc3 9667 | g|
00d5 d0a0 0000 | |
00d7 0804 1c6b | k|
00d9 624f 6528 |bOe(|
00db 0000 9000 | |
00dd 0000 4800 | H |
00df 1244 1000 | D |
00e1 0000 1000 | |
00e3 0000 1000 | |
00e5 0000 0000 | | .BLANK 0000[0x6]
00eb 0107 0800 | | .XXX[0x2]
00ed 0000 0000 | | .BLANK 0000[0x7]
00f4 0002 0000 | | .XXX[0x9]
00f6 0000 0000 | |
00f8 0002 0007 | |
00fa 71e6 03be |q |
00fc 56fc |V |
00fd 0000 0000 | | .BLANK 0000[0x4]
0101 01df 3053 | 0S| .XXX[0x74]
0103 0008 1d25 | %|
0105 483c 1735 |H< 5|
0107 72b9 1000 |r |
0109 0234 3153 | 41S|
010b 359d 3970 |5 9p|
010d 0000 9000 | |
010f 0000 0000 | |
0111 0000 0008 | |
0113 3e3c a140 |>< @|
0115 0000 1008 | |
0117 3e3e a140 |>> @|
0119 0000 1000 | |
011b 000a 11b1 | |
011d 07c7 d428 | (|
011f 0000 0201 | |
0121 0782 e6b7 | |
0123 8768 0000 | h |
0125 4600 0000 |F |
0127 1200 050d | |
0129 1400 0000 | |
012b 0400 0000 | |
012d 0400 0142 | B|
012f 3600 0000 |6 |
0131 0000 0000 | |
0133 0020 f05c | \|
0135 d6d1 41c0 | A |
0137 0008 c000 | |
0139 0002 4000 | @ |
013b a1a2 8000 | |
013d 0000 8000 | |
013f 0000 8000 | |
0141 0000 8002 | |
0143 15a0 00ef | |
0145 9808 00ef | |
0147 87b8 80ef | |
0149 be90 c077 | w|
014b cd39 4000 | 9@ |
014d 0193 420f | B |
014f 0927 1e34 | ' 4|
0151 6800 008d |h |
0153 0784 9391 | |
0155 db26 0000 | & |
0157 4600 0000 |F |
0159 0000 0000 | |
015b 0002 25d5 | % |
015d 0858 0000 | X |
015f 0402 25d5 | % |
0161 2858 0000 |(X |
0163 0400 0000 | |
0165 0000 44ba | D |
0167 a50b 0000 | |
0169 0080 41e1 | A |
016b 24e4 320b |$ 2 |
016d 8000 1180 | |
016f 0000 0480 | |
0171 0029 2600 | )& |
0173 0000 0100 | |
0175 0000 0000 | | .BLANK 0000[0x8]
017d 0010 7080 | p | .XXX[0x2]
017f 0000 0000 | | .BLANK 0000[0x8]
0187 2000 0000 | | .XXX[0x1a]
0189 0000 0000 | |
018b 2000 85e6 | |
018d 203b e694 | ; |
018f 4000 0000 |@ |
0191 0000 0000 | |
0193 001d f397 | |
0195 7000 04ea |p |
0197 c883 d36b | k|
0199 4ed6 3100 |N 1 |
019b 001a 41e9 | A |
019d b5a7 d4e1 | |
019f 8000 0d00 | |
01a1 0000 0000 | | .BLANK 0000[0x4]
01a5 865e 3a14 | ^: | .XXX[0x19]
01a7 0000 0100 | |
01a9 865e 4214 | ^B |
01ab 0000 0100 | |
01ad 0000 0000 | |
01af 10cb c842 | B|
01b1 8000 0020 | |
01b3 107a 6d69 | zmi|
01b5 eb2b c000 | + |
01b7 0340 0000 | @ |
01b9 0120 0053 | S|
01bb 2280 0000 |" |
01bd 0040 | @ |
01be 0000 0000 | | .BLANK 0000[0x8]
01c6 0004 1c20 | | .XXX[0x2]
01c8 0000 0000 | | .BLANK 0000[0x8]
01d0 0800 0000 | | .XXX[0x1a]
01d2 0000 0000 | |
01d4 0800 21f7 | ! |
01d6 a80e f9c9 | |
01d8 a00e f9c4 | |
01da 980e fa0d | |
01dc b807 7cf8 | | |
01de 2400 021d |$ |
01e0 a1a0 f8dc | |
01e2 ee4d 1680 | M |
01e4 0019 50fe | P |
01e6 631b 73e8 |c s |
01e8 e000 0024 | $|
01ea 0000 0000 | | .BLANK 0000[0x4]
01ee 22bd 1685 |" | .XXX[0x12]
01f0 0000 0040 | @|
01f2 22bd 1885 |" |
01f4 0000 0040 | @|
01f6 0000 2a9a | * |
01f8 d457 a310 | W |
01fa a000 0008 | |
01fc 041f 1b9d | |
01fe d15e 1000 | ^ |