From cac9adb1a32e6bf27148ef6138aebbde500861ba Mon Sep 17 00:00:00 2001 From: Enrico Tassi Date: Mon, 10 Jul 2006 17:18:12 +0000 Subject: [PATCH] ... --- components/binaries/tptp2grafite/main.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/binaries/tptp2grafite/main.ml b/components/binaries/tptp2grafite/main.ml index 786ff7e75..980f2b456 100644 --- a/components/binaries/tptp2grafite/main.ml +++ b/components/binaries/tptp2grafite/main.ml @@ -292,7 +292,7 @@ let _ = let pres_term = TermContentPres.pp_ast content_term in let dummy_tbl = Hashtbl.create 1 in let markup = CicNotationPres.render dummy_tbl pres_term in - let s = BoxPp.render_to_string width markup in + let s = BoxPp.render_to_string List.hd width markup in Pcre.substitute ~pat:"\\\\forall [Ha-z][a-z0-9_]*" ~subst:(fun x -> "\n" ^ x) s in -- 2.39.2