| 98 | |
| 99 | |
| 100 | static lua_Number readhexa (const char **s, lua_Number r, int *count) { |
| 101 | for (; lisxdigit(cast_uchar(**s)); (*s)++) { /* read integer part */ |
| 102 | r = (r * cast_num(16.0)) + cast_num(luaO_hexavalue(cast_uchar(**s))); |
| 103 | (*count)++; |
| 104 | } |
| 105 | return r; |
| 106 | } |
| 107 | |
| 108 | |
| 109 | /* |
no test coverage detected