fixed a shift bug

[fw/sdcc] / src / ds390 / gen.c

diff --git a/src/ds390/gen.c b/src/ds390/gen.c
index 6b5cb9c6b09179b17746e60628ff32fa03be46bd..f4bd67bb95f66b697c4827c4abe2d4ded19f3c25 100644 (file)
--- a/src/ds390/gen.c
+++ b/src/ds390/gen.c
@@ -8548,6 +8548,8 @@ genRightShiftLiteral (operand * left,
        MOVA (aopGet (AOP (left), size - 1, FALSE, FALSE, TRUE));
       }
       addSign (result, LSB, sign);
+      freeAsmop (left, NULL, ic, TRUE);
+      freeAsmop (result, NULL, ic, TRUE);
     }
   else
     {