From cabd0752c11d2c92dde1af64634c9b2e30a5d644 Mon Sep 17 00:00:00 2001
From: letouzey
Date: Mon, 5 Nov 2007 13:49:05 +0000
Subject: For debugging with coqtop.byte with ocaml 3.10, the toplevel should
 be made with -rectypes

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10288 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 scripts/coqmktop.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'scripts')

diff --git a/scripts/coqmktop.ml b/scripts/coqmktop.ml
index 5d35298e8a..77f9b0e53b 100644
--- a/scripts/coqmktop.ml
+++ b/scripts/coqmktop.ml
@@ -245,7 +245,8 @@ let declare_loading_string () =
   else if not !top then
     "Mltop.set Mltop.WithoutTop;;\n"
   else
-    "let ppf = Format.std_formatter;;
+    "Clflags.recursive_types:=true;;
+     let ppf = Format.std_formatter;;
      Mltop.set (Mltop.WithTop
        {Mltop.load_obj=Topdirs.dir_load ppf;
         Mltop.use_file=Topdirs.dir_use ppf;
-- 
cgit v1.2.3