/* Do the REPL: repeatedly read (load) a line, evaluate (call) it, and print any results.  */
static void doREPL(lua_State *L)
/* Do the REPL: repeatedly read (load) a line, evaluate (call) it, and print any results.  */
static void doREPL(lua_State *L)
{
    if (status == LUA_OK)
      status = docall(L, 0, LUA_MULTRET);
    if (status == LUA_OK) l_print(L);
    else report(L, status);
  }
  lua_settop(L, 0);
  lua_writeline();
  progname = oldprogname;
}