diff options
| author | courtieu | 2006-10-23 07:16:16 +0000 |
|---|---|---|
| committer | courtieu | 2006-10-23 07:16:16 +0000 |
| commit | fe284842ffd97f02bc0954abadc201a7048512b1 (patch) | |
| tree | 3f793b8dacf8c1e696842ae549cd0d8f55dd46da | |
| parent | c3bd434188fcd327999c718b91bfe74ee1afd34f (diff) | |
Add a flush after backtracking x y z and before printing subgoals.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9259 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | toplevel/vernacentries.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index edff6b225e..55a965aee6 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -1020,6 +1020,7 @@ let vernac_backtrack snum pnum naborts = for i = 1 to naborts do vernac_abort None done; undo_todepth pnum; vernac_backto snum; + Pp.flush_all(); (* there may be no proof in progress, even if no abort *) (try print_subgoals () with UserError _ -> ()) |