generator: Move defaults to Types module.

Just code motion in preparation for the following commits.
This commit is contained in:
Richard W.M. Jones
2017-02-18 09:36:30 +00:00
parent 18777adf31
commit 7d6fcfc733
2 changed files with 17 additions and 17 deletions

View File

@@ -22,23 +22,6 @@ open Common_utils
open Types
open Utils
(* Default settings for all action fields. So we copy and override
* this struct by writing '{ defaults with name = &c }'
*)
let defaults = { name = "";
added = (-1,-1,-1);
style = RErr, [], []; proc_nr = None;
tests = []; test_excuse = "";
shortdesc = ""; longdesc = "";
protocol_limit_warning = false; fish_alias = [];
fish_output = None; visibility = VPublic;
deprecated_by = None; optional = None;
progress = false; camel_name = "";
cancellable = false; config_only = false;
once_had_no_optargs = false; blocking = true; wrapper = true;
c_name = ""; c_function = ""; c_optarg_prefix = "";
non_c_aliases = [] }
(* These test functions are used in the language binding tests. *)
let test_all_args = [