Private (docs.findlib-1.core.command.Command.Shape.Private)

module Key_type : sig ... end

val abs_path : dir:Base.string -> Base.string -> Base.string

val help_screen_compare : Base.string -> Base.string -> Base.int

val lookup_expand : 
  (Base.string * ('a * [ `Full_match_required | `Prefix ])) Base.list ->
  Base.string ->
  Key_type.t ->
  (Base.string * 'a, Base.string) Base.Result.t

val word_wrap : Base.string -> Base.int -> Base.string Base.list