From cdf3de175d41acec85d6c3cc8b599f79658edb06 Mon Sep 17 00:00:00 2001 From: Tom Tromey Date: Tue, 31 Jan 2023 14:25:29 -0700 Subject: [PATCH] Turn value_incref and value_decref into methods This changes value_incref and value_decref to be methods of value. Much of this patch was written by script. Approved-By: Simon Marchi --- gdb/dwarf2/expr.c | 4 ++-- gdb/dwarf2/loc.c | 6 +++--- gdb/guile/scm-value.c | 4 ++-- gdb/opencl-lang.c | 4 ++-- gdb/python/py-value.c | 4 ++-- gdb/value.c | 23 ++++++----------------- gdb/value.h | 21 ++++++++++----------- 7 files changed, 27 insertions(+), 39 deletions(-) diff --git a/gdb/dwarf2/expr.c b/gdb/dwarf2/expr.c index ef93b89aaa9..f2a1305713a 100644 --- a/gdb/dwarf2/expr.c +++ b/gdb/dwarf2/expr.c @@ -128,7 +128,7 @@ allocate_piece_closure (dwarf2_per_cu_data *per_cu, for (dwarf_expr_piece &piece : c->pieces) if (piece.location == DWARF_VALUE_STACK) - value_incref (piece.v.value); + piece.v.value->incref (); return c; } @@ -620,7 +620,7 @@ free_pieced_value_closure (value *v) { for (dwarf_expr_piece &p : c->pieces) if (p.location == DWARF_VALUE_STACK) - value_decref (p.v.value); + p.v.value->decref (); delete c; } diff --git a/gdb/dwarf2/loc.c b/gdb/dwarf2/loc.c index 0aa6aafe823..64a7e035b06 100644 --- a/gdb/dwarf2/loc.c +++ b/gdb/dwarf2/loc.c @@ -1280,7 +1280,7 @@ entry_data_value_coerce_ref (const struct value *value) return NULL; target_val = (struct value *) value->computed_closure (); - value_incref (target_val); + target_val->incref (); return target_val; } @@ -1291,7 +1291,7 @@ entry_data_value_copy_closure (const struct value *v) { struct value *target_val = (struct value *) v->computed_closure (); - value_incref (target_val); + target_val->incref (); return target_val; } @@ -1302,7 +1302,7 @@ entry_data_value_free_closure (struct value *v) { struct value *target_val = (struct value *) v->computed_closure (); - value_decref (target_val); + target_val->decref (); } /* Vector for methods for an entry value reference where the referenced value diff --git a/gdb/guile/scm-value.c b/gdb/guile/scm-value.c index 195fd3b8912..09b1ce30024 100644 --- a/gdb/guile/scm-value.c +++ b/gdb/guile/scm-value.c @@ -131,7 +131,7 @@ vlscm_free_value_smob (SCM self) value_smob *v_smob = (value_smob *) SCM_SMOB_DATA (self); vlscm_forget_value_smob (v_smob); - value_decref (v_smob->value); + v_smob->value->decref (); return 0; } @@ -272,7 +272,7 @@ vlscm_scm_from_value_no_release (struct value *value) SCM v_scm = vlscm_make_value_smob (); value_smob *v_smob = (value_smob *) SCM_SMOB_DATA (v_scm); - value_incref (value); + value->incref (); v_smob->value = value; vlscm_remember_scheme_value (v_smob); diff --git a/gdb/opencl-lang.c b/gdb/opencl-lang.c index e4a88a23d49..81889b97e95 100644 --- a/gdb/opencl-lang.c +++ b/gdb/opencl-lang.c @@ -110,7 +110,7 @@ allocate_lval_closure (int *indices, int n, struct value *val) c->n = n; c->indices = XCNEWVEC (int, n); memcpy (c->indices, indices, n * sizeof (int)); - value_incref (val); /* Increment the reference counter of the value. */ + val->incref (); /* Increment the reference counter of the value. */ c->val = val; return c; @@ -242,7 +242,7 @@ lval_func_free_closure (struct value *v) if (c->refc == 0) { - value_decref (c->val); /* Decrement the reference counter of the value. */ + c->val->decref (); /* Decrement the reference counter of the value. */ xfree (c->indices); xfree (c); } diff --git a/gdb/python/py-value.c b/gdb/python/py-value.c index 465d8d92bd2..c2db2d58b0d 100644 --- a/gdb/python/py-value.c +++ b/gdb/python/py-value.c @@ -81,7 +81,7 @@ static void valpy_clear_value (value_object *self) { /* Indicate we are no longer interested in the value object. */ - value_decref (self->value); + self->value->decref (); self->value = nullptr; Py_CLEAR (self->address); @@ -1806,7 +1806,7 @@ value_to_value_object_no_release (struct value *val) val_obj = PyObject_New (value_object, &value_object_type); if (val_obj != NULL) { - value_incref (val); + val->incref (); val_obj->value = val; val_obj->next = nullptr; val_obj->prev = nullptr; diff --git a/gdb/value.c b/gdb/value.c index 75f8dc49b0a..eb047edc202 100644 --- a/gdb/value.c +++ b/gdb/value.c @@ -1447,28 +1447,17 @@ value_mark (void) return all_values.back ().get (); } -/* See value.h. */ - -void -value_incref (struct value *val) -{ - val->m_reference_count++; -} - /* Release a reference to VAL, which was acquired with value_incref. This function is also called to deallocate values from the value chain. */ void -value_decref (struct value *val) +value::decref () { - if (val != nullptr) - { - gdb_assert (val->m_reference_count > 0); - val->m_reference_count--; - if (val->m_reference_count == 0) - delete val; - } + gdb_assert (m_reference_count > 0); + m_reference_count--; + if (m_reference_count == 0) + delete this; } /* Free all values allocated since MARK was obtained by value_mark @@ -2309,7 +2298,7 @@ clear_internalvar (struct internalvar *var) switch (var->kind) { case INTERNALVAR_VALUE: - value_decref (var->u.value); + var->u.value->decref (); break; case INTERNALVAR_STRING: diff --git a/gdb/value.h b/gdb/value.h index b18eacef15b..0abe0a417b3 100644 --- a/gdb/value.h +++ b/gdb/value.h @@ -111,15 +111,6 @@ struct range } }; -/* Increase VAL's reference count. */ - -extern void value_incref (struct value *val); - -/* Decrease VAL's reference count. When the reference count drops to - 0, VAL will be freed. */ - -extern void value_decref (struct value *val); - /* A policy class to interface gdb::ref_ptr with struct value. */ struct value_ref_policy @@ -453,6 +444,14 @@ public: int bits_synthetic_pointer (LONGEST offset, LONGEST length) const; + /* Increase this value's reference count. */ + void incref () + { ++m_reference_count; } + + /* Decrease this value's reference count. When the reference count + drops to 0, it will be freed. */ + void decref (); + /* Type of value; either not an lval, or one of the various different possible kinds of lval. */ @@ -673,13 +672,13 @@ private: inline void value_ref_policy::incref (struct value *ptr) { - value_incref (ptr); + ptr->incref (); } inline void value_ref_policy::decref (struct value *ptr) { - value_decref (ptr); + ptr->decref (); } /* Returns value_type or value_enclosing_type depending on -- 2.30.2