Commit ddc87233 authored by Bruno Guillaume's avatar Bruno Guillaume

max_rules

parent e927dd12
......@@ -106,8 +106,7 @@ module Grew_args = struct
| "-html" :: args -> html := true; loop args
| "-timeout" :: f :: args -> timeout := Some (float_of_string f); Rewrite.set_timeout (Some (float_of_string f)); loop args
| "-max_depth_det" :: i :: args -> Log.warning "max_depth_det not implemented, skip the arg"; loop args
| "-max_depth_non_det" :: i :: args -> Log.warning "max_depth_non_det not implemented, skip the arg"; loop args
| "-max_rules" :: i :: args -> Rewrite.set_max_rules (int_of_string i); loop args
| "-quiet" :: args -> quiet := true; loop args
| "-cupt" :: args -> cupt := true; loop args
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment