|
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 - metrics - download
Length: 1024 (0x400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦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 00f0 | | .CONST 0x00f0 ; 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 002e | . | .CONST 0x002e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0016 | | .CONST 0x0016 ; Number of locals 000b INIT_0008: 000b 00e3 | | Load_Encached Natural_Cache 000c 0129 | ) | Execute Any,Make_Visible 000d 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated 000f 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated 0011 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 0013 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated 0015 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated 0017 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated 0019 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated 001b 00bf | | Action Accept_Activation 001c 00e3 | | Load_Encached Natural_Cache 001d 060c | | Execute_Immediate Set_Value_Unchecked,0xc 001e 00e4 | | Load_Encached Positive_Cache 001f 0605 | | Execute_Immediate Set_Value_Unchecked,0x5 0020 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0021 00c7 | | Action Elaborate_Subprogram 0022 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0023 00c7 | | Action Elaborate_Subprogram 0024 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0025 00c7 | | Action Elaborate_Subprogram 0026 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0027 00c7 | | Action Elaborate_Subprogram 0028 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0029 00c7 | | Action Elaborate_Subprogram 002a 1d13 | | Execute_Immediate Reference_Lex_1,0x13 002b 00c7 | | Action Elaborate_Subprogram 002c 1d14 | | Execute_Immediate Reference_Lex_1,0x14 002d 00c7 | | Action Elaborate_Subprogram 002e BODY_0008: 002e 00bc | | Action Signal_Activated 002f 00bb | | Action Signal_Completion 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0033 | 3 | .CONST 0x0033 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0001 | | .CONST 0x0001 ; Number of locals 0033 BODY_0030: 0033 INIT_0030: 0033 e215 | | Load 0x1,0x15 0034 00ca | | Action Exit_Nullary_Function 0035 0000 0000 | | .XXX[0x3] 0037 0000 | | 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 003b | ; | .CONST 0x003b ; Address of begin 0039 0004 | | .CONST 0x0004 ; Address of exception handler 003a 0001 | | .CONST 0x0001 ; Number of locals 003b BODY_0038: 003b INIT_0038: 003b e216 | | Load 0x1,0x16 003c 6007 |` | Indirect_Literal Discrete,0x44,{0x00000000, 0x001e0000} 003d 0271 | q | Execute Discrete,Times 003e 00d8 | | Load_Top At_Offset_0 003f 00e7 | | Load_Encached Duration_Cache 0040 0260 | ` | Execute Discrete,In_Type 0041 7001 |p | Jump_Nonzero 0x43 0042 0801 | | Execute_Immediate Raise,0x1 0043 00ca | | Action Exit_Nullary_Function 0044 0000 0000 | | .LITERAL {0x00000000, 0x001e0000} 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 67f8 |g | Indirect_Literal Discrete,0x44,{0x00000000, 0x001e0000} 004c 00ca | | Action Exit_Nullary_Function 004d 0000 0000 | | .XXX[0x3] 004f 0000 | | 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0053 | S | .CONST 0x0053 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0001 | | .CONST 0x0001 ; Number of locals 0053 BODY_0050: 0053 INIT_0050: 0053 6004 |` | Indirect_Literal Discrete,0x58,{0x00000000, 0x07080000} 0054 00ca | | Action Exit_Nullary_Function 0055 0000 0000 | | .XXX[0x3] 0057 0000 | | 0058 0000 0000 | | .LITERAL {0x00000000, 0x07080000} 005c 0000 0000 | | .BLANK 0000[0x4] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0065 | e | .CONST 0x0065 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0002 | | .CONST 0x0002 ; Number of locals 0063 INIT_0060: 0063 029f 00a3 | | Declare_Subprogram INIT_00a0,For_Call 0065 BODY_0060: 0065 0092 00a8 | | Action Push_String_Extended,0xa8 ; "Parameters for REMOTE_OPERATIONS CONTEXT CACHE :" 0067 8402 | | Call 0x2,0x2 0068 0092 00a9 | | Action Push_String_Extended,0xa9 ; " Default context persistence =" 006a e216 | | Load 0x1,0x16 006b 00e0 | | Load_Encached Standard_Cache 006c 1818 | | Execute Package,Field_Execute,Field_Number 0x18 006d 01cc | | Execute Vector,Catenate 006e 0092 00aa | | Action Push_String_Extended,0xaa ; " minutes" 0070 01cc | | Execute Vector,Catenate 0071 8402 | | Call 0x2,0x2 0072 0092 00ab | | Action Push_String_Extended,0xab ; " Maximum contexts per session =" 0074 e215 | | Load 0x1,0x15 0075 00e0 | | Load_Encached Standard_Cache 0076 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0077 01cc | | Execute Vector,Catenate 0078 8402 | | Call 0x2,0x2 0079 4801 |H | Short_Literal 0x1 007a e5ff | | Load 0x2,-0x1 007b e001 | | Load 0x0,0x1 007c 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 007d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 007e 0000 0000 | | .XXX[0x2] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 00da | | Load_Top At_Offset_2 0084 4968 |Ih | Short_Literal 0x168 0085 027c | | | Execute Discrete,Less 0086 6803 |h | Jump_Zero 0x8a 0087 00da | | Load_Top At_Offset_2 0088 a216 | | Store_Unchecked 0x1,0x16 0089 4502 |E | Exit_Suprogram New_Top_Offset 0x2 008a 4968 |Ih | Short_Literal 0x168 008b a216 | | Store_Unchecked 0x1,0x16 008c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 008d 0000 0000 | | .XXX[0x3] 008f 0000 | | 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 00da | | Load_Top At_Offset_2 0094 0d64 | d | Execute_Immediate Less,0x64 0095 6803 |h | Jump_Zero 0x99 0096 00da | | Load_Top At_Offset_2 0097 a215 | | Store_Unchecked 0x1,0x15 0098 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0099 4864 |Hd | Short_Literal 0x64 009a a215 | | Store_Unchecked 0x1,0x15 009b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 009c 0000 0000 | | .BLANK 0000[0x4] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 00da | | Load_Top At_Offset_2 00a4 e5ff | | Load 0x2,-0x1 00a5 e001 | | Load 0x0,0x1 00a6 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 00a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; STRING TABLE 00a8 ; -------------------------------------------------------------------------------------- 00a8 000a | | .STRTAB 0x000a->0x00ad ; "Parameters for REMOTE_OPERATIONS CONTEXT CACHE :" 00a9 0038 | 8 | .STRTAB 0x0038->0x00c5 ; " Default context persistence =" 00aa 0056 | V | .STRTAB 0x0056->0x00d5 ; " minutes" 00ab 005c | \ | .STRTAB 0x005c->0x00d9 ; " Maximum contexts per session =" 00ac 007a | z | .STREND 0x007a->0x00e9 00ad 5061 7261 |Para| .STRTAB_STRINGS 00e9 0000 0000 | | .BLANK 0000[0x7] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; Debug Table 00f0 ; -------------------------------------------------------------------------------------- 00f0 0004 000e | | .DEBUG4 0x0004,0x000e,0xf45a,0x0000,0x0001,0x0000 00f6 1602 f04a | J| .XXX[0x10a] 00f8 3200 72d1 |2 r | 00fa 1e00 72ff | r | 00fc 8600 7326 | s&| 00fe b602 f05a | Z| 0100 fe00 7375 | su| 0102 1600 739a | s | 0104 3602 f073 |6 s| 0106 ac00 73f0 | s | 0108 d602 f096 | | 010a 4c00 742f |L t/| 010c be00 7454 | tT| 010e de00 7472 | tr| 0110 c602 f0ae | | 0112 fa00 74c1 | t | 0114 2600 74e2 |& t | 0116 2600 7508 |& u | 0118 4e02 f0c7 |N | 011a a800 7552 | uR| 011c 8e00 7575 | uu| 011e 9e00 759c | u | 0120 ce02 f0e8 | | 0122 3800 75dd |8 u | 0124 c600 760c | v | 0126 2e00 7622 |. v"| 0128 de00 764f | vO| 012a 3600 766d |6 vm| 012c 1e00 7690 | v | 012e 2e00 76a8 |. v | 0130 ee02 f128 | (| 0132 5000 76e9 |P v | 0134 e602 f139 | 9| 0136 1c00 7727 | w'| 0138 c600 774e | wN| 013a f600 7770 | wp| 013c fe00 779e | w | 013e 5e02 f16a |^ j| 0140 7800 77e0 |x w | 0142 5e00 7801 |^ x | 0144 5e00 7824 |^ x$| 0146 6e02 f183 |n | 0148 2600 7868 |& xh| 014a 7e02 f193 |~ | 014c f200 78a9 | x | 014e 7600 78c1 |v x | 0150 2e00 78ee |. x | 0152 8e00 7910 | y | 0154 9602 f207 | | 0156 7600 794e |v yN| 0158 7602 f219 |v | 015a 4a00 798a |J y | 015c 4602 f1fe |F | 015e 8c00 79d0 | y | 0160 6602 f22b |f +| 0162 1e02 f222 | "| 0164 3402 f210 |4 | 0166 6000 7a57 |` zW| 0168 7e00 7a7d |~ z}| 016a a600 7a9b | z | 016c 8e00 7abb | z | 016e 8600 7adb | z | 0170 7e00 7af7 |~ z | 0172 5600 7b19 |V { | 0174 5e00 7b3e |^ {>| 0176 7e00 7b51 |~ {Q| 0178 0e00 7b73 | {s| 017a 1602 f265 | e| 017c d800 7bbd | { | 017e 5600 7bdf |V { | 0180 5e00 7c01 |^ | | 0182 6600 7c17 |f | | 0184 0e00 7c39 | |9| 0186 1600 7c5b | |[| 0188 1e00 7c7a | |z| 018a 0e02 f29e | | 018c 0e00 7cb7 | | | 018e ee00 7cdc | | | 0190 0600 7cfa | | | 0192 f600 7d1c | } | 0194 fe00 7d3f | }?| 0196 0600 7d64 | }d| 0198 2600 7d86 |& } | 019a 2e00 7d99 |. } | 019c c600 7dc1 | } | 019e fe00 7ddf | } | 01a0 e600 7e03 | ~ | 01a2 fe00 7e28 | ~(| 01a4 1600 7e45 | ~E| 01a6 fe00 7e59 | ~Y| 01a8 9600 7e6e | ~n| 01aa 3600 7e86 |6 ~ | 01ac f600 7ea2 | ~ | 01ae ce00 7ebd | ~ | 01b0 9e00 7edf | ~ | 01b2 a600 7ef4 | ~ | 01b4 4600 7f08 |F | 01b6 e600 7f26 | &| 01b8 ce00 7f3f | ?| 01ba 8e00 7f5a | Z| 01bc 5e00 7f79 |^ y| 01be 4e00 7f89 |N | 01c0 ce00 7fa5 | | 01c2 a600 7fbf | | 01c4 6e00 7fda |n | 01c6 3e00 7ff6 |> | 01c8 1600 800f | | 01ca de00 8024 | $| 01cc 7e00 8048 |~ H| 01ce 9600 8061 | a| 01d0 5600 8083 |V | 01d2 5e00 80a5 |^ | 01d4 6600 80bb |f | 01d6 0e00 80d4 | | 01d8 d600 80f3 | | 01da c600 8104 | | 01dc 4600 8126 |F &| 01de 4e00 813a |N :| 01e0 ee00 815c | \| 01e2 f600 8175 | u| 01e4 b600 8190 | | 01e6 8600 81aa | | 01e8 4e00 81c7 |N | 01ea 2e00 81e1 |. | 01ec fe00 8202 | | 01ee fe00 8211 | | 01f0 6e00 8234 |n 4| 01f2 7e00 8243 |~ C| 01f4 f600 8265 | e| 01f6 fe00 8288 | | 01f8 0600 82a6 | | 01fa f600 82ca | | 01fc 0600 82f1 | | 01fe 3600 8312 |6 |