diff options
| author | Richard Kenner <kenner@gcc.gnu.org> | 1993-09-04 11:16:10 -0400 |
|---|---|---|
| committer | Richard Kenner <kenner@gcc.gnu.org> | 1993-09-04 11:16:10 -0400 |
| commit | b839fb3fe943321c27cb560762bc37112dd993eb (patch) | |
| tree | b64d8844f18c4ad9055ccbf51998e02a13535f92 | |
| parent | 25a1019f18d089c60c0d150e679ec0ac7a18c4f2 (diff) | |
| download | gcc-b839fb3fe943321c27cb560762bc37112dd993eb.zip gcc-b839fb3fe943321c27cb560762bc37112dd993eb.tar.gz gcc-b839fb3fe943321c27cb560762bc37112dd993eb.tar.bz2 | |
(truthvalue_conversion): A complex value is nonzero if either part is
nonzero, not if both parts are nonzero.
From-SVN: r5259
| -rw-r--r-- | gcc/c-common.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/c-common.c b/gcc/c-common.c index 8d10aa3..e4129d5 100644 --- a/gcc/c-common.c +++ b/gcc/c-common.c @@ -1,5 +1,5 @@ /* Subroutines shared by all languages that are variants of C. - Copyright (C) 1992 Free Software Foundation, Inc. + Copyright (C) 1992, 1993 Free Software Foundation, Inc. This file is part of GNU CC. @@ -1026,7 +1026,7 @@ truthvalue_conversion (expr) case COMPLEX_EXPR: return build_binary_op ((TREE_SIDE_EFFECTS (TREE_OPERAND (expr, 1)) - ? TRUTH_AND_EXPR : TRUTH_ANDIF_EXPR), + ? TRUTH_OR_EXPR : TRUTH_ORIF_EXPR), truthvalue_conversion (TREE_OPERAND (expr, 0)), truthvalue_conversion (TREE_OPERAND (expr, 1)), 0); @@ -1096,7 +1096,7 @@ truthvalue_conversion (expr) if (TREE_CODE (TREE_TYPE (expr)) == COMPLEX_TYPE) return (build_binary_op ((TREE_SIDE_EFFECTS (expr) - ? TRUTH_AND_EXPR : TRUTH_ANDIF_EXPR), + ? TRUTH_OR_EXPR : TRUTH_ORIF_EXPR), truthvalue_conversion (build_unary_op (REALPART_EXPR, expr, 0)), truthvalue_conversion (build_unary_op (IMAGPART_EXPR, expr, 0)), 0)); |