Update CHAR-CODE-LIMIT and CHAR-INTEGER-LIMIT for wide characters.

This should have been part of the previous update, but these constants
are unused, so no harm done.

diff --git a/v7/src/runtime/char.scm b/v7/src/runtime/char.scm
index 112c8b934c97907b7db32616ec0005e24670d8aa..2302831c69b91429fcc5bdd8b1ebe409adf1aec7 100644 (file)
--- a/v7/src/runtime/char.scm
+++ b/v7/src/runtime/char.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: char.scm,v 14.8 1998/01/20 18:40:24 adams Exp $
+$Id: char.scm,v 14.9 1998/02/13 22:25:32 adams Exp $
 
 Copyright (c) 1988-1998 Massachusetts Institute of Technology
 
@@ -42,9 +42,9 @@ MIT in each case. |#
   make-char char-code char-bits char->integer integer->char char->ascii
   char-ascii? ascii->char char-upcase char-downcase)
 
-(define-integrable char-code-limit #x80)
+(define-integrable char-code-limit #x10000)
 (define-integrable char-bits-limit #x20)
-(define-integrable char-integer-limit #x1000)
+(define-integrable char-integer-limit #x200000)
 
 (define-integrable (chars->ascii chars)
   (map char->ascii chars))