|
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 0048 | H | .CONST 0x0048 ; 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 0024 | $ | .CONST 0x0024 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0003 | | .CONST 0x0003 ; Number of locals
001b INIT_0018:
001b e002 | | Load 0x0,0x2
001c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
001d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
001e 02c7 | | Declare_Variable Any
001f 00d8 | | Load_Top At_Offset_0
0020 1c00 | | Execute_Immediate Run_Utility,0x0
0021 e002 | | Load 0x0,0x2
0022 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0023 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0024 BODY_0018:
0024 e002 | | Load 0x0,0x2
0025 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0026 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0027 00da | | Load_Top At_Offset_2
0028 601b |` | Indirect_Literal Discrete,0x44,{0x00000000, 0x00004000}
0029 e003 | | Load 0x0,0x3
002a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
002b e004 | | Load 0x0,0x4
002c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
002d e005 | | Load 0x0,0x5
002e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
002f 4801 |H | Short_Literal 0x1
0030 4800 |H | Short_Literal 0x0
0031 e004 | | Load 0x0,0x4
0032 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0033 e002 | | Load 0x0,0x2
0034 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0035 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0036 e5ff | | Load 0x2,-0x1
0037 e002 | | Load 0x0,0x2
0038 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0039 181b | | Execute Package,Field_Execute,Field_Number 0x1b
003a c402 | | Store 0x2,0x2
003b 0059 | Y | Store_Top Discrete,At_Offset_1
003c 00d8 | | Load_Top At_Offset_0
003d 0f00 | | Execute_Immediate Equal,0x0
003e 00d9 | | Load_Top At_Offset_1
003f 0f06 | | Execute_Immediate Equal,0x6
0040 0278 | x | Execute Discrete,Or
0041 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0042 0000 0000 | | .XXX[0x2]
0044 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0048 ; --------------------------------------------------------------------------------------
0048 ; Debug Table
0048 ; --------------------------------------------------------------------------------------
0048 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b8a,0x0000,0x0001,0x0000
004e 0018 1ef4 | | .XXX[0x49]
0050 0c02 0400 | |
0052 95f4 3800 | 8 |
0054 0002 c000 | |
0056 0000 0000 | |
0058 6a50 1000 |jP |
005a 0000 0000 | |
005c eda0 1000 | |
005e 9354 3800 | T8 |
0060 0002 c008 | |
0062 bc05 ac00 | |
0064 a008 c005 | |
0066 b008 e005 | |
0068 b400 e808 | |
006a e405 b808 | |
006c e805 d008 | |
006e ec05 e401 | |
0070 8406 5001 | P |
0072 9c06 6806 | h |
0074 a801 dc01 | |
0076 f008 4c02 | L |
0078 9408 5002 | P |
007a b808 5408 | T |
007c 5802 ec08 |X |
007e 5c03 2008 |\ |
0080 6003 3408 |` 4 |
0082 6408 6803 |d h |
0084 9408 6c03 | l |
0086 a808 7003 | p |
0088 bc08 7403 | t |
008a c808 7808 | x |
008c 7c08 8004 || |
008e 4808 8408 |H |
0090 8808 8c05 | |
0092 9808 9005 | |
0094 a408 9405 | |
0096 a800 | |
0097 0000 0000 | | .BLANK 0000[0x7]
009e 1000 3d1f | = | .XXX[0x1f]
00a0 c400 0000 | |
00a2 0400 0000 | |
00a4 0000 10d0 | |
00a6 c904 cc00 | |
00a8 0000 18c8 | |
00aa d111 10c1 | |
00ac 1400 0018 | |
00ae f000 3d60 | =`|
00b0 0000 000c | |
00b2 6004 0002 |` |
00b4 ec00 0200 | |
00b6 0801 9000 | |
00b8 1000 8f80 | |
00ba 046c 8004 | l |
00bc a403 | |
00bd 1003 1003 | | .BLANK 1003[0xd]
00ca 1120 0520 | | .XXX[0x67]
00cc 0803 880f | |
00ce e708 6b88 | k |
00d0 6810 0b08 |h |
00d2 6c0a 6801 |l h |
00d4 af08 380a | 8 |
00d6 6802 2f08 |h / |
00d8 3c0a 6802 |< h |
00da 8f08 400a | @ |
00dc 6802 cf08 |h |
00de 440a 6803 |D h |
00e0 2f08 480a |/ H |
00e2 6803 4f08 |h O |
00e4 4c0a 6803 |L h |
00e6 6f08 500a |o P |
00e8 6804 cf08 |h |
00ea 540a 6805 |T h |
00ec 6f08 580a |o X |
00ee 6805 af08 |h |
00f0 5c02 ff80 |\ |
00f2 0864 5800 | dX |
00f4 1f80 046c | l|
00f6 a803 8403 | |
00f8 8c03 8c03 | |
00fa 8780 046c | l|
00fc 3874 5003 |8tP |
00fe 1c0a 7405 | t |
0100 ec74 3803 | t8 |
0102 1c74 3c03 | t< |
0104 1c74 4003 | t@ |
0106 1c74 4403 | tD |
0108 1c74 4803 | tH |
010a 1c74 4c03 | tL |
010c 1c74 5403 | tT |
010e 1c74 5803 | tX |
0110 1c74 5c03 | t\ |
0112 1c02 f002 | |
0114 ec00 0000 | |
0116 0001 ac01 | |
0118 dc00 0403 | |
011a 8797 ff80 | |
011c 0860 3b17 | `; |
011e fb97 f9c0 | |
0120 0514 0a08 | |
0122 8f80 0860 | `|
0124 3d14 0b80 |= |
0126 086c 3404 | l4 |
0128 3da0 0f80 |= |
012a 046c a009 | l |
012c 5f80 0860 |_ `|
012e 3c03 6004 |< ` |
0130 0400 | |
0131 0000 0000 | | .BLANK 0000[0x5]
0136 0002 2c02 | , | .XXX[0x3a]
0138 4800 0797 |H |
013a ff80 0860 | `|
013c 4208 8f80 |B |
013e 0860 4514 | `E |
0140 0b80 086c | l|
0142 3404 3da0 |4 = |
0144 0f80 046c | l|
0146 a009 5f80 | _ |
0148 0860 4403 | `D |
014a 6004 0400 |` |
014c 0000 0000 | |
014e 0002 8c00 | |
0150 1000 0520 | |
0152 0288 7920 | y |
0154 0288 7d20 | } |
0156 0288 8124 | $|
0158 fb80 0c60 | `|
015a 6d24 fe88 |m$ |
015c 7514 0400 |u |
015e 0002 cc00 | |
0160 1000 0520 | |
0162 0288 8520 | |
0164 0288 7920 | y |
0166 0288 7d20 | } |
0168 0288 8124 | $|
016a ff80 0c60 | `|
016c 7124 fe88 |q$ |
016e 7514 0400 |u |
0170 0000 0000 | | .BLANK 0000[0x6]
0176 0003 2c00 | , | .XXX[0x8a]
0178 1000 0520 | |
017a 0688 8514 | |
017c 0400 0000 | |
017e 0003 4c00 | L |
0180 1000 0520 | |
0182 0688 7914 | y |
0184 0400 0000 | |
0186 0003 7400 | t |
0188 1000 0b88 | |
018a 7c00 1d20 || |
018c 0288 7d20 | } |
018e 0288 8403 | |
0190 3de0 1f88 |= |
0192 802b ff08 | + |
0194 8124 ff80 | $ |
0196 0c60 7003 | `p |
0198 2788 8030 |' 0|
019a 05df d803 | |
019c 3b88 79a0 |; y |
019e bd20 0288 | |
01a0 7b88 34f0 |{ 4 |
01a2 71a0 6780 |q g |
01a4 046c 95a0 | l |
01a6 3d20 0120 |= |
01a8 0120 a402 | |
01aa 480b 5b88 |H [ |
01ac 34f0 7380 |4 s |
01ae 046c c004 | l |
01b0 7070 0407 |pp |
01b2 3007 2f80 |0 / |
01b4 1060 4388 | `C |
01b6 8803 ab88 | |
01b8 34f0 7380 |4 s |
01ba 1460 59e0 | `Y |
01bc 1924 fb80 | $ |
01be 0c60 6d24 | `m$|
01c0 ff80 0c60 | `|
01c2 7388 34f0 |s 4 |
01c4 75a0 4f88 |u O |
01c6 34f0 7788 |4 w |
01c8 34e0 7120 |4 q |
01ca 0388 34e0 | 4 |
01cc 75e0 2c03 |u , |
01ce 3f90 0920 |? |
01d0 0409 8dc0 | |
01d2 1520 8380 | |
01d4 0c60 6803 | `h |
01d6 20ff ec03 | |
01d8 3b97 ff80 |; |
01da 0c60 6b97 | `k |
01dc fe88 7514 | u |
01de 0804 cc00 | |
01e0 1000 0788 | |
01e2 8030 05a0 | 0 |
01e4 4520 0520 |E |
01e6 0388 8388 | |
01e8 34f0 2009 |4 |
01ea c780 046c | l|
01ec 4003 6403 |@ d |
01ee 4009 81c0 |@ |
01f0 0420 0780 | |
01f2 1460 6120 | `a |
01f4 0288 8388 | |
01f6 7c30 05a0 ||0 |
01f8 2b97 fda0 |+ |
01fa 0d20 0288 | |
01fc 7d14 0b88 |} |
01fe 7c2b ff08 ||+ |