1 files changed, 21 insertions, 0 deletions
diff --git a/lib/libforms/debug.c b/lib/libforms/debug.c
new file mode 100644
index 0000000..31d42e2
--- /dev/null
+++ b/lib/libforms/debug.c
@@ -0,0 +1,21 @@
+#ifdef DEBUG
+#include <forms.h>
+
+int
+debug_dump_bindings(char *key, void *data, void *arg)
+{
+		TUPLE *tuple = (TUPLE *)data;
+
+		printf("%s, %d, %x\n", tuple->name, tuple->type, (int)tuple->addr);
+
+		return (1);
+}
+
+void
+debug_dump_table(hash_table *htable)
+{
+	printf("Dumping table at address %x\n", htable);
+	hash_traverse(htable, debug_dump_bindings, NULL);
+	printf("------------------------------\n");
+}
+#endif