Function fxWriteSnapshot

xs/sources/xsSnapshot.c:2309–2473

}

int fxWriteSnapshot(txMachine* the, txSnapshot* snapshot)
{
	txSlot* heap;
	txSlot* stack;
	txSlot** slots;
	txSize size;
	txByte byte;
	txProjection** projectionAddress = &(snapshot->firstProjection);
	txProjection* projection;
	txSize chunkSize = 0;
	txSize namesSize = the->nameModulo * sizeof(txSlot*);
	txSize keysSize = the->keyIndex * sizeof(txSlot*);
	txSize slotSize = 0;
	txSize stackSize = (txSize)((the->stackTop - the->stack) * sizeof(txSlot));
	txSize symbolsSize = the->symbolModulo * sizeof(txSlot*);
	txCreation creation;
	
	mxTry(the) {
		snapshot->error = 0;
		
#if defined(mxInstrument) || defined(mxProfile)
		mxAssert(the->profiler == C_NULL, "# snapshot: not while profiling!\n");
#endif
		
		fxCollectGarbage(the);
		fxUnlinkChunks(the);
		
		fxIndexSlots(the, snapshot);
	
		stack = the->stackTop - 1;
		while (stack >= the->stack) {
			fxMeasureSlot(the, snapshot, stack, &chunkSize);
			stack--;
		}
		slotSize = snapshot->slotSize;
		slots = snapshot->slots;
		slotSize--;
		slots++;
		while (slotSize) {
			txSlot* slot = *slots;
			fxMeasureSlot(the, snapshot, slot, &chunkSize);
			slotSize--;
			slots++;
		}

		slotSize = (snapshot->slotSize - 1) * sizeof(txSlot);
	
		creation.initialChunkSize = the->maximumChunksSize;
		creation.incrementalChunkSize = the->minimumChunksSize;
		creation.initialHeapCount = the->maximumHeapCount + 1;
		creation.incrementalHeapCount = the->minimumHeapCount;
		creation.stackCount = (txSize)(the->stackTop - the->stackBottom);
		creation.initialKeyCount = the->keyCount;
		creation.incrementalKeyCount = the->keyDelta;
		creation.nameModulo = the->nameModulo;
		creation.symbolModulo = the->symbolModulo;
		creation.parserBufferSize = the->parserBufferSize;
		creation.parserTableModulo = the->parserTableModulo;