From b069aa8d6db23269f0c4f250f271411c2a26fcda Mon Sep 17 00:00:00 2001 From: herbelin Date: Thu, 21 Mar 2013 19:12:46 +0000 Subject: Typo dans message d'erreur (obligations). git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16336 85f007b7-540e-0410-9357-904b9bb8a0f7 --- toplevel/obligations.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/toplevel/obligations.ml b/toplevel/obligations.ml index a48e32bb22..6b8780cda6 100644 --- a/toplevel/obligations.ml +++ b/toplevel/obligations.ml @@ -470,7 +470,7 @@ let close sec = errorlabstrm "Program" (str "Unsolved obligations when closing " ++ str sec ++ str":" ++ spc () ++ prlist_with_sep spc (fun x -> Nameops.pr_id x) keys ++ - (str (if Int.equal (List.length keys) 1 then " has " else "have ") ++ + (str (if Int.equal (List.length keys) 1 then " has " else " have ") ++ str "unsolved obligations")) let input : program_info ProgMap.t -> obj = -- cgit v1.2.3