|
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_0a7cf5
└─⟦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 0068 | h | .CONST 0x0068 ; 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 0020 | | .CONST 0x0020 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0010 | | .CONST 0x0010 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
000d e001 | | Load 0x0,0x1
000e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000f 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call
0011 4802 |H | Short_Literal 0x2
0012 032e | . | Declare_Type Record,Defined,Visible
0013 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated
0015 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated
0017 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
0019 00bf | | Action Accept_Activation
001a 1d0e | | Execute_Immediate Reference_Lex_1,0xe
001b 00c7 | | Action Elaborate_Subprogram
001c 1d0f | | Execute_Immediate Reference_Lex_1,0xf
001d 00c7 | | Action Elaborate_Subprogram
001e 1d10 | | Execute_Immediate Reference_Lex_1,0x10
001f 00c7 | | Action Elaborate_Subprogram
0020 BODY_0008:
0020 00bc | | Action Signal_Activated
0021 00bb | | Action Signal_Completion
0022 0000 0000 | | .BLANK 0000[0x6]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002b | + | .CONST 0x002b ; Address of begin
0029 0004 | | .CONST 0x0004 ; Address of exception handler
002a 0001 | | .CONST 0x0001 ; Number of locals
002b BODY_0028:
002b INIT_0028:
002b 00db | | Load_Top At_Offset_3
002c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
002d e5fe | | Load 0x2,-0x2
002e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
002f e5ff | | Load 0x2,-0x1
0030 e002 | | Load 0x0,0x2
0031 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0032 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0033 0000 0000 | | .BLANK 0000[0x5]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b | ; | .CONST 0x003b ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0001 | | .CONST 0x0001 ; Number of locals
003b BODY_0038:
003b INIT_0038:
003b 00db | | Load_Top At_Offset_3
003c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
003d e5fe | | Load 0x2,-0x2
003e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
003f e5ff | | Load 0x2,-0x1
0040 e002 | | Load 0x0,0x2
0041 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0042 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0043 0000 0000 | | .BLANK 0000[0x5]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
004c 0000 0000 | | .BLANK 0000[0x4]
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 4608 |F | Jump_Case 0x9
0054 7808 |x | Jump 0x5d ; case 0x0
0055 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0056 780d |x | Jump 0x64 ; case 0x2
0057 780c |x | Jump 0x64 ; case 0x3
0058 780b |x | Jump 0x64 ; case 0x4
0059 780a |x | Jump 0x64 ; case 0x5
005a 7809 |x | Jump 0x64 ; case 0x6
005b 7808 |x | Jump 0x64 ; case 0x7
005c 7807 |x | Jump 0x64 ; case 0x8
005d 00da | | Load_Top At_Offset_2
005e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
005f 0125 | % | Execute Any,Set_Constraint
0060 00da | | Load_Top At_Offset_2
0061 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0062 1c00 | | Execute_Immediate Run_Utility,0x0
0063 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0064 0869 | i | Execute_Immediate Raise,0x69
0065 0000 0000 | | .XXX[0x3]
0067 0000 | |
0068 ; --------------------------------------------------------------------------------------
0068 ; Debug Table
0068 ; --------------------------------------------------------------------------------------
0068 0004 000d | | .DEBUG4 0x0004,0x000d,0x91c1,0x0000,0x0001,0x0000
006e 230a 3c92 |# < | .XXX[0x192]
0070 ef0b c2d1 | |
0072 bad2 b308 | |
0074 dc44 a1a4 | D |
0076 ed9c 404b | @K|
0078 0b0a 06d7 | |
007a 1709 8a5e | ^|
007c e8ef 4308 | C |
007e 1801 9803 | |
0080 161b 149b | |
0082 330b 970b |3 |
0084 688d e59d |h |
0086 08c0 1803 | |
0088 f802 088e | |
008a af08 7e81 | ~ |
008c fec2 ecc6 | |
008e 49eb 7f0b |I |
0090 1309 fc23 | #|
0092 1b08 42d6 | B |
0094 8401 da7b | {|
0096 3801 39af |8 9 |
0098 a709 9801 | |
009a d8f7 a30b | |
009c 9309 9802 | |
009e d537 4f0a | 7O |
00a0 16d6 e45d | ]|
00a2 9003 5b0b | [ |
00a4 3802 e23b |8 ;|
00a6 0b08 dc44 | D|
00a8 e108 7db1 | } |
00aa e6d3 1511 | |
00ac c003 d70b | |
00ae 670b 0f08 |g |
00b0 5ad5 d005 |Z |
00b2 8a5e 6e46 | ^nF|
00b4 be85 7411 | t |
00b6 9800 48b8 | H |
00b8 0b0c 6f0e | o |
00ba 6811 9802 |h |
00bc c6c7 b30b | |
00be 8073 bb08 | s |
00c0 0c57 c708 | W |
00c2 dc46 823e | F >|
00c4 a2d0 81f8 | |
00c6 4f0c ae7c |O ||
00c8 b6d7 0c8d | |
00ca c003 aad1 | |
00cc 52d6 8a88 |R |
00ce 3f09 3e59 |? >Y|
00d0 aadc 82d8 | |
00d2 6db6 d2f8 |m |
00d4 8ece 2403 | $ |
00d6 7307 1e1d |s |
00d8 1284 d30e | |
00da f2f5 8c02 | |
00dc 7c00 870e || |
00de 8cf5 71db | q |
00e0 85cc 26ce | & |
00e2 2001 29a5 | ) |
00e4 5e78 cf0f |^x |
00e6 dc6d 0f0a | m |
00e8 52eb 970b |R |
00ea c56d 1b0c | m |
00ec 381d 52d2 |8 R |
00ee 2002 ee80 | |
00f0 0e5a 670b | Zg |
00f2 e9e9 01da | |
00f4 9419 dc02 | |
00f6 645e 4821 |d^H!|
00f8 c23c 1ad2 | < |
00fa be80 f2c5 | |
00fc 6f0e 96f5 |o |
00fe c40a 30f3 | 0 |
0100 d691 01db | |
0102 ddf5 6884 | h |
0104 2001 730d | s |
0106 02db 530a | S |
0108 8402 4002 | @ |
010a 7041 5c02 |pA\ |
010c 6d4c 89fc |mL |
010e a1f9 ab0d | |
0110 b30c 8c01 | |
0112 aa47 1f0b | G |
0114 c63d c70f | = |
0116 06e3 1e83 | |
0118 519d a70d |Q |
011a 8f0d 889a | |
011c e63d eb0f | = |
011e 563b fc00 |V; |
0120 1281 9f0c | |
0122 f2c6 030e | |
0124 5809 df0d |X |
0126 4669 eb0c |Fi |
0128 be4a 1b0e | J |
012a 5afd fb0c |Z |
012c 6208 d91e |b |
012e 070c e055 | U|
0130 bb0e 1a3d | =|
0132 5c01 cdd1 |\ |
0134 870f 02de | |
0136 2b0d af0e |+ |
0138 645e c6d3 |d^ |
013a eb0b 2a99 | * |
013c 5c02 78dd |\ x |
013e d30d fe06 | |
0140 0012 941b | |
0142 08af bc9c | |
0144 347d eb0c |4} |
0146 8a52 1b0c | R |
0148 a2f2 4b0d | K |
014a c812 770e | w |
014c a70e 0011 | |
014e bb0d 8a45 | E|
0150 5c01 84a2 |\ |
0152 970e 9666 | f|
0154 9f0e 580a | X |
0156 cf0d 8069 | i|
0158 eb0f d24e | N|
015a 1b0f 1a7e | ~|
015c c30c eda6 | |
015e eb0d ab0e | |
0160 cf0c 3001 | 0 |
0162 bb0c d645 | E|
0164 5c01 62df |\ b |
0166 0f0c 1226 | &|
0168 9b0f 1b0e | |
016a 2261 bb0e |"a |
016c e001 c70e | |
016e 5997 370e |Y 7 |
0170 cb0e 5c6b | \k|
0172 b87c 1f0e | | |
0174 8402 f001 | |
0176 c70c c4ca | |
0178 e70e 530e | S |
017a f30e 5c6a | \j|
017c 6541 eb0c |eA |
017e e251 5c02 | Q\ |
0180 ea87 5b0d | [ |
0182 d70e a30e | |
0184 5c6b 9a4d |\k M|
0186 eb0c 8f01 | |
0188 5c01 aae7 |\ |
018a a30f 3f0f | ? |
018c ab0f bc9f | |
018e aa61 eb0f | a |
0190 2002 7041 | pA|
0192 5803 1493 |X |
0194 7f0f 542f | T/|
0196 cf0f 3005 | 0 |
0198 bb0f a5c5 | |
019a 5801 ee92 |X |
019c 6f0e e68b |o |
019e 170f f70f | |
01a0 6665 eb0e |fe |
01a2 d245 5801 | EX |
01a4 cf0f c70c | |
01a6 1713 870f | |
01a8 bc9c a883 | |
01aa 6b0d 3651 |k 6Q|
01ac 5801 f70c |X |
01ae 0f10 9d7b | {|
01b0 5f0f bc9c |_ |
01b2 b801 bb0e | |
01b4 fa39 5800 | 9X |
01b6 6280 5710 |b W |
01b8 8d7c 5f10 | |_ |
01ba 8000 c401 | |
01bc bb0c 0e39 | 9|
01be 5802 470c |X G |
01c0 7b11 ff0f |{ |
01c2 a70c 3b12 | ; |
01c4 54dd bb0f |T |
01c6 9003 e30e | |
01c8 6b0f 770b |k w |
01ca 5eac 8313 |^ |
01cc 015b 6b0f | [k |
01ce 3245 5c03 |2E\ |
01d0 3e78 9f12 |>x |
01d2 4f0f f30c |O |
01d4 ab10 5e23 | ^#|
01d6 6b0f d003 |k |
01d8 e30e bf0c | |
01da e312 c70c | |
01dc a710 2002 | |
01de cf0c f401 | |
01e0 bb0e 32f1 | 2 |
01e2 5802 e30c |X |
01e4 3313 830d |3 |
01e6 1313 32e7 | 2 |
01e8 530b 7413 |S t |
01ea e30f 0b0d | |
01ec 0713 130d | |
01ee 3312 cf0d |3 |
01f0 0c01 3f12 | ? |
01f2 824d 5803 | MX |
01f4 330d 4f13 |3 O |
01f6 3b0c 3711 |; 7 |
01f8 3713 bc9d |7 |
01fa 1801 3f11 | ? |
01fc ce3d 5803 | =X |
01fe 570d 7310 |W s |