Function fxBuildKeys

xs/tools/xsl.c:780–804

/* KEYS */

void fxBuildKeys(txMachine* the)
{
	txLinker* linker = (txLinker*)(the->context);
	txID c = linker->symbolIndex, i = 0;
	{
		txSlot* key = fxFindKey(the);
		key->flag = XS_INTERNAL_FLAG | XS_DONT_DELETE_FLAG;
		i++;
	}
	for (; i < XS_SYMBOL_ID_COUNT; i++) {
		txLinkerSymbol* symbol = linker->symbolArray[i];
		txSlot* key = fxFindKey(the);
		txSlot* instance = fxNewInstance(the);
		txSlot* property = fxNextSymbolProperty(the, instance, i, XS_NO_ID, XS_INTERNAL_FLAG);
		fxNextStringXProperty(the, property, symbol->string, XS_NO_ID, XS_INTERNAL_FLAG);
		key->flag = XS_INTERNAL_FLAG | XS_DONT_DELETE_FLAG;
		key->kind = XS_REFERENCE_KIND;
		key->value.reference = instance;
		mxPop();
	}
	for (; i < c; i++) {
		txLinkerSymbol* symbol = linker->symbolArray[i];
		fxNewNameX(the, symbol->string);
	}
}

/* MODULES */