freebsd-src/lib/libforms/debug.c
1995-05-12 17:31:45 +00:00

22 lines
413 B
C

#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