let options = [
"--version",
Arg.Unit (fun () -> print_endline Dbf_installation.software_version; exit 0),
"\tprint version and exit" ;
"-o", Arg.String (fun s -> out_file := Some s),
"file\twrite to file instead of standard output" ;
"--remove-table-prefix", Arg.String (fun s -> remove_table_prefix := Some s),
"<prefix>\n\t\tremove this prefix from table names to get (simpler) module names" ;
] @ convert_options