src/Pure/Isar/local_theory.ML
changeset 72502 ff181cd78bb7
parent 72451 e51f1733618d
child 72505 974071d873ba
--- a/src/Pure/Isar/local_theory.ML	Thu Oct 22 08:39:08 2020 +0200
+++ b/src/Pure/Isar/local_theory.ML	Thu Oct 22 11:37:19 2020 +0000
@@ -361,7 +361,7 @@
 
 val exit_of = #exit o bottom_of;
 
-fun exit lthy = exit_of lthy lthy;
+fun exit lthy = exit_of lthy (assert_bottom lthy);
 val exit_global = Proof_Context.theory_of o exit;
 
 fun exit_result decl (x, lthy) =