981 static const char *scanformat (lua_State *L, const char *strfrmt, char *form) {  in scanformat()  argument
982   const char *p = strfrmt;  in scanformat()
984   if ((size_t)(p - strfrmt) >= sizeof(FLAGS)/sizeof(char))  in scanformat()
996   memcpy(form, strfrmt, ((p - strfrmt) + 1) * sizeof(char));  in scanformat()
997   form += (p - strfrmt) + 1;  in scanformat()
1020   const char *strfrmt = luaL_checklstring(L, arg, &sfl);  in str_format()  local
1021   const char *strfrmt_end = strfrmt+sfl;  in str_format()
1024   while (strfrmt < strfrmt_end) {  in str_format()
1025     if (*strfrmt != L_ESC)  in str_format()
1026       luaL_addchar(&b, *strfrmt++);  in str_format()
1027     else if (*++strfrmt == L_ESC)  in str_format()
1028       luaL_addchar(&b, *strfrmt++);  /* %% */  in str_format()
1035       strfrmt = scanformat(L, strfrmt, form);  in str_format()
1036       switch (*strfrmt++) {  in str_format()
1084                                *(strfrmt - 1));  in str_format()