From 71f7a46e2116cd506991c16b3dda051dabcf5a5b Mon Sep 17 00:00:00 2001
From: edmccard <edmccard@hotmail.com>
Date: Thu, 12 Apr 2012 03:18:33 -0400
Subject: [PATCH] Fix bug with ROR acting as LSR

---
 src/cpu/ctfe_d6502.d | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/cpu/ctfe_d6502.d b/src/cpu/ctfe_d6502.d
index 34a1f41..6e406b5 100644
--- a/src/cpu/ctfe_d6502.d
+++ b/src/cpu/ctfe_d6502.d
@@ -405,7 +405,7 @@ string OpBody(int op, string chip, bool s, bool c)
             break;
         case "ROR":
             if (op == 0x6a)
-                ret ~= ShiftRight(_A);
+                ret ~= RotateRight(_A);
             else
                 ret ~= RMW(RotateRight("data"), env);
             break;