From 5d5dc79f2c3411f46105ca5a37dcd8644138a7a5 Mon Sep 17 00:00:00 2001
From: Thomas Harte <thomas.harte@gmail.com>
Date: Thu, 7 Nov 2019 23:27:05 -0500
Subject: [PATCH] Corrects raster race condition with CPU.

---
 Machines/AtariST/AtariST.cpp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Machines/AtariST/AtariST.cpp b/Machines/AtariST/AtariST.cpp
index 3f7878594..8479eecb4 100644
--- a/Machines/AtariST/AtariST.cpp
+++ b/Machines/AtariST/AtariST.cpp
@@ -339,9 +339,11 @@ class ConcreteMachine:
 					cycle.value->halves.low = uint8_t(memory[address] >> cycle.byte_shift());
 				break;
 				case Microcycle::SelectWord:
+					video_.flush();	// TODO: (and below), a range check to determine whether this is really necesary.
 					memory[address] = cycle.value->full;
 				break;
 				case Microcycle::SelectByte:
+					video_.flush();
 					memory[address] = uint16_t(
 						(cycle.value->halves.low << cycle.byte_shift()) |
 						(memory[address] & cycle.untouched_byte_mask())