Add Utils.install_file

Determines the .install depending on the toolchain for x compilation

src/utils.ml

@@ -133,6 +133,11 @@ let obj_name_of_basename fn =
   | None -> fn
   | Some i -> String.sub fn ~pos:0 ~len:i
 
+let install_file ~package ~findlib_toolchain =
+  match findlib_toolchain with
+  | None -> package ^ ".install"
+  | Some x -> sprintf "%s-%s.install" package x
+
 module Cached_digest = struct
   type file =
     { mutable digest            : Digest.t

src/utils.mli

@@ -43,6 +43,8 @@ val find_deps   : dir:Path.t -> 'a String_map.t -> string -> 'a
 *)
 val obj_name_of_basename : string -> string
 
+val install_file : package:string -> findlib_toolchain:string option -> string
+
 (** Digest files with caching *)
 module Cached_digest : sig
   (** Digest the contents of the following file *)