conservatory
/
ikarus
4
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

string-hash and string-ci-hash now return nonnegative fixnums only.

This commit is contained in:
Abdulaziz Ghuloum 2009-08-26 18:46:55 +03:00
parent 57de27827a
commit 8adc203ded
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scheme/last-revision
View File

@ -1 +1 @@
1847 1848

2
src/ikarus-symbol-table.c
View File

@ -52,7 +52,7 @@ compute_hash(ikptr str){
h = h + (h << 3); h = h + (h << 3);
h = h ^ (h >> 11); h = h ^ (h >> 11);
h = h + (h << 15); h = h + (h << 15);
return h; return (h >= 0) ? h : (1 - h);
} }
ikptr ikptr