\r
inline SQHash _hashstr (const SQChar *s, size_t l)\r
{\r
- SQHash h = l; /* seed */\r
+ SQHash h = (SQHash)l; /* seed */\r
size_t step = (l>>5)|1; /* if string is too long, don't hash all its chars */\r
for (; l>=step; l-=step)\r
h = h ^ ((h<<5)+(h>>2)+(unsigned short)*(s++));\r