calchash
long calchash(datum);
hash = calchash(key);
dbm_access(calchash(key));
dbm_access(calchash(key));
dbm_access(calchash(key));
if (calchash(item) & (hmask+1)) {
hash = calchash(key);
long calchash(datum);
long calchash();
hash = calchash(key);
dbm_access(calchash(key));
dbm_access(calchash(key));
dbm_access(calchash(key));
if (calchash(item) & (hmask+1)) {
hash = calchash(key);