|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c8f4
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00a8 | | .CONST 0x00a8 ; 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 001c | | .CONST 0x001c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000a | | .CONST 0x000a ; Number of locals
000b INIT_0008:
000b e00e | | Load 0x0,0xe
000c 0322 | " | Declare_Variable Record
000d 00d8 | | Load_Top At_Offset_0
000e 1c00 | | Execute_Immediate Run_Utility,0x0
000f 00e3 | | Load_Encached Natural_Cache
0010 e08e | | Load 0x0,0x8e
0011 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0012 e08e | | Load 0x0,0x8e
0013 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0014 e08e | | Load 0x0,0x8e
0015 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0016 e08e | | Load 0x0,0x8e
0017 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0018 e054 | T | Load 0x0,0x54
0019 0322 | " | Declare_Variable Record
001a 00e1 | | Load_Encached Boolean_Cache
001b 00e3 | | Load_Encached Natural_Cache
001c BODY_0008:
001c e7ff | | Load 0x3,-0x1
001d 808f | | Call 0x0,0x8f
001e a603 | | Store_Unchecked 0x3,0x3
001f e7ff | | Load 0x3,-0x1
0020 8090 | | Call 0x0,0x90
0021 a604 | | Store_Unchecked 0x3,0x4
0022 e7ff | | Load 0x3,-0x1
0023 8091 | | Call 0x0,0x91
0024 a605 | | Store_Unchecked 0x3,0x5
0025 e7ff | | Load 0x3,-0x1
0026 8092 | | Call 0x0,0x92
0027 a606 | | Store_Unchecked 0x3,0x6
0028 e7ff | | Load 0x3,-0x1
0029 8093 | | Call 0x0,0x93
002a a607 | | Store_Unchecked 0x3,0x7
002b 8056 | V | Call 0x0,0x56
002c 00db | | Load_Top At_Offset_3
002d 017d | } | Execute Record,Structure_Write
002e 4800 |H | Short_Literal 0x0
002f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0030 00cf | | Action Mark_Auxiliary
0031 7824 |x$ | Jump 0x56
0032 00db | | Load_Top At_Offset_3
0033 806c | l | Call 0x0,0x6c
0034 e603 | | Load 0x3,0x3
0035 027f | | Execute Discrete,Equal
0036 e608 | | Load 0x3,0x8
0037 806d | m | Call 0x0,0x6d
0038 e604 | | Load 0x3,0x4
0039 027f | | Execute Discrete,Equal
003a 0279 | y | Execute Discrete,And
003b e608 | | Load 0x3,0x8
003c 806e | n | Call 0x0,0x6e
003d e605 | | Load 0x3,0x5
003e 027f | | Execute Discrete,Equal
003f 0279 | y | Execute Discrete,And
0040 e608 | | Load 0x3,0x8
0041 806f | o | Call 0x0,0x6f
0042 e606 | | Load 0x3,0x6
0043 027f | | Execute Discrete,Equal
0044 0279 | y | Execute Discrete,And
0045 e608 | | Load 0x3,0x8
0046 8070 | p | Call 0x0,0x70
0047 e607 | | Load 0x3,0x7
0048 027f | | Execute Discrete,Equal
0049 0279 | y | Execute Discrete,And
004a 6806 |h | Jump_Zero 0x51
004b 4801 |H | Short_Literal 0x1
004c 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
004d 00db | | Load_Top At_Offset_3
004e 806b | k | Call 0x0,0x6b
004f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0050 7808 |x | Jump 0x59
0051 00db | | Load_Top At_Offset_3
0052 8057 | W | Call 0x0,0x57
0053 e608 | | Load 0x3,0x8
0054 017d | } | Execute Record,Structure_Write
0055 00c9 | | Action Pop_Auxiliary_Loop
0056 00db | | Load_Top At_Offset_3
0057 8058 | X | Call 0x0,0x58
0058 6fd9 |o | Jump_Zero 0x32
0059 00ce | | Action Pop_Auxiliary
005a e7ff | | Load 0x3,-0x1
005b e602 | | Load 0x3,0x2
005c 017d | } | Execute Record,Structure_Write
005d e602 | | Load 0x3,0x2
005e 4805 |H | Short_Literal 0x5
005f 8017 | | Call 0x0,0x17
0060 00d1 | | Pop_Control Pop_Count_1
0061 00d9 | | Load_Top At_Offset_1
0062 7031 |p1 | Jump_Nonzero 0x94
0063 e213 | | Load 0x1,0x13
0064 603b |`; | Indirect_Literal Discrete,0xa0,{0x00000000, 0x7fffffff}
0065 027f | | Execute Discrete,Equal
0066 6813 |h | Jump_Zero 0x7a
0067 e00c | | Load 0x0,0xc
0068 0a01 | | Execute_Immediate Plus,0x1
0069 c213 | | Store 0x1,0x13
006a 00cf | | Action Mark_Auxiliary
006b 7809 |x | Jump 0x75
006c e213 | | Load 0x1,0x13
006d 0a01 | | Execute_Immediate Plus,0x1
006e c213 | | Store 0x1,0x13
006f e213 | | Load 0x1,0x13
0070 602f |`/ | Indirect_Literal Discrete,0xa0,{0x00000000, 0x7fffffff}
0071 027f | | Execute Discrete,Equal
0072 6801 |h | Jump_Zero 0x74
0073 7804 |x | Jump 0x78
0074 00c9 | | Action Pop_Auxiliary_Loop
0075 e213 | | Load 0x1,0x13
0076 8036 | 6 | Call 0x0,0x36
0077 77f4 |w | Jump_Nonzero 0x6c
0078 00ce | | Action Pop_Auxiliary
0079 7803 |x | Jump 0x7d
007a e213 | | Load 0x1,0x13
007b 0a01 | | Execute_Immediate Plus,0x1
007c c213 | | Store 0x1,0x13
007d e213 | | Load 0x1,0x13
007e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
007f 00d8 | | Load_Top At_Offset_0
0080 601f |` | Indirect_Literal Discrete,0xa0,{0x00000000, 0x7fffffff}
0081 027f | | Execute Discrete,Equal
0082 6805 |h | Jump_Zero 0x88
0083 e602 | | Load 0x3,0x2
0084 4803 |H | Short_Literal 0x3
0085 8017 | | Call 0x0,0x17
0086 00d1 | | Pop_Control Pop_Count_1
0087 780c |x | Jump 0x94
0088 00db | | Load_Top At_Offset_3
0089 e606 | | Load 0x3,0x6
008a e605 | | Load 0x3,0x5
008b e604 | | Load 0x3,0x4
008c e603 | | Load 0x3,0x3
008d 00d8 | | Load_Top At_Offset_0
008e e094 | | Load 0x0,0x94
008f 0260 | ` | Execute Discrete,In_Type
0090 7001 |p | Jump_Nonzero 0x92
0091 0801 | | Execute_Immediate Raise,0x1
0092 e60a | | Load 0x3,0xa
0093 8095 | | Call 0x0,0x95
0094 e602 | | Load 0x3,0x2
0095 00d9 | | Load_Top At_Offset_1
0096 801e | | Call 0x0,0x1e
0097 00d1 | | Pop_Control Pop_Count_1
0098 e602 | | Load 0x3,0x2
0099 00d9 | | Load_Top At_Offset_1
009a 8016 | | Call 0x0,0x16
009b 00d1 | | Pop_Control Pop_Count_1
009c 00d8 | | Load_Top At_Offset_0
009d e602 | | Load 0x3,0x2
009e 8214 | | Call 0x1,0x14
009f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00a0 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
00a4 0000 0000 | | .BLANK 0000[0x4]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; Debug Table
00a8 ; --------------------------------------------------------------------------------------
00a8 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd1d2,0x0000,0x0001,0x0000
00ae dcca dce8 | | .XXX[0x144]
00b0 40ee d2d8 |@ |
00b2 d840 c4ca | @ |
00b4 40c2 c8c8 |@ |
00b6 cac8 40c2 | @ |
00b8 e840 e8d0 | @ |
00ba ca00 0000 | |
00bc 5000 0000 |P |
00be 9440 92cc | @ |
00c0 40f2 deea |@ |
00c2 e440 c6ea | @ |
00c4 e4e6 dee4 | |
00c6 40d2 e640 |@ @|
00c8 d2dc 40c2 | @ |
00ca 40e6 cac2 |@ |
00cc e4c6 d0d8 | |
00ce d2e6 e858 | X|
00d0 40e8 d0ca |@ |
00d2 40dc caee |@ |
00d4 40c6 deda |@ |
00d6 e0de dcca | |
00d8 dce8 40ee | @ |
00da d2d8 d840 | @|
00dc c4ca 40c2 | @ |
00de c8c8 cac8 | |
00e0 40c2 e840 |@ @|
00e2 e8d0 ca00 | |
00e4 0000 e800 | |
00e6 0000 94c6 | |
00e8 eae4 e6de | |
00ea e440 e0de | @ |
00ec e6d2 e8d2 | |
00ee dedc 7640 | v@|
00f0 dee8 d0ca | |
00f2 e4ee d2e6 | |
00f4 ca58 40e8 | X@ |
00f6 d0ca 40c6 | @ |
00f8 deda e0de | |
00fa dcca dce8 | |
00fc 40ee d2d8 |@ |
00fe d840 c4ca | @ |
0100 40c2 c8c8 |@ |
0102 cac8 40e8 | @ |
0104 de40 e8d0 | @ |
0106 ca40 cadc | @ |
0108 c840 decc | @ |
010a 40f2 deea |@ |
010c e400 0000 | |
010e e600 0000 | |
0110 9640 c6ea | @ |
0112 e4e6 dee4 | |
0114 40e0 dee6 |@ |
0116 d2e8 d2de | |
0118 dc76 40de | v@ |
011a e8d0 cae4 | |
011c eed2 e6ca | |
011e 5840 e8d0 |X@ |
0120 ca40 c6de | @ |
0122 dae0 dedc | |
0124 cadc e840 | @|
0126 eed2 d8d8 | |
0128 40c4 ca40 |@ @|
012a c2c8 c8ca | |
012c c840 e8de | @ |
012e 40e8 d0ca |@ |
0130 40ca dcc8 |@ |
0132 40de cc40 |@ @|
0134 f2de eae4 | |
0136 0000 00e6 | |
0138 0000 0096 | |
013a 40c6 eae4 |@ |
013c e6de e440 | @|
013e e0de e6d2 | |
0140 e8d2 dedc | |
0142 7640 dee8 |v@ |
0144 d0ca e4ee | |
0146 d2e6 ca58 | X|
0148 40e8 d0ca |@ |
014a 40c6 deda |@ |
014c e0de dcca | |
014e dce8 40ee | @ |
0150 d2d8 d840 | @|
0152 c4ca 40c2 | @ |
0154 c8c8 cac8 | |
0156 40e8 de40 |@ @|
0158 e8d0 ca40 | @|
015a cadc c840 | @|
015c decc 40f2 | @ |
015e deea e400 | |
0160 0000 8000 | |
0162 0000 86e6 | |
0164 cac2 e4c6 | |
0166 d0d8 d2e6 | |
0168 e85c 40a8 | \@ |
016a d0d2 e640 | @|
016c c6d0 c2dc | |
016e ceca 40d2 | @ |
0170 e640 c2ea | @ |
0172 e8de dac2 | |
0174 e8d2 c6c2 | |
0176 d8d8 f240 | @|
0178 c6de dada | |
017a d2e8 e8ca | |
017c c840 c2dc | @ |
017e c840 e8c2 | @ |
0180 d6ca e640 | @|
0182 cacc ccca | |
0184 c6e8 0000 | |
0186 007e 0000 | ~ |
0188 0088 40e6 | @ |
018a cac2 e4c6 | |
018c d0d8 d2e6 | |
018e e85c 40a8 | \@ |
0190 d0d2 e640 | @|
0192 c6d0 c2dc | |
0194 ceca 40d2 | @ |
0196 e640 c2ea | @ |
0198 e8de dac2 | |
019a e8d2 c6c2 | |
019c d8d8 f240 | @|
019e c6de dada | |
01a0 d2e8 e8ca | |
01a2 c840 c2dc | @ |
01a4 c840 e8c2 | @ |
01a6 d6ca e640 | @|
01a8 cacc ccca | |
01aa c6e8 0000 | |
01ac 007e 0000 | ~ |
01ae 0088 40e6 | @ |
01b0 cac2 e4c6 | |
01b2 d0d8 d2e6 | |
01b4 e85c 40a8 | \@ |
01b6 d0d2 e640 | @|
01b8 c6d0 c2dc | |
01ba ceca 40d2 | @ |
01bc e640 c2ea | @ |
01be e8de dac2 | |
01c0 e8d2 c6c2 | |
01c2 d8d8 f240 | @|
01c4 c6de dada | |
01c6 d2e8 e8ca | |
01c8 c840 c2dc | @ |
01ca c840 e8c2 | @ |
01cc d6ca e640 | @|
01ce cacc ccca | |
01d0 c6e8 0000 | |
01d2 000a 0000 | |
01d4 0018 d2da | |
01d6 daca c8d2 | |
01d8 c2e8 cad8 | |
01da f25c 0000 | \ |
01dc 0008 0000 | |
01de 001a 40d2 | @ |
01e0 dada cac8 | |
01e2 d2c2 e8ca | |
01e4 d8f2 5c00 | \ |
01e6 0000 0800 | |
01e8 0000 1a40 | @|
01ea d2da daca | |
01ec c8d2 c2e8 | |
01ee cad8 f25c | \|
01f0 0000 0002 | |
01f2 0000 0000 | | .BLANK 0000[0x5]
01f7 0024 0000 | $ | .XXX[0x9]
01f9 0000 0000 | |
01fb 0022 0000 | " |
01fd 0002 0000 | |
01ff 0000 | |