From 19c46e6cd872f4ff5bb5ef4bfcfbb0a2b6b8dca5 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Fri, 16 Sep 2016 13:46:26 +0200
Subject: recognize "bytes", "open" & "constant" pragmas

also sort them
---
 NEWS        | 2 ++
 src/tree.ml | 2 +-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/NEWS b/NEWS
index c86a4f7..ae1fe0e 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- recognize "bytes", "open" & "constant" pragmas
+
 Version 1.2.28 - 16 September 2016, by Thierry Vignaud
 
 - fake packages:
diff --git a/src/tree.ml b/src/tree.ml
index 2f0df6b..b843b5c 100644
--- a/src/tree.ml
+++ b/src/tree.ml
@@ -176,7 +176,7 @@ let get_exported t =
   ) empty_exports t
 
 let uses_external_package = function
-  | "vars" | "Exporter" | "diagnostics" | "strict" | "feature" | "warnings" | "lib" | "Storable"
+  | "Exporter" | "bytes" | "constant" | "diagnostics" | "feature" | "lib" | "open" | "strict" | "vars" | "warnings" | "Storable"
   | "Config" | "Socket" | "IO::Socket" | "DynaLoader" | "Data::Dumper" | "Time::localtime" | "Expect" -> true
   | _ -> false
 
-- 
cgit v1.2.1