sig
  val add : 'a -> 'a list -> 'a list
  val adds : 'a list -> 'a list -> 'a list
  val add_if : bool -> 'a -> 'a list -> 'a list
  val adds_if : bool -> 'a list -> 'a list -> 'a list
  val fadd_if : bool -> ('b -> 'a) -> 'b -> 'a list -> 'a list
  val fadds_if : bool -> ('b -> 'a list) -> 'b -> 'a list -> 'a list
  val path_arg :
    ?opt:string -> Assemblage.Path.t -> string list -> string list
  val path_args :
    ?opt:string -> Assemblage.Path.t list -> string list -> string list
  val path :
    Assemblage.Path.t -> ext:Assemblage.Path.ext -> Assemblage.Path.t
end