|
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 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 4039 38c4 |@98 | .XXX[0xe9] 0058 0000 4039 | @9| 005a 38d4 0000 |8 | 005c 4039 3904 |@99 | 005e 0000 4039 | @9| 0060 3914 0000 |9 | 0062 4039 3924 |@99$| 0064 0000 4039 | @9| 0066 3934 0000 |94 | 0068 4039 39c4 |@99 | 006a 0000 4039 | @9| 006c 3a14 0000 |: | 006e 4039 3a64 |@9:d| 0070 0000 4039 | @9| 0072 3a74 0000 |:t | 0074 4039 3ab4 |@9: | 0076 0000 4039 | @9| 0078 3ac4 0000 |: | 007a 4039 3ad4 |@9: | 007c 0000 4039 | @9| 007e 3ae4 0000 |: | 0080 4039 3af4 |@9: | 0082 0000 4039 | @9| 0084 3b54 0000 |;T | 0086 4039 3bb4 |@9; | 0088 0000 4039 | @9| 008a 3bc4 0000 |; | 008c 4039 3be4 |@9; | 008e 0000 4039 | @9| 0090 3bf4 0000 |; | 0092 4039 3c44 |@9<D| 0094 0000 4039 | @9| 0096 3c54 0000 |<T | 0098 4039 3c64 |@9<d| 009a 0000 4039 | @9| 009c 3c74 0000 |<t | 009e 4039 3c94 |@9< | 00a0 0000 4039 | @9| 00a2 3ca4 0000 |< | 00a4 4039 3d24 |@9=$| 00a6 0000 4039 | @9| 00a8 3d44 0000 |=D | 00aa 4039 3d54 |@9=T| 00ac 0000 4039 | @9| 00ae 3d94 0000 |= | 00b0 4039 3df4 |@9= | 00b2 0000 4039 | @9| 00b4 3e74 0000 |>t | 00b6 4039 3e94 |@9> | 00b8 0000 4039 | @9| 00ba 3ea4 0000 |> | 00bc 4039 3eb4 |@9> | 00be 0000 4039 | @9| 00c0 3ec4 0000 |> | 00c2 4039 3ee4 |@9> | 00c4 0000 4039 | @9| 00c6 3f24 0000 |?$ | 00c8 4039 3f34 |@9?4| 00ca 0000 4039 | @9| 00cc 40b4 0000 |@ | 00ce 4039 4114 |@9A | 00d0 0000 4039 | @9| 00d2 4154 0000 |AT | 00d4 4039 4164 |@9Ad| 00d6 0000 4039 | @9| 00d8 4194 0000 |A | 00da 4039 41a4 |@9A | 00dc 0000 4039 | @9| 00de 41b4 0000 |A | 00e0 4039 41e4 |@9A | 00e2 0000 4039 | @9| 00e4 41f4 0000 |A | 00e6 4039 4204 |@9B | 00e8 0000 4039 | @9| 00ea 4214 0000 |B | 00ec 4039 4224 |@9B$| 00ee 0000 4039 | @9| 00f0 4254 0000 |BT | 00f2 4039 4264 |@9Bd| 00f4 0000 4039 | @9| 00f6 42a4 0000 |B | 00f8 4039 42b4 |@9B | 00fa 0000 4039 | @9| 00fc 42c4 0000 |B | 00fe 4039 42f4 |@9B | 0100 0000 4039 | @9| 0102 4304 0000 |C | 0104 4039 4314 |@9C | 0106 0000 4039 | @9| 0108 4334 0000 |C4 | 010a 4039 4394 |@9C | 010c 0000 4039 | @9| 010e 43b4 0000 |C | 0110 4039 43e4 |@9C | 0112 0000 4039 | @9| 0114 4404 0000 |D | 0116 4039 4414 |@9D | 0118 0000 4039 | @9| 011a 4434 0000 |D4 | 011c 4039 4444 |@9DD| 011e 0000 4039 | @9| 0120 4474 0000 |Dt | 0122 4039 44d4 |@9D | 0124 0000 4039 | @9| 0126 4504 0000 |E | 0128 4039 4564 |@9Ed| 012a 0000 4039 | @9| 012c 4594 0000 |E | 012e 4039 45b4 |@9E | 0130 0000 4039 | @9| 0132 45e4 0000 |E | 0134 4039 45f4 |@9E | 0136 0000 4039 | @9| 0138 4604 0000 |F | 013a 4039 4614 |@9F | 013c 0000 4039 | @9| 013e 4630 |F0 | 013f 0000 0000 | | .BLANK 0000[0xc1]