src/Tools/try.ML
changeset 52644 cea207576f81
parent 52641 c56b6fa636e8
child 52645 e8c1c5612677
--- a/src/Tools/try.ML	Sat Jul 13 13:25:42 2013 +0200
+++ b/src/Tools/try.ML	Sat Jul 13 13:58:13 2013 +0200
@@ -130,7 +130,7 @@
                     (try o TimeLimit.timeLimit (seconds auto_time_limit))
                       (fn () => tool true state) () of
                     SOME (true, (_, state')) =>
-                      Pretty.writeln (Pretty.chunks (Proof.pretty_goal_messages state'))
+                      List.app Pretty.writeln (Proof.pretty_goal_messages state')
                   | _ => ())
               | NONE => ())
             else ()