Function plutoS_commit

src/lstring.cpp:374–384

void plutoS_commit (lua_State *L, char *prealloc, size_t l) {
  if (l <= LUAI_MAXSHORTLEN) {
    TString *ts;
    lua_lock(L);
    ts = internshrstr(L, prealloc, l);
    setsvalue2s(L, L->top.p, ts);
    api_incr_top(L);
    luaC_checkGC(L);
    lua_unlock(L);
  }
}