From 5d64407b34e7c23b054b83b47e32bb87dc26cf4d Mon Sep 17 00:00:00 2001
From: Richard Cornwell <rcornwell@github.com>
Date: Sun, 11 Aug 2019 13:57:46 -0400
Subject: [PATCH] KA10: Another attempt to get 7track parity right on TM10

---
 PDP10/kx10_mt.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/PDP10/kx10_mt.c b/PDP10/kx10_mt.c
index fe625f6..020e974 100644
--- a/PDP10/kx10_mt.c
+++ b/PDP10/kx10_mt.c
@@ -615,7 +615,7 @@ t_stat mt_srv(UNIT * uptr)
             if (uptr->flags & MTUF_7TRK) {
                 cc = 6 * (5 - uptr->CPOS);
                 ch = mt_buffer[uptr->BPOS];
-                if ((((uptr->CNTRL & ODD_PARITY) ? 0x40 : 0) ^
+                if ((((uptr->CNTRL & ODD_PARITY) ? 0x40 : 0) ^ (ch & 0x40) ^
                       parity_table[ch & 0x3f]) == 0) {
                       mt_status |= PARITY_ERR;
                 }
@@ -694,7 +694,7 @@ t_stat mt_srv(UNIT * uptr)
          if ((uptr->CNTRL & MT_BRFUL) != 0) {
             if (uptr->flags & MTUF_7TRK) {
                 ch = mt_buffer[uptr->BPOS];
-                if ((((uptr->CNTRL & ODD_PARITY) ? 0x40 : 0) ^
+                if ((((uptr->CNTRL & ODD_PARITY) ? 0x40 : 0) ^ (ch & 0x40) ^
                       parity_table[ch & 0x3f]) == 0) {
                       mt_status |= PARITY_ERR;
                 }