From 2a602fb76470226eae4f8c015846e59a2ae4f038 Mon Sep 17 00:00:00 2001
From: slade_rich <slade_rich@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Mon, 6 Sep 2004 00:19:51 +0000
Subject: [PATCH] Bug fixes for PIC14 - signed RSHIFT problem. Patch supplied
 by Allen(agschrum).

git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@3476 4a8a32a2-be11-0410-ad9d-d568d2c75423
---
 ChangeLog     | 4 ++++
 src/pic/gen.c | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 45db80a0..ece04471 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2004-09-06 Slade Rich <slade_rich AT users.sourceforge.net>
+
+	* Bug fixes for PIC14 - signed RSHIFT problem. Patch supplied by Allen(agschrum).
+
 2004-09-06 Erik Petrich <epetrich AT ivorytower.norman.ok.us>
 
 	* src/port.h,
diff --git a/src/pic/gen.c b/src/pic/gen.c
index 7f693450..6d20ae11 100644
--- a/src/pic/gen.c
+++ b/src/pic/gen.c
@@ -6710,7 +6710,7 @@ static void shiftR2Left2Result (operand *left, int offl,
 	case 2:
 	case 3:
 		if(sign)
-			emitpcode(POC_RLFW,popGet(AOP(result),offr+MSB16));
+			emitpcode(POC_RLFW,popGet(AOP(left),offl+MSB16));
 		else
 			emitCLRC;
 		
-- 
2.47.2