Function ParseFunctionDefinition

NULLC/Parser.cpp:1015–1159

}

bool ParseFunctionDefinition(Lexeme** str, bool coroutine)
{
	Lexeme *start = *str - 1;
	Lexeme *name = *str;

	if((*str)->type != lex_string && (*str)->type != lex_operator && !((*str)->type == lex_oparen && (*str - 1)->type == lex_auto))
	{
		if(coroutine)
			ThrowError((*str)->pos, "ERROR: function name not found after return type");
		else
			return false;
	}
	bool typeMethod = false;
	bool funcProperty = false;
	if((*str)->type == lex_operator)
	{
		(*str)++;
		if((*str)->type == lex_obracket)
		{
			if((*str)[1].type != lex_cbracket)
				ThrowError((*str)->pos, "ERROR: ']' not found after '[' in operator definition");
			else
				(*str)++;
		}
		if((*str)->type == lex_oparen)
		{
			if((*str)[1].type != lex_cparen)
				ThrowError((*str)->pos, "ERROR: ')' not found after '(' in operator definition");
			else
				(*str)++;
		}
	}else if((*str)->type == lex_string && ((*str + 1)->type == lex_colon || (*str + 1)->type == lex_point || (*str + 1)->type == lex_less)){
		TypeInfo *retType = (TypeInfo*)GetSelectedType();
		if(!ParseSelectType(str, true, false, true, false))
			ThrowError((*str)->pos, "ERROR: class name expected before ':' or '.'");
		if((*str)->type == lex_point)
			funcProperty = true;
		(*str)++;
		if((*str)->type != lex_string)
			ThrowError((*str)->pos, "ERROR: function name expected after ':' or '.'");
		TypeContinue((*str)->pos);
		SelectTypeByPointer(retType);
		typeMethod = true;
	}
	char	*functionName = NULL;
	if((*str)->type == lex_string || ((*str)->type >= lex_add && (*str)->type <= lex_in) || ((*str)->type >= lex_set && (*str)->type <= lex_xorset) || (*str)->type == lex_bitnot || (*str)->type == lex_lognot)
	{
		if((*str)->length >= NULLC_MAX_VARIABLE_NAME_LENGTH)
			ThrowError((*str)->pos, "ERROR: function name length is limited to 2048 symbols");
		functionName = (char*)stringPool.Allocate((*str)->length + 2);
		memcpy(functionName, (*str)->pos, (*str)->length);
		if(!funcProperty)
		{
			functionName[(*str)->length] = 0;
		}else{
			functionName[(*str)->length] = '$';
			functionName[(*str)->length + 1] = 0;
		}