diff --git a/collects/scribble/eval.rkt b/collects/scribble/eval.rkt index 9be73ac8f9..9b5e221d6f 100644 --- a/collects/scribble/eval.rkt +++ b/collects/scribble/eval.rkt @@ -215,7 +215,9 @@ ph ((if (hash-eq? v) make-hasheq-placeholder - make-hash-placeholder) + (if (hash-eqv? v) + make-hasheqv-placeholder + make-hash-placeholder)) a))) ph)] [else v])) diff --git a/collects/scribble/racket.rkt b/collects/scribble/racket.rkt index eb5c38badb..5a14c8b1e6 100644 --- a/collects/scribble/racket.rkt +++ b/collects/scribble/racket.rkt @@ -663,7 +663,7 @@ [(hash? (syntax-e c)) (advance c init-line!) (let ([equal-table? (hash-equal? (syntax-e c))] - [eqv-table? (hash-eq? (syntax-e c))] + [eqv-table? (hash-eqv? (syntax-e c))] [quote-depth (to-quoted c expr? quote-depth out color? inc-src-col)]) (unless (and expr? (zero? quote-depth)) (out (if equal-table?