From cf7660a3a8932ee593a376e8ec7ec251896a72e3 Mon Sep 17 00:00:00 2001 From: ppedrot Date: Fri, 1 Jun 2012 18:03:06 +0000 Subject: Getting rid of Pp.msgnl and Pp.message. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15412 85f007b7-540e-0410-9357-904b9bb8a0f7 --- checker/check_stat.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'checker/check_stat.ml') diff --git a/checker/check_stat.ml b/checker/check_stat.ml index cdb0ade74..1cc47fde3 100644 --- a/checker/check_stat.ml +++ b/checker/check_stat.ml @@ -55,12 +55,12 @@ let print_context env = env_modules=mods; env_modtypes=mtys}; env_stratification= {env_universes=univ; env_engagement=engt}} = env in - msgnl(hov 0 + ppnl(hov 0 (fnl() ++ str"CONTEXT SUMMARY" ++ fnl() ++ str"===============" ++ fnl() ++ fnl() ++ str "* " ++ hov 0 (pr_engt engt ++ fnl()) ++ fnl() ++ str "* " ++ hov 0 (pr_ax csts) ++ - fnl())) + fnl())); pp_flush() end let stats () = -- cgit v1.2.3