| 1569 | |
| 1570 | |
| 1571 | LUA_API void lua_upvaluejoin (lua_State *L, int fidx1, int n1, |
| 1572 | int fidx2, int n2) { |
| 1573 | LClosure *f1; |
| 1574 | UpVal **up1 = getupvalref(L, fidx1, n1, &f1); |
| 1575 | UpVal **up2 = getupvalref(L, fidx2, n2, NULL); |
| 1576 | api_check(L, *up1 != NULL && *up2 != NULL, "invalid upvalue index"); |
| 1577 | *up1 = *up2; |
| 1578 | luaC_objbarrier(L, f1, *up1); |
| 1579 | } |
| 1580 | |
| 1581 |
no test coverage detected