Function nhl_pcall_handle

src/nhlua.c:2154–2178

}

int
nhl_pcall_handle(lua_State *L, int nargs, int nresults, const char *name,
                 NHL_pcall_action npa)
{
    int rv = nhl_pcall(L, nargs, nresults, name);
    if (rv) {
        nhl_user_data *nud;
        (void) lua_getallocf(L, (void **) &nud);
        /* XXX can we get a lua stack trace as well? */
        switch (npa) {
        case NHLpa_panic:
            panic("Lua error %d:%s %s", nud->sid,
                  nud->name ? nud->name : "(unknown)", lua_tostring(L, -1));
            /*NOTREACHED*/
            break;
        case NHLpa_impossible:
            impossible("Lua error: %d:%s %s", nud->sid,
                       nud->name ? nud->name : "(unknown)",
                       lua_tostring(L, -1));
                /* Drop the error.  If the caller cares, use nhl_pcall(). */
            lua_pop(L, 1);
        }
    }
    return rv;
}

/* XXX impossible() should be swappable with pline/nothing/panic via flag */
/* read lua code/data from a dlb module or an external file