OSDN Git Service

(fold): Fix error in handling REALPART_EXPR and IMAGPART_EXPR.
authorrms <rms@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 4 Mar 1993 20:34:20 +0000 (20:34 +0000)
committerrms <rms@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 4 Mar 1993 20:34:20 +0000 (20:34 +0000)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@3644 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/fold-const.c

index 9e2fb82..fe9b72d 100644 (file)
@@ -4403,7 +4403,7 @@ fold (expr)
       return t;
 
     case REALPART_EXPR:
-      if (TREE_CODE (type) != COMPLEX_TYPE)
+      if (TREE_CODE (TREE_TYPE (arg0)) != COMPLEX_TYPE)
        return t;
       else if (TREE_CODE (arg0) == COMPLEX_EXPR)
        return omit_one_operand (type, TREE_OPERAND (arg0, 0),
@@ -4422,7 +4422,7 @@ fold (expr)
       return t;
 
     case IMAGPART_EXPR:
-      if (TREE_CODE (type) != COMPLEX_TYPE)
+      if (TREE_CODE (TREE_TYPE (arg0)) != COMPLEX_TYPE)
        return convert (type, integer_zero_node);
       else if (TREE_CODE (arg0) == COMPLEX_EXPR)
        return omit_one_operand (type, TREE_OPERAND (arg0, 1),