| 871 | |
| 872 | |
| 873 | static int lua_number2strx (lua_State *L, char *buff, int sz, |
| 874 | const char *fmt, lua_Number x) { |
| 875 | int n = num2straux(buff, sz, x); |
| 876 | if (fmt[SIZELENMOD] == 'A') { |
| 877 | int i; |
| 878 | for (i = 0; i < n; i++) |
| 879 | buff[i] = toupper(uchar(buff[i])); |
| 880 | } |
| 881 | else if (fmt[SIZELENMOD] != 'a') |
| 882 | return luaL_error(L, "modifiers for format '%%a'/'%%A' not implemented"); |
| 883 | return n; |
| 884 | } |
| 885 | |
| 886 | #endif /* } */ |
| 887 |
no test coverage detected