* Removed lots of deprecated stuff.

[bpt/guile.git] / libguile / hash.c

diff --git a/libguile/hash.c b/libguile/hash.c
index 70c1254..3b8fcbc 100644 (file)
--- a/libguile/hash.c
+++ b/libguile/hash.c
@@ -138,7 +138,6 @@ scm_hasher(SCM obj, unsigned long n, size_t d)
        obj = scm_number_to_string (obj, SCM_MAKINUM (10));
       }
     case scm_tc7_string:
-    case scm_tc7_substring:
       return scm_string_hash (SCM_STRING_UCHARS (obj), SCM_STRING_LENGTH (obj)) % n;
     case scm_tc7_symbol:
       return SCM_SYMBOL_HASH (obj) % n;