Module Mlang.Dgfip_options

val income_year : int Cmdliner.Term.t
val application_name : string Cmdliner.Term.t
val iliad_pro : bool Cmdliner.Term.t
val cfir : bool Cmdliner.Term.t
val batch : int option Cmdliner.Term.t
val primitive_only : bool Cmdliner.Term.t
val extraction : bool Cmdliner.Term.t
val separate_controls : bool Cmdliner.Term.t
val immediate_controls : bool Cmdliner.Term.t
val overlays : bool Cmdliner.Term.t
val multithread : bool Cmdliner.Term.t
val optim_min_max : bool Cmdliner.Term.t
val register : bool Cmdliner.Term.t
val short : bool Cmdliner.Term.t
val output_labels : bool Cmdliner.Term.t
val debug : bool Cmdliner.Term.t
val nb_debug_c : int Cmdliner.Term.t
val trace : bool Cmdliner.Term.t
val ticket : bool Cmdliner.Term.t
val colored_output : bool Cmdliner.Term.t
val cross_references : bool Cmdliner.Term.t
val dgfip_t : ( int -> string -> bool -> bool -> int option -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> int -> bool -> bool -> bool -> bool -> 'a ) -> 'a Cmdliner.Term.t
val info : Cmdliner.Cmd.info
type flags = {
nom_application : string;
annee_revenu : int;
flg_correctif : bool;
flg_iliad : bool;
flg_pro : bool;
flg_cfir : bool;
flg_gcos : bool;
flg_tri_ebcdic : bool;
flg_multithread : bool;
flg_short : bool;
flg_register : bool;
flg_optim_min_max : bool;
flg_extraction : bool;
flg_genere_libelle_restituee : bool;
flg_controle_separe : bool;
flg_controle_immediat : bool;
flg_overlays : bool;
flg_colors : bool;
flg_ticket : bool;
flg_trace : bool;
flg_debug : bool;
nb_debug_c : int;
xflg : bool;
}
val default_flags : flags
val handler : int -> string -> bool -> bool -> int option -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> bool -> int -> bool -> bool -> bool -> bool -> flags
val process_dgfip_options : string list -> flags option