Add Jbuild.Lib_deps.of_pps

src/jbuild.ml

@@ -470,6 +470,9 @@ module Lib_deps = struct
             String_set.fold c.forbidden ~init:acc ~f:(add Forbidden)))
       : kind String_map.t);
     t
+
+  let of_pps pps =
+    List.map pps ~f:(fun pp -> Lib_dep.of_pp (Loc.none, pp))
 end
 
 module Buildable = struct

src/jbuild.mli

@@ -116,6 +116,7 @@ end
 
 module Lib_deps : sig
   type t = Lib_dep.t list
+  val of_pps : Pp.t list -> t
 end
 
 module Dep_conf : sig