|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a90a7
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 00b8 | | .CONST 0x00b8 ; 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 0035 | 5 | .CONST 0x0035 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000d | | .CONST 0x000d ; Number of locals 000b INIT_0008: 000b e003 | | Load 0x0,0x3 000c 4801 |H | Short_Literal 0x1 000d 4804 |H | Short_Literal 0x4 000e e004 | | Load 0x0,0x4 000f 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0010 035c | \ | Declare_Type Array,Constrained,Visible 0011 00e3 | | Load_Encached Natural_Cache 0012 4801 |H | Short_Literal 0x1 0013 4804 |H | Short_Literal 0x4 0014 e004 | | Load 0x0,0x4 0015 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0016 035c | \ | Declare_Type Array,Constrained,Visible 0017 00e3 | | Load_Encached Natural_Cache 0018 4801 |H | Short_Literal 0x1 0019 4804 |H | Short_Literal 0x4 001a e004 | | Load 0x0,0x4 001b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 001c 035c | \ | Declare_Type Array,Constrained,Visible 001d e005 | | Load 0x0,0x5 001e 1b11 | | Execute Package,Field_Read,Field_Number 0x11 001f 00e1 | | Load_Encached Boolean_Cache 0020 00e3 | | Load_Encached Natural_Cache 0021 4801 |H | Short_Literal 0x1 0022 4802 |H | Short_Literal 0x2 0023 e004 | | Load 0x0,0x4 0024 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0025 035c | \ | Declare_Type Array,Constrained,Visible 0026 4801 |H | Short_Literal 0x1 0027 4802 |H | Short_Literal 0x2 0028 e004 | | Load 0x0,0x4 0029 1b15 | | Execute Package,Field_Read,Field_Number 0x15 002a 035c | \ | Declare_Type Array,Constrained,Visible 002b 4801 |H | Short_Literal 0x1 002c 4802 |H | Short_Literal 0x2 002d e004 | | Load 0x0,0x4 002e 1b15 | | Execute Package,Field_Read,Field_Number 0x15 002f 035c | \ | Declare_Type Array,Constrained,Visible 0030 029f 003b | ;| Declare_Subprogram INIT_0038,For_Call 0032 480c |H | Short_Literal 0xc 0033 032e | . | Declare_Type Record,Defined,Visible 0034 00bf | | Action Accept_Activation 0035 BODY_0008: 0035 00bc | | Action Signal_Activated 0036 00bb | | Action Signal_Completion 0037 0000 | | .XXX[0x1] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 003b | ; | .CONST 0x003b ; Address of begin 0039 0004 | | .CONST 0x0004 ; Address of exception handler 003a 0001 | | .CONST 0x0001 ; Number of locals 003b BODY_0038: 003b INIT_0038: 003b 4601 |F | Jump_Case 0x2 003c 7801 |x | Jump 0x3e ; case 0x0 003d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 003e 480c |H | Short_Literal 0xc 003f 00db | | Load_Top At_Offset_3 0040 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0041 e20d | | Load 0x1,0xd 0042 3001 |0 | Execute Record,Field_Type,Field_Number 0x1 0043 0337 | 7 | Declare_Variable Array 0044 4800 |H | Short_Literal 0x0 0045 4801 |H | Short_Literal 0x1 0046 00da | | Load_Top At_Offset_2 0047 01d6 | | Execute Vector,Field_Write 0048 4800 |H | Short_Literal 0x0 0049 4802 |H | Short_Literal 0x2 004a 00da | | Load_Top At_Offset_2 004b 01d6 | | Execute Vector,Field_Write 004c 4800 |H | Short_Literal 0x0 004d 4803 |H | Short_Literal 0x3 004e 00da | | Load_Top At_Offset_2 004f 01d6 | | Execute Vector,Field_Write 0050 4800 |H | Short_Literal 0x0 0051 4804 |H | Short_Literal 0x4 0052 00da | | Load_Top At_Offset_2 0053 01d6 | | Execute Vector,Field_Write 0054 00db | | Load_Top At_Offset_3 0055 00d9 | | Load_Top At_Offset_1 0056 00d9 | | Load_Top At_Offset_1 0057 3001 |0 | Execute Record,Field_Type,Field_Number 0x1 0058 0119 | | Execute Any,Check_In_Formal_Type 0059 00d1 | | Pop_Control Pop_Count_1 005a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 005b 4800 |H | Short_Literal 0x0 005c 00db | | Load_Top At_Offset_3 005d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 005e e002 | | Load 0x0,0x2 005f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0060 00db | | Load_Top At_Offset_3 0061 00d9 | | Load_Top At_Offset_1 0062 00d9 | | Load_Top At_Offset_1 0063 3003 |0 | Execute Record,Field_Type,Field_Number 0x3 0064 0119 | | Execute Any,Check_In_Formal_Type 0065 00d1 | | Pop_Control Pop_Count_1 0066 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0067 4800 |H | Short_Literal 0x0 0068 00db | | Load_Top At_Offset_3 0069 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 006a e20d | | Load 0x1,0xd 006b 3005 |0 | Execute Record,Field_Type,Field_Number 0x5 006c 0337 | 7 | Declare_Variable Array 006d 4800 |H | Short_Literal 0x0 006e 4801 |H | Short_Literal 0x1 006f 00da | | Load_Top At_Offset_2 0070 01d6 | | Execute Vector,Field_Write 0071 4800 |H | Short_Literal 0x0 0072 4802 |H | Short_Literal 0x2 0073 00da | | Load_Top At_Offset_2 0074 01d6 | | Execute Vector,Field_Write 0075 4800 |H | Short_Literal 0x0 0076 4803 |H | Short_Literal 0x3 0077 00da | | Load_Top At_Offset_2 0078 01d6 | | Execute Vector,Field_Write 0079 4800 |H | Short_Literal 0x0 007a 4804 |H | Short_Literal 0x4 007b 00da | | Load_Top At_Offset_2 007c 01d6 | | Execute Vector,Field_Write 007d 00db | | Load_Top At_Offset_3 007e 00d9 | | Load_Top At_Offset_1 007f 00d9 | | Load_Top At_Offset_1 0080 3005 |0 | Execute Record,Field_Type,Field_Number 0x5 0081 0119 | | Execute Any,Check_In_Formal_Type 0082 00d1 | | Pop_Control Pop_Count_1 0083 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0084 4801 |H | Short_Literal 0x1 0085 00db | | Load_Top At_Offset_3 0086 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0087 4800 |H | Short_Literal 0x0 0088 00db | | Load_Top At_Offset_3 0089 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 008a e20d | | Load 0x1,0xd 008b 3009 |0 | Execute Record,Field_Type,Field_Number 0x9 008c 0337 | 7 | Declare_Variable Array 008d 4800 |H | Short_Literal 0x0 008e 4801 |H | Short_Literal 0x1 008f 00da | | Load_Top At_Offset_2 0090 01d6 | | Execute Vector,Field_Write 0091 4800 |H | Short_Literal 0x0 0092 4802 |H | Short_Literal 0x2 0093 00da | | Load_Top At_Offset_2 0094 01d6 | | Execute Vector,Field_Write 0095 00db | | Load_Top At_Offset_3 0096 00d9 | | Load_Top At_Offset_1 0097 00d9 | | Load_Top At_Offset_1 0098 3009 |0 | Execute Record,Field_Type,Field_Number 0x9 0099 0119 | | Execute Any,Check_In_Formal_Type 009a 00d1 | | Pop_Control Pop_Count_1 009b 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 009c e002 | | Load 0x0,0x2 009d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 009e 00db | | Load_Top At_Offset_3 009f 00d9 | | Load_Top At_Offset_1 00a0 00d9 | | Load_Top At_Offset_1 00a1 300a |0 | Execute Record,Field_Type,Field_Number 0xa 00a2 0119 | | Execute Any,Check_In_Formal_Type 00a3 00d1 | | Pop_Control Pop_Count_1 00a4 380a |8 | Execute Record,Field_Write,Field_Number 0xa 00a5 e20d | | Load 0x1,0xd 00a6 300b |0 | Execute Record,Field_Type,Field_Number 0xb 00a7 0337 | 7 | Declare_Variable Array 00a8 4800 |H | Short_Literal 0x0 00a9 4801 |H | Short_Literal 0x1 00aa 00da | | Load_Top At_Offset_2 00ab 01d6 | | Execute Vector,Field_Write 00ac 4800 |H | Short_Literal 0x0 00ad 4802 |H | Short_Literal 0x2 00ae 00da | | Load_Top At_Offset_2 00af 01d6 | | Execute Vector,Field_Write 00b0 00db | | Load_Top At_Offset_3 00b1 00d9 | | Load_Top At_Offset_1 00b2 00d9 | | Load_Top At_Offset_1 00b3 300b |0 | Execute Record,Field_Type,Field_Number 0xb 00b4 0119 | | Execute Any,Check_In_Formal_Type 00b5 00d1 | | Pop_Control Pop_Count_1 00b6 380b |8 | Execute Record,Field_Write,Field_Number 0xb 00b7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; Debug Table 00b8 ; -------------------------------------------------------------------------------------- 00b8 0004 000a | | .DEBUG4 0x0004,0x000a,0x6d00,0x0000,0x0001,0x0002 00be 000b 00c6 | | .DBG4T 0x000b,0x00c6,0x8000,0x0000 00c2 003b 0000 | ; | .DBG4T 0x003b,0x0000,0x0005,0x0000 00c6 ; -------------------------------------------------------------------------------------- 00c6 ; Debug chain 00c6 ; -------------------------------------------------------------------------------------- 00c6 0001 0000 | | .DBGLEN 0x0001,0x0000 00c8 000b | | .DBGLNO 0x000b 00c9 0000 0000 | | .BLANK 0000[0x137]