fixed the (long)<<27 bug

git-svn-id: https://sdcc.svn.sourceforge.net/svnroot/sdcc/trunk/sdcc@732 4a8a32a2-be11-0410-ad9d-d568d2c75423

diff --git a/src/ds390/gen.c b/src/ds390/gen.c
index 2f55a68705ad6ca63e2df8f32949e4a8794a736e..f85207e39089982a9250d5021ae581552967e8a6 100644 (file)
--- a/src/ds390/gen.c
+++ b/src/ds390/gen.c
@@ -6633,7 +6633,7 @@ genlshFour (operand * result, operand * left, int shCount)
        movLeft2Result (left, LSB, result, MSB32, 0);
       aopPut (AOP (result), zero, LSB);
       aopPut (AOP (result), zero, MSB16);
-      aopPut (AOP (result), zero, MSB32);
+      aopPut (AOP (result), zero, MSB24);
       return;
     }
 

diff --git a/src/mcs51/gen.c b/src/mcs51/gen.c
index 4832f416ca668d34ffa46a6c60ff2cb542460e75..b239ecc4c0c3606612c8710bdbb2173dac247df7 100644 (file)
--- a/src/mcs51/gen.c
+++ b/src/mcs51/gen.c
@@ -6005,7 +6005,7 @@ genlshFour (operand * result, operand * left, int shCount)
        movLeft2Result (left, LSB, result, MSB32, 0);
       aopPut (AOP (result), zero, LSB);
       aopPut (AOP (result), zero, MSB16);
-      aopPut (AOP (result), zero, MSB32);
+      aopPut (AOP (result), zero, MSB24);
       return;
     }