From a885a2148e4d45606c654145db5d859c4d6a223b Mon Sep 17 00:00:00 2001
From: herbelin
Date: Sat, 12 Jun 2010 15:30:28 +0000
Subject: Fixing spelling: pr_coma -> pr_comma

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13119 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 dev/top_printers.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'dev')

diff --git a/dev/top_printers.ml b/dev/top_printers.ml
index d1893005dc..286f596e45 100644
--- a/dev/top_printers.ml
+++ b/dev/top_printers.ml
@@ -68,7 +68,7 @@ let prset pr l = str "[" ++ hov 0 (prlist_with_sep spc pr l) ++ str "]"
 let ppintset l = pp (prset int (Intset.elements l))
 let ppidset l = pp (prset pr_id (Idset.elements l))
 
-let prset' pr l = str "[" ++ hov 0 (prlist_with_sep pr_coma pr l) ++ str "]"
+let prset' pr l = str "[" ++ hov 0 (prlist_with_sep pr_comma pr l) ++ str "]"
 let ppidmap pr l =
   let pr (id,b) = pr_id id ++ str "=>" ++ pr id b in
   pp (prset' pr (Idmap.fold (fun a b l -> (a,b)::l) l []))
-- 
cgit v1.2.3