diff options
| -rw-r--r-- | gcc/treelang/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/treelang/parse.y | 5 | ||||
| -rw-r--r-- | gcc/treelang/treetree.c | 3 |
3 files changed, 12 insertions, 2 deletions
diff --git a/gcc/treelang/ChangeLog b/gcc/treelang/ChangeLog index ec9c1c3..c1a2da6 100644 --- a/gcc/treelang/ChangeLog +++ b/gcc/treelang/ChangeLog @@ -1,5 +1,11 @@ 2005-02-26 James A. Morrison <phython@gcc.gnu.org> + * parse.y: Do comparisons as the type of the first expression. + * treetree.c (tree_code_get_integer_value): Build integer constants + with the proper type. + +2005-02-26 James A. Morrison <phython@gcc.gnu.org> + * Make-lang.in: Remove commented out code. * lang-specs.h: Always pass -dumpbase to tree1. diff --git a/gcc/treelang/parse.y b/gcc/treelang/parse.y index 7ee71ec..abf2bcb 100644 --- a/gcc/treelang/parse.y +++ b/gcc/treelang/parse.y @@ -591,8 +591,11 @@ INTEGER { struct prod_token_parm_item *tok = $2; struct prod_token_parm_item *op1 = $1; struct prod_token_parm_item *op2 = $3; + int type_code = NUMERIC_TYPE (op1); + if (!type_code) + YYERROR; $$ = make_plus_expression - (tok, op1, op2, SIGNED_INT, EXP_EQUALS); + (tok, op1, op2, type_code, EXP_EQUALS); } |variable_ref ASSIGN expression { struct prod_token_parm_item *tok = $2; diff --git a/gcc/treelang/treetree.c b/gcc/treelang/treetree.c index eef293b..dcb7cd3 100644 --- a/gcc/treelang/treetree.c +++ b/gcc/treelang/treetree.c @@ -650,7 +650,8 @@ tree_code_get_integer_value (unsigned char* chars, unsigned int length) for (ix = start; ix < length; ix++) val = val * 10 + chars[ix] - (unsigned char)'0'; val = val*negative; - return build_int_cst_wide (NULL_TREE, + return build_int_cst_wide (start == 1 ? + integer_type_node : unsigned_type_node, val & 0xffffffff, (val >> 32) & 0xffffffff); } |