From 39ee29e66a9c2af1cb1f02c5fd92963baca2ab32 Mon Sep 17 00:00:00 2001 From: Richard Cornwell Date: Sun, 15 Oct 2017 13:18:58 -0400 Subject: [PATCH] B5500: Updated for fix in translation table change. --- B5500/b5500_urec.c | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/B5500/b5500_urec.c b/B5500/b5500_urec.c index b158655..b911dcc 100644 --- a/B5500/b5500_urec.c +++ b/B5500/b5500_urec.c @@ -377,11 +377,13 @@ cdr_srv(UNIT *uptr) { chan_set_parity(chan); } break; - case 0111: - ch = 0; - /* Handle invalid punch */ - chan_set_parity(chan); - break; /* Translate ? to error*/ + case 017: + if (data->image[uptr->u4] == 0x006) { + ch = 0; + /* Handle invalid punch */ + chan_set_parity(chan); + break; /* Translate ? to error*/ + } } } sim_debug(DEBUG_DATA, &cdr_dev, "cdr %d: Char > %03o '%c' %d\n", u, ch,