From cd8a4c901268ddff7102525c3b5674b85f8892c1 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Mon, 9 Mar 1998 03:44:18 +0000 Subject: [PATCH] Export STRING->CHAR-SET, added in 1995 but obviously never used. --- v7/src/runtime/runtime.pkg | 5 +++-- v8/src/runtime/runtime.pkg | 5 +++-- 2 files changed, 6 insertions(+), 4 deletions(-) diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg index b64c104d7..5b9e4d721 100644 --- 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 0eb61dd9d..affa4fcfa 100644 --- 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) -- 2.25.1