From 88909c92cad0044dac83539b2b3d385242ed851e Mon Sep 17 00:00:00 2001 From: serpyc Date: Sun, 4 Oct 2009 10:40:03 +0000 Subject: Removal of trailing spaces. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12371 85f007b7-540e-0410-9357-904b9bb8a0f7 --- ide/coq.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'ide') diff --git a/ide/coq.ml b/ide/coq.ml index d75a996ef7..eb410b1e32 100644 --- a/ide/coq.ml +++ b/ide/coq.ml @@ -423,7 +423,7 @@ let record_interp cmd_stk start_of_sentence end_of_sentence (sn,pp,psd) = } cmd_stk let backtrack cmd_stack stop_cond = - if Stack.is_empty cmd_stack then + if Stack.is_empty cmd_stack then reset_initial () (* reset coq *) else try let current = Stack.top cmd_stack in -- cgit v1.2.3