revert code that was submitted by mistake
authorblanchet
Wed, 21 Jul 2010 21:15:49 +0200
changeset 37927 29cacb2c2184
parent 37926 e6ff246c0cdb
child 37928 24785fa2416c
revert code that was submitted by mistake
src/HOL/Tools/Sledgehammer/metis_tactics.ML
--- a/src/HOL/Tools/Sledgehammer/metis_tactics.ML	Wed Jul 21 21:15:07 2010 +0200
+++ b/src/HOL/Tools/Sledgehammer/metis_tactics.ML	Wed Jul 21 21:15:49 2010 +0200
@@ -801,8 +801,7 @@
 
 fun method name mode =
   Method.setup name (Attrib.thms >> (fn ths => fn ctxt =>
-      METHOD (fn facts => HEADGOAL (CHANGED_PROP
-                                 o generic_metis_tac mode ctxt (facts @ ths)))))
+    SIMPLE_METHOD' (CHANGED_PROP o generic_metis_tac mode ctxt ths)))
 
 val setup =
   type_lits_setup