|
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_0d2ce3
└─⟦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 0060 | ` | .CONST 0x0060 ; 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 00da | | Load_Top At_Offset_2
001c 01db | | Execute Vector,Length
001d 7007 |p | Jump_Nonzero 0x25
001e 0092 0044 | D| Action Push_String_Extended,0x44 ; "<ERRORS>"
0020 0092 0045 | E| Action Push_String_Extended,0x45 ; "$$[D_@]"
0022 e001 | | Load 0x0,0x1
0023 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0024 7808 |x | Jump 0x2d
0025 0092 0044 | D| Action Push_String_Extended,0x44 ; "<ERRORS>"
0027 0092 0046 | F| Action Push_String_Extended,0x46 ; "!Machine.Release.Environment."
0029 e5ff | | Load 0x2,-0x1
002a 01cc | | Execute Vector,Catenate
002b e001 | | Load 0x0,0x1
002c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
002d 6012 |` | Indirect_Literal Discrete,0x40,{0x00000000, 0x00004000}
002e e002 | | Load 0x0,0x2
002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0030 e003 | | Load 0x0,0x3
0031 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0032 e004 | | Load 0x0,0x4
0033 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0034 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0035 0092 0047 | G| Action Push_String_Extended,0x47 ; "$$"
0037 e004 | | Load 0x0,0x4
0038 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0039 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
003a e004 | | Load 0x0,0x4
003b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
003c 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
003d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
003e 0000 0000 | | .XXX[0x2]
0040 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0044 ; --------------------------------------------------------------------------------------
0044 ; STRING TABLE
0044 ; --------------------------------------------------------------------------------------
0044 000a | | .STRTAB 0x000a->0x0049 ; "<ERRORS>"
0045 0010 | | .STRTAB 0x0010->0x004d ; "$$[D_@]"
0046 0015 | | .STRTAB 0x0015->0x0050 ; "!Machine.Release.Environment."
0047 0030 | 0 | .STRTAB 0x0030->0x005f ; "$$"
0048 0030 | 0 | .STREND 0x0030->0x0060
0049 3c45 5252 |<ERR| .STRTAB_STRINGS
0060 ; --------------------------------------------------------------------------------------
0060 ; Debug Table
0060 ; --------------------------------------------------------------------------------------
0060 0004 0001 | | .DEBUG4 0x0004,0x0001,0x3ce6,0x0000,0x0001,0x0000
0066 80b4 c481 | | .XXX[0x19a]
0068 e081 18c8 | |
006a c4a0 f4a5 | |
006c 4c81 18c8 |L |
006e c0a0 c8a5 | |
0070 4c81 18c8 |L |
0072 c4a1 70c0 | p |
0074 ccc4 a54c | L|
0076 80d8 c0dc | |
0078 8164 80d0 | d |
007a d8d8 8160 | `|
007c 8118 d8a1 | |
007e 70a1 8970 |p p|
0080 a4a5 4c80 | L |
0082 ccd4 81e0 | |
0084 8029 18d0 | ) |
0086 e0a1 0549 | I|
0088 0d0d 3d51 | =Q|
008a 70a1 60b0 |p ` |
008c a54c 80c4 | L |
008e e481 e0a1 | |
0090 64b0 a54c |d L|
0092 80c8 c081 | |
0094 e0a1 0d65 | e|
0096 0d31 1570 | 1 p|
0098 a4a5 4c80 | L |
009a c4c8 81e0 | |
009c 8118 c8c8 | |
009e a170 c0cc | p |
00a0 c4a5 4c80 | L |
00a2 d4c4 c081 | |
00a4 6480 c4cc |d |
00a6 81e0 8029 | )|
00a8 18c8 cca0 | |
00aa e0a5 4c80 | L |
00ac ccdc 81e4 | |
00ae 80b4 ccdc | |
00b0 81e0 a0f8 | |
00b2 a54c 80c4 | L |
00b4 c881 e480 | |
00b6 b4cc dc81 | |
00b8 e0a0 f0a5 | |
00ba 4c80 dcd4 |L |
00bc 81e4 80b4 | |
00be ccdc 81e0 | |
00c0 a0f8 a54c | L|
00c2 80c4 cc81 | |
00c4 e480 b4cc | |
00c6 dc81 e0a0 | |
00c8 e8a5 4c28 | L(|
00ca d4cc c881 | |
00cc 6480 dc81 |d |
00ce e081 18c8 | |
00d0 c0a1 70a1 | p |
00d2 85c9 8d8d | |
00d4 bdd0 a54c | L|
00d6 80dc 81e0 | |
00d8 a170 a0a5 | p |
00da 4c80 c481 |L |
00dc e081 18d0 | |
00de e0a1 60a5 | ` |
00e0 4c81 18c8 |L |
00e2 c4a0 f4a5 | |
00e4 4c81 18d0 |L |
00e6 e0a1 64a5 | d |
00e8 4c80 b4c4 |L |
00ea 81e0 8029 | )|
00ec 18c8 c0a1 | |
00ee 70a5 70a4 |p p |
00f0 a54c 80e4 | L |
00f2 81e0 8118 | |
00f4 c8c8 a170 | p|
00f6 c0c0 c4a5 | |
00f8 4c80 e481 |L |
00fa e081 18d0 | |
00fc e0a1 0d65 | e|
00fe 0d31 14a5 | 1 |
0100 4c80 b4c4 |L |
0102 81e0 8118 | |
0104 c8c4 a0f4 | |
0106 a54c 8118 | L |
0108 c8c0 a0c8 | |
010a a54c 8118 | L |
010c c8c4 28a1 | ( |
010e 70c0 ccc4 |p |
0110 a54c 80c4 | L |
0112 81e0 a0ec | |
0114 a54c 80c4 | L |
0116 d8dc d881 | |
0118 6081 18d0 |` |
011a e0a1 64a5 | d |
011c 4c80 c4c4 |L |
011e 81e0 8118 | |
0120 c8c4 a0f8 | |
0122 a54c 80c4 | L |
0124 c881 e081 | |
0126 18d0 e0a0 | |
0128 c0b8 c0a5 | |
012a 4c80 d4c0 |L |
012c 81e4 8028 | (|
012e c4c0 d8cc | |
0130 8160 a0c0 | ` |
0132 b8c0 a54c | L|
0134 80b4 c481 | |
0136 e081 18c8 | |
0138 c4a0 eca5 | |
013a 4c80 c4d8 |L |
013c dcd8 8160 | `|
013e 8118 d0e0 | |
0140 a164 a54c | d L|
0142 80c4 c481 | |
0144 e081 18c8 | |
0146 c0a0 f4a5 | |
0148 4c80 c4c8 |L |
014a 81e0 8118 | |
014c d0e0 a0c0 | |
014e b8c0 a54c | L|
0150 28c4 cc81 |( |
0152 e081 18d8 | |
0154 a185 b990 | |
0156 a54c 80c4 | L |
0158 d081 e081 | |
015a 18d0 e0a1 | |
015c 60a5 4c80 |` L |
015e c4c4 81e0 | |
0160 8118 c8c4 | |
0162 a0f8 a54c | L|
0164 80c4 c881 | |
0166 e081 18d0 | |
0168 e0a0 c0b8 | |
016a c0a5 4c80 | L |
016c d4c0 81e4 | |
016e 80c4 c0d8 | |
0170 cc81 6080 | ` |
0172 2918 c8c8 |) |
0174 a170 c0c0 | p |
0176 d8a5 4c81 | L |
0178 18d0 e0a1 | |
017a 0d65 0d31 | e 1|
017c 14a5 4c80 | L |
017e b4c4 81e0 | |
0180 8118 c8c4 | |
0182 a0f4 a54c | L|
0184 8118 d0e0 | |
0186 a0c8 b8c0 | |
0188 a54c 80c8 | L |
018a c081 e081 | |
018c 18c8 c0a1 | |
018e 70a0 a54c |p L|
0190 8118 d8a1 | |
0192 cd95 94a5 | |
0194 4c28 c4d0 |L( |
0196 81e0 a1b9 | |
0198 bdd1 94a5 | |
019a 4c80 c4d0 |L |
019c 81e0 a188 | |
019e a54c 8118 | L |
01a0 c8c0 a170 | p|
01a2 a4a5 4c81 | L |
01a4 18c8 c4a0 | |
01a6 eca5 4c80 | L |
01a8 c4d8 dcd8 | |
01aa 8160 8118 | ` |
01ac d0e0 a164 | d|
01ae a54c 80c4 | L |
01b0 c481 e081 | |
01b2 18c8 c0a0 | |
01b4 f4a5 4c80 | L |
01b6 28c4 c881 |( |
01b8 e081 18d0 | |
01ba e0a0 c0b8 | |
01bc c0a5 4c80 | L |
01be c4cc 81e0 | |
01c0 8118 d8a1 | |
01c2 85b9 90a5 | |
01c4 4c80 c4d0 |L |
01c6 81e0 8118 | |
01c8 d0e0 a160 | `|
01ca a54c 80c4 | L |
01cc c481 e081 | |
01ce 18c8 c4a0 | |
01d0 f0a5 4c80 | L |
01d2 c4c8 81e0 | |
01d4 8118 d0e0 | |
01d6 a0c0 b8c0 | |
01d8 a54c 28d4 | L( |
01da c081 e480 | |
01dc c4c0 d8cc | |
01de 8160 8118 | ` |
01e0 c8c0 a170 | p|
01e2 a170 a185 | p |
01e4 c98d 8dbd | |
01e6 d0a5 4c80 | L |
01e8 e081 e0a1 | |
01ea 70a0 a54c |p L|
01ec 8118 d0e0 | |
01ee a160 a54c | ` L|
01f0 8118 c8c4 | |
01f2 a0f4 a54c | L|
01f4 8118 d0e0 | |
01f6 a164 a54c | d L|
01f8 80b4 c481 | |
01fa e080 2918 | ) |
01fc c8c0 a170 | p|
01fe a570 a4a5 | p |