(fold): Fix error in handling REALPART_EXPR and IMAGPART_EXPR.
authorRichard Stallman <rms@gnu.org>
Thu, 4 Mar 1993 20:34:20 +0000 (20:34 +0000)
committerRichard Stallman <rms@gnu.org>
Thu, 4 Mar 1993 20:34:20 +0000 (20:34 +0000)
From-SVN: r3644

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),