mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-01-12 01:25:18 +08:00
Code Issues Packages Projects Releases Wiki Activity

ch-tree.h (build_compare_expr): Change first argument's type from enum chill_tree_code' to enum tree_code'.

Browse Source 
* ch-tree.h (build_compare_expr): Change first argument's type
        from `enum chill_tree_code' to `enum tree_code'.
        (build_compare_discrete_expr): Likewise.
        * expr.c (build_compare_set_expr): Likewise.
        (build_compare_string_expr): Likewise.
        (build_compare_expr): Likewise.
        (build_compare_discrete_expr): Likewise.  Also add default case in
        switch statement.
        (compare_int_csts): Add default case in switch statement.

From-SVN: r22643
This commit is contained in:
Kaveh R. Ghazi 1998-09-29 18:41:05 +00:00 committed by Kaveh Ghazi
parent 98e48780cf
commit 1f6b0ce0c5
3 changed files with 23 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
gcc/ch/ChangeLog
View File

@ -1,3 +1,16 @@
Tue Sep 29 21:37:33 1998 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* ch-tree.h (build_compare_expr): Change first argument's type
from `enum chill_tree_code' to `enum tree_code'.
(build_compare_discrete_expr): Likewise.
* expr.c (build_compare_set_expr): Likewise.
(build_compare_string_expr): Likewise.
(build_compare_expr): Likewise.
(build_compare_discrete_expr): Likewise. Also add default case in
switch statement.
(compare_int_csts): Add default case in switch statement.
Sun Sep 20 11:02:55 1998 Robert Lipe <robertl@dgii.com>
* except.c: Include system.h.

4
gcc/ch/ch-tree.h
View File

@ -895,9 +895,9 @@ extern tree build_chill_compound_expr PROTO((tree));
extern tree build_chill_descr PROTO((tree));
extern void build_chill_descr_type PROTO((void));
extern void build_chill_inttime_type PROTO((void));
extern tree build_compare_expr PROTO((enum chill_tree_code,
extern tree build_compare_expr PROTO((enum tree_code,
tree, tree));
extern tree build_compare_discrete_expr PROTO((enum chill_tree_code,
extern tree build_compare_discrete_expr PROTO((enum tree_code,
tree, tree));
extern tree check_case_selector PROTO((tree));
extern tree check_case_selector_list PROTO((tree));

12
gcc/ch/expr.c
View File

@ -3125,7 +3125,7 @@ fold_set_expr (code, op0, op1)
*/
static tree
build_compare_set_expr (code, op0, op1)
enum chill_tree_code code;
enum tree_code code;
tree op0, op1;
{
tree result_type = NULL_TREE;
@ -3380,7 +3380,7 @@ build_concat_expr (op0, op1)
*/
static tree
build_compare_string_expr (code, op0, op1)
enum chill_tree_code code;
enum tree_code code;
tree op0, op1;
{
if (op0 == NULL_TREE || TREE_CODE (op0) == ERROR_MARK)
@ -3539,6 +3539,8 @@ compare_int_csts (op, val1, val2)
if (op == NE_EXPR)
result = !result;
break;
default:
abort();
}
return result;
}
@ -3549,7 +3551,7 @@ compare_int_csts (op, val1, val2)
tree
build_compare_discrete_expr (op, val1, val2)
enum chill_tree_code op;
enum tree_code op;
tree val1, val2;
{
tree type1 = TREE_TYPE (val1);
@ -3617,6 +3619,8 @@ build_compare_discrete_expr (op, val1, val2)
case NE_EXPR:
tmp = build_compare_expr (EQ_EXPR, val1, val2);
return build_chill_unary_op (TRUTH_NOT_EXPR, tmp);
default:
abort();
}
}
if (TYPE_PRECISION (type1) > TYPE_PRECISION (type2))
@ -3628,7 +3632,7 @@ build_compare_discrete_expr (op, val1, val2)
tree
build_compare_expr (op, val1, val2)
enum chill_tree_code op;
enum tree_code op;
tree val1, val2;
{
tree tmp;