author | haftmann |
Sat, 15 Mar 2008 08:11:17 +0100 | |
changeset 26276 | 3386bb568550 |
parent 26275 | 014d93dc2199 |
child 26277 | 461e11226111 |
--- a/src/Pure/Isar/subclass.ML Sat Mar 15 08:11:16 2008 +0100 +++ b/src/Pure/Isar/subclass.ML Sat Mar 15 08:11:17 2008 +0100 @@ -37,7 +37,7 @@ |> ObjectLogic.ensure_propT thy; fun after_qed thm = LocalTheory.theory (Class.prove_subclass (sub, sup) thm) - #> LocalTheory.reinit; + #> (TheoryTarget.init (SOME sub) o ProofContext.theory_of); in do_proof after_qed sublocale_prop lthy end;