KA10: Fixed running of OPR on Tops10 and Tops 20.
This commit is contained in:
parent
61877a5c77
commit
4b5386ea75
1 changed files with 1 additions and 1 deletions
|
@ -4477,7 +4477,7 @@ no_fetch:
|
||||||
if (((xct_flag & 8) != 0 && !ptr_flg) ||
|
if (((xct_flag & 8) != 0 && !ptr_flg) ||
|
||||||
((xct_flag & 2) != 0 && ptr_flg))
|
((xct_flag & 2) != 0 && ptr_flg))
|
||||||
sect = cur_sect = prev_sect;
|
sect = cur_sect = prev_sect;
|
||||||
#if 0
|
#if 1
|
||||||
/* The following lines are needed to run Tops 20 V3 on KL/B */
|
/* The following lines are needed to run Tops 20 V3 on KL/B */
|
||||||
if (((xct_flag & 014) == 04 && !ptr_flg && prev_sect == 0)
|
if (((xct_flag & 014) == 04 && !ptr_flg && prev_sect == 0)
|
||||||
|| ((xct_flag & 03) == 01 && ptr_flg && prev_sect == 0))
|
|| ((xct_flag & 03) == 01 && ptr_flg && prev_sect == 0))
|
||||||
|
|
Loading…
Add table
Reference in a new issue