|
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 └─ ⟦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 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 6c6c 792c |lly,| .XXX[0xda] 0128 2077 6865 | whe| 012a 6e65 7665 |neve| 012c 7220 6120 |r a | 012e 776f 726c |worl| 0130 6420 6973 |d is| 0132 2063 7265 | cre| 0134 6174 6564 |ated| 0136 2c20 6120 |, a | 0138 6c69 6e6b |link| 013a 2d70 6163 |-pac| 013c 6b20 6973 |k is| 013e 4d00 4f20 |M O | 0140 2020 202d | -| 0142 2d20 6372 |- cr| 0144 6561 7465 |eate| 0146 6420 666f |d fo| 0148 7220 7468 |r th| 014a 6174 2077 |at w| 014c 6f72 6c64 |orld| 014e 2c20 616e |, an| 0150 6420 7468 |d th| 0152 6520 6c69 |e li| 0154 6e6b 2070 |nk p| 0156 6163 6b20 |ack | 0158 6973 2064 |is d| 015a 6573 7472 |estr| 015c 6f79 6564 |oyed| 015e 2077 6865 | whe| 0160 6e20 7468 |n th| 0162 6520 776f |e wo| 0164 726c 6420 |rld | 0166 6973 4f00 |isO | 0168 1120 2020 | | 016a 202d 2d20 | -- | 016c 6465 7374 |dest| 016e 726f 7965 |roye| 0170 642e 1100 |d. | 0172 0000 004c | L| 0174 2020 2020 | | 0176 2d2d 2054 |-- T| 0178 6865 2070 |he p| 017a 7572 706f |urpo| 017c 7365 206f |se o| 017e 6620 6c69 |f li| 0180 6e6b 2d70 |nk-p| 0182 6163 6b73 |acks| 0184 2069 7320 | is | 0186 746f 2064 |to d| 0188 6566 696e |efin| 018a 6520 7468 |e th| 018c 6520 6d65 |e me| 018e 616e 696e |anin| 0190 6720 6f66 |g of| 0192 2077 6974 | wit| 0194 682d 636c |h-cl| 0196 6175 7365 |ause| 0198 7320 696e |s in| 019a 4c00 4f20 |L O | 019c 2020 202d | -| 019e 2d20 4164 |- Ad| 01a0 6120 756e |a un| 01a2 6974 732e |its.| 01a4 2020 4c65 | Le| 01a6 7420 4420 |t D | 01a8 6265 2061 |be a| 01aa 2064 6972 | dir| 01ac 6563 746f |ecto| 01ae 7279 2061 |ry a| 01b0 6e64 2057 |nd W| 01b2 2062 6520 | be | 01b4 7468 6520 |the | 01b6 696e 6e65 |inne| 01b8 726d 6f73 |rmos| 01ba 7420 776f |t wo| 01bc 726c 6420 |rld | 01be 636f 6e74 |cont| 01c0 6169 6e69 |aini| 01c2 6e67 4f00 |ngO | 01c4 4a20 2020 |J | 01c6 202d 2d20 | -- | 01c8 4420 2869 |D (i| 01ca 6620 4420 |f D | 01cc 6973 2061 |is a| 01ce 2077 6f72 | wor| 01d0 6c64 2c20 |ld, | 01d2 7468 656e |then| 01d4 2057 3d44 | W=D| 01d6 292e 2020 |). | 01d8 5375 7070 |Supp| 01da 6f73 6520 |ose | 01dc 616e 2041 |an A| 01de 6461 2075 |da u| 01e0 6e69 7420 |nit | 01e2 696e 2044 |in D| 01e4 2063 6f6e | con| 01e6 7461 696e |tain| 01e8 7320 614a |s aJ| 01ea 0029 2020 | ) | 01ec 2020 2d2d | --| 01ee 2063 6f6e | con| 01f0 7465 7874 |text| 01f2 2063 6c61 | cla| 01f4 7573 6520 |use | 01f6 6f66 2074 |of t| 01f8 6865 2066 |he f| 01fa 6f72 6d20 |orm | 01fc 2277 6974 |"wit| 01fe 6820 5829 |h X)|