author | blanchet |
Wed, 18 Apr 2012 23:13:10 +0200 | |
changeset 47564 | 8074b18d8d76 |
parent 47563 | 01f687b84aff |
child 47565 | 762eb0dacaa6 |
--- a/src/HOL/Tools/Nitpick/nitpick.ML Wed Apr 18 22:40:25 2012 +0200 +++ b/src/HOL/Tools/Nitpick/nitpick.ML Wed Apr 18 23:13:10 2012 +0200 @@ -693,7 +693,7 @@ | pretties => pstrs " for " @ pretties) @ [Pretty.str ":\n"])), Pretty.indent indent_size reconstructed_model]); - print_t (fn () => "% SZS output stop"); + print_t (K "% SZS output end FiniteModel"); if genuine then (if check_genuine andalso standard then case prove_hol_model scope tac_timeout free_names sel_names