fix build?

ocaml · Jan 7, 2016 · 90ae89e · 90ae89e
1 parent 763bb33
commit 90ae89e
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib_test/re_match.ml b/lib_test/re_match.ml
@@ -50,7 +50,7 @@ let check_phone cnt must_print line =
   with Not_found -> ()
 
 let n = if Array.length Sys.argv > 1 then int_of_string Sys.argv.(1) else 1;;
-for _ = 2 to n do
+for _i = 2 to n do
   List.iter (check_phone (ref 1) false) phones
 done;
 List.iter (check_phone (ref 1) true) phones