moved to pkg-ocaml-maint

[helm.git] / components / tactics / autoTypes.ml

diff --git a/components/tactics/autoTypes.ml b/components/tactics/autoTypes.ml
index b0833c947e03f61fc75a20a12c96081c173a0ac7..874a20dccf4b366bda48cae857dbf6744a2702f6 100644 (file)
--- a/components/tactics/autoTypes.ml
+++ b/components/tactics/autoTypes.ml
@@ -27,24 +27,29 @@ type flags = {
   maxwidth: int;
   maxsize: int;
   maxdepth: int;
+  maxgoalsizefactor : int;
   timeout: float;
   use_library: bool;
   use_paramod: bool;
   use_only_paramod : bool;
   close_more : bool; 
   dont_cache_failures: bool;
+  do_types: bool;
 }
 
 let default_flags _ =
   {maxwidth=3;
    maxdepth=3;
    maxsize = 6;
+   maxgoalsizefactor = max_int;
    timeout=Unix.gettimeofday() +.3.0;
    use_library=false;
    use_paramod=true;
    use_only_paramod=false;
    close_more=false; 
-   dont_cache_failures=false}
+   dont_cache_failures=false;
+   do_types=false;
+}
 ;;
 
 (* (metasenv, subst, (metano,depth)list *)