|
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_2a54d7
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦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 0088 | | .CONST 0x0088 ; 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 001b | | .CONST 0x001b ; Address of begin
0019 0031 | 1 | .CONST 0x0031 ; Address of exception handler
001a 0001 | | .CONST 0x0001 ; Number of locals
001b BODY_0018:
001b INIT_0018:
001b 4801 |H | Short_Literal 0x1
001c 4806 |H | Short_Literal 0x6
001d 00e9 | | Load_Encached String_Cache
001e 0334 | 4 | Declare_Variable Array,With_Constraint
001f 5020 |P | Indirect_Literal Any,0x40,{0x5443502f, 0x49502020}
0020 e001 | | Load 0x0,0x1
0021 180d | | Execute Package,Field_Execute,Field_Number 0xd
0022 680d |h | Jump_Zero 0x30
0023 00db | | Load_Top At_Offset_3
0024 00db | | Load_Top At_Offset_3
0025 4800 |H | Short_Literal 0x0
0026 4801 |H | Short_Literal 0x1
0027 0092 0044 | D| Action Push_String_Extended,0x44 ; "!machine.ethernet_host_id"
0029 0092 0045 | E| Action Push_String_Extended,0x45 ; "!machine.tcp_ip_host_id"
002b 0092 0046 | F| Action Push_String_Extended,0x46 ; "!tools.networking."
002d 4801 |H | Short_Literal 0x1
002e 4801 |H | Short_Literal 0x1
002f 8002 | | Call 0x0,0x2
0030 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0031 TRAP_0018:
0031 0007 | | Action Break_Optional
0032 4801 |H | Short_Literal 0x1
0033 4801 |H | Short_Literal 0x1
0034 e003 | | Load 0x0,0x3
0035 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0036 0092 0047 | G| Action Push_String_Extended,0x47 ; "Unhandled_Exception"
0038 4802 |H | Short_Literal 0x2
0039 0092 0048 | H| Action Push_String_Extended,0x48 ; "!Tools.Networking.TCP_IP_BOOT"
003b e004 | | Load 0x0,0x4
003c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
003d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
003e 0000 0000 | | .XXX[0x2]
0040 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020}
0044 ; --------------------------------------------------------------------------------------
0044 ; STRING TABLE
0044 ; --------------------------------------------------------------------------------------
0044 000c | | .STRTAB 0x000c->0x004a ; "!machine.ethernet_host_id"
0045 0023 | # | .STRTAB 0x0023->0x0056 ; "!machine.tcp_ip_host_id"
0046 0038 | 8 | .STRTAB 0x0038->0x0062 ; "!tools.networking."
0047 0048 | H | .STRTAB 0x0048->0x006b ; "Unhandled_Exception"
0048 0059 | Y | .STRTAB 0x0059->0x0074 ; "!Tools.Networking.TCP_IP_BOOT"
0049 0074 | t | .STREND 0x0074->0x0083
004a 216d 6163 |!mac| .STRTAB_STRINGS
0083 0000 0000 | | .BLANK 0000[0x5]
0088 ; --------------------------------------------------------------------------------------
0088 ; Debug Table
0088 ; --------------------------------------------------------------------------------------
0088 0004 0012 | | .DEBUG4 0x0004,0x0012,0x98b0,0x0000,0x0001,0x0000
008e 0000 0801 | | .XXX[0xd]
0090 4000 0000 |@ |
0092 0000 0010 | |
0094 0000 0088 | |
0096 0000 0000 | |
0098 4000 0002 |@ |
009a 8000 | |
009b 0000 0000 | | .BLANK 0000[0x2d]
00c8 0100 2800 | ( | .XXX[0xc]
00ca 0000 0000 | |
00cc 0002 0000 | |
00ce 0011 0000 | |
00d0 0000 0800 | |
00d2 0000 5000 | P |
00d4 0000 0000 | | .BLANK 0000[0x2d]
0101 0020 0500 | | .XXX[0xc]
0103 0000 0000 | |
0105 0000 4000 | @ |
0107 0002 2000 | |
0109 0000 0100 | |
010b 0000 0a00 | |
010d 0000 0000 | | .BLANK 0000[0x2d]
013a 0004 00a0 | | .XXX[0xc]
013c 0000 0000 | |
013e 0000 0800 | |
0140 0000 4400 | D |
0142 0000 0020 | |
0144 0000 0140 | @|
0146 0000 0000 | | .BLANK 0000[0x2e]
0174 8014 0000 | | .XXX[0xb]
0176 0000 0000 | |
0178 0100 0000 | |
017a 0880 0000 | |
017c 0004 0000 | |
017e 0028 | ( |
017f 0000 0000 | | .BLANK 0000[0x2e]
01ad 1002 8000 | | .XXX[0xb]
01af 0000 0000 | |
01b1 0020 0000 | |
01b3 0110 0000 | |
01b5 0000 8000 | |
01b7 0005 | |
01b8 0000 0000 | | .BLANK 0000[0x48]