|
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_5f28f0
└─⟦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 0090 | | .CONST 0x0090 ; 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 0022 | " | .CONST 0x0022 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000b | | .CONST 0x000b ; Number of locals
000b INIT_0008:
000b 029f 0033 | 3| Declare_Subprogram INIT_0030,For_Call
000d e013 | | Load 0x0,0x13
000e 1917 | | Execute Package,Field_Reference,Field_Number 0x17
000f 00c6 | | Action Check_Subprogram_Elaborated
0010 4802 |H | Short_Literal 0x2
0011 4803 |H | Short_Literal 0x3
0012 0099 | | Action Reference_Dynamic
0013 e023 | # | Load 0x0,0x23
0014 e024 | $ | Load 0x0,0x24
0015 4806 |H | Short_Literal 0x6
0016 0007 | | Action Break_Optional
0017 029f 005b | [| Declare_Subprogram INIT_0058,For_Call
0019 1d0f | | Execute_Immediate Reference_Lex_1,0xf
001a 00c6 | | Action Check_Subprogram_Elaborated
001b 4807 |H | Short_Literal 0x7
001c 4803 |H | Short_Literal 0x3
001d 0099 | | Action Reference_Dynamic
001e e025 | % | Load 0x0,0x25
001f e026 | & | Load 0x0,0x26
0020 480b |H | Short_Literal 0xb
0021 0007 | | Action Break_Optional
0022 BODY_0008:
0022 e7ff | | Load 0x3,-0x1
0023 4808 |H | Short_Literal 0x8
0024 4803 |H | Short_Literal 0x3
0025 0099 | | Action Reference_Dynamic
0026 4809 |H | Short_Literal 0x9
0027 4803 |H | Short_Literal 0x3
0028 0099 | | Action Reference_Dynamic
0029 820f | | Call 0x1,0xf
002a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
002b 0000 0000 | | .BLANK 0000[0x5]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0035 | 5 | .CONST 0x0035 ; Address of begin
0031 0004 | | .CONST 0x0004 ; Address of exception handler
0032 0002 | | .CONST 0x0002 ; Number of locals
0033 INIT_0030:
0033 029f 006b | k| Declare_Subprogram INIT_0068,For_Call
0035 BODY_0030:
0035 00db | | Load_Top At_Offset_3
0036 8802 | | Call 0x4,0x2
0037 701a |p | Jump_Nonzero 0x52
0038 00db | | Load_Top At_Offset_3
0039 8219 | | Call 0x1,0x19
003a 6817 |h | Jump_Zero 0x52
003b e008 | | Load 0x0,0x8
003c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
003d e9ff | | Load 0x4,-0x1
003e 8218 | | Call 0x1,0x18
003f e406 | | Load 0x2,0x6
0040 e214 | | Load 0x1,0x14
0041 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0042 e9fe | | Load 0x4,-0x2
0043 e013 | | Load 0x0,0x13
0044 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0045 e9ff | | Load 0x4,-0x1
0046 8218 | | Call 0x1,0x18
0047 480b |H | Short_Literal 0xb
0048 4802 |H | Short_Literal 0x2
0049 0099 | | Action Reference_Dynamic
004a 480c |H | Short_Literal 0xc
004b 4802 |H | Short_Literal 0x2
004c 0099 | | Action Reference_Dynamic
004d 480d |H | Short_Literal 0xd
004e 4802 |H | Short_Literal 0x2
004f 0099 | | Action Reference_Dynamic
0050 e013 | | Load 0x0,0x13
0051 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0052 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0053 0000 0000 | | .BLANK 0000[0x5]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 00ea | | Load_Encached Null_String_Cache
005c e9fc | | Load 0x4,-0x4
005d e9fd | | Load 0x4,-0x3
005e 4803 |H | Short_Literal 0x3
005f 4803 |H | Short_Literal 0x3
0060 0099 | | Action Reference_Dynamic
0061 4804 |H | Short_Literal 0x4
0062 4803 |H | Short_Literal 0x3
0063 0099 | | Action Reference_Dynamic
0064 e013 | | Load 0x0,0x13
0065 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0066 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0067 0000 | | .XXX[0x1]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0072 | r | .CONST 0x0072 ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0003 | | .CONST 0x0003 ; Number of locals
006b INIT_0068:
006b e008 | | Load 0x0,0x8
006c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
006d 02ff | | Declare_Variable Variant_Record
006e 00d8 | | Load_Top At_Offset_0
006f 1c00 | | Execute_Immediate Run_Utility,0x0
0070 e008 | | Load 0x0,0x8
0071 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0072 BODY_0068:
0072 e008 | | Load 0x0,0x8
0073 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0074 00da | | Load_Top At_Offset_2
0075 6012 |` | Indirect_Literal Discrete,0x88,{0x00000000, 0x00004000}
0076 e010 | | Load 0x0,0x10
0077 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0078 4800 |H | Short_Literal 0x0
0079 e9ff | | Load 0x4,-0x1
007a e008 | | Load 0x0,0x8
007b 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
007c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
007d 00d1 | | Pop_Control Pop_Count_1
007e 0059 | Y | Store_Top Discrete,At_Offset_1
007f 00d9 | | Load_Top At_Offset_1
0080 e008 | | Load 0x0,0x8
0081 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0082 7003 |p | Jump_Nonzero 0x86
0083 00d8 | | Load_Top At_Offset_0
0084 0f08 | | Execute_Immediate Equal,0x8
0085 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0086 4801 |H | Short_Literal 0x1
0087 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0088 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
008c 0000 0000 | | .BLANK 0000[0x4]
0090 ; --------------------------------------------------------------------------------------
0090 ; Debug Table
0090 ; --------------------------------------------------------------------------------------
0090 0004 000c | | .DEBUG4 0x0004,0x000c,0x422d,0x0000,0x0001,0x0000
0096 001a 8ac0 | | .XXX[0x16a]
0098 0208 3e7f | > |
009a ffe0 000e | |
009c c01b a2a0 | |
009e 001b 0ac0 | |
00a0 0208 3e7f | > |
00a2 ffe0 000e | |
00a4 c01c a2a0 | |
00a6 001b 8ac0 | |
00a8 0208 3e7f | > |
00aa ffe0 000e | |
00ac c01d a2a0 | |
00ae 0010 8680 | |
00b0 0210 3e1f | > |
00b2 ffe0 0014 | |
00b4 601f 02a0 |` |
00b6 001e 1c48 | H|
00b8 2008 c400 | |
00ba 0000 000f | |
00bc 0000 02c0 | |
00be 0010 0400 | |
00c0 2218 be1f |" |
00c2 ffe0 000f | |
00c4 0000 82c0 | |
00c6 001c 0ac0 | |
00c8 0208 3e7f | > |
00ca ffe0 000f | |
00cc 0001 82c0 | |
00ce 001c 8ac0 | |
00d0 0208 3e7f | > |
00d2 ffe0 0014 | |
00d4 8002 82c0 | |
00d6 0014 1c88 | |
00d8 2008 c400 | |
00da 0000 000f | |
00dc 8003 82c0 | |
00de 000d 0ac8 | |
00e0 2008 dc00 | |
00e2 0000 000f | |
00e4 8005 22c0 | " |
00e6 0015 0ac8 | |
00e8 2008 c000 | |
00ea 2000 000f | |
00ec 8006 a2c0 | |
00ee 0007 89e8 | |
00f0 2008 cc00 | |
00f2 0000 000f | |
00f4 8008 02c0 | |
00f6 0018 0a08 | |
00f8 2008 d400 | |
00fa 0000 000f | |
00fc 8009 62c0 | b |
00fe 001d 8a28 | (|
0100 2008 d800 | |
0102 0000 0014 | |
0104 a00a a2c0 | |
0106 001c 1cc8 | |
0108 2008 c200 | |
010a 0000 0014 | |
010c c00b 62c0 | b |
010e 000f 9ce8 | |
0110 2008 c800 | |
0112 0000 000f | |
0114 a00c 42c0 | B |
0116 0017 8be8 | |
0118 2008 c800 | |
011a 0000 0014 | |
011c e00d 62c0 | b |
011e 0004 1d08 | |
0120 2008 c200 | |
0122 0000 000f | |
0124 a00e 42c0 | B |
0126 0014 86c0 | |
0128 0210 3e1f | > |
012a ffe0 000f | |
012c a00f 82c0 | |
012e 001f 06c0 | |
0130 0210 3e1f | > |
0132 ffe0 000f | |
0134 a010 82c0 | |
0136 000e 02c0 | |
0138 2218 3e1f |" > |
013a ffe0 000f | |
013c a011 a2c0 | |
013e 0001 0320 | |
0140 2218 3e1f |" > |
0142 ffe0 000f | |
0144 a012 c2c0 | |
0146 0000 0c28 | (|
0148 2008 cc00 | |
014a 0000 000f | |
014c a014 62c0 | b |
014e 0002 0c48 | H|
0150 2008 d000 | |
0152 0000 0015 | |
0154 0016 c2c0 | |
0156 0018 9d08 | |
0158 2008 d000 | |
015a 0000 0015 | |
015c 0018 82c0 | |
015e 0001 1d48 | H|
0160 2008 dc00 | |
0162 0000 0015 | |
0164 201a 62c0 | b |
0166 001a 1de8 | |
0168 2008 c400 | |
016a 0000 0015 | |
016c 201c 42c0 | B |
016e 001f 9de8 | |
0170 2008 c800 | |
0172 0000 0015 | |
0174 401e 42c0 |@ B |
0176 0010 1e08 | |
0178 2008 d200 | |
017a 0000 0015 | |
017c 401f a2c0 |@ |
017e 001e 9e48 | H|
0180 2008 da00 | |
0182 0000 0015 | |
0184 6000 e2e0 |` |
0186 0010 1fc8 | |
0188 2008 c400 | |
018a 0000 0015 | |
018c 4002 42e0 |@ B |
018e 001c 0b20 | |
0190 0208 3e7f | > |
0192 ffe0 0015 | |
0194 4004 42e0 |@ B |
0196 0018 8b20 | |
0198 0208 3e7f | > |
019a ffe0 0015 | |
019c 8005 e2e0 | |
019e 0004 1fe8 | |
01a0 2008 c600 | |
01a2 0000 0015 | |
01a4 0006 a2e0 | |
01a6 0006 1d28 | (|
01a8 2008 d400 | |
01aa 0000 0015 | |
01ac 0008 a2e0 | |
01ae 000b 1d48 | H|
01b0 2008 c000 | |
01b2 2000 000f | |
01b4 e00b 02e0 | |
01b6 0012 8e48 | H|
01b8 2008 d400 | |
01ba 0000 000f | |
01bc e00c e2e0 | |
01be 0007 8f28 | (|
01c0 2008 c400 | |
01c2 2000 0015 | |
01c4 a00e a2e0 | |
01c6 001a 0028 | (|
01c8 4008 c200 |@ |
01ca 0000 0015 | |
01cc c00f 62e0 | b |
01ce 001c 0088 | |
01d0 4008 de1f |@ |
01d2 ffe0 0010 | |
01d4 0010 82e0 | |
01d6 0008 8fe8 | |
01d8 2008 de1f | |
01da ffe0 0010 | |
01dc 0012 02e0 | |
01de 0012 8ae0 | |
01e0 0208 3e7f | > |
01e2 ffe0 0010 | |
01e4 0013 c2e0 | |
01e6 0013 8ae0 | |
01e8 0208 3e7f | > |
01ea ffe0 0010 | |
01ec 0015 42e0 | B |
01ee 0014 0f88 | |
01f0 2008 de1f | |
01f2 ffe0 0015 | |
01f4 e016 62e0 | b |
01f6 0014 00c8 | |
01f8 4008 c400 |@ |
01fa 0000 0010 | |
01fc 0017 42e0 | B |
01fe 0019 9048 | H|