Function fxNormalizeString

xs/sources/xsString.c:3623–3671

}

void fxNormalizeString(txMachine* the, txSlot* string, txFlag form)
{
	txNormalizeBuffer _buffer;
	txNormalizeBuffer* buffer = &_buffer;
	txInteger source[mxSourceBufferCount];
	txString p;

	mxPushUndefined();
	buffer->slot = the->stack;
	buffer->address = fxArrayBuffer(the, the->stack, C_NULL, 64, 0x7FFFFFFF);
	buffer->count = 0;
	buffer->starterIndex = 0;

	p = string->value.string;
	for (;;) {
		txInteger* sourceAddress = source;
		txInteger sourceIndex = 0;
		while (sourceIndex < mxSourceBufferCount) {
			p = mxStringByteDecode(p, sourceAddress);
			if (*sourceAddress == C_EOF)
				break;
			sourceAddress++;
			sourceIndex++;
		}
		if (sourceIndex) {
			txInteger offset = mxPtrDiff(p - string->value.string);
			fxNormalizeDecomposition(the, buffer, source, sourceIndex, form & 1);
			p = string->value.string + offset;
		}
		if (sourceIndex < mxSourceBufferCount)
			break;
	}
	if (form & 2)
		fxNormalizeComposition(the, buffer);
	if (buffer->count) {
		txInteger resultIndex;
		txInteger stringLength = 0;
		for (resultIndex = 0; resultIndex < buffer->count; resultIndex++)
			stringLength += mxStringByteLength(buffer->address[resultIndex]);
		stringLength++;
		p = string->value.string = fxNewChunk(the, stringLength);
		buffer->address = fxToArrayBuffer(the, the->stack);
		for (resultIndex = 0; resultIndex < buffer->count; resultIndex++)
			p = mxStringByteEncode(p, buffer->address[resultIndex]);
		*p = 0;
	}
	
	mxPop();
}

#endif