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