|
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_0bf8df
└─⟦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 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 e002 | | Load 0x0,0x2
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 e002 | | Load 0x0,0x2
002c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
002d 6012 |` | Indirect_Literal Discrete,0x40,{0x00000000, 0x00004000}
002e e003 | | Load 0x0,0x3
002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0030 e004 | | Load 0x0,0x4
0031 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0032 e005 | | Load 0x0,0x5
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 e005 | | Load 0x0,0x5
0038 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0039 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
003a e005 | | Load 0x0,0x5
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 0002 | | .DEBUG4 0x0004,0x0002,0x0b92,0x0000,0x0001,0x0000
0066 2e49 4e53 |.INS| .XXX[0x24]
0068 5441 4c4c |TALL|
006a 5f50 524f |_PRO|
006c 4455 4354 |DUCT|
006e 2753 5045 |'SPE|
0070 4380 0003 |C |
0072 4080 0b80 |@ |
0074 0000 0010 | |
0076 0000 00f4 | |
0078 94e5 3544 | 5D|
007a 14c4 c5f5 | |
007c 0524 f445 | $ E|
007e 5435 4800 |T5H |
0080 0139 e000 | 9 |
0082 0127 c400 | ' |
0084 0000 4800 | H |
0086 1420 2000 | |
0088 0000 1800 | |
008a 0000 0000 | | .BLANK 0000[0x4]
008e 008f d000 | | .XXX[0xa]
0090 0085 0200 | |
0092 0000 2400 | $ |
0094 0a10 2000 | |
0096 0000 0c00 | |
0098 0000 0000 | | .BLANK 0000[0x4]
009c 0040 6800 | @h | .XXX[0xa]
009e 003a f100 | : |
00a0 0000 1200 | |
00a2 0508 1400 | |
00a4 0000 0600 | |
00a6 0000 0000 | | .BLANK 0000[0x4]
00aa 001c 8400 | | .XXX[0xa]
00ac 0019 e080 | |
00ae 0000 0900 | |
00b0 0284 0c00 | |
00b2 0000 0300 | |
00b4 0000 0000 | | .BLANK 0000[0x4]
00b8 000c 7600 | v | .XXX[0xa]
00ba 000b 2440 | $@|
00bc 0000 0480 | |
00be 0142 0700 | B |
00c0 0000 0180 | |
00c2 0000 0000 | | .BLANK 0000[0x4]
00c6 0005 5500 | U | .XXX[0xa]
00c8 0004 ac20 | |
00ca 0000 0240 | @|
00cc 00a1 0400 | |
00ce 0000 00c0 | |
00d0 0000 0000 | | .BLANK 0000[0x4]
00d4 0002 3f80 | ? | .XXX[0xa]
00d6 0001 f310 | |
00d8 0000 0120 | |
00da 0050 8240 | P @|
00dc 0000 0060 | `|
00de 0000 0000 | | .BLANK 0000[0x5]
00e3 ea40 0000 | @ | .XXX[0x9]
00e5 c008 0000 | |
00e7 0090 0028 | (|
00e9 4140 0000 |A@ |
00eb 0030 | 0 |
00ec 0000 0000 | | .BLANK 0000[0x5]
00f1 55e0 0002 |U | .XXX[0x9]
00f3 68ec 0000 |h |
00f5 0048 0014 | H |
00f7 20b0 0000 | |
00f9 0018 | |
00fa 0000 0000 | | .BLANK 0000[0x5]
00ff 0d02 c081 | | .XXX[0x101]
0101 0000 0411 | |
0103 c000 1016 | |
0105 4000 01d0 |@ |
0107 4000 01d0 |@ |
0109 4081 0cc0 |@ |
010b 810c c081 | |
010d 0cc0 810c | |
010f c081 0cc0 | |
0111 810c c081 | |
0113 0cc0 810c | |
0115 c081 0cc0 | |
0117 810c c081 | |
0119 0cc0 810c | |
011b c081 0cc0 | |
011d 810c c028 | (|
011f 810c c081 | |
0121 0cc0 810c | |
0123 c081 0cc0 | |
0125 810c c081 | |
0127 0cc0 810c | |
0129 c081 0cc0 | |
012b 810c c081 | |
012d 0cc0 810c | |
012f c081 0cc0 | |
0131 810c c081 | |
0133 0cc0 810c | |
0135 c081 0cc0 | |
0137 8119 1481 | |
0139 1914 f829 | )|
013b 4161 310c |Aa1 |
013d 8149 4028 | I@(|
013f c4dc c8d0 | |
0141 80c8 e4c8 | |
0143 d481 6164 | ad|
0145 8118 c8e0 | |
0147 a16c a54c | l L|
0149 2961 4080 |)a@ |
014b bd18 d4d8 | |
014d 80bd 8db5 | |
014f cde4 e080 | |
0151 ccc0 c080 | |
0153 cccc b8c8 | |
0155 80cc ccb8 | |
0157 c880 c4c8 | |
0159 e081 6cb4 | l |
015b c480 b4cc | |
015d c880 cce0 | |
015f 80c8 d974 | t|
0161 8141 6131 | Aa1|
0163 3918 8149 |9 I|
0165 4029 6140 |@)a@|
0167 80bd 18d4 | |
0169 d880 c080 | |
016b c8dc 80cc | |
016d 80dc 80c8 | |
016f cc80 e480 | |
0171 c880 c8d0 | |
0173 80c0 28f1 | ( |
0175 1919 1919 | |
0177 18c0 8119 | |
0179 1919 1918 | |
017b c0f8 2941 | )A|
017d 6131 0c81 |a1 |
017f 4940 28c4 |I@( |
0181 dccc cc80 | |
0183 c8e4 c8d4 | |
0185 8161 6481 | ad |
0187 18d4 d8a1 | |
0189 70c0 c0c0 |p |
018b a54c 2961 | L)a|
018d 4080 bd18 |@ |
018f e0dc 80c8 | |
0191 d480 c8c0 | |
0193 80c4 80c0 | |
0195 80c4 e480 | |
0197 c4d0 80c4 | |
0199 d080 c8d0 | |
019b 80c0 28f0 | ( |
019d c119 1919 | |
019f 0cc0 80c5 | |
01a1 1919 190c | |
01a3 c080 c8c4 | |
01a5 c0e0 c0c0 | |
01a7 80d0 c4c4 | |
01a9 c0c0 c080 | |
01ab e0c4 c4c0 | |
01ad c0c0 80c0 | |
01af c8c4 c0c0 | |
01b1 c080 c0c8 | |
01b3 c4c0 c0c0 | |
01b5 80c0 c8c4 | |
01b7 c0c0 c080 | |
01b9 c0d8 c4c0 | |
01bb c0c0 2880 | ( |
01bd c0d0 c4c0 | |
01bf c0c0 80c1 | |
01c1 0cc4 c0c0 | |
01c3 c080 c10c | |
01c5 c4e0 c0c0 | |
01c7 80c4 e0c4 | |
01c9 e0c0 c080 | |
01cb c4e0 c0e0 | |
01cd c0c0 f829 | )|
01cf 4161 310c |Aa1 |
01d1 8149 4028 | I@(|
01d3 c4dc d8c4 | |
01d5 80c8 e4c8 | |
01d7 d481 6164 | ad|
01d9 8118 e0dc | |
01db a170 c0cc | p |
01dd c4a5 4c80 | L |
01df c481 e0a0 | |
01e1 eca5 4c80 | L |
01e3 d881 e0a1 | |
01e5 70c0 ccc4 |p |
01e7 a54c 80c4 | L |
01e9 81e0 8118 | |
01eb c8e0 a170 | p|
01ed a4a5 4c80 | L |
01ef c4c4 81e0 | |
01f1 8118 d4d4 | |
01f3 28a1 c985 |( |
01f5 91a5 85b9 | |
01f7 ccb0 a54c | L|
01f9 80c4 c481 | |
01fb e0a1 85b9 | |
01fd 90a5 4c80 | L |
01ff c4c4 | |