Mercurial Mercurial > repos > isabelle / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | gz | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
clarified context;
authorwenzelm
Tue, 28 Jul 2015 18:57:47 +0200
changeset 60816 92913f915e3d
parent 60815 c93a83472eab
child 60817 3f38ed5a02c1
clarified context;
src/Pure/Isar/class.ML file | annotate | diff | comparison | revisions 
--- a/src/Pure/Isar/class.ML	Tue Jul 28 18:57:10 2015 +0200
+++ b/src/Pure/Isar/class.ML	Tue Jul 28 18:57:47 2015 +0200
@@ -748,7 +748,7 @@
 
 fun intro_classes_tac ctxt facts st =
   let
-    val thy = Thm.theory_of_thm st;
+    val thy = Proof_Context.theory_of ctxt;
     val classes = Sign.all_classes thy;
     val class_trivs = map (Thm.class_triv thy) classes;
     val class_intros = map_filter (try (#intro o Axclass.get_info thy)) classes;
isabelle