Method ToAny

Code/CryEngine/CryScriptSystem/ScriptSystem.cpp:1503–1651

/////////////////////////////////////////////////////////////////////

//////////////////////////////////////////////////////////////////////////
bool CScriptSystem::ToAny(ScriptAnyValue& var, int index)
{
	if (!lua_gettop(L))
		return false;

	CHECK_STACK(L);

	if (var.type == ANY_ANY)
	{
		switch (lua_type(L, index))
		{
		case LUA_TNIL:
			var.type = ANY_TNIL;
			break;
		case LUA_TBOOLEAN:
			var.b = lua_toboolean(L, index) != 0;
			var.type = ANY_TBOOLEAN;
			break;
		case LUA_TLIGHTUSERDATA:
			var.ptr = lua_topointer(L, index);
			var.type = ANY_THANDLE;
			break;
		case LUA_TNUMBER:
			var.number = (float)lua_tonumber(L, index);
			var.type = ANY_TNUMBER;
			break;
		case LUA_TSTRING:
			var.str = lua_tostring(L, index);
			var.type = ANY_TSTRING;
			break;
		case LUA_TTABLE:
		case LUA_TUSERDATA:
			if (!var.table)
			{
				var.table = AllocTable();
				var.table->AddRef();
			}
			lua_pushvalue(L, index);
			AttachTable(var.table);
			var.type = ANY_TTABLE;
			break;
		case LUA_TFUNCTION:
			{
				var.type = ANY_TFUNCTION;
				// Make reference to function.
				lua_pushvalue(L, index);
				var.function = (HSCRIPTFUNCTION)(INT_PTR)lua_ref(L, 1);
			}
			break;
		case LUA_TTHREAD:
		default:
			return false;
		}
		return true;
	}
	else
	{
		bool res = false;