From 2fc381dfe15d5fd37ab53a3cb3a442fbb2802137 Mon Sep 17 00:00:00 2001
From: Richard Cornwell <rich@sky-visions.com>
Date: Sat, 13 Mar 2021 15:12:45 -0500
Subject: [PATCH] KA10: Fixed RP10 to work on KI10.

---
 PDP10/kx10_dp.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/PDP10/kx10_dp.c b/PDP10/kx10_dp.c
index 3b3f075..08e43ac 100644
--- a/PDP10/kx10_dp.c
+++ b/PDP10/kx10_dp.c
@@ -715,7 +715,7 @@ t_stat dp_svc (UNIT *uptr)
                 CLR_BUF(uptr);
            }
            if (r)
-               sim_activate(uptr, 15);
+               sim_activate(uptr, 25);
            else {
                uptr->STATUS &= ~(SRC_DONE|END_CYL|BUSY);
                uptr->UFLAGS |= DONE;