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)