Function AddSetVariableNode

NULLC/Callbacks.cpp:1838–1912

}

void AddSetVariableNode(const char* pos)
{
	CodeInfo::lastKnownStartPos = pos;

	// Take l-value
	NodeZeroOP *left = CodeInfo::nodeList[CodeInfo::nodeList.size()-2];
	// If we have a function call as an l-value...
	if(left->nodeType == typeNodeFuncCall && ((NodeFuncCall*)left)->funcInfo)
	{
		// ...and that was an accessor "get" function call, we have to replace "get" function with "set" function
		FunctionInfo *fInfo = ((NodeFuncCall*)left)->funcInfo;
		if(fInfo->name[fInfo->nameLength-1] == '$')
		{
			// Replace function call node with 'this' pointer that function node had
			CodeInfo::nodeList[CodeInfo::nodeList.size()-2] = ((NodeFuncCall*)left)->GetFirstNode();
			// If this is an accessor of a generic type, maybe we have to instance a "set" accessor function
			if(fInfo->parentClass && fInfo->parentClass->genericBase)
			{
				TypeInfo *currentType = fInfo->parentClass;
				// Get hash of the base class accessor name
				unsigned accessorBaseHash = currentType->genericBase->nameHash;
				accessorBaseHash = StringHashContinue(accessorBaseHash, "::");
				const char *skipClassName = strchr(fInfo->name, ':');
				assert(skipClassName);
				accessorBaseHash = StringHashContinue(accessorBaseHash, skipClassName + 2);
				// Clear selected function list
				bestFuncList.clear();
				SelectFunctionsForHash(accessorBaseHash, 0); // Select accessor functions from generic type base class
				SelectFunctionsForHash(fInfo->nameHash, 0); // Select accessor functions from instanced class
				// Select best function for the call
				unsigned minRating = ~0u;
				unsigned minRatingIndex = SelectBestFunction(bestFuncList.size(), 1, minRating, currentType);
				if(minRating != ~0u)
				{
					// If a function is found and it is a generic function, instance it
					FunctionInfo *fInfo = bestFuncList[minRatingIndex];
					if(fInfo && fInfo->generic)
					{
						CreateGenericFunctionInstance(pos, fInfo, fInfo, ~0u, currentType);
						fInfo->parentClass = currentType;
					}
				}
			}
			// Try to call "set" accessor
			if(AddFunctionCallNode(pos, fInfo->name, 1, true))
				return;	// If a call is successful, we are done
			else
				CodeInfo::nodeList[CodeInfo::nodeList.size()-2] = left; // If failed, this is a read-only accessor so return l-value to original state
		}
	}

	// Call overloaded operator with error suppression
	if(AddFunctionCallNode(CodeInfo::lastKnownStartPos, "=", 2, true))
		return;
	// Call default operator with error suppression
	if(AddFunctionCallNode(CodeInfo::lastKnownStartPos, "$defaultAssign", 2, true))
		return;