|
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_0a7cf5
└─⟦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 01d0 | | .CONST 0x01d0 ; 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 8001 | | .CONST 0x8001 ; 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 0005 | | .CONST 0x0005 ; Number of locals 000b INIT_0008: 000b e003 | | Load 0x0,0x3 000c 1b8f | | Execute Package,Field_Read,Field_Number 0x8f 000d 02ff | | Declare_Variable Variant_Record 000e 00d8 | | Load_Top At_Offset_0 000f 1c00 | | Execute_Immediate Run_Utility,0x0 0010 e003 | | Load 0x0,0x3 0011 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 0012 02ff | | Declare_Variable Variant_Record 0013 00d8 | | Load_Top At_Offset_0 0014 1c00 | | Execute_Immediate Run_Utility,0x0 0015 e003 | | Load 0x0,0x3 0016 1b8f | | Execute Package,Field_Read,Field_Number 0x8f 0017 02ff | | Declare_Variable Variant_Record 0018 00d8 | | Load_Top At_Offset_0 0019 1c00 | | Execute_Immediate Run_Utility,0x0 001a 029f 012b | +| Declare_Subprogram INIT_0128,For_Call 001c BODY_0008: 001c e407 | | Load 0x2,0x7 001d 6801 |h | Jump_Zero 0x1f 001e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 001f 4808 |H | Short_Literal 0x8 0020 e003 | | Load 0x0,0x3 0021 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0022 00ea | | Load_Encached Null_String_Cache 0023 0092 014c | L| Action Push_String_Extended,0x14c ; "6" 0025 480b |H | Short_Literal 0xb 0026 e003 | | Load 0x0,0x3 0027 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0028 0092 014d | M| Action Push_String_Extended,0x14d ; "CSCI DATA FILES" 002a 4806 |H | Short_Literal 0x6 002b e003 | | Load 0x0,0x3 002c 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 002d e406 | | Load 0x2,0x6 002e e001 | | Load 0x0,0x1 002f 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32 0030 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0031 4809 |H | Short_Literal 0x9 0032 e003 | | Load 0x0,0x3 0033 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0034 00ea | | Load_Encached Null_String_Cache 0035 0092 014e | N| Action Push_String_Extended,0x14e ; "6.1" 0037 480b |H | Short_Literal 0xb 0038 e003 | | Load 0x0,0x3 0039 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 003a 0092 014f | O| Action Push_String_Extended,0x14f ; "Data File to CSC/CSU Cross Reference." 003c e003 | | Load 0x0,0x3 003d 1880 | | Execute Package,Field_Execute,Field_Number 0x80 003e 4826 |H& | Short_Literal 0x26 003f e003 | | Load 0x0,0x3 0040 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0041 e003 | | Load 0x0,0x3 0042 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0043 e602 | | Load 0x3,0x2 0044 016d | m | Execute Variant_Record,Structure_Write 0045 00db | | Load_Top At_Offset_3 0046 e003 | | Load 0x0,0x3 0047 1876 | v | Execute Package,Field_Execute,Field_Number 0x76 0048 00d1 | | Pop_Control Pop_Count_1 0049 00db | | Load_Top At_Offset_3 004a e003 | | Load 0x0,0x3 004b 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 004c 700b |p | Jump_Nonzero 0x58 004d 4801 |H | Short_Literal 0x1 004e 480e |H | Short_Literal 0xe 004f e003 | | Load 0x0,0x3 0050 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0051 e001 | | Load 0x0,0x1 0052 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0053 0092 0150 | P| Action Push_String_Extended,0x150 ; "This CSCI contains no shared data files." 0055 e003 | | Load 0x0,0x3 0056 1886 | | Execute Package,Field_Execute,Field_Number 0x86 0057 7883 |x | Jump 0xdb 0058 4801 |H | Short_Literal 0x1 0059 480e |H | Short_Literal 0xe 005a e003 | | Load 0x0,0x3 005b 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 005c e001 | | Load 0x0,0x1 005d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 005e 0092 0151 | Q| Action Push_String_Extended,0x151 ; "The following list provides a mapping between the shared data files identified below to the CSCs and CSUs that use them." 0060 e003 | | Load 0x0,0x3 0061 1886 | | Execute Package,Field_Execute,Field_Number 0x86 0062 4801 |H | Short_Literal 0x1 0063 e406 | | Load 0x2,0x6 0064 e001 | | Load 0x0,0x1 0065 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32 0066 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0067 4806 |H | Short_Literal 0x6 0068 e003 | | Load 0x0,0x3 0069 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 006a e003 | | Load 0x0,0x3 006b 1b65 | e | Execute Package,Field_Read,Field_Number 0x65 006c 0092 0152 | R| Action Push_String_Extended,0x152 ; "Data File/CSC Correlation" 006e e003 | | Load 0x0,0x3 006f 1881 | | Execute Package,Field_Execute,Field_Number 0x81 0070 00cf | | Action Mark_Auxiliary 0071 e602 | | Load 0x3,0x2 0072 e003 | | Load 0x0,0x3 0073 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0074 e602 | | Load 0x3,0x2 0075 e003 | | Load 0x0,0x3 0076 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0077 0263 | c | Execute Discrete,Above_Bound 0078 705b |p[ | Jump_Nonzero 0xd4 0079 00d8 | | Load_Top At_Offset_0 007a e602 | | Load 0x3,0x2 007b e003 | | Load 0x0,0x3 007c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 007d 00d9 | | Load_Top At_Offset_1 007e 8605 | | Call 0x3,0x5 007f 7052 |pR | Jump_Nonzero 0xd2 0080 00d8 | | Load_Top At_Offset_0 0081 e602 | | Load 0x3,0x2 0082 e003 | | Load 0x0,0x3 0083 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0084 e603 | | Load 0x3,0x3 0085 016d | m | Execute Variant_Record,Structure_Write 0086 4807 |H | Short_Literal 0x7 0087 e003 | | Load 0x0,0x3 0088 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0089 00ea | | Load_Encached Null_String_Cache 008a 4800 |H | Short_Literal 0x0 008b e603 | | Load 0x3,0x3 008c e003 | | Load 0x0,0x3 008d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 008e 4801 |H | Short_Literal 0x1 008f e603 | | Load 0x3,0x3 0090 e003 | | Load 0x0,0x3 0091 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0092 e003 | | Load 0x0,0x3 0093 1882 | | Execute Package,Field_Execute,Field_Number 0x82 0094 4803 |H | Short_Literal 0x3 0095 e603 | | Load 0x3,0x3 0096 e003 | | Load 0x0,0x3 0097 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0098 e604 | | Load 0x3,0x4 0099 016d | m | Execute Variant_Record,Structure_Write 009a 4806 |H | Short_Literal 0x6 009b e003 | | Load 0x0,0x3 009c 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 009d e003 | | Load 0x0,0x3 009e 1b65 | e | Execute Package,Field_Read,Field_Number 0x65 009f 00ea | | Load_Encached Null_String_Cache 00a0 e003 | | Load 0x0,0x3 00a1 1881 | | Execute Package,Field_Execute,Field_Number 0x81 00a2 e604 | | Load 0x3,0x4 00a3 e003 | | Load 0x0,0x3 00a4 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 00a5 700a |p | Jump_Nonzero 0xb0 00a6 4807 |H | Short_Literal 0x7 00a7 e003 | | Load 0x0,0x3 00a8 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 00a9 e003 | | Load 0x0,0x3 00aa 1b65 | e | Execute Package,Field_Read,Field_Number 0x65 00ab e003 | | Load 0x0,0x3 00ac 1b63 | c | Execute Package,Field_Read,Field_Number 0x63 00ad e003 | | Load 0x0,0x3 00ae 1882 | | Execute Package,Field_Execute,Field_Number 0x82 00af 781c |x | Jump 0xcc 00b0 00cf | | Action Mark_Auxiliary 00b1 e604 | | Load 0x3,0x4 00b2 e003 | | Load 0x0,0x3 00b3 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 00b4 e604 | | Load 0x3,0x4 00b5 e003 | | Load 0x0,0x3 00b6 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00b7 0263 | c | Execute Discrete,Above_Bound 00b8 7012 |p | Jump_Nonzero 0xcb 00b9 4807 |H | Short_Literal 0x7 00ba e003 | | Load 0x0,0x3 00bb 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 00bc 00ea | | Load_Encached Null_String_Cache 00bd 4800 |H | Short_Literal 0x0 00be 00db | | Load_Top At_Offset_3 00bf e604 | | Load 0x3,0x4 00c0 e003 | | Load 0x0,0x3 00c1 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 00c2 4809 |H | Short_Literal 0x9 00c3 00db | | Load_Top At_Offset_3 00c4 e604 | | Load 0x3,0x4 00c5 e003 | | Load 0x0,0x3 00c6 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 00c7 e003 | | Load 0x0,0x3 00c8 1882 | | Execute Package,Field_Execute,Field_Number 0x82 00c9 00c8 | | Action Pop_Auxiliary_Range 00ca 3fee |? | Loop_Increasing 0xb9 00cb 00ce | | Action Pop_Auxiliary 00cc e003 | | Load 0x0,0x3 00cd 1b64 | d | Execute Package,Field_Read,Field_Number 0x64 00ce e003 | | Load 0x0,0x3 00cf 1b65 | e | Execute Package,Field_Read,Field_Number 0x65 00d0 e003 | | Load 0x0,0x3 00d1 186e | n | Execute Package,Field_Execute,Field_Number 0x6e 00d2 00c8 | | Action Pop_Auxiliary_Range 00d3 3fa5 |? | Loop_Increasing 0x79 00d4 00ce | | Action Pop_Auxiliary 00d5 e003 | | Load 0x0,0x3 00d6 1b64 | d | Execute Package,Field_Read,Field_Number 0x64 00d7 e003 | | Load 0x0,0x3 00d8 1b65 | e | Execute Package,Field_Read,Field_Number 0x65 00d9 e003 | | Load 0x0,0x3 00da 186e | n | Execute Package,Field_Execute,Field_Number 0x6e 00db 00cf | | Action Mark_Auxiliary 00dc e602 | | Load 0x3,0x2 00dd e003 | | Load 0x0,0x3 00de 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 00df e602 | | Load 0x3,0x2 00e0 e003 | | Load 0x0,0x3 00e1 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00e2 0263 | c | Execute Discrete,Above_Bound 00e3 703e |p> | Jump_Nonzero 0x122 00e4 00d8 | | Load_Top At_Offset_0 00e5 e602 | | Load 0x3,0x2 00e6 e003 | | Load 0x0,0x3 00e7 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 00e8 00d9 | | Load_Top At_Offset_1 00e9 8605 | | Call 0x3,0x5 00ea 7035 |p5 | Jump_Nonzero 0x120 00eb 00d8 | | Load_Top At_Offset_0 00ec e602 | | Load 0x3,0x2 00ed e003 | | Load 0x0,0x3 00ee 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 00ef e603 | | Load 0x3,0x3 00f0 016d | m | Execute Variant_Record,Structure_Write 00f1 4809 |H | Short_Literal 0x9 00f2 e003 | | Load 0x0,0x3 00f3 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 00f4 00ea | | Load_Encached Null_String_Cache 00f5 4800 |H | Short_Literal 0x0 00f6 e603 | | Load 0x3,0x3 00f7 e003 | | Load 0x0,0x3 00f8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 00f9 4807 |H | Short_Literal 0x7 00fa e603 | | Load 0x3,0x3 00fb e003 | | Load 0x0,0x3 00fc 1820 | | Execute Package,Field_Execute,Field_Number 0x20 00fd 0092 0153 | S| Action Push_String_Extended,0x153 ; "." 00ff 01cc | | Execute Vector,Catenate 0100 e003 | | Load 0x0,0x3 0101 1880 | | Execute Package,Field_Execute,Field_Number 0x80 0102 4801 |H | Short_Literal 0x1 0103 480e |H | Short_Literal 0xe 0104 e003 | | Load 0x0,0x3 0105 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0106 00ea | | Load_Encached Null_String_Cache 0107 4814 |H | Short_Literal 0x14 0108 e603 | | Load 0x3,0x3 0109 e003 | | Load 0x0,0x3 010a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 010b 4814 |H | Short_Literal 0x14 010c e603 | | Load 0x3,0x3 010d e003 | | Load 0x0,0x3 010e 181f | | Execute Package,Field_Execute,Field_Number 0x1f 010f e003 | | Load 0x0,0x3 0110 1886 | | Execute Package,Field_Execute,Field_Number 0x86 0111 4800 |H | Short_Literal 0x0 0112 480e |H | Short_Literal 0xe 0113 e003 | | Load 0x0,0x3 0114 1862 | b | Execute Package,Field_Execute,Field_Number 0x62 0115 00ea | | Load_Encached Null_String_Cache 0116 4806 |H | Short_Literal 0x6 0117 e603 | | Load 0x3,0x3 0118 e003 | | Load 0x0,0x3 0119 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 011a 4806 |H | Short_Literal 0x6 011b e603 | | Load 0x3,0x3 011c e003 | | Load 0x0,0x3 011d 181f | | Execute Package,Field_Execute,Field_Number 0x1f 011e e003 | | Load 0x0,0x3 011f 1886 | | Execute Package,Field_Execute,Field_Number 0x86 0120 00c8 | | Action Pop_Auxiliary_Range 0121 3fc2 |? | Loop_Increasing 0xe4 0122 00ce | | Action Pop_Auxiliary 0123 e406 | | Load 0x2,0x6 0124 e001 | | Load 0x0,0x1 0125 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32 0126 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0127 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012b | + | .CONST 0x012b ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0001 | | .CONST 0x0001 ; Number of locals 012b BODY_0128: 012b INIT_0128: 012b 00cf | | Action Mark_Auxiliary 012c 00db | | Load_Top At_Offset_3 012d 0aff | | Execute_Immediate Plus,-0x1 012e 00d8 | | Load_Top At_Offset_0 012f 00e2 | | Load_Encached Integer_Cache 0130 0260 | ` | Execute Discrete,In_Type 0131 7001 |p | Jump_Nonzero 0x133 0132 0801 | | Execute_Immediate Raise,0x1 0133 e602 | | Load 0x3,0x2 0134 e003 | | Load 0x0,0x3 0135 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0136 0263 | c | Execute Discrete,Above_Bound 0137 7011 |p | Jump_Nonzero 0x149 0138 4801 |H | Short_Literal 0x1 0139 00d9 | | Load_Top At_Offset_1 013a e602 | | Load 0x3,0x2 013b e003 | | Load 0x0,0x3 013c 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 013d e003 | | Load 0x0,0x3 013e 1820 | | Execute Package,Field_Execute,Field_Number 0x20 013f 4801 |H | Short_Literal 0x1 0140 e9fe | | Load 0x4,-0x2 0141 e003 | | Load 0x0,0x3 0142 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0143 01df | | Execute Vector,Equal 0144 6802 |h | Jump_Zero 0x147 0145 4801 |H | Short_Literal 0x1 0146 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0147 00c8 | | Action Pop_Auxiliary_Range 0148 3fef |? | Loop_Increasing 0x138 0149 00ce | | Action Pop_Auxiliary 014a 4800 |H | Short_Literal 0x0 014b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 014c ; -------------------------------------------------------------------------------------- 014c ; STRING TABLE 014c ; -------------------------------------------------------------------------------------- 014c 0012 | | .STRTAB 0x0012->0x0155 ; "6" 014d 0011 | | .STRTAB 0x0011->0x0155 ; "CSCI DATA FILES" 014e 001e | | .STRTAB 0x001e->0x015d ; "6.1" 014f 001f | | .STRTAB 0x001f->0x015e ; "Data File to CSC/CSU Cross Reference." 0150 0042 | B | .STRTAB 0x0042->0x0171 ; "This CSCI contains no shared data files." 0151 0068 | h | .STRTAB 0x0068->0x0185 ; "The following list provides a mapping between the shared data files identified below to the CSCs and CSUs that use them." 0152 00de | | .STRTAB 0x00de->0x01c1 ; "Data File/CSC Correlation" 0153 00f5 | | .STRTAB 0x00f5->0x01cd ; "." 0154 00f4 | | .STREND 0x00f4->0x01ce 0155 3643 5343 |6CSC| .STRTAB_STRINGS 01ce 0000 0000 | | .XXX[0x2] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; Debug Table 01d0 ; -------------------------------------------------------------------------------------- 01d0 0004 0012 | | .DEBUG4 0x0004,0x0012,0xfcc9,0x0000,0x0001,0x0000 01d6 0000 0000 | | .BLANK 0000[0x2a]