|
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_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 |