search for: 569e1a1

Displaying 1 result from an estimated 1 matches for "569e1a1".

Did you mean: 569,131
2009 Aug 28
1
[PATCHES] avoid more warnings
...(emit_ocaml_copy_list_function): New function. Emit a function definition only if it will be used. --- src/generator.ml | 53 ++++++++++++++++++++++++++++++++--------------------- 1 files changed, 32 insertions(+), 21 deletions(-) diff --git a/src/generator.ml b/src/generator.ml index fa7d240..569e1a1 100755 --- a/src/generator.ml +++ b/src/generator.ml @@ -6692,6 +6692,29 @@ copy_table (char * const * argv) "; (* Struct copy functions. *) + + let emit_ocaml_copy_list_function typ = + pr "static CAMLprim value\n"; + pr "copy_%s_list (const struct guestfs_%s_list *...