|
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 003f | ? | .CONST 0x003f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0015 | | .CONST 0x0015 ; Number of locals 000b INIT_0008: 000b 4806 |H | Short_Literal 0x6 000c e001 | | Load 0x0,0x1 000d 01d7 | | Execute Vector,Field_Read 000e 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 000f 480e |H | Short_Literal 0xe 0010 e001 | | Load 0x0,0x1 0011 01d7 | | Execute Vector,Field_Read 0012 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 0013 480a |H | Short_Literal 0xa 0014 e001 | | Load 0x0,0x1 0015 01d7 | | Execute Vector,Field_Read 0016 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 0017 4802 |H | Short_Literal 0x2 0018 e001 | | Load 0x0,0x1 0019 01d7 | | Execute Vector,Field_Read 001a 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 001b 480c |H | Short_Literal 0xc 001c e001 | | Load 0x0,0x1 001d 01d7 | | Execute Vector,Field_Read 001e 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 001f 4808 |H | Short_Literal 0x8 0020 e001 | | Load 0x0,0x1 0021 01d7 | | Execute Vector,Field_Read 0022 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 0023 4804 |H | Short_Literal 0x4 0024 e001 | | Load 0x0,0x1 0025 01d7 | | Execute Vector,Field_Read 0026 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 0027 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 0029 00e5 | | Load_Encached Long_Integer_Cache 002a 00e5 | | Load_Encached Long_Integer_Cache 002b 02a0 | | Declare_Subprogram Null_Subprogram 002c 4802 |H | Short_Literal 0x2 002d 032e | . | Declare_Type Record,Defined,Visible 002e 00bf | | Action Accept_Activation 002f 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0030 00c7 | | Action Elaborate_Subprogram 0031 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0032 00c7 | | Action Elaborate_Subprogram 0033 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0034 00c7 | | Action Elaborate_Subprogram 0035 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0036 00c7 | | Action Elaborate_Subprogram 0037 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0038 00c7 | | Action Elaborate_Subprogram 0039 1d0d | | Execute_Immediate Reference_Lex_1,0xd 003a 00c7 | | Action Elaborate_Subprogram 003b 1d13 | | Execute_Immediate Reference_Lex_1,0x13 003c 00c7 | | Action Elaborate_Subprogram 003d 1d14 | | Execute_Immediate Reference_Lex_1,0x14 003e 00c7 | | Action Elaborate_Subprogram 003f BODY_0008: 003f 00bc | | Action Signal_Activated 0040 00bb | | Action Signal_Completion 0041 0000 0000 | | .BLANK 0000[0x7] 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 00da | | Load_Top At_Offset_2 004c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 004d a5fe | | Store_Unchecked 0x2,-0x2 004e 00da | | Load_Top At_Offset_2 004f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0050 a5fd | | Store_Unchecked 0x2,-0x3 0051 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0052 0000 0000 | | .BLANK 0000[0x6] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0011 | | .DEBUG4 0x0004,0x0011,0x34c4,0x0000,0x0001,0x0000 005e 8080 8080 | | .XXX[0x3] 0060 8080 | | 0061 8115 6150 | aP| .XXX[0x11] 0063 8080 8085 | | 0065 253c b93d |%< =| 0067 0929 150d | ) | 0069 517d 4d15 |Q}M | 006b 509d 4d41 |P MA| 006d 150c 2880 | ( | 006f 8081 4125 | A%| 0071 4114 |A | 0072 8080 8080 | | .BLANK 8080[0xb] 007d 8115 6150 | aP| .XXX[0x13] 007f 8080 8085 | | 0081 253c b941 |%< A| 0083 2541 149d |%A | 0085 4d41 150c |MA | 0087 2880 8081 |( | 0089 413d 3165 |A=1e| 008b 353d 4941 |5=IA| 008d 2125 0d7d |!% }| 008f 253c |%< | 0090 8080 8080 | | .BLANK 8080[0x6] 0096 8115 6150 | aP| .XXX[0x3b] 0098 8080 8085 | | 009a 253c b941 |%< A| 009c 3d31 6535 |=1e5| 009e 3d49 4121 |=IA!| 00a0 250d 7d25 |% }%| 00a2 3c9d 4d41 |< MA| 00a4 150c 2880 | ( | 00a6 8081 413d | A=| 00a8 3165 353d |1e5=| 00aa 4941 2125 |IA!%| 00ac 0d7d 4d15 | }M | 00ae 4555 1539 |EU 9| 00b0 5125 0531 |Q% 1| 00b2 7d25 3c80 |}%< | 00b4 8115 6150 | aP| 00b6 8080 8085 | | 00b8 253c b941 |%< A| 00ba 3d31 6535 |=1e5| 00bc 3d49 4121 |=IA!| 00be 250d 7d4d |% }M| 00c0 1545 5515 | EU | 00c2 3951 2505 |9Q% | 00c4 317d 253c |1}%<| 00c6 9d4d 4115 | MA | 00c8 0c28 8080 | ( | 00ca 814d 1545 | M E| 00cc 5515 3951 |U 9Q| 00ce 2505 317d |% 1}| 00d0 253c |%< | 00d1 8080 8080 | | .BLANK 8080[0x6] 00d7 8081 1561 | a| .XXX[0x18] 00d9 5080 8080 |P | 00db 8525 3cb9 | %< | 00dd 4d15 4555 |M EU| 00df 1539 5125 | 9Q%| 00e1 0531 7d25 | 1}%| 00e3 3c9d 4d41 |< MA| 00e5 150c 2880 | ( | 00e7 8081 5105 | Q | 00e9 4115 7d4d |A }M| 00eb 4115 0d25 |A %| 00ed 1925 0c80 | % | 00ef 8080 8080 | | .BLANK 8080[0x6] 00f5 8115 6150 | aP| .XXX[0x19] 00f7 8080 8085 | | 00f9 253c b951 |%< Q| 00fb 0541 157d | A }| 00fd 4d41 150d |MA | 00ff 2519 250c |% % | 0101 9d4d 4115 | MA | 0103 0c28 8080 | ( | 0105 8151 1549 | Q I| 0107 3525 3905 |5%9 | 0109 317d 4d41 |1}MA| 010b 150d 2519 | % | 010d 250c |% | 010e 8080 8080 | | .BLANK 8080[0x4] 0112 8081 1561 | a| .XXX[0x17] 0114 5080 8080 |P | 0116 8525 3cb9 | %< | 0118 5115 4935 |Q I5| 011a 2539 0531 |%9 1| 011c 7d4d 4115 |}MA | 011e 0d25 1925 | % %| 0120 0c9d 4d41 | MA| 0122 150c 2880 | ( | 0124 8081 5115 | Q | 0126 6151 7d25 |aQ}%| 0128 3c80 |< | 0129 8080 8080 | | .BLANK 8080[0x9] 0132 8115 6150 | aP| .XXX[0x12] 0134 8080 8085 | | 0136 253c b951 |%< Q| 0138 1561 517d | aQ}| 013a 253c 9d4d |%< M| 013c 4115 0c28 |A (| 013e 8080 815d | ]| 0140 2539 113d |%9 =| 0142 5d7d 253c |]}%<| 0144 8080 8080 | | .BLANK 8080[0x8] 014c 8081 1561 | a| .XXX[0xb4] 014e 5080 8080 |P | 0150 8525 3cb9 | %< | 0152 5d25 3911 |]%9 | 0154 3d5d 7d25 |=]}%| 0156 3c9d 4d41 |< MA| 0158 150c 2828 | ((| 015a 8149 1519 | I | 015c 1549 1539 | I 9| 015e 0d15 4c28 | L(| 0160 2881 cdd5 |( | 0162 89d1 e5c1 | | 0164 9481 31a5 | 1 | 0166 b9ad 7d39 | }9| 0168 85b5 9428 | (| 016a 81cd d589 | | 016c d1e5 c194 | | 016e 814d bdd5 | M | 0170 c98d 957d | }| 0172 4185 d1d1 |A | 0174 95c9 b828 | (| 0176 2828 2881 |((( | 0178 01b9 bd91 | | 017a 9480 850d | | 017c bdb5 b585 | | 017e b991 ccb9 | | 0180 31a5 b9ad |1 | 0182 ccb9 1591 | | 0184 a5d0 2828 | ((| 0186 81c1 c9bd | | 0188 8d95 91d5 | | 018a c994 8115 | | 018c 91a5 d080 | | 018e a15d bdc9 | ] | 0190 b190 80e8 | | 0192 815d bdc9 | ] | 0194 b191 7d39 | }9| 0196 85b5 9480 | | 0198 e8f4 8088 | | 019a f125 3505 | %5 | 019c 1d14 f888 | | 019e a4ec 2828 | ((| 01a0 8111 154d | M| 01a2 0d49 2541 | I%A| 01a4 5125 3d38 |Q%=8| 01a6 2828 813d |(( =| 01a8 c195 b9cc | | 01aa 81d1 a194 | | 01ac 81b1 a5b9 | | 01ae adcc 8199 | | 01b0 c9bd b481 | | 01b2 d1a1 9481 | | 01b4 cdc1 958d | | 01b6 a599 a595 | | 01b8 9081 ddbd | | 01ba c9b1 9081 | | 01bc 99bd c881 | | 01be 9591 a5d1 | | 01c0 a5b9 9cb8 | | 01c2 2828 8151 |(( Q| 01c4 a1a5 cc81 | | 01c6 c1c9 bd8d | | 01c8 9591 d5c9 | | 01ca 9481 8dc9 | | 01cc 9585 d195 | | 01ce cc81 8481 | | 01d0 dda5 b991 | | 01d2 bddc 8185 | | 01d4 b990 8191 | | 01d6 a5cd c1b1 | | 01d8 85e5 cc81 | | 01da d1a1 9481 | | 01dc cd95 d081 | | 01de bd98 81b1 | | 01e0 a5b9 adcc | | 01e2 8199 c9bd | | 01e4 b481 d1a1 | | 01e6 9428 81cd | ( | 01e8 c195 8da5 | | 01ea 99a5 9590 | | 01ec 81dd bdc9 | | 01ee b190 81a5 | | 01f0 b881 d1a1 | | 01f2 85d0 81dd | | 01f4 a5b9 91bd | | 01f6 dcb8 8119 | | 01f8 c9bd b481 | | 01fa d1a1 9481 | | 01fc dda5 b991 | | 01fe bddc b081 | |