[Libguestfs] [PATCH 3/6] generator: Add 'added' (version when added) field.

[Richard W.M. Jones]

---
 generator/actions.ml | 4 +++-
 generator/types.ml   | 3 +++
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/generator/actions.ml b/generator/actions.ml
index 1a89869..0b93224 100644
--- a/generator/actions.ml
+++ b/generator/actions.ml
@@ -24,7 +24,9 @@ open Utils
 (* Default settings for all action fields.  So we copy and override
  * this struct by writing '{ defaults with name = &c }'
  *)
-let defaults = { name = ""; style = RErr, [], []; proc_nr = None;
+let defaults = { name = "";
+                 added = (-1,-1,-1);
+                 style = RErr, [], []; proc_nr = None;
                  tests = []; test_excuse = "";
                  shortdesc = ""; longdesc = "";
                  protocol_limit_warning = false; fish_alias = [];
diff --git a/generator/types.ml b/generator/types.ml
index 92d075e..83a6a98 100644
--- a/generator/types.ml
+++ b/generator/types.ml
@@ -330,9 +330,12 @@ type visibility =
   | VDebug                        (* Exported everywhere, but not documented *)
   | VInternal                     (* Not exported *)
 
+type version = int * int * int
+
 (* Type of an action as declared in Actions module. *)
 type action = {
   name : string;                  (* name, not including "guestfs_" *)
+  added : version;                (* which version was the API first added *)
   style : style;                  (* args and return value *)
   proc_nr : int option;           (* proc number, None for non-daemon *)
   tests : c_api_tests;            (* C API tests *)
-- 
2.3.1