Command_making_state (flexmasa.Flexmasa.Test_command_line.Command_making

type specific =
  < command_name : Internal_pervasives.string
  ; env_config : Environment_configuration.t
  ; manpager : Internal_pervasives.Manpage_builder.State.t >

type 'a t = 'a constraint 'a = < application_name : Internal_pervasives.string ; specific.. >

val make : 
  application_name:Internal_pervasives.string ->
  command_name:Internal_pervasives.string ->
  Internal_pervasives.unit ->
  < application_name : Internal_pervasives.string
  ; command_name : Internal_pervasives.string
  ; env_config : Environment_configuration.t
  ; manpager : Internal_pervasives.Manpage_builder.State.t >