* std-operator.def: Remove TERNOP_SLICE_COUNT.
	* breakpoint.c (watchpoint_exp_is_const): Remove handling to
	TERNOP_SLICE_COUNT.
	* eval.c (evaluate_subexp_standard): Likewise.
	* expprint.c (print_subexp_standard): Likewise.
	(dump_subexp_body_standard): Likewise.
	* parse.c (operator_length_standard): Likewise.
This commit is contained in:
Yao Qi 2012-08-13 01:02:07 +00:00
parent 5cad973621
commit 7507c54a53
6 changed files with 10 additions and 20 deletions

View File

@ -1,3 +1,13 @@
2012-08-13 Yao Qi <yao@codesourcery.com>
* std-operator.def: Remove TERNOP_SLICE_COUNT.
* breakpoint.c (watchpoint_exp_is_const): Remove handling to
TERNOP_SLICE_COUNT.
* eval.c (evaluate_subexp_standard): Likewise.
* expprint.c (print_subexp_standard): Likewise.
(dump_subexp_body_standard): Likewise.
* parse.c (operator_length_standard): Likewise.
2012-08-13 Yao Qi <yao@codesourcery.com>
* std-operator.def: Remove OP_BITSTRING.

View File

@ -10160,7 +10160,6 @@ watchpoint_exp_is_const (const struct expression *exp)
case BINOP_RANGE:
case TERNOP_COND:
case TERNOP_SLICE:
case TERNOP_SLICE_COUNT:
case OP_LONG:
case OP_DOUBLE:

View File

@ -1140,17 +1140,6 @@ evaluate_subexp_standard (struct type *expect_type,
return value_slice (array, lowbound, upper - lowbound + 1);
}
case TERNOP_SLICE_COUNT:
{
struct value *array = evaluate_subexp (NULL_TYPE, exp, pos, noside);
int lowbound
= value_as_long (evaluate_subexp (NULL_TYPE, exp, pos, noside));
int length
= value_as_long (evaluate_subexp (NULL_TYPE, exp, pos, noside));
return value_slice (array, lowbound, length);
}
case TERNOP_COND:
/* Skip third and second args to evaluate the first one. */
arg1 = evaluate_subexp (NULL_TYPE, exp, pos, noside);

View File

@ -360,7 +360,6 @@ print_subexp_standard (struct expression *exp, int *pos,
return;
case TERNOP_SLICE:
case TERNOP_SLICE_COUNT:
print_subexp (exp, pos, stream, PREC_SUFFIX);
fputs_filtered ("(", stream);
print_subexp (exp, pos, stream, PREC_ABOVE_COMMA);
@ -787,7 +786,6 @@ dump_subexp_body_standard (struct expression *exp,
{
case TERNOP_COND:
case TERNOP_SLICE:
case TERNOP_SLICE_COUNT:
elt = dump_subexp (exp, stream, elt);
/* FALL THROUGH */
case BINOP_ADD:

View File

@ -976,7 +976,6 @@ operator_length_standard (const struct expression *expr, int endpos,
case TERNOP_COND:
case TERNOP_SLICE:
case TERNOP_SLICE_COUNT:
args = 3;
break;

View File

@ -105,11 +105,6 @@ OP (TERNOP_COND) /* ?: */
OP1(OP2:OP3). Return elements OP2 through OP3 of OP1. */
OP (TERNOP_SLICE)
/* A sub-string/sub-array. (The deleted) Chill syntax: OP1(OP2 UP
OP3). Return OP3 elements of OP1, starting with element
OP2. */
OP (TERNOP_SLICE_COUNT)
/* Multidimensional subscript operator, such as Modula-2 x[a,b,...].
The dimensionality is encoded in the operator, like the number of
function arguments in OP_FUNCALL, I.E. <OP><dimension><OP>.