From ea0b9ed65b06e83cb450b9b2135e77b2c220ba76 Mon Sep 17 00:00:00 2001 From: AJR Date: Thu, 26 Aug 2021 20:07:07 -0400 Subject: hd6120: Fix effect of TAD on LINK flag --- src/devices/cpu/pdp8/hd6120.cpp | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/src/devices/cpu/pdp8/hd6120.cpp b/src/devices/cpu/pdp8/hd6120.cpp index 110dfffaea5..574cdde757a 100644 --- a/src/devices/cpu/pdp8/hd6120.cpp +++ b/src/devices/cpu/pdp8/hd6120.cpp @@ -606,9 +606,7 @@ void hd6120_device::execute_run() case minor_state::TAD_4: m_temp += m_ac; if (m_temp >= 010000) - m_flags |= 4; - else - m_flags &= 3; + m_flags ^= 4; // LINK is complemented upon carry out next_instruction(); break; -- cgit v1.2.3