Re: [Libguestfs] [nbdkit PATCH v3 14/14] ocaml: Implement .list_exports and friends
On Mon, Sep 21, 2020 at 11:23:58AM -0500, Eric Blake wrote:
diff --git a/plugins/ocaml/example.ml b/plugins/ocaml/example.ml
index 448de8c4..de493bf2 100644
--- a/plugins/ocaml/example.ml
+++ b/plugins/ocaml/example.ml
@@ -41,6 +41,13 @@ let ocamlexample_config key value =
| _ ->
failwith (Printf.sprintf "unknown parameter: %s" key)
+let ocamlexample_list_exports ro tls : NBDKit.export list =
+ [ { name = "name1"; description = Some "desc1" };
+ { name = "name2"; description = None } ]
+
+let ocamlexample_default_export ro tls =
+ "name1"
It's optional, but if you don't care about a particular parameter you
can use a single underscore, as in:
let ocamlexample_default_export _ _ =
"name1"
I'm sure it's possible to get OCaml to warn about unused non-“_”
parameters, but we have that warning turned off because it'd be quite
annoying.
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