Re: [Libguestfs] [PATCH v11 4/6] builder: add Index.write_entry function
On Thu, Oct 05, 2017 at 04:58:28PM +0200, Cédric Bosdonnat wrote:
+let write_entry chan (name, { Index.printable_name =
printable_name;
+ file_uri = file_uri;
+ arch = arch;
+ osinfo = osinfo;
+ signature_uri = signature_uri;
+ checksums = checksums;
+ revision = revision;
+ format = format;
+ size = size;
+ compressed_size = compressed_size;
+ expand = expand;
+ lvexpand = lvexpand;
+ notes = notes;
+ aliases = aliases;
+ hidden = hidden }) =
Since commit c7651744da455a00a7abeb930621c50bfb23c40c we've moved the
base OCaml compiler version forwards, allowing this to be written much
more concisely as:
let write_entry chan (name, { Index.printable_name; file_uri; arch; osinfo;
signature_uri; checksums; revision; format;
size; compressed_size; expand; lvexpand;
notes; aliases; hidden }) =
Rich.
--
Richard Jones, Virtualization Group, Red Hat http://people.redhat.com/~rjones
Read my programming and virtualization blog: http://rwmj.wordpress.com
libguestfs lets you edit virtual machines. Supports shell scripting,
bindings from many languages. http://libguestfs.org