|
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_5e40f2
└─⟦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 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 001d e001 | | Load 0x0,0x1 001e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 001f 00db | | Load_Top At_Offset_3 0020 680a |h | Jump_Zero 0x2b 0021 4801 |H | Short_Literal 0x1 0022 e001 | | Load 0x0,0x1 0023 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0024 0092 0038 | 8| Action Push_String_Extended,0x38 ; "------- End of step: " 0026 00db | | Load_Top At_Offset_3 0027 01cc | | Execute Vector,Catenate 0028 e001 | | Load 0x0,0x1 0029 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 002a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 002b 4801 |H | Short_Literal 0x1 002c e001 | | Load 0x0,0x1 002d 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 002e 0092 0039 | 9| Action Push_String_Extended,0x39 ; "------- Beginning step: " 0030 00db | | Load_Top At_Offset_3 0031 01cc | | Execute Vector,Catenate 0032 e001 | | Load 0x0,0x1 0033 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0034 4801 |H | Short_Literal 0x1 0035 e001 | | Load 0x0,0x1 0036 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0037 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0038 ; -------------------------------------------------------------------------------------- 0038 ; STRING TABLE 0038 ; -------------------------------------------------------------------------------------- 0038 0006 | | .STRTAB 0x0006->0x003b ; "------- End of step: " 0039 001c | | .STRTAB 0x001c->0x0047 ; "------- Beginning step: " 003a 0032 | 2 | .STREND 0x0032->0x0053 003b 2d2d 2d2d |----| .STRTAB_STRINGS 0053 0000 0000 | | .BLANK 0000[0x5] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 000d | | .DEBUG4 0x0004,0x000d,0x971a,0x0000,0x0001,0x0000 005e b94d 151c | M | .XXX[0x1a2] 0060 2885 3505 |( 5 | 0062 0d21 2539 | !%9| 0064 14b9 4915 | I | 0066 3115 054d |1 M| 0068 14b9 0549 | I| 006a 0d21 2559 | !%Y| 006c 14b9 1539 | 9| 006e 5925 493d |Y%I=| 0070 3935 1539 |95 9| 0072 50b9 117c |P || 0074 c4c9 7cd5 | | | 0076 7cc0 b94d || M| 0078 151d 3515 | 5 | 007a 3951 4cb9 |9QL | 007c 1125 4915 | %I | 007e 0d51 3d49 | Q=I| 0080 657c c0c0 |e| | 0082 c0bc e8c4 | | 0084 c8c8 e4e4 | | 0086 c8e0 d0b9 | | 0088 4d15 1c28 |M (| 008a 8535 050d | 5 | 008c 2125 3914 |!%9 | 008e b949 1531 | I 1| 0090 1505 4d14 | M | 0092 b905 490d | I | 0094 2125 5914 |!%Y | 0096 b915 3959 | 9Y| 0098 2549 3d39 |%I=9| 009a 3515 3950 |5 9P| 009c b911 7cc4 | | | 009e c97c d57c | | || 00a0 c0b9 4d15 | M | 00a2 1d35 1539 | 5 9| 00a4 514c b911 |QL | 00a6 2549 150d |%I | 00a8 513d 4965 |Q=Ie| 00aa 7cc0 c0c0 || | 00ac bce8 c4c8 | | 00ae ccc0 c0cc | | 00b0 c0e0 b94d | M| 00b2 151c 2885 | ( | 00b4 3505 0d21 |5 !| 00b6 2539 14b9 |%9 | 00b8 4915 3115 |I 1 | 00ba 054d 14b9 | M | 00bc 0549 0d21 | I !| 00be 2559 14b9 |%Y | 00c0 1539 5925 | 9Y%| 00c2 493d 3935 |I=95| 00c4 1539 50b9 | 9P | 00c6 117c c4c9 | | | 00c8 7cd5 7cc0 || | | 00ca b94d 151d | M | 00cc 3515 3951 |5 9Q| 00ce 4cb9 1125 |L %| 00d0 4915 0d51 |I Q| 00d2 3d49 657c |=Ie|| 00d4 c0c0 c0bc | | 00d6 e8c4 c8cc | | 00d8 c0c4 cccc | | 00da c8b9 4d15 | M | 00dc 1c28 8535 | ( 5| 00de 050d 2125 | !%| 00e0 3914 b949 |9 I| 00e2 1531 1505 | 1 | 00e4 4d14 b905 |M | 00e6 490d 2125 |I !%| 00e8 5914 b915 |Y | 00ea 3959 2549 |9Y%I| 00ec 3d39 3515 |=95 | 00ee 3950 b911 |9P | 00f0 7cc4 c97c || || 00f2 d57c c0b9 | | | 00f4 4d15 1d35 |M 5| 00f6 1539 514c | 9QL| 00f8 b911 2549 | %I| 00fa 150d 513d | Q=| 00fc 4965 7cc0 |Ie| | 00fe c0c4 bce8 | | 0100 c4c8 ccc0 | | 0102 c8cc d4d8 | | 0104 b94d 151c | M | 0106 2885 3505 |( 5 | 0108 0d21 2539 | !%9| 010a 14b9 4915 | I | 010c 3115 054d |1 M| 010e 14b9 0549 | I| 0110 0d21 2559 | !%Y| 0112 14b9 1539 | 9| 0114 5925 493d |Y%I=| 0116 3935 1539 |95 9| 0118 50b9 117c |P || 011a c4c9 7cd5 | | | 011c 7cc0 b94d || M| 011e 151d 3515 | 5 | 0120 3951 4cb9 |9QL | 0122 1125 4915 | %I | 0124 0d51 3d49 | Q=I| 0126 657c c0c0 |e| | 0128 c4bc e8c4 | | 012a c8cc c0cc | | 012c cce0 c0b9 | | 012e 4d15 1c28 |M (| 0130 8535 050d | 5 | 0132 2125 3914 |!%9 | 0134 b949 1531 | I 1| 0136 1505 4d14 | M | 0138 b905 490d | I | 013a 2125 5914 |!%Y | 013c b915 3959 | 9Y| 013e 2549 3d39 |%I=9| 0140 3515 3950 |5 9P| 0142 b911 7cc4 | | | 0144 c97c d57c | | || 0146 c0b9 4d15 | M | 0148 1d35 1539 | 5 9| 014a 514c b911 |QL | 014c 2549 150d |%I | 014e 513d 4965 |Q=Ie| 0150 7cc0 c0c4 || | 0152 bce8 c4c8 | | 0154 ccc0 d0d0 | | 0156 c0d0 b94d | M| 0158 151c 2885 | ( | 015a 3505 0d21 |5 !| 015c 2539 14b9 |%9 | 015e 4915 3115 |I 1 | 0160 054d 14b9 | M | 0162 0549 0d21 | I !| 0164 2559 14b9 |%Y | 0166 1539 5925 | 9Y%| 0168 493d 3935 |I=95| 016a 1539 50b9 | 9P | 016c 117c c4c9 | | | 016e 7cd5 7cc0 || | | 0170 b94d 151d | M | 0172 3515 3951 |5 9Q| 0174 4cb9 1125 |L %| 0176 4915 0d51 |I Q| 0178 3d49 657c |=Ie|| 017a c0c0 c4bc | | 017c e8c4 c8c8 | | 017e d4cc c8c0 | | 0180 d0b9 4d15 | M | 0182 1c28 8535 | ( 5| 0184 050d 2125 | !%| 0186 3914 b949 |9 I| 0188 1531 1505 | 1 | 018a 4d14 b905 |M | 018c 490d 2125 |I !%| 018e 5914 b915 |Y | 0190 3959 2549 |9Y%I| 0192 3d39 3515 |=95 | 0194 3950 b911 |9P | 0196 7cc4 c97c || || 0198 d57c c0b9 | | | 019a 4d15 1d35 |M 5| 019c 1539 514c | 9QL| 019e b911 2549 | %I| 01a0 150d 513d | Q=| 01a2 4965 7cc0 |Ie| | 01a4 c0c4 bce8 | | 01a6 c4c8 c8e4 | | 01a8 d8c8 c4c8 | | 01aa b94d 151c | M | 01ac 2885 3505 |( 5 | 01ae 0d21 2539 | !%9| 01b0 14b9 4915 | I | 01b2 3115 054d |1 M| 01b4 14b9 0549 | I| 01b6 0d21 2559 | !%Y| 01b8 14b9 1539 | 9| 01ba 5925 493d |Y%I=| 01bc 3935 1539 |95 9| 01be 50b9 117c |P || 01c0 c4c9 7cd5 | | | 01c2 7cc0 b94d || M| 01c4 151d 3515 | 5 | 01c6 3951 4cb9 |9QL | 01c8 1125 4915 | %I | 01ca 0d51 3d49 | Q=I| 01cc 657c c0c0 |e| | 01ce c4bc e8c4 | | 01d0 c8cc d4cc | | 01d2 d4d4 d8b9 | | 01d4 4d15 1c28 |M (| 01d6 8535 050d | 5 | 01d8 2125 3914 |!%9 | 01da b949 1531 | I 1| 01dc 1505 4d14 | M | 01de b905 490d | I | 01e0 2125 5914 |!%Y | 01e2 b915 3959 | 9Y| 01e4 2549 3d39 |%I=9| 01e6 3515 3950 |5 9P| 01e8 b911 7cc4 | | | 01ea c97c d57c | | || 01ec c0b9 4d15 | M | 01ee 1d35 1539 | 5 9| 01f0 514c b911 |QL | 01f2 2549 150d |%I | 01f4 513d 4965 |Q=Ie| 01f6 7cc0 c0c4 || | 01f8 bce8 c4c8 | | 01fa c8e0 d0e4 | | 01fc d0e0 b94d | M| 01fe 151c 2885 | ( |