From 44ea48587bdb833449a28658128fdaa58e7ad76f Mon Sep 17 00:00:00 2001
From: bernhardheld <bernhardheld@4a8a32a2-be11-0410-ad9d-d568d2c75423>
Date: Fri, 18 Nov 2005 13:01:00 +0000
Subject: [PATCH] more about genUnpackBits

git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@3956 4a8a32a2-be11-0410-ad9d-d568d2c75423
---
 src/mcs51/gen.c | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/src/mcs51/gen.c b/src/mcs51/gen.c
index 1d64c504..c9b86b97 100644
--- a/src/mcs51/gen.c
+++ b/src/mcs51/gen.c
@@ -9350,9 +9350,21 @@ genUnpackBits (operand * result, char *rname, int ptype, iCode *ifx)
 finish:
   if (offset < rsize)
     {
+      char *source;
+
+      if (SPEC_USIGN (etype))
+        source = zero;
+      else
+        {
+          /* signed bitfield: sign extension with 0x00 or 0xff */
+          emitcode ("rlc", "a");
+          emitcode ("subb", "a,acc");
+
+          source = "a";
+        }
       rsize -= offset;
       while (rsize--)
-        aopPut (result, zero, offset++, isOperandVolatile (result, FALSE));
+        aopPut (result, source, offset++, isOperandVolatile (result, FALSE));
     }
 }
 
-- 
2.47.2