diff options
| author | vgross | 2010-03-23 11:13:20 +0000 |
|---|---|---|
| committer | vgross | 2010-03-23 11:13:20 +0000 |
| commit | 64e5ee718e55e13473bd3103a9535aa76ec4c63d (patch) | |
| tree | dc91b135c577428f9a7c7993a8cff0e304c97adf /ide | |
| parent | 02ed958938e9d0cdf4dd12d79965ed060a48d351 (diff) | |
Fix bug in backtracking.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12876 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide')
| -rw-r--r-- | ide/coq.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ide/coq.ml b/ide/coq.ml index ac978e4cfa..4c5179edd5 100644 --- a/ide/coq.ml +++ b/ide/coq.ml @@ -461,7 +461,7 @@ struct List.iter (fun cmd -> let str = (if value then "Set" else "Unset") ^ " Printing " ^ cmd ^ "." in - Vernac.eval_ctrl (snd (Vernac.parse_sentence (parsable_of_string str,None)))) + Vernac.eval_expr (Vernac.parse_sentence (parsable_of_string str,None))) opt let enforce_hack () = Hashtbl.iter set state_hack |