Export STRING->CHAR-SET, added in 1995 but obviously never used.

diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg
index b64c104d7c037681ed86dcc08d938462a8c38c5a..5b9e4d721e73f6e8a376e19d2a20d4ea9ea6692b 100644 (file)
--- a/v7/src/runtime/runtime.pkg
+++ b/v7/src/runtime/runtime.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: runtime.pkg,v 14.294 1998/03/04 21:15:10 cph Exp $
+$Id: runtime.pkg,v 14.295 1998/03/09 03:44:11 cph Exp $
 
 Copyright (c) 1988-98 Massachusetts Institute of Technology
 
@@ -325,7 +325,8 @@ MIT in each case. |#
          char-upper-case?
          char-whitespace?
          chars->char-set
-         predicate->char-set)
+         predicate->char-set
+         string->char-set)
   (initialization (initialize-package!)))
 
 (define-package (runtime compiler-info)

diff --git a/v8/src/runtime/runtime.pkg b/v8/src/runtime/runtime.pkg
index 0eb61dd9de9bacf1e4241fc4b02f26da7c9ee5fb..affa4fcfaeb862ad1084fec2c6e10c7cf5306e79 100644 (file)
--- a/v8/src/runtime/runtime.pkg
+++ b/v8/src/runtime/runtime.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: runtime.pkg,v 14.300 1998/03/04 21:15:17 cph Exp $
+$Id: runtime.pkg,v 14.301 1998/03/09 03:44:18 cph Exp $
 
 Copyright (c) 1988-98 Massachusetts Institute of Technology
 
@@ -325,7 +325,8 @@ MIT in each case. |#
          char-upper-case?
          char-whitespace?
          chars->char-set
-         predicate->char-set)
+         predicate->char-set
+         string->char-set)
   (initialization (initialize-package!)))
 
 (define-package (runtime compiler-info)