Minor fix in last change.

From-SVN: r3689
This commit is contained in:
Richard Stallman 1993-03-09 23:57:34 +00:00
parent 07150665c9
commit d847907df7
1 changed files with 1 additions and 1 deletions

View File

@ -398,7 +398,7 @@ convert_to_complex (type, expr)
if (form == COMPLEX_TYPE)
{
tree elt_type = TREE_TYPE (TREE_TYPE (expr));
if (TYPE_MAIN_VARIANT (elt_type) == TYPE_MAIN_VARIANT (TREE_TYPE (type)))
if (TYPE_MAIN_VARIANT (elt_type) == TYPE_MAIN_VARIANT (subtype))
return expr;
else if (TREE_CODE (expr) == COMPLEX_EXPR)
return fold (build (COMPLEX_EXPR,