git: 9front

Info  •  Files  •  Log  •  Branches

pool: maintain Pool.curalloc for poolallocalign() and blockgrow()

blockgrow() and poolallocalign() change the size of
allocated blocks which needs to be accounted for
in Pool.curalloc.

--- a/sys/src/libc/port/pool.c

+++ b/sys/src/libc/port/pool.c

@@ -627,9 +627,11 @@

 		ulong dsize;

 		a = (Alloc*)b;

+		p->curalloc -= a->size;

 		dsize = getdsize(a);

 		blocksetsize(a, nsize);

 		trim(p, a, dsize);

+		p->curalloc += a->size;

 	}

 }

@@ -1119,6 +1121,7 @@

 	 * or mark it as unavailable.

 	 */

 	b = _D2B(v);

+	p->curalloc -= b->size;

 	b = freefromfront(p, b, skip);

 	v = _B2D(b);

 	skip = c - (char*)v;

@@ -1128,6 +1131,7 @@

 			*u++ = ALIGN_MAGIC;

 	}

 	trim(p, b, skip+dsize);

+	p->curalloc += b->size;

 	assert(D2B(p, c) == b);

 	antagonism { 

 		memset(c, 0xDD, dsize);

-- 

⑨