github.com/rcornwell.sims
1
0
Fork 0
mirror of https://github.com/rcornwell/sims.git synced 2026-01-19 09:28:10 +00:00
Code Releases Activity

PDP10: More performance update for KA native mode.

Browse Source
This commit is contained in:
Richard Cornwell 2019-02-25 21:58:36 -05:00
parent 47915041fb
commit d38d402f4c
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
PDP10/ka10_cpu.c
View File

@ -1214,11 +1214,11 @@ t_stat dev_apr(uint32 dev, uint64 *data) {
case DATAO:
/* Set protection registers */
Rh = 0377 & (*data >> 1);
Rl = 0377 & (*data >> 10);
Rh = (0377 & (*data >> 1)) << 10;
Rl = (0377 & (*data >> 10)) << 10;
Pflag = 01 & (*data >> 18);
Ph = 0377 & (*data >> 19);
Pl = 0377 & (*data >> 28);
Ph = ((0377 & (*data >> 19)) << 10) + 01777;
Pl = ((0377 & (*data >> 28)) << 10) + 01777;
sim_debug(DEBUG_DATAIO, &cpu_dev, "DATAO APR %012llo\n", *data);
break;
@ -2023,14 +2023,14 @@ int Mem_write_bbn(int flag, int cur_context) {
int page_lookup_ka(int addr, int flag, int *loc, int wr, int cur_context, int fetch) {
if (!flag && (FLAGS & USER) != 0) {
if (addr <= ((Pl << 10) + 01777)) {
*loc = (addr + (Rl << 10)) & RMASK;
if (addr <= Pl) {
*loc = (addr + Rl) & RMASK;
return 1;
}
if (cpu_unit[0].flags & UNIT_TWOSEG &&
(addr & 0400000) != 0 && (addr <= ((Ph << 10) + 01777))) {
(addr & 0400000) != 0 && (addr <= Ph)) {
if ((Pflag == 0) || (Pflag == 1 && wr == 0)) {
*loc = (addr + (Rh << 10)) & RMASK;
*loc = (addr + Rh) & RMASK;
return 1;
}
}