[Libguestfs] [PATCH 4/4] generator: Declare which input file(s) generate each output file.

Richard W.M. Jones rjones at redhat.com
Tue Feb 23 08:19:26 UTC 2016


---
 generator/bindtests.ml   | 2 ++
 generator/c.ml           | 2 ++
 generator/csharp.ml      | 2 ++
 generator/customize.ml   | 2 ++
 generator/daemon.ml      | 2 ++
 generator/erlang.ml      | 2 ++
 generator/errnostring.ml | 2 ++
 generator/fish.ml        | 2 ++
 generator/gobject.ml     | 2 ++
 generator/golang.ml      | 2 ++
 generator/haskell.ml     | 2 ++
 generator/java.ml        | 2 ++
 generator/lua.ml         | 2 ++
 generator/ocaml.ml       | 2 ++
 generator/perl.ml        | 2 ++
 generator/php.ml         | 2 ++
 generator/python.ml      | 2 ++
 generator/ruby.ml        | 2 ++
 generator/tests_c_api.ml | 2 ++
 generator/xdr.ml         | 2 ++
 gobject/Makefile.inc     | 5 +++--
 java/Makefile.inc        | 5 +++--
 22 files changed, 46 insertions(+), 4 deletions(-)

diff --git a/generator/bindtests.ml b/generator/bindtests.ml
index ed0b247..bd2600d 100644
--- a/generator/bindtests.ml
+++ b/generator/bindtests.ml
@@ -29,6 +29,8 @@ open Actions
 open Structs
 open C
 
+let generate_header = generate_header ~inputs:["generator/bindtests.ml"]
+
 let rec generate_bindtests () =
   generate_header CStyle LGPLv2plus;
 
diff --git a/generator/c.ml b/generator/c.ml
index c432356..417e2bc 100644
--- a/generator/c.ml
+++ b/generator/c.ml
@@ -29,6 +29,8 @@ open Actions
 open Structs
 open Events
 
