|
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_e2acbc
└─⟦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 00c8 | | .CONST 0x00c8 ; 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 000b | | .CONST 0x000b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b BODY_0008: 000b INIT_0008: 000b e00a | | Load 0x0,0xa 000c 180e | | Execute Package,Field_Execute,Field_Number 0xe 000d 4801 |H | Short_Literal 0x1 000e 0092 004d | M| Action Push_String_Extended,0x4d ; "promote_preprocess ( host_unit =>" 0010 e5ff | | Load 0x2,-0x1 0011 e00b | | Load 0x0,0xb 0012 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0013 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0014 01cc | | Execute Vector,Catenate 0015 0092 004e | N| Action Push_String_Extended,0x4e ; ",remote_unit_name => " 0017 01cc | | Execute Vector,Catenate 0018 e5fe | | Load 0x2,-0x2 0019 01cc | | Execute Vector,Catenate 001a 0092 004f | O| Action Push_String_Extended,0x4f ; ",remote_library => " 001c 01cc | | Execute Vector,Catenate 001d e5fd | | Load 0x2,-0x3 001e 01cc | | Execute Vector,Catenate 001f 0092 0050 | P| Action Push_String_Extended,0x50 ; ",remote_machine => " 0021 01cc | | Execute Vector,Catenate 0022 e5fc | | Load 0x2,-0x4 0023 01cc | | Execute Vector,Catenate 0024 0092 0051 | Q| Action Push_String_Extended,0x51 ; ",remote_directory => " 0026 01cc | | Execute Vector,Catenate 0027 e5fb | | Load 0x2,-0x5 0028 01cc | | Execute Vector,Catenate 0029 0092 0052 | R| Action Push_String_Extended,0x52 ; ",pre_options => " 002b 01cc | | Execute Vector,Catenate 002c e5fa | | Load 0x2,-0x6 002d 01cc | | Execute Vector,Catenate 002e 0092 0053 | S| Action Push_String_Extended,0x53 ; ",post_options => " 0030 01cc | | Execute Vector,Catenate 0031 e5f9 | | Load 0x2,-0x7 0032 01cc | | Execute Vector,Catenate 0033 0092 0054 | T| Action Push_String_Extended,0x54 ; ",option_separator => " 0035 01cc | | Execute Vector,Catenate 0036 e5f8 | | Load 0x2,-0x8 0037 01cc | | Execute Vector,Catenate 0038 0092 0055 | U| Action Push_String_Extended,0x55 ; ",remote_connection => cannot display" 003a 01cc | | Execute Vector,Catenate 003b 0092 0056 | V| Action Push_String_Extended,0x56 ; ",is_secondary => " 003d 01cc | | Execute Vector,Catenate 003e e5f6 | | Load 0x2,-0xa 003f 00e1 | | Load_Encached Boolean_Cache 0040 011c | | Execute Any,Convert_Unchecked 0041 1c01 | | Execute_Immediate Run_Utility,0x1 0042 01cc | | Execute Vector,Catenate 0043 e00d | | Load 0x0,0xd 0044 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0045 e5f5 | | Load 0x2,-0xb 0046 4800 |H | Short_Literal 0x0 0047 00ea | | Load_Encached Null_String_Cache 0048 00ea | | Load_Encached Null_String_Cache 0049 e00e | | Load 0x0,0xe 004a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 004b c5f5 | | Store 0x2,-0xb 004c 450b |E | Exit_Suprogram New_Top_Offset 0xb 004d ; -------------------------------------------------------------------------------------- 004d ; STRING TABLE 004d ; -------------------------------------------------------------------------------------- 004d 0016 | | .STRTAB 0x0016->0x0058 ; "promote_preprocess ( host_unit =>" 004e 0035 | 5 | .STRTAB 0x0035->0x0068 ; ",remote_unit_name => " 004f 0048 | H | .STRTAB 0x0048->0x0073 ; ",remote_library => " 0050 0059 | Y | .STRTAB 0x0059->0x007c ; ",remote_machine => " 0051 006a | j | .STRTAB 0x006a->0x0086 ; ",remote_directory => " 0052 007d | } | .STRTAB 0x007d->0x0090 ; ",pre_options => " 0053 008b | | .STRTAB 0x008b->0x0098 ; ",post_options => " 0054 009a | | .STRTAB 0x009a->0x00a1 ; ",option_separator => " 0055 00ad | | .STRTAB 0x00ad->0x00ab ; ",remote_connection => cannot display" 0056 00cf | | .STRTAB 0x00cf->0x00bd ; ",is_secondary => " 0057 00de | | .STREND 0x00de->0x00c6 0058 7072 6f6d |prom| .STRTAB_STRINGS 00c6 0000 0000 | | .XXX[0x2] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; Debug Table 00c8 ; -------------------------------------------------------------------------------------- 00c8 0004 0003 | | .DEBUG4 0x0004,0x0003,0x4661,0x0000,0x0001,0x0001 00ce 000b 00d2 | | .DBG4T 0x000b,0x00d2,0x0001,0x0000 00d2 ; -------------------------------------------------------------------------------------- 00d2 ; Debug chain 00d2 ; -------------------------------------------------------------------------------------- 00d2 0000 0002 | | .DBGLEN 0x0000,0x0002 00d4 000b 0045 | E| .DBGLNO 0x000b,0x0045 00d6 0000 0000 | | .BLANK 0000[0x12a]