From 68b1fa3bceffef3c3dfef8b2f041f2e5eb4d3173 Mon Sep 17 00:00:00 2001 From: herbelin Date: Sun, 27 Jan 2013 14:36:36 +0000 Subject: Improving formatting of output of "Test table". git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16159 85f007b7-540e-0410-9357-904b9bb8a0f7 --- pretyping/detyping.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'pretyping') diff --git a/pretyping/detyping.ml b/pretyping/detyping.ml index 545366a70f..2db867fc5c 100644 --- a/pretyping/detyping.ml +++ b/pretyping/detyping.ml @@ -85,7 +85,7 @@ module PrintingCasesIf = PrintingInductiveMake (struct let encode = encode_bool let field = "If" - let title = "Types leading to pretty-printing of Cases using a `if' form: " + let title = "Types leading to pretty-printing of Cases using a `if' form:" let member_message s b = str "Cases on elements of " ++ s ++ str -- cgit v1.2.3