259     char buff[L_MAXLENNUM + 1];  in l_str2d()  local
263     strcpy(buff, s);  /* copy string to buffer */  in l_str2d()
264     buff[pdot - s] = lua_getlocaledecpoint();  /* correct decimal point */  in l_str2d()
265     endptr = l_str2dloc(buff, result, mode);  /* try again */  in l_str2d()
267       endptr = s + (endptr - buff);  /* make relative to 's' */  in l_str2d()
323 int luaO_utf8esc (char *buff, unsigned long x) {  in luaO_utf8esc()  argument
327     buff[UTF8BUFFSZ - 1] = cast_char(x);  in luaO_utf8esc()
331       buff[UTF8BUFFSZ - (n++)] = cast_char(0x80 | (x & 0x3f));  in luaO_utf8esc()
335     buff[UTF8BUFFSZ - n] = cast_char((~mfb << 1) | x);  /* add first byte */  in luaO_utf8esc()
355 static int tostringbuff (TValue *obj, char *buff) {  in tostringbuff()  argument
359     len = lua_integer2str(buff, MAXNUMBER2STR, ivalue(obj));  in tostringbuff()
361     len = lua_number2str(buff, MAXNUMBER2STR, fltvalue(obj));  in tostringbuff()
362     if (buff[strspn(buff, "-0123456789")] == '\0') {  /* looks like an int? */  in tostringbuff()
363       buff[len++] = lua_getlocaledecpoint();  in tostringbuff()
364       buff[len++] = '0';  /* adds '.0' to result */  in tostringbuff()
375   char buff[MAXNUMBER2STR];  in luaO_tostring()  local
376   int len = tostringbuff(obj, buff);  in luaO_tostring()
377   setsvalue(L, obj, luaS_newlstr(L, buff, len));  in luaO_tostring()
414 static void pushstr (BuffFS *buff, const char *str, size_t lstr) {  in pushstr()  argument
415   lua_State *L = buff->L;  in pushstr()
418   if (!buff->pushed)  /* no previous string on the stack? */  in pushstr()
419     buff->pushed = 1;  /* now there is one */  in pushstr()
428 static void clearbuff (BuffFS *buff) {  in clearbuff()  argument
429   pushstr(buff, buff->space, buff->blen);  /* push buffer contents */  in clearbuff()
430   buff->blen = 0;  /* space now is empty */  in clearbuff()
438 static char *getbuff (BuffFS *buff, int sz) {  in getbuff()  argument
439   lua_assert(buff->blen <= BUFVFS); lua_assert(sz <= BUFVFS);  in getbuff()
440   if (sz > BUFVFS - buff->blen)  /* not enough space? */  in getbuff()
441     clearbuff(buff);  in getbuff()
442   return buff->space + buff->blen;  in getbuff()
453 static void addstr2buff (BuffFS *buff, const char *str, size_t slen) {  in addstr2buff()  argument
455     char *bf = getbuff(buff, cast_int(slen));  in addstr2buff()
457     addsize(buff, cast_int(slen));  in addstr2buff()
460     clearbuff(buff);  /* string comes after buffer's content */  in addstr2buff()
461     pushstr(buff, str, slen);  /* push string */  in addstr2buff()
469 static void addnum2buff (BuffFS *buff, TValue *num) {  in addnum2buff()  argument
470   char *numbuff = getbuff(buff, MAXNUMBER2STR);  in addnum2buff()
472   addsize(buff, len);  in addnum2buff()
481   BuffFS buff;  /* holds last part of the result */  in luaO_pushvfstring()  local
483   buff.pushed = buff.blen = 0;  in luaO_pushvfstring()
484   buff.L = L;  in luaO_pushvfstring()
486     addstr2buff(&buff, fmt, e - fmt);  /* add 'fmt' up to '%' */  in luaO_pushvfstring()
491         addstr2buff(&buff, s, strlen(s));  in luaO_pushvfstring()
496         addstr2buff(&buff, &c, sizeof(char));  in luaO_pushvfstring()
502         addnum2buff(&buff, &num);  in luaO_pushvfstring()
508         addnum2buff(&buff, &num);  in luaO_pushvfstring()
514         addnum2buff(&buff, &num);  in luaO_pushvfstring()
519         char *bf = getbuff(&buff, sz);  in luaO_pushvfstring()
522         addsize(&buff, len);  in luaO_pushvfstring()
528         addstr2buff(&buff, bf + UTF8BUFFSZ - len, len);  in luaO_pushvfstring()
532         addstr2buff(&buff, "%", 1);  in luaO_pushvfstring()
542   addstr2buff(&buff, fmt, strlen(fmt));  /* rest of 'fmt' */  in luaO_pushvfstring()
543   clearbuff(&buff);  /* empty buffer into the stack */  in luaO_pushvfstring()
544   lua_assert(buff.pushed == 1);  in luaO_pushvfstring()