| 1443 | |
| 1444 | |
| 1445 | LUA_API void lua_upvaluejoin (lua_State *L, int fidx1, int n1, |
| 1446 | int fidx2, int n2) { |
| 1447 | LClosure *f1; |
| 1448 | UpVal **up1 = getupvalref(L, fidx1, n1, &f1); |
| 1449 | UpVal **up2 = getupvalref(L, fidx2, n2, NULL); |
| 1450 | api_check(L, *up1 != NULL && *up2 != NULL, "invalid upvalue index"); |
| 1451 | *up1 = *up2; |
| 1452 | luaC_objbarrier(L, f1, *up1); |
| 1453 | } |
| 1454 | |
| 1455 |
no test coverage detected