From 41e8b10e647ec18af0d427f76fd7b8db84fff68d Mon Sep 17 00:00:00 2001
From: Jeremie Dimino <jeremie@dimino.org>
Date: Tue, 31 Jul 2012 16:53:22 +0200
Subject: [PATCH] add Toploop and Topmain manually to the list of modules to
 keep

Ignore-this: c300c14dfd007c9ab16616c7be150466

darcs-hash:20120731145322-c41ad-584b36703d3e719d8e0e5acefb276a6a40201e1a
---
 myocamlbuild.ml | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/myocamlbuild.ml b/myocamlbuild.ml
index b6bc79b..05da762 100644
--- a/myocamlbuild.ml
+++ b/myocamlbuild.ml
@@ -89,6 +89,9 @@ let () =
                            (Array.to_list (Pathname.readdir directory)))
                       directories StringSet.empty
                   in
+                  (* These are not in the stdlib path since 4.00 *)
+                  let modules = StringSet.add "Toploop" modules in
+                  let modules = StringSet.add "Topmain" modules in
                   Cmd (S [A (stdlib / "expunge");
                           A (env "%.top");
                           A (env "%.byte");