espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-08-06 06:45:56 +08:00
Code Issues Packages Projects Releases Wiki Activity

Remove now-unused Modula-2 evaluator code

Browse Source 
Now that the Modula-2 parser has switched to the new style, there is
no need for the old Modula-2 evaluation code.

gdb/ChangeLog
2021-03-08  Tom Tromey  <tom@tromey.com>

	* m2-lang.h (class m2_language) <expresssion_ops,
	exp_descriptor_modula2>: Remove.
	* m2-lang.c (evaluate_subexp_modula2)
	(m2_language::exp_descriptor_modula2): Remove.
This commit is contained in:
Tom Tromey
2021-03-08 07:27:57 -07:00
parent a99be8c199
commit 5871f0a38d
3 changed files with 7 additions and 43 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
gdb/m2-lang.c
View File

@ -111,31 +111,6 @@ eval_op_m2_subscript (struct type *expect_type, struct expression *exp,
return value_subscript (arg1, value_as_long (arg2));
}
static struct value *
evaluate_subexp_modula2 (struct type *expect_type, struct expression *exp,
int *pos, enum noside noside)
{
enum exp_opcode op = exp->elts[*pos].opcode;
struct value *arg1;
struct value *arg2;
switch (op)
{
case UNOP_HIGH:
(*pos)++;
arg1 = evaluate_subexp_with_coercion (exp, pos, noside);
return eval_op_m2_high (expect_type, exp, noside, arg1);
case BINOP_SUBSCRIPT:
(*pos)++;
arg1 = evaluate_subexp_with_coercion (exp, pos, noside);
arg2 = evaluate_subexp_with_coercion (exp, pos, noside);
return eval_op_m2_subscript (expect_type, exp, noside, arg1, arg2);
default:
return evaluate_subexp_standard (expect_type, exp, pos, noside);
}
}
/* Table of operators and their precedences for printing expressions. */
@ -175,15 +150,6 @@ const struct op_print m2_language::op_print_tab[] =
};
const struct exp_descriptor m2_language::exp_descriptor_modula2 =
{
print_subexp_standard,
operator_length_standard,
operator_check_standard,
dump_subexp_body_standard,
evaluate_subexp_modula2
};
/* Single instance of the M2 language. */
static m2_language m2_language_defn;