diff options
| author | Richard Kenner <kenner@gcc.gnu.org> | 1996-09-29 19:02:58 -0400 |
|---|---|---|
| committer | Richard Kenner <kenner@gcc.gnu.org> | 1996-09-29 19:02:58 -0400 |
| commit | 7791247664583a58c7580c54ebba4e1e0629ffc7 (patch) | |
| tree | 23374a8841296116b6ffe76eeb3e84b3c941fa44 | |
| parent | b217d7febe66988b50d0dd41303dc332c0281acc (diff) | |
| download | gcc-7791247664583a58c7580c54ebba4e1e0629ffc7.zip gcc-7791247664583a58c7580c54ebba4e1e0629ffc7.tar.gz gcc-7791247664583a58c7580c54ebba4e1e0629ffc7.tar.bz2 | |
(yylex): Add new arg, TYPE, to call to build_complex.
From-SVN: r12864
| -rw-r--r-- | gcc/c-lex.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/gcc/c-lex.c b/gcc/c-lex.c index 966d5ef..d8e9e80 100644 --- a/gcc/c-lex.c +++ b/gcc/c-lex.c @@ -1465,7 +1465,8 @@ yylex () /* Create a node with determined type and value. */ if (imag) - yylval.ttype = build_complex (convert (type, integer_zero_node), + yylval.ttype = build_complex (NULL_TREE, + convert (type, integer_zero_node), build_real (type, value)); else yylval.ttype = build_real (type, value); @@ -1634,8 +1635,9 @@ yylex () if (TYPE_PRECISION (type) <= TYPE_PRECISION (integer_type_node)) yylval.ttype - = build_complex (integer_zero_node, - convert (integer_type_node, yylval.ttype)); + = build_complex (NULL_TREE, integer_zero_node, + convert (integer_type_node, + yylval.ttype)); else error ("complex integer constant is too wide for `complex int'"); } |