Function BIF_DECL

source/script.cpp:12109–12157

BIF_DECL(BIF_PerformAction)
{
	ActionTypeType act = _f_callee_id;

	// An array of args is constructed containing the var or text of each parameter,
	// which is also placed into sArgDeref[] so ExpandArgs() can be skipped.
	// This function is intended to be transitional; eventually all ACT functions
	// should be converted to BIF.
	ArgStruct arg[MAX_ARGS];
	
	TCHAR number_buf[MAX_ARGS * MAX_NUMBER_SIZE]; // Enough for worst case.

	for (int i = 0; i < aParamCount; ++i)
	{
		arg[i].is_expression = false;
		arg[i].postfix = aParam[i]; // For ArgToInt64() etc.
		arg[i].type = ARG_TYPE_NORMAL;
		arg[i].text = TokenToString(*aParam[i], number_buf + (i * MAX_NUMBER_SIZE));
		arg[i].deref = NULL;
		Line::sArgDeref[i] = arg[i].text;
		// length won't actually be used.
		//arg[i].length = (ArgLengthType)_tcslen(arg[i].text);
	}

	int max_params = aResultToken.func->mParamCount;
	for (int i = aParamCount; i < max_params; ++i)
		Line::sArgDeref[i] = _T("");
	
	// Since our ArgStructs aren't fully initialized, it isn't safe to call line->ToText().
	// To avoid that in the event of an error, make g->ExcptMode non-zero so that errors are
	// displayed via UnhandledException(), which locates the proper Line via line number.
	auto outer_excptmode = g->ExcptMode;
	g->ExcptMode |= EXCPTMODE_LINE_WORKAROUND;

	// Construct a Line containing the required context for Perform().
	Line line(0, 0, act, arg, aParamCount);

	// PERFORM THE ACTION
	ResultType result = line.Perform();

	if (result == OK) // Can be OK, FAIL or EARLY_EXIT.
		aResultToken.ReturnPtr(_T(""), 0);
	else
		// Pass back the result code (FAIL or EARLY_EXIT).
		aResultToken.SetExitResult(result);


	g->ExcptMode = outer_excptmode;
}