mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-10 03:03:47 -08:00
Code Issues Projects Releases Packages Wiki Activity

Extended strings were not properly hashed.

Browse source
This commit is contained in:
jgarcia 2006-11-10 21:01:09 +00:00
parent 340de87eae
commit 38cb221455
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/c/hash.d
View file

@ -222,6 +222,9 @@ _hash_equalp(int depth, cl_hashkey h, cl_object x)
}
h = _hash_equalp(depth, h, CAR(x));
return _hash_equalp(depth, h, CDR(x));
#ifdef ECL_UNICODE
case t_string:
#endif
case t_base_string:
case t_vector:
case t_bitvector: