fixed a warning

[fw/sdcc] / src / SDCCast.c

diff --git a/src/SDCCast.c b/src/SDCCast.c
index b6f7cbfbd3a48a4511d631a1aba1463b46dcc1f4..a647dcddb0dc05aab8a07db8107a84087ae28554 100644 (file)
--- a/src/SDCCast.c
+++ b/src/SDCCast.c
@@ -2658,11 +2658,16 @@ decorateType (ast * tree)
       /* a left shift must be done with at least 16bits */
       if ((tree->opval.op==LEFT_OP) && (getSize(LTYPE(tree))<2)) {
        // insert a cast
-       tree->left = 
-         decorateType (newNode (CAST,
-                                newAst_LINK(copyLinkChain(LTYPE(tree))),
-                                tree->left));
-       SPEC_NOUN(tree->left->left->ftype)=V_INT;
+       if (IS_AST_SYM_VALUE(tree->left) || IS_AST_OP(tree->left)) {
+         tree->left = 
+           decorateType (newNode (CAST,
+                                  newAst_LINK(copyLinkChain(LTYPE(tree))),
+                                  tree->left));
+         SPEC_NOUN(tree->left->left->ftype)=V_INT;
+       } else {
+         // must be a literal, we can do it right away
+         SPEC_NOUN(tree->left->opval.val->type)=V_INT;
+       }
       }
       /* if only the right side is a literal & we are
          shifting more than size of the left operand then zero */