|
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_0bf8df
└─⟦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 0058 | X | .CONST 0x0058 ; 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 0029 | ) | .CONST 0x0029 ; Address of begin 0019 0047 | G | .CONST 0x0047 ; Address of exception handler 001a 0007 | | .CONST 0x0007 ; Number of locals 001b INIT_0018: 001b e002 | | Load 0x0,0x2 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 02c7 | | Declare_Variable Any 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 4801 |H | Short_Literal 0x1 0021 4801 |H | Short_Literal 0x1 0022 00e9 | | Load_Encached String_Cache 0023 035b | [ | Declare_Type Array,Constrained 0024 0337 | 7 | Declare_Variable Array 0025 00e3 | | Load_Encached Natural_Cache 0026 00e1 | | Load_Encached Boolean_Cache 0027 03e9 | | Declare_Variable Discrete,Duplicate 0028 03e9 | | Declare_Variable Discrete,Duplicate 0029 BODY_0018: 0029 e402 | | Load 0x2,0x2 002a 00ea | | Load_Encached Null_String_Cache 002b e5ff | | Load 0x2,-0x1 002c 4800 |H | Short_Literal 0x0 002d e002 | | Load 0x0,0x2 002e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 002f c402 | | Store 0x2,0x2 0030 00e1 | | Load_Encached Boolean_Cache 0031 00e1 | | Load_Encached Boolean_Cache 0032 00e1 | | Load_Encached Boolean_Cache 0033 00e3 | | Load_Encached Natural_Cache 0034 e403 | | Load 0x2,0x3 0035 e402 | | Load 0x2,0x2 0036 e002 | | Load 0x0,0x2 0037 1868 | h | Execute Package,Field_Execute,Field_Number 0x68 0038 00d1 | | Pop_Control Pop_Count_1 0039 c404 | | Store 0x2,0x4 003a c405 | | Store 0x2,0x5 003b 005b | [ | Store_Top Discrete,At_Offset_3 003c 0059 | Y | Store_Top Discrete,At_Offset_1 003d e402 | | Load 0x2,0x2 003e e002 | | Load 0x0,0x2 003f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0040 c402 | | Store 0x2,0x2 0041 00db | | Load_Top At_Offset_3 0042 7002 |p | Jump_Nonzero 0x45 0043 00d8 | | Load_Top At_Offset_0 0044 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0045 4800 |H | Short_Literal 0x0 0046 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0047 TRAP_0018: 0047 0007 | | Action Break_Optional 0048 e402 | | Load 0x2,0x2 0049 e002 | | Load 0x0,0x2 004a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 004b 6804 |h | Jump_Zero 0x50 004c e402 | | Load 0x2,0x2 004d e002 | | Load 0x0,0x2 004e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 004f c402 | | Store 0x2,0x2 0050 4801 |H | Short_Literal 0x1 0051 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0052 0000 0000 | | .BLANK 0000[0x6] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b90,0x0000,0x0001,0x0000 005e 5c00 350d |\ 5 | .XXX[0x112] 0060 0531 1539 | 1 9| 0062 1105 48b9 | H | 0064 5125 3514 |Q%5 | 0066 01f6 4094 | @ | 0068 0019 4d51 | MQ| 006a 0551 554c | QUL| 006c 5c00 7949 |\ yI| 006e 1535 3d51 | 5=Q| 0070 157d 3d41 | }=A| 0072 1549 0551 | I Q| 0074 253d 394c |%=9L| 0076 b915 4949 | II| 0078 3d49 7d4d |=I}M| 007a 5105 5155 |Q QU| 007c 4c01 fa40 |L @| 007e 8c00 1d3d | =| 0080 4151 253d |AQ%=| 0082 394c 5c00 |9L\ | 0084 7949 1535 |yI 5| 0086 3d51 157d |=Q }| 0088 3d41 1549 |=A I| 008a 0551 253d | Q%=| 008c 394c b919 |9L | 008e 3d49 357d |=I5}| 0090 3d41 5125 |=AQ%| 0092 3d39 4c2c |=9L,| 0094 0000 0000 | | 0096 0003 8801 | | 0098 3c00 8149 |< I| 009a 1535 3d51 | 5=Q| 009c 157d 3d41 | }=A| 009e 1549 0551 | I Q| 00a0 253d 394c |%=9L| 00a2 b925 3951 | %9Q| 00a4 1549 3905 | I9 | 00a6 317d 1549 |1} I| 00a8 493d 48e1 |I=H | 00aa 985c 0075 | \ u| 00ac 4915 353d |I 5=| 00ae 5115 7d3d |Q }=| 00b0 4115 4905 |A I | 00b2 5125 3d39 |Q%=9| 00b4 4cb9 1549 |L I| 00b6 493d 497d |I=I}| 00b8 2d25 3911 |-%9 | 00ba 4c00 2000 |L | 00bc 0000 0000 | | 00be 0000 0044 | D| 00c0 0000 01a4 | | 00c2 045c 0075 | \ u| 00c4 4915 353d |I 5=| 00c6 5115 7d3d |Q }=| 00c8 4115 4905 |A I | 00ca 5125 3d39 |Q%=9| 00cc 4cb9 1115 |L | 00ce 3115 5115 |1 Q | 00d0 7d19 2531 |} %1| 00d2 14f5 ee51 | Q| 00d4 fa40 8c00 | @ | 00d6 2925 397d |)%9}| 00d8 0d3d 3951 | =9Q| 00da 1561 505c | aP\| 00dc 0065 4915 | eI | 00de 353d 5115 |5=Q | 00e0 7d3d 4115 |}=A | 00e2 4905 5125 |I Q%| 00e4 3d39 4cb9 |=9L | 00e6 0d3d 3951 | =9Q| 00e8 1561 5001 | aP | 00ea fa40 8c00 | @ | 00ec 255d 2551 |%]%Q| 00ee 217d 3905 |!}9 | 00f0 3514 5c00 |5 \ | 00f2 8549 1535 | I 5| 00f4 3d51 157d |=Q }| 00f6 3d41 1549 |=A I| 00f8 0551 253d | Q%=| 00fa 394c b949 |9L I| 00fc 1535 3d51 | 5=Q| 00fe 157d 4105 | }A | 0100 5121 3905 |Q!9 | 0102 3514 01f6 |5 | 0104 4094 0019 |@ | 0106 4d51 0551 |MQ Q| 0108 554c 5c00 |UL\ | 010a 7949 1535 |yI 5| 010c 3d51 157d |=Q }| 010e 3d41 1549 |=A I| 0110 0551 253d | Q%=| 0112 394c b915 |9L | 0114 4949 3d49 |II=I| 0116 7d4d 5105 |}MQ | 0118 5155 4c01 |QUL | 011a fa40 8c00 | @ | 011c 1d15 6141 | aA| 011e 5539 1d14 |U9 | 0120 5c00 414d |\ AM| 0122 5105 3911 |Q 9 | 0124 0549 10b9 | I | 0126 093d 3d31 | ==1| 0128 1505 3858 | 8X| 012a 0059 4d51 | YMQ| 012c 0539 1105 | 9 | 012e 4910 b909 |I | 0130 3d3d 3115 |==1 | 0132 0538 b919 | 8 | 0134 0531 4d15 | 1M | 0136 fa40 8c00 | @ | 0138 1d3d 4151 | =AQ| 013a 253d 394c |%=9L| 013c 5c00 7949 |\ yI| 013e 1535 3d51 | 5=Q| 0140 157d 3d41 | }=A| 0142 1549 0551 | I Q| 0144 253d 394c |%=9L| 0146 b919 3d49 | =I| 0148 357d 3d41 |5}=A| 014a 5125 3d39 |Q%=9| 014c 4c2c 0000 |L, | 014e 0000 0003 | | 0150 cc01 1800 | | 0152 6549 1535 |eI 5| 0154 3d51 157d |=Q }| 0156 3d41 1549 |=A I| 0158 0551 253d | Q%=| 015a 394c b925 |9L %| 015c 0935 7d3d | 5}=| 015e 4cc8 e198 |L | 0160 5c00 6d49 |\ mI| 0162 1535 3d51 | 5=Q| 0164 157d 3d41 | }=A| 0166 1549 0551 | I Q| 0168 253d 394c |%=9L| 016a b941 3105 | A1 | 016c 5119 3d49 |Q =I| 016e 354c 0020 |5L | 0170 0000 0000 | | .BLANK 0000[0x4] 0174 1c00 0001 | | .XXX[0x8c] 0176 bc01 5c00 | \ | 0178 7949 1535 |yI 5| 017a 3d51 157d |=Q }| 017c 3d41 1549 |=A I| 017e 0551 253d | Q%=| 0180 394c b90d |9L | 0182 3d39 5115 |=9Q | 0184 6151 7d11 |aQ} | 0186 0551 04ee | Q | 0188 666e 4078 |fn@x| 018a 0009 30c4 | 0 | 018c 0078 0009 | x | 018e 30c8 0078 |0 x| 0190 0009 30cc | 0 | 0192 0078 0009 | x | 0194 30d0 0078 |0 x| 0196 0009 30d4 | 0 | 0198 005c 0041 | \ A| 019a 4d51 0539 |MQ 9| 019c 1105 4910 | I | 019e b939 0551 | 9 Q| 01a0 5549 0530 |UI 0| 01a2 0000 0000 | | 01a4 0140 01cc | @ | 01a6 0079 4915 | yI | 01a8 353d 5115 |5=Q | 01aa 7d3d 4115 |}=A | 01ac 4905 5125 |I Q%| 01ae 3d39 4cb9 |=9L | 01b0 5d05 2551 |] %Q| 01b2 7d19 3d49 |} =I| 01b4 1559 1548 | Y H| 01b6 e198 5c00 | \ | 01b8 8549 1535 | I 5| 01ba 3d51 157d |=Q }| 01bc 3d41 1549 |=A I| 01be 0551 253d | Q%=| 01c0 394c b90d |9L | 01c2 3d35 3505 |=55 | 01c4 3911 7d51 |9 }Q| 01c6 2535 153d |%5 =| 01c8 5550 0038 |UP 8| 01ca 5c00 8549 |\ I| 01cc 1535 3d51 | 5=Q| 01ce 157d 3d41 | }=A| 01d0 1549 0551 | I Q| 01d2 253d 394c |%=9L| 01d4 b90d 3d35 | =5| 01d6 3505 3911 |5 9 | 01d8 7d51 2535 |}Q%5| 01da 153d 5550 | =UP| 01dc 5c00 1131 |\ 1| 01de 054d 5000 | MP | 01e0 0003 7001 | p | 01e2 2800 6d49 |( mI| 01e4 1535 3d51 | 5=Q| 01e6 157d 3d41 | }=A| 01e8 1549 0551 | I Q| 01ea 253d 394c |%=9L| 01ec b955 4d15 | UM | 01ee 7d15 4949 |} II| 01f0 3d48 e198 |=H | 01f2 5c00 7549 |\ uI| 01f4 1535 3d51 | 5=Q| 01f6 157d 3d41 | }=A| 01f8 1549 0551 | I Q| 01fa 253d 394c |%=9L| 01fc b915 4949 | II| 01fe 3d49 7d2d |=I}-|