Function l_obj_add_to_container

src/nhlobj.c:113–137

Puts object inside another object. */ local box = obj.new("large chest"); box:addcontent(obj.new("rock")); */

   box:addcontent(obj.new("rock"));
*/
staticfn int
l_obj_add_to_container(lua_State *L)
{
    struct _lua_obj *lobox = l_obj_check(L, 1);
    struct _lua_obj *lo = l_obj_check(L, 2);
    struct obj *otmp;
    int refs;

    if (!lobj_is_ok(lo) || !lobj_is_ok(lobox))
        return 0;

    refs = lo->obj->lua_ref_cnt;

    obj_extract_self(lo->obj);
    otmp = add_to_container(lobox->obj, lo->obj);

    /* was lo->obj merged? */
    if (otmp != lo->obj) {
        lo->obj = otmp;
        lo->obj->lua_ref_cnt += refs;
    }
    lobox->obj->owt = weight(lobox->obj);

    return 0;
}

/* Put object into player's inventory */
/* u.giveobj(obj.new("rock")); */