|
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_0d2ce3
└─⟦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 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 e001 | | Load 0x0,0x1
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 e001 | | Load 0x0,0x1
0022 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0023 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0024 BODY_0018:
0024 e001 | | Load 0x0,0x1
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 e002 | | Load 0x0,0x2
002a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
002b e003 | | Load 0x0,0x3
002c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
002d e004 | | Load 0x0,0x4
002e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
002f 4801 |H | Short_Literal 0x1
0030 4800 |H | Short_Literal 0x0
0031 e003 | | Load 0x0,0x3
0032 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0033 e001 | | Load 0x0,0x1
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 e001 | | Load 0x0,0x1
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 0000 | | .DEBUG4 0x0004,0x0000,0x77d8,0x0000,0x0001,0x0000
004e 8080 8080 | | .BLANK 8080[0x9]
0057 a139 bd91 | 9 | .XXX[0x33]
0059 9480 e881 | |
005b 11a5 85b9 | |
005d 84b9 51c9 | Q |
005f 9594 ec81 | |
0061 25b9 9195 |% |
0063 b9d1 85d1 | |
0065 a5bd b880 | |
0067 e881 25b9 | % |
0069 d195 9d95 | |
006b c8a4 ec28 | (|
006d 8080 8081 | |
006f c185 8dad | |
0071 859d 9481 | |
0073 4de5 b589 |M |
0075 bdb1 a58d | |
0077 7d25 bc81 |}% |
0079 a5cc 2880 | ( |
007b 8080 8080 | |
007d 8080 81c1 | |
007f c9bd 8d95 | |
0081 91d5 c994 | |
0083 813d d5d1 | = |
0085 c1d5 d080 | |
0087 a131 a5cd | 1 |
0089 d080 | |
008a 8080 8080 | | .BLANK 8080[0x5]
008f 80e8 8111 | | .XXX[0xa]
0091 a585 b984 | |
0093 b94d 95c5 | M |
0095 d595 b98d | |
0097 94ec 2880 | ( |
0099 8080 8080 | | .BLANK 8080[0xc]
00a5 815d a5d1 | ] | .XXX[0x49]
00a7 a17d 05d1 | } |
00a9 d1c9 a589 | |
00ab d5d1 95cc | |
00ad 80e8 8109 | |
00af bdbd b195 | |
00b1 85b8 80e8 | |
00b3 f481 51c9 | Q |
00b5 d594 a4ec | |
00b7 2828 8080 |(( |
00b9 8080 8080 | |
00bb 8081 c1c9 | |
00bd bd8d 9591 | |
00bf d5c9 9481 | |
00c1 3dd5 d1c1 |= |
00c3 d5d0 80a1 | |
00c5 39bd 9194 |9 |
00c7 80e8 8111 | |
00c9 a585 b984 | |
00cb b951 c995 | Q |
00cd 94ec 815d | ]|
00cf a5d1 a17d | }|
00d1 05d1 d1c9 | |
00d3 a589 d5d1 | |
00d5 95cc 80e8 | |
00d7 8109 bdbd | |
00d9 b195 85b8 | |
00db 80e8 f481 | |
00dd 51c9 d594 |Q |
00df a4ec 2880 | ( |
00e1 8080 8195 | |
00e3 b990 814d | M|
00e5 e5b5 89bd | |
00e7 b1a5 8d7d | }|
00e9 25bc ec28 |% (|
00eb 2880 8080 |( |
00ed 80b4 | |
00ee b4b4 b4b4 | | .BLANK b4b4[0x25]
0113 2828 8080 |(( | .XXX[0x1d]
0115 8081 c185 | |
0117 8dad 859d | |
0119 9481 05d1 | |
011b d1c9 7d39 | }9|
011d 85b5 95cc | |
011f 81a5 cc28 | (|
0121 8080 8080 | |
0123 8080 8081 | |
0125 99d5 b98d | |
0127 d1a5 bdb8 | |
0129 8105 d1d1 | |
012b c97d 0591 | } |
012d 91c9 95cd | |
012f cc80 | |
0130 8080 8080 | | .BLANK 8080[0x4]
0134 8081 c995 | | .XXX[0x18]
0136 d1d5 c9b8 | |
0138 814d e5b5 | M |
013a 89bd b17d | }|
013c 4995 c0ec |I |
013e 2880 8080 |( |
0140 8080 8080 | |
0142 8199 d5b9 | |
0144 8dd1 a5bd | |
0146 b881 05d1 | |
0148 d1c9 7d09 | } |
014a 85cd 9480 | |
014c 8080 8080 | | .BLANK 8080[0x6]
0152 81c9 95d1 | | .XXX[0x17]
0154 d5c9 b881 | |
0156 4de5 b589 |M |
0158 bdb1 7d49 | }I|
015a 95c0 ec28 | (|
015c 8080 8080 | |
015e 8080 8081 | |
0160 99d5 b98d | |
0162 d1a5 bdb8 | |
0164 8105 d1d1 | |
0166 c97d 4da5 | }M |
0168 e994 | |
0169 8080 8080 | | .BLANK 8080[0x6]
016f 8081 c995 | | .XXX[0x18]
0171 d1d5 c9b8 | |
0173 814d e5b5 | M |
0175 89bd b17d | }|
0177 4995 c0ec |I |
0179 2880 8080 |( |
017b 8080 8080 | |
017d 8199 d5b9 | |
017f 8dd1 a5bd | |
0181 b881 05d1 | |
0183 d1c9 7d19 | } |
0185 a5c9 cdd0 | |
0187 8080 8080 | | .BLANK 8080[0x6]
018d 81c9 95d1 | | .XXX[0x17]
018f d5c9 b881 | |
0191 4de5 b589 |M |
0193 bdb1 7d49 | }I|
0195 95c0 ec28 | (|
0197 8080 8080 | |
0199 8080 8081 | |
019b 99d5 b98d | |
019d d1a5 bdb8 | |
019f 8105 d1d1 | |
01a1 c97d 3185 | }1 |
01a3 cdd0 | |
01a4 8080 8080 | | .BLANK 8080[0x6]
01aa 8081 c995 | | .XXX[0x18]
01ac d1d5 c9b8 | |
01ae 814d e5b5 | M |
01b0 89bd b17d | }|
01b2 4995 c0ec |I |
01b4 2880 8080 |( |
01b6 8080 8080 | |
01b8 8199 d5b9 | |
01ba 8dd1 a5bd | |
01bc b881 05d1 | |
01be d1c9 7d25 | }%|
01c0 b585 9d94 | |
01c2 8080 8080 | | .BLANK 8080[0x6]
01c8 81c9 95d1 | | .XXX[0x18]
01ca d5c9 b881 | |
01cc 4de5 b589 |M |
01ce bdb1 7d49 | }I|
01d0 95c0 ec28 | (|
01d2 8080 8080 | |
01d4 8080 8081 | |
01d6 99d5 b98d | |
01d8 d1a5 bdb8 | |
01da 8105 d1d1 | |
01dc c97d 5985 | }Y |
01de b1d5 9480 | |
01e0 8080 8080 | | .BLANK 8080[0x5]
01e5 8081 c995 | | .XXX[0x17]
01e7 d1d5 c9b8 | |
01e9 814d e5b5 | M |
01eb 89bd b17d | }|
01ed 4995 c0ec |I |
01ef 2880 8080 |( |
01f1 8080 8080 | |
01f3 8199 d5b9 | |
01f5 8dd1 a5bd | |
01f7 b881 05d1 | |
01f9 d1c9 7d41 | }A|
01fb bdcc | |
01fc 8080 8080 | | .BLANK 8080[0x4]