276     char buff[L_MAXLENNUM + 1];  in l_str2d()  local
280     strcpy(buff, s);  /* copy string to buffer */  in l_str2d()
281     buff[pdot - s] = lua_getlocaledecpoint();  /* correct decimal point */  in l_str2d()
282     endptr = l_str2dloc(buff, result, mode);  /* try again */  in l_str2d()
284       endptr = s + (endptr - buff);  /* make relative to 's' */  in l_str2d()
347 int luaO_utf8esc (char *buff, unsigned long x) {  in luaO_utf8esc()  argument
351     buff[UTF8BUFFSZ - 1] = cast_char(x);  in luaO_utf8esc()
355       buff[UTF8BUFFSZ - (n++)] = cast_char(0x80 | (x & 0x3f));  in luaO_utf8esc()
359     buff[UTF8BUFFSZ - n] = cast_char((~mfb << 1) | x);  /* add first byte */  in luaO_utf8esc()
379 static int tostringbuff (TValue *obj, char *buff) {  in tostringbuff()  argument
384     len = lua_integer2str(buff, MAXNUMBER2STR, ivalue(obj));  in tostringbuff()
386     len = lua_number2str(buff, MAXNUMBER2STR, fltvalue(obj));  in tostringbuff()
387     if (buff[strspn(buff, "-0123456789")] == '\0') {  /* looks like an int? */  in tostringbuff()
388       buff[len++] = lua_getlocaledecpoint();  in tostringbuff()
389       buff[len++] = '0';  /* adds '.0' to result */  in tostringbuff()
394   len = lua_integer2str(buff, MAXNUMBER2STR, ivalue(obj));  in tostringbuff()
404   char buff[MAXNUMBER2STR];  in luaO_tostring()  local
405   int len = tostringbuff(obj, buff);  in luaO_tostring()
406   setsvalue(L, obj, luaS_newlstr(L, buff, len));  in luaO_tostring()
443 static void pushstr (BuffFS *buff, const char *str, size_t lstr) {  in pushstr()  argument
444   lua_State *L = buff->L;  in pushstr()
447   if (!buff->pushed)  /* no previous string on the stack? */  in pushstr()
448     buff->pushed = 1;  /* now there is one */  in pushstr()
457 static void clearbuff (BuffFS *buff) {  in clearbuff()  argument
458   pushstr(buff, buff->space, buff->blen);  /* push buffer contents */  in clearbuff()
459   buff->blen = 0;  /* space now is empty */  in clearbuff()
467 static char *getbuff (BuffFS *buff, int sz) {  in getbuff()  argument
468   lua_assert(buff->blen <= BUFVFS); lua_assert(sz <= BUFVFS);  in getbuff()
469   if (sz > BUFVFS - buff->blen)  /* not enough space? */  in getbuff()
470     clearbuff(buff);  in getbuff()
471   return buff->space + buff->blen;  in getbuff()
482 static void addstr2buff (BuffFS *buff, const char *str, size_t slen) {  in addstr2buff()  argument
484     char *bf = getbuff(buff, cast_int(slen));  in addstr2buff()
486     addsize(buff, cast_int(slen));  in addstr2buff()
489     clearbuff(buff);  /* string comes after buffer's content */  in addstr2buff()
490     pushstr(buff, str, slen);  /* push string */  in addstr2buff()
498 static void addnum2buff (BuffFS *buff, TValue *num) {  in addnum2buff()  argument
499   char *numbuff = getbuff(buff, MAXNUMBER2STR);  in addnum2buff()
501   addsize(buff, len);  in addnum2buff()
510   BuffFS buff;  /* holds last part of the result */  in luaO_pushvfstring()  local
512   buff.pushed = buff.blen = 0;  in luaO_pushvfstring()
513   buff.L = L;  in luaO_pushvfstring()
515     addstr2buff(&buff, fmt, e - fmt);  /* add 'fmt' up to '%' */  in luaO_pushvfstring()
520         addstr2buff(&buff, s, strlen(s));  in luaO_pushvfstring()
525         addstr2buff(&buff, &c, sizeof(char));  in luaO_pushvfstring()
531         addnum2buff(&buff, &num);  in luaO_pushvfstring()
537         addnum2buff(&buff, &num);  in luaO_pushvfstring()
544         addnum2buff(&buff, &num);  in luaO_pushvfstring()
550         char *bf = getbuff(&buff, sz);  in luaO_pushvfstring()
553         addsize(&buff, len);  in luaO_pushvfstring()
559         addstr2buff(&buff, bf + UTF8BUFFSZ - len, len);  in luaO_pushvfstring()
563         addstr2buff(&buff, "%", 1);  in luaO_pushvfstring()
573   addstr2buff(&buff, fmt, strlen(fmt));  /* rest of 'fmt' */  in luaO_pushvfstring()
574   clearbuff(&buff);  /* empty buffer into the stack */  in luaO_pushvfstring()
575   lua_assert(buff.pushed == 1);  in luaO_pushvfstring()