From 540a03f75cede95c588832a4c467ab0bc7d12de6 Mon Sep 17 00:00:00 2001
From: Thomas Harte <thomas.harte@gmail.com>
Date: Fri, 21 Jul 2017 22:31:42 -0400
Subject: [PATCH] Exposed the memptr register.

---
 Processors/Z80/Z80.hpp | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/Processors/Z80/Z80.hpp b/Processors/Z80/Z80.hpp
index 7d260855a..d59898f10 100644
--- a/Processors/Z80/Z80.hpp
+++ b/Processors/Z80/Z80.hpp
@@ -40,7 +40,9 @@ enum Register {
 	IYh,	IYl,	IY,
 	R,		I,		Refresh,
 
-	IFF1,	IFF2,	IM
+	IFF1,	IFF2,	IM,
+
+	MemPtr
 };
 
 /*
@@ -1796,6 +1798,8 @@ template <class T> class Processor {
 				case Register::IFF2:					return iff2_ ? 1 : 0;
 				case Register::IM:						return (uint16_t)interrupt_mode_;
 
+				case Register::MemPtr:					return memptr_.full;
+
 				default: return 0;
 			}
 		}
@@ -1855,6 +1859,8 @@ template <class T> class Processor {
 				case Register::IFF2:			iff2_ = !!value;						break;
 				case Register::IM:				interrupt_mode_ = value % 3;			break;
 
+				case Register::MemPtr:			memptr_.full = value;					break;
+
 				default: break;
 			}
 		}