2010-07-07 Sergio Durigan Junior <sergiodj@linux.vnet.ibm.com>

[deliverable/binutils-gdb.git] / gdb / value.c

diff --git a/gdb/value.c b/gdb/value.c
index edcd4d0ca7434116e02477791fca87f9365611b5..d55240216b3d3ed5582d1fd3341042c27006e661 100644 (file)
--- a/gdb/value.c
+++ b/gdb/value.c
@@ -722,6 +722,20 @@ free_all_values (void)
   all_values = 0;
 }
 
+/* Frees all the elements in a chain of values.  */
+
+void
+free_value_chain (struct value *v)
+{
+  struct value *next;
+
+  for (; v; v = next)
+    {
+      next = value_next (v);
+      value_free (v);
+    }
+}
+
 /* Remove VAL from the chain all_values
    so it will not be freed automatically.  */