From 39fd31f1f7afd6a0d50455aeedb23798e77070eb Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Sun, 18 Nov 2018 18:44:24 -0800
Subject: [PATCH] Move string-for-primitive to (runtime).

---
 src/edwin/edwin.pkg     | 1 +
 src/runtime/runtime.pkg | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/edwin/edwin.pkg b/src/edwin/edwin.pkg
index a1a03839e..4623e638d 100644
--- a/src/edwin/edwin.pkg
+++ b/src/edwin/edwin.pkg
@@ -104,6 +104,7 @@ USA.
   (parent ())
   (import (runtime)
 	  define-primitives
+	  string-for-primitive
 	  ucode-primitive
 	  ucode-type)
   (import (runtime char-syntax)
diff --git a/src/runtime/runtime.pkg b/src/runtime/runtime.pkg
index 0a8d87041..7ee5cadbd 100644
--- a/src/runtime/runtime.pkg
+++ b/src/runtime/runtime.pkg
@@ -1092,7 +1092,6 @@ USA.
 	  string-find-previous-char-in-set
 	  string-foldcase
 	  string-for-each
-	  string-for-primitive		;export to (runtime) after 9.3
 	  string-hash			;SRFI-69
 	  string-ci-hash		;SRFI-69
 	  string-head
@@ -1141,6 +1140,8 @@ USA.
 	  substring
 	  substring?
 	  vector->string)
+  (export (runtime)
+	  string-for-primitive)
   (export (runtime symbol)
 	  %ascii-ustring!
 	  %ascii-ustring-allocate
-- 
2.25.1