From: Taylor R Campbell <campbell@mumble.net>
Date: Sun, 22 May 2011 21:09:16 +0000 (+0000)
Subject: Missed a spot in parse.scm: MAKE-EQV-HASH-TABLE is deprecated.
X-Git-Tag: 20110609-Gtk~1^2~10
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=20701367c918c2194f4cbc1ea0da9bf5b132909f;p=mit-scheme.git

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 fb7ea645e..c6bd61d91 100644
--- 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)))