src/HOL/Tools/Nitpick/nitpick.ML
changeset 47564 8074b18d8d76
parent 47562 a72239723ae8
child 47670 24babc4b1925
--- 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