diff --git a/src/racket/src/read.c b/src/racket/src/read.c index 0b797a49a5..fdce75a1f6 100644 --- a/src/racket/src/read.c +++ b/src/racket/src/read.c @@ -2181,7 +2181,7 @@ static Scheme_Object *resolve_references(Scheme_Object *obj, int i; if (scheme_is_hash_tree_equal(obj)) kind = 1; - else if (scheme_is_hash_tree_equal(obj)) + else if (scheme_is_hash_tree_eqv(obj)) kind = 2; else kind = 0;