+let generate_header = generate_header ~inputs:["generator/c.ml"]
+
 (* Generate C API. *)
 
 (* The actions are split across this many C files.  You can increase
diff --git a/generator/csharp.ml b/generator/csharp.ml
index cb48ee3..0255e92 100644
--- a/generator/csharp.ml
+++ b/generator/csharp.ml
@@ -28,6 +28,8 @@ open Optgroups
 open Actions
 open Structs
 
+let generate_header = generate_header ~inputs:["generator/csharp.ml"]
+
 let rec generate_csharp () =
   generate_header CPlusPlusStyle LGPLv2plus;
 
diff --git a/generator/customize.ml b/generator/customize.ml
index d272ffb..36d185c 100644
--- a/generator/customize.ml
+++ b/generator/customize.ml
@@ -23,6 +23,8 @@ open Printf
 open Docstrings
 open Pr
 
+let generate_header = generate_header ~inputs:["generator/customize.ml"]
+
 (* Command-line arguments used by virt-customize, virt-builder and
  * virt-sysprep.
  *)
diff --git a/generator/daemon.ml b/generator/daemon.ml
index d1689e1..cb8b6ba 100644
--- a/generator/daemon.ml
+++ b/generator/daemon.ml
@@ -29,6 +29,8 @@ open Actions
 open Structs
 open C
 
+let generate_header = generate_header ~inputs:["generator/daemon.ml"]
+
 (* Generate daemon/actions.h. *)
 let generate_daemon_actions_h () =
   generate_header CStyle GPLv2plus;
diff --git a/generator/erlang.ml b/generator/erlang.ml
index d5d30b4..4a18938 100644
--- a/generator/erlang.ml
+++ b/generator/erlang.ml
@@ -30,6 +30,8 @@ open Structs
 open C
 open Events
 
+let generate_header = generate_header ~inputs:["generator/erlang.ml"]
+
 let rec generate_erlang_erl () =
   generate_header ErlangStyle LGPLv2plus;
 
diff --git a/generator/errnostring.ml b/generator/errnostring.ml
index fa29816..5033d2e 100644
--- a/generator/errnostring.ml
+++ b/generator/errnostring.ml
@@ -25,6 +25,8 @@ open Utils
 open Pr
 open Docstrings
 
+let generate_header = generate_header ~inputs:["generator/errnostring.ml"]
+
 (* Generate the functions errno_to_string and string_to_errno which
  * convert errno (eg. EINVAL) into string ("EINVAL") and back again,
  * allowing us to portably pass error values over the protocol between
diff --git a/generator/fish.ml b/generator/fish.ml
index a562a73..c5bf7e0 100644
--- a/generator/fish.ml
+++ b/generator/fish.ml
@@ -31,6 +31,8 @@ open Prepopts
 open C
 open Events
 
+let generate_header = generate_header ~inputs:["generator/fish.ml"]
+
 type func =
   | Function of string           (* The description. *)
   | Alias of string              (* The function of which it is one the
diff --git a/generator/gobject.ml b/generator/gobject.ml
index 8f23135..60c053c 100644
--- a/generator/gobject.ml
+++ b/generator/gobject.ml
@@ -30,6 +30,8 @@ open Structs
 open Types
 open Utils
 
+let generate_header = generate_header ~inputs:["generator/gobject.ml"]
+
 let camel_of_name { camel_name = camel_name } = "Guestfs" ^ camel_name
 
 let generate_gobject_proto name ?(single_line = true)
diff --git a/generator/golang.ml b/generator/golang.ml
index faaf19e..1cb97fc 100644
--- a/generator/golang.ml
+++ b/generator/golang.ml
@@ -30,6 +30,8 @@ open Structs
 open C
 open Events
 
+let generate_header = generate_header ~inputs:["generator/golang.ml"]
+
 let generate_golang_go () =
   generate_header CStyle LGPLv2plus;
 
diff --git a/generator/haskell.ml b/generator/haskell.ml
index 1430edb..66c921e 100644
--- a/generator/haskell.ml
+++ b/generator/haskell.ml
@@ -28,6 +28,8 @@ open Optgroups
 open Actions
 open Structs
 
+let generate_header = generate_header ~inputs:["generator/haskell.ml"]
+
 let rec generate_haskell_hs () =
   generate_header HaskellStyle LGPLv2plus;
 
diff --git a/generator/java.ml b/generator/java.ml
index 7bcd329..f303048 100644
--- a/generator/java.ml
+++ b/generator/java.ml
@@ -30,6 +30,8 @@ open Structs
 open Events
 open C
 
+let generate_header = generate_header ~inputs:["generator/java.ml"]
+
 (* Generate Java bindings GuestFS.java file. *)
 let rec generate_java_java () =
   generate_header CStyle LGPLv2plus;
diff --git a/generator/lua.ml b/generator/lua.ml
index eee751b..53c2072 100644
--- a/generator/lua.ml
+++ b/generator/lua.ml
@@ -30,6 +30,8 @@ open Structs
 open C
 open Events
 
+let generate_header = generate_header ~inputs:["generator/lua.ml"]
+
 let generate_lua_c () =
   generate_header CStyle LGPLv2plus;
 
diff --git a/generator/ocaml.ml b/generator/ocaml.ml
index 9071eb0..288e91f 100644
--- a/generator/ocaml.ml
+++ b/generator/ocaml.ml
@@ -30,6 +30,8 @@ open Structs
 open C
 open Events
 
+let generate_header = generate_header ~inputs:["generator/ocaml.ml"]
+
 (* List of errnos to expose on Guestfs.Errno. *)
 let ocaml_errnos = [
   "EINVAL";
diff --git a/generator/perl.ml b/generator/perl.ml
index 6876b0f..5250ce1 100644
--- a/generator/perl.ml
+++ b/generator/perl.ml
@@ -30,6 +30,8 @@ open Structs
 open C
 open Events
 
+let generate_header = generate_header ~inputs:["generator/perl.ml"]
+
 (* Generate Perl xs code, a sort of crazy variation of C with macros. *)
 let rec generate_perl_xs () =
   generate_header CStyle LGPLv2plus;
diff --git a/generator/php.ml b/generator/php.ml
index 15a618b..926ac4f 100644
--- a/generator/php.ml
+++ b/generator/php.ml
@@ -29,6 +29,8 @@ open Actions
 open Structs
 open C
 
+let generate_header = generate_header ~inputs:["generator/php.ml"]
+
 let rec generate_php_h () =
   generate_header CStyle LGPLv2plus;
 
diff --git a/generator/python.ml b/generator/python.ml
index a7f5e34..c618bf0 100644
--- a/generator/python.ml
+++ b/generator/python.ml
@@ -30,6 +30,8 @@ open Structs
 open C
 open Events
 
+let generate_header = generate_header ~inputs:["generator/python.ml"]
+
 (* Generate Python C module. *)
 let rec generate_python_c () =
   generate_header CStyle LGPLv2plus;
diff --git a/generator/ruby.ml b/generator/ruby.ml
index db222ea..9567925 100644
--- a/generator/ruby.ml
+++ b/generator/ruby.ml
@@ -30,6 +30,8 @@ open Structs
 open C
 open Events
 
+let generate_header = generate_header ~inputs:["generator/ruby.ml"]
+
 (* Generate ruby bindings. *)
 let rec generate_ruby_c () =
   generate_header CStyle LGPLv2plus;
diff --git a/generator/tests_c_api.ml b/generator/tests_c_api.ml
index 7cf3763..635a4a6 100644
--- a/generator/tests_c_api.ml
+++ b/generator/tests_c_api.ml
@@ -28,6 +28,8 @@ open Optgroups
 open Actions
 open Structs
 
+let generate_header = generate_header ~inputs:["generator/tests_c_api.ml"]
+
 (* Generate the C API tests. *)
 let rec generate_c_api_tests () =
   generate_header CStyle GPLv2plus;
diff --git a/generator/xdr.ml b/generator/xdr.ml
index 92d484b..60ccbf9 100644
--- a/generator/xdr.ml
+++ b/generator/xdr.ml
@@ -28,6 +28,8 @@ open Optgroups
 open Actions
 open Structs
 
+let generate_header = generate_header ~inputs:["generator/xdr.ml"]
+
 (* Generate the protocol (XDR) file, 'guestfs_protocol.x' and
  * indirectly 'guestfs_protocol.h' and 'guestfs_protocol.c'.
  *
diff --git a/gobject/Makefile.inc b/gobject/Makefile.inc
index 866e1be..46f27dc 100644
--- a/gobject/Makefile.inc
+++ b/gobject/Makefile.inc
@@ -1,6 +1,7 @@
 # libguestfs generated file
-# WARNING: THIS FILE IS GENERATED
-#          from the code in the generator/ subdirectory.
+# WARNING: THIS FILE IS GENERATED FROM THE FOLLOWING FILES:
+#          generator/gobject.ml
+#          and from the code in the generator/ subdirectory.
 # ANY CHANGES YOU MAKE TO THIS FILE WILL BE LOST.
 #
 # Copyright (C) 2009-2016 Red Hat Inc.
diff --git a/java/Makefile.inc b/java/Makefile.inc
index 86da36a..8f994ea 100644
--- a/java/Makefile.inc
+++ b/java/Makefile.inc
@@ -1,6 +1,7 @@
 # libguestfs generated file
-# WARNING: THIS FILE IS GENERATED
-#          from the code in the generator/ subdirectory.
+# WARNING: THIS FILE IS GENERATED FROM THE FOLLOWING FILES:
+#          generator/java.ml
+#          and from the code in the generator/ subdirectory.
 # ANY CHANGES YOU MAKE TO THIS FILE WILL BE LOST.
 #
 # Copyright (C) 2009-2016 Red Hat Inc.
-- 
2.5.0




More information about the Libguestfs mailing list