Function BacktraceErrorHandler

engine/script/src/script.cpp:1468–1522

    }

    static int BacktraceErrorHandler(lua_State *m_state) {
        lua_createtable(m_state, 0, 2);
        
        // First, generate traceback BEFORE we modify the stack
        // We need to do this first because GetLuaTraceback expects string errors
        char traceback[1024];
        traceback[0] = '\0'; // Initialize the buffer
        LuaCallstackCtx ctx;
        ctx.m_First = true;
        ctx.m_Buffer = traceback;
        ctx.m_BufferSize = sizeof(traceback);
        
        // If error is not a string, temporarily convert it for traceback generation
        if (!lua_isstring(m_state, 1))
        {
            // Replace stack position 1 with string version for GetLuaTraceback
            lua_getglobal(m_state, "tostring");
            if (lua_isfunction(m_state, -1))
            {
                lua_pushvalue(m_state, 1); // Push the original error value
                int result = lua_pcall(m_state, 1, 1, 0);
                if (result == 0 && lua_isstring(m_state, -1))
                {
                    lua_replace(m_state, 1); // Replace original error with string version
                }
                else
                {
                    lua_pop(m_state, 1); // Remove failed result
                    const char* type_name = lua_typename(m_state, lua_type(m_state, 1));
                    lua_pushfstring(m_state, "(%s)", type_name);
                    lua_replace(m_state, 1); // Replace with type name
                }
            }
            else
            {
                lua_pop(m_state, 1); // Remove non-function value
                const char* type_name = lua_typename(m_state, lua_type(m_state, 1));
                lua_pushfstring(m_state, "(%s)", type_name);
                lua_replace(m_state, 1); // Replace with type name
            }
        }
        
        // Now generate traceback with string error message
        dmScript::GetLuaTraceback(m_state, "Sln", GetLuaStackTraceCbk, &ctx);
        
        // Store the converted error message
        lua_pushvalue(m_state, 1);
        lua_setfield(m_state, -2, "error");

        // Store the traceback
        lua_pushstring(m_state, traceback);
        lua_setfield(m_state, -2, "traceback");

        return 1;
    }

    static int PCallInternal(lua_State* L, int nargs, int nresult, int in_error_handler) {
        lua_pushcfunction(L, BacktraceErrorHandler);