|
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 0058 | X | .CONST 0x0058 ; 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 001b | | .CONST 0x001b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0007 | | .CONST 0x0007 ; 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 e039 | 9 | Load 0x0,0x39
0010 0322 | " | Declare_Variable Record
0011 e7ff | | Load 0x3,-0x1
0012 8085 | | Call 0x0,0x85
0013 00e3 | | Load_Encached Natural_Cache
0014 03f1 | | Declare_Variable Discrete,With_Value
0015 e7ff | | Load 0x3,-0x1
0016 8086 | | Call 0x0,0x86
0017 e7ff | | Load 0x3,-0x1
0018 8087 | | Call 0x0,0x87
0019 e7ff | | Load 0x3,-0x1
001a 8088 | | Call 0x0,0x88
001b BODY_0008:
001b 8064 | d | Call 0x0,0x64
001c e603 | | Load 0x3,0x3
001d 017d | } | Execute Record,Structure_Write
001e 00cf | | Action Mark_Auxiliary
001f 7823 |x# | Jump 0x43
0020 e603 | | Load 0x3,0x3
0021 8078 | x | Call 0x0,0x78
0022 e604 | | Load 0x3,0x4
0023 027f | | Execute Discrete,Equal
0024 4800 |H | Short_Literal 0x0
0025 e605 | | Load 0x3,0x5
0026 e603 | | Load 0x3,0x3
0027 8079 | y | Call 0x0,0x79
0028 8089 | | Call 0x0,0x89
0029 0279 | y | Execute Discrete,And
002a 4800 |H | Short_Literal 0x0
002b e606 | | Load 0x3,0x6
002c e603 | | Load 0x3,0x3
002d 807a | z | Call 0x0,0x7a
002e 8089 | | Call 0x0,0x89
002f 0279 | y | Execute Discrete,And
0030 4800 |H | Short_Literal 0x0
0031 00db | | Load_Top At_Offset_3
0032 e603 | | Load 0x3,0x3
0033 807b | { | Call 0x0,0x7b
0034 8089 | | Call 0x0,0x89
0035 0279 | y | Execute Discrete,And
0036 6807 |h | Jump_Zero 0x3e
0037 e604 | | Load 0x3,0x4
0038 e603 | | Load 0x3,0x3
0039 807c | | | Call 0x0,0x7c
003a e606 | | Load 0x3,0x6
003b e607 | | Load 0x3,0x7
003c e605 | | Load 0x3,0x5
003d 808a | | Call 0x0,0x8a
003e e603 | | Load 0x3,0x3
003f 8065 | e | Call 0x0,0x65
0040 e603 | | Load 0x3,0x3
0041 017d | } | Execute Record,Structure_Write
0042 00c9 | | Action Pop_Auxiliary_Loop
0043 e603 | | Load 0x3,0x3
0044 8066 | f | Call 0x0,0x66
0045 6fda |o | Jump_Zero 0x20
0046 00ce | | Action Pop_Auxiliary
0047 e7ff | | Load 0x3,-0x1
0048 e602 | | Load 0x3,0x2
0049 017d | } | Execute Record,Structure_Write
004a e602 | | Load 0x3,0x2
004b 4805 |H | Short_Literal 0x5
004c 8017 | | Call 0x0,0x17
004d 00d1 | | Pop_Control Pop_Count_1
004e e7ff | | Load 0x3,-0x1
004f 8007 | | Call 0x0,0x7
0050 e602 | | Load 0x3,0x2
0051 8214 | | Call 0x1,0x14
0052 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0053 0000 0000 | | .BLANK 0000[0x5]
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd1d5,0x0000,0x0001,0x0000
005e dab5 8e61 | a| .XXX[0x1a2]
0060 2b10 2000 |+ |
0062 0000 4000 | @ |
0064 0032 d970 | 2 p|
0066 42c1 b56b |B k|
0068 ab02 5636 | V6|
006a 4000 0000 |@ |
006c 8000 0065 | e|
006e b2e0 8583 | |
0070 6ad8 da84 |j |
0072 ad74 8000 | t |
0074 0006 0000 | |
0076 00cb 65c1 | e |
0078 0b06 d5b9 | |
007a c609 5b41 | [A|
007c 0000 0002 | |
007e 0000 0196 | |
0080 cb82 160d | |
0082 ab78 ae12 | x |
0084 b732 0000 | 2 |
0086 0004 0000 | |
0088 032d 9704 | - |
008a 2c1b 56fb |, V |
008c e025 6fc4 | %o |
008e 0000 0008 | |
0090 0000 065b | [|
0092 2e08 5836 |. X6|
0094 ae12 084a | J|
0096 e248 0000 | H |
0098 0010 0000 | |
009a 0cb6 5c10 | \ |
009c b06d 5c4c | m\L|
009e 2095 ca10 | |
00a0 0000 0020 | |
00a2 0000 196c | l|
00a4 b821 60da | !` |
00a6 b8f6 612b | a+|
00a8 c020 0000 | |
00aa 0100 0000 | |
00ac 32d9 7042 |2 pB|
00ae c1b5 7365 | se|
00b0 0257 9640 | W @|
00b2 0000 0080 | |
00b4 0000 65b2 | e |
00b6 e085 836a | j|
00b8 e802 84af | |
00ba 5880 0000 |X |
00bc 0100 0000 | |
00be cb65 c10b | e |
00c0 06d5 d306 | |
00c2 095f 0900 | _ |
00c4 0000 0200 | |
00c6 0001 96cb | |
00c8 8216 0dab | |
00ca ac2e 12be | . |
00cc c200 0000 | |
00ce 0400 0003 | |
00d0 2d97 042c |- ,|
00d2 1b57 6460 | Wd`|
00d4 257e e400 |%~ |
00d6 0000 0800 | |
00d8 0006 5b2e | [.|
00da 0858 36ae | X6 |
00dc f7c8 4b6e | Kn|
00de 8800 0002 | |
00e0 9000 000c | |
00e2 b65c 10b0 | \ |
00e4 6d64 68a0 |mdh |
00e6 96ed 9000 | |
00e8 0000 6000 | ` |
00ea 0019 6cb8 | l |
00ec 2160 dac9 |!` |
00ee 7661 3022 |va0"|
00f0 2000 000d | |
00f2 4000 0032 |@ 2|
00f4 d970 42c1 | pB |
00f6 b5a6 8302 | |
00f8 605a 4000 |`Z@ |
00fa 0000 8000 | |
00fc 0065 b2e0 | e |
00fe 8583 6b4d | kM|
0100 fe84 c0e0 | |
0102 8000 0001 | |
0104 0000 00cb | |
0106 65c1 0b06 |e |
0108 d6a0 0609 | |
010a 8219 0000 | |
010c 0002 0000 | |
010e 0196 cb82 | |
0110 160d ad48 | H|
0112 5e13 04e2 |^ |
0114 0000 0004 | |
0116 0000 032d | -|
0118 9704 2c1b | , |
011a 5aa0 2026 |Z &|
011c 0b24 0000 | $ |
011e 0008 0000 | |
0120 065b 2e08 | [. |
0122 5836 b570 |X6 p|
0124 c84c 2148 | L!H|
0126 0000 0040 | @|
0128 0000 0cb6 | |
012a 5c10 b06d |\ m|
012c 6b42 a098 |kB |
012e 4810 0000 |H |
0130 0020 0000 | |
0132 196c b821 | l !|
0134 60da d73b |` ;|
0136 6130 9b20 |a0 |
0138 0000 0040 | @|
013a 0000 32d9 | 2 |
013c 7042 c1b5 |pB |
013e aff3 0261 | a|
0140 4c40 0000 |L@ |
0142 0080 0000 | |
0144 65b2 e085 |e |
0146 836b 611a | ka |
0148 84c2 c480 | |
014a 0000 0100 | |
014c 0000 cb65 | e|
014e c10b 06d6 | |
0150 c556 0985 | V |
0152 e100 0000 | |
0154 0200 0001 | |
0156 96cb 8216 | |
0158 0dad 919e | |
015a 130c 7200 | r |
015c 0000 0400 | |
015e 0003 2d97 | - |
0160 042c 1b5b | , [|
0162 2f60 261a |/`& |
0164 4400 0000 |D |
0166 0800 0006 | |
0168 5b2e 0858 |[. X|
016a 36b6 6d48 |6 mH|
016c 4c37 4800 |L7H |
016e 0000 1000 | |
0170 000c b65c | \|
0172 10b0 6d6d | mm|
0174 0aa0 9874 | t|
0176 1000 0000 | |
0178 2000 0019 | |
017a 6cb8 2160 |l !`|
017c dada 7961 | ya|
017e 3161 2000 |1a |
0180 0002 c000 | |
0182 0032 d970 | 2 p|
0184 42c1 b5b8 |B |
0186 4302 62d8 |C b |
0188 4000 0000 |@ |
018a 8000 0065 | e|
018c b2e0 8583 | |
018e 6b71 f684 |kq |
0190 c5dc 8000 | |
0192 0001 0000 | |
0194 00cb 65c1 | e |
0196 0b06 d6e6 | |
0198 5609 8c11 |V |
019a 0000 0002 | |
019c 0000 0196 | |
019e cb82 160d | |
01a0 add1 de13 | |
01a2 18d2 0000 | |
01a4 0004 0000 | |
01a6 032d 9704 | - |
01a8 2c1b 5bb0 |, [ |
01aa 2026 3724 | &7$|
01ac 0000 0020 | |
01ae 0000 065b | [|
01b0 2e08 5836 |. X6|
01b2 b78e 484c | HL|
01b4 7108 0000 |q |
01b6 0010 0000 | |
01b8 0cb6 5c10 | \ |
01ba b06d 6f4d | moM|
01bc 2098 e790 | |
01be 0000 0020 | |
01c0 0000 196c | l|
01c2 b821 60da | !` |
01c4 dee5 6131 | a1|
01c6 da20 0000 | |
01c8 0040 0000 | @ |
01ca 32d9 7042 |2 pB|
01cc c1b5 be75 | u|
01ce 0263 ca40 | c @|
01d0 0000 0080 | |
01d2 0000 65b2 | e |
01d4 e085 836b | k|
01d6 7e1e 84c7 |~ |
01d8 c080 0000 | |
01da 0100 0000 | |
01dc cb65 c10b | e |
01de 06d6 fec6 | |
01e0 098f d900 | |
01e2 0000 0200 | |
01e4 0001 96cb | |
01e6 8216 0dae | |
01e8 02fe 1320 | |
01ea 6200 0000 |b |
01ec 0400 0003 | |
01ee 2d97 042c |- ,|
01f0 1b5c 11a0 | \ |
01f2 2642 2400 |&B$ |
01f4 0000 0800 | |
01f6 0006 5b2e | [.|
01f8 0858 36b8 | X6 |
01fa 3788 4c87 |7 L |
01fc 0800 0000 | |
01fe 1000 000c | |