42 static Void_t* poolalloc(Vmalloc_t* vm, reg size_t size)  in poolalloc()  argument
44 static Void_t* poolalloc(vm, size )  in poolalloc()
45 Vmalloc_t*	vm;  in poolalloc()
49 	reg Vmdata_t*	vd = vm->data;
88 	{	if((tp = (*_Vmextend)(vm,ROUND(size,vd->incr),NIL(Vmsearch_f))) )
117 		(*_Vmtrace)(vm,NIL(Vmuchar_t*),(Vmuchar_t*)tp,vd->pool,0);
120 	ANNOUNCE(local, vm, VM_ALLOC, (Void_t*)tp, vm->disc);
126 static long pooladdr(Vmalloc_t* vm, reg Void_t* addr)  in pooladdr()  argument
128 static long pooladdr(vm, addr)  in pooladdr()
129 Vmalloc_t*	vm;  in pooladdr()
138 	reg Vmdata_t*	vd = vm->data;
179 static int poolfree(reg Vmalloc_t* vm, reg Void_t* data )  in poolfree()  argument
181 static int poolfree(vm, data)  in poolfree()
182 reg Vmalloc_t*	vm;  in poolfree()
187 	reg Vmdata_t*	vd = vm->data;
202 		if(KPVADDR(vm,data,pooladdr) != 0)
203 		{	if(vm->disc->exceptf)
204 				(void)(*vm->disc->exceptf)(vm,VM_BADADDR,data,vm->disc);
218 		(*_Vmtrace)(vm, (Vmuchar_t*)data, NIL(Vmuchar_t*), vd->pool, 0);
221 	ANNOUNCE(local, vm, VM_FREE, data, vm->disc);
227 static Void_t* poolresize(Vmalloc_t* vm, Void_t* data, size_t size, int type )  in poolresize()  argument
229 static Void_t* poolresize(vm, data, size, type )  in poolresize()
230 Vmalloc_t*	vm;  in poolresize()
237 	reg Vmdata_t*	vd = vm->data;
243 	{	if((data = poolalloc(vm,size)) && (type&VM_RSZERO) )
251 	{	(void)poolfree(vm,data);
264 		if(size != vd->pool || KPVADDR(vm,data,pooladdr) != 0)
265 		{	if(vm->disc->exceptf)
266 				(void)(*vm->disc->exceptf)(vm,VM_BADADDR,data,vm->disc);
272 			(*_Vmtrace)(vm, (Vmuchar_t*)data, (Vmuchar_t*)data, size, 0);
275 	ANNOUNCE(local, vm, VM_RESIZE, data, vm->disc);
281 static long poolsize(Vmalloc_t* vm, Void_t* addr)  in poolsize()  argument
283 static long poolsize(vm, addr)  in poolsize()
284 Vmalloc_t*	vm;  in poolsize()
288 	return pooladdr(vm,addr) == 0 ? (long)vm->data->pool : -1L;
292 static int poolcompact(Vmalloc_t* vm)  in poolcompact()  argument
294 static int poolcompact(vm)  in poolcompact()
295 Vmalloc_t*	vm;  in poolcompact()
301 	reg Vmdata_t*	vd = vm->data;
324 		if((*_Vmtruncate)(vm,seg,s,1) == s)
329 		(*_Vmtrace)(vm, (Vmuchar_t*)0, (Vmuchar_t*)0, 0, 0);
337 static Void_t* poolalign(Vmalloc_t* vm, size_t size, size_t align)  in poolalign()  argument
339 static Void_t* poolalign(vm, size, align)  in poolalign()
340 Vmalloc_t*	vm;  in poolalign()
345 	NOTUSED(vm);