|
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_ccb0b3
└─⟦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 0118 | | .CONST 0x0118 ; 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 0035 | 5 | .CONST 0x0035 ; Address of begin 0019 00bf | | .CONST 0x00bf ; Address of exception handler 001a 0007 | | .CONST 0x0007 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 02c7 | | Declare_Variable Any 001e e5fe | | Load 0x2,-0x2 001f e001 | | Load 0x0,0x1 0020 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0021 a402 | | Store_Unchecked 0x2,0x2 0022 e002 | | Load 0x0,0x2 0023 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0024 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0025 e002 | | Load 0x0,0x2 0026 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0027 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0028 02c7 | | Declare_Variable Any 0029 00d8 | | Load_Top At_Offset_0 002a 1c00 | | Execute_Immediate Run_Utility,0x0 002b e002 | | Load 0x0,0x2 002c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002d e002 | | Load 0x0,0x2 002e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 002f 02c7 | | Declare_Variable Any 0030 00d8 | | Load_Top At_Offset_0 0031 1c00 | | Execute_Immediate Run_Utility,0x0 0032 e003 | | Load 0x0,0x3 0033 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0034 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0035 BODY_0018: 0035 e5fe | | Load 0x2,-0x2 0036 e001 | | Load 0x0,0x1 0037 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0038 4800 |H | Short_Literal 0x0 0039 0092 00e0 | | Action Push_String_Extended,0xe0 ; "Converting Rcf State Files" 003b e004 | | Load 0x0,0x4 003c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 003d e002 | | Load 0x0,0x2 003e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 003f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0040 e404 | | Load 0x2,0x4 0041 609a |` | Indirect_Literal Discrete,0xdc,{0x00000000, 0x00004000} 0042 e005 | | Load 0x0,0x5 0043 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0044 e006 | | Load 0x0,0x6 0045 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0046 e007 | | Load 0x0,0x7 0047 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0048 4801 |H | Short_Literal 0x1 0049 4800 |H | Short_Literal 0x0 004a e006 | | Load 0x0,0x6 004b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 004c e002 | | Load 0x0,0x2 004d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 004e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 004f e5ff | | Load 0x2,-0x1 0050 e002 | | Load 0x0,0x2 0051 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0052 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0053 c404 | | Store 0x2,0x4 0054 c403 | | Store 0x2,0x3 0055 e403 | | Load 0x2,0x3 0056 681b |h | Jump_Zero 0x72 0057 4801 |H | Short_Literal 0x1 0058 4802 |H | Short_Literal 0x2 0059 e008 | | Load 0x0,0x8 005a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 005b 035b | [ | Declare_Type Array,Constrained 005c 0337 | 7 | Declare_Variable Array 005d e5ff | | Load 0x2,-0x1 005e e008 | | Load 0x0,0x8 005f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0060 e008 | | Load 0x0,0x8 0061 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0062 0119 | | Execute Any,Check_In_Formal_Type 0063 4801 |H | Short_Literal 0x1 0064 00da | | Load_Top At_Offset_2 0065 01d6 | | Execute Vector,Field_Write 0066 e403 | | Load 0x2,0x3 0067 e008 | | Load 0x0,0x8 0068 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0069 e008 | | Load 0x0,0x8 006a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 006b 0119 | | Execute Any,Check_In_Formal_Type 006c 4802 |H | Short_Literal 0x2 006d 00da | | Load_Top At_Offset_2 006e 01d6 | | Execute Vector,Field_Write 006f 6068 |`h | Indirect_Literal Discrete,0xd8,{0x00000000, 0x0000817c} 0070 e003 | | Load 0x0,0x3 0071 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0072 00cf | | Action Mark_Auxiliary 0073 783c |x< | Jump 0xb0 0074 e002 | | Load 0x0,0x2 0075 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0076 00db | | Load_Top At_Offset_3 0077 0120 | | Execute Any,Is_Value 0078 6803 |h | Jump_Zero 0x7c 0079 e002 | | Load 0x0,0x2 007a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 007b 7801 |x | Jump 0x7d 007c 00db | | Load_Top At_Offset_3 007d e404 | | Load 0x2,0x4 007e e002 | | Load 0x0,0x2 007f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0080 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0081 c406 | | Store 0x2,0x6 0082 c405 | | Store 0x2,0x5 0083 00db | | Load_Top At_Offset_3 0084 681b |h | Jump_Zero 0xa0 0085 4801 |H | Short_Literal 0x1 0086 4802 |H | Short_Literal 0x2 0087 e008 | | Load 0x0,0x8 0088 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0089 035b | [ | Declare_Type Array,Constrained 008a 0337 | 7 | Declare_Variable Array 008b e405 | | Load 0x2,0x5 008c e008 | | Load 0x0,0x8 008d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 008e e008 | | Load 0x0,0x8 008f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0090 0119 | | Execute Any,Check_In_Formal_Type 0091 4801 |H | Short_Literal 0x1 0092 00da | | Load_Top At_Offset_2 0093 01d6 | | Execute Vector,Field_Write 0094 e5ff | | Load 0x2,-0x1 0095 e008 | | Load 0x0,0x8 0096 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0097 e008 | | Load 0x0,0x8 0098 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0099 0119 | | Execute Any,Check_In_Formal_Type 009a 4802 |H | Short_Literal 0x2 009b 00da | | Load_Top At_Offset_2 009c 01d6 | | Execute Vector,Field_Write 009d 6036 |`6 | Indirect_Literal Discrete,0xd4,{0x00000000, 0x000081ea} 009e e003 | | Load 0x0,0x3 009f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 00a0 e003 | | Load 0x0,0x3 00a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a2 e402 | | Load 0x2,0x2 00a3 e406 | | Load 0x2,0x6 00a4 8009 | | Call 0x0,0x9 00a5 005a | Z | Store_Top Discrete,At_Offset_2 00a6 e402 | | Load 0x2,0x2 00a7 00da | | Load_Top At_Offset_2 00a8 e003 | | Load 0x0,0x3 00a9 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 00aa e404 | | Load 0x2,0x4 00ab e002 | | Load 0x0,0x2 00ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00ad 181d | | Execute Package,Field_Execute,Field_Number 0x1d 00ae c404 | | Store 0x2,0x4 00af 00c9 | | Action Pop_Auxiliary_Loop 00b0 e404 | | Load 0x2,0x4 00b1 e002 | | Load 0x0,0x2 00b2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00b3 181e | | Execute Package,Field_Execute,Field_Number 0x1e 00b4 6fbf |o | Jump_Zero 0x74 00b5 00ce | | Action Pop_Auxiliary 00b6 e5fe | | Load 0x2,-0x2 00b7 e001 | | Load 0x0,0x1 00b8 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 00b9 4800 |H | Short_Literal 0x0 00ba 0092 00e1 | | Action Push_String_Extended,0xe1 ; "Done Converting Rcf State Files" 00bc e004 | | Load 0x0,0x4 00bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00be 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00bf TRAP_0018: 00bf e003 | | Load 0x0,0x3 00c0 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00c1 010f | | Execute Exception,Equal 00c2 6808 |h | Jump_Zero 0xcb 00c3 e001 | | Load 0x0,0x1 00c4 180e | | Execute Package,Field_Execute,Field_Number 0xe 00c5 4807 |H | Short_Literal 0x7 00c6 0092 00e2 | | Action Push_String_Extended,0xe2 ; "Upgrade_Views failed" 00c8 e004 | | Load 0x0,0x4 00c9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00ca 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00cb e402 | | Load 0x2,0x2 00cc 0092 00e3 | | Action Push_String_Extended,0xe3 ; "Upgrade_Views" 00ce e00a | | Load 0x0,0xa 00cf 180f | | Execute Package,Field_Execute,Field_Number 0xf 00d0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00d1 0000 0000 | | .XXX[0x3] 00d3 0000 | | 00d4 0000 0000 | | .LITERAL {0x00000000, 0x000081ea} 00d8 0000 0000 | | .LITERAL {0x00000000, 0x0000817c} 00dc 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; STRING TABLE 00e0 ; -------------------------------------------------------------------------------------- 00e0 000a | | .STRTAB 0x000a->0x00e5 ; "Converting Rcf State Files" 00e1 0022 | " | .STRTAB 0x0022->0x00f2 ; "Done Converting Rcf State Files" 00e2 003f | ? | .STRTAB 0x003f->0x0101 ; "Upgrade_Views failed" 00e3 0051 | Q | .STRTAB 0x0051->0x010b ; "Upgrade_Views" 00e4 005c | \ | .STREND 0x005c->0x0112 00e5 436f 6e76 |Conv| .STRTAB_STRINGS 0112 0000 0000 | | .BLANK 0000[0x6] 0118 ; -------------------------------------------------------------------------------------- 0118 ; Debug Table 0118 ; -------------------------------------------------------------------------------------- 0118 0004 000f | | .DEBUG4 0x0004,0x000f,0x02cf,0x0000,0x0001,0x0000 011e 0000 0000 | | .BLANK 0000[0x5] 0123 019c 9280 | | .XXX[0x20] 0125 001e afc0 | | 0127 0000 0109 | | 0129 9700 3424 | 4$| 012b 8000 0000 | | 012d 0000 0000 | | 012f 0109 8900 | | 0131 3424 8000 |4$ | 0133 0000 0000 | | 0135 0000 0107 | | 0137 6059 0000 |`Y | 0139 003f ffa0 | ? | 013b 2003 a000 | | 013d 0000 1c00 | | 013f d823 84ca | # | 0141 8015 a240 | @| 0143 0000 0000 | | .BLANK 0000[0x5] 0148 1a38 0000 | 8 | .XXX[0xb8] 014a 0000 0000 | | 014c d6f4 019d | | 014e 1c00 001e | | 0150 afc0 0ce9 | | 0152 5b02 104b |[ K| 0154 0000 0000 | | 0156 674e a823 |gN #| 0158 e000 0000 | | 015a 0374 7b80 | t{ | 015c da4f 6036 | O`6| 015e bd98 0000 | | 0160 033d 9941 | = A| 0162 8e40 6d27 | @m'| 0164 b000 0000 | | 0166 0677 e801 | w | 0168 9e11 c067 | g| 016a 9a00 0004 | | 016c b4c0 0677 | w| 016e e801 9dd7 | | 0170 4036 0000 |@6 | 0172 6784 7019 |g p | 0174 e680 000c | | 0176 0400 7000 | p | 0178 0000 0000 | | 017a 1a38 1000 | 8 | 017c 0000 0676 | v| 017e bd84 4800 | H | 0180 cec3 2000 | | 0182 0000 0cef | | 0184 6716 6601 |g f | 0186 9d86 4000 | @ | 0188 0000 19e4 | | 018a a400 0000 | | 018c 0400 1843 | C| 018e e080 0308 | | 0190 7c02 007e || ~| 0192 fe4e c5c0 | N | 0194 6784 7000 |g p | 0196 0000 02d8 | | 0198 0400 fbc7 | | 019a 8707 00ce | | 019c c320 0000 | | 019e 000c f488 | | 01a0 033d 5d82 | =] | 01a2 000c 21f0 | ! | 01a4 09d8 b80c | | 01a6 f340 0000 | @ | 01a8 0000 bd00 | | 01aa 00dd 3e53 | >S| 01ac b170 19e6 | p | 01ae 8000 0000 | | 01b0 0010 0000 | | 01b2 0000 0034 | 4| 01b4 65f4 18e4 |e | 01b6 06d2 7b00 | { | 01b8 0000 0067 | g| 01ba d1c0 19f5 | | 01bc ec06 7ed4 | ~ | 01be 0000 4b4c | KL| 01c0 0067 d1c0 | g | 01c2 19f2 4403 | D | 01c4 5000 067d |P }| 01c6 7b01 9fb5 |{ | 01c8 0001 4040 | @@| 01ca 0700 0000 | | 01cc 0000 01a3 | | 01ce 8100 0000 | | 01d0 0067 bf18 | g | 01d2 4480 0cf6 |D | 01d4 9a00 0000 | | 01d6 00cf 9cf1 | | 01d8 6660 19ed |f` | 01da 3400 0000 |4 | 01dc 019f 9740 | @| 01de 0000 0040 | @| 01e0 0184 3e08 | > | 01e2 0030 87c0 | 0 | 01e4 2008 2264 | "d| 01e6 ec5c 067d | \ }| 01e8 7b00 0000 |{ | 01ea 005f 0040 | _ @| 01ec 1021 7970 | !yp| 01ee 400c f69a |@ | 01f0 0000 0000 | | 01f2 bf04 0018 | | 01f4 43e1 5063 |C Pc| 01f6 d01b 49ec | I | 01f8 0000 0001 | | 01fa 9ffd c068 | h| 01fc 13c0 0000 | | 01fe 0000 0118 | |