Changeset 4870 for src/Pugs/Prim/Match.hs

Timestamp:

06/20/05 16:10:43 (3 years ago)

Author:

autrijus

svk:copy_cache_prev:

6641

Message:

* clean some warnings

Files:

• src/Pugs/Prim/Match.hs (modified) (1 diff)

src/Pugs/Prim/Match.hs

@@ -179 +179 @@
 
 rxSplit_n :: VRule -> String -> Int -> Eval [Val]
-rxSplit_n _ [] n = return []
+rxSplit_n _ [] _ = return []
 rxSplit_n rx str n = do
     match <- str `doMatch` rx