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 ****)