*** empty log message ***

original commit: 35635a78f06d67efc23c84e6dcbd96315ca9bc73
20 years ago · 5b78d5815c
parent d7df17ee88
commit 5b78d5815c
1 changed files with 2 additions and 2 deletions
--- a/collects/parser-tools/private-lex/re.ss
+++ b/collects/parser-tools/private-lex/re.ss
@ -11,7 +11,7 @@
           orR-res andR-res negR-re
           re-nullable? re-index)
-  (define max-char-num #x7FFFFFFF)
+  (define max-char-num #x10FFFF)
  ;; get-index : -> nat
  (define get-index (make-counter))
@ -384,4 +384,4 @@
               (isc (is:make-range 0)))
              )
-  )
+  )