Function l_obj_container

src/nhlobj.c:468–478

Get the container object is in */ local box = o:container(); */

/* Get the container object is in */
/* local box = o:container(); */
staticfn int
l_obj_container(lua_State *L)
{
    struct _lua_obj *lo = l_obj_check(L, 1);

    if (lo && lo->obj && lo->obj->where == OBJ_CONTAINED)
        (void) l_obj_push(L, lo->obj->ocontainer);
    else
        (void) l_obj_push(L, NULL);
    return 1;
}

/* Is the object a null? */
/* local badobj = o:isnull(); */