|
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 e110 cc29 | )| .XXX[0x1a2] 0060 4ccc c4c5 |L | 0062 14c0 c0c1 | | 0064 1504 e0e0 | | 0066 d8c0 c4c0 | | 0068 c8c0 c915 | | 006a 1919 190c | | 006c dcc8 c4c9 | | 006e 10c0 e0c4 | | 0070 c918 c0c1 | | 0072 1118 294c | )L| 0074 ccc4 c514 | | 0076 c0c0 c115 | | 0078 04e4 d0d1 | | 007a 1508 e514 | | 007c c0c0 c4c1 | | 007e 0d0c e0d4 | | 0080 e0d1 18d4 | | 0082 c905 1519 | | 0084 1918 e0cc | | 0086 d829 4ccc | )L | 0088 c4c5 14c0 | | 008a c0c1 1505 | | 008c 04c0 dcc8 | | 008e c8c1 10cd | | 0090 0515 1919 | | 0092 190c c8c0 | | 0094 d914 c0c0 | | 0096 c0e0 c8c0 | | 0098 c914 e4c8 | | 009a 294c ccc4 |)L | 009c c514 c0c0 | | 009e c115 0505 | | 00a0 0d19 1918 | | 00a2 e108 c104 | | 00a4 e0c0 c0c0 | | 00a6 d0d9 10e5 | | 00a8 14c9 18c8 | | 00aa e0c0 c0c0 | | 00ac e109 0829 | )| 00ae 4ccc c4c5 |L | 00b0 14c0 c0c1 | | 00b2 1505 08e0 | | 00b4 d115 08e5 | | 00b6 14c0 c0c1 | | 00b8 1110 d0e0 | | 00ba d4e0 d118 | | 00bc d114 d514 | | 00be d114 dcd4 | | 00c0 d104 294c | )L| 00c2 ccc4 c514 | | 00c4 c0c0 c115 | | 00c6 050c d0d1 | | 00c8 14d4 d8c0 | | 00ca c0c0 c0c8 | | 00cc c0d9 14c0 | | 00ce c0c0 e0d1 | | 00d0 0504 e0c0 | | 00d2 c0c1 14c8 | | 00d4 d829 4ccc | )L | 00d6 c4c5 14c0 | | 00d8 c0c1 1505 | | 00da 10c0 d8dc | | 00dc c114 dcc8 | | 00de c10d 10c5 | | 00e0 0cc4 c918 | | 00e2 c0e0 d115 | | 00e4 08e5 14c0 | | 00e6 c0c1 08c4 | | 00e8 294c ccc4 |)L | 00ea c514 c0c0 | | 00ec c115 0511 | | 00ee 0d10 e50c | | 00f0 e0d4 e0d1 | | 00f2 18c8 c0d9 | | 00f4 14c0 c0c0 | | 00f6 e0c1 0d04 | | 00f8 e0c0 c0c0 | | 00fa c108 d829 | )| 00fc 4ccc c4c5 |L | 00fe 14c0 c0c1 | | 0100 1505 14e0 | | 0102 c0c0 c0d0 | | 0104 c0c0 c504 | | 0106 d8dc c0d8 | | 0108 c8c0 c0e0 | | 010a dcc8 c914 | | 010c d8c0 c4e0 | | 010e dcc4 294c | )L| 0110 ccc4 c514 | | 0112 c0c0 c115 | | 0114 0518 d0c8 | | 0116 c0c9 14c0 | | 0118 c0c0 e0dc | | 011a c8c8 c910 | | 011c c0e0 c4c9 | | 011e 18c0 c0d1 | | 0120 1508 e509 | | 0122 1829 4ccc | )L | 0124 c4c5 14c0 | | 0126 c0c1 1508 | | 0128 c0c1 14c0 | | 012a c0c4 c10d | | 012c 0ce0 d4e0 | | 012e d118 c8c0 | | 0130 c914 c0c0 | | 0132 c0e0 dcc8 | | 0134 cd05 0cd4 | | 0136 294c ccc4 |)L | 0138 c514 c0c0 | | 013a c115 08c1 | | 013c 0d10 c0e0 | | 013e c4c9 18c0 | | 0140 c0d8 c4c0 | | 0142 c119 18c5 | | 0144 04d4 e0d1 | | 0146 18c9 18c9 | | 0148 14c4 e429 | )| 014a 4ccc c4c5 |L | 014c 14c0 c0c1 | | 014e 1508 c4e0 | | 0150 c0c0 c0e0 | | 0152 d8c4 c0c1 | | 0154 1915 10d8 | | 0156 d4e0 d118 | | 0158 d114 d514 | | 015a d114 dcd5 | | 015c 08e0 294c | )L| 015e ccc4 c514 | | 0160 c0c0 c115 | | 0162 08c8 d0d1 | | 0164 14d4 d8c0 | | 0166 c0c0 c0c9 | | 0168 18c9 14c0 | | 016a c0c0 e0d8 | | 016c c4e4 d8d4 | | 016e e0d1 18d4 | | 0170 e029 4ccc | )L | 0172 c4c5 14c0 | | 0174 c0c1 1508 | | 0176 ccc0 c918 | | 0178 c914 c0c0 | | 017a c0e0 d115 | | 017c 08e5 14c0 | | 017e c0c1 1110 | | 0180 d0e0 d4e0 | | 0182 d119 1108 | | 0184 294c ccc4 |)L | 0186 c514 c0c0 | | 0188 c115 08cd | | 018a 0cd1 14d5 | | 018c 14d1 14dc | | 018e d4d1 14d4 | | 0190 d919 1918 | | 0192 e0c8 c0c9 | | 0194 14c0 c0c0 | | 0196 e0e0 dc29 | )| 0198 4ccc c4c5 |L | 019a 14c0 c0c1 | | 019c 1508 d0e1 | | 019e 1508 e0c0 | | 01a0 c910 d0c1 | | 01a2 1919 18e0 | | 01a4 c918 c0c0 | | 01a6 d115 08e5 | | 01a8 14c0 c0c1 | | 01aa 18d8 294c | )L| 01ac ccc4 c514 | | 01ae c0c0 c115 | | 01b0 08d4 d111 | | 01b2 10c8 c0d4 | | 01b4 e0d1 18c9 | | 01b6 10d0 c119 | | 01b8 1919 0cd8 | | 01ba dcc4 e0d1 | | 01bc 0505 14d1 | | 01be 0c29 4ccc | )L | 01c0 c4c5 14c0 | | 01c2 c0c1 1508 | | 01c4 d8c1 1919 | | 01c6 18e0 d8dc | | 01c8 c4c8 c918 | | 01ca c915 1919 | | 01cc 18e0 d0c9 | | 01ce 04dc c918 | | 01d0 c0c1 14dc | | 01d2 294c ccc4 |)L | 01d4 c514 c0c0 | | 01d6 c115 08d9 | | 01d8 0cd1 1508 | | 01da e514 c0c0 | | 01dc c4e1 0d14 | | 01de d0d1 1915 | | 01e0 18c0 c0c1 | | 01e2 0cc8 c0c9 | | 01e4 150c dc29 | )| 01e6 4ccc c4c5 |L | 01e8 14c0 c0c1 | | 01ea 1508 dce1 | | 01ec 1919 190c | | 01ee d114 d514 | | 01f0 d114 dcd4 | | 01f2 d114 d4d9 | | 01f4 1919 190c | | 01f6 d0e0 dce1 | | 01f8 14c8 294c | )L| 01fa ccc4 c514 | | 01fc c0c0 c115 | | 01fe 08e0 d0c0 | |