src/Pure/Proof/proof_rewrite_rules.ML
changeset 26435 bdce320cd426
parent 26424 a6cad32a27b0
child 26463 9283b4185fdf
--- a/src/Pure/Proof/proof_rewrite_rules.ML	Thu Mar 27 15:32:12 2008 +0100
+++ b/src/Pure/Proof/proof_rewrite_rules.ML	Thu Mar 27 15:32:15 2008 +0100
@@ -187,7 +187,7 @@
   in rew' end;
 
 fun rprocs b = [("Pure/meta_equality", rew b)];
-val _ = Context.add_setup (fold Proofterm.add_prf_rproc (rprocs false));
+val _ = Context.>> (fold Proofterm.add_prf_rproc (rprocs false));
 
 
 (**** apply rewriting function to all terms in proof ****)