From 1f6b0ce0c5a368d88decdbfb9344cc2f325673fe Mon Sep 17 00:00:00 2001 From: "Kaveh R. Ghazi" Date: Tue, 29 Sep 1998 18:41:05 +0000 Subject: ch-tree.h (build_compare_expr): Change first argument's type from `enum chill_tree_code' to `enum tree_code'. * 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 --- gcc/ch/ChangeLog | 13 +++++++++++++ gcc/ch/ch-tree.h | 4 ++-- gcc/ch/expr.c | 12 ++++++++---- 3 files changed, 23 insertions(+), 6 deletions(-) (limited to 'gcc/ch') diff --git a/gcc/ch/ChangeLog b/gcc/ch/ChangeLog index 7370b75..994abe2 100644 --- a/gcc/ch/ChangeLog +++ b/gcc/ch/ChangeLog @@ -1,3 +1,16 @@ +Tue Sep 29 21:37:33 1998 Kaveh R. Ghazi + + * 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 * except.c: Include system.h. diff --git a/gcc/ch/ch-tree.h b/gcc/ch/ch-tree.h index cb3fd3d..ae43dd9 100644 --- a/gcc/ch/ch-tree.h +++ b/gcc/ch/ch-tree.h @@ -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)); diff --git a/gcc/ch/expr.c b/gcc/ch/expr.c index 3326eea..acc1bc7 100644 --- a/gcc/ch/expr.c +++ b/gcc/ch/expr.c @@ -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; -- cgit v1.1