/[guile]/guile/guile-core/libguile/hash.c
ViewVC logotype

Diff of /guile/guile-core/libguile/hash.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.47 by ttn, Thu Mar 14 03:47:42 2002 UTC revision 1.48 by xxhanwen, Sat Jul 20 14:08:33 2002 UTC
# Line 145  scm_hasher(SCM obj, unsigned long n, siz Line 145  scm_hasher(SCM obj, unsigned long n, siz
145      case scm_tc7_vector:      case scm_tc7_vector:
146        {        {
147          size_t len = SCM_VECTOR_LENGTH(obj);          size_t len = SCM_VECTOR_LENGTH(obj);
148          SCM *data = SCM_VELTS(obj);          SCM const *data = SCM_VELTS(obj);
149          if (len > 5)          if (len > 5)
150            {            {
151              size_t i = d/2;              size_t i = d/2;

Legend:
Removed from v.1.47  
changed lines
  Added in v.1.48

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26