diff options
| author |  notin <notin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-01-29 10:31:39 +0000 |
|---|---|---|
| committer | notin <notin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-01-29 10:31:39 +0000 |
| commit | b608b4ab69d0d4a2f2fc057877b582ffede45ed6 (patch) | |
| tree | 15b6e9bedf62efcae2456258cd7a97844b36ed5a /contrib | |
| parent | a0af66569dd69c082979452d7f21b3262b6f54f7 (diff) | |
Correction du bug #1785
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10478 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/rtauto/refl_tauto.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/rtauto/refl_tauto.ml b/contrib/rtauto/refl_tauto.ml index b0e6b6ecf..6cde1ddcf 100644 --- a/contrib/rtauto/refl_tauto.ml +++ b/contrib/rtauto/refl_tauto.ml @@ -292,7 +292,7 @@ let rtauto_tac gls= let prf = try project (search_fun (init_state [] formula)) with Not_found -> - errorlabstrm "rtauto" (Pp.str "rtauto could'nt find any proof") in + errorlabstrm "rtauto" (Pp.str "rtauto couldn't find any proof") in let search_end_time = System.get_time () in let _ = if !verbose then begin |