Method Dump

Code/CryEngine/CryScriptSystem/ScriptTable.cpp:420–513

}

void CScriptTable::Dump(IScriptTableDumpSink* p)
{
	if (!p) return;
	CHECK_STACK(L);
	int top = lua_gettop(L);

	PushRef();

	int trgTable = top + 1;

	lua_pushnil(L);  // first key
	int reftop = lua_gettop(L);
	while (lua_next(L, trgTable) != 0)
	{
		// `key' is at index -2 and `value' at index -1
		if (lua_type(L, -2) == LUA_TSTRING)
		{
			const char* sName = lua_tostring(L, -2); // again index
			switch (lua_type(L, -1))
			{
			case LUA_TNIL:
				p->OnElementFound(sName, svtNull);
				break;
			case LUA_TBOOLEAN:
				p->OnElementFound(sName, svtBool);
				break;
			case LUA_TLIGHTUSERDATA:
				p->OnElementFound(sName, svtPointer);
				break;
			case LUA_TNUMBER:
				p->OnElementFound(sName, svtNumber);
				break;
			case LUA_TSTRING:
				p->OnElementFound(sName, svtString);
				break;
			case LUA_TTABLE:
				if (strcmp(sName, "__index") != 0)
					p->OnElementFound(sName, svtObject);
				break;
			case LUA_TFUNCTION:
				p->OnElementFound(sName, svtFunction);
				break;
			case LUA_TUSERDATA:
				p->OnElementFound(sName, svtUserData);
				break;
			}
			;
		}
		else
		{
			int nIdx = (int)lua_tonumber(L, -2);  // again index
			switch (lua_type(L, -1))
			{
			case LUA_TNIL:
				p->OnElementFound(nIdx, svtNull);
				break;
			case LUA_TBOOLEAN:
				p->OnElementFound(nIdx, svtBool);