aboutsummaryrefslogtreecommitdiff
path: root/gdb/eval.c
diff options
context:
space:
mode:
authorTom Tromey <tom@tromey.com>2021-03-08 07:27:57 -0700
committerTom Tromey <tom@tromey.com>2021-03-08 07:28:23 -0700
commitcbc18219d313984150f25af6cc66c866e1686190 (patch)
tree3d389830898d13f65dc6f509c785e461010286a6 /gdb/eval.c
parentae4bb61e199c90c71e3482169233a0f40f446484 (diff)
downloadgdb-cbc18219d313984150f25af6cc66c866e1686190.zip
gdb-cbc18219d313984150f25af6cc66c866e1686190.tar.gz
gdb-cbc18219d313984150f25af6cc66c866e1686190.tar.bz2
Implement UNOP_MEMVAL and UNOP_MEMVAL_TYPE
This adds class unop_memval_operation and unop_memval_type_operation, which implement UNOP_MEMVAL and UNOP_MEMVAL_TYPE. gdb/ChangeLog 2021-03-08 Tom Tromey <tom@tromey.com> * expop.h (class unop_memval_operation) (class unop_memval_type_operation): New. * eval.c (eval_op_memval): No longer static. (unop_memval_operation::evaluate_for_address) (unop_memval_type_operation::evaluate_for_address) (unop_memval_operation::evaluate_for_sizeof) (unop_memval_type_operation::evaluate_for_sizeof): New methods. * ax-gdb.c (unop_memval_operation::do_generate_ax) (unop_memval_type_operation::do_generate_ax): New methods.
Diffstat (limited to 'gdb/eval.c')
-rw-r--r--gdb/eval.c37
1 files changed, 36 insertions, 1 deletions
diff --git a/gdb/eval.c b/gdb/eval.c
index 3cf8bf1..2781e1d 100644
--- a/gdb/eval.c
+++ b/gdb/eval.c
@@ -1897,7 +1897,7 @@ eval_op_alignof (struct type *expect_type, struct expression *exp,
/* A helper function for UNOP_MEMVAL. */
-static struct value *
+struct value *
eval_op_memval (struct type *expect_type, struct expression *exp,
enum noside noside,
struct value *arg1, struct type *type)
@@ -3333,6 +3333,25 @@ var_msym_value_operation::evaluate_for_address (struct expression *exp,
return value_addr (val);
}
+value *
+unop_memval_operation::evaluate_for_address (struct expression *exp,
+ enum noside noside)
+{
+ return value_cast (lookup_pointer_type (std::get<1> (m_storage)),
+ std::get<0> (m_storage)->evaluate (nullptr, exp, noside));
+}
+
+value *
+unop_memval_type_operation::evaluate_for_address (struct expression *exp,
+ enum noside noside)
+{
+ value *typeval = std::get<0> (m_storage)->evaluate (nullptr, exp,
+ EVAL_AVOID_SIDE_EFFECTS);
+ struct type *type = value_type (typeval);
+ return value_cast (lookup_pointer_type (type),
+ std::get<1> (m_storage)->evaluate (nullptr, exp, noside));
+}
+
}
/* Evaluate like `evaluate_subexp' except coercing arrays to pointers.
@@ -3604,6 +3623,22 @@ unop_ind_base_operation::evaluate_for_sizeof (struct expression *exp,
return value_from_longest (size_type, (LONGEST) TYPE_LENGTH (type));
}
+value *
+unop_memval_operation::evaluate_for_sizeof (struct expression *exp,
+ enum noside noside)
+{
+ return evaluate_subexp_for_sizeof_base (exp, std::get<1> (m_storage));
+}
+
+value *
+unop_memval_type_operation::evaluate_for_sizeof (struct expression *exp,
+ enum noside noside)
+{
+ value *typeval = std::get<0> (m_storage)->evaluate (nullptr, exp,
+ EVAL_AVOID_SIDE_EFFECTS);
+ return evaluate_subexp_for_sizeof_base (exp, value_type (typeval));
+}
+
}
/* Evaluate a subexpression of EXP, at index *POS, and return a value