changeset 40132 | 7ee65dbffa31 |
parent 39616 | 8052101883c3 |
child 40642 | 99c6ce92669b |
--- a/src/Pure/Isar/proof.ML Mon Oct 25 20:24:13 2010 +0200 +++ b/src/Pure/Isar/proof.ML Mon Oct 25 21:06:56 2010 +0200 @@ -972,7 +972,7 @@ if ! testing then () else Proof_Display.print_results int ctxt res; fun print_rule ctxt th = if ! testing then rule := SOME th - else if int then priority (Proof_Display.string_of_rule ctxt "Successful" th) + else if int then Output.urgent_message (Proof_Display.string_of_rule ctxt "Successful" th) else (); val test_proof = try (local_skip_proof true)