From 39d18c9541eea6b8b3eb96d04b6783f254e572e1 Mon Sep 17 00:00:00 2001
From: Rudi Grinberg <rudi.grinberg@gmail.com>
Date: Mon, 6 Nov 2017 18:33:48 +0800
Subject: [PATCH] Enable -safe-string everywhere

Useful for testing on OCaml < 4.06.0
---
 examples/custom-utop/jbuild | 1 +
 examples/interact/jbuild    | 1 +
 src/lib/jbuild              | 1 +
 src/top/expunge/jbuild      | 1 +
 src/top/jbuild              | 1 +
 5 files changed, 5 insertions(+)

diff --git a/examples/custom-utop/jbuild b/examples/custom-utop/jbuild
index c19d49d..3da432d 100644
--- a/examples/custom-utop/jbuild
+++ b/examples/custom-utop/jbuild
@@ -2,5 +2,6 @@
 
 (executable
  ((name myutop)
+  (flags (:standard -safe-string))
   (link_flags (-linkall))
   (libraries (utop))))
diff --git a/examples/interact/jbuild b/examples/interact/jbuild
index 68e1edd..abe396f 100644
--- a/examples/interact/jbuild
+++ b/examples/interact/jbuild
@@ -2,5 +2,6 @@
 
 (executable
  ((name test_program)
+  (flags (:standard -safe-string))
   (link_flags (-linkall))
   (libraries (utop))))
diff --git a/src/lib/jbuild b/src/lib/jbuild
index a2d849b..62139eb 100644
--- a/src/lib/jbuild
+++ b/src/lib/jbuild
@@ -4,6 +4,7 @@
  ((name uTop)
   (public_name utop)
   (wrapped false)
+  (flags (:standard -safe-string))
   (modes (byte))
   (libraries (compiler-libs.toplevel findlib.top lambda-term threads))
   (preprocess (action (run ${bin:cppo} -V OCAML:${ocaml_version} ${<})))))
diff --git a/src/top/expunge/jbuild b/src/top/expunge/jbuild
index d41a15b..0080610 100644
--- a/src/top/expunge/jbuild
+++ b/src/top/expunge/jbuild
@@ -2,4 +2,5 @@
 
 (executable
  ((name expunge)
+  (flags (:standard -safe-string))
   (libraries (unix))))
diff --git a/src/top/jbuild b/src/top/jbuild
index ff6a8c2..d58293a 100644
--- a/src/top/jbuild
+++ b/src/top/jbuild
@@ -3,6 +3,7 @@
 (executables
  ((names (utop))
   (libraries (utop))
+  (flags (:standard -safe-string))
   (link_flags (-linkall))))
 
 (rule