|
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_5e40f2
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0048 | H | .CONST 0x0048 ; 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 0023 | # | .CONST 0x0023 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0003 | | .CONST 0x0003 ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1
001c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
001d 02c7 | | Declare_Variable Any
001e 00d8 | | Load_Top At_Offset_0
001f 1c00 | | Execute_Immediate Run_Utility,0x0
0020 e001 | | Load 0x0,0x1
0021 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0022 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0023 BODY_0018:
0023 e001 | | Load 0x0,0x1
0024 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0025 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0026 00da | | Load_Top At_Offset_2
0027 0120 | | Execute Any,Is_Value
0028 6803 |h | Jump_Zero 0x2c
0029 e001 | | Load 0x0,0x1
002a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002b 7801 |x | Jump 0x2d
002c 00da | | Load_Top At_Offset_2
002d 6012 |` | Indirect_Literal Discrete,0x40,{0x00000000, 0x00004000}
002e e002 | | Load 0x0,0x2
002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0030 e003 | | Load 0x0,0x3
0031 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0032 e001 | | Load 0x0,0x1
0033 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0034 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0035 e5ff | | Load 0x2,-0x1
0036 e001 | | Load 0x0,0x1
0037 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0038 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0039 c402 | | Store 0x2,0x2
003a 0059 | Y | Store_Top Discrete,At_Offset_1
003b 00d8 | | Load_Top At_Offset_0
003c 0f00 | | Execute_Immediate Equal,0x0
003d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
003e 0000 0000 | | .XXX[0x2]
0040 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0044 0000 0000 | | .BLANK 0000[0x4]
0048 ; --------------------------------------------------------------------------------------
0048 ; Debug Table
0048 ; --------------------------------------------------------------------------------------
0048 0004 000d | | .DEBUG4 0x0004,0x000d,0x9710,0x0000,0x0001,0x0000
004e 014c 0369 | L i| .XXX[0x21]
0050 c009 2005 | |
0052 1007 900f | |
0054 800c 6070 | `p|
0056 0168 036b | h k|
0058 9010 09cc | |
005a 0368 09f9 | h |
005c a009 2001 | |
005e 1004 036c | l|
0060 036c 09cf | l |
0062 1013 9008 | |
0064 03ac 616a | aj|
0066 9008 0327 | '|
0068 9008 03ac | |
006a 6161 bf6c |aa l|
006c 0339 2005 | 9 |
006e 1004 | |
006f 0000 0000 | | .BLANK 0000[0x4]
0073 1538 0010 | 8 | .XXX[0x7c]
0075 0018 03b8 | |
0077 036c 03ac | l |
0079 6340 03ac |c@ |
007b 6224 00c4 |b$ |
007d 03b3 97ff | |
007f 8050 6040 | P`@|
0081 038c 0fc4 | |
0083 0360 036d | ` m|
0085 25d4 03ac |% |
0087 0260 604c | ``L|
0089 09c0 038c | |
008b 0fb1 2007 | |
008d 8008 60b0 | ` |
008f 038c 0fb0 | |
0091 0369 c009 | i |
0093 2005 1004 | |
0095 033d e057 | = W|
0097 9008 03ac | |
0099 6166 900f |af |
009b 9008 03ac | |
009d 616a 9008 |aj |
009f 0364 036c | d l|
00a1 09cc 0168 | h|
00a3 0367 900f | g |
00a5 800c 6070 | `p|
00a7 09f9 a009 | |
00a9 2001 1004 | |
00ab 0327 9008 | ' |
00ad 03ac 6161 | aa|
00af bf9c 0339 | 9|
00b1 2005 1004 | |
00b3 15fc 0010 | |
00b5 0014 03b0 | |
00b7 036c 03ac | l |
00b9 633c 00c5 |c< |
00bb 2007 8008 | |
00bd 60b0 038c |` |
00bf 0fb0 038c | |
00c1 038c 036f | o|
00c3 800c 62a9 | b |
00c5 a009 2005 | |
00c7 1004 036c | l|
00c9 03ac 6050 | `P|
00cb 3cb5 c034 |< 4|
00cd 036f 8014 | o |
00cf 607d a024 |`} $|
00d1 036d 242c | m$,|
00d3 03ac 025b | [|
00d5 800c 62a9 | b |
00d7 c009 2005 | |
00d9 1007 97ff | |
00db 8050 6040 | P`@|
00dd 0148 0364 | H d|
00df 3005 a030 |0 0|
00e1 036f 8050 | o P|
00e3 609f 800c |` |
00e5 6070 0164 |`p d|
00e7 0364 036c | d l|
00e9 09cc 0364 | d|
00eb 09fd 1005 | |
00ed 2005 1004 | |
00ef 0000 0000 | | .BLANK 0000[0x4]
00f3 16f8 0010 | | .XXX[0x10d]
00f5 0010 03b0 | |
00f7 036c 03ac | l |
00f9 633c 00c4 |c< |
00fb 036f 8050 | o P|
00fd 6040 038c |`@ |
00ff 0fc4 038c | |
0101 0365 c009 | e |
0103 2005 1004 | |
0105 036b 800c | k |
0107 6070 0165 |`p e|
0109 2007 8008 | |
010b 60b0 0368 |` h|
010d 09cc 0364 | d|
010f 09fd 1004 | |
0111 0000 0000 | |
0113 177c 0010 | | |
0115 0014 03b0 | |
0117 036c 03ac | l |
0119 62fc 00c4 |b |
011b 038f 97ff | |
011d 8050 6040 | P`@|
011f 038c 0fc4 | |
0121 03b0 0365 | e|
0123 c009 2005 | |
0125 1007 97fe | |
0127 0841 a014 | A |
0129 036f 800c | o |
012b 6070 016d |`p m|
012d e0e8 036f | o|
012f 8010 6045 | `E|
0131 a0c8 036f | o|
0133 800c 6119 | a |
0135 25d4 03ac |% |
0137 0260 60b8 | `` |
0139 03ac 6194 | a |
013b 00c4 036d | m|
013d 242c 03ac |$, |
013f 025a 9008 | Z |
0141 036c 03ac | l |
0143 6050 3c89 |`P< |
0145 a02c 0363 | , c|
0147 800c 6073 | `s|
0149 900b 8010 | |
014b 6090 09cc |` |
014d 0920 2bfc | + |
014f 016d e05c | m \|
0151 0363 800c | c |
0153 6073 9008 |`s |
0155 03ac 63e0 | c |
0157 03ac 6351 | cQ|
0159 25d8 03ac |% |
015b 0260 604f | ``O|
015d 8010 6090 | ` |
015f 09cc 0920 | |
0161 2bfc 016d |+ m|
0163 e010 036f | o|
0165 800c 6070 | `p|
0167 016d 2007 | m |
0169 8008 60b0 | ` |
016b 0368 09cc | h |
016d 036c 09fd | l |
016f 1004 0000 | |
0171 0000 0000 | |
0173 18d4 0010 | |
0175 0008 0384 | |
0177 1804 036c | l|
0179 03ac 6050 | `P|
017b 2ce5 c098 |, |
017d 2ce1 c090 |, |
017f 2c09 c088 |, |
0181 2ce9 c090 |, |
0183 2ced c094 |, |
0185 2cf1 c08c |, |
0187 2cf9 c094 |, |
0189 2cfd c08c |, |
018b 2d05 c084 |- |
018d 2cf5 c08c |, |
018f 2d01 c094 |- |
0191 2cdd c098 |, |
0193 2d15 c0a0 |- |
0195 2d11 c0a4 |- |
0197 2d0d c09c |- |
0199 2d09 c094 |- |
019b 2ead c09b |. |
019d 97fc 0248 | H|
019f 286f 8038 |(o 8|
01a1 6065 e08b |`e |
01a3 97fe 0884 | |
01a5 0149 e079 | I y|
01a7 2004 0149 | I|
01a9 e06f 97fe | o |
01ab 088c 0149 | I|
01ad e05f 97fe | _ |
01af 0890 0149 | I|
01b1 e04f 97fe | O |
01b3 0894 0149 | I|
01b5 e03d 2004 | = |
01b7 0149 e033 | I 3|
01b9 97fe 0888 | |
01bb 0149 e021 | I !|
01bd 2004 0149 | I|
01bf e015 2004 | |
01c1 0149 e009 | I |
01c3 2004 0148 | H|
01c5 0344 0361 | D a|
01c7 c020 036f | o|
01c9 8010 60a1 | ` |
01cb a010 0248 | H|
01cd 2873 8038 |(s 8|
01cf 6078 0361 |`x a|
01d1 1004 0000 | |
01d3 1a78 0010 | x |
01d5 000c 036b | k|
01d7 800c 6168 | ah|
01d9 2bfc 038c |+ |
01db 0fb1 2007 | |
01dd 8008 60b0 | ` |
01df 038c 0fb0 | |
01e1 033c 0368 | < h|
01e3 0368 09c8 | h |
01e5 0921 2004 | ! |
01e7 098d c019 | |
01e9 3ffd 2043 |? C|
01eb 8004 6118 | a |
01ed 0320 ffe9 | |
01ef 1408 0000 | |
01f1 0000 0000 | |
01f3 1acc 0010 | |
01f5 0005 2001 | |
01f7 2005 204b | K|
01f9 97fd 2007 | |
01fb 8008 60af | ` |
01fd 8004 60a1 | ` |
01ff 1408 | |