|
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_0534f8
└─⟦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 0070 | p | .CONST 0x0070 ; 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 001c | | .CONST 0x001c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 000d 0321 | ! | Declare_Variable Record,Visible 000e e001 | | Load 0x0,0x1 000f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0010 0321 | ! | Declare_Variable Record,Visible 0011 e002 | | Load 0x0,0x2 0012 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0013 00d9 | | Load_Top At_Offset_1 0014 017d | } | Execute Record,Structure_Write 0015 e002 | | Load 0x0,0x2 0016 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0017 0129 | ) | Execute Any,Make_Visible 0018 e002 | | Load 0x0,0x2 0019 1b10 | | Execute Package,Field_Read,Field_Number 0x10 001a 0129 | ) | Execute Any,Make_Visible 001b 00bf | | Action Accept_Activation 001c BODY_0008: 001c e001 | | Load 0x0,0x1 001d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 001e 0322 | " | Declare_Variable Record 001f 0092 004f | O| Action Push_String_Extended,0x4f ; "XSun4" 0021 e003 | | Load 0x0,0x3 0022 180e | | Execute Package,Field_Execute,Field_Number 0xe 0023 00d9 | | Load_Top At_Offset_1 0024 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0025 4802 |H | Short_Literal 0x2 0026 00d9 | | Load_Top At_Offset_1 0027 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0028 0092 0050 | P| Action Push_String_Extended,0x50 ; "Sun; keyboard model 4" 002a e003 | | Load 0x0,0x3 002b 180e | | Execute Package,Field_Execute,Field_Number 0xe 002c 00d9 | | Load_Top At_Offset_1 002d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 002e e003 | | Load 0x0,0x3 002f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0030 00d9 | | Load_Top At_Offset_1 0031 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0032 0092 0051 | Q| Action Push_String_Extended,0x51 ; "X_Sun_X11R3" 0034 e003 | | Load 0x0,0x3 0035 180e | | Execute Package,Field_Execute,Field_Number 0xe 0036 00d9 | | Load_Top At_Offset_1 0037 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0038 0092 0052 | R| Action Push_String_Extended,0x52 ; "Src_Sun_X11R3" 003a e003 | | Load 0x0,0x3 003b 180e | | Execute Package,Field_Execute,Field_Number 0xe 003c 00d9 | | Load_Top At_Offset_1 003d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 003e 4850 |HP | Short_Literal 0x50 003f 00d9 | | Load_Top At_Offset_1 0040 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0041 4850 |HP | Short_Literal 0x50 0042 00d9 | | Load_Top At_Offset_1 0043 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0044 e003 | | Load 0x0,0x3 0045 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0046 00d9 | | Load_Top At_Offset_1 0047 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0048 4801 |H | Short_Literal 0x1 0049 00d9 | | Load_Top At_Offset_1 004a 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 004b e20d | | Load 0x1,0xd 004c 017d | } | Execute Record,Structure_Write 004d 00bc | | Action Signal_Activated 004e 00bb | | Action Signal_Completion 004f ; -------------------------------------------------------------------------------------- 004f ; STRING TABLE 004f ; -------------------------------------------------------------------------------------- 004f 000a | | .STRTAB 0x000a->0x0054 ; "XSun4" 0050 000d | | .STRTAB 0x000d->0x0056 ; "Sun; keyboard model 4" 0051 0020 | | .STRTAB 0x0020->0x0061 ; "X_Sun_X11R3" 0052 0029 | ) | .STRTAB 0x0029->0x0066 ; "Src_Sun_X11R3" 0053 0034 | 4 | .STREND 0x0034->0x006d 0054 5853 756e |XSun| .STRTAB_STRINGS 006d 0000 0000 | | .XXX[0x3] 006f 0000 | | 0070 ; -------------------------------------------------------------------------------------- 0070 ; Debug Table 0070 ; -------------------------------------------------------------------------------------- 0070 0004 0000 | | .DEBUG4 0x0004,0x0000,0x39fd,0x0000,0x0001,0x0002 0076 000b 007e | ~| .DBG4T 0x000b,0x007e,0x0000,0x0000 007a 001c 0084 | | .DBG4T 0x001c,0x0084,0x0000,0x0000 007e ; -------------------------------------------------------------------------------------- 007e ; Debug chain 007e ; -------------------------------------------------------------------------------------- 007e 0004 0000 | | .DBGLEN 0x0004,0x0000 0080 000b 000e | | .DBGLNO 0x000b,0x000e,0x0015,0x0018 0084 ; -------------------------------------------------------------------------------------- 0084 ; Debug chain 0084 ; -------------------------------------------------------------------------------------- 0084 0000 0001 | | .DBGLEN 0x0000,0x0001 0086 001c | | .DBGLNO 0x001c 0087 0000 0000 | | .BLANK 0000[0x179]