** add length modifier into formats */
| 1212 | ** add length modifier into formats |
| 1213 | */ |
| 1214 | static void addlenmod (char *form, const char *lenmod) { |
| 1215 | size_t l = strlen(form); |
| 1216 | size_t lm = strlen(lenmod); |
| 1217 | char spec = form[l - 1]; |
| 1218 | strcpy(form + l - 1, lenmod); |
| 1219 | form[l + lm - 1] = spec; |
| 1220 | form[l + lm] = '\0'; |
| 1221 | } |
| 1222 | |
| 1223 | |
| 1224 | static int str_format (lua_State *L) { |