Fixes minor bugs 173386 and 173381: added typecast and chmod.

2007-12-01 23:54:44 -05:00 · 2007-12-01 23:54:44 -05:00 · 68852b48e4
parent fd3b347f1a
commit 68852b48e4
3 changed files with 2 additions and 2 deletions
--- a/scheme/ikarus.enumerations.ss
+++ b/scheme/ikarus.enumerations.ss
--- a/scheme/last-revision
+++ b/scheme/last-revision
@ -1 +1 @@
-1163
+1164
--- a/src/ikarus-symbol-table.c
+++ b/src/ikarus-symbol-table.c
@ -53,7 +53,7 @@ compute_hash(ikp str){

 ikp 
 ikrt_string_hash(ikp str){
-  return compute_hash(str) & (~ fx_mask);
+  return (ikp)(compute_hash(str) & (~ fx_mask));
 }

 static int strings_eqp(ikp str1, ikp str2){