Commits

Robin Green committed 6cf5efe

Fix issue 3

  • Participants
  • Parent commits 57684ed

Comments (0)

Files changed (1)

File Data/Text/ICU/Regex/Pure.hs

 grouping n (Match m _) act = unsafePerformIO $ do
   count <- IO.groupCount m
   let n' = fromIntegral n
-  if n' == 0 || (n' >= 0 && n' < count)
+  if n' == 0 || (n' >= 0 && n' <= count)
     then Just `fmap` act m
     else return Nothing