|
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_0ea8df
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0120 | | .CONST 0x0120 ; 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 000d | | .CONST 0x000d ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0002 | | .CONST 0x0002 ; Number of locals
000b INIT_0008:
000b 029f 006b | k| Declare_Subprogram INIT_0068,For_Call
000d BODY_0008:
000d 0092 007a | z| Action Push_String_Extended,0x7a ; "CMVC"
000f 8402 | | Call 0x2,0x2
0010 0092 007b | {| Action Push_String_Extended,0x7b ; "CMVC_SOURCE_CONTROL"
0012 8402 | | Call 0x2,0x2
0013 0092 007c | || Action Push_String_Extended,0x7c ; "DOCUMENT_FORMATTER"
0015 8402 | | Call 0x2,0x2
0016 0092 007d | }| Action Push_String_Extended,0x7d ; "DESIGN_FACILITY"
0018 8402 | | Call 0x2,0x2
0019 0092 007e | ~| Action Push_String_Extended,0x7e ; "FTP"
001b 8402 | | Call 0x2,0x2
001c 0092 007f | | Action Push_String_Extended,0x7f ; "MAIL"
001e 8402 | | Call 0x2,0x2
001f 0092 0080 | | Action Push_String_Extended,0x80 ; "LRM_INTERFACE"
0021 8402 | | Call 0x2,0x2
0022 0092 0081 | | Action Push_String_Extended,0x81 ; "RPC"
0024 8402 | | Call 0x2,0x2
0025 0092 0082 | | Action Push_String_Extended,0x82 ; "SMTP"
0027 8402 | | Call 0x2,0x2
0028 0092 0083 | | Action Push_String_Extended,0x83 ; "SPELLER"
002a 8402 | | Call 0x2,0x2
002b 0092 0084 | | Action Push_String_Extended,0x84 ; "TARGET_BUILDER"
002d 8402 | | Call 0x2,0x2
002e 0092 0085 | | Action Push_String_Extended,0x85 ; "TCP_IP"
0030 8402 | | Call 0x2,0x2
0031 0092 0086 | | Action Push_String_Extended,0x86 ; "TELNET"
0033 8402 | | Call 0x2,0x2
0034 0092 0087 | | Action Push_String_Extended,0x87 ; "WORK_ORDERS"
0036 8402 | | Call 0x2,0x2
0037 0092 0088 | | Action Push_String_Extended,0x88 ; "X_INTERFACE"
0039 8402 | | Call 0x2,0x2
003a 0092 0089 | | Action Push_String_Extended,0x89 ; "DEC_VAX"
003c 8402 | | Call 0x2,0x2
003d 0092 008a | | Action Push_String_Extended,0x8a ; "I386_BARE"
003f 8402 | | Call 0x2,0x2
0040 0092 008b | | Action Push_String_Extended,0x8b ; "IBM370_MVS"
0042 8402 | | Call 0x2,0x2
0043 0092 008c | | Action Push_String_Extended,0x8c ; "IBM370_VM"
0045 8402 | | Call 0x2,0x2
0046 0092 008d | | Action Push_String_Extended,0x8d ; "IBM_370"
0048 8402 | | Call 0x2,0x2
0049 0092 008e | | Action Push_String_Extended,0x8e ; "INTEL_X86"
004b 8402 | | Call 0x2,0x2
004c 0092 008f | | Action Push_String_Extended,0x8f ; "M1750A_BARE"
004e 8402 | | Call 0x2,0x2
004f 0092 0090 | | Action Push_String_Extended,0x90 ; "MC68020_BARE"
0051 8402 | | Call 0x2,0x2
0052 0092 0091 | | Action Push_String_Extended,0x91 ; "MC68020_OS2000"
0054 8402 | | Call 0x2,0x2
0055 0092 0092 | | Action Push_String_Extended,0x92 ; "MC68020_UNIX"
0057 8402 | | Call 0x2,0x2
0058 0092 0093 | | Action Push_String_Extended,0x93 ; "MIL_STD_1750A"
005a 8402 | | Call 0x2,0x2
005b 0092 0094 | | Action Push_String_Extended,0x94 ; "MOTOROLA_68K"
005d 8402 | | Call 0x2,0x2
005e 0092 0095 | | Action Push_String_Extended,0x95 ; "VAX_VMS"
0060 8402 | | Call 0x2,0x2
0061 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0062 0000 0000 | | .BLANK 0000[0x6]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 4800 |H | Short_Literal 0x0
006c 4801 |H | Short_Literal 0x1
006d e003 | | Load 0x0,0x3
006e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
006f 1c08 | | Execute_Immediate Run_Utility,0x8
0070 4800 |H | Short_Literal 0x0
0071 00d9 | | Load_Top At_Offset_1
0072 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0073 4800 |H | Short_Literal 0x0
0074 00d9 | | Load_Top At_Offset_1
0075 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0076 e7ff | | Load 0x3,-0x1
0077 e20e | | Load 0x1,0xe
0078 8210 | | Call 0x1,0x10
0079 4502 |E | Exit_Suprogram New_Top_Offset 0x2
007a ; --------------------------------------------------------------------------------------
007a ; STRING TABLE
007a ; --------------------------------------------------------------------------------------
007a 003a | : | .STRTAB 0x003a->0x0097 ; "CMVC"
007b 003c | < | .STRTAB 0x003c->0x0099 ; "CMVC_SOURCE_CONTROL"
007c 004d | M | .STRTAB 0x004d->0x00a2 ; "DOCUMENT_FORMATTER"
007d 005d | ] | .STRTAB 0x005d->0x00ab ; "DESIGN_FACILITY"
007e 006a | j | .STRTAB 0x006a->0x00b3 ; "FTP"
007f 006b | k | .STRTAB 0x006b->0x00b4 ; "MAIL"
0080 006d | m | .STRTAB 0x006d->0x00b6 ; "LRM_INTERFACE"
0081 0078 | x | .STRTAB 0x0078->0x00bd ; "RPC"
0082 0079 | y | .STRTAB 0x0079->0x00be ; "SMTP"
0083 007b | { | .STRTAB 0x007b->0x00c0 ; "SPELLER"
0084 0080 | | .STRTAB 0x0080->0x00c4 ; "TARGET_BUILDER"
0085 008c | | .STRTAB 0x008c->0x00cb ; "TCP_IP"
0086 0090 | | .STRTAB 0x0090->0x00ce ; "TELNET"
0087 0094 | | .STRTAB 0x0094->0x00d1 ; "WORK_ORDERS"
0088 009d | | .STRTAB 0x009d->0x00d6 ; "X_INTERFACE"
0089 00a6 | | .STRTAB 0x00a6->0x00dc ; "DEC_VAX"
008a 00ab | | .STRTAB 0x00ab->0x00df ; "I386_BARE"
008b 00b2 | | .STRTAB 0x00b2->0x00e4 ; "IBM370_MVS"
008c 00ba | | .STRTAB 0x00ba->0x00e9 ; "IBM370_VM"
008d 00c1 | | .STRTAB 0x00c1->0x00ed ; "IBM_370"
008e 00c6 | | .STRTAB 0x00c6->0x00f1 ; "INTEL_X86"
008f 00cd | | .STRTAB 0x00cd->0x00f5 ; "M1750A_BARE"
0090 00d6 | | .STRTAB 0x00d6->0x00fb ; "MC68020_BARE"
0091 00e0 | | .STRTAB 0x00e0->0x0101 ; "MC68020_OS2000"
0092 00ec | | .STRTAB 0x00ec->0x0108 ; "MC68020_UNIX"
0093 00f6 | | .STRTAB 0x00f6->0x010e ; "MIL_STD_1750A"
0094 0101 | | .STRTAB 0x0101->0x0114 ; "MOTOROLA_68K"
0095 010b | | .STRTAB 0x010b->0x011a ; "VAX_VMS"
0096 0110 | | .STREND 0x0110->0x011e
0097 434d 5643 |CMVC| .STRTAB_STRINGS
011e 0000 0000 | | .XXX[0x2]
0120 ; --------------------------------------------------------------------------------------
0120 ; Debug Table
0120 ; --------------------------------------------------------------------------------------
0120 0004 0004 | | .DEBUG4 0x0004,0x0004,0xb01b,0x0000,0x0001,0x0000
0126 0b95 7013 | p | .XXX[0x9e]
0128 0b97 7013 | p |
012a 0bab 7013 | p |
012c 00da e001 | |
012e 1b35 183d | 5 =|
0130 4401 e22a |D *|
0132 4401 e22b |D +|
0134 4401 e22c |D ,|
0136 4401 e22d |D -|
0138 4401 e22c |D ,|
013a 4401 e22e |D .|
013c 4401 e22f |D /|
013e 4401 00da |D |
0140 e01e 1b11 | |
0142 180d 6825 | h%|
0144 00da e01e | |
0146 1b11 180e | |
0148 0b65 7011 | ep |
014a 0b66 7011 | fp |
014c 0b67 7011 | gp |
014e 0b61 7011 | ap |
0150 0b68 7011 | hp |
0152 0b69 7011 | ip |
0154 0b62 7011 | bp |
0156 00db e001 | |
0158 1b35 183d | 5 =|
015a 4401 e22a |D *|
015c 4401 e230 |D 0|
015e 4401 e22b |D +|
0160 4401 e22c |D ,|
0162 4401 e22d |D -|
0164 4401 e22e |D .|
0166 4401 e22f |D /|
0168 4401 00da |D |
016a e001 1b35 | 5|
016c 183d 4401 | =D |
016e 62cd 010f |b |
0170 6802 00d8 |h |
0172 0101 4801 | H |
0174 e00e 180d | |
0176 e229 0092 | ) |
0178 49c3 01cc |I |
017a 800d 4831 | H1|
017c 0257 0000 | W |
017e 0000 0000 | |
0180 318b 31b5 |1 1 |
0182 0004 00e1 | |
0184 e001 1b0f | |
0186 02c7 00d8 | |
0188 1c00 e001 | |
018a 1b0d e001 | |
018c 1b0d 00da | |
018e 0120 6803 | h |
0190 e001 1b0f | |
0192 7801 00da |x |
0194 62a3 e007 |b |
0196 1b0e e5ff | |
0198 e001 1b39 | 9|
019a 181b c403 | |
019c 0059 4801 | YH |
019e 00d9 0092 | |
01a0 4970 800f |Ip |
01a2 e001 1b0d | |
01a4 00e1 6292 | b |
01a6 e007 1b0e | |
01a8 e403 e001 | |
01aa 1b3b 182a | ; *|
01ac c402 0059 | Y|
01ae 4801 00d9 |H |
01b0 0092 49c4 | I |
01b2 800f 00da | |
01b4 4401 6286 |D b |
01b6 010f 6802 | h |
01b8 00d8 0101 | |
01ba 4801 e00e |H |
01bc 180d e229 | )|
01be 0092 49c5 | I |
01c0 01cc 800d | |
01c2 4831 0257 |H1 W|
01c4 0000 0000 | | .BLANK 0000[0x4]
01c8 31d8 3245 |1 2E| .XXX[0x38]
01ca 0004 e007 | |
01cc 1b0d 02c7 | |
01ce 00d8 1c00 | |
01d0 e001 1b0d | |
01d2 e001 1b38 | 8|
01d4 1b21 02c7 | ! |
01d6 00d8 1c00 | |
01d8 4800 a5fc |H |
01da 0007 00ec | |
01dc a5fe e007 | |
01de 1b0e c5fd | |
01e0 e5ff 8234 | 4|
01e2 6805 0092 |h |
01e4 49c6 e01f |I |
01e6 180d 4501 | E |
01e8 e01b 1810 | |
01ea e007 1814 | |
01ec c402 e001 | |
01ee 1b0d 00d9 | |
01f0 0120 6804 | h |
01f2 e001 1b38 | 8|
01f4 1b21 7801 | !x |
01f6 00d9 e001 | |
01f8 1b38 1b16 | 8 |
01fa e5ff 4800 | H |
01fc 4800 4801 |H H |
01fe e402 4802 | H |