Imagelibrary/binutils-gdb
1
0
Fork 1
mirror of https://github.com/bminor/binutils-gdb.git synced 2025-12-27 01:28:46 +00:00
Code Issues Packages Projects Releases Wiki Activity

Remove ada_equal_binop

Browse Source 
ada_equal_binop can be merged with its sole caller.

Approved-By: Simon Marchi <simon.marchi@efficios.com>
This commit is contained in:
Tom Tromey
2025-09-08 10:23:15 -06:00
parent cfd104b66c
commit b1618ec21a
2 changed files with 15 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
gdb/ada-lang.c
View File

@@ -10169,14 +10169,21 @@ ada_mult_binop (struct type *expect_type,
}
}
/* A helper function for BINOP_EQUAL and BINOP_NOTEQUAL. */
namespace expr
{
/* Implement BINOP_EQUAL and BINOP_NOTEQUAL. */
value *
ada_equal_binop (struct type *expect_type,
struct expression *exp,
enum noside noside, enum exp_opcode op,
struct value *arg1, struct value *arg2)
ada_binop_equal_operation::evaluate (struct type *expect_type,
struct expression *exp,
enum noside noside)
{
enum exp_opcode op = std::get<0> (m_storage);
value *arg1 = std::get<1> (m_storage)->evaluate (nullptr, exp, noside);
value *arg2 = std::get<2> (m_storage)->evaluate (arg1->type (),
exp, noside);
int tem;
if (noside == EVAL_AVOID_SIDE_EFFECTS)
tem = 0;
@@ -10191,6 +10198,8 @@ ada_equal_binop (struct type *expect_type,
return value_from_longest (type, tem);
}
} /* namespace expr */
/* A helper function for TERNOP_SLICE. */
value *