|
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_0870df
└─⟦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 0038 | 8 | .CONST 0x0038 ; 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 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 001b | | .CONST 0x001b ; Address of begin 0019 0028 | ( | .CONST 0x0028 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b 00da | | Load_Top At_Offset_2 001c e001 | | Load 0x0,0x1 001d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 001e a5fe | | Store_Unchecked 0x2,-0x2 001f 00da | | Load_Top At_Offset_2 0020 e001 | | Load 0x0,0x1 0021 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0022 a5fd | | Store_Unchecked 0x2,-0x3 0023 00da | | Load_Top At_Offset_2 0024 e001 | | Load 0x0,0x1 0025 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0026 a5fc | | Store_Unchecked 0x2,-0x4 0027 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0028 TRAP_0018: 0028 010e | | Execute Exception,Is_Constraint_Error 0029 6807 |h | Jump_Zero 0x31 002a 4800 |H | Short_Literal 0x0 002b a5fe | | Store_Unchecked 0x2,-0x2 002c 4800 |H | Short_Literal 0x0 002d a5fd | | Store_Unchecked 0x2,-0x3 002e 4800 |H | Short_Literal 0x0 002f a5fc | | Store_Unchecked 0x2,-0x4 0030 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0031 0100 | | Execute Exception,Raise 0032 0000 0000 | | .BLANK 0000[0x6] 0038 ; -------------------------------------------------------------------------------------- 0038 ; Debug Table 0038 ; -------------------------------------------------------------------------------------- 0038 0004 0004 | | .DEBUG4 0x0004,0x0004,0x4a64,0x0000,0x0001,0x0000 003e 3d18 28d0 |= ( | .XXX[0x1c2] 0040 c57d 54c4 | }T | 0042 810d 4d7d | M}| 0044 3115 1950 |1 P| 0046 28d0 c57d |( }| 0048 54c8 810d |T | 004a 4d7d 5540 |M}U@| 004c 28d0 c57d |( }| 004e 54cc 810d |T | 0050 4d7d 4925 |M}I%| 0052 1d21 5028 | !P(| 0054 d0c5 7d54 | }T| 0056 d081 0d4d | M| 0058 7d11 3d5d |} =]| 005a 3828 d0c5 |8( | 005c 7d54 d481 |}T | 005e 0d4d 7d41 | M}A| 0060 051d 157d | }| 0062 5540 28d0 |U@( | 0064 c57d 54d8 | }T | 0066 810d 4d7d | M}| 0068 4105 1d15 |A | 006a 7d11 3d5d |} =]| 006c 3828 d0c5 |8( | 006e 7d54 dc81 |}T | 0070 0d4d 7d15 | M} | 0072 3911 7d2d |9 }-| 0074 1564 28d0 | d( | 0076 c57d 5504 | }U | 0078 810d 4d7d | M}| 007a 4149 2539 |AI%9| 007c 5028 d0c5 |P( | 007e 7d55 0c81 |}U | 0080 0d4d 7d25 | M}%| 0082 394d 1549 |9M I| 0084 5028 d0c5 |P( | 0086 7d55 1481 |}U | 0088 0d4d 7d55 | M}U| 008a 3911 3c28 |9 <(| 008c d0c5 7d55 | }U| 008e 1881 0d4d | M| 0090 7d05 1d05 |} | 0092 2538 28d0 |%8( | 0094 c57d 5520 | }U | 0096 810d 4d7d | M}| 0098 1925 3910 | %9 | 009a 28d0 c57d |( }| 009c 5524 810d |U$ | 009e 4d7d 4d51 |M}MQ| 00a0 3d40 28d0 |=@( | 00a2 c57d 5528 | }U(| 00a4 810d 4d7d | M}| 00a6 2115 3140 |! 1@| 00a8 28d0 c57d |( }| 00aa 552c 810d |U, | 00ac 4d7d 4d0d |M}M | 00ae 493d 3131 |I=11| 00b0 7d31 3d0d |}1= | 00b2 2c28 d0c5 |,( | 00b4 7d55 7c81 |}U| | 00b6 0d4d 7d39 | M}9| 00b8 5535 7d31 |U5}1| 00ba 3d0d 2c28 |= ,(| 00bc d0c5 7d58 | }X| 00be b481 0d4d | M| 00c0 7d2d 417d |}-A}| 00c2 1539 5115 | 9Q | 00c4 4828 d0c5 |H( | 00c6 7d59 2881 |}Y( | 00c8 0d4d 7d2d | M}-| 00ca 417d 3555 |A}5U| 00cc 3151 2541 |1Q%A| 00ce 3164 28d0 |1d( | 00d0 c57d 592c | }Y,| 00d2 810d 4d7d | M}| 00d4 2d41 7d05 |-A} | 00d6 1110 28d0 | ( | 00d8 c57d 5934 | }Y4| 00da 810d 4d7d | M}| 00dc 2d41 7d4d |-A}M| 00de 5509 5149 |U QI| 00e0 050d 5028 | P(| 00e2 d0c5 7d59 | }Y| 00e4 3881 0d4d |8 M| 00e6 7d2d 417d |}-A}| 00e8 1115 0d25 | %| 00ea 3505 3028 |5 0(| 00ec d0c5 7d59 | }Y| 00ee 3c81 0d4d |< M| 00f0 7d2d 417d |}-A}| 00f2 1125 5925 | %Y%| 00f4 1114 28d0 | ( | 00f6 c57d 5974 | }Yt| 00f8 810d 4d7d | M}| 00fa 2d41 7d15 |-A} | 00fc 4555 0530 |EU 0| 00fe 28d0 c57d |( }| 0100 5978 810d |Yx | 0102 4d7d 18c4 |M} | 0104 28d0 c57d |( }| 0106 597c 810d |Y| | 0108 4d7d 18c8 |M} | 010a 28d0 c57d |( }| 010c 5c80 810d |\ | 010e 4d7d 18cc |M} | 0110 28d0 c57d |( }| 0112 5c84 810d |\ | 0114 4d7d 18d0 |M} | 0116 28d0 c57d |( }| 0118 5c88 810d |\ | 011a 4d7d 18d4 |M} | 011c 28d0 c57d |( }| 011e 5c8c 810d |\ | 0120 4d7d 18d8 |M} | 0122 28d0 c57d |( }| 0124 5c90 810d |\ | 0126 4d7d 18dc |M} | 0128 28d0 c57d |( }| 012a 5c94 810d |\ | 012c 4d7d 18e0 |M} | 012e 28d0 c57d |( }| 0130 5c98 810d |\ | 0132 4d7d 18e4 |M} | 0134 28d0 c57d |( }| 0136 5c9c 810d |\ | 0138 4d7d 18c4 |M} | 013a c028 d0c5 | ( | 013c 7d5c a081 |}\ | 013e 0d4d 7d18 | M} | 0140 c4c4 28d0 | ( | 0142 c57d 5ca4 | }\ | 0144 810d 4d7d | M}| 0146 18c4 c828 | (| 0148 d0c5 7d5c | }\| 014a a881 0d4d | M| 014c 7d41 493d |}AI=| 014e 414c 28d0 |AL( | 0150 c57d 5cac | }\ | 0152 810d 4d7d | M}| 0154 1949 3d39 | I=9| 0156 5028 d0c5 |P( | 0158 7d5c b081 |}\ | 015a 0d4d 7d0d | M} | 015c 3d41 6428 |=Ad(| 015e d0c5 7d5c | }\| 0160 b481 0d4d | M| 0162 7d3d 4115 |}=A | 0164 3828 d0c5 |8( | 0166 7d5c b881 |}\ | 0168 0d4d 7d41 | M}A| 016a 054d 5114 | MQ | 016c 28d0 c57d |( }| 016e 5cbc 810d |\ | 0170 4d7d 0d55 |M} U| 0172 5028 d0c5 |P( | 0174 7d5c c081 |}\ | 0176 0d4d 7d2d | M}-| 0178 417c d428 |A| (| 017a d0c5 7d5d | }]| 017c 2481 0d4d |$ M| 017e 7d05 3150 |} 1P| 0180 28d0 c57d |( }| 0182 5d28 810d |]( | 0184 4d7d 0531 |M} 1| 0186 517d 1d49 |Q} I| 0188 0541 2028 | A (| 018a d0c5 7d5d | }]| 018c 7c81 0d4d || M| 018e 7d11 1531 |} 1| 0190 1551 1428 | Q (| 0192 d0c5 7d60 | }`| 0194 a081 354d | 5M| 0196 7d09 050d |} | 0198 2d4d 4105 |-MA | 019a 0d14 28d0 | ( | 019c c57d 60a4 | }` | 019e 8135 4d7d | 5M}| 01a0 5105 0828 |Q (| 01a2 d0c5 7d60 | }`| 01a4 a881 354d | 5M| 01a6 7d31 2539 |}1%9| 01a8 1519 1515 | | 01aa 1028 d0c5 | ( | 01ac 7d60 b481 |}` | 01ae 354d 7d0d |5M} | 01b0 0549 4925 | II%| 01b2 051d 157d | }| 01b4 4915 5155 |I QU| 01b6 4938 28d0 |I8( | 01b8 c57d 60cc | }` | 01ba 8135 4d7d | 5M}| 01bc 4105 554d |A UM| 01be 1428 d0c5 | ( | 01c0 7d60 ec81 |}` | 01c2 354d 7d15 |5M} | 01c4 4d0d 0541 |M A| 01c6 1428 d0c5 | ( | 01c8 7d61 0081 |}a | 01ca 354d 7d0d |5M} | 01cc 3d35 413d |=5A=| 01ce 4d14 28d0 |M ( | 01d0 c57d 64c0 | }d | 01d2 8135 4d7d | 5M}| 01d4 0915 1d25 | %| 01d6 397d 3d18 |9}= | 01d8 28d0 c57d |( }| 01da 64c4 8135 |d 5| 01dc 4d7d 3115 |M}1 | 01de 1950 28d0 | P( | 01e0 c57d 64c8 | }d | 01e2 8135 4d7d | 5M}| 01e4 5540 28d0 |U@( | 01e6 c57d 64cc | }d | 01e8 8135 4d7d | 5M}| 01ea 4925 1d21 |I% !| 01ec 5028 d0c5 |P( | 01ee 7d64 d081 |}d | 01f0 354d 7d11 |5M} | 01f2 3d5d 3828 |=]8(| 01f4 d0c5 7d64 | }d| 01f6 d481 354d | 5M| 01f8 7d41 051d |}A | 01fa 157d 5540 | }U@| 01fc 28d0 c57d |( }| 01fe 64d8 8135 |d 5|