Function fxOptimize

xs/tools/xslOpt.c:165–295

}

void fxOptimize(txMachine* the)
{
	txLinker* linker = (txLinker*)(the->context);
	txInteger instanceCount = 0, instanceIndex;
	txID keyCount = the->keyIndex, keyIndex;
	txConflictTable** conflictTables = fxNewLinkerChunkClear(linker, keyCount * sizeof(txConflictTable*));
	txColorTable** colorTables = NULL;
	txFlag* flags = fxNewLinkerChunk(linker, keyCount * sizeof(txFlag));
	txSlot* heap = the->firstHeap;
	txLinkerProjection** projectionAddress = &linker->firstProjection;
	txLinkerProjection* projection;
	txInteger projectionIndex = 0, projectionCount, holes, color;
	while (heap) {
		txSlot* slot = heap + 1;
		txSlot* limit = heap->value.reference;
		projection = fxNewLinkerChunkClear(linker, sizeof(txLinkerProjection) + (mxPtrDiff(limit - slot) * sizeof(txInteger)));
		projection->heap = heap;
		projection->limit = limit;
		*projectionAddress = projection;
		projectionAddress = &projection->nextProjection;
		while (slot < limit) {
			if (slot->kind == XS_INSTANCE_KIND)
				instanceCount++;
			slot++;
		}
		heap = heap->next;
	}
	colorTables = fxNewLinkerChunkClear(linker, instanceCount * sizeof(txColorTable*));
	instanceIndex = 0;
	heap = the->firstHeap;
	while (heap) {
		txSlot* slot = heap + 1;
		txSlot* limit = heap->value.reference;
		while (slot < limit) {
			if (slot->kind == XS_INSTANCE_KIND) {
				txColorTable* colorTable = colorTables[instanceIndex] = fxNewColorTable(linker, slot);
				txSlot* property = slot->next;
				while (property) {
					if (((property->flag & XS_INTERNAL_FLAG) == 0) && (property->ID != XS_NO_ID)) {
						txColorEntry* colorEntry = fxNewColorEntry(linker, property);
						txConflictEntry* conflictEntry = fxNewConflictEntry(linker, colorTable);
						txID id = property->ID;
						txConflictTable* conflictTable = conflictTables[id];
						if (!conflictTable) {
							conflictTable = conflictTables[id] = fxNewConflictTable(linker, id);
						}
						fxLinkColorEntry(colorTable, colorEntry);
						fxLinkConflictEntry(conflictTable, conflictEntry);
						colorEntry->conflictTable = conflictTable;
					}
					property = property->next;
				}
				instanceIndex++;
			}
			slot++;
		}
		heap = heap->next;
	}