|
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
└─ ⟦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 0058 | X | .CONST 0x0058 ; 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 0024 | $ | .CONST 0x0024 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0012 | | .CONST 0x0012 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4bff |K | Short_Literal 0x3ff 000d 00e3 | | Load_Encached Natural_Cache 000e 03f9 | | Declare_Type Discrete,Constrained,Visible 000f 4800 |H | Short_Literal 0x0 0010 481f |H | Short_Literal 0x1f 0011 00e3 | | Load_Encached Natural_Cache 0012 03f9 | | Declare_Type Discrete,Constrained,Visible 0013 4800 |H | Short_Literal 0x0 0014 481f |H | Short_Literal 0x1f 0015 00e3 | | Load_Encached Natural_Cache 0016 03f9 | | Declare_Type Discrete,Constrained,Visible 0017 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated 0019 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated 001b 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated 001d 00bf | | Action Accept_Activation 001e 1d11 | | Execute_Immediate Reference_Lex_1,0x11 001f 00c7 | | Action Elaborate_Subprogram 0020 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0021 00c7 | | Action Elaborate_Subprogram 0022 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0023 00c7 | | Action Elaborate_Subprogram 0024 BODY_0008: 0024 00bc | | Action Signal_Activated 0025 00bb | | Action Signal_Completion 0026 0000 0000 | | .XXX[0x2] 0028 ; -------------------------------------------------------------------------------------- 0028 ; SUBPROGRAM 0028 ; -------------------------------------------------------------------------------------- 0028 002f | / | .CONST 0x002f ; Address of begin 0029 0004 | | .CONST 0x0004 ; Address of exception handler 002a 0003 | | .CONST 0x0003 ; Number of locals 002b INIT_0028: 002b e20e | | Load 0x1,0xe 002c 0007 | | Action Break_Optional 002d e20f | | Load 0x1,0xf 002e 0007 | | Action Break_Optional 002f BODY_0028: 002f e5fe | | Load 0x2,-0x2 0030 09fb | | Execute_Immediate Binary_Scale,-0x5 0031 005a | Z | Store_Top Discrete,At_Offset_2 0032 e5fe | | Load 0x2,-0x2 0033 481f |H | Short_Literal 0x1f 0034 0279 | y | Execute Discrete,And 0035 0059 | Y | Store_Top Discrete,At_Offset_1 0036 00d8 | | Load_Top At_Offset_0 0037 00da | | Load_Top At_Offset_2 0038 e5ff | | Load 0x2,-0x1 0039 8211 | | Call 0x1,0x11 003a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 003b 0000 0000 | | .BLANK 0000[0x5] 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 0043 | C | .CONST 0x0043 ; Address of begin 0041 0004 | | .CONST 0x0004 ; Address of exception handler 0042 0001 | | .CONST 0x0001 ; Number of locals 0043 BODY_0040: 0043 INIT_0040: 0043 e5fd | | Load 0x2,-0x3 0044 e5fe | | Load 0x2,-0x2 0045 e5ff | | Load 0x2,-0x1 0046 0227 | ' | Execute Access,All_Reference 0047 340c |4 | Execute Record,Field_Reference,Field_Number 0xc 0048 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0049 01d5 | | Execute Vector,Field_Reference 004a 01d5 | | Execute Vector,Field_Reference 004b 0320 | | Declare_Variable Record,Duplicate 004c 00cd | | Action Spare6_Action 004d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 004e 0000 0000 | | .XXX[0x2] 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 8002 | | Call 0x0,0x2 0055 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0056 0000 0000 | | .XXX[0x2] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0011 | | .DEBUG4 0x0004,0x0011,0x34db,0x0000,0x0001,0x0000 005e b9d0 ec28 | (| .XXX[0x88] 0060 2880 8149 |( I| 0062 95d1 d5c9 | | 0064 b9cc 81d1 | | 0066 a194 8199 | | 0068 a5c9 cdd0 | | 006a 8195 b195 | | 006c b595 b9d0 | | 006e 81a5 b881 | | 0070 d1a1 9481 | | 0072 b1a5 cdd0 | | 0074 b828 8081 | ( | 0076 01b9 bd91 | | 0078 9480 8551 | Q| 007a bdbd b1cc | | 007c b931 a5cd | 1 | 007e d17d 1d95 | } | 0080 b995 c9a5 | | 0082 8cb9 19c9 | | 0084 9594 2828 | ((| 0086 8081 c1c9 | | 0088 bd8d 9591 | | 008a d5c9 9481 | | 008c 19c9 9594 | | 008e 80a1 3080 | 0 | 0090 e881 a5b8 | | 0092 81bd d5d0 | | 0094 8131 a5cd | 1 | 0096 d0a4 ec28 | (| 0098 2880 8149 |( I| 009a 958d b185 | | 009c a5b5 cc81 | | 009e d1a1 9481 | | 00a0 cdd1 bdc9 | | 00a2 859d 9481 | | 00a4 85cd cdbd | | 00a6 8da5 85d1 | | 00a8 9590 81dd | | 00aa a5d1 a081 | | 00ac d1a1 9481 | | 00ae b1a5 cdd0 | | 00b0 8185 b990 | | 00b2 81cd 95d1 | | 00b4 cc81 a5d0 | | 00b6 81d1 bc81 | | 00b8 d1a1 9428 | (| 00ba 8081 95b5 | | 00bc c1d1 e481 | | 00be b1a5 cdd0 | | 00c0 b828 8081 | ( | 00c2 01b9 bd91 | | 00c4 9480 8551 | Q| 00c6 bdbd b1cc | | 00c8 b931 a5cd | 1 | 00ca d17d 1d95 | } | 00cc b995 c9a5 | | 00ce 8cb9 25b9 | % | 00d0 a5d0 2828 | ((| 00d2 8081 c1c9 | | 00d4 bd8d 9591 | | 00d6 d5c9 9481 | | 00d8 25b9 a5d0 |% | 00da 80a1 25d1 | % | 00dc 95c8 80e8 | | 00de 81bd d5d0 | | 00e0 8125 d195 | % | 00e2 c985 d1bd | | 00e4 c8ec 2880 | ( | 00e6 8080 8080 | | .BLANK 8080[0x7] 00ed 8081 3080 | 0 | .XXX[0x113] 00ef 8080 80e8 | | 00f1 8131 a5cd | 1 | 00f3 d0a4 ec28 | (| 00f5 2880 8125 |( %| 00f7 b9a5 d1a5 | | 00f9 85b1 a5e9 | | 00fb 95cc 81d1 | | 00fd a194 81a5 | | 00ff d195 c985 | | 0101 d1bd c881 | | 0103 d1bc 81a5 | | 0105 d195 c985 | | 0107 d194 81bd | | 0109 d995 c881 | | 010b d1a1 9481 | | 010d 95b1 95b5 | | 010f 95b9 d1cc | | 0111 81a5 b881 | | 0113 d1a1 9428 | (| 0115 8081 cdc1 | | 0117 958d a599 | | 0119 a595 9081 | | 011b b1a5 cdd0 | | 011d b828 2880 | (( | 011f 815d a195 | ] | 0121 b881 bdb9 | | 0123 9481 bdc8 | | 0125 81b5 bdc9 | | 0127 9481 95b1 | | 0129 95b5 95b9 | | 012b d1cc 8195 | | 012d e1a5 cdd0 | | 012f 81a5 b881 | | 0131 d1a1 9481 | | 0133 b1a5 cdd0 | | 0135 b081 d1a1 | | 0137 9481 5985 | Y | 0139 b1d5 9481 | | 013b 99d5 b98d | | 013d d1a5 bdb8 | | 013f 2880 81c9 |( | 0141 95d1 d5c9 | | 0143 b9cc 81d1 | | 0145 a194 8199 | | 0147 a5c9 cdd0 | | 0149 8195 b195 | | 014b b595 b9d0 | | 014d 81a5 b881 | | 014f d1a1 9481 | | 0151 b1a5 cdd0 | | 0153 81d5 cda5 | | 0155 b99c 81d1 | | 0157 a1a5 cc81 | | 0159 d985 b1d5 | | 015b 9481 bd98 | | 015d 81d1 a194 | | 015f 2880 81a5 |( | 0161 d195 c985 | | 0163 d1bd c8b8 | | 0165 8081 4dd5 | M | 0167 8d8d 95cd | | 0169 cda5 d994 | | 016b 81d9 85b1 | | 016d d595 cc81 | | 016f 8d85 b881 | | 0171 8994 8185 | | 0173 8d8d 95cd | | 0175 cd95 9081 | | 0177 89e4 8185 | | 0179 91d9 85b9 | | 017b 8da5 b99c | | 017d 81d1 a194 | | 017f 2880 81a5 |( | 0181 d195 c985 | | 0183 d1bd c881 | | 0185 d1bc 81d1 | | 0187 a194 81b9 | | 0189 95e1 d081 | | 018b d985 b1d5 | | 018d 9481 d5cd | | 018f a5b9 9c81 | | 0191 d1a1 9481 | | 0193 3995 e1d0 |9 | 0195 81c1 c9bd | | 0197 8d95 91d5 | | 0199 c994 b880 | | 019b 815d a195 | ] | 019d b881 b9bc | | 019f 2880 8195 |( | 01a1 b195 b595 | | 01a3 b9d1 cc81 | | 01a5 95e1 a5cd | | 01a7 d081 a5b8 | | 01a9 81d1 a194 | | 01ab 81b1 a5cd | | 01ad d0b0 81d1 | | 01af a194 8111 | | 01b1 bdb9 9481 | | 01b3 99d5 b98d | | 01b5 d1a5 bdb8 | | 01b7 81c9 95d1 | | 01b9 d5c9 b9cc | | 01bb 81d1 a194 | | 01bd 81d9 85b1 | | 01bf d594 2880 | ( | 01c1 81d1 c9d5 | | 01c3 9481 d5cd | | 01c5 a5b9 9c81 | | 01c7 d1a1 a5cc | | 01c9 81d9 85b1 | | 01cb d594 81bd | | 01cd 9881 d1a1 | | 01cf 9481 a5d1 | | 01d1 95c9 85d1 | | 01d3 bdc8 b828 | (| 01d5 8081 01b9 | | 01d7 bd91 9480 | | 01d9 8551 bdbd | Q | 01db b1cc b931 | 1| 01dd a5cd d17d | }| 01df 1d95 b995 | | 01e1 c9a5 8cb9 | | 01e3 25cd 7d15 |% } | 01e5 b5c1 d1e4 | | 01e7 2828 8081 |(( | 01e9 99d5 b98d | | 01eb d1a5 bdb8 | | 01ed 8125 cd7d | % }| 01ef 15b5 c1d1 | | 01f1 e480 a130 | 0| 01f3 80e8 8131 | 1| 01f5 a5cd d0a4 | | 01f7 81c9 95d1 | | 01f9 d5c9 b881 | | 01fb 09bd bdb1 | | 01fd 9585 b8ec | | 01ff 2828 |(( |