867 static const char *scanformat (lua_State *L, const char *strfrmt, char *form) {  in scanformat()  argument
868   const char *p = strfrmt;  in scanformat()
870   if ((size_t)(p - strfrmt) >= sizeof(FLAGS)/sizeof(char))  in scanformat()
882   memcpy(form, strfrmt, (p - strfrmt + 1) * sizeof(char));  in scanformat()
883   form += p - strfrmt + 1;  in scanformat()
906   const char *strfrmt = luaL_checklstring(L, arg, &sfl);  in str_format()  local
907   const char *strfrmt_end = strfrmt+sfl;  in str_format()
910   while (strfrmt < strfrmt_end) {  in str_format()
911     if (*strfrmt != L_ESC)  in str_format()
912       luaL_addchar(&b, *strfrmt++);  in str_format()
913     else if (*++strfrmt == L_ESC)  in str_format()
914       luaL_addchar(&b, *strfrmt++);  /* %% */  in str_format()
921       strfrmt = scanformat(L, strfrmt, form);  in str_format()
922       switch (*strfrmt++) {  in str_format()
979                                LUA_QL("format"), *(strfrmt - 1));  in str_format()