Merge r1666617 from trunk:

.gdbinit: Add dump_skiplist.
Submitted by: ylavic

git-svn-id: https://svn.apache.org/repos/asf/httpd/httpd/branches/2.4.x@1811294 13f79535-47bb-0310-9956-ffa450edef68

diff --git a/.gdbinit b/.gdbinit
index 6b3f9b72a494548bc0490d29e66126a1e185847d..e28763d7d3c1af88581ab9e12212266823e20f65 100644 (file)
--- a/.gdbinit
+++ b/.gdbinit
@@ -18,6 +18,25 @@ document dump_table
     Print the key/value pairs in a table.
 end
 
+define dump_skiplist
+    set $sl = (apr_skiplist *)$arg0
+    set $m = $sl->bottom
+    printf "skiplist@%p: size=%lu: height=%d\n", $sl, $sl->size, $sl->height
+    while ($m)
+        printf "(%p,%.12lx)", $m, $m->data
+        set $u = $m->up
+        while ($u)
+            printf " (%p,%.12lx)", $u, $u->data
+            set $u = $u->up
+        end
+        printf "\n"
+        set $m = $m->next
+    end
+end
+document dump_skiplist
+    Print the nodes/values in a skiplist
+end
+
 define dump_string_hash
     set $h = $arg0->array
     set $n = $arg0->max