functor
  (P : sig
         val shortname : string
         val parameters : (string, Typed_parameter.t list) Stdlib.Hashtbl.t
         module L :
           sig
             val abort : ('a, 'b) Log.pretty_aborter
             val warning : 'Log.pretty_printer
           end
         val messages_group : Cmdline.Group.t
       end)
  -> Parameter_sig.Builder