2010-06-01 Sergio Durigan Junior <sergiodj@redhat.com>
* 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) <BINOP_INCL, BINOP_EXCL, UNOP_LOWER, UNOP_UPPER, UNOP_LENGTH, UNOP_CARD, UNOP_CHMAX, UNOP_CHMIN>: Remove opcodes.
This commit is contained in:
parent
c46581e9f4
commit
7cf3118a8d
@ -1,3 +1,16 @@
|
|||||||
|
2010-06-01 Sergio Durigan Junior <sergiodj@redhat.com>
|
||||||
|
|
||||||
|
* 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) <BINOP_INCL, BINOP_EXCL,
|
||||||
|
UNOP_LOWER, UNOP_UPPER, UNOP_LENGTH, UNOP_CARD, UNOP_CHMAX,
|
||||||
|
UNOP_CHMIN>: Remove opcodes.
|
||||||
|
|
||||||
2010-06-01 Pierre Muller <muller@ics.u-strasbg.fr>
|
2010-06-01 Pierre Muller <muller@ics.u-strasbg.fr>
|
||||||
|
|
||||||
* dwarf2read.c (read_func_scope): Do not complain for
|
* dwarf2read.c (read_func_scope): Do not complain for
|
||||||
|
@ -532,10 +532,6 @@ print_subexp_standard (struct expression *exp, int *pos,
|
|||||||
fprintf_unfiltered (stream, ")");
|
fprintf_unfiltered (stream, ")");
|
||||||
return;
|
return;
|
||||||
|
|
||||||
case BINOP_INCL:
|
|
||||||
case BINOP_EXCL:
|
|
||||||
error (_("print_subexp: Not implemented."));
|
|
||||||
|
|
||||||
/* Default ops */
|
/* Default ops */
|
||||||
|
|
||||||
default:
|
default:
|
||||||
@ -714,10 +710,6 @@ op_name_standard (enum exp_opcode opcode)
|
|||||||
return "BINOP_ASSIGN_MODIFY";
|
return "BINOP_ASSIGN_MODIFY";
|
||||||
case BINOP_VAL:
|
case BINOP_VAL:
|
||||||
return "BINOP_VAL";
|
return "BINOP_VAL";
|
||||||
case BINOP_INCL:
|
|
||||||
return "BINOP_INCL";
|
|
||||||
case BINOP_EXCL:
|
|
||||||
return "BINOP_EXCL";
|
|
||||||
case BINOP_CONCAT:
|
case BINOP_CONCAT:
|
||||||
return "BINOP_CONCAT";
|
return "BINOP_CONCAT";
|
||||||
case BINOP_RANGE:
|
case BINOP_RANGE:
|
||||||
@ -780,12 +772,6 @@ op_name_standard (enum exp_opcode opcode)
|
|||||||
return "UNOP_POSTDECREMENT";
|
return "UNOP_POSTDECREMENT";
|
||||||
case UNOP_SIZEOF:
|
case UNOP_SIZEOF:
|
||||||
return "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:
|
case UNOP_PLUS:
|
||||||
return "UNOP_PLUS";
|
return "UNOP_PLUS";
|
||||||
case UNOP_CAP:
|
case UNOP_CAP:
|
||||||
@ -952,8 +938,6 @@ dump_subexp_body_standard (struct expression *exp,
|
|||||||
case BINOP_INTDIV:
|
case BINOP_INTDIV:
|
||||||
case BINOP_ASSIGN_MODIFY:
|
case BINOP_ASSIGN_MODIFY:
|
||||||
case BINOP_VAL:
|
case BINOP_VAL:
|
||||||
case BINOP_INCL:
|
|
||||||
case BINOP_EXCL:
|
|
||||||
case BINOP_CONCAT:
|
case BINOP_CONCAT:
|
||||||
case BINOP_IN:
|
case BINOP_IN:
|
||||||
case BINOP_RANGE:
|
case BINOP_RANGE:
|
||||||
@ -982,12 +966,6 @@ dump_subexp_body_standard (struct expression *exp,
|
|||||||
case UNOP_MIN:
|
case UNOP_MIN:
|
||||||
case UNOP_ODD:
|
case UNOP_ODD:
|
||||||
case UNOP_TRUNC:
|
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);
|
elt = dump_subexp (exp, stream, elt);
|
||||||
break;
|
break;
|
||||||
case OP_LONG:
|
case OP_LONG:
|
||||||
|
@ -108,8 +108,6 @@ enum exp_opcode
|
|||||||
|
|
||||||
/* Modula-2 standard (binary) procedures */
|
/* Modula-2 standard (binary) procedures */
|
||||||
BINOP_VAL,
|
BINOP_VAL,
|
||||||
BINOP_INCL,
|
|
||||||
BINOP_EXCL,
|
|
||||||
|
|
||||||
/* Concatenate two operands, such as character strings or bitstrings.
|
/* Concatenate two operands, such as character strings or bitstrings.
|
||||||
If the first operand is a integer expression, then it means concatenate
|
If the first operand is a integer expression, then it means concatenate
|
||||||
@ -279,9 +277,6 @@ enum exp_opcode
|
|||||||
UNOP_ODD,
|
UNOP_ODD,
|
||||||
UNOP_TRUNC,
|
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_BOOL, /* Modula-2 builtin BOOLEAN type */
|
||||||
OP_M2_STRING, /* Modula-2 string constants */
|
OP_M2_STRING, /* Modula-2 string constants */
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user