Function Matrix4_mul

engine/script/src/script_vmath.cpp:796–829

    }

    static int Matrix4_mul(lua_State *L)
    {
        Matrix4 m1;
        if (lua_isnumber(L, 1))
        {
            float f = (float) lua_tonumber(L, 1);
            m1 = *CheckMatrix4(L, 2);
            PushMatrix4(L, m1 * f);
        }
        else
        {
            m1 = *CheckMatrix4(L, 1);
            Matrix4* m2 = ToMatrix4(L, 2);
            Vector4* v = m2 != 0 ? 0 : ToVector4(L, 2);
            if (m2 != 0)
            {
                PushMatrix4(L, m1 * *m2);
            }
            else if (v != 0)
            {
                PushVector4(L, m1 * *v);
            }
            else if (lua_isnumber(L, 2))
            {
                float f = (float) luaL_checknumber(L, 2);
                PushMatrix4(L, m1 * f);
            }
            else
            {
                return luaL_error(L, "%s.%s can only be multiplied with a number, another %s or a %s.", SCRIPT_LIB_NAME, SCRIPT_TYPE_NAME_MATRIX4, SCRIPT_TYPE_NAME_MATRIX4, SCRIPT_TYPE_NAME_VECTOR4);
            }
        }
        return 1;
    }

    static int Matrix4_concat(lua_State *L)
    {