From c965536804526040f5101198d161ce5a85d3c402 Mon Sep 17 00:00:00 2001 From: mainzelm Date: Thu, 23 Mar 2006 07:59:14 +0000 Subject: [PATCH] Cover 8 bits instead of 7 when converting from char-sets to regexps. --- scsh/rx/parse.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scsh/rx/parse.scm b/scsh/rx/parse.scm index 985e91c..bc8eda3 100644 --- a/scsh/rx/parse.scm +++ b/scsh/rx/parse.scm @@ -709,7 +709,7 @@ . ,ranges)))) (values loose ranges))))) - (let lp ((i 127) (from #f) (to #f) (loose '()) (ranges '())) + (let lp ((i 255) (from #f) (to #f) (loose '()) (ranges '())) (if (< i 0) (add-range from to loose ranges)