let arg_spec () = [
    ("-version",
     Arg.Unit (fun () -> print_endline Config.version ; exit 0),
     " Print version and exit")
  ]