* Python script modified from a version by Seth Vidal.
*)
+(* Rename the extlib Std module so it doesn't clash with the
+ * sexplib Std module.
+ *)
+module Extlib_Std = Std
+
open Sexplib
-TYPE_CONV_PATH "."
+open Sexplib.Conv
+(*TYPE_CONV_PATH "."*)
open ExtList
open Unix
let chan = open_process_in cmd in
ignore (input_line chan); (* Drop "Loaded plugins" line. *)
let root, pkgs =
- root_packages_of_sexp (Sexp.of_string (Std.input_all chan)) in
+ root_packages_of_sexp (Sexp.of_string (Extlib_Std.input_all chan)) in
(match close_process_in chan with
| WEXITED 0 -> ()
| WEXITED i -> failwithf "python command exited with status %d" i