Function fxUseSnapshot

xs/sources/xsSnapshot.c:1830–1944

}

int fxUseSnapshot(txMachine* the, txSnapshot* snapshot)
{
	Atom atom;
	txByte byte;
	txCreation creation;
	txID profileID;
	txInteger tag;
	txByte* buffer;
	txSize size;
	txSlot* slot;
	mxTry(the) {
		snapshot->error = 0;
		
		fxReadAtom(the, snapshot, &atom, "XS_M");
		fxReadAtom(the, snapshot, &atom, "VERS");
		mxThrowIf((*snapshot->read)(snapshot->stream, &byte, 1));
		mxThrowIf((*snapshot->read)(snapshot->stream, &byte, 1));
		mxThrowIf((*snapshot->read)(snapshot->stream, &byte, 1));
		mxThrowIf((*snapshot->read)(snapshot->stream, &byte, 1));
		fxReadAtom(the, snapshot, &atom, "SIGN");
		while (atom.atomSize) {
			mxThrowIf((*snapshot->read)(snapshot->stream, &byte, 1));
			atom.atomSize--;
		}
		fxReadAtom(the, snapshot, &atom, "CREA");
		mxThrowIf((*snapshot->read)(snapshot->stream, &creation, sizeof(txCreation)));
		mxThrowIf((*snapshot->read)(snapshot->stream, &profileID, sizeof(txID)));
		mxThrowIf((*snapshot->read)(snapshot->stream, &tag, sizeof(txInteger)));
		
		buffer = (txByte*)the->firstBlock;
		size = the->firstBlock->limit - buffer;
		c_memset(buffer, 0, size);
		the->firstBlock->current = buffer + sizeof(txBlock);
		the->firstBlock->limit = buffer + size;

		the->freeHeap = slot = the->firstHeap + 1;
		size = the->maximumHeapCount - 1;
	    while (size--) {
			txSlot* next = slot + 1;
			slot->next = next;
			slot->flag = XS_NO_FLAG;
			slot->kind = XS_UNDEFINED_KIND;
			slot = next;
		}
		slot->next = C_NULL;
		slot->flag = XS_NO_FLAG;
		slot->kind = XS_UNDEFINED_KIND;
		the->firstWeakListLink = C_NULL;

		snapshot->firstChunk = the->firstBlock->current;
		snapshot->firstSlot = the->firstHeap;
		
		fxReadAtom(the, snapshot, &atom, "BLOC");
		mxThrowIf((*snapshot->read)(snapshot->stream, the->firstBlock->current, atom.atomSize));
		the->currentChunksSize = atom.atomSize;
		the->firstBlock->current += atom.atomSize;

		fxReadAtom(the, snapshot, &atom, "HEAP");