# HG changeset patch
# User blanchet
# Date 1270113128 -7200
# Node ID 323349b45850d741a003cea1475b44da2462a3bd
# Parent  3a074096f83aca53d18898a8d8dedbac9e118fc0
add missing goal argument

diff -r 3a074096f83a -r 323349b45850 src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML
--- a/src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML	Thu Apr 01 10:54:21 2010 +0200
+++ b/src/HOL/Mirabelle/Tools/mirabelle_sledgehammer.ML	Thu Apr 01 11:12:08 2010 +0200
@@ -391,7 +391,7 @@
       |> Option.map (fst o read_int o explode)
       |> the_default 5
     val params = default_params thy [("minimize_timeout", Int.toString timeout)]
-    val minimize = minimize_theorems params linear_minimize prover prover_name
+    val minimize = minimize_theorems params linear_minimize prover prover_name 1
     val _ = log separator
   in
     case minimize st (these (!named_thms)) of