Add vec debugging utility to _vec module.

3 files changed, 20 insertions, 1 deletions

diff --git a/src/rt/rust_builtin.cpp b/src/rt/rust_builtin.cpp
index 596a05cc..5b1f7ae2 100644
--- a/src/rt/rust_builtin.cpp
+++ b/src/rt/rust_builtin.cpp
@@ -82,7 +82,7 @@ extern "C" CDECL rust_vec*
 vec_alloc(rust_task *task, type_desc *t, type_desc *elem_t, size_t n_elts)
 {
     rust_dom *dom = task->dom;
-    task->log(rust_log::MEM,
+    task->log(rust_log::MEM | rust_log::STDLIB,
               "vec_alloc %" PRIdPTR " elements of size %" PRIdPTR,
               n_elts, elem_t->size);
     size_t fill = n_elts * elem_t->size;
@@ -108,6 +108,23 @@ vec_len(rust_task *task, type_desc *ty, rust_vec *v)
     return v->fill / ty->size;
 }
 
+extern "C" CDECL void
+vec_print_debug_info(rust_task *task, type_desc *ty, rust_vec *v)
+{
+    task->log(rust_log::STDLIB,
+              "vec_print_debug_info(%" PRIxPTR ")"
+              " with tydesc %" PRIxPTR
+              " (size = %" PRIdPTR ", align = %" PRIdPTR ")"
+              " alloc = %" PRIdPTR ", fill = %" PRIdPTR
+              " , data = ...", v, ty, ty->size, ty->align, v->alloc, v->fill);
+
+    for (size_t i = 0; i < v->fill; ++i) {
+        task->log(rust_log::STDLIB,
+                  "  %" PRIdPTR ":    0x%" PRIxPTR,
+                  i, v->data[i]);
+    }
+}
+
 /* Helper for str_alloc and str_from_vec.  Returns NULL as failure. */
 static rust_str *
 str_alloc_with_data(rust_task *task,
diff --git a/src/rt/rust_log.cpp b/src/rt/rust_log.cpp
index 50a107d5..c2a1bbe3 100644
--- a/src/rt/rust_log.cpp
+++ b/src/rt/rust_log.cpp
@@ -26,6 +26,7 @@ read_type_bit_mask() {
         bits |= strstr(env_str, "cache") ? rust_log::CACHE : 0;
         bits |= strstr(env_str, "timer") ? rust_log::TIMER : 0;
         bits |= strstr(env_str, "gc") ? rust_log::GC : 0;
+        bits |= strstr(env_str, "stdlib") ? rust_log::STDLIB : 0;
         bits |= strstr(env_str, "all") ? rust_log::ALL : 0;
         bits = strstr(env_str, "none") ? 0 : bits;
     }
diff --git a/src/rt/rust_log.h b/src/rt/rust_log.h
index 29c85e70..58b36f8d 100644
--- a/src/rt/rust_log.h
+++ b/src/rt/rust_log.h
@@ -41,6 +41,7 @@ public:
         UPCALL = 0x200,
         TIMER = 0x400,
         GC = 0x800,
+        STDLIB = 0x1000,
         ALL = 0xffffffff
     };