diff --git a/scheme/last-revision b/scheme/last-revision
index e1d33be..07bef9d 100644
--- a/scheme/last-revision
+++ b/scheme/last-revision
@@ -1 +1 @@
-1847
+1848
diff --git a/src/ikarus-symbol-table.c b/src/ikarus-symbol-table.c
index 32e32dd..51f3e42 100644
--- a/src/ikarus-symbol-table.c
+++ b/src/ikarus-symbol-table.c
@@ -52,7 +52,7 @@ compute_hash(ikptr str){
   h = h + (h << 3);
   h = h ^ (h >> 11);
   h = h + (h << 15);
-  return h;
+  return (h >= 0) ? h : (1 - h);
 }
 
 ikptr