Added STRING->CHAR-SET.

diff --git a/v7/doc/ref-manual/scheme.texinfo b/v7/doc/ref-manual/scheme.texinfo
index 3215c8fe837db0bf3bede8bc7463e49456f6e10f..ebd252015f49966f585148ce8bda5217c1268d72 100644 (file)
--- a/v7/doc/ref-manual/scheme.texinfo
+++ b/v7/doc/ref-manual/scheme.texinfo
@@ -2,7 +2,7 @@
 @iftex
 @finalout
 @end iftex
-@comment $Id: scheme.texinfo,v 1.54 1995/10/31 00:51:52 adams Exp $
+@comment $Id: scheme.texinfo,v 1.55 1995/11/07 04:45:28 adams Exp $
 @comment %**start of header (This is for running Texinfo on a region.)
 @setfilename scheme
 @settitle MIT Scheme Reference
@@ -5338,6 +5338,11 @@ of @sc{ascii} characters.  This is equivalent to @code{(apply char-set
 @var{chars})}.
 @end deffn
 
+@deffn {procedure+} string->char-set string
+Returns a character set consisting of all the characters that occur in
+@var{string}.
+@end deffn
+
 @deffn {procedure+} ascii-range->char-set lower upper
 @var{Lower} and @var{upper} must be exact non-negative integers
 representing @sc{ascii} character codes, and @var{lower} must be less