1 files changed, 74 insertions, 0 deletions
diff --git a/src/lib/dbg.rs b/src/lib/dbg.rs
new file mode 100644
index 00000000..be367562
--- /dev/null
+++ b/src/lib/dbg.rs
@@ -0,0 +1,74 @@
+/**
+ * Unsafe debugging functions for inspecting values.
+ *
+ * Your RUST_LOG environment variable must contain "stdlib" for any debug
+ * logging.
+ */
+
+// FIXME: handle 64-bit case.
+const uint const_refcount = 0x7bad_face_u;
+
+native "rust" mod rustrt {
+    fn debug_tydesc[T]();
+    fn debug_opaque[T](&T x);
+    fn debug_box[T](@T x);
+    fn debug_tag[T](&T x);
+    fn debug_obj[T](&T x, uint nmethods, uint nbytes);
+    fn debug_fn[T](&T x);
+    fn debug_ptrcast[T, U](@T x) -> @U;
+    fn debug_trap(str msg);
+}
+
+fn debug_vec[T](vec[T] v) {
+    _vec::print_debug_info[T](v);
+}
+
+fn debug_tydesc[T]() {
+    rustrt::debug_tydesc[T]();
+}
+
+fn debug_opaque[T](&T x) {
+    rustrt::debug_opaque[T](x);
+}
+
+fn debug_box[T](@T x) {
+    rustrt::debug_box[T](x);
+}
+
+fn debug_tag[T](&T x) {
+    rustrt::debug_tag[T](x);
+}
+
+/**
+ * `nmethods` is the number of methods we expect the object to have.  The
+ * runtime will print this many words of the obj vtbl).
+ *
+ * `nbytes` is the number of bytes of body data we expect the object to have.
+ * The runtime will print this many bytes of the obj body.  You probably want
+ * this to at least be 4u, since an implicit captured tydesc pointer sits in
+ * the front of any obj's data tuple.x
+ */
+fn debug_obj[T](&T x, uint nmethods, uint nbytes) {
+    rustrt::debug_obj[T](x, nmethods, nbytes);
+}
+
+fn debug_fn[T](&T x) {
+    rustrt::debug_fn[T](x);
+}
+
+fn ptr_cast[T, U](@T x) -> @U {
+    ret rustrt::debug_ptrcast[T, U](x);
+}
+
+fn trap(str s) {
+    rustrt::debug_trap(s);
+}
+
+// Local Variables:
+// mode: rust;
+// fill-column: 78;
+// indent-tabs-mode: nil
+// c-basic-offset: 4
+// buffer-file-coding-system: utf-8-unix
+// compile-command: "make -k -C .. 2>&1 | sed -e 's/\\/x\\//x:\\//g'";
+// End: