From 7cf3118a8d89a5b59633c5724faeb15d46747205 Mon Sep 17 00:00:00 2001 From: Sergio Durigan Junior Date: Wed, 2 Jun 2010 00:40:40 +0000 Subject: [PATCH] 2010-06-01 Sergio Durigan Junior * expprint.c (print_subexp_standard): Remove exp_opcodes BINOP_INCL, BINOP_EXCL. (op_name_standard): Remove exp_opcodes BINOP_INCL, BINOP_EXCL, UNOP_LOWER, UNOP_UPPER, UNOP_LENGTH. (dump_subexp_body_standard): Remove exp_opcodes BINOP_INCL, BINOP_EXCL, UNOP_LOWER, UNOP_UPPER, UNOP_LENGTH, UNOP_CARD, UNOP_CHMAX, UNOP_CHMIN. * expression.h (enum exp_opcode) : Remove opcodes. --- gdb/ChangeLog | 13 +++++++++++++ gdb/expprint.c | 22 ---------------------- gdb/expression.h | 5 ----- 3 files changed, 13 insertions(+), 27 deletions(-) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 176a6ec..4fe625b 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,16 @@ +2010-06-01 Sergio Durigan Junior + + * expprint.c (print_subexp_standard): Remove exp_opcodes BINOP_INCL, + BINOP_EXCL. + (op_name_standard): Remove exp_opcodes BINOP_INCL, BINOP_EXCL, + UNOP_LOWER, UNOP_UPPER, UNOP_LENGTH. + (dump_subexp_body_standard): Remove exp_opcodes BINOP_INCL, + BINOP_EXCL, UNOP_LOWER, UNOP_UPPER, UNOP_LENGTH, UNOP_CARD, + UNOP_CHMAX, UNOP_CHMIN. + * expression.h (enum exp_opcode) : Remove opcodes. + 2010-06-01 Pierre Muller * dwarf2read.c (read_func_scope): Do not complain for diff --git a/gdb/expprint.c b/gdb/expprint.c index 7299d64..ee9b4f9 100644 --- a/gdb/expprint.c +++ b/gdb/expprint.c @@ -532,10 +532,6 @@ print_subexp_standard (struct expression *exp, int *pos, fprintf_unfiltered (stream, ")"); return; - case BINOP_INCL: - case BINOP_EXCL: - error (_("print_subexp: Not implemented.")); - /* Default ops */ default: @@ -714,10 +710,6 @@ op_name_standard (enum exp_opcode opcode) return "BINOP_ASSIGN_MODIFY"; case BINOP_VAL: return "BINOP_VAL"; - case BINOP_INCL: - return "BINOP_INCL"; - case BINOP_EXCL: - return "BINOP_EXCL"; case BINOP_CONCAT: return "BINOP_CONCAT"; case BINOP_RANGE: @@ -780,12 +772,6 @@ op_name_standard (enum exp_opcode opcode) return "UNOP_POSTDECREMENT"; case UNOP_SIZEOF: return "UNOP_SIZEOF"; - case UNOP_LOWER: - return "UNOP_LOWER"; - case UNOP_UPPER: - return "UNOP_UPPER"; - case UNOP_LENGTH: - return "UNOP_LENGTH"; case UNOP_PLUS: return "UNOP_PLUS"; case UNOP_CAP: @@ -952,8 +938,6 @@ dump_subexp_body_standard (struct expression *exp, case BINOP_INTDIV: case BINOP_ASSIGN_MODIFY: case BINOP_VAL: - case BINOP_INCL: - case BINOP_EXCL: case BINOP_CONCAT: case BINOP_IN: case BINOP_RANGE: @@ -982,12 +966,6 @@ dump_subexp_body_standard (struct expression *exp, case UNOP_MIN: case UNOP_ODD: case UNOP_TRUNC: - case UNOP_LOWER: - case UNOP_UPPER: - case UNOP_LENGTH: - case UNOP_CARD: - case UNOP_CHMAX: - case UNOP_CHMIN: elt = dump_subexp (exp, stream, elt); break; case OP_LONG: diff --git a/gdb/expression.h b/gdb/expression.h index 29ebde4..a6f966a 100644 --- a/gdb/expression.h +++ b/gdb/expression.h @@ -108,8 +108,6 @@ enum exp_opcode /* Modula-2 standard (binary) procedures */ BINOP_VAL, - BINOP_INCL, - BINOP_EXCL, /* Concatenate two operands, such as character strings or bitstrings. If the first operand is a integer expression, then it means concatenate @@ -279,9 +277,6 @@ enum exp_opcode UNOP_ODD, UNOP_TRUNC, - /* (The deleted) Chill builtin functions. */ - UNOP_LOWER, UNOP_UPPER, UNOP_LENGTH, UNOP_CARD, UNOP_CHMAX, UNOP_CHMIN, - OP_BOOL, /* Modula-2 builtin BOOLEAN type */ OP_M2_STRING, /* Modula-2 string constants */ -- 2.7.4