--- a/src/HOL/Tools/Sledgehammer/sledgehammer_mash.ML Fri Aug 01 14:43:57 2014 +0200
+++ b/src/HOL/Tools/Sledgehammer/sledgehammer_mash.ML Fri Aug 01 14:43:57 2014 +0200
@@ -814,7 +814,7 @@
{comment = "Goal: " ^ goal_name, state = Proof.init ctxt, goal = goal, subgoal = 1,
subgoal_count = 1, factss = [("", facts)]}
in
- get_minimizing_prover ctxt MaSh (K ()) prover params (K (K (K ""))) problem
+ get_minimizing_prover ctxt MaSh (K ()) prover params problem
end
val bad_types = [@{type_name prop}, @{type_name bool}, @{type_name fun}]