Function fxNewGrowableChunk

xs/sources/xsMemory.c:1673–1698

}

void* fxNewGrowableChunk(txMachine* the, txSize size, txSize capacity)
{
#if mxNoChunks
	return fxNewChunk(the, size);
#else
	txSize offset = size;
	txChunk* chunk;
	txBoolean once = 1;
	size = fxAdjustChunkSize(the, size);
	capacity = fxAdjustChunkSize(the, capacity);
	chunk = fxFindChunk(the, capacity, &once);
	if (!chunk) {
		chunk = fxGrowChunk(the, capacity);
		if (!chunk) {
			chunk = fxFindChunk(the, size, &once);
			if (!chunk) {
				chunk = fxGrowChunk(the, size);
			}
		}
	}
#ifdef mxMetering
	the->meterIndex += size * XS_CHUNK_ALLOCATION_METERING;
#endif
	return fxCheckChunk(the, chunk, size, offset);
#endif
}

txSlot* fxNewSlot(txMachine* the) 
{