Attention une mise à jour du service Gitlab va être effectuée le mardi 18 janvier (et non lundi 17 comme annoncé précédemment) entre 18h00 et 18h30. Cette mise à jour va générer une interruption du service dont nous ne maîtrisons pas complètement la durée mais qui ne devrait pas excéder quelques minutes.

Commit b0a7cd98 authored by Andrei Paskevich's avatar Andrei Paskevich
Browse files

minor

parent cefa4a01
......@@ -150,12 +150,16 @@ let option_list = Arg.align [
let () =
Arg.parse option_list add_opt_file usage_msg;
if !opt_list_transforms then
printf "@[<hov 2>Registered transformations:@\n%a@]@."
if !opt_list_transforms then begin
printf "@[<hov 2>Registered non-splitting transformations:@\n%a@]@\n@."
(Pp.print_list Pp.newline Pp.string)
(List.sort String.compare (Driver.list_transforms ()));
printf "@[<hov 2>Registered splitting transformations:@\n%a@]@\n@."
(Pp.print_list Pp.newline Pp.string)
(List.sort String.compare (Driver.list_transforms_l ()));
end;
if !opt_list_printers then
printf "@[<hov 2>Registered printers:@\n%a@]@."
printf "@[<hov 2>Registered printers:@\n%a@]@\n@."
(Pp.print_list Pp.newline Pp.string)
(List.sort String.compare (Driver.list_printers ()));
if !opt_list_provers then begin
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment