Changeset 12211 in project

Timestamp:

10/20/08 15:43:35 (12 years ago)

Author:

Alex Shinn

Message:

offby1 error in irregex-match-num-submatches

File:

• chicken/branches/irregular/irregex.scm (modified) (1 diff)

chicken/branches/irregular/irregex.scm

@@ -74 +74 @@
 
 (define (irregex-match-num-submatches m)
-  (quotient (- (vector-length m) 3) 2))
+  (- (quotient (- (vector-length m) 3) 2) 1))
 
 (define (irregex-match-string m)