d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

some more statistics

Browse source
This commit is contained in:
ceriel 1991-06-24 16:35:08 +00:00
parent 42584ddcdb
commit 55d8020292
1 changed files with 22 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
modules/src/idf/idf_pkg.body
View file

@ -63,20 +63,41 @@ IDF_new(tg, size, cpy)
hash_stat() hash_stat()
{ {
register int i; register int i;
int total_count = 0;
print("Hash table tally:\n"); print("Hash table tally:\n");
for (i = 0; i < IDF_HASHSIZE; i++) { for (i = 0; i < IDF_HASHSIZE; i++) {
register struct idf *notch = IDF_hashtable[i]; register struct idf *notch = IDF_hashtable[i];
register int cnt = 0; register int cnt = 0;
print ("%d ", i);
while (notch) { while (notch) {
cnt++; cnt++;
print("'%s' ", notch->id_text);
notch = notch->id_next; notch = notch->id_next;
} }
print("%d %d\n", i, cnt); print("%d\n", cnt);
total_count += cnt;
} }
print("total = %d\n", total_count);
print("End hash table tally\n"); print("End hash table tally\n");
} }
idfappfun(fun, opt)
int (*fun)();
int opt;
{
register int i;
for (i = 0; i < IDF_HASHSIZE; i++) {
register struct idf *notch = IDF_hashtable[i];
while (notch) {
(*fun)(notch, opt);
notch = notch->id_next;
}
}
}
#endif IDF_DEBUG #endif IDF_DEBUG
struct idf * struct idf *