|
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_0220f2
└─⟦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 0023 | # | .CONST 0x0023 ; 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 1b0f | | Execute Package,Field_Read,Field_Number 0xf
001d 02c7 | | Declare_Variable Any
001e 00d8 | | Load_Top At_Offset_0
001f 1c00 | | Execute_Immediate Run_Utility,0x0
0020 e001 | | Load 0x0,0x1
0021 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0022 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0023 BODY_0018:
0023 e001 | | Load 0x0,0x1
0024 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0025 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0026 00da | | Load_Top At_Offset_2
0027 0120 | | Execute Any,Is_Value
0028 6803 |h | Jump_Zero 0x2c
0029 e001 | | Load 0x0,0x1
002a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
002b 7801 |x | Jump 0x2d
002c 00da | | Load_Top At_Offset_2
002d 6012 |` | Indirect_Literal Discrete,0x40,{0x00000000, 0x00004000}
002e e002 | | Load 0x0,0x2
002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0030 e003 | | Load 0x0,0x3
0031 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0032 e001 | | Load 0x0,0x1
0033 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0034 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0035 e5ff | | Load 0x2,-0x1
0036 e001 | | Load 0x0,0x1
0037 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0038 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0039 c402 | | Store 0x2,0x2
003a 0059 | Y | Store_Top Discrete,At_Offset_1
003b 00d8 | | Load_Top At_Offset_0
003c 0f00 | | Execute_Immediate Equal,0x0
003d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
003e 0000 0000 | | .XXX[0x2]
0040 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0044 0000 0000 | | .BLANK 0000[0x4]
0048 ; --------------------------------------------------------------------------------------
0048 ; Debug Table
0048 ; --------------------------------------------------------------------------------------
0048 0004 000d | | .DEBUG4 0x0004,0x000d,0x7940,0x0000,0x0001,0x0000
004e 3c00 e001 |< | .XXX[0x23]
0050 1b0f 0119 | |
0052 e001 1814 | |
0054 8008 e5fe | |
0056 0227 3c03 | '< |
0058 027b 77e8 | {w |
005a 00ce 8405 | |
005c 4502 0000 |E |
005e 0000 0000 | |
0060 0463 0004 | c |
0062 0001 00da | |
0064 0227 3c00 | '< |
0066 0227 3c00 | '< |
0068 e001 1b0f | |
006a 0119 e001 | |
006c 1810 00db | |
006e 821c 01cc | |
0070 4401 |D |
0071 0000 0000 | | .BLANK 0000[0x7]
0078 0483 0004 | | .XXX[0x4b]
007a 0002 4801 | H |
007c 00db e001 | |
007e 1b15 e00a | |
0080 1820 00e2 | |
0082 03f1 00d8 | |
0084 7002 00ea |p |
0086 4401 00d8 |D |
0088 e5ff 01dc | |
008a e5ff 01cf | |
008c 0335 00cd | 5 |
008e 4401 0000 |D |
0090 0493 0004 | |
0092 0001 00da | |
0094 0227 3c05 | '< |
0096 0f01 681f | h |
0098 00da 0227 | '|
009a 3c02 00db |< |
009c 0227 3c00 | '< |
009e 0227 3c00 | '< |
00a0 e001 1b0f | |
00a2 0119 e001 | |
00a4 1814 8008 | |
00a6 00db 0227 | '|
00a8 3c01 0217 |< |
00aa 2802 00da |( |
00ac 0227 3c00 | '< |
00ae 0227 3c05 | '< |
00b0 0aff 00db | |
00b2 0227 3c00 | '< |
00b4 0227 3805 | '8 |
00b6 4501 00da |E |
00b8 0227 3c00 | '< |
00ba 0227 3c04 | '< |
00bc 0aff 00db | |
00be 0227 3c00 | '< |
00c0 0227 3804 | '8 |
00c2 4501 |E |
00c3 0000 0000 | | .BLANK 0000[0x5]
00c8 04cb 0004 | | .XXX[0xc]
00ca 0001 00da | |
00cc e5fe 0227 | '|
00ce 3c02 800b |< |
00d0 e5fe 0227 | '|
00d2 3804 4502 |8 E |
00d4 0000 0000 | | .BLANK 0000[0x4]
00d8 04db 0004 | | .XXX[0xb]
00da 0001 00da | |
00dc 0227 3c02 | '< |
00de 00db 0227 | '|
00e0 3c04 8008 |< |
00e2 4401 |D |
00e3 0000 0000 | | .BLANK 0000[0x5]
00e8 04eb 0004 | | .XXX[0x7a]
00ea 0001 00da | |
00ec 0227 3c05 | '< |
00ee 7009 00da |p |
00f0 0227 3c03 | '< |
00f2 00db 0227 | '|
00f4 3c04 e003 |< |
00f6 181d 4401 | D |
00f8 00da 0227 | '|
00fa 3c00 0227 |< '|
00fc 3c00 e001 |< |
00fe 1b0f 0119 | |
0100 e001 1814 | |
0102 00db 0227 | '|
0104 3c04 e003 |< |
0106 181d 4401 | D |
0108 0515 0004 | |
010a 0002 00da | |
010c 0227 3c04 | '< |
010e 00db 0227 | '|
0110 3c03 8008 |< |
0112 09fd 00e5 | |
0114 03f1 00d8 | |
0116 0d01 6803 | h |
0118 4800 a5fd |H |
011a 4501 00d8 |E |
011c e5fe 01db | |
011e 027c 682c | |h,|
0120 e5fe 00d8 | |
0122 01dd e5fe | |
0124 01dd 00db | |
0126 00d8 00e3 | |
0128 0260 7001 | `p |
012a 0801 0273 | s|
012c 0aff 00d8 | |
012e 00e2 0260 | `|
0130 7001 0801 |p |
0132 00da 035b | [|
0134 00d0 01cd | |
0136 e5ff 0229 | )|
0138 00e3 00da | |
013a 00da 3c04 | < |
013c e5ff 0227 | '|
013e 3c00 0227 |< '|
0140 3c01 0227 |< '|
0142 3c00 e003 |< |
0144 1b33 180f | 3 |
0146 00db 3804 | 8 |
0148 00d1 c5fd | |
014a 00d2 4501 | E |
014c 00db 0229 | )|
014e 00e3 e5fe | |
0150 00da 3c04 | < |
0152 e5ff 0227 | '|
0154 3c00 0227 |< '|
0156 3c01 0227 |< '|
0158 3c00 e003 |< |
015a 1b33 180f | 3 |
015c 00db 3804 | 8 |
015e 00d1 c5fd | |
0160 00d1 4501 | E |
0162 0000 0000 | | .BLANK 0000[0x6]
0168 056b 0004 | k | .XXX[0x72]
016a 0001 00db | |
016c 0229 00d8 | ) |
016e 3c04 e5ff |< |
0170 e5fe 0227 | '|
0172 3c00 0227 |< '|
0174 3c01 0227 |< '|
0176 3c00 e003 |< |
0178 1b33 1813 | 3 |
017a 00d9 3804 | 8 |
017c 4502 0000 |E |
017e 0000 0000 | |
0180 058d 0004 | |
0182 0002 00da | |
0184 0227 3c04 | '< |
0186 00db 0227 | '|
0188 3c03 8008 |< |
018a 09fd 00e5 | |
018c 03f1 00d8 | |
018e 0d01 6803 | h |
0190 4800 a5fd |H |
0192 4501 00d8 |E |
0194 e5fe 01db | |
0196 027c 682c | |h,|
0198 e5fe 00d8 | |
019a 01dd e5fe | |
019c 01dd 00db | |
019e 00d8 00e3 | |
01a0 0260 7001 | `p |
01a2 0801 0273 | s|
01a4 0aff 00d8 | |
01a6 00e2 0260 | `|
01a8 7001 0801 |p |
01aa 00da 035b | [|
01ac 00d0 01cd | |
01ae e5ff 0229 | )|
01b0 00e3 00da | |
01b2 00da 3c04 | < |
01b4 e5ff 0227 | '|
01b6 3c00 0227 |< '|
01b8 3c01 0227 |< '|
01ba 3c00 e003 |< |
01bc 1b33 1811 | 3 |
01be 00db 3804 | 8 |
01c0 00d1 c5fd | |
01c2 00d2 4501 | E |
01c4 00db 0229 | )|
01c6 00e3 e5fe | |
01c8 00da 3c04 | < |
01ca e5ff 0227 | '|
01cc 3c00 0227 |< '|
01ce 3c01 0227 |< '|
01d0 3c00 e003 |< |
01d2 1b33 1811 | 3 |
01d4 00db 3804 | 8 |
01d6 00d1 c5fd | |
01d8 00d1 4501 | E |
01da 0000 0000 | | .BLANK 0000[0x6]
01e0 05e3 0004 | | .XXX[0x20]
01e2 0001 00db | |
01e4 0229 00d8 | ) |
01e6 3c04 e5ff |< |
01e8 e5fe 0227 | '|
01ea 3c00 0227 |< '|
01ec 3c01 0227 |< '|
01ee 3c00 e003 |< |
01f0 1b33 1815 | 3 |
01f2 00d9 3804 | 8 |
01f4 4502 0000 |E |
01f6 0000 0000 | |
01f8 05fb 0004 | |
01fa 0001 4608 | F |
01fc 7808 4302 |x C |
01fe 7819 7818 |x x |