|
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 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 e024 | $ | Load 0x0,0x24
0014 e025 | % | Load 0x0,0x25
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 e026 | & | Load 0x0,0x26
001f e027 | ' | Load 0x0,0x27
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 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
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 000d | | .DEBUG4 0x0004,0x000d,0x96c4,0x0000,0x0001,0x0000
0096 8022 4000 | "@ | .XXX[0x2]
0098 0000 0000 | | .BLANK 0000[0x12]
00aa 0003 9500 | | .XXX[0x2]
00ac 0000 0000 | | .BLANK 0000[0x8]
00b4 03d4 8000 | | .XXX[0x2]
00b6 0000 0000 | | .BLANK 0000[0x5]
00bb 00f7 e000 | | .XXX[0x2]
00bd 0000 0000 | | .BLANK 0000[0xa]
00c7 03eb 8000 | | .XXX[0x9]
00c9 0011 9202 | |
00cb 0800 3e80 | > |
00cd 0000 0116 | |
00cf 6000 |` |
00d0 0000 0000 | | .BLANK 0000[0x5]
00d5 003f a008 | ? | .XXX[0x3]
00d7 1000 | |
00d8 0000 0000 | | .BLANK 0000[0x7]
00df 4d08 |M | .XXX[0x1]
00e0 0000 0000 | | .BLANK 0000[0x8]
00e8 003f 5000 | ?P | .XXX[0x2]
00ea 0000 0000 | | .BLANK 0000[0x5]
00ef 0013 aa00 | | .XXX[0x7]
00f1 0000 0000 | |
00f3 0000 00ef | |
00f5 e000 | |
00f6 0000 0000 | | .BLANK 0000[0xa]
0100 040b 8088 | | .XXX[0x14]
0102 0000 0000 | |
0104 0000 4ab0 | J |
0106 0000 0000 | |
0108 0000 0003 | |
010a 9b80 8500 | |
010c 0000 0000 | |
010e 0043 8000 | C |
0110 0000 ee80 | |
0112 0000 03e3 | |
0114 0000 0000 | | .BLANK 0000[0x4]
0118 3ca0 |< | .XXX[0x1]
0119 0000 0000 | | .BLANK 0000[0x8]
0121 0041 f800 | A | .XXX[0xd]
0123 0001 0260 | `|
0125 0000 0000 | |
0127 0000 0012 | |
0129 8600 0000 | |
012b 0000 0000 | |
012d 012c | , |
012e 0000 0000 | | .BLANK 0000[0x12]
0140 012d 4000 | -@ | .XXX[0x7]
0142 0000 0000 | |
0144 0000 1044 | D|
0146 0200 | |
0147 0000 0000 | | .BLANK 0000[0x7]
014e 0013 9600 | | .XXX[0x4]
0150 0000 3a90 | : |
0152 0000 0000 | | .BLANK 0000[0x6]
0158 0f3c 0000 | < | .XXX[0xd]
015a 0000 0000 | |
015c 0001 2360 | #`|
015e 21c0 04dc |! |
0160 0000 000e | |
0162 d002 0c00 | |
0164 45f0 |E |
0165 0000 0000 | | .BLANK 0000[0xf]
0174 0010 a600 | | .XXX[0x8c]
0176 0000 4548 | EH|
0178 0000 011a | |
017a e000 0004 | |
017c 7280 8400 |r |
017e 11e8 0000 | |
0180 0048 1808 | H |
0182 6001 21e0 |` ! |
0184 0000 0494 | |
0186 8000 0013 | |
0188 0e00 0000 | |
018a 4d68 0000 |Mh |
018c 81e0 28a1 | ( |
018e bdc1 95c9 | |
0190 85d1 bdc9 | |
0192 ccb8 a54c | L|
0194 80d8 c081 | |
0196 e480 d0c4 | |
0198 c081 60a1 | ` |
019a 51a1 94a5 |Q |
019c 4c80 c4c4 |L |
019e 81e0 a1c1 | |
01a0 c9bd c1bd | |
01a2 cd95 90a5 | |
01a4 4c80 c4c4 |L |
01a6 81e0 a1cd | |
01a8 d185 b991 | |
01aa 85c9 90a5 | |
01ac 4c80 c4c4 |L |
01ae 81e0 28a1 | ( |
01b0 cdd5 89cd | |
01b2 d1a5 d1d5 | |
01b4 d195 cca5 | |
01b6 4c80 c4c8 |L |
01b8 81e0 a184 | |
01ba a54c 80c4 | L |
01bc c481 e0a1 | |
01be cdb5 85b1 | |
01c0 b0b5 8589 | |
01c2 cdbd b1d5 | |
01c4 d194 b595 | |
01c6 c9c9 bdc8 | |
01c8 a54c 80c4 | L |
01ca c481 e028 | (|
01cc a1c9 95c5 | |
01ce d5a5 c995 | |
01d0 b595 b9d0 | |
01d2 a54c 80c4 | L |
01d4 c481 e0a1 | |
01d6 99bd c8a5 | |
01d8 4c80 c4c4 |L |
01da 81e0 a1d1 | |
01dc a194 a54c | L|
01de 80c4 c481 | |
01e0 e0a1 cdb5 | |
01e2 85b1 b0b5 | |
01e4 c995 b185 | |
01e6 d1a5 d994 | |
01e8 b595 c9c9 | |
01ea bdc8 a54c | L|
01ec 8028 c4c4 | ( |
01ee 81e0 a1c9 | |
01f0 95c5 d5a5 | |
01f2 c995 b595 | |
01f4 b9d0 a54c | L|
01f6 80c4 c881 | |
01f8 e0a1 a5b8 | |
01fa a54c 80d4 | L |
01fc c081 e480 | |
01fe ccc8 dc81 | |