|
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 0168 | h | .CONST 0x0168 ; 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 0029 | ) | .CONST 0x0029 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0012 | | .CONST 0x0012 ; Number of locals 000b INIT_0008: 000b 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e e001 | | Load 0x0,0x1 000f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0010 00e1 | | Load_Encached Boolean_Cache 0011 02a0 | | Declare_Subprogram Null_Subprogram 0012 4802 |H | Short_Literal 0x2 0013 032d | - | Declare_Type Record,Defined 0014 00d8 | | Load_Top At_Offset_0 0015 02a0 | | Declare_Subprogram Null_Subprogram 0016 03ad | | Declare_Type Heap_Access,Defined 0017 029d 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call 0019 029d 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call 001b e002 | | Load 0x0,0x2 001c e003 | | Load 0x0,0x3 001d e20f | | Load 0x1,0xf 001e 00d8 | | Load_Top At_Offset_0 001f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0020 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0021 0092 0108 | | Action Push_String_Extended,0x108 ; "UNKNOWN" 0023 e004 | | Load 0x0,0x4 0024 0387 | | Declare_Variable Package 0025 00d8 | | Load_Top At_Offset_0 0026 020f | | Execute Module,Activate 0027 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0028 00c7 | | Action Elaborate_Subprogram 0029 BODY_0008: 0029 00bc | | Action Signal_Activated 002a 00bb | | Action Signal_Completion 002b 0000 0000 | | .BLANK 0000[0x5] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 003b | ; | .CONST 0x003b ; Address of begin 0031 004f | O | .CONST 0x004f ; Address of exception handler 0032 0003 | | .CONST 0x0003 ; Number of locals 0033 INIT_0030: 0033 e005 | | Load 0x0,0x5 0034 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0035 e005 | | Load 0x0,0x5 0036 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0037 03f1 | | Declare_Variable Discrete,With_Value 0038 00d8 | | Load_Top At_Offset_0 0039 e212 | | Load 0x1,0x12 003a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 003b BODY_0030: 003b 4800 |H | Short_Literal 0x0 003c a5ff | | Store_Unchecked 0x2,-0x1 003d 4801 |H | Short_Literal 0x1 003e 00d9 | | Load_Top At_Offset_1 003f 0217 | | Execute Heap_Access,All_Reference 0040 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0041 e005 | | Load 0x0,0x5 0042 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0043 e006 | | Load 0x0,0x6 0044 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0045 00d9 | | Load_Top At_Offset_1 0046 0217 | | Execute Heap_Access,All_Reference 0047 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0048 4800 |H | Short_Literal 0x0 0049 e005 | | Load 0x0,0x5 004a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 004b 00da | | Load_Top At_Offset_2 004c e212 | | Load 0x1,0x12 004d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 004e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 004f TRAP_0030: 004f 0007 | | Action Break_Optional 0050 0092 0109 | | Action Push_String_Extended,0x109 ; "set_job_information" 0052 e007 | | Load 0x0,0x7 0053 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0054 a5ff | | Store_Unchecked 0x2,-0x1 0055 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0056 0000 0000 | | .XXX[0x2] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 0065 | e | .CONST 0x0065 ; Address of begin 0059 0079 | y | .CONST 0x0079 ; Address of exception handler 005a 0003 | | .CONST 0x0003 ; Number of locals 005b INIT_0058: 005b e20f | | Load 0x1,0xf 005c e008 | | Load 0x0,0x8 005d 180d | | Execute Package,Field_Execute,Field_Number 0xd 005e 039c | | Declare_Variable Heap_Access,By_Allocation 005f e009 | | Load 0x0,0x9 0060 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0061 02c7 | | Declare_Variable Any 0062 e009 | | Load 0x0,0x9 0063 180e | | Execute Package,Field_Execute,Field_Number 0xe 0064 a403 | | Store_Unchecked 0x2,0x3 0065 BODY_0058: 0065 4801 |H | Short_Literal 0x1 0066 e00a | | Load 0x0,0xa 0067 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0068 4801 |H | Short_Literal 0x1 0069 e00a | | Load 0x0,0xa 006a 181d | | Execute Package,Field_Execute,Field_Number 0x1d 006b e005 | | Load 0x0,0x5 006c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 006d e006 | | Load 0x0,0x6 006e 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 006f 00da | | Load_Top At_Offset_2 0070 0217 | | Execute Heap_Access,All_Reference 0071 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0072 4801 |H | Short_Literal 0x1 0073 00da | | Load_Top At_Offset_2 0074 0217 | | Execute Heap_Access,All_Reference 0075 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0076 00d9 | | Load_Top At_Offset_1 0077 a5ff | | Store_Unchecked 0x2,-0x1 0078 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0079 TRAP_0058: 0079 0007 | | Action Break_Optional 007a 00d9 | | Load_Top At_Offset_1 007b 0092 010a | | Action Push_String_Extended,0x10a ; "Initialize" 007d e007 | | Load 0x0,0x7 007e 180f | | Execute Package,Field_Execute,Field_Number 0xf 007f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0087 | | .CONST 0x0087 ; Address of begin 0081 00d1 | | .CONST 0x00d1 ; Address of exception handler 0082 0003 | | .CONST 0x0003 ; Number of locals 0083 INIT_0080: 0083 e00a | | Load 0x0,0xa 0084 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0085 029f 00db | | Declare_Subprogram INIT_00d8,For_Call 0087 BODY_0080: 0087 4800 |H | Short_Literal 0x0 0088 e00a | | Load 0x0,0xa 0089 1820 | | Execute Package,Field_Execute,Field_Number 0x20 008a 4800 |H | Short_Literal 0x0 008b e00a | | Load 0x0,0xa 008c 181d | | Execute Package,Field_Execute,Field_Number 0x1d 008d e005 | | Load 0x0,0x5 008e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 008f e006 | | Load 0x0,0x6 0090 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0091 701c |p | Jump_Nonzero 0xae 0092 0092 010b | | Action Push_String_Extended,0x10b ; "Job Id " 0094 e005 | | Load 0x0,0x5 0095 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0096 00e0 | | Load_Encached Standard_Cache 0097 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0098 01cc | | Execute Vector,Catenate 0099 0092 010c | | Action Push_String_Extended,0x10c ; " <" 009b 01cc | | Execute Vector,Catenate 009c e005 | | Load 0x0,0x5 009d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 009e e006 | | Load 0x0,0x6 009f 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 00a0 01cc | | Execute Vector,Catenate 00a1 0092 010d | | Action Push_String_Extended,0x10d ; "> is finalizing with nil root task" 00a3 01cc | | Execute Vector,Catenate 00a4 4801 |H | Short_Literal 0x1 00a5 0092 010e | | Action Push_String_Extended,0x10e ; "Nil_Root_Task" 00a7 e00b | | Load 0x0,0xb 00a8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00a9 0092 010f | | Action Push_String_Extended,0x10f ; "Domain.Finalize" 00ab e00b | | Load 0x0,0xb 00ac 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00ad 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00ae e5ff | | Load 0x2,-0x1 00af 0217 | | Execute Heap_Access,All_Reference 00b0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00b1 e001 | | Load 0x0,0x1 00b2 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00b3 e00c | | Load 0x0,0xc 00b4 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 00b5 00d9 | | Load_Top At_Offset_1 00b6 00d0 | | Action Swap_Control 00b7 0260 | ` | Execute Discrete,In_Type 00b8 7001 |p | Jump_Nonzero 0xba 00b9 0801 | | Execute_Immediate Raise,0x1 00ba e00d | | Load 0x0,0xd 00bb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00bc e5ff | | Load 0x2,-0x1 00bd 0217 | | Execute Heap_Access,All_Reference 00be 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00bf e001 | | Load 0x0,0x1 00c0 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00c1 e00c | | Load 0x0,0xc 00c2 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 00c3 00d9 | | Load_Top At_Offset_1 00c4 00d0 | | Action Swap_Control 00c5 0260 | ` | Execute Discrete,In_Type 00c6 7001 |p | Jump_Nonzero 0xc8 00c7 0801 | | Execute_Immediate Raise,0x1 00c8 e00e | | Load 0x0,0xe 00c9 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 00ca 4800 |H | Short_Literal 0x0 00cb e5ff | | Load 0x2,-0x1 00cc 0217 | | Execute Heap_Access,All_Reference 00cd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00ce 4800 |H | Short_Literal 0x0 00cf 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00d0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00d1 TRAP_0080: 00d1 e00a | | Load 0x0,0xa 00d2 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00d3 010f | | Execute Exception,Equal 00d4 6801 |h | Jump_Zero 0xd6 00d5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00d6 8403 | | Call 0x2,0x3 00d7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00df | | .CONST 0x00df ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0002 | | .CONST 0x0002 ; Number of locals 00db INIT_00d8: 00db 4800 |H | Short_Literal 0x0 00dc 4801 |H | Short_Literal 0x1 00dd e00f | | Load 0x0,0xf 00de 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00df BODY_00d8: 00df 0092 010b | | Action Push_String_Extended,0x10b ; "Job Id " 00e1 e005 | | Load 0x0,0x5 00e2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00e3 00e0 | | Load_Encached Standard_Cache 00e4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00e5 01cc | | Execute Vector,Catenate 00e6 0092 010c | | Action Push_String_Extended,0x10c ; " <" 00e8 01cc | | Execute Vector,Catenate 00e9 e005 | | Load 0x0,0x5 00ea 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00eb e006 | | Load 0x0,0x6 00ec 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 00ed 01cc | | Execute Vector,Catenate 00ee 0092 0110 | | Action Push_String_Extended,0x110 ; "> raised " 00f0 01cc | | Execute Vector,Catenate 00f1 00d9 | | Load_Top At_Offset_1 00f2 01cc | | Execute Vector,Catenate 00f3 4801 |H | Short_Literal 0x1 00f4 00ea | | Load_Encached Null_String_Cache 00f5 e00b | | Load 0x0,0xb 00f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00f7 0092 010f | | Action Push_String_Extended,0x10f ; "Domain.Finalize" 00f9 e00b | | Load 0x0,0xb 00fa 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00fb e009 | | Load 0x0,0x9 00fc 180e | | Execute Package,Field_Execute,Field_Number 0xe 00fd 4802 |H | Short_Literal 0x2 00fe 0092 0111 | | Action Push_String_Extended,0x111 ; "Unhandled exception " 0100 00db | | Load_Top At_Offset_3 0101 01cc | | Execute Vector,Catenate 0102 0092 0112 | | Action Push_String_Extended,0x112 ; " in Domain.Finalize" 0104 01cc | | Execute Vector,Catenate 0105 e010 | | Load 0x0,0x10 0106 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0107 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0108 ; -------------------------------------------------------------------------------------- 0108 ; STRING TABLE 0108 ; -------------------------------------------------------------------------------------- 0108 0018 | | .STRTAB 0x0018->0x0114 ; "UNKNOWN" 0109 001d | | .STRTAB 0x001d->0x0117 ; "set_job_information" 010a 002e | . | .STRTAB 0x002e->0x0121 ; "Initialize" 010b 0036 | 6 | .STRTAB 0x0036->0x0126 ; "Job Id " 010c 003b | ; | .STRTAB 0x003b->0x0129 ; " <" 010d 003b | ; | .STRTAB 0x003b->0x012a ; "> is finalizing with nil root task" 010e 005b | [ | .STRTAB 0x005b->0x013b ; "Nil_Root_Task" 010f 0066 | f | .STRTAB 0x0066->0x0142 ; "Domain.Finalize" 0110 0073 | s | .STRTAB 0x0073->0x0149 ; "> raised " 0111 007a | z | .STRTAB 0x007a->0x014e ; "Unhandled exception " 0112 008c | | .STRTAB 0x008c->0x0158 ; " in Domain.Finalize" 0113 009d | | .STREND 0x009d->0x0161 0114 554e 4b4e |UNKN| .STRTAB_STRINGS 0162 0000 0000 | | .BLANK 0000[0x6] 0168 ; -------------------------------------------------------------------------------------- 0168 ; Debug Table 0168 ; -------------------------------------------------------------------------------------- 0168 0004 000f | | .DEBUG4 0x0004,0x000f,0x0d3b,0x0000,0x0001,0x0000 016e 0000 fe5d | ]| .XXX[0x3a] 0170 0001 0404 | | 0172 0800 0100 | | 0174 0000 0000 | | 0176 0000 0001 | | 0178 000f d004 | | 017a 0800 01cc | | 017c 00a6 30d6 | 0 | 017e 0000 fe5d | ]| 0180 09a9 f004 | | 0182 0000 07c4 | | 0184 00a6 30d6 | 0 | 0186 0000 febc | | 0188 09a9 f404 | | 018a 0000 0644 | D| 018c 09a9 f404 | | 018e 0000 1929 | )| 0190 09a9 f004 | | 0192 0000 07c4 | | 0194 00a6 30d6 | 0 | 0196 0000 febc | | 0198 000e 5004 | P | 019a 0000 0100 | | 019c 0000 0000 | | 019e 000e 1bd1 | | 01a0 000f d004 | | 01a2 0800 01cc | | 01a4 00a6 30d6 | 0 | 01a6 0000 fe5d | ]| 01a8 0000 0000 | | .BLANK 0000[0x7] 01af 0005 | | .XXX[0x1] 01b0 0000 0000 | | .BLANK 0000[0x7] 01b7 0005 09a9 | | .XXX[0x7] 01b9 f404 0000 | | 01bb 0a98 09a9 | | 01bd f804 | | 01be 0000 0000 | | .BLANK 0000[0x9] 01c7 0002 000f | | .XXX[0x11] 01c9 d004 0800 | | 01cb 01cc 00a6 | | 01cd 30d6 0001 |0 | 01cf 0b43 000f | C | 01d1 d004 0800 | | 01d3 01cc 00a6 | | 01d5 30d6 0001 |0 | 01d7 0a26 | & | 01d8 0000 0000 | | .BLANK 0000[0x7] 01df 0004 003d | =| .XXX[0xd] 01e1 2004 0000 | | 01e3 1518 09b3 | | 01e5 fc04 0000 | | 01e7 0000 000e | | 01e9 1404 0800 | | 01eb 0100 | | 01ec 0000 0000 | | .BLANK 0000[0x4] 01f0 09a9 f004 | | .XXX[0x10] 01f2 0000 07c4 | | 01f4 00a6 30d6 | 0 | 01f6 0001 252c | %,| 01f8 000e 5004 | P | 01fa 0000 0100 | | 01fc 0000 0000 | | 01fe 001b 4410 | D |