Missed a spot in parse.scm: MAKE-EQV-HASH-TABLE is deprecated.

Use MAKE-STRONG-EQV-HASH-TABLE here; the keys are numbers anyway.

diff --git a/src/runtime/parse.scm b/src/runtime/parse.scm
index fb7ea645e76236437ec61b26a9937d4febcd94da..c6bd61d91a77b08b0eb984a02e643dede30e04fe 100644 (file)
--- a/src/runtime/parse.scm
+++ b/src/runtime/parse.scm
@@ -725,7 +725,7 @@ USA.
             (error:illegal-char char))))))
 
 (define (make-shared-objects)
-  (make-eqv-hash-table))
+  (make-strong-eqv-hash-table))
 
 (define (save-shared-object! db n object)
   (let ((table (db-shared-objects db)))