** generic equality for strings */
| 42 | ** generic equality for strings |
| 43 | */ |
| 44 | int luaS_eqstr (TString *a, TString *b) { |
| 45 | size_t len1, len2; |
| 46 | const char *s1 = getlstr(a, len1); |
| 47 | const char *s2 = getlstr(b, len2); |
| 48 | return ((len1 == len2) && /* equal length and ... */ |
| 49 | (memcmp(s1, s2, len1) == 0)); /* equal contents */ |
| 50 | } |
| 51 | |
| 52 | |
| 53 | static unsigned luaS_hash (const char *str, size_t l, unsigned seed) { |
no outgoing calls
no test coverage detected