From a9adde6ea54f1053518ae94e512325803c2db811 Mon Sep 17 00:00:00 2001
From: Adrian Conlon <Adrian.conlon@gmail.com>
Date: Thu, 30 Aug 2018 01:37:46 +0100
Subject: [PATCH] Correct 6809 CLR flag handling.

Signed-off-by: Adrian Conlon <Adrian.conlon@gmail.com>
---
 MC6809/src/mc6809.cpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/MC6809/src/mc6809.cpp b/MC6809/src/mc6809.cpp
index 88ed14b..71a9546 100644
--- a/MC6809/src/mc6809.cpp
+++ b/MC6809/src/mc6809.cpp
@@ -784,7 +784,7 @@ uint8_t EightBit::mc6809::asr(uint8_t operand) {
 }
 
 uint8_t EightBit::mc6809::clr() {
-	clearFlag(CC(), HF | ZF | VF | CF);
+	clearFlag(CC(), NF | VF | CF);
 	setFlag(CC(), ZF);
 	return 0;
 }