aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTom Tromey <tom@tromey.com>2023-01-31 11:11:17 -0700
committerTom Tromey <tom@tromey.com>2023-02-13 15:21:07 -0700
commitc8580184bbd1af58769d143b23d254737b08de9d (patch)
treee7ef1c03117c1a42aa71e60f56442b02eb8a67a5
parent3ee3b2700d59ec1048989a3bf190882740d2ea8b (diff)
downloadbinutils-c8580184bbd1af58769d143b23d254737b08de9d.zip
binutils-c8580184bbd1af58769d143b23d254737b08de9d.tar.gz
binutils-c8580184bbd1af58769d143b23d254737b08de9d.tar.bz2
Turn value_stack and set_value_stack functions into methods
This changes the value_stack and set_value_stack functions to be methods of value. Approved-By: Simon Marchi <simon.marchi@efficios.com>
-rw-r--r--gdb/dwarf2/expr.c2
-rw-r--r--gdb/frame-unwind.c2
-rw-r--r--gdb/valops.c2
-rw-r--r--gdb/value.c14
-rw-r--r--gdb/value.h9
5 files changed, 10 insertions, 19 deletions
diff --git a/gdb/dwarf2/expr.c b/gdb/dwarf2/expr.c
index 0274372..292ac8b 100644
--- a/gdb/dwarf2/expr.c
+++ b/gdb/dwarf2/expr.c
@@ -1005,7 +1005,7 @@ dwarf_expr_context::fetch_result (struct type *type, struct type *subobj_type,
retval = value_at_lazy (subobj_type,
address + subobj_offset);
if (in_stack_memory)
- set_value_stack (retval, 1);
+ retval->set_stack (1);
}
break;
diff --git a/gdb/frame-unwind.c b/gdb/frame-unwind.c
index 76601fa..d3baedb 100644
--- a/gdb/frame-unwind.c
+++ b/gdb/frame-unwind.c
@@ -289,7 +289,7 @@ frame_unwind_got_memory (frame_info_ptr frame, int regnum, CORE_ADDR addr)
struct gdbarch *gdbarch = frame_unwind_arch (frame);
struct value *v = value_at_lazy (register_type (gdbarch, regnum), addr);
- set_value_stack (v, 1);
+ v->set_stack (1);
return v;
}
diff --git a/gdb/valops.c b/gdb/valops.c
index 1823b0b..7e3fca3 100644
--- a/gdb/valops.c
+++ b/gdb/valops.c
@@ -1376,7 +1376,7 @@ value_repeat (struct value *arg1, int count)
VALUE_LVAL (val) = lval_memory;
set_value_address (val, value_address (arg1));
- read_value_memory (val, 0, value_stack (val), value_address (val),
+ read_value_memory (val, 0, val->stack (), value_address (val),
value_contents_all_raw (val).data (),
type_length_units (val->enclosing_type ()));
diff --git a/gdb/value.c b/gdb/value.c
index cb16901..b09ee9b 100644
--- a/gdb/value.c
+++ b/gdb/value.c
@@ -1291,18 +1291,6 @@ value_contents_copy (struct value *dst, LONGEST dst_offset,
value_contents_copy_raw (dst, dst_offset, src, src_offset, length);
}
-int
-value_stack (const struct value *value)
-{
- return value->m_stack;
-}
-
-void
-set_value_stack (struct value *value, int val)
-{
- value->m_stack = val;
-}
-
gdb::array_view<const gdb_byte>
value_contents (struct value *value)
{
@@ -3886,7 +3874,7 @@ value_fetch_lazy_memory (struct value *val)
gdb_assert (len >= 0);
if (len > 0)
- read_value_memory (val, 0, value_stack (val), addr,
+ read_value_memory (val, 0, val->stack (), addr,
value_contents_all_raw (val).data (), len);
}
diff --git a/gdb/value.h b/gdb/value.h
index 80946c0..73783f8 100644
--- a/gdb/value.h
+++ b/gdb/value.h
@@ -295,6 +295,12 @@ struct value
void set_enclosing_type (struct type *new_type);
+ int stack () const
+ { return m_stack; }
+
+ void set_stack (int val)
+ { m_stack = val; }
+
/* Type of value; either not an lval, or one of the various
different possible kinds of lval. */
@@ -568,9 +574,6 @@ extern const struct lval_funcs *value_computed_funcs (const struct value *);
extern void *value_computed_closure (const struct value *value);
-extern int value_stack (const struct value *);
-extern void set_value_stack (struct value *value, int val);
-
/* Throw an error complaining that the value has been optimized
out. */