+caddr_t
+calloc(size)
+ int size;
+{
+ register caddr_t res;
+ register int i;
+
+ if (cacur+size >= (caddr_t)&calimit)
+ panic("calloc");
+ while (cacur+size > camax) {
+ (void) vmemall(&camap[cax], CLSIZE, &proc[0], CSYS);
+ vmaccess(&camap[cax], camax, CLSIZE);
+ for (i = 0; i < CLSIZE; i++)
+ clearseg(camap[cax++].pg_pfnum);
+ camax += NBPG * CLSIZE;
+ }
+ res = cacur;
+ cacur += size;
+ return (res);
+}
+
+#ifndef vax
+ffs(mask)
+ register long mask;