Use MAKE-STRONG-EQV-HASH-TABLE for Swank inspector parts.

Don't use deprecated MAKE-EQV-HASH-TABLE.

Keys are numbers anyway, so this may as well be strong.

diff --git a/src/runtime/swank.scm b/src/runtime/swank.scm
index d1ad53f578c8b743599708aa62dd51b15cbf291b..d52c2489ded80b603ab1c3f5062f83e7c23a8c46 100644 (file)
--- a/src/runtime/swank.scm
+++ b/src/runtime/swank.scm
@@ -759,7 +759,7 @@ swank:xref
 (define (inspect-object o)
   (let ((previous istate)
        (content (inspect o))
-       (parts (make-eqv-hash-table)))
+       (parts (make-strong-eqv-hash-table)))
     (set! istate (make-istate o parts #f previous content))
     (if previous (set-istate-next! previous istate))
     (istate->elisp istate)))