From: Chris Hanson <org/chris-hanson/cph>
Date: Fri, 27 Jan 2017 00:30:13 +0000 (-0800)
Subject: Eliminate incorrect registration of legacy-string?.
X-Git-Tag: mit-scheme-pucked-9.2.12~227^2~73
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=5be39accfb6af3e69bac5bae07eb70f073da3014;p=mit-scheme.git

Eliminate incorrect registration of legacy-string?.
---

diff --git a/src/runtime/predicate-metadata.scm b/src/runtime/predicate-metadata.scm
index 7653fc7cd..9f1a037db 100644
--- a/src/runtime/predicate-metadata.scm
+++ b/src/runtime/predicate-metadata.scm
@@ -321,7 +321,6 @@ USA.
    (register-predicate! interned-symbol? 'interned-symbol '<= symbol?)
    (register-predicate! keyword? 'keyword '<= symbol?)
    (register-predicate! lambda-tag? 'lambda-tag)
-   (register-predicate! legacy-string? 'legacy-string)
    (register-predicate! named-structure? 'named-structure)
    (register-predicate! population? 'population)
    (register-predicate! promise? 'promise)