summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--libguile/symbols.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/symbols.c b/libguile/symbols.c
index 78c819399..6d9a1c8cc 100644
--- a/libguile/symbols.c
+++ b/libguile/symbols.c
@@ -76,7 +76,7 @@ scm_strhash (str, len, n)
scm_sizet i = 5;
unsigned long h = 264 % n;
while (i--)
- h = ((h << 8) + ((unsigned) (scm_downcase[str[h % len]]))) % n;
+ h = ((h << 8) + ((unsigned) (scm_downcase (str[h % len])))) % n;
return h;
}
else
@@ -84,7 +84,7 @@ scm_strhash (str, len, n)
scm_sizet i = len;
unsigned long h = 0;
while (i)
- h = ((h << 8) + ((unsigned) (scm_downcase[str[--i]]))) % n;
+ h = ((h << 8) + ((unsigned) (scm_downcase (str[--i])))) % n;
return h;
}
}