luaS_newlstr
setsvalue2s(L, L->top, luaS_newlstr(L, "", 0));
ts = luaS_newlstr(L, s, len);
setsvalue(L, L->top++, luaS_newlstr(L, (char *)&r, sizeof(r)));
TString *ts = luaS_newlstr(L, str, l); /* create new string */
setsvalue2s(L, L->top++, luaS_newlstr(L, str, l));
return luaS_newlstr(L, str, strlen(str));
#define luaS_newliteral(L, s) (luaS_newlstr(L, "" s, \
LUAI_FUNC TString *luaS_newlstr (lua_State *L, const char *str, size_t l);
return luaS_newlstr(S->L,s,size-1); /* remove trailing '\0' */
setsvalue2s(L, top-n, luaS_newlstr(L, buffer, tl));
setsvalue2s(L, obj, luaS_newlstr(L, s, l));