Function pushstr

lib/lua/src/lobject.c:414–422

** Push given string to the stack, as part of the result, and ** join it to previous partial result if there is one. ** It may call 'luaV_concat' while using one slot from EXTRA_STACK. ** This call cannot invoke metamethods, as both operands must be ** strings. It can, however, raise an error if the result is too ** long. In that case, 'luaV_concat' frees the extra slot before ** raising the error

** raising the error.
*/
static void pushstr (BuffFS *buff, const char *str, size_t lstr) {
  lua_State *L = buff->L;
  setsvalue2s(L, L->top.p, luaS_newlstr(L, str, lstr));
  L->top.p++;  /* may use one slot from EXTRA_STACK */
  if (!buff->pushed)  /* no previous string on the stack? */
    buff->pushed = 1;  /* now there is one */
  else  /* join previous string with new one */
    luaV_concat(L, 2);
}


/*