|
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_03bcfe
└─⟦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 0140 | @ | .CONST 0x0140 ; 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 007e | ~ | .CONST 0x007e ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0015 | | .CONST 0x0015 ; Number of locals 001b INIT_0018: 001b e002 | | Load 0x0,0x2 001c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 001d 0604 | | Execute_Immediate Set_Value_Unchecked,0x4 001e 00e2 | | Load_Encached Integer_Cache 001f 4800 |H | Short_Literal 0x0 0020 49ff |I | Short_Literal 0x1ff 0021 e002 | | Load 0x0,0x2 0022 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0023 02a0 | | Declare_Subprogram Null_Subprogram 0024 4801 |H | Short_Literal 0x1 0025 035d | ] | Declare_Type Array,Defined 0026 00d8 | | Load_Top At_Offset_0 0027 0337 | 7 | Declare_Variable Array 0028 4801 |H | Short_Literal 0x1 0029 480a |H | Short_Literal 0xa 002a e002 | | Load 0x0,0x2 002b 1b10 | | Execute Package,Field_Read,Field_Number 0x10 002c 02a0 | | Declare_Subprogram Null_Subprogram 002d 4801 |H | Short_Literal 0x1 002e 035d | ] | Declare_Type Array,Defined 002f 4800 |H | Short_Literal 0x0 0030 4801 |H | Short_Literal 0x1 0031 e002 | | Load 0x0,0x2 0032 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0033 02a0 | | Declare_Subprogram Null_Subprogram 0034 4801 |H | Short_Literal 0x1 0035 035d | ] | Declare_Type Array,Defined 0036 4800 |H | Short_Literal 0x0 0037 4803 |H | Short_Literal 0x3 0038 e002 | | Load 0x0,0x2 0039 1b10 | | Execute Package,Field_Read,Field_Number 0x10 003a 02a0 | | Declare_Subprogram Null_Subprogram 003b 4801 |H | Short_Literal 0x1 003c 035d | ] | Declare_Type Array,Defined 003d 4800 |H | Short_Literal 0x0 003e 4803 |H | Short_Literal 0x3 003f e002 | | Load 0x0,0x2 0040 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0041 02a0 | | Declare_Subprogram Null_Subprogram 0042 4801 |H | Short_Literal 0x1 0043 035d | ] | Declare_Type Array,Defined 0044 4801 |H | Short_Literal 0x1 0045 4804 |H | Short_Literal 0x4 0046 e002 | | Load 0x0,0x2 0047 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0048 02a0 | | Declare_Subprogram Null_Subprogram 0049 4801 |H | Short_Literal 0x1 004a 035d | ] | Declare_Type Array,Defined 004b 4800 |H | Short_Literal 0x0 004c 4812 |H | Short_Literal 0x12 004d e40a | | Load 0x2,0xa 004e 02a0 | | Declare_Subprogram Null_Subprogram 004f 4801 |H | Short_Literal 0x1 0050 035d | ] | Declare_Type Array,Defined 0051 4800 |H | Short_Literal 0x0 0052 4802 |H | Short_Literal 0x2 0053 e002 | | Load 0x0,0x2 0054 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0055 02a0 | | Declare_Subprogram Null_Subprogram 0056 4801 |H | Short_Literal 0x1 0057 035d | ] | Declare_Type Array,Defined 0058 4801 |H | Short_Literal 0x1 0059 49ae |I | Short_Literal 0x1ae 005a e002 | | Load 0x0,0x2 005b 1b10 | | Execute Package,Field_Read,Field_Number 0x10 005c 02a0 | | Declare_Subprogram Null_Subprogram 005d 4801 |H | Short_Literal 0x1 005e 035d | ] | Declare_Type Array,Defined 005f e406 | | Load 0x2,0x6 0060 e407 | | Load 0x2,0x7 0061 e408 | | Load 0x2,0x8 0062 e409 | | Load 0x2,0x9 0063 e40b | | Load 0x2,0xb 0064 e002 | | Load 0x0,0x2 0065 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0066 e002 | | Load 0x0,0x2 0067 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0068 e407 | | Load 0x2,0x7 0069 e002 | | Load 0x0,0x2 006a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 006b e002 | | Load 0x0,0x2 006c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 006d e40c | | Load 0x2,0xc 006e e40d | | Load 0x2,0xd 006f 02a0 | | Declare_Subprogram Null_Subprogram 0070 480c |H | Short_Literal 0xc 0071 032d | - | Declare_Type Record,Defined 0072 a003 | | Store_Unchecked 0x0,0x3 0073 00c6 | | Action Check_Subprogram_Elaborated 0074 e404 | | Load 0x2,0x4 0075 e40e | | Load 0x2,0xe 0076 e004 | | Load 0x0,0x4 0077 e005 | | Load 0x0,0x5 0078 4813 |H | Short_Literal 0x13 0079 0007 | | Action Break_Optional 007a e40e | | Load 0x2,0xe 007b 0322 | " | Declare_Variable Record 007c 029f 00e3 | | Declare_Subprogram INIT_00e0,For_Call 007e BODY_0018: 007e 8415 | | Call 0x2,0x15 007f e414 | | Load 0x2,0x14 0080 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0081 0b00 | | Execute_Immediate Case_Compare,0x0 0082 700b |p | Jump_Nonzero 0x8e 0083 0b02 | | Execute_Immediate Case_Compare,0x2 0084 700d |p | Jump_Nonzero 0x92 0085 0b03 | | Execute_Immediate Case_Compare,0x3 0086 700f |p | Jump_Nonzero 0x96 0087 0f04 | | Execute_Immediate Equal,0x4 0088 7011 |p | Jump_Nonzero 0x9a 0089 0092 00fb | | Action Push_String_Extended,0xfb ; "Illegal value for system type. Cannot decode board information." 008b e006 | | Load 0x0,0x6 008c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 008d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 008e 00d1 | | Pop_Control Pop_Count_1 008f 4864 |Hd | Short_Literal 0x64 0090 a403 | | Store_Unchecked 0x2,0x3 0091 780a |x | Jump 0x9c 0092 00d1 | | Pop_Control Pop_Count_1 0093 48c8 |H | Short_Literal 0xc8 0094 a403 | | Store_Unchecked 0x2,0x3 0095 7806 |x | Jump 0x9c 0096 00d1 | | Pop_Control Pop_Count_1 0097 492c |I, | Short_Literal 0x12c 0098 a403 | | Store_Unchecked 0x2,0x3 0099 7802 |x | Jump 0x9c 009a 4990 |I | Short_Literal 0x190 009b a403 | | Store_Unchecked 0x2,0x3 009c 0092 00fc | | Action Push_String_Extended,0xfc ; "R1000 Series " 009e 4820 |H | Short_Literal 0x20 009f 4800 |H | Short_Literal 0x0 00a0 480a |H | Short_Literal 0xa 00a1 e403 | | Load 0x2,0x3 00a2 e007 | | Load 0x0,0x7 00a3 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00a4 01cc | | Execute Vector,Catenate 00a5 e006 | | Load 0x0,0x6 00a6 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 00a7 e414 | | Load 0x2,0x14 00a8 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 00a9 7005 |p | Jump_Nonzero 0xaf 00aa 0092 00fd | | Action Push_String_Extended,0xfd ; " System" 00ac e006 | | Load 0x0,0x6 00ad 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 00ae 7804 |x | Jump 0xb3 00af 0092 00fe | | Action Push_String_Extended,0xfe ; " Coprocessor" 00b1 e006 | | Load 0x0,0x6 00b2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 00b3 0092 00ff | | Action Push_String_Extended,0xff ; "IOP KERNEL = " 00b5 4820 |H | Short_Literal 0x20 00b6 4800 |H | Short_Literal 0x0 00b7 480a |H | Short_Literal 0xa 00b8 4800 |H | Short_Literal 0x0 00b9 e414 | | Load 0x2,0x14 00ba 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 00bb 01d7 | | Execute Vector,Field_Read 00bc e007 | | Load 0x0,0x7 00bd 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00be 01cc | | Execute Vector,Catenate 00bf 0092 0100 | | Action Push_String_Extended,0x100 ; "_" 00c1 01cc | | Execute Vector,Catenate 00c2 4820 |H | Short_Literal 0x20 00c3 4800 |H | Short_Literal 0x0 00c4 480a |H | Short_Literal 0xa 00c5 4801 |H | Short_Literal 0x1 00c6 e414 | | Load 0x2,0x14 00c7 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 00c8 01d7 | | Execute Vector,Field_Read 00c9 e007 | | Load 0x0,0x7 00ca 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00cb 01cc | | Execute Vector,Catenate 00cc 0092 0100 | | Action Push_String_Extended,0x100 ; "_" 00ce 01cc | | Execute Vector,Catenate 00cf 4820 |H | Short_Literal 0x20 00d0 4800 |H | Short_Literal 0x0 00d1 480a |H | Short_Literal 0xa 00d2 4802 |H | Short_Literal 0x2 00d3 e414 | | Load 0x2,0x14 00d4 340a |4 | Execute Record,Field_Reference,Field_Number 0xa 00d5 01d7 | | Execute Vector,Field_Read 00d6 e007 | | Load 0x0,0x7 00d7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00d8 01cc | | Execute Vector,Catenate 00d9 e006 | | Load 0x0,0x6 00da 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 00db 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00dc 0000 0000 | | .BLANK 0000[0x4] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e3 | | .CONST 0x00e3 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0001 | | .CONST 0x0001 ; Number of locals 00e3 BODY_00e0: 00e3 INIT_00e0: 00e3 00cf | | Action Mark_Auxiliary 00e4 49ff |I | Short_Literal 0x1ff 00e5 4800 |H | Short_Literal 0x0 00e6 0007 | | Action Break_Optional 00e7 00d8 | | Load_Top At_Offset_0 00e8 e402 | | Load 0x2,0x2 00e9 e002 | | Load 0x0,0x2 00ea 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00eb e604 | | Load 0x3,0x4 00ec e405 | | Load 0x2,0x5 00ed 01d6 | | Execute Vector,Field_Write 00ee 00c8 | | Action Pop_Auxiliary_Range 00ef 3ff7 |? | Loop_Increasing 0xe7 00f0 00ce | | Action Pop_Auxiliary 00f1 e405 | | Load 0x2,0x5 00f2 e40f | | Load 0x2,0xf 00f3 e410 | | Load 0x2,0x10 00f4 4811 |H | Short_Literal 0x11 00f5 4802 |H | Short_Literal 0x2 00f6 0099 | | Action Reference_Dynamic 00f7 8003 | | Call 0x0,0x3 00f8 e414 | | Load 0x2,0x14 00f9 017d | } | Execute Record,Structure_Write 00fa 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00fb ; -------------------------------------------------------------------------------------- 00fb ; STRING TABLE 00fb ; -------------------------------------------------------------------------------------- 00fb 000e | | .STRTAB 0x000e->0x0102 ; "Illegal value for system type. Cannot decode board information." 00fc 004c | L | .STRTAB 0x004c->0x0122 ; "R1000 Series " 00fd 0057 | W | .STRTAB 0x0057->0x0128 ; " System" 00fe 005c | \ | .STRTAB 0x005c->0x012c ; " Coprocessor" 00ff 0066 | f | .STRTAB 0x0066->0x0132 ; "IOP KERNEL = " 0100 0071 | q | .STRTAB 0x0071->0x0138 ; "_" 0101 0070 | p | .STREND 0x0070->0x0139 0102 496c 6c65 |Ille| .STRTAB_STRINGS 0139 0000 0000 | | .BLANK 0000[0x7] 0140 ; -------------------------------------------------------------------------------------- 0140 ; Debug Table 0140 ; -------------------------------------------------------------------------------------- 0140 0004 0010 | | .DEBUG4 0x0004,0x0010,0xd7e7,0x0000,0x0001,0x0000 0146 7574 696c |util| .XXX[0xba] 0148 6974 6965 |itie| 014a 732e 6465 |s.de| 014c 7461 6368 |tach| 014e 5f6f 6e5f |_on_| 0150 6469 7363 |disc| 0152 6f6e 6e65 |onne| 0154 6374 0000 |ct | 0156 0002 0000 | | 0158 00e2 0000 | | 015a 0058 42a8 | XB | 015c dede d8e6 | | 015e 5ca6 f2e6 |\ | 0160 e8ca dabe | | 0162 aae8 d2d8 | | 0164 d2e8 d2ca | | 0166 e65c 88ca | \ | 0168 e8c2 c6d0 | | 016a be9e dcbe | | 016c 88d2 e6c6 | | 016e dedc dcca | | 0170 c6e8 0000 | | 0172 0036 0000 | 6 | 0174 0020 e8e4 | | 0176 c2dc e6cc | | 0178 cae4 bece | | 017a cadc cae4 | | 017c d2c6 0000 | | 017e 0034 0000 | 4 | 0180 0024 0000 | $ | 0182 00b0 8551 | Q| 0184 bdbd b1cc | | 0186 b939 95d1 | 9 | 0188 ddbd c9ad | | 018a a5b9 9cb9 | | 018c 51c9 85b9 |Q | 018e cd99 95c9 | | 0190 7d1d 95b9 |} | 0192 95c9 a58c | | 0194 b94d d1bd | M | 0196 c995 7d4d | }M| 0198 95d0 0000 | | 019a 0024 0000 | $ | 019c 00a0 8551 | Q| 019e bdbd b1cc | | 01a0 b939 95d1 | 9 | 01a2 ddbd c9ad | | 01a4 a5b9 9cb9 | | 01a6 51c9 85b9 |Q | 01a8 cd99 95c9 | | 01aa 7d1d 95b9 |} | 01ac 95c9 a58c | | 01ae b94d d1bd | M | 01b0 c994 0000 | | 01b2 0024 0000 | $ | 01b4 00bc 8551 | Q| 01b6 bdbd b1cc | | 01b8 b939 95d1 | 9 | 01ba ddbd c9ad | | 01bc a5b9 9cb9 | | 01be 51c9 85b9 |Q | 01c0 cd99 95c9 | | 01c2 7d1d 95b9 |} | 01c4 95c9 a58c | | 01c6 b949 95d1 | I | 01c8 c9a5 95d9 | | 01ca 957d 4d95 | }M | 01cc d000 0000 | | 01ce 2400 0000 |$ | 01d0 c085 51bd | Q | 01d2 bdb1 ccb9 | | 01d4 3995 d1dd |9 | 01d6 bdc9 ada5 | | 01d8 b99c b951 | Q| 01da c985 b9cd | | 01dc 9995 c97d | }| 01de 1d95 b995 | | 01e0 c9a5 8cb9 | | 01e2 4995 d1c9 |I | 01e4 a595 d995 | | 01e6 7d31 a5cd |}1 | 01e8 d000 0000 | | 01ea 2400 0000 |$ | 01ec ac85 51bd | Q | 01ee bdb1 ccb9 | | 01f0 3995 d1dd |9 | 01f2 bdc9 ada5 | | 01f4 b99c b951 | Q| 01f6 c985 b9cd | | 01f8 9995 c97d | }| 01fa 1d95 b995 | | 01fc c9a5 8cb9 | | 01fe 4995 d1c9 |I |