Fix case conversion tables for high ISO-8859-1 characters so that they
authorTaylor R. Campbell <net/mumble/campbell>
Fri, 29 Dec 2006 04:32:43 +0000 (04:32 +0000)
committerTaylor R. Campbell <net/mumble/campbell>
Fri, 29 Dec 2006 04:32:43 +0000 (04:32 +0000)
are not reversed.

v7/src/runtime/char.scm

index c61fb8f4e8c29322fe76254d1c5dc43335cf3df6..ea656bfb0846a16f78856384d71cb37e96ec5dde 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: char.scm,v 14.27 2006/10/24 04:08:46 cph Exp $
+$Id: char.scm,v 14.28 2006/12/29 04:32:43 riastradh Exp $
 
 Copyright 1986,1987,1988,1991,1995,1997 Massachusetts Institute of Technology
 Copyright 1998,2001,2003,2004,2005,2006 Massachusetts Institute of Technology
@@ -202,8 +202,8 @@ USA.
             (vector-8b-set! downcase-table i j)
             (vector-8b-set! upcase-table j i)))))
     (case-range 65 90 97)
-    (case-range 224 246 192)
-    (case-range 248 254 216)))
+    (case-range 192 214 224)
+    (case-range 216 222 248)))
 \f
 (define 0-code)
 (define upper-a-code)