diff options
| author | Richard Stallman <rms@gnu.org> | 1993-03-09 23:55:57 +0000 |
|---|---|---|
| committer | Richard Stallman <rms@gnu.org> | 1993-03-09 23:55:57 +0000 |
| commit | 07150665c9cee7a80e87a789f7c621c289d1fc78 (patch) | |
| tree | 35fafcb653b74c7227781dfee89cca083bd65397 /gcc/convert.c | |
| parent | c3c03e50c045b741832f1dde0de3e1cf7f7882dd (diff) | |
| download | gcc-07150665c9cee7a80e87a789f7c621c289d1fc78.tar.gz | |
(convert_to_complex): Avoid using comptypes.
From-SVN: r3688
Diffstat (limited to 'gcc/convert.c')
| -rw-r--r-- | gcc/convert.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/convert.c b/gcc/convert.c index 95bac9c3fec..5ccce13882b 100644 --- a/gcc/convert.c +++ b/gcc/convert.c @@ -397,7 +397,8 @@ convert_to_complex (type, expr) if (form == COMPLEX_TYPE) { - if (comptypes (TREE_TYPE (type), TREE_TYPE (TREE_TYPE (expr)))) + tree elt_type = TREE_TYPE (TREE_TYPE (expr)); + if (TYPE_MAIN_VARIANT (elt_type) == TYPE_MAIN_VARIANT (TREE_TYPE (type))) return expr; else if (TREE_CODE (expr) == COMPLEX_EXPR) return fold (build (COMPLEX_EXPR, |