Function lua_step

lua/sp.c:7249–7281

}

void lua_step(sqlite3_context *context, int argc, sqlite3_value **argv)
{
    lua_func_arg_t *arg = sqlite3_user_data(context);
    struct sqlthdstate *thd = arg->thd;
    char *spname = arg->name;
    struct sqlclntstate *clnt = thd->sqlthd->clnt;
    char *err = NULL;
    struct sp_state *state = sqlite3_aggregate_context(context, sizeof(*state));
    if (state->sp == NULL) {
        if (clnt->sp && clnt->sp->lua) {
            if (strcmp(clnt->sp->spname, spname) == 0) {
                // first call and have cached lua vm.
                // reset it by parsing again.
                process_src(clnt->sp->lua, clnt->sp->src, &err);
            }
        }
    }
    if (state->sp != clnt->sp) {
        check_sp(spname, clnt, state);
    }
    int rc = lua_step_int(spname, &err, thd, clnt, context, argc, argv);
    if (rc != 0) {
        sqlite3_result_error(context, err, -1);
    }
    free(err);
    if (state->sp != clnt->sp) {
        if (state->sp) {
            swap_sp(&clnt->sp, &state->sp);
        } else {
            state->sp = clnt->sp;
        }
    }
}

void lua_func(sqlite3_context *context, int argc, sqlite3_value **argv)
{