| 51 | |
| 52 | |
| 53 | unsigned int luaS_hash (const char *str, size_t l, unsigned int seed, |
| 54 | size_t step) { |
| 55 | unsigned int h = seed ^ cast_uint(l); |
| 56 | for (; l >= step; l -= step) |
| 57 | h ^= ((h<<5) + (h>>2) + cast_byte(str[l - 1])); |
| 58 | return h; |
| 59 | } |
| 60 | |
| 61 | |
| 62 | unsigned int luaS_hashlongstr (TString *ts) { |
no outgoing calls
no test coverage detected