|
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_6148f2
└─⟦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 0100 | | .CONST 0x0100 ; 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 0000 | | .CONST 0x0000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0045 | E | .CONST 0x0045 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000f | | .CONST 0x000f ; Number of locals 000b INIT_0008: 000b e007 | | Load 0x0,0x7 000c e008 | | Load 0x0,0x8 000d e007 | | Load 0x0,0x7 000e e008 | | Load 0x0,0x8 000f e009 | | Load 0x0,0x9 0010 e00a | | Load 0x0,0xa 0011 e00b | | Load 0x0,0xb 0012 e008 | | Load 0x0,0x8 0013 00d8 | | Load_Top At_Offset_0 0014 00e1 | | Load_Encached Boolean_Cache 0015 00e1 | | Load_Encached Boolean_Cache 0016 e00c | | Load 0x0,0xc 0017 00d8 | | Load_Top At_Offset_0 0018 e00d | | Load 0x0,0xd 0019 e00e | | Load 0x0,0xe 001a 029f 004b | K| Declare_Subprogram INIT_0048,For_Call 001c 480f |H | Short_Literal 0xf 001d 032e | . | Declare_Type Record,Defined,Visible 001e e00f | | Load 0x0,0xf 001f 00d8 | | Load_Top At_Offset_0 0020 e010 | | Load 0x0,0x10 0021 00d8 | | Load_Top At_Offset_0 0022 e010 | | Load 0x0,0x10 0023 e011 | | Load 0x0,0x11 0024 e012 | | Load 0x0,0x12 0025 e013 | | Load 0x0,0x13 0026 e014 | | Load 0x0,0x14 0027 e009 | | Load 0x0,0x9 0028 e00a | | Load 0x0,0xa 0029 e00b | | Load 0x0,0xb 002a e008 | | Load 0x0,0x8 002b 00d8 | | Load_Top At_Offset_0 002c 00e1 | | Load_Encached Boolean_Cache 002d e00d | | Load 0x0,0xd 002e 00e1 | | Load_Encached Boolean_Cache 002f e015 | | Load 0x0,0x15 0030 e00c | | Load 0x0,0xc 0031 00d8 | | Load_Top At_Offset_0 0032 e00c | | Load 0x0,0xc 0033 00e1 | | Load_Encached Boolean_Cache 0034 e016 | | Load 0x0,0x16 0035 029f 008b | | Declare_Subprogram INIT_0088,For_Call 0037 4817 |H | Short_Literal 0x17 0038 032e | . | Declare_Type Record,Defined,Visible 0039 e00f | | Load 0x0,0xf 003a 00d8 | | Load_Top At_Offset_0 003b e017 | | Load 0x0,0x17 003c 00d8 | | Load_Top At_Offset_0 003d e010 | | Load 0x0,0x10 003e e013 | | Load 0x0,0x13 003f e018 | | Load 0x0,0x18 0040 029f 00e3 | | Declare_Subprogram INIT_00e0,For_Call 0042 4807 |H | Short_Literal 0x7 0043 032e | . | Declare_Type Record,Defined,Visible 0044 00bf | | Action Accept_Activation 0045 BODY_0008: 0045 00bc | | Action Signal_Activated 0046 00bb | | Action Signal_Completion 0047 0000 | | .XXX[0x1] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 4601 |F | Jump_Case 0x2 004c 7801 |x | Jump 0x4e ; case 0x0 004d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 004e e002 | | Load 0x0,0x2 004f 00db | | Load_Top At_Offset_3 0050 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0051 4800 |H | Short_Literal 0x0 0052 00db | | Load_Top At_Offset_3 0053 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0054 e002 | | Load 0x0,0x2 0055 00db | | Load_Top At_Offset_3 0056 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0057 4800 |H | Short_Literal 0x0 0058 00db | | Load_Top At_Offset_3 0059 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 005a 4800 |H | Short_Literal 0x0 005b 00db | | Load_Top At_Offset_3 005c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 005d 4800 |H | Short_Literal 0x0 005e 00db | | Load_Top At_Offset_3 005f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0060 4800 |H | Short_Literal 0x0 0061 00db | | Load_Top At_Offset_3 0062 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0063 4800 |H | Short_Literal 0x0 0064 00db | | Load_Top At_Offset_3 0065 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0066 4800 |H | Short_Literal 0x0 0067 00db | | Load_Top At_Offset_3 0068 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0069 4800 |H | Short_Literal 0x0 006a 00db | | Load_Top At_Offset_3 006b 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 006c 4800 |H | Short_Literal 0x0 006d 00db | | Load_Top At_Offset_3 006e 380a |8 | Execute Record,Field_Write,Field_Number 0xa 006f e003 | | Load 0x0,0x3 0070 00db | | Load_Top At_Offset_3 0071 00d9 | | Load_Top At_Offset_1 0072 00d9 | | Load_Top At_Offset_1 0073 300b |0 | Execute Record,Field_Type,Field_Number 0xb 0074 0119 | | Execute Any,Check_In_Formal_Type 0075 00d1 | | Pop_Control Pop_Count_1 0076 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0077 e003 | | Load 0x0,0x3 0078 00db | | Load_Top At_Offset_3 0079 00d9 | | Load_Top At_Offset_1 007a 00d9 | | Load_Top At_Offset_1 007b 300c |0 | Execute Record,Field_Type,Field_Number 0xc 007c 0119 | | Execute Any,Check_In_Formal_Type 007d 00d1 | | Pop_Control Pop_Count_1 007e 380c |8 | Execute Record,Field_Write,Field_Number 0xc 007f e004 | | Load 0x0,0x4 0080 00db | | Load_Top At_Offset_3 0081 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0082 e005 | | Load 0x0,0x5 0083 00db | | Load_Top At_Offset_3 0084 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0085 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0086 0000 0000 | | .XXX[0x2] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b 4601 |F | Jump_Case 0x2 008c 7801 |x | Jump 0x8e ; case 0x0 008d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 008e 4800 |H | Short_Literal 0x0 008f 00db | | Load_Top At_Offset_3 0090 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0091 4800 |H | Short_Literal 0x0 0092 00db | | Load_Top At_Offset_3 0093 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0094 4800 |H | Short_Literal 0x0 0095 00db | | Load_Top At_Offset_3 0096 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0097 4800 |H | Short_Literal 0x0 0098 00db | | Load_Top At_Offset_3 0099 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 009a 4800 |H | Short_Literal 0x0 009b 00db | | Load_Top At_Offset_3 009c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 009d 4800 |H | Short_Literal 0x0 009e 00db | | Load_Top At_Offset_3 009f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 00a0 e006 | | Load 0x0,0x6 00a1 00db | | Load_Top At_Offset_3 00a2 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 00a3 4800 |H | Short_Literal 0x0 00a4 00db | | Load_Top At_Offset_3 00a5 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 00a6 4800 |H | Short_Literal 0x0 00a7 00db | | Load_Top At_Offset_3 00a8 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 00a9 4800 |H | Short_Literal 0x0 00aa 00db | | Load_Top At_Offset_3 00ab 380a |8 | Execute Record,Field_Write,Field_Number 0xa 00ac 4800 |H | Short_Literal 0x0 00ad 00db | | Load_Top At_Offset_3 00ae 380b |8 | Execute Record,Field_Write,Field_Number 0xb 00af 4800 |H | Short_Literal 0x0 00b0 00db | | Load_Top At_Offset_3 00b1 380c |8 | Execute Record,Field_Write,Field_Number 0xc 00b2 4800 |H | Short_Literal 0x0 00b3 00db | | Load_Top At_Offset_3 00b4 380d |8 | Execute Record,Field_Write,Field_Number 0xd 00b5 4800 |H | Short_Literal 0x0 00b6 00db | | Load_Top At_Offset_3 00b7 380e |8 | Execute Record,Field_Write,Field_Number 0xe 00b8 e004 | | Load 0x0,0x4 00b9 00db | | Load_Top At_Offset_3 00ba 380f |8 | Execute Record,Field_Write,Field_Number 0xf 00bb 4800 |H | Short_Literal 0x0 00bc 00db | | Load_Top At_Offset_3 00bd 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 00be 4800 |H | Short_Literal 0x0 00bf 00db | | Load_Top At_Offset_3 00c0 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 00c1 e003 | | Load 0x0,0x3 00c2 00db | | Load_Top At_Offset_3 00c3 00d9 | | Load_Top At_Offset_1 00c4 00d9 | | Load_Top At_Offset_1 00c5 3012 |0 | Execute Record,Field_Type,Field_Number 0x12 00c6 0119 | | Execute Any,Check_In_Formal_Type 00c7 00d1 | | Pop_Control Pop_Count_1 00c8 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 00c9 e003 | | Load 0x0,0x3 00ca 00db | | Load_Top At_Offset_3 00cb 00d9 | | Load_Top At_Offset_1 00cc 00d9 | | Load_Top At_Offset_1 00cd 3013 |0 | Execute Record,Field_Type,Field_Number 0x13 00ce 0119 | | Execute Any,Check_In_Formal_Type 00cf 00d1 | | Pop_Control Pop_Count_1 00d0 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 00d1 e003 | | Load 0x0,0x3 00d2 00db | | Load_Top At_Offset_3 00d3 00d9 | | Load_Top At_Offset_1 00d4 00d9 | | Load_Top At_Offset_1 00d5 3014 |0 | Execute Record,Field_Type,Field_Number 0x14 00d6 0119 | | Execute Any,Check_In_Formal_Type 00d7 00d1 | | Pop_Control Pop_Count_1 00d8 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 00d9 4800 |H | Short_Literal 0x0 00da 00db | | Load_Top At_Offset_3 00db 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 00dc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 00dd 0000 0000 | | .XXX[0x3] 00df 0000 | | 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 4601 |F | Jump_Case 0x2 00e4 7801 |x | Jump 0xe6 ; case 0x0 00e5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 00e6 4800 |H | Short_Literal 0x0 00e7 00db | | Load_Top At_Offset_3 00e8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00e9 4800 |H | Short_Literal 0x0 00ea 00db | | Load_Top At_Offset_3 00eb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00ec 4801 |H | Short_Literal 0x1 00ed 00db | | Load_Top At_Offset_3 00ee 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 00ef 4801 |H | Short_Literal 0x1 00f0 00db | | Load_Top At_Offset_3 00f1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 00f2 4800 |H | Short_Literal 0x0 00f3 00db | | Load_Top At_Offset_3 00f4 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 00f5 e006 | | Load 0x0,0x6 00f6 00db | | Load_Top At_Offset_3 00f7 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 00f8 4800 |H | Short_Literal 0x0 00f9 00db | | Load_Top At_Offset_3 00fa 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 00fb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 00fc 0000 0000 | | .BLANK 0000[0x4] 0100 ; -------------------------------------------------------------------------------------- 0100 ; Debug Table 0100 ; -------------------------------------------------------------------------------------- 0100 0004 0000 | | .DEBUG4 0x0004,0x0000,0x681b,0x0000,0x0001,0x0004 0106 000b 0116 | | .DBG4T 0x000b,0x0116,0x8000,0x0000 010a 004b 0000 | K | .DBG4T 0x004b,0x0000,0x0005,0x0000 010e 008b 0000 | | .DBG4T 0x008b,0x0000,0x0005,0x0000 0112 00e3 0000 | | .DBG4T 0x00e3,0x0000,0x0005,0x0000 0116 ; -------------------------------------------------------------------------------------- 0116 ; Debug chain 0116 ; -------------------------------------------------------------------------------------- 0116 0003 0000 | | .DBGLEN 0x0003,0x0000 0118 000b 001e | | .DBGLNO 0x000b,0x001e,0x0039 011b 0000 0000 | | .BLANK 0000[0xe5]