From: Taylor R Campbell <campbell@mumble.net>
Date: Fri, 4 Jan 2019 05:08:58 +0000 (+0000)
Subject: Integrate string.scm operations in symbol.scm.
X-Git-Tag: mit-scheme-pucked-10.1.9~3^2~37
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=d1b04fe07a1072d457ba75ea760ad25c3610fa3f;p=mit-scheme.git

Integrate string.scm operations in symbol.scm.

Integrating, e.g., cp1-ref makes a huge difference.
---

diff --git a/src/runtime/symbol.scm b/src/runtime/symbol.scm
index 68edf4ba4..c5dac7dc7 100644
--- a/src/runtime/symbol.scm
+++ b/src/runtime/symbol.scm
@@ -28,6 +28,7 @@ USA.
 ;;; package: (runtime symbol)
 
 (declare (usual-integrations))
+(declare (integrate-external "string"))
 
 (declare (integrate-operator symbol?))
 (define (symbol? object)