aboutsummaryrefslogtreecommitdiffhomepage
path: root/translate
diff options
context:
space:
mode:
authorGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2003-12-01 11:45:28 +0000
committerGravatar herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7>2003-12-01 11:45:28 +0000
commitf6558c8600a9a4c110141655cc3e414290b4bc22 (patch)
tree606e72df63cb13db7d393a8f35ed9eb8ff3ae269 /translate
parentd481f9ae997edb7ae0f048ff4295c14750b4e423 (diff)
Bug traduction clearbody
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5045 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'translate')
-rw-r--r--translate/pptacticnew.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/translate/pptacticnew.ml b/translate/pptacticnew.ml
index bad3ac90f..327ec7d08 100644
--- a/translate/pptacticnew.ml
+++ b/translate/pptacticnew.ml
@@ -568,7 +568,7 @@ and pr_atom1 env = function
| TacClear l ->
hov 1 (str "clear" ++ spc () ++ prlist_with_sep spc pr_ident l)
| TacClearBody l ->
- hov 1 (str "clear" ++ spc () ++ prlist_with_sep spc pr_ident l)
+ hov 1 (str "clearbody" ++ spc () ++ prlist_with_sep spc pr_ident l)
| TacMove (b,id1,id2) ->
(* Rem: only b = true is available for users *)
assert b;