Function retpsetcode

third-party/lua-5.5.0/src/ltable.c:1049–1054

** When a 'pset' cannot be completed, this function returns an encoding ** of its result, to be used by 'luaH_finishset'. */

** of its result, to be used by 'luaH_finishset'.
*/
static int retpsetcode (Table *t, const TValue *slot) {
  if (isabstkey(slot))
    return HNOTFOUND;  /* no slot with that key */
  else  /* return node encoded */
    return cast_int((cast(Node*, slot) - t->node)) + HFIRSTNODE;
}


static int finishnodeset (Table *t, const TValue *slot, TValue *val) {