|
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_0fe0f5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 0050 | P | .CONST 0x0050 ; 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 0026 | & | .CONST 0x0026 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0013 | | .CONST 0x0013 ; Number of locals 000b INIT_0008: 000b 00c4 | | Action Make_Default 000c 00c4 | | Action Make_Default 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 e001 | | Load 0x0,0x1 0013 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0014 0129 | ) | Execute Any,Make_Visible 0015 c211 | | Store 0x1,0x11 0016 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated 0018 c212 | | Store 0x1,0x12 0019 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated 001b c213 | | Store 0x1,0x13 001c 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated 001e c210 | | Store 0x1,0x10 001f 00bf | | Action Accept_Activation 0020 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0021 00c7 | | Action Elaborate_Subprogram 0022 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0023 00c7 | | Action Elaborate_Subprogram 0024 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0025 00c7 | | Action Elaborate_Subprogram 0026 BODY_0008: 0026 00bc | | Action Signal_Activated 0027 00bb | | Action Signal_Completion 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 480a |H | Short_Literal 0xa 002c 00db | | Load_Top At_Offset_3 002d 01cb | | Execute Vector,Append 002e e5fe | | Load 0x2,-0x2 002f e001 | | Load 0x0,0x1 0030 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0031 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0032 0000 0000 | | .BLANK 0000[0x6] 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 00da | | Load_Top At_Offset_2 003c e5fe | | Load 0x2,-0x2 003d e001 | | Load 0x0,0x1 003e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 003f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 00da | | Load_Top At_Offset_2 0044 e001 | | Load 0x0,0x1 0045 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0046 6804 |h | Jump_Zero 0x4b 0047 00da | | Load_Top At_Offset_2 0048 e001 | | Load 0x0,0x1 0049 1819 | | Execute Package,Field_Execute,Field_Number 0x19 004a c5ff | | Store 0x2,-0x1 004b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 004c 0000 0000 | | .BLANK 0000[0x4] 0050 ; -------------------------------------------------------------------------------------- 0050 ; Debug Table 0050 ; -------------------------------------------------------------------------------------- 0050 0004 000d | | .DEBUG4 0x0004,0x000d,0x91c0,0x0000,0x0001,0x0000 0056 b985 b115 | | .XXX[0x10a] 0058 c9c9 bdc8 | | 005a 01e1 d135 | 5| 005c 85ad 951d | | 005e 95bd b595 | | 0060 d1c9 e549 | I| 0062 95c5 d595 | | 0064 cdd0 01a5 | | 0066 b9d1 95c9 | | 0068 b985 b081 | | 006a 95c9 c9bd | | 006c c8ec 814d | M| 006e a195 b1b1 | | 0070 0db1 85cd | | 0072 cd15 e1d1 | | 0074 95b9 cda5 | | 0076 bdb8 81a5 | | 0078 cc81 3955 | 9U| 007a 3130 01a5 |10 | 007c b9d9 85b1 | | 007e a591 4185 | A | 0080 c995 b9d0 | | 0082 01e1 d135 | 5| 0084 85ad 951d | | 0086 95bd b595 | | 0088 d1c9 e549 | I| 008a 95c5 d595 | | 008c cdd0 01b9 | | 008e bdb8 b5cd | | 0090 a195 b1b0 | | 0092 81a1 85cc | | 0094 81b9 bc81 | | 0096 c185 c995 | | 0098 b9d0 81a5 | | 009a b881 61d1 | a | 009c 3585 ad95 |5 | 009e 1d95 bdb5 | | 00a0 95d1 c9e5 | | 00a2 4995 c5d5 |I | 00a4 95cd d001 | | 00a6 a5b9 d985 | | 00a8 b1a5 9141 | A| 00aa 85c9 95b9 | | 00ac d001 e1d1 | | 00ae 3585 ad95 |5 | 00b0 1d95 bdb5 | | 00b2 95d1 c9e5 | | 00b4 4995 c5d5 |I | 00b6 95cd d001 | | 00b8 61d1 3585 |a 5 | 00ba ad95 1d95 | | 00bc bdb5 95d1 | | 00be c9e5 4995 | I | 00c0 c5d5 95cd | | 00c2 d080 b481 | | 00c4 c185 c995 | | 00c6 b9d0 81b9 | | 00c8 bdd0 818d | | 00ca bdb5 c1bd | | 00cc cda5 d194 | | 00ce 01a5 b9d9 | | 00d0 85b1 a591 | | 00d2 1d95 bdb5 | | 00d4 95d1 c9e5 | | 00d6 3585 b985 |5 | 00d8 9d95 c801 | | 00da e1d1 3585 | 5 | 00dc ad95 1d95 | | 00de bdb5 95d1 | | 00e0 c9e5 4995 | I | 00e2 c5d5 95cd | | 00e4 d001 61d1 | a | 00e6 3585 ad95 |5 | 00e8 1d95 bdb5 | | 00ea 95d1 c9e5 | | 00ec 4995 c5d5 |I | 00ee 95cd d080 | | 00f0 b481 c185 | | 00f2 c995 b9d0 | | 00f4 81a1 85cc | | 00f6 81b9 bc81 | | 00f8 9d95 bdb5 | | 00fa 95d1 c9e4 | | 00fc 81b5 85b9 | | 00fe 859d 95c8 | | 0100 01a5 b9d9 | | 0102 85b1 a591 | | 0104 4da1 95b1 |M | 0106 b001 e1d1 | | 0108 51c9 85b9 |Q | 010a cdb1 85d1 | | 010c 950d bdbd | | 010e c991 cc01 | | 0110 5da5 919d |] | 0112 95d0 81a1 | | 0114 85cc 81b9 | | 0116 bc81 cda1 | | 0118 95b1 b081 | | 011a 85b9 8d95 | | 011c cdd1 bdc8 | | 011e 0000 0000 | | 0120 0091 610d | a | 0122 bdb9 cdbd | | 0124 c9d1 a5d5 | | 0126 b4e8 811d | | 0128 95d1 058d | | 012a d12d 95e4 | - | 012c b98c b1d8 | | 012e 80c4 b8c8 | | 0130 80e0 e4bc | | 0132 c0e4 bcc8 | | 0134 e480 c4c8 | | 0136 e8c4 c8e8 | | 0138 c8e4 81cd | | 013a dda5 8dac | | 013c 8115 e1c0 | | 013e 8090 0000 | | 0140 0091 610d | a | 0142 bdb9 cdbd | | 0144 c9d1 a5d5 | | 0146 b4e8 811d | | 0148 95d1 4995 | I | 014a cd31 a5cd | 1 | 014c d0b9 8cb1 | | 014e d880 c4b8 | | 0150 c480 e0e4 | | 0152 bcc0 e4bc | | 0154 c8e4 80c4 | | 0156 d0e8 c0c4 | | 0158 e8c4 e481 | | 015a cddd a58d | | 015c ac81 15e1 | | 015e c080 9000 | | 0160 0000 0000 | | .BLANK 0000[0x4] 0164 010d 85b1 | | .XXX[0x65] 0166 b189 858d | | 0168 ac01 51c9 | Q | 016a 85b9 cdb1 | | 016c 85d1 a5bd | | 016e b951 8589 | Q | 0170 b194 01a5 | | 0172 b9d9 85b1 | | 0174 a591 15e1 | | 0176 d195 b9cd | | 0178 a5bd b801 | | 017a e1d1 0dc9 | | 017c 9585 d195 | | 017e 5da5 919d |] | 0180 95d0 01dd | | 0182 a591 9d95 | | 0184 d081 8db1 | | 0186 85cd cc80 | | 0188 95cc 81a1 | | 018a 85cc 81a5 | | 018c b9d9 85b1 | | 018e a590 810d | | 0190 bdb9 cdd1 | | 0192 c985 a5b9 | | 0194 d10d b185 | | 0196 cdcd 15e1 | | 0198 d195 b9cd | | 019a a5bd b881 | | 019c c995 8dbd | | 019e c990 01a5 | | 01a0 b9d9 85b1 | | 01a2 a591 05c9 | | 01a4 9d0d bdd5 | | 01a6 b9d0 01e1 | | 01a8 d11d 95d1 | | 01aa 5985 b1d5 |Y | 01ac 95cc 0105 | | 01ae c99d d5b5 | | 01b0 95b9 d081 | | 01b2 8dbd d5b9 | | 01b4 d080 f880 | | 01b6 c081 bdb8 | | 01b8 8139 5531 | 9U1| 01ba 3081 85c9 |0 | 01bc 9dd5 b595 | | 01be b9d0 81b1 | | 01c0 a5cd d081 | | 01c2 a5b8 8161 | a| 01c4 d11d 95d1 | | 01c6 5985 b1d5 |Y | 01c8 95cc | | 01c9 0000 0000 | | .BLANK 0000[0x4] 01cd 7484 0000 |t | .XXX[0x33] 01cf 7484 1000 |t | 01d1 0000 0000 | | 01d3 7484 4800 |t H | 01d5 7484 5800 |t X | 01d7 7484 8c00 |t | 01d9 0000 0000 | | 01db 7484 c000 |t | 01dd 7484 d000 |t | 01df 7485 0000 |t | 01e1 0000 0c00 | | 01e3 0000 0000 | | 01e5 7485 3000 |t 0 | 01e7 7485 4000 |t @ | 01e9 0000 0c00 | | 01eb 0000 0000 | | 01ed 7485 7400 |t t | 01ef 7485 8400 |t | 01f1 0000 0c00 | | 01f3 0000 0000 | | 01f5 7485 b400 |t | 01f7 7485 e800 |t | 01f9 0000 0c00 | | 01fb 0000 0000 | | 01fd 7486 1c00 |t | 01ff 7486 |t